Imported from ../bash-2.0.tar.gz.
[platform/upstream/bash.git] / builtins / wait.def
1 This file is wait.def, from which is created wait.c.
2 It implements the builtin "wait" in Bash.
3
4 Copyright (C) 1987, 1989, 1991 Free Software Foundation, Inc.
5
6 This file is part of GNU Bash, the Bourne Again SHell.
7
8 Bash is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 1, or (at your option) any later
11 version.
12
13 Bash is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
16 for more details.
17
18 You should have received a copy of the GNU General Public License along
19 with Bash; see the file COPYING.  If not, write to the Free Software
20 Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
21
22 $BUILTIN wait
23 $FUNCTION wait_builtin
24 $DEPENDS_ON JOB_CONTROL
25 $PRODUCES wait.c
26 $SHORT_DOC wait [n]
27 Wait for the specified process and report its termination status.  If
28 N is not given, all currently active child processes are waited for,
29 and the return code is zero.  N may be a process ID or a job
30 specification; if a job spec is given, all processes in the job's
31 pipeline are waited for.
32 $END
33
34 $BUILTIN wait
35 $FUNCTION wait_builtin
36 $DEPENDS_ON !JOB_CONTROL
37 $SHORT_DOC wait [n]
38 Wait for the specified process and report its termination status.  If
39 N is not given, all currently active child processes are waited for,
40 and the return code is zero.  N is a process ID; if it is not given,
41 all child processes of the shell are waited for.
42 $END
43
44 #include <config.h>
45
46 #include "../bashtypes.h"
47 #include <signal.h>
48
49 #if defined (HAVE_UNISTD_H)
50 #  include <unistd.h>
51 #endif
52
53 #include "../shell.h"
54 #include "../jobs.h"
55 #include "common.h"
56
57 extern int interrupt_immediately;
58
59 /* Wait for the pid in LIST to stop or die.  If no arguments are given, then
60    wait for all of the active background processes of the shell and return
61    0.  If a list of pids or job specs are given, return the exit status of
62    the last one waited for. */
63
64 #define WAIT_RETURN(s) do { run_unwind_frame ("wait_builtin"); return (s); } while (0)
65
66 int
67 wait_builtin (list)
68      WORD_LIST *list;
69 {
70   int status;
71
72   if (no_options (list))
73     return (EX_USAGE);
74
75   begin_unwind_frame ("wait_builtin");
76   unwind_protect_int (interrupt_immediately);
77   interrupt_immediately++;
78
79   /* We support jobs or pids.
80      wait <pid-or-job> [pid-or-job ...] */
81
82   /* But wait without any arguments means to wait for all of the shell's
83      currently active background processes. */
84   if (list == 0)
85     {
86       wait_for_background_pids ();
87       WAIT_RETURN (EXECUTION_SUCCESS);
88     }
89
90   status = EXECUTION_SUCCESS;
91   while (list)
92     {
93       pid_t pid;
94       char *w;
95
96       w = list->word->word;
97       if (digit (*w))
98         {
99           if (all_digits (w + 1))
100             {
101               pid = (pid_t)atoi (w);
102               status = wait_for_single_pid (pid);
103             }
104           else
105             {
106               builtin_error ("`%s' is not a pid or valid job spec", w);
107               WAIT_RETURN (EXECUTION_FAILURE);
108             }
109         }
110 #if defined (JOB_CONTROL)
111       else if (job_control && *w)
112         /* Must be a job spec.  Check it out. */
113         {
114           int job;
115           sigset_t set, oset;
116
117           BLOCK_CHILD (set, oset);
118           job = get_job_spec (list);
119
120           if (job < 0 || job >= job_slots || !jobs[job])
121             {
122               if (job != DUP_JOB)
123                 builtin_error ("%s: no such job", list->word->word);
124               UNBLOCK_CHILD (oset);
125               status = 127;     /* As per Posix.2, section 4.70.2 */
126               list = list->next;
127               continue;
128             }
129
130           /* Job spec used.  Wait for the last pid in the pipeline. */
131           UNBLOCK_CHILD (oset);
132           status = wait_for_job (job);
133         }
134 #endif /* JOB_CONTROL */
135       else
136         {
137           builtin_error ("`%s' is not a pid or valid job spec", w);
138           status = EXECUTION_FAILURE;
139         }
140       list = list->next;
141     }
142
143   WAIT_RETURN (status);
144 }