1 /* nojobs.c - functions that make children, remember them, and handle their termination. */
3 /* This file works under BSD, System V, minix, and Posix systems. It does
4 not implement job control. */
6 /* Copyright (C) 1987-2011 Free Software Foundation, Inc.
8 This file is part of GNU Bash, the Bourne Again SHell.
10 Bash is free software: you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation, either version 3 of the License, or
13 (at your option) any later version.
15 Bash is distributed in the hope that it will be useful,
16 but WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with Bash. If not, see <http://www.gnu.org/licenses/>.
26 #include "bashtypes.h"
29 #if defined (HAVE_UNISTD_H)
37 #if defined (BUFFERED_INPUT)
41 /* Need to include this up here for *_TTY_DRIVER definitions. */
48 #include "execute_cmd.h"
51 #include "builtins/builtext.h" /* for wait_builtin */
53 #define DEFAULT_CHILD_MAX 32
55 #if defined (_POSIX_VERSION) || !defined (HAVE_KILLPG)
56 # define killpg(pg, sig) kill(-(pg),(sig))
57 #endif /* USG || _POSIX_VERSION */
59 #if !defined (HAVE_SIGINTERRUPT) && !defined (HAVE_POSIX_SIGNALS)
60 # define siginterrupt(sig, code)
61 #endif /* !HAVE_SIGINTERRUPT && !HAVE_POSIX_SIGNALS */
63 #if defined (HAVE_WAITPID)
64 # define WAITPID(pid, statusp, options) waitpid (pid, statusp, options)
66 # define WAITPID(pid, statusp, options) wait (statusp)
67 #endif /* !HAVE_WAITPID */
69 /* Return the fd from which we are actually getting input. */
70 #define input_tty() (shell_tty != -1) ? shell_tty : fileno (stderr)
76 extern int interactive
, interactive_shell
, login_shell
;
77 extern int subshell_environment
;
78 extern int last_command_exit_value
, last_command_exit_signal
;
79 extern int interrupt_immediately
;
80 extern sh_builtin_func_t
*this_shell_builtin
;
81 #if defined (HAVE_POSIX_SIGNALS)
82 extern sigset_t top_level_mask
;
84 extern procenv_t wait_intr_buf
;
85 extern int wait_intr_flag
;
86 extern int wait_signal_received
;
88 extern void set_original_signal
__P((int, SigHandler
*));
90 volatile pid_t last_made_pid
= NO_PID
;
91 volatile pid_t last_asynchronous_pid
= NO_PID
;
93 static int queue_sigchld
, waiting_for_child
; /* dummy declarations */
95 /* Call this when you start making children. */
96 int already_making_children
= 0;
98 /* The controlling tty for this shell. */
101 /* If this is non-zero, $LINES and $COLUMNS are reset after every process
102 exits from get_tty_state(). */
103 int check_window_size
= CHECKWINSIZE_DEFAULT
;
105 /* We don't have job control. */
108 int running_in_background
= 0; /* can't tell without job control */
110 /* STATUS and FLAGS are only valid if pid != NO_PID
111 STATUS is only valid if (flags & PROC_RUNNING) == 0 */
114 int status
; /* Exit status of PID or 128 + fatal signal number */
118 /* Values for proc_status.flags */
119 #define PROC_RUNNING 0x01
120 #define PROC_NOTIFIED 0x02
121 #define PROC_ASYNC 0x04
122 #define PROC_SIGNALED 0x10
124 /* Return values from find_status_by_pid */
126 #define PROC_STILL_ALIVE -2
128 static struct proc_status
*pid_list
= (struct proc_status
*)NULL
;
129 static int pid_list_size
;
130 static int wait_sigint_received
;
132 static long child_max
= -1L;
134 static void alloc_pid_list
__P((void));
135 static int find_proc_slot
__P((pid_t
));
136 static int find_index_by_pid
__P((pid_t
));
137 static int find_status_by_pid
__P((pid_t
));
138 static int process_exit_status
__P((WAIT
));
139 static int find_termsig_by_pid
__P((pid_t
));
140 static int get_termsig
__P((WAIT
));
141 static void set_pid_status
__P((pid_t
, WAIT
));
142 static void set_pid_flags
__P((pid_t
, int));
143 static void unset_pid_flags
__P((pid_t
, int));
144 static int get_pid_flags
__P((pid_t
));
145 static void add_pid
__P((pid_t
, int));
146 static void mark_dead_jobs_as_notified
__P((int));
148 static sighandler wait_sigint_handler
__P((int));
149 static char *j_strsignal
__P((int));
151 #if defined (HAVE_WAITPID)
152 static void reap_zombie_children
__P((void));
155 #if !defined (HAVE_SIGINTERRUPT) && defined (HAVE_POSIX_SIGNALS)
156 static int siginterrupt
__P((int, int));
159 static void restore_sigint_handler
__P((void));
161 /* Allocate new, or grow existing PID_LIST. */
166 int old
= pid_list_size
;
169 pid_list
= (struct proc_status
*)xrealloc (pid_list
, pid_list_size
* sizeof (struct proc_status
));
171 /* None of the newly allocated slots have process id's yet. */
172 for (i
= old
; i
< pid_list_size
; i
++)
174 pid_list
[i
].pid
= NO_PID
;
175 pid_list
[i
].status
= pid_list
[i
].flags
= 0;
179 /* Return the offset within the PID_LIST array of an empty slot. This can
180 create new slots if all of the existing slots are taken. */
187 for (i
= 0; i
< pid_list_size
; i
++)
188 if (pid_list
[i
].pid
== NO_PID
|| pid_list
[i
].pid
== pid
)
191 if (i
== pid_list_size
)
197 /* Return the offset within the PID_LIST array of a slot containing PID,
198 or the value NO_PID if the pid wasn't found. */
200 find_index_by_pid (pid
)
205 for (i
= 0; i
< pid_list_size
; i
++)
206 if (pid_list
[i
].pid
== pid
)
212 /* Return the status of PID as looked up in the PID_LIST array. A
213 return value of PROC_BAD indicates that PID wasn't found. */
215 find_status_by_pid (pid
)
220 i
= find_index_by_pid (pid
);
223 if (pid_list
[i
].flags
& PROC_RUNNING
)
224 return (PROC_STILL_ALIVE
);
225 return (pid_list
[i
].status
);
229 process_exit_status (status
)
232 if (WIFSIGNALED (status
))
233 return (128 + WTERMSIG (status
));
235 return (WEXITSTATUS (status
));
238 /* Return the status of PID as looked up in the PID_LIST array. A
239 return value of PROC_BAD indicates that PID wasn't found. */
241 find_termsig_by_pid (pid
)
246 i
= find_index_by_pid (pid
);
249 if (pid_list
[i
].flags
& PROC_RUNNING
)
251 return (get_termsig ((WAIT
)pid_list
[i
].status
));
254 /* Set LAST_COMMAND_EXIT_SIGNAL depending on STATUS. If STATUS is -1, look
255 up PID in the pid array and set LAST_COMMAND_EXIT_SIGNAL appropriately
256 depending on its flags and exit status. */
261 if (WIFSTOPPED (status
) == 0 && WIFSIGNALED (status
))
262 return (WTERMSIG (status
));
267 /* Give PID the status value STATUS in the PID_LIST array. */
269 set_pid_status (pid
, status
)
275 #if defined (COPROCESS_SUPPORT)
276 coproc_pidchk (pid
, status
);
279 slot
= find_index_by_pid (pid
);
283 pid_list
[slot
].status
= process_exit_status (status
);
284 pid_list
[slot
].flags
&= ~PROC_RUNNING
;
285 if (WIFSIGNALED (status
))
286 pid_list
[slot
].flags
|= PROC_SIGNALED
;
287 /* If it's not a background process, mark it as notified so it gets
289 if ((pid_list
[slot
].flags
& PROC_ASYNC
) == 0)
290 pid_list
[slot
].flags
|= PROC_NOTIFIED
;
293 /* Give PID the flags FLAGS in the PID_LIST array. */
295 set_pid_flags (pid
, flags
)
301 slot
= find_index_by_pid (pid
);
305 pid_list
[slot
].flags
|= flags
;
308 /* Unset FLAGS for PID in the pid list */
310 unset_pid_flags (pid
, flags
)
316 slot
= find_index_by_pid (pid
);
320 pid_list
[slot
].flags
&= ~flags
;
323 /* Return the flags corresponding to PID in the PID_LIST array. */
330 slot
= find_index_by_pid (pid
);
334 return (pid_list
[slot
].flags
);
344 slot
= find_proc_slot (pid
);
346 pid_list
[slot
].pid
= pid
;
347 pid_list
[slot
].status
= -1;
348 pid_list
[slot
].flags
= PROC_RUNNING
;
350 pid_list
[slot
].flags
|= PROC_ASYNC
;
354 mark_dead_jobs_as_notified (force
)
357 register int i
, ndead
;
359 /* first, count the number of non-running async jobs if FORCE == 0 */
360 for (i
= ndead
= 0; force
== 0 && i
< pid_list_size
; i
++)
362 if (pid_list
[i
].pid
== NO_PID
)
364 if (((pid_list
[i
].flags
& PROC_RUNNING
) == 0) &&
365 (pid_list
[i
].flags
& PROC_ASYNC
))
370 child_max
= getmaxchild ();
372 child_max
= DEFAULT_CHILD_MAX
;
374 if (force
== 0 && ndead
<= child_max
)
377 /* If FORCE == 0, we just mark as many non-running async jobs as notified
378 to bring us under the CHILD_MAX limit. */
379 for (i
= 0; i
< pid_list_size
; i
++)
381 if (pid_list
[i
].pid
== NO_PID
)
383 if (((pid_list
[i
].flags
& PROC_RUNNING
) == 0) &&
384 pid_list
[i
].pid
!= last_asynchronous_pid
)
386 pid_list
[i
].flags
|= PROC_NOTIFIED
;
387 if (force
== 0 && (pid_list
[i
].flags
& PROC_ASYNC
) && --ndead
<= child_max
)
393 /* Remove all dead, notified jobs from the pid_list. */
399 #if defined (HAVE_WAITPID)
400 reap_zombie_children ();
403 for (i
= 0; i
< pid_list_size
; i
++)
405 if (pid_list
[i
].pid
!= NO_PID
&&
406 (pid_list
[i
].flags
& PROC_RUNNING
) == 0 &&
407 (pid_list
[i
].flags
& PROC_NOTIFIED
))
408 pid_list
[i
].pid
= NO_PID
;
411 #if defined (COPROCESS_SUPPORT)
421 mark_dead_jobs_as_notified (0);
422 cleanup_dead_jobs ();
425 /* Initialize the job control mechanism, and set up the tty stuff. */
427 initialize_job_control (force
)
430 shell_tty
= fileno (stderr
);
437 /* Setup this shell to handle C-C, etc. */
439 initialize_job_signals ()
441 set_signal_handler (SIGINT
, sigint_sighandler
);
443 /* If this is a login shell we don't wish to be disturbed by
446 ignore_tty_job_signals ();
449 #if defined (HAVE_WAITPID)
450 /* Collect the status of all zombie children so that their system
451 resources can be deallocated. */
453 reap_zombie_children ()
455 # if defined (WNOHANG)
461 while ((pid
= waitpid (-1, (int *)&status
, WNOHANG
)) > 0)
462 set_pid_status (pid
, status
);
463 # endif /* WNOHANG */
469 #if !defined (HAVE_SIGINTERRUPT) && defined (HAVE_POSIX_SIGNALS)
471 #if !defined (SA_RESTART)
472 # define SA_RESTART 0
476 siginterrupt (sig
, flag
)
479 struct sigaction act
;
481 sigaction (sig
, (struct sigaction
*)NULL
, &act
);
484 act
.sa_flags
&= ~SA_RESTART
;
486 act
.sa_flags
|= SA_RESTART
;
488 return (sigaction (sig
, &act
, (struct sigaction
*)NULL
));
490 #endif /* !HAVE_SIGINTERRUPT && HAVE_POSIX_SIGNALS */
492 /* Fork, handling errors. Returns the pid of the newly made child, or 0.
493 COMMAND is just for remembering the name of the command; we don't do
494 anything else with it. ASYNC_P says what to do with the tty. If
495 non-zero, then don't give it away. */
497 make_child (command
, async_p
)
504 /* Discard saved memory. */
510 #if defined (BUFFERED_INPUT)
511 /* If default_buffered_input is active, we are reading a script. If
512 the command is asynchronous, we have already duplicated /dev/null
513 as fd 0, but have not changed the buffered stream corresponding to
514 the old fd 0. We don't want to sync the stream in this case. */
515 if (default_buffered_input
!= -1 && (!async_p
|| default_buffered_input
> 0))
516 sync_buffered_stream (default_buffered_input
);
517 #endif /* BUFFERED_INPUT */
519 /* XXX - block SIGTERM here and unblock in child after fork resets the
520 set of pending signals? */
523 /* Create the child, handle severe errors. Retry on EAGAIN. */
525 while ((pid
= fork ()) < 0 && errno
== EAGAIN
&& forksleep
< FORKSLEEP_MAX
)
527 sys_error ("fork: retry");
530 #if defined (HAVE_WAITPID)
531 /* Posix systems with a non-blocking waitpid () system call available
532 get another chance after zombies are reaped. */
533 reap_zombie_children ();
534 if (forksleep
> 1 && sleep (forksleep
) != 0)
537 if (sleep (forksleep
) != 0)
539 #endif /* HAVE_WAITPID */
549 last_command_exit_value
= EX_NOEXEC
;
550 throw_to_top_level ();
555 #if defined (BUFFERED_INPUT)
556 unset_bash_input (0);
557 #endif /* BUFFERED_INPUT */
559 CLRINTERRUPT
; /* XXX - children have their own interrupt state */
561 #if defined (HAVE_POSIX_SIGNALS)
562 /* Restore top-level signal mask. */
563 sigprocmask (SIG_SETMASK
, &top_level_mask
, (sigset_t
*)NULL
);
567 /* Ignore INT and QUIT in asynchronous children. */
569 last_asynchronous_pid
= getpid ();
572 default_tty_job_signals ();
581 last_asynchronous_pid
= pid
;
583 add_pid (pid
, async_p
);
589 ignore_tty_job_signals ()
591 #if defined (SIGTSTP)
592 set_signal_handler (SIGTSTP
, SIG_IGN
);
593 set_signal_handler (SIGTTIN
, SIG_IGN
);
594 set_signal_handler (SIGTTOU
, SIG_IGN
);
599 default_tty_job_signals ()
601 #if defined (SIGTSTP)
602 if (signal_is_trapped (SIGTSTP
) == 0 && signal_is_hard_ignored (SIGTSTP
))
603 set_signal_handler (SIGTSTP
, SIG_IGN
);
605 set_signal_handler (SIGTSTP
, SIG_DFL
);
606 if (signal_is_trapped (SIGTTIN
) == 0 && signal_is_hard_ignored (SIGTTIN
))
607 set_signal_handler (SIGTTIN
, SIG_IGN
);
609 set_signal_handler (SIGTTIN
, SIG_DFL
);
610 if (signal_is_trapped (SIGTTOU
) == 0 && signal_is_hard_ignored (SIGTTOU
))
611 set_signal_handler (SIGTTOU
, SIG_IGN
);
613 set_signal_handler (SIGTTOU
, SIG_DFL
);
617 /* Called once in a parent process. */
619 get_original_tty_job_signals ()
621 static int fetched
= 0;
625 #if defined (SIGTSTP)
626 if (interactive_shell
)
628 set_original_signal (SIGTSTP
, SIG_DFL
);
629 set_original_signal (SIGTTIN
, SIG_DFL
);
630 set_original_signal (SIGTTOU
, SIG_DFL
);
634 get_original_signal (SIGTSTP
);
635 get_original_signal (SIGTTIN
);
636 get_original_signal (SIGTTOU
);
643 /* Wait for a single pid (PID) and return its exit status. Called by
646 wait_for_single_pid (pid
, flags
)
654 pstatus
= find_status_by_pid (pid
);
656 if (pstatus
== PROC_BAD
)
658 internal_error (_("wait: pid %ld is not a child of this shell"), (long)pid
);
662 if (pstatus
!= PROC_STILL_ALIVE
)
665 last_command_exit_signal
= find_termsig_by_pid (pid
);
669 siginterrupt (SIGINT
, 1);
670 while ((got_pid
= WAITPID (pid
, &status
, 0)) != pid
)
676 if (errno
!= EINTR
&& errno
!= ECHILD
)
678 siginterrupt (SIGINT
, 0);
683 else if (got_pid
> 0)
684 set_pid_status (got_pid
, status
);
689 set_pid_status (got_pid
, status
);
690 set_pid_flags (got_pid
, PROC_NOTIFIED
);
693 siginterrupt (SIGINT
, 0);
696 return (got_pid
> 0 ? process_exit_status (status
) : -1);
699 /* Wait for all of the shell's children to exit. Called by the `wait'
702 wait_for_background_pids ()
707 /* If we aren't using job control, we let the kernel take care of the
708 bookkeeping for us. wait () will return -1 and set errno to ECHILD
709 when there are no more unwaited-for child processes on both
710 4.2 BSD-based and System V-based systems. */
712 siginterrupt (SIGINT
, 1);
714 /* Wait for ECHILD */
715 while ((got_pid
= WAITPID (-1, &status
, 0)) != -1)
716 set_pid_status (got_pid
, status
);
718 if (errno
!= EINTR
&& errno
!= ECHILD
)
720 siginterrupt (SIGINT
, 0);
724 siginterrupt (SIGINT
, 0);
727 mark_dead_jobs_as_notified (1);
728 cleanup_dead_jobs ();
732 wait_sigint_cleanup ()
736 /* Make OLD_SIGINT_HANDLER the SIGINT signal handler. */
737 #define INVALID_SIGNAL_HANDLER (SigHandler *)wait_for_background_pids
738 static SigHandler
*old_sigint_handler
= INVALID_SIGNAL_HANDLER
;
741 restore_sigint_handler ()
743 if (old_sigint_handler
!= INVALID_SIGNAL_HANDLER
)
745 set_signal_handler (SIGINT
, old_sigint_handler
);
746 old_sigint_handler
= INVALID_SIGNAL_HANDLER
;
750 /* Handle SIGINT while we are waiting for children in a script to exit.
751 All interrupts are effectively ignored by the shell, but allowed to
752 kill a running job. */
754 wait_sigint_handler (sig
)
757 SigHandler
*sigint_handler
;
759 /* If we got a SIGINT while in `wait', and SIGINT is trapped, do
760 what POSIX.2 says (see builtins/wait.def for more info). */
761 if (this_shell_builtin
&& this_shell_builtin
== wait_builtin
&&
762 signal_is_trapped (SIGINT
) &&
763 ((sigint_handler
= trap_to_sighandler (SIGINT
)) == trap_handler
))
765 last_command_exit_value
= 128+SIGINT
;
766 restore_sigint_handler ();
767 interrupt_immediately
= 0;
768 trap_handler (SIGINT
); /* set pending_traps[SIGINT] */
769 wait_signal_received
= SIGINT
;
773 if (interrupt_immediately
)
775 last_command_exit_value
= EXECUTION_FAILURE
;
776 restore_sigint_handler ();
781 wait_sigint_received
= 1;
790 static char retcode_name_buffer
[64] = { '\0' };
796 x
= retcode_name_buffer
;
797 sprintf (x
, "Signal %d", s
);
802 /* Wait for pid (one of our children) to terminate. This is called only
803 by the execution code in execute_cmd.c. */
808 int return_val
, pstatus
;
812 pstatus
= find_status_by_pid (pid
);
814 if (pstatus
== PROC_BAD
)
817 if (pstatus
!= PROC_STILL_ALIVE
)
820 last_command_exit_signal
= find_termsig_by_pid (pid
);
824 /* If we are running a script, ignore SIGINT while we're waiting for
825 a child to exit. The loop below does some of this, but not all. */
826 wait_sigint_received
= 0;
827 if (interactive_shell
== 0)
828 old_sigint_handler
= set_signal_handler (SIGINT
, wait_sigint_handler
);
830 while ((got_pid
= WAITPID (-1, &status
, 0)) != pid
) /* XXX was pid now -1 */
834 if (got_pid
< 0 && errno
== ECHILD
)
836 #if !defined (_POSIX_VERSION)
837 status
.w_termsig
= status
.w_retcode
= 0;
840 #endif /* _POSIX_VERSION */
843 else if (got_pid
< 0 && errno
!= EINTR
)
844 programming_error ("wait_for(%ld): %s", (long)pid
, strerror(errno
));
845 else if (got_pid
> 0)
846 set_pid_status (got_pid
, status
);
850 set_pid_status (got_pid
, status
);
852 #if defined (HAVE_WAITPID)
854 reap_zombie_children ();
855 #endif /* HAVE_WAITPID */
860 if (interactive_shell
== 0)
862 SigHandler
*temp_handler
;
864 temp_handler
= old_sigint_handler
;
865 restore_sigint_handler ();
867 /* If the job exited because of SIGINT, make sure the shell acts as if
868 it had received one also. */
869 if (WIFSIGNALED (status
) && (WTERMSIG (status
) == SIGINT
))
872 if (maybe_call_trap_handler (SIGINT
) == 0)
874 if (temp_handler
== SIG_DFL
)
875 termsig_handler (SIGINT
);
876 else if (temp_handler
!= INVALID_SIGNAL_HANDLER
&& temp_handler
!= SIG_IGN
)
877 (*temp_handler
) (SIGINT
);
882 /* Default return value. */
883 /* ``a full 8 bits of status is returned'' */
884 return_val
= process_exit_status (status
);
885 last_command_exit_signal
= get_termsig (status
);
887 #if defined (DONT_REPORT_SIGPIPE) && defined (DONT_REPORT_SIGTERM)
888 # define REPORTSIG(x) ((x) != SIGINT && (x) != SIGPIPE && (x) != SIGTERM)
889 #elif !defined (DONT_REPORT_SIGPIPE) && !defined (DONT_REPORT_SIGTERM)
890 # define REPORTSIG(x) ((x) != SIGINT)
891 #elif defined (DONT_REPORT_SIGPIPE)
892 # define REPORTSIG(x) ((x) != SIGINT && (x) != SIGPIPE)
894 # define REPORTSIG(x) ((x) != SIGINT && (x) != SIGTERM)
897 if ((WIFSTOPPED (status
) == 0) && WIFSIGNALED (status
) && REPORTSIG(WTERMSIG (status
)))
899 fprintf (stderr
, "%s", j_strsignal (WTERMSIG (status
)));
900 if (WIFCORED (status
))
901 fprintf (stderr
, _(" (core dumped)"));
902 fprintf (stderr
, "\n");
905 if (interactive_shell
&& subshell_environment
== 0)
907 if (WIFSIGNALED (status
) || WIFSTOPPED (status
))
912 else if (interactive_shell
== 0 && subshell_environment
== 0 && check_window_size
)
913 get_new_window_size (0, (int *)0, (int *)0);
918 /* Send PID SIGNAL. Returns -1 on failure, 0 on success. If GROUP is non-zero,
919 or PID is less than -1, then kill the process group associated with PID. */
921 kill_pid (pid
, signal
, group
)
932 result
= group
? killpg (pid
, signal
) : kill (pid
, signal
);
936 static TTYSTRUCT shell_tty_info
;
937 static int got_tty_state
;
939 /* Fill the contents of shell_tty_info with the current tty info. */
948 ttgetattr (tty
, &shell_tty_info
);
950 if (check_window_size
)
951 get_new_window_size (0, (int *)0, (int *)0);
956 /* Make the current tty use the state in shell_tty_info. */
965 if (got_tty_state
== 0)
967 ttsetattr (tty
, &shell_tty_info
);
972 /* Give the terminal to PGRP. */
974 give_terminal_to (pgrp
, force
)
981 /* Stop a pipeline. */
983 stop_pipeline (async
, ignore
)
987 already_making_children
= 0;
994 already_making_children
= 1;
998 stop_making_children ()
1000 already_making_children
= 0;
1003 /* The name is kind of a misnomer, but it's what the job control code uses. */
1005 without_job_control ()
1007 stop_making_children ();
1008 last_made_pid
= NO_PID
; /* XXX */
1012 get_job_by_pid (pid
, block
)
1018 i
= find_index_by_pid (pid
);
1019 return ((i
== NO_PID
) ? PROC_BAD
: i
);
1022 /* Print descriptive information about the job with leader pid PID. */
1027 fprintf (stderr
, "%ld\n", (long) pid
);
1037 unfreeze_jobs_list ()