xref: /onnv-gate/usr/src/tools/cscope-fast/mypopen.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  * CDDL HEADER START
3*0Sstevel@tonic-gate  *
4*0Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate  * with the License.
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate  * and limitations under the License.
13*0Sstevel@tonic-gate  *
14*0Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * CDDL HEADER END
21*0Sstevel@tonic-gate  */
22*0Sstevel@tonic-gate /*	Copyright (c) 1988 AT&T	*/
23*0Sstevel@tonic-gate /*	  All Rights Reserved  	*/
24*0Sstevel@tonic-gate 
25*0Sstevel@tonic-gate 
26*0Sstevel@tonic-gate /*
27*0Sstevel@tonic-gate  * Copyright (c) 1999 by Sun Microsystems, Inc.
28*0Sstevel@tonic-gate  * All rights reserved.
29*0Sstevel@tonic-gate  */
30*0Sstevel@tonic-gate 
31*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
32*0Sstevel@tonic-gate 
33*0Sstevel@tonic-gate #include <fcntl.h>
34*0Sstevel@tonic-gate #include <sys/types.h>
35*0Sstevel@tonic-gate #include <sys/wait.h>
36*0Sstevel@tonic-gate #include <unistd.h>
37*0Sstevel@tonic-gate #include <stdlib.h>
38*0Sstevel@tonic-gate #include <stdio.h>
39*0Sstevel@tonic-gate #include <libgen.h>
40*0Sstevel@tonic-gate #include "global.h"	/* pid_t, SIGTYPE, shell, and basename() */
41*0Sstevel@tonic-gate 
42*0Sstevel@tonic-gate #define	tst(a, b) (*mode == 'r'? (b) : (a))
43*0Sstevel@tonic-gate #define	RDR	0
44*0Sstevel@tonic-gate #define	WTR	1
45*0Sstevel@tonic-gate 
46*0Sstevel@tonic-gate static pid_t popen_pid[20];
47*0Sstevel@tonic-gate static SIGTYPE (*tstat)();
48*0Sstevel@tonic-gate 
49*0Sstevel@tonic-gate FILE *
mypopen(char * cmd,char * mode)50*0Sstevel@tonic-gate mypopen(char *cmd, char *mode)
51*0Sstevel@tonic-gate {
52*0Sstevel@tonic-gate 	int	p[2];
53*0Sstevel@tonic-gate 	pid_t *poptr;
54*0Sstevel@tonic-gate 	int myside, yourside;
55*0Sstevel@tonic-gate 	pid_t pid;
56*0Sstevel@tonic-gate 
57*0Sstevel@tonic-gate 	if (pipe(p) < 0)
58*0Sstevel@tonic-gate 		return (NULL);
59*0Sstevel@tonic-gate 	myside = tst(p[WTR], p[RDR]);
60*0Sstevel@tonic-gate 	yourside = tst(p[RDR], p[WTR]);
61*0Sstevel@tonic-gate 	if ((pid = fork()) > 0) {
62*0Sstevel@tonic-gate 		tstat = signal(SIGTSTP, SIG_DFL);
63*0Sstevel@tonic-gate 	} else if (pid == 0) {
64*0Sstevel@tonic-gate 		/* myside and yourside reverse roles in child */
65*0Sstevel@tonic-gate 		int	stdio;
66*0Sstevel@tonic-gate 
67*0Sstevel@tonic-gate 		/* close all pipes from other popen's */
68*0Sstevel@tonic-gate 		for (poptr = popen_pid; poptr < popen_pid+20; poptr++) {
69*0Sstevel@tonic-gate 			if (*poptr)
70*0Sstevel@tonic-gate 				(void) close(poptr - popen_pid);
71*0Sstevel@tonic-gate 		}
72*0Sstevel@tonic-gate 		stdio = tst(0, 1);
73*0Sstevel@tonic-gate 		(void) close(myside);
74*0Sstevel@tonic-gate 		(void) close(stdio);
75*0Sstevel@tonic-gate 		(void) fcntl(yourside, F_DUPFD, stdio);
76*0Sstevel@tonic-gate 		(void) close(yourside);
77*0Sstevel@tonic-gate 		(void) execlp(shell, basename(shell), "-c", cmd, 0);
78*0Sstevel@tonic-gate 		_exit(1);
79*0Sstevel@tonic-gate 	}
80*0Sstevel@tonic-gate 	if (pid == -1)
81*0Sstevel@tonic-gate 		return (NULL);
82*0Sstevel@tonic-gate 	popen_pid[myside] = pid;
83*0Sstevel@tonic-gate 	(void) close(yourside);
84*0Sstevel@tonic-gate 	return (fdopen(myside, mode));
85*0Sstevel@tonic-gate }
86*0Sstevel@tonic-gate 
87*0Sstevel@tonic-gate int
mypclose(FILE * ptr)88*0Sstevel@tonic-gate mypclose(FILE *ptr)
89*0Sstevel@tonic-gate {
90*0Sstevel@tonic-gate 	int f;
91*0Sstevel@tonic-gate 	pid_t r;
92*0Sstevel@tonic-gate 	int status;
93*0Sstevel@tonic-gate 	SIGTYPE (*hstat)(), (*istat)(), (*qstat)();
94*0Sstevel@tonic-gate 
95*0Sstevel@tonic-gate 	f = fileno(ptr);
96*0Sstevel@tonic-gate 	(void) fclose(ptr);
97*0Sstevel@tonic-gate 	istat = signal(SIGINT, SIG_IGN);
98*0Sstevel@tonic-gate 	qstat = signal(SIGQUIT, SIG_IGN);
99*0Sstevel@tonic-gate 	hstat = signal(SIGHUP, SIG_IGN);
100*0Sstevel@tonic-gate 	while ((r = wait(&status)) != popen_pid[f] && r != -1) {
101*0Sstevel@tonic-gate 	}
102*0Sstevel@tonic-gate 	if (r == -1)
103*0Sstevel@tonic-gate 		status = -1;
104*0Sstevel@tonic-gate 	(void) signal(SIGINT, istat);
105*0Sstevel@tonic-gate 	(void) signal(SIGQUIT, qstat);
106*0Sstevel@tonic-gate 	(void) signal(SIGHUP, hstat);
107*0Sstevel@tonic-gate 	(void) signal(SIGTSTP, tstat);
108*0Sstevel@tonic-gate 	/* mark this pipe closed */
109*0Sstevel@tonic-gate 	popen_pid[f] = 0;
110*0Sstevel@tonic-gate 	return (status);
111*0Sstevel@tonic-gate }
112