2 * Copyright (c) 1980, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 * @(#)popen.c 8.1 (Berkeley) 6/6/93
34 * $FreeBSD: src/usr.bin/mail/popen.c,v 1.2.6.3 2003/01/06 05:46:03 mikeh Exp $
35 * $DragonFly: src/usr.bin/mail/popen.c,v 1.3 2003/10/04 20:36:48 hmp Exp $
52 static struct fp *fp_head;
61 static struct child *child;
62 static struct child *findchild(int);
63 static void delchild(struct child *);
64 static int file_pid(FILE *);
67 Fopen(const char *path, const char *mode)
71 if ((fp = fopen(path, mode)) != NULL) {
72 register_file(fp, 0, 0);
73 (void)fcntl(fileno(fp), F_SETFD, 1);
79 Fdopen(int fd, const char *mode)
83 if ((fp = fdopen(fd, mode)) != NULL) {
84 register_file(fp, 0, 0);
85 (void)fcntl(fileno(fp), F_SETFD, 1);
98 Popen(char *cmd, const char *mode)
101 int myside, hisside, fd0, fd1;
108 (void)fcntl(p[READ], F_SETFD, 1);
109 (void)fcntl(p[WRITE], F_SETFD, 1);
113 hisside = fd1 = p[WRITE];
116 hisside = fd0 = p[READ];
119 (void)sigemptyset(&nset);
120 if ((pid = start_command(cmd, &nset, fd0, fd1, NULL, NULL, NULL)) < 0) {
121 (void)close(p[READ]);
122 (void)close(p[WRITE]);
125 (void)close(hisside);
126 if ((fp = fdopen(myside, mode)) != NULL)
127 register_file(fp, 1, pid);
138 unregister_file(ptr);
140 (void)sigemptyset(&nset);
141 (void)sigaddset(&nset, SIGINT);
142 (void)sigaddset(&nset, SIGHUP);
143 (void)sigprocmask(SIG_BLOCK, &nset, &oset);
145 (void)sigprocmask(SIG_SETMASK, &oset, NULL);
150 close_all_files(void)
153 while (fp_head != NULL)
155 (void)Pclose(fp_head->fp);
157 (void)Fclose(fp_head->fp);
161 register_file(FILE *fp, int pipe, int pid)
165 if ((fpp = malloc(sizeof(*fpp))) == NULL)
166 err(1, "Out of memory");
175 unregister_file(FILE *fp)
179 for (pp = &fp_head; (p = *pp) != NULL; pp = &p->link)
185 errx(1, "Invalid file pointer");
194 for (p = fp_head; p != NULL; p = p->link)
197 errx(1, "Invalid file pointer");
202 * Run a command without a shell, with optional arguments and splicing
203 * of stdin and stdout. The command name can be a sequence of words.
204 * Signals must be handled by the caller.
205 * "Mask" contains the signals to ignore in the new process.
206 * SIGINT is enabled unless it's in the mask.
210 run_command(char *cmd, sigset_t *mask, int infd, int outfd, char *a0, char *a1,
215 if ((pid = start_command(cmd, mask, infd, outfd, a0, a1, a2)) < 0)
217 return (wait_command(pid));
222 start_command(char *cmd, sigset_t *mask, int infd, int outfd, char *a0,
227 if ((pid = fork()) < 0) {
233 int i = getrawlist(cmd, argv, sizeof(argv) / sizeof(*argv));
235 if ((argv[i++] = a0) != NULL &&
236 (argv[i++] = a1) != NULL &&
237 (argv[i++] = a2) != NULL)
239 prepare_child(mask, infd, outfd);
240 execvp(argv[0], argv);
248 prepare_child(sigset_t *nset, int infd, int outfd)
254 * All file descriptors other than 0, 1, and 2 are supposed to be
261 for (i = 1; i < NSIG; i++)
262 if (nset != NULL && sigismember(nset, i))
263 (void)signal(i, SIG_IGN);
264 if (nset == NULL || !sigismember(nset, SIGINT))
265 (void)signal(SIGINT, SIG_DFL);
266 (void)sigemptyset(&eset);
267 (void)sigprocmask(SIG_SETMASK, &eset, NULL);
271 wait_command(int pid)
274 if (wait_child(pid) < 0) {
275 printf("Fatal error in process.\n");
281 static struct child *
286 for (cpp = &child; *cpp != NULL && (*cpp)->pid != pid;
290 *cpp = malloc(sizeof(struct child));
292 err(1, "Out of memory");
294 (*cpp)->done = (*cpp)->free = 0;
301 delchild(struct child *cp)
305 for (cpp = &child; *cpp != cp; cpp = &(*cpp)->link)
319 while ((pid = waitpid((pid_t)-1, &status, WNOHANG)) > 0) {
333 * Wait for a specific child to die.
339 struct child *cp = findchild(pid);
341 (void)sigemptyset(&nset);
342 (void)sigaddset(&nset, SIGCHLD);
343 (void)sigprocmask(SIG_BLOCK, &nset, &oset);
346 (void)sigsuspend(&oset);
347 wait_status = cp->status;
349 (void)sigprocmask(SIG_SETMASK, &oset, NULL);
350 return ((WIFEXITED(wait_status) && WEXITSTATUS(wait_status)) ? -1 : 0);
354 * Mark a child as don't care.
360 struct child *cp = findchild(pid);
362 (void)sigemptyset(&nset);
363 (void)sigaddset(&nset, SIGCHLD);
364 (void)sigprocmask(SIG_BLOCK, &nset, &oset);
370 (void)sigprocmask(SIG_SETMASK, &oset, NULL);