145e5710bSMark Peek /*
2c80476e4SDavid E. O'Brien * sh.sem.c: I/O redirections and job forking. A touchy issue!
3c80476e4SDavid E. O'Brien * Most stuff with builtins is incorrect
4c80476e4SDavid E. O'Brien */
5c80476e4SDavid E. O'Brien /*-
6c80476e4SDavid E. O'Brien * Copyright (c) 1980, 1991 The Regents of the University of California.
7c80476e4SDavid E. O'Brien * All rights reserved.
8c80476e4SDavid E. O'Brien *
9c80476e4SDavid E. O'Brien * Redistribution and use in source and binary forms, with or without
10c80476e4SDavid E. O'Brien * modification, are permitted provided that the following conditions
11c80476e4SDavid E. O'Brien * are met:
12c80476e4SDavid E. O'Brien * 1. Redistributions of source code must retain the above copyright
13c80476e4SDavid E. O'Brien * notice, this list of conditions and the following disclaimer.
14c80476e4SDavid E. O'Brien * 2. Redistributions in binary form must reproduce the above copyright
15c80476e4SDavid E. O'Brien * notice, this list of conditions and the following disclaimer in the
16c80476e4SDavid E. O'Brien * documentation and/or other materials provided with the distribution.
17c80476e4SDavid E. O'Brien * 3. Neither the name of the University nor the names of its contributors
1829301572SMark Peek * may be used to endorse or promote products derived from this software
19c80476e4SDavid E. O'Brien * without specific prior written permission.
20c80476e4SDavid E. O'Brien *
21c80476e4SDavid E. O'Brien * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22c80476e4SDavid E. O'Brien * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23c80476e4SDavid E. O'Brien * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24c80476e4SDavid E. O'Brien * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25c80476e4SDavid E. O'Brien * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26c80476e4SDavid E. O'Brien * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27c80476e4SDavid E. O'Brien * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28c80476e4SDavid E. O'Brien * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29c80476e4SDavid E. O'Brien * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30c80476e4SDavid E. O'Brien * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31c80476e4SDavid E. O'Brien * SUCH DAMAGE.
32c80476e4SDavid E. O'Brien */
33c80476e4SDavid E. O'Brien #include "sh.h"
34c80476e4SDavid E. O'Brien #include "tc.h"
35c80476e4SDavid E. O'Brien #include "tw.h"
3645e5710bSMark Peek #ifdef WINNT_NATIVE
37c80476e4SDavid E. O'Brien #include "nt.const.h"
38c80476e4SDavid E. O'Brien #endif /*WINNT_NATIVE*/
39c80476e4SDavid E. O'Brien
403b6eaa7bSAndrey A. Chernov #ifdef CLOSE_ON_EXEC
41c80476e4SDavid E. O'Brien # ifndef SUNOS4
423b6eaa7bSAndrey A. Chernov # ifndef CLEX_DUPS
43c80476e4SDavid E. O'Brien # define CLEX_DUPS
44c80476e4SDavid E. O'Brien # endif /* CLEX_DUPS */
45c80476e4SDavid E. O'Brien # endif /* !SUNOS4 */
46c80476e4SDavid E. O'Brien #endif /* CLOSE_ON_EXEC */
47c80476e4SDavid E. O'Brien
48c80476e4SDavid E. O'Brien #if defined(__sparc__) || defined(sparc)
49c80476e4SDavid E. O'Brien # if !defined(MACH) && SYSVREL == 0 && !defined(Lynx) && !defined(BSD4_4) && !defined(__linux__) && !defined(__GNU__) && !defined(__GLIBC__)
50c80476e4SDavid E. O'Brien # include <vfork.h>
51c80476e4SDavid E. O'Brien # endif /* !MACH && SYSVREL == 0 && !Lynx && !BSD4_4 && !glibc */
52c80476e4SDavid E. O'Brien #endif /* __sparc__ || sparc */
5323338178SMark Peek
54c80476e4SDavid E. O'Brien #ifdef VFORK
5523338178SMark Peek static void vffree (int);
56c80476e4SDavid E. O'Brien #endif
57c80476e4SDavid E. O'Brien static Char *splicepipe (struct command *, Char *);
58c80476e4SDavid E. O'Brien static void doio (struct command *, int *, int *);
5945e5710bSMark Peek static void chkclob (const char *);
60c80476e4SDavid E. O'Brien
6145e5710bSMark Peek /*
6245e5710bSMark Peek * C shell
6345e5710bSMark Peek */
64c80476e4SDavid E. O'Brien
65c80476e4SDavid E. O'Brien /*
66c80476e4SDavid E. O'Brien * For SVR4, there are problems with pipelines having the first process as
67c80476e4SDavid E. O'Brien * the group leader. The problem occurs when the first process exits before
68c80476e4SDavid E. O'Brien * the others have a chance to setpgid(). This is because in SVR4 you can't
69c80476e4SDavid E. O'Brien * have a zombie as a group leader. The solution I have used is to reverse
70c80476e4SDavid E. O'Brien * the order in which pipelines are started, making the last process the
71c80476e4SDavid E. O'Brien * group leader. (Note I am not using 'pipeline' in the generic sense -- I
72c80476e4SDavid E. O'Brien * mean processes connected by '|'.) I don't know yet if this causes other
73c80476e4SDavid E. O'Brien * problems.
74c80476e4SDavid E. O'Brien *
75c80476e4SDavid E. O'Brien * All the changes for this are in execute(), and are enclosed in
76c80476e4SDavid E. O'Brien * '#ifdef BACKPIPE'
77c80476e4SDavid E. O'Brien *
78c80476e4SDavid E. O'Brien * David Dawes (dawes@physics.su.oz.au) Oct 1991
79c80476e4SDavid E. O'Brien */
80c80476e4SDavid E. O'Brien
81c80476e4SDavid E. O'Brien /*VARARGS 1*/
82c80476e4SDavid E. O'Brien void
execute(struct command * t,volatile int wanttty,int * pipein,int * pipeout,int do_glob)83c80476e4SDavid E. O'Brien execute(struct command *t, volatile int wanttty, int *pipein, int *pipeout,
84c80476e4SDavid E. O'Brien int do_glob)
85c80476e4SDavid E. O'Brien {
86c80476e4SDavid E. O'Brien int forked = 0;
8745e5710bSMark Peek const struct biltins * volatile bifunc;
8845e5710bSMark Peek pid_t pid = 0;
89c80476e4SDavid E. O'Brien int pv[2];
9023338178SMark Peek sigset_t set;
9145e5710bSMark Peek static sigset_t csigset;
9245e5710bSMark Peek #ifdef VFORK
93c80476e4SDavid E. O'Brien static int onosigchld = 0;
9445e5710bSMark Peek #endif /* VFORK */
9545e5710bSMark Peek static int nosigchld = 0;
96c80476e4SDavid E. O'Brien
97c80476e4SDavid E. O'Brien (void) &wanttty;
98c80476e4SDavid E. O'Brien (void) &forked;
99c80476e4SDavid E. O'Brien (void) &bifunc;
100c80476e4SDavid E. O'Brien
101c80476e4SDavid E. O'Brien if (t == 0)
102c80476e4SDavid E. O'Brien return;
103c80476e4SDavid E. O'Brien
104c80476e4SDavid E. O'Brien #ifdef WINNT_NATIVE
105c80476e4SDavid E. O'Brien {
106c80476e4SDavid E. O'Brien if ((varval(STRNTslowexec) == STRNULL) &&
107c80476e4SDavid E. O'Brien !t->t_dcdr && !t->t_dcar && !t->t_dflg && !didfds &&
1083b6eaa7bSAndrey A. Chernov (intty || intact) && (t->t_dtyp == NODE_COMMAND) &&
109c80476e4SDavid E. O'Brien !isbfunc(t)) {
110c80476e4SDavid E. O'Brien if ((t->t_dcom[0][0] & (QUOTE | TRIM)) == QUOTE)
111c80476e4SDavid E. O'Brien (void) Strcpy(t->t_dcom[0], t->t_dcom[0] + 1);
112c80476e4SDavid E. O'Brien Dfix(t);
113c80476e4SDavid E. O'Brien if (nt_try_fast_exec(t) == 0)
114c80476e4SDavid E. O'Brien return;
115c80476e4SDavid E. O'Brien }
116c80476e4SDavid E. O'Brien }
117c80476e4SDavid E. O'Brien #endif /* WINNT_NATIVE */
118c80476e4SDavid E. O'Brien
119c80476e4SDavid E. O'Brien /*
120c80476e4SDavid E. O'Brien * Ed hutchins@sgi.com & Dominic dbg@sgi.com
1213b6eaa7bSAndrey A. Chernov * Sat Feb 25 03:13:11 PST 1995
122c80476e4SDavid E. O'Brien * try implicit cd if we have a 1 word command
123c80476e4SDavid E. O'Brien */
124c80476e4SDavid E. O'Brien if (implicit_cd && (intty || intact) && t->t_dcom && t->t_dcom[0] &&
125c80476e4SDavid E. O'Brien t->t_dcom[0][0] && (blklen(t->t_dcom) == 1) && !noexec) {
126c80476e4SDavid E. O'Brien Char *sCName;
127c80476e4SDavid E. O'Brien struct stat stbuf;
128c80476e4SDavid E. O'Brien char *pathname;
129c80476e4SDavid E. O'Brien
13045e5710bSMark Peek sCName = dollar(t->t_dcom[0]);
131c80476e4SDavid E. O'Brien if (sCName != NULL && sCName[0] == '~') {
132c80476e4SDavid E. O'Brien struct Strbuf buf = Strbuf_INIT;
133c80476e4SDavid E. O'Brien const Char *name_end;
13445e5710bSMark Peek
13545e5710bSMark Peek for (name_end = sCName + 1; *name_end != '\0' && *name_end != '/';
13645e5710bSMark Peek name_end++)
13745e5710bSMark Peek continue;
138c80476e4SDavid E. O'Brien if (name_end != sCName + 1) {
13945e5710bSMark Peek Char *name, *home;
14045e5710bSMark Peek
14145e5710bSMark Peek name = Strnsave(sCName + 1, name_end - (sCName + 1));
14245e5710bSMark Peek home = gethdir(name);
14345e5710bSMark Peek if (home != NULL) {
14445e5710bSMark Peek Strbuf_append(&buf, home);
14545e5710bSMark Peek xfree(home);
14645e5710bSMark Peek } else
14745e5710bSMark Peek Strbuf_append(&buf, name);
14845e5710bSMark Peek xfree(name);
14945e5710bSMark Peek } else
15045e5710bSMark Peek Strbuf_append(&buf, varval(STRhome));
15145e5710bSMark Peek Strbuf_append(&buf, name_end);
15245e5710bSMark Peek xfree(sCName);
15345e5710bSMark Peek sCName = Strbuf_finish(&buf);
15445e5710bSMark Peek }
15545e5710bSMark Peek
15645e5710bSMark Peek pathname = short2str(sCName);
15745e5710bSMark Peek xfree(sCName);
158c80476e4SDavid E. O'Brien /* if this is a dir, tack a "cd" on as the first arg */
159c80476e4SDavid E. O'Brien if (pathname != NULL &&
160c80476e4SDavid E. O'Brien ((stat(pathname, &stbuf) != -1 && S_ISDIR(stbuf.st_mode))
16145e5710bSMark Peek #ifdef WINNT_NATIVE
162c80476e4SDavid E. O'Brien || (pathname[0] && pathname[1] == ':' && pathname[2] == '\0')
16345e5710bSMark Peek #endif /* WINNT_NATIVE */
16445e5710bSMark Peek )) {
1653b6eaa7bSAndrey A. Chernov Char *vCD[2];
166c80476e4SDavid E. O'Brien Char **ot_dcom = t->t_dcom;
1673b6eaa7bSAndrey A. Chernov
16845e5710bSMark Peek vCD[0] = Strsave(STRcd);
169c80476e4SDavid E. O'Brien vCD[1] = NULL;
170c80476e4SDavid E. O'Brien t->t_dcom = blkspl(vCD, ot_dcom);
171c80476e4SDavid E. O'Brien xfree(ot_dcom);
172c80476e4SDavid E. O'Brien if (implicit_cd > 1) {
173c80476e4SDavid E. O'Brien blkpr(t->t_dcom);
174c80476e4SDavid E. O'Brien xputchar( '\n' );
17545e5710bSMark Peek }
176c80476e4SDavid E. O'Brien }
177c80476e4SDavid E. O'Brien }
178c80476e4SDavid E. O'Brien
179c80476e4SDavid E. O'Brien /*
180c80476e4SDavid E. O'Brien * From: Michael Schroeder <mlschroe@immd4.informatik.uni-erlangen.de>
181c80476e4SDavid E. O'Brien * Don't check for wantty > 0...
182c80476e4SDavid E. O'Brien */
183c80476e4SDavid E. O'Brien if (t->t_dflg & F_AMPERSAND)
184c80476e4SDavid E. O'Brien wanttty = 0;
185c80476e4SDavid E. O'Brien switch (t->t_dtyp) {
186c80476e4SDavid E. O'Brien
187c80476e4SDavid E. O'Brien case NODE_COMMAND:
188c80476e4SDavid E. O'Brien if ((t->t_dcom[0][0] & (QUOTE | TRIM)) == QUOTE)
189c80476e4SDavid E. O'Brien memmove(t->t_dcom[0], t->t_dcom[0] + 1,
190c80476e4SDavid E. O'Brien (Strlen(t->t_dcom[0] + 1) + 1) * sizeof (*t->t_dcom[0]));
191c80476e4SDavid E. O'Brien if ((t->t_dflg & F_REPEAT) == 0)
192c80476e4SDavid E. O'Brien Dfix(t); /* $ " ' \ */
19345e5710bSMark Peek if (t->t_dcom[0] == 0) {
19445e5710bSMark Peek return;
195c80476e4SDavid E. O'Brien }
196c80476e4SDavid E. O'Brien /*FALLTHROUGH*/
197c80476e4SDavid E. O'Brien
198c80476e4SDavid E. O'Brien case NODE_PAREN:
199c80476e4SDavid E. O'Brien #ifdef BACKPIPE
200c80476e4SDavid E. O'Brien if (t->t_dflg & F_PIPEIN)
201c80476e4SDavid E. O'Brien mypipe(pipein);
202c80476e4SDavid E. O'Brien #else /* !BACKPIPE */
203c80476e4SDavid E. O'Brien if (t->t_dflg & F_PIPEOUT)
204c80476e4SDavid E. O'Brien mypipe(pipeout);
205c80476e4SDavid E. O'Brien #endif /* BACKPIPE */
206c80476e4SDavid E. O'Brien /*
207c80476e4SDavid E. O'Brien * Must do << early so parent will know where input pointer should be.
208c80476e4SDavid E. O'Brien * If noexec then this is all we do.
209c80476e4SDavid E. O'Brien */
210c80476e4SDavid E. O'Brien if (t->t_dflg & F_READ) {
211c80476e4SDavid E. O'Brien int old_pintr_disabled;
212c80476e4SDavid E. O'Brien
213c80476e4SDavid E. O'Brien xclose(0);
214c80476e4SDavid E. O'Brien if (setintr)
21545e5710bSMark Peek pintr_push_enable(&old_pintr_disabled);
216c80476e4SDavid E. O'Brien heredoc(t->t_dlef);
217c80476e4SDavid E. O'Brien if (setintr)
21845e5710bSMark Peek cleanup_until(&old_pintr_disabled);
219c80476e4SDavid E. O'Brien if (noexec)
220c80476e4SDavid E. O'Brien xclose(0);
22145e5710bSMark Peek }
222c80476e4SDavid E. O'Brien
223c80476e4SDavid E. O'Brien setcopy(STRstatus, STR0, VAR_READWRITE);
224c80476e4SDavid E. O'Brien
225c80476e4SDavid E. O'Brien /*
226c80476e4SDavid E. O'Brien * This mess is the necessary kludge to handle the prefix builtins:
227c80476e4SDavid E. O'Brien * nice, nohup, time. These commands can also be used by themselves,
228c80476e4SDavid E. O'Brien * and this is not handled here. This will also work when loops are
229c80476e4SDavid E. O'Brien * parsed.
230c80476e4SDavid E. O'Brien */
231c80476e4SDavid E. O'Brien while (t->t_dtyp == NODE_COMMAND)
232c80476e4SDavid E. O'Brien if (eq(t->t_dcom[0], STRnice)) {
233c80476e4SDavid E. O'Brien if (t->t_dcom[1]) {
234c80476e4SDavid E. O'Brien if (strchr("+-", t->t_dcom[1][0])) {
235c80476e4SDavid E. O'Brien if (t->t_dcom[2]) {
236c80476e4SDavid E. O'Brien setname("nice");
237c80476e4SDavid E. O'Brien t->t_nice = (unsigned char)getn(t->t_dcom[1]);
238c80476e4SDavid E. O'Brien lshift(t->t_dcom, 2);
239c80476e4SDavid E. O'Brien t->t_dflg |= F_NICE;
240c80476e4SDavid E. O'Brien }
241c80476e4SDavid E. O'Brien else
242c80476e4SDavid E. O'Brien break;
243c80476e4SDavid E. O'Brien }
244c80476e4SDavid E. O'Brien else {
245c80476e4SDavid E. O'Brien t->t_nice = 4;
246c80476e4SDavid E. O'Brien lshift(t->t_dcom, 1);
247c80476e4SDavid E. O'Brien t->t_dflg |= F_NICE;
248c80476e4SDavid E. O'Brien }
249c80476e4SDavid E. O'Brien }
250c80476e4SDavid E. O'Brien else
251c80476e4SDavid E. O'Brien break;
252c80476e4SDavid E. O'Brien }
253c80476e4SDavid E. O'Brien else if (eq(t->t_dcom[0], STRnohup)) {
254c80476e4SDavid E. O'Brien if (t->t_dcom[1]) {
255c80476e4SDavid E. O'Brien t->t_dflg |= F_NOHUP;
256c80476e4SDavid E. O'Brien lshift(t->t_dcom, 1);
257c80476e4SDavid E. O'Brien }
258c80476e4SDavid E. O'Brien else
259c80476e4SDavid E. O'Brien break;
260c80476e4SDavid E. O'Brien }
261c80476e4SDavid E. O'Brien else if (eq(t->t_dcom[0], STRhup)) {
262c80476e4SDavid E. O'Brien if (t->t_dcom[1]) {
263c80476e4SDavid E. O'Brien t->t_dflg |= F_HUP;
264c80476e4SDavid E. O'Brien lshift(t->t_dcom, 1);
265c80476e4SDavid E. O'Brien }
266c80476e4SDavid E. O'Brien else
267c80476e4SDavid E. O'Brien break;
268c80476e4SDavid E. O'Brien }
269c80476e4SDavid E. O'Brien else if (eq(t->t_dcom[0], STRtime)) {
270c80476e4SDavid E. O'Brien if (t->t_dcom[1]) {
271c80476e4SDavid E. O'Brien t->t_dflg |= F_TIME;
272c80476e4SDavid E. O'Brien lshift(t->t_dcom, 1);
273c80476e4SDavid E. O'Brien }
274c80476e4SDavid E. O'Brien else
275c80476e4SDavid E. O'Brien break;
276c80476e4SDavid E. O'Brien }
277c80476e4SDavid E. O'Brien #ifdef F_VER
278c80476e4SDavid E. O'Brien else if (eq(t->t_dcom[0], STRver))
279c80476e4SDavid E. O'Brien if (t->t_dcom[1] && t->t_dcom[2]) {
280c80476e4SDavid E. O'Brien setname("ver");
281c80476e4SDavid E. O'Brien t->t_systype = getv(t->t_dcom[1]);
282c80476e4SDavid E. O'Brien lshift(t->t_dcom, 2);
283c80476e4SDavid E. O'Brien t->t_dflg |= F_VER;
284c80476e4SDavid E. O'Brien }
285c80476e4SDavid E. O'Brien else
286c80476e4SDavid E. O'Brien break;
287c80476e4SDavid E. O'Brien #endif /* F_VER */
288c80476e4SDavid E. O'Brien else
289c80476e4SDavid E. O'Brien break;
290c80476e4SDavid E. O'Brien
291c80476e4SDavid E. O'Brien /* is it a command */
292c80476e4SDavid E. O'Brien if (t->t_dtyp == NODE_COMMAND) {
293c80476e4SDavid E. O'Brien /*
294c80476e4SDavid E. O'Brien * Check if we have a builtin function and remember which one.
295c80476e4SDavid E. O'Brien */
29645e5710bSMark Peek bifunc = isbfunc(t);
297c80476e4SDavid E. O'Brien if (noexec) {
298c80476e4SDavid E. O'Brien /*
299c80476e4SDavid E. O'Brien * Continue for builtins that are part of the scripting language
30045e5710bSMark Peek */
30145e5710bSMark Peek if (bifunc == NULL)
302c80476e4SDavid E. O'Brien break;
303c80476e4SDavid E. O'Brien if (bifunc->bfunct != (bfunc_t)dobreak &&
304c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)docontin &&
305c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)doelse &&
306c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)doend &&
307c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)doforeach&&
308c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)dogoto &&
309c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)doif &&
310c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)dorepeat &&
311c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)doswbrk &&
312c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)doswitch &&
313c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)dowhile &&
314c80476e4SDavid E. O'Brien bifunc->bfunct != (bfunc_t)dozip)
315c80476e4SDavid E. O'Brien break;
316c80476e4SDavid E. O'Brien }
317c80476e4SDavid E. O'Brien }
318c80476e4SDavid E. O'Brien else { /* not a command */
319c80476e4SDavid E. O'Brien bifunc = NULL;
320c80476e4SDavid E. O'Brien if (noexec)
321c80476e4SDavid E. O'Brien break;
322c80476e4SDavid E. O'Brien }
323c80476e4SDavid E. O'Brien
3246767bd61SMark Peek /*
3256767bd61SMark Peek * GrP Executing a command - run jobcmd hook
3266767bd61SMark Peek * Don't run for builtins
3276767bd61SMark Peek * Don't run if we're not in a tty
3286767bd61SMark Peek * Don't run if we're not really executing
3296767bd61SMark Peek */
3306767bd61SMark Peek /*
33145e5710bSMark Peek * CR - Charles Ross Aug 2005
33245e5710bSMark Peek * added "isoutatty".
3336767bd61SMark Peek * The new behavior is that the jobcmd won't be executed
33445e5710bSMark Peek * if stdout (SHOUT) isnt attached to a tty.. IE when
3356767bd61SMark Peek * redirecting, or using backquotes etc..
3366767bd61SMark Peek */
3376767bd61SMark Peek if (t->t_dtyp == NODE_COMMAND && !bifunc && !noexec && intty && isoutatty) {
338c80476e4SDavid E. O'Brien Char *cmd = unparse(t);
339c80476e4SDavid E. O'Brien
340c80476e4SDavid E. O'Brien cleanup_push(cmd, xfree);
341c80476e4SDavid E. O'Brien job_cmd(cmd);
342c80476e4SDavid E. O'Brien cleanup_until(cmd);
343c80476e4SDavid E. O'Brien }
344c80476e4SDavid E. O'Brien
345c80476e4SDavid E. O'Brien /*
346c80476e4SDavid E. O'Brien * We fork only if we are timed, or are not the end of a parenthesized
347c80476e4SDavid E. O'Brien * list and not a simple builtin function. Simple meaning one that is
348c80476e4SDavid E. O'Brien * not pipedout, niced, nohupped, or &'d. It would be nice(?) to not
349c80476e4SDavid E. O'Brien * fork in some of these cases.
350c80476e4SDavid E. O'Brien */
351c80476e4SDavid E. O'Brien #ifdef BACKPIPE
352c80476e4SDavid E. O'Brien /*
353c80476e4SDavid E. O'Brien * Can't have NOFORK for the tail of a pipe - because it is not the
354c80476e4SDavid E. O'Brien * last command spawned (even if it is at the end of a parenthesised
355c80476e4SDavid E. O'Brien * list).
356c80476e4SDavid E. O'Brien */
357c80476e4SDavid E. O'Brien if (t->t_dflg & F_PIPEIN)
358c80476e4SDavid E. O'Brien t->t_dflg &= ~(F_NOFORK);
359c80476e4SDavid E. O'Brien #else
360c80476e4SDavid E. O'Brien /*
361c80476e4SDavid E. O'Brien * "command | builtin" may cause major misbehaviour as noted in
362c80476e4SDavid E. O'Brien * in the BUGS file entry
363c80476e4SDavid E. O'Brien * Subject: Redirected input to built-in functions misbehaves badly
364c80476e4SDavid E. O'Brien * forking when the builtin is the end of the pipe corrects the
365c80476e4SDavid E. O'Brien * problem.
366c80476e4SDavid E. O'Brien */
3673b6eaa7bSAndrey A. Chernov if (bifunc && (t->t_dflg & F_PIPEIN))
368c80476e4SDavid E. O'Brien t->t_dflg &= ~(F_NOFORK);
369c80476e4SDavid E. O'Brien #endif /* BACKPIPE */
370c80476e4SDavid E. O'Brien /*
371c80476e4SDavid E. O'Brien * Prevent forking cd, pushd, popd, chdir cause this will cause the
372c80476e4SDavid E. O'Brien * shell not to change dir! (XXX: but only for nice?)
373c80476e4SDavid E. O'Brien */
374c80476e4SDavid E. O'Brien if (bifunc && (bifunc->bfunct == (bfunc_t)dochngd ||
375c80476e4SDavid E. O'Brien bifunc->bfunct == (bfunc_t)dopushd ||
376c80476e4SDavid E. O'Brien bifunc->bfunct == (bfunc_t)dopopd))
377c80476e4SDavid E. O'Brien t->t_dflg &= ~(F_NICE);
378c80476e4SDavid E. O'Brien
37945e5710bSMark Peek if (((t->t_dflg & F_TIME) || ((t->t_dflg & F_NOFORK) == 0 &&
38045e5710bSMark Peek (!bifunc || t->t_dflg &
38145e5710bSMark Peek (F_PIPEOUT | F_AMPERSAND | F_NICE | F_NOHUP | F_HUP)))) ||
382c80476e4SDavid E. O'Brien /*
383c80476e4SDavid E. O'Brien * We have to fork for eval too.
384c80476e4SDavid E. O'Brien */
385c80476e4SDavid E. O'Brien (bifunc && (t->t_dflg & F_PIPEIN) != 0 &&
386c80476e4SDavid E. O'Brien bifunc->bfunct == (bfunc_t)doeval)) {
387c80476e4SDavid E. O'Brien #ifdef VFORK
38845e5710bSMark Peek if (t->t_dtyp == NODE_PAREN ||
389c80476e4SDavid E. O'Brien t->t_dflg & (F_REPEAT | F_AMPERSAND) || bifunc)
390c80476e4SDavid E. O'Brien #endif /* VFORK */
391c80476e4SDavid E. O'Brien {
392c80476e4SDavid E. O'Brien forked++;
393c80476e4SDavid E. O'Brien /*
394c80476e4SDavid E. O'Brien * We need to block SIGCHLD here, so that if the process does
395c80476e4SDavid E. O'Brien * not die before we can set the process group
396c80476e4SDavid E. O'Brien */
397c80476e4SDavid E. O'Brien if (wanttty >= 0 && !nosigchld) {
398c80476e4SDavid E. O'Brien sigemptyset(&set);
399c80476e4SDavid E. O'Brien sigaddset(&set, SIGCHLD);
40045e5710bSMark Peek (void)sigprocmask(SIG_BLOCK, &set, &csigset);
401c80476e4SDavid E. O'Brien
402c80476e4SDavid E. O'Brien nosigchld = 1;
403c80476e4SDavid E. O'Brien }
404c80476e4SDavid E. O'Brien
405c80476e4SDavid E. O'Brien pid = pfork(t, wanttty);
406c80476e4SDavid E. O'Brien if (pid == 0 && nosigchld) {
407c80476e4SDavid E. O'Brien sigprocmask(SIG_SETMASK, &csigset, NULL);
408c80476e4SDavid E. O'Brien nosigchld = 0;
409c80476e4SDavid E. O'Brien }
410c80476e4SDavid E. O'Brien else if (pid != 0 && (t->t_dflg & F_AMPERSAND))
411c80476e4SDavid E. O'Brien backpid = pid;
412c80476e4SDavid E. O'Brien }
413c80476e4SDavid E. O'Brien
414c80476e4SDavid E. O'Brien #ifdef VFORK
415c80476e4SDavid E. O'Brien else {
416c80476e4SDavid E. O'Brien int ochild, osetintr, ohaderr, odidfds;
417c80476e4SDavid E. O'Brien int oSHIN, oSHOUT, oSHDIAG, oOLDSTD, otpgrp;
418c80476e4SDavid E. O'Brien int oisoutatty, oisdiagatty;
41945e5710bSMark Peek sigset_t oset, ocsigset;
42045e5710bSMark Peek # ifndef CLOSE_ON_EXEC
421c80476e4SDavid E. O'Brien int odidcch;
422c80476e4SDavid E. O'Brien # endif /* !CLOSE_ON_EXEC */
423c80476e4SDavid E. O'Brien
42445e5710bSMark Peek /*
42545e5710bSMark Peek * Prepare for the vfork by saving everything that the child
42645e5710bSMark Peek * corrupts before it exec's. Note that in some signal
427c80476e4SDavid E. O'Brien * implementations which keep the signal info in user space
428c80476e4SDavid E. O'Brien * (e.g. Sun's) it will also be necessary to save and restore
42945e5710bSMark Peek * the current sigvec's for the signals the child touches
43045e5710bSMark Peek * before it exec's.
43145e5710bSMark Peek */
43245e5710bSMark Peek
433c80476e4SDavid E. O'Brien /*
434c80476e4SDavid E. O'Brien * Sooooo true... If this is a Sun, save the sigvec's. (Skip
435c80476e4SDavid E. O'Brien * Gilbrech - 11/22/87)
436c80476e4SDavid E. O'Brien */
437c80476e4SDavid E. O'Brien # ifdef SAVESIGVEC
438c80476e4SDavid E. O'Brien struct sigaction savesv[NSIGSAVED];
439c80476e4SDavid E. O'Brien sigset_t savesm;
440c80476e4SDavid E. O'Brien
441c80476e4SDavid E. O'Brien # endif /* SAVESIGVEC */
442c80476e4SDavid E. O'Brien if (wanttty >= 0 && !nosigchld && !noexec) {
443c80476e4SDavid E. O'Brien sigemptyset(&set);
444c80476e4SDavid E. O'Brien sigaddset(&set, SIGCHLD);
445c80476e4SDavid E. O'Brien (void)sigprocmask(SIG_BLOCK, &set, &csigset);
446c80476e4SDavid E. O'Brien nosigchld = 1;
44745e5710bSMark Peek }
448c80476e4SDavid E. O'Brien sigemptyset(&set);
449c80476e4SDavid E. O'Brien sigaddset(&set, SIGCHLD);
450c80476e4SDavid E. O'Brien sigaddset(&set, SIGINT);
451c80476e4SDavid E. O'Brien (void)sigprocmask(SIG_BLOCK, &set, &oset);
452c80476e4SDavid E. O'Brien ochild = child;
45345e5710bSMark Peek osetintr = setintr;
454c80476e4SDavid E. O'Brien ohaderr = haderr;
455c80476e4SDavid E. O'Brien odidfds = didfds;
456c80476e4SDavid E. O'Brien # ifndef CLOSE_ON_EXEC
457c80476e4SDavid E. O'Brien odidcch = didcch;
458c80476e4SDavid E. O'Brien # endif /* !CLOSE_ON_EXEC */
459c80476e4SDavid E. O'Brien oSHIN = SHIN;
460c80476e4SDavid E. O'Brien oSHOUT = SHOUT;
461c80476e4SDavid E. O'Brien oSHDIAG = SHDIAG;
462c80476e4SDavid E. O'Brien oOLDSTD = OLDSTD;
463c80476e4SDavid E. O'Brien otpgrp = tpgrp;
46445e5710bSMark Peek oisoutatty = isoutatty;
465c80476e4SDavid E. O'Brien oisdiagatty = isdiagatty;
466c80476e4SDavid E. O'Brien ocsigset = csigset;
467c80476e4SDavid E. O'Brien onosigchld = nosigchld;
468c80476e4SDavid E. O'Brien Vsav = Vdp = 0;
469c80476e4SDavid E. O'Brien Vexpath = 0;
470c80476e4SDavid E. O'Brien Vt = 0;
471c80476e4SDavid E. O'Brien # ifdef SAVESIGVEC
472c80476e4SDavid E. O'Brien savesigvec(savesv, savesm);
473c80476e4SDavid E. O'Brien # endif /* SAVESIGVEC */
474c80476e4SDavid E. O'Brien if (use_fork)
475c80476e4SDavid E. O'Brien pid = fork();
476c80476e4SDavid E. O'Brien else
477c80476e4SDavid E. O'Brien pid = vfork();
478c80476e4SDavid E. O'Brien
479c80476e4SDavid E. O'Brien if (pid < 0) {
480c80476e4SDavid E. O'Brien # ifdef SAVESIGVEC
481c80476e4SDavid E. O'Brien restoresigvec(savesv, savesm);
482c80476e4SDavid E. O'Brien # endif /* SAVESIGVEC */
483c80476e4SDavid E. O'Brien sigprocmask(SIG_SETMASK, &oset, NULL);
484c80476e4SDavid E. O'Brien stderror(ERR_NOPROC);
485c80476e4SDavid E. O'Brien }
48645e5710bSMark Peek forked++;
487c80476e4SDavid E. O'Brien if (pid) { /* parent */
488c80476e4SDavid E. O'Brien # ifdef SAVESIGVEC
48945e5710bSMark Peek restoresigvec(savesv, savesm);
490c80476e4SDavid E. O'Brien # endif /* SAVESIGVEC */
49145e5710bSMark Peek child = ochild;
492c80476e4SDavid E. O'Brien setintr = osetintr;
49345e5710bSMark Peek haderr = ohaderr;
494c80476e4SDavid E. O'Brien didfds = odidfds;
49545e5710bSMark Peek SHIN = oSHIN;
496c80476e4SDavid E. O'Brien # ifndef CLOSE_ON_EXEC
497c80476e4SDavid E. O'Brien didcch = odidcch;
498c80476e4SDavid E. O'Brien # endif /* !CLOSE_ON_EXEC */
49945e5710bSMark Peek SHOUT = oSHOUT;
500c80476e4SDavid E. O'Brien SHDIAG = oSHDIAG;
501c80476e4SDavid E. O'Brien OLDSTD = oOLDSTD;
502c80476e4SDavid E. O'Brien tpgrp = otpgrp;
50345e5710bSMark Peek isoutatty = oisoutatty;
50423338178SMark Peek isdiagatty = oisdiagatty;
505c80476e4SDavid E. O'Brien csigset = ocsigset;
50645e5710bSMark Peek nosigchld = onosigchld;
507c80476e4SDavid E. O'Brien
508c80476e4SDavid E. O'Brien xfree(Vsav);
509c80476e4SDavid E. O'Brien Vsav = 0;
510c80476e4SDavid E. O'Brien xfree(Vdp);
511c80476e4SDavid E. O'Brien Vdp = 0;
512c80476e4SDavid E. O'Brien xfree(Vexpath);
513c80476e4SDavid E. O'Brien Vexpath = 0;
514c80476e4SDavid E. O'Brien blk_cleanup(Vt);
515c80476e4SDavid E. O'Brien Vt = 0;
516c80476e4SDavid E. O'Brien /* this is from pfork() */
517c80476e4SDavid E. O'Brien palloc(pid, t);
518c80476e4SDavid E. O'Brien sigprocmask(SIG_SETMASK, &oset, NULL);
519c80476e4SDavid E. O'Brien }
520c80476e4SDavid E. O'Brien else { /* child */
521c80476e4SDavid E. O'Brien /* this is from pfork() */
522c80476e4SDavid E. O'Brien pid_t pgrp;
523c80476e4SDavid E. O'Brien int ignint = 0;
524c80476e4SDavid E. O'Brien if (nosigchld) {
525c80476e4SDavid E. O'Brien sigprocmask(SIG_SETMASK, &csigset, NULL);
526c80476e4SDavid E. O'Brien nosigchld = 0;
527c80476e4SDavid E. O'Brien }
528c80476e4SDavid E. O'Brien
529c80476e4SDavid E. O'Brien if (setintr)
530c80476e4SDavid E. O'Brien ignint = (tpgrp == -1 && (t->t_dflg & F_NOINTERRUPT))
531c80476e4SDavid E. O'Brien || (gointr && eq(gointr, STRminus));
532c80476e4SDavid E. O'Brien pgrp = pcurrjob ? pcurrjob->p_jobid : getpid();
533c80476e4SDavid E. O'Brien child++;
534c80476e4SDavid E. O'Brien if (setintr) {
535c80476e4SDavid E. O'Brien setintr = 0;
536c80476e4SDavid E. O'Brien /*
537c80476e4SDavid E. O'Brien * casts made right for SunOS 4.0 by Douglas C. Schmidt
538c80476e4SDavid E. O'Brien * <schmidt%sunshine.ics.uci.edu@ROME.ICS.UCI.EDU>
539c80476e4SDavid E. O'Brien * (thanks! -- PWP)
540c80476e4SDavid E. O'Brien *
54145e5710bSMark Peek * ignint ifs cleaned by Johan Widen <mcvax!osiris.sics.se!jw@uunet.UU.NET>
542c80476e4SDavid E. O'Brien * (thanks again)
543c80476e4SDavid E. O'Brien */
544c80476e4SDavid E. O'Brien if (ignint) {
545c80476e4SDavid E. O'Brien (void) signal(SIGINT, SIG_IGN);
546c80476e4SDavid E. O'Brien (void) signal(SIGQUIT, SIG_IGN);
547c80476e4SDavid E. O'Brien }
548c80476e4SDavid E. O'Brien else {
549c80476e4SDavid E. O'Brien (void) signal(SIGINT, vffree);
550c80476e4SDavid E. O'Brien (void) signal(SIGQUIT, SIG_DFL);
551c80476e4SDavid E. O'Brien }
552c80476e4SDavid E. O'Brien # ifdef BSDJOBS
553c80476e4SDavid E. O'Brien if (wanttty >= 0) {
554c80476e4SDavid E. O'Brien (void) signal(SIGTSTP, SIG_DFL);
555c80476e4SDavid E. O'Brien (void) signal(SIGTTIN, SIG_DFL);
556c80476e4SDavid E. O'Brien (void) signal(SIGTTOU, SIG_DFL);
55723338178SMark Peek }
5586767bd61SMark Peek # endif /* BSDJOBS */
5596767bd61SMark Peek
5606767bd61SMark Peek sigaction(SIGTERM, &parterm, NULL);
56123338178SMark Peek }
562c80476e4SDavid E. O'Brien else if (tpgrp == -1 &&
56323338178SMark Peek (t->t_dflg & F_NOINTERRUPT)) {
564c80476e4SDavid E. O'Brien (void) signal(SIGINT, SIG_IGN);
565c80476e4SDavid E. O'Brien (void) signal(SIGQUIT, SIG_IGN);
566c80476e4SDavid E. O'Brien }
567c80476e4SDavid E. O'Brien
568c80476e4SDavid E. O'Brien pgetty(wanttty, pgrp);
569c80476e4SDavid E. O'Brien
570c80476e4SDavid E. O'Brien if (t->t_dflg & F_NOHUP)
571c80476e4SDavid E. O'Brien (void) signal(SIGHUP, SIG_IGN);
572c80476e4SDavid E. O'Brien if (t->t_dflg & F_HUP)
573c80476e4SDavid E. O'Brien (void) signal(SIGHUP, SIG_DFL);
574c80476e4SDavid E. O'Brien if (t->t_dflg & F_NICE) {
5753b6eaa7bSAndrey A. Chernov int nval = SIGN_EXTEND_CHAR(t->t_nice);
576c80476e4SDavid E. O'Brien # if defined(HAVE_SETPRIORITY) && defined(PRIO_PROCESS)
577c80476e4SDavid E. O'Brien if (setpriority(PRIO_PROCESS, 0, nval) == -1 && errno)
578c80476e4SDavid E. O'Brien stderror(ERR_SYSTEM, "setpriority",
579c80476e4SDavid E. O'Brien strerror(errno));
580c80476e4SDavid E. O'Brien # else /* !HAVE_SETPRIORITY || !PRIO_PROCESS */
581c80476e4SDavid E. O'Brien (void) nice(nval);
582c80476e4SDavid E. O'Brien # endif /* HAVE_SETPRIORITY && PRIO_PROCESS */
583c80476e4SDavid E. O'Brien }
584c80476e4SDavid E. O'Brien # ifdef F_VER
58545e5710bSMark Peek if (t->t_dflg & F_VER) {
58645e5710bSMark Peek tsetenv(STRSYSTYPE, t->t_systype ? STRbsd43 : STRsys53);
587c80476e4SDavid E. O'Brien dohash(NULL, NULL);
588c80476e4SDavid E. O'Brien }
589c80476e4SDavid E. O'Brien # endif /* F_VER */
590c80476e4SDavid E. O'Brien }
591c80476e4SDavid E. O'Brien
59245e5710bSMark Peek }
59345e5710bSMark Peek #endif /* VFORK */
594c80476e4SDavid E. O'Brien }
595c80476e4SDavid E. O'Brien if (pid != 0) {
596c80476e4SDavid E. O'Brien /*
597c80476e4SDavid E. O'Brien * It would be better if we could wait for the whole job when we
598c80476e4SDavid E. O'Brien * knew the last process had been started. Pwait, in fact, does
599c80476e4SDavid E. O'Brien * wait for the whole job anyway, but this test doesn't really
60045e5710bSMark Peek * express our intentions.
601c80476e4SDavid E. O'Brien */
602c80476e4SDavid E. O'Brien #ifdef BACKPIPE
603c80476e4SDavid E. O'Brien if (didfds == 0 && t->t_dflg & F_PIPEOUT) {
604c80476e4SDavid E. O'Brien xclose(pipeout[0]);
605c80476e4SDavid E. O'Brien xclose(pipeout[1]);
606c80476e4SDavid E. O'Brien }
607c80476e4SDavid E. O'Brien if ((t->t_dflg & F_PIPEIN) != 0)
608c80476e4SDavid E. O'Brien break;
609c80476e4SDavid E. O'Brien #else /* !BACKPIPE */
610c80476e4SDavid E. O'Brien if (didfds == 0 && t->t_dflg & F_PIPEIN) {
61145e5710bSMark Peek xclose(pipein[0]);
61245e5710bSMark Peek xclose(pipein[1]);
613c80476e4SDavid E. O'Brien }
614c80476e4SDavid E. O'Brien if ((t->t_dflg & F_PIPEOUT) != 0)
615c80476e4SDavid E. O'Brien break;
61645e5710bSMark Peek #endif /* BACKPIPE */
61745e5710bSMark Peek
618c80476e4SDavid E. O'Brien if (nosigchld) {
619c80476e4SDavid E. O'Brien sigprocmask(SIG_SETMASK, &csigset, NULL);
620c80476e4SDavid E. O'Brien nosigchld = 0;
621c80476e4SDavid E. O'Brien }
622c80476e4SDavid E. O'Brien if ((t->t_dflg & F_AMPERSAND) == 0)
623c80476e4SDavid E. O'Brien pwait();
624c80476e4SDavid E. O'Brien break;
625c80476e4SDavid E. O'Brien }
626c80476e4SDavid E. O'Brien
627c80476e4SDavid E. O'Brien doio(t, pipein, pipeout);
62823338178SMark Peek #ifdef BACKPIPE
62923338178SMark Peek if (t->t_dflg & F_PIPEIN) {
63023338178SMark Peek xclose(pipein[0]);
63123338178SMark Peek xclose(pipein[1]);
63223338178SMark Peek }
63323338178SMark Peek #else /* !BACKPIPE */
63423338178SMark Peek if (t->t_dflg & F_PIPEOUT) {
635c80476e4SDavid E. O'Brien xclose(pipeout[0]);
636c80476e4SDavid E. O'Brien xclose(pipeout[1]);
637c80476e4SDavid E. O'Brien }
63829301572SMark Peek #endif /* BACKPIPE */
639c80476e4SDavid E. O'Brien /*
640c80476e4SDavid E. O'Brien * Perform a builtin function. If we are not forked, arrange for
641c80476e4SDavid E. O'Brien * possible stopping
642c80476e4SDavid E. O'Brien */
643c80476e4SDavid E. O'Brien if (bifunc) {
64423338178SMark Peek if (forked) {
64523338178SMark Peek func(t, bifunc);
646c80476e4SDavid E. O'Brien exitstat();
64723338178SMark Peek } else {
648c80476e4SDavid E. O'Brien jmp_buf_t oldexit;
64945e5710bSMark Peek int ohaderr = haderr;
650c80476e4SDavid E. O'Brien
651c80476e4SDavid E. O'Brien getexit(oldexit);
652c80476e4SDavid E. O'Brien if (setexit() == 0)
65323338178SMark Peek func(t, bifunc);
65423338178SMark Peek resexit(oldexit);
65523338178SMark Peek haderr = ohaderr;
65623338178SMark Peek
657c80476e4SDavid E. O'Brien if (adrof(STRprintexitvalue)) {
658c80476e4SDavid E. O'Brien int rv = getn(varval(STRstatus));
659c80476e4SDavid E. O'Brien if (rv != 0)
660c80476e4SDavid E. O'Brien xprintf(CGETS(17, 2, "Exit %d\n"), rv);
66129301572SMark Peek }
662c80476e4SDavid E. O'Brien }
663c80476e4SDavid E. O'Brien break;
664c80476e4SDavid E. O'Brien }
665c80476e4SDavid E. O'Brien if (t->t_dtyp != NODE_PAREN) {
666c80476e4SDavid E. O'Brien doexec(t, do_glob);
667c80476e4SDavid E. O'Brien /* NOTREACHED */
66829301572SMark Peek }
669c80476e4SDavid E. O'Brien /*
670c80476e4SDavid E. O'Brien * For () commands must put new 0,1,2 in FSH* and recurse
67129301572SMark Peek */
672c80476e4SDavid E. O'Brien if ((OLDSTD = dcopy(0, FOLDSTD)) >= 0)
673c80476e4SDavid E. O'Brien (void)close_on_exec(OLDSTD, 1);
674c80476e4SDavid E. O'Brien if ((SHOUT = dcopy(1, FSHOUT)) >= 0) {
67529301572SMark Peek (void)close_on_exec(SHOUT, 1);
676c80476e4SDavid E. O'Brien isoutatty = isatty(SHOUT);
677c80476e4SDavid E. O'Brien }
67829301572SMark Peek if ((SHDIAG = dcopy(2, FSHDIAG)) >= 0) {
679c80476e4SDavid E. O'Brien (void)close_on_exec(SHDIAG, 1);
680c80476e4SDavid E. O'Brien isdiagatty = isatty(SHDIAG);
681c80476e4SDavid E. O'Brien }
682c80476e4SDavid E. O'Brien xclose(SHIN);
683c80476e4SDavid E. O'Brien SHIN = -1;
684c80476e4SDavid E. O'Brien #ifndef CLOSE_ON_EXEC
68529301572SMark Peek didcch = 0;
686c80476e4SDavid E. O'Brien #else
687c80476e4SDavid E. O'Brien (void) close_on_exec(FSHOUT, 1);
688c80476e4SDavid E. O'Brien (void) close_on_exec(FSHDIAG, 1);
689c80476e4SDavid E. O'Brien (void) close_on_exec(FOLDSTD, 1);
690c80476e4SDavid E. O'Brien #endif /* !CLOSE_ON_EXEC */
691c80476e4SDavid E. O'Brien didfds = 0;
692c80476e4SDavid E. O'Brien wanttty = -1;
693c80476e4SDavid E. O'Brien t->t_dspr->t_dflg |= t->t_dflg & (F_NOINTERRUPT | F_BACKQ);
694c80476e4SDavid E. O'Brien execute(t->t_dspr, wanttty, NULL, NULL, do_glob);
695c80476e4SDavid E. O'Brien exitstat();
69629301572SMark Peek
697c80476e4SDavid E. O'Brien case NODE_PIPE:
698c80476e4SDavid E. O'Brien #ifdef BACKPIPE
699c80476e4SDavid E. O'Brien t->t_dcdr->t_dflg |= F_PIPEIN | (t->t_dflg &
700c80476e4SDavid E. O'Brien (F_PIPEOUT | F_AMPERSAND | F_NOFORK | F_NOINTERRUPT | F_BACKQ));
701c80476e4SDavid E. O'Brien execute(t->t_dcdr, wanttty, pv, pipeout, do_glob);
702c80476e4SDavid E. O'Brien t->t_dcar->t_dflg |= F_PIPEOUT | (t->t_dflg &
703c80476e4SDavid E. O'Brien (F_PIPEIN | F_AMPERSAND | F_STDERR | F_NOINTERRUPT | F_BACKQ));
70429301572SMark Peek execute(t->t_dcar, wanttty, pipein, pv, do_glob);
705c80476e4SDavid E. O'Brien #else /* !BACKPIPE */
706c80476e4SDavid E. O'Brien t->t_dcar->t_dflg |= F_PIPEOUT | (t->t_dflg &
707c80476e4SDavid E. O'Brien (F_PIPEIN | F_AMPERSAND | F_STDERR | F_NOINTERRUPT | F_BACKQ));
708c80476e4SDavid E. O'Brien execute(t->t_dcar, wanttty, pipein, pv, do_glob);
709c80476e4SDavid E. O'Brien t->t_dcdr->t_dflg |= F_PIPEIN | (t->t_dflg &
710c80476e4SDavid E. O'Brien (F_PIPEOUT | F_AMPERSAND | F_NOFORK | F_NOINTERRUPT | F_BACKQ));
711c80476e4SDavid E. O'Brien execute(t->t_dcdr, wanttty, pv, pipeout, do_glob);
712c80476e4SDavid E. O'Brien #endif /* BACKPIPE */
71329301572SMark Peek break;
714c80476e4SDavid E. O'Brien
715c80476e4SDavid E. O'Brien case NODE_LIST:
716c80476e4SDavid E. O'Brien if (t->t_dcar) {
717c80476e4SDavid E. O'Brien t->t_dcar->t_dflg |= t->t_dflg & (F_NOINTERRUPT | F_BACKQ);
718c80476e4SDavid E. O'Brien execute(t->t_dcar, wanttty, NULL, NULL, do_glob);
719c80476e4SDavid E. O'Brien /*
720c80476e4SDavid E. O'Brien * In strange case of A&B make a new job after A
721c80476e4SDavid E. O'Brien */
722c80476e4SDavid E. O'Brien if (t->t_dcar->t_dflg & F_AMPERSAND && t->t_dcdr &&
723c80476e4SDavid E. O'Brien (t->t_dcdr->t_dflg & F_AMPERSAND) == 0)
724c80476e4SDavid E. O'Brien pendjob();
725c80476e4SDavid E. O'Brien }
726c80476e4SDavid E. O'Brien if (t->t_dcdr) {
727c80476e4SDavid E. O'Brien t->t_dcdr->t_dflg |= t->t_dflg &
728c80476e4SDavid E. O'Brien (F_NOFORK | F_NOINTERRUPT | F_BACKQ);
729c80476e4SDavid E. O'Brien execute(t->t_dcdr, wanttty, NULL, NULL, do_glob);
730c80476e4SDavid E. O'Brien }
731c80476e4SDavid E. O'Brien break;
73245e5710bSMark Peek
733c80476e4SDavid E. O'Brien case NODE_OR:
73445e5710bSMark Peek case NODE_AND:
735c80476e4SDavid E. O'Brien if (t->t_dcar) {
736c80476e4SDavid E. O'Brien t->t_dcar->t_dflg |= t->t_dflg & (F_NOINTERRUPT | F_BACKQ);
737c80476e4SDavid E. O'Brien execute(t->t_dcar, wanttty, NULL, NULL, do_glob);
738c80476e4SDavid E. O'Brien if ((getn(varval(STRstatus)) == 0) !=
739c80476e4SDavid E. O'Brien (t->t_dtyp == NODE_AND)) {
740c80476e4SDavid E. O'Brien return;
741c80476e4SDavid E. O'Brien }
742c80476e4SDavid E. O'Brien }
743c80476e4SDavid E. O'Brien if (t->t_dcdr) {
744c80476e4SDavid E. O'Brien t->t_dcdr->t_dflg |= t->t_dflg &
745c80476e4SDavid E. O'Brien (F_NOFORK | F_NOINTERRUPT | F_BACKQ);
746c80476e4SDavid E. O'Brien execute(t->t_dcdr, wanttty, NULL, NULL, do_glob);
747c80476e4SDavid E. O'Brien }
748c80476e4SDavid E. O'Brien break;
749c80476e4SDavid E. O'Brien
750c80476e4SDavid E. O'Brien default:
751c80476e4SDavid E. O'Brien break;
752c80476e4SDavid E. O'Brien }
753c80476e4SDavid E. O'Brien /*
754c80476e4SDavid E. O'Brien * Fall through for all breaks from switch
755c80476e4SDavid E. O'Brien *
756c80476e4SDavid E. O'Brien * If there will be no more executions of this command, flush all file
757c80476e4SDavid E. O'Brien * descriptors. Places that turn on the F_REPEAT bit are responsible for
75845e5710bSMark Peek * doing donefds after the last re-execution
759c80476e4SDavid E. O'Brien */
760c80476e4SDavid E. O'Brien if (didfds && !(t->t_dflg & F_REPEAT))
761c80476e4SDavid E. O'Brien donefds();
762c80476e4SDavid E. O'Brien }
763c80476e4SDavid E. O'Brien
76445e5710bSMark Peek #ifdef VFORK
765c80476e4SDavid E. O'Brien static void
766c80476e4SDavid E. O'Brien /*ARGSUSED*/
vffree(int snum)767c80476e4SDavid E. O'Brien vffree(int snum)
768c80476e4SDavid E. O'Brien {
76945e5710bSMark Peek USE(snum);
770c80476e4SDavid E. O'Brien
77145e5710bSMark Peek _exit(1);
772c80476e4SDavid E. O'Brien }
773c80476e4SDavid E. O'Brien #endif /* VFORK */
77445e5710bSMark Peek
775c80476e4SDavid E. O'Brien /*
776c80476e4SDavid E. O'Brien * Expand and glob the words after an i/o redirection.
777c80476e4SDavid E. O'Brien * If more than one word is generated, then update the command vector.
778c80476e4SDavid E. O'Brien *
77945e5710bSMark Peek * This is done differently in all the shells:
780c80476e4SDavid E. O'Brien * 1. in the bourne shell and ksh globbing is not performed
781c80476e4SDavid E. O'Brien * 2. Bash/csh say ambiguous
78245e5710bSMark Peek * 3. zsh does i/o to/from all the files
783c80476e4SDavid E. O'Brien * 4. itcsh concatenates the words.
78445e5710bSMark Peek *
785c80476e4SDavid E. O'Brien * I don't know what is best to do. I think that Ambiguous is better
786c80476e4SDavid E. O'Brien * than restructuring the command vector, because the user can get
787c80476e4SDavid E. O'Brien * unexpected results. In any case, the command vector restructuring
78845e5710bSMark Peek * code is present and the user can choose it by setting noambiguous
789c80476e4SDavid E. O'Brien */
79045e5710bSMark Peek static Char *
splicepipe(struct command * t,Char * cp)79145e5710bSMark Peek splicepipe(struct command *t, Char *cp)
792c80476e4SDavid E. O'Brien {
79345e5710bSMark Peek Char *blk[2];
794c80476e4SDavid E. O'Brien
795c80476e4SDavid E. O'Brien if (adrof(STRnoambiguous)) {
796c80476e4SDavid E. O'Brien Char **pv;
797c80476e4SDavid E. O'Brien int gflag;
798c80476e4SDavid E. O'Brien
799c80476e4SDavid E. O'Brien blk[0] = Dfix1(cp); /* expand $ */
800c80476e4SDavid E. O'Brien blk[1] = NULL;
801c80476e4SDavid E. O'Brien
802c80476e4SDavid E. O'Brien gflag = tglob(blk);
80345e5710bSMark Peek if (gflag) {
804c80476e4SDavid E. O'Brien pv = globall(blk, gflag);
80523338178SMark Peek if (pv == NULL) {
80623338178SMark Peek setname(short2str(blk[0]));
80723338178SMark Peek xfree(blk[0]);
808c80476e4SDavid E. O'Brien stderror(ERR_NAME | ERR_NOMATCH);
809c80476e4SDavid E. O'Brien }
810c80476e4SDavid E. O'Brien if (pv[1] != NULL) { /* we need to fix the command vector */
811c80476e4SDavid E. O'Brien Char **av = blkspl(t->t_dcom, &pv[1]);
812c80476e4SDavid E. O'Brien xfree(t->t_dcom);
81345e5710bSMark Peek t->t_dcom = av;
814c80476e4SDavid E. O'Brien }
815c80476e4SDavid E. O'Brien xfree(blk[0]);
816c80476e4SDavid E. O'Brien blk[0] = pv[0];
817c80476e4SDavid E. O'Brien xfree(pv);
818c80476e4SDavid E. O'Brien }
819c80476e4SDavid E. O'Brien }
820c80476e4SDavid E. O'Brien else {
821c80476e4SDavid E. O'Brien Char *buf;
82245e5710bSMark Peek
82345e5710bSMark Peek buf = Dfix1(cp);
82445e5710bSMark Peek cleanup_push(buf, xfree);
82545e5710bSMark Peek blk[0] = globone(buf, G_ERROR);
826c80476e4SDavid E. O'Brien cleanup_until(buf);
82745e5710bSMark Peek }
828c80476e4SDavid E. O'Brien return(blk[0]);
829b2d5d167SMark Peek }
83023338178SMark Peek
831b2d5d167SMark Peek /*
832c80476e4SDavid E. O'Brien * Perform io redirection.
833c80476e4SDavid E. O'Brien * We may or maynot be forked here.
834c80476e4SDavid E. O'Brien */
83545e5710bSMark Peek static void
doio(struct command * t,int * pipein,int * pipeout)836c80476e4SDavid E. O'Brien doio(struct command *t, int *pipein, int *pipeout)
83745e5710bSMark Peek {
83845e5710bSMark Peek int fd;
839c80476e4SDavid E. O'Brien Char *cp;
840c80476e4SDavid E. O'Brien unsigned long flags = t->t_dflg;
84145e5710bSMark Peek
84245e5710bSMark Peek if (didfds || (flags & F_REPEAT))
843c80476e4SDavid E. O'Brien return;
844c80476e4SDavid E. O'Brien if ((flags & F_READ) == 0) {/* F_READ already done */
84545e5710bSMark Peek if (t->t_dlef) {
846c80476e4SDavid E. O'Brien char *tmp;
847c80476e4SDavid E. O'Brien
848c80476e4SDavid E. O'Brien /*
849c80476e4SDavid E. O'Brien * so < /dev/std{in,out,err} work
850c80476e4SDavid E. O'Brien */
851c80476e4SDavid E. O'Brien (void) dcopy(SHIN, 0);
852c80476e4SDavid E. O'Brien (void) dcopy(SHOUT, 1);
853c80476e4SDavid E. O'Brien (void) dcopy(SHDIAG, 2);
854c80476e4SDavid E. O'Brien cp = splicepipe(t, t->t_dlef);
855c80476e4SDavid E. O'Brien tmp = strsave(short2str(cp));
856c80476e4SDavid E. O'Brien xfree(cp);
857c80476e4SDavid E. O'Brien cleanup_push(tmp, xfree);
858c80476e4SDavid E. O'Brien if ((fd = xopen(tmp, O_RDONLY|O_LARGEFILE)) < 0)
85945e5710bSMark Peek stderror(ERR_SYSTEM, tmp, strerror(errno));
860c80476e4SDavid E. O'Brien cleanup_until(tmp);
861c80476e4SDavid E. O'Brien /* allow input files larger than 2Gb */
86245e5710bSMark Peek #ifndef WINNT_NATIVE
86345e5710bSMark Peek (void) fcntl(fd, F_SETFL, fcntl(fd, F_GETFL) | O_LARGEFILE);
86445e5710bSMark Peek #endif /*!WINNT_NATIVE*/
865c80476e4SDavid E. O'Brien (void) dmove(fd, 0);
866c80476e4SDavid E. O'Brien }
867c80476e4SDavid E. O'Brien else if (flags & F_PIPEIN) {
868c80476e4SDavid E. O'Brien xclose(0);
869c80476e4SDavid E. O'Brien TCSH_IGNORE(dup(pipein[0]));
870c80476e4SDavid E. O'Brien xclose(pipein[0]);
871c80476e4SDavid E. O'Brien xclose(pipein[1]);
87245e5710bSMark Peek }
873c80476e4SDavid E. O'Brien else if ((flags & F_NOINTERRUPT) && tpgrp == -1) {
87445e5710bSMark Peek xclose(0);
875c80476e4SDavid E. O'Brien (void) xopen(_PATH_DEVNULL, O_RDONLY|O_LARGEFILE);
876c80476e4SDavid E. O'Brien }
877c80476e4SDavid E. O'Brien else {
878c80476e4SDavid E. O'Brien xclose(0);
879c80476e4SDavid E. O'Brien TCSH_IGNORE(dup(OLDSTD));
880c80476e4SDavid E. O'Brien #if defined(CLOSE_ON_EXEC) && defined(CLEX_DUPS)
881c80476e4SDavid E. O'Brien /*
882c80476e4SDavid E. O'Brien * PWP: Unlike Bezerkeley 4.3, FIONCLEX for Pyramid is preserved
883c80476e4SDavid E. O'Brien * across dup()s, so we have to UNSET it here or else we get a
884c80476e4SDavid E. O'Brien * command with NO stdin, stdout, or stderr at all (a bad thing
885c80476e4SDavid E. O'Brien * indeed)
88645e5710bSMark Peek */
887c80476e4SDavid E. O'Brien (void) close_on_exec(0, 0);
888c80476e4SDavid E. O'Brien #endif /* CLOSE_ON_EXEC && CLEX_DUPS */
889b2d5d167SMark Peek }
89023338178SMark Peek }
891b2d5d167SMark Peek if (t->t_drit) {
892c80476e4SDavid E. O'Brien char *tmp;
89345e5710bSMark Peek
894c80476e4SDavid E. O'Brien cp = splicepipe(t, t->t_drit);
895c80476e4SDavid E. O'Brien tmp = strsave(short2str(cp));
896c80476e4SDavid E. O'Brien xfree(cp);
897c80476e4SDavid E. O'Brien cleanup_push(tmp, xfree);
89845e5710bSMark Peek /*
899c80476e4SDavid E. O'Brien * so > /dev/std{out,err} work
900c80476e4SDavid E. O'Brien */
901c80476e4SDavid E. O'Brien (void) dcopy(SHOUT, 1);
902c80476e4SDavid E. O'Brien (void) dcopy(SHDIAG, 2);
90345e5710bSMark Peek if ((flags & F_APPEND) != 0) {
904c80476e4SDavid E. O'Brien #ifdef O_APPEND
905c80476e4SDavid E. O'Brien fd = xopen(tmp, O_WRONLY|O_APPEND|O_LARGEFILE);
906c80476e4SDavid E. O'Brien #else /* !O_APPEND */
907c80476e4SDavid E. O'Brien fd = xopen(tmp, O_WRONLY|O_LARGEFILE);
908c80476e4SDavid E. O'Brien (void) lseek(fd, (off_t) 0, L_XTND);
909c80476e4SDavid E. O'Brien #endif /* O_APPEND */
910c80476e4SDavid E. O'Brien }
91145e5710bSMark Peek else
912c80476e4SDavid E. O'Brien fd = 0;
913c80476e4SDavid E. O'Brien if ((flags & F_APPEND) == 0 || fd == -1) {
914c80476e4SDavid E. O'Brien if (!(flags & F_OVERWRITE) && no_clobber) {
915c80476e4SDavid E. O'Brien if (flags & F_APPEND)
916c80476e4SDavid E. O'Brien stderror(ERR_SYSTEM, tmp, strerror(errno));
917c80476e4SDavid E. O'Brien chkclob(tmp);
918c80476e4SDavid E. O'Brien }
919c80476e4SDavid E. O'Brien if ((fd = xcreat(tmp, 0666)) < 0)
920c80476e4SDavid E. O'Brien stderror(ERR_SYSTEM, tmp, strerror(errno));
921c80476e4SDavid E. O'Brien /* allow input files larger than 2Gb */
922c80476e4SDavid E. O'Brien #ifndef WINNT_NATIVE
923c80476e4SDavid E. O'Brien (void) fcntl(fd, F_SETFL, fcntl(fd, F_GETFL) | O_LARGEFILE);
924c80476e4SDavid E. O'Brien #endif /*!WINNT_NATIVE*/
925c80476e4SDavid E. O'Brien }
926c80476e4SDavid E. O'Brien cleanup_until(tmp);
92745e5710bSMark Peek (void) dmove(fd, 1);
928c80476e4SDavid E. O'Brien is1atty = isatty(1);
929c80476e4SDavid E. O'Brien }
930c80476e4SDavid E. O'Brien else if (flags & F_PIPEOUT) {
931c80476e4SDavid E. O'Brien xclose(1);
93223338178SMark Peek TCSH_IGNORE(dup(pipeout[1]));
93323338178SMark Peek is1atty = 0;
934c80476e4SDavid E. O'Brien }
935c80476e4SDavid E. O'Brien else {
93645e5710bSMark Peek xclose(1);
93745e5710bSMark Peek TCSH_IGNORE(dup(SHOUT));
93845e5710bSMark Peek is1atty = isoutatty;
93945e5710bSMark Peek # if defined(CLOSE_ON_EXEC) && defined(CLEX_DUPS)
940c80476e4SDavid E. O'Brien (void) close_on_exec(1, 0);
941c80476e4SDavid E. O'Brien # endif /* CLOSE_ON_EXEC && CLEX_DUPS */
942c80476e4SDavid E. O'Brien }
943c80476e4SDavid E. O'Brien
944c80476e4SDavid E. O'Brien xclose(2);
94545e5710bSMark Peek if (flags & F_STDERR) {
946c80476e4SDavid E. O'Brien TCSH_IGNORE(dup(1));
947c80476e4SDavid E. O'Brien is2atty = is1atty;
948c80476e4SDavid E. O'Brien }
949c80476e4SDavid E. O'Brien else {
950c80476e4SDavid E. O'Brien TCSH_IGNORE(dup(SHDIAG));
951c80476e4SDavid E. O'Brien is2atty = isdiagatty;
952c80476e4SDavid E. O'Brien # if defined(CLOSE_ON_EXEC) && defined(CLEX_DUPS)
953c80476e4SDavid E. O'Brien (void) close_on_exec(2, 0);
954c80476e4SDavid E. O'Brien # endif /* CLOSE_ON_EXEC && CLEX_DUPS */
955 }
956 didfds = 1;
957 }
958
959 void
mypipe(int * pv)960 mypipe(int *pv)
961 {
962
963 if (pipe(pv) < 0)
964 goto oops;
965 (void)close_on_exec(pv[0] = dmove(pv[0], -1), 1);
966 (void)close_on_exec(pv[1] = dmove(pv[1], -1), 1);
967 if (pv[0] >= 0 && pv[1] >= 0)
968 return;
969 if (pv[0] >= 0)
970 xclose(pv[0]);
971 if (pv[1] >= 0)
972 xclose(pv[1]);
973 oops:
974 stderror(ERR_PIPE);
975 }
976
977 static void
chkclob(const char * cp)978 chkclob(const char *cp)
979 {
980 struct stat stb;
981
982 if (stat(cp, &stb) < 0)
983 return;
984 if (S_ISCHR(stb.st_mode))
985 return;
986 if (no_clobber & NOCLOBBER_NOTEMPTY && stb.st_size == 0)
987 return;
988 if (no_clobber & NOCLOBBER_ASK) {
989 if (getYN(CGETS(22, 15,
990 "Do you really want to overwrite an existing file? [N/y] ")))
991 return;
992 }
993
994 stderror(ERR_EXISTS, cp);
995 }
996