1 This file is jobs.def, from which is created jobs.c.
2 It implements the builtins "jobs" and "disown" in Bash.
4 Copyright (C) 1987-2002 Free Software Foundation, Inc.
6 This file is part of GNU Bash, the Bourne Again SHell.
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 2, or (at your option) any later
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
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, 59 Temple Place, Suite 330, Boston, MA 02111 USA.
25 $FUNCTION jobs_builtin
26 $DEPENDS_ON JOB_CONTROL
27 $SHORT_DOC jobs [-lnprs] [jobspec ...] or jobs -x command [args]
28 Lists the active jobs. The -l option lists process id's in addition
29 to the normal information; the -p option lists process id's only.
30 If -n is given, only processes that have changed status since the last
31 notification are printed. JOBSPEC restricts output to that job. The
32 -r and -s options restrict output to running and stopped jobs only,
33 respectively. Without options, the status of all active jobs is
34 printed. If -x is given, COMMAND is run after all job specifications
35 that appear in ARGS have been replaced with the process ID of that job's
41 #if defined (JOB_CONTROL)
42 #include "../bashtypes.h"
44 #if defined (HAVE_UNISTD_H)
48 #include "../bashansi.h"
52 #include "../execute_cmd.h"
53 #include "bashgetopt.h"
56 #define JSTATE_ANY 0x0
57 #define JSTATE_RUNNING 0x1
58 #define JSTATE_STOPPED 0x2
60 static int execute_list_with_replacements __P((WORD_LIST *));
62 /* The `jobs' command. Prints outs a list of active jobs. If the
63 argument `-l' is given, then the process id's are printed also.
64 If the argument `-p' is given, print the process group leader's
65 pid only. If `-n' is given, only processes that have changed
66 status since the last notification are printed. If -x is given,
67 replace all job specs with the pid of the appropriate process
68 group leader and execute the command. The -r and -s options mean
69 to print info about running and stopped jobs only, respectively. */
74 int form, execute, state, opt, any_failed, job;
77 if (job_control == 0 && interactive_shell == 0)
78 return (EXECUTION_SUCCESS);
80 execute = any_failed = 0;
81 form = JLIST_STANDARD;
84 reset_internal_getopt ();
85 while ((opt = internal_getopt (list, "lpnxrs")) != -1)
93 form = JLIST_PID_ONLY;
96 form = JLIST_CHANGED_ONLY;
99 if (form != JLIST_STANDARD)
101 builtin_error ("no other options allowed with `-x'");
102 return (EXECUTION_FAILURE);
107 state = JSTATE_RUNNING;
110 state = JSTATE_STOPPED;
122 return (execute_list_with_replacements (list));
129 list_all_jobs (form);
132 list_running_jobs (form);
135 list_stopped_jobs (form);
138 return (EXECUTION_SUCCESS);
143 BLOCK_CHILD (set, oset);
144 job = get_job_spec (list);
146 if ((job == NO_JOB) || !jobs || !jobs[job])
148 sh_badjob (list->word->word);
151 else if (job != DUP_JOB)
152 list_one_job ((JOB *)NULL, form, 0, job);
154 UNBLOCK_CHILD (oset);
157 return (any_failed ? EXECUTION_FAILURE : EXECUTION_SUCCESS);
161 execute_list_with_replacements (list)
164 register WORD_LIST *l;
167 /* First do the replacement of job specifications with pids. */
168 for (l = list; l; l = l->next)
170 if (l->word->word[0] == '%') /* we have a winner */
172 job = get_job_spec (l);
174 /* A bad job spec is not really a job spec! Pass it through. */
175 if (job < 0 || job >= job_slots || !jobs[job])
178 free (l->word->word);
179 l->word->word = itos (jobs[job]->pgrp);
183 /* Next make a new simple command and execute it. */
184 begin_unwind_frame ("jobs_builtin");
186 COMMAND *command = (COMMAND *)NULL;
188 add_unwind_protect (dispose_command, command);
190 command = make_bare_simple_command ();
191 command->value.Simple->words = copy_word_list (list);
192 command->value.Simple->redirects = (REDIRECT *)NULL;
193 command->flags |= CMD_INHIBIT_EXPANSION;
194 command->value.Simple->flags |= CMD_INHIBIT_EXPANSION;
196 result = execute_command (command);
199 run_unwind_frame ("jobs_builtin");
202 #endif /* JOB_CONTROL */
205 $FUNCTION disown_builtin
206 $DEPENDS_ON JOB_CONTROL
207 $SHORT_DOC disown [-h] [-ar] [jobspec ...]
208 By default, removes each JOBSPEC argument from the table of active jobs.
209 If the -h option is given, the job is not removed from the table, but is
210 marked so that SIGHUP is not sent to the job if the shell receives a
211 SIGHUP. The -a option, when JOBSPEC is not supplied, means to remove all
212 jobs from the job table; the -r option means to remove only running jobs.
215 #if defined (JOB_CONTROL)
217 disown_builtin (list)
220 int opt, job, retval, nohup_only, running_jobs, all_jobs;
224 nohup_only = running_jobs = all_jobs = 0;
225 reset_internal_getopt ();
226 while ((opt = internal_getopt (list, "ahr")) != -1)
245 retval = EXECUTION_SUCCESS;
247 /* `disown -a' or `disown -r' */
248 if (list == 0 && (all_jobs || running_jobs))
251 nohup_all_jobs (running_jobs);
253 delete_all_jobs (running_jobs);
254 return (EXECUTION_SUCCESS);
259 BLOCK_CHILD (set, oset);
260 job = (list && legal_number (list->word->word, &pid_value) && pid_value == (pid_t) pid_value)
261 ? get_job_by_pid ((pid_t) pid_value, 0)
262 : get_job_spec (list);
264 if (job == NO_JOB || jobs == 0 || job < 0 || job >= job_slots || jobs[job] == 0)
266 sh_badjob (list ? list->word->word : "current");
267 retval = EXECUTION_FAILURE;
273 UNBLOCK_CHILD (oset);
282 #endif /* JOB_CONTROL */