declare program_name consistently
[platform/upstream/coreutils.git] / src / kill.c
1 /* kill -- send a signal to a process
2    Copyright (C) 2002, 2003, 2004, 2005, 2008 Free Software Foundation, Inc.
3
4    This program is free software: you can redistribute it and/or modify
5    it under the terms of the GNU General Public License as published by
6    the Free Software Foundation, either version 3 of the License, or
7    (at your option) any later version.
8
9    This program is distributed in the hope that it will be useful,
10    but WITHOUT ANY WARRANTY; without even the implied warranty of
11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
12    GNU General Public License for more details.
13
14    You should have received a copy of the GNU General Public License
15    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
16
17 /* Written by Paul Eggert.  */
18
19 #include <config.h>
20 #include <stdio.h>
21 #include <getopt.h>
22 #include <sys/types.h>
23 #include <signal.h>
24
25 #if HAVE_SYS_WAIT_H
26 # include <sys/wait.h>
27 #endif
28 #ifndef WIFSIGNALED
29 # define WIFSIGNALED(s) (((s) & 0xFFFF) - 1 < (unsigned int) 0xFF)
30 #endif
31 #ifndef WTERMSIG
32 # define WTERMSIG(s) ((s) & 0x7F)
33 #endif
34
35 #include "system.h"
36 #include "error.h"
37 #include "sig2str.h"
38 #include "operand2sig.h"
39
40 /* The official name of this program (e.g., no `g' prefix).  */
41 #define PROGRAM_NAME "kill"
42
43 #define AUTHORS proper_name ("Paul Eggert")
44 \f
45 #if ! (HAVE_DECL_STRSIGNAL || defined strsignal)
46 # if ! (HAVE_DECL_SYS_SIGLIST || defined sys_siglist)
47 #  if HAVE_DECL__SYS_SIGLIST || defined _sys_siglist
48 #   define sys_siglist _sys_siglist
49 #  elif HAVE_DECL___SYS_SIGLIST || defined __sys_siglist
50 #   define sys_siglist __sys_siglist
51 #  endif
52 # endif
53 # if HAVE_DECL_SYS_SIGLIST || defined sys_siglist
54 #  define strsignal(signum) (0 <= (signum) && (signum) <= SIGNUM_BOUND \
55                              ? sys_siglist[signum] \
56                              : 0)
57 # endif
58 # ifndef strsignal
59 #  define strsignal(signum) 0
60 # endif
61 #endif
62 \f
63 /* The name this program was run with, for error messages.  */
64 char const *program_name;
65
66 static char const short_options[] =
67   "0::1::2::3::4::5::6::7::8::9::"
68   "A::B::C::D::E::F::G::H::I::J::K::L::M::"
69   "N::O::P::Q::R::S::T::U::V::W::X::Y::Z::"
70   "ln:s:t";
71
72 static struct option const long_options[] =
73 {
74   {"list", no_argument, NULL, 'l'},
75   {"signal", required_argument, NULL, 's'},
76   {"table", no_argument, NULL, 't'},
77   {GETOPT_HELP_OPTION_DECL},
78   {GETOPT_VERSION_OPTION_DECL},
79   {NULL, 0, NULL, 0}
80 };
81
82 void
83 usage (int status)
84 {
85   if (status != EXIT_SUCCESS)
86     fprintf (stderr, _("Try `%s --help' for more information.\n"),
87              program_name);
88   else
89     {
90       printf (_("\
91 Usage: %s [-s SIGNAL | -SIGNAL] PID...\n\
92   or:  %s -l [SIGNAL]...\n\
93   or:  %s -t [SIGNAL]...\n\
94 "),
95               program_name, program_name, program_name);
96       fputs (_("\
97 Send signals to processes, or list signals.\n\
98 \n\
99 "), stdout);
100       fputs (_("\
101 Mandatory arguments to long options are mandatory for short options too.\n\
102 "), stdout);
103       fputs (_("\
104   -s, --signal=SIGNAL, -SIGNAL\n\
105                    specify the name or number of the signal to be sent\n\
106   -l, --list       list signal names, or convert signal names to/from numbers\n\
107   -t, --table      print a table of signal information\n\
108 "), stdout);
109       fputs (HELP_OPTION_DESCRIPTION, stdout);
110       fputs (VERSION_OPTION_DESCRIPTION, stdout);
111       fputs (_("\n\
112 SIGNAL may be a signal name like `HUP', or a signal number like `1',\n\
113 or an exit status of a process terminated by a signal.\n\
114 PID is an integer; if negative it identifies a process group.\n\
115 "), stdout);
116       printf (USAGE_BUILTIN_WARNING, PROGRAM_NAME);
117       emit_bug_reporting_address ();
118     }
119   exit (status);
120 }
121 \f
122 /* Print a row of `kill -t' output.  NUM_WIDTH is the maximum signal
123    number width, and SIGNUM is the signal number to print.  The
124    maximum name width is NAME_WIDTH, and SIGNAME is the name to print.  */
125
126 static void
127 print_table_row (unsigned int num_width, int signum,
128                  unsigned int name_width, char const *signame)
129 {
130   char const *description = strsignal (signum);
131   printf ("%*d %-*s %s\n", num_width, signum, name_width, signame,
132           description ? description : "?");
133 }
134
135 /* Print a list of signal names.  If TABLE, print a table.
136    Print the names specified by ARGV if nonzero; otherwise,
137    print all known names.  Return a suitable exit status.  */
138
139 static int
140 list_signals (bool table, char *const *argv)
141 {
142   int signum;
143   int status = EXIT_SUCCESS;
144   char signame[SIG2STR_MAX];
145
146   if (table)
147     {
148       unsigned int name_width = 0;
149
150       /* Compute the maximum width of a signal number.  */
151       unsigned int num_width = 1;
152       for (signum = 1; signum <= SIGNUM_BOUND / 10; signum *= 10)
153         num_width++;
154
155       /* Compute the maximum width of a signal name.  */
156       for (signum = 1; signum <= SIGNUM_BOUND; signum++)
157         if (sig2str (signum, signame) == 0)
158           {
159             size_t len = strlen (signame);
160             if (name_width < len)
161               name_width = len;
162           }
163
164       if (argv)
165         for (; *argv; argv++)
166           {
167             signum = operand2sig (*argv, signame);
168             if (signum < 0)
169               status = EXIT_FAILURE;
170             else
171               print_table_row (num_width, signum, name_width, signame);
172           }
173       else
174         for (signum = 1; signum <= SIGNUM_BOUND; signum++)
175           if (sig2str (signum, signame) == 0)
176             print_table_row (num_width, signum, name_width, signame);
177     }
178   else
179     {
180       if (argv)
181         for (; *argv; argv++)
182           {
183             signum = operand2sig (*argv, signame);
184             if (signum < 0)
185               status = EXIT_FAILURE;
186             else
187               {
188                 if (ISDIGIT (**argv))
189                   puts (signame);
190                 else
191                   printf ("%d\n", signum);
192               }
193           }
194       else
195         for (signum = 1; signum <= SIGNUM_BOUND; signum++)
196           if (sig2str (signum, signame) == 0)
197             puts (signame);
198     }
199
200   return status;
201 }
202 \f
203 /* Send signal SIGNUM to all the processes or process groups specified
204    by ARGV.  Return a suitable exit status.  */
205
206 static int
207 send_signals (int signum, char *const *argv)
208 {
209   int status = EXIT_SUCCESS;
210   char const *arg = *argv;
211
212   do
213     {
214       char *endp;
215       intmax_t n = (errno = 0, strtoimax (arg, &endp, 10));
216       pid_t pid = n;
217
218       if (errno == ERANGE || pid != n || arg == endp || *endp)
219         {
220           error (0, 0, _("%s: invalid process id"), arg);
221           status = EXIT_FAILURE;
222         }
223       else if (kill (pid, signum) != 0)
224         {
225           error (0, errno, "%s", arg);
226           status = EXIT_FAILURE;
227         }
228     }
229   while ((arg = *++argv));
230
231   return status;
232 }
233 \f
234 int
235 main (int argc, char **argv)
236 {
237   int optc;
238   bool list = false;
239   bool table = false;
240   int signum = -1;
241   char signame[SIG2STR_MAX];
242
243   initialize_main (&argc, &argv);
244   program_name = argv[0];
245   setlocale (LC_ALL, "");
246   bindtextdomain (PACKAGE, LOCALEDIR);
247   textdomain (PACKAGE);
248
249   atexit (close_stdout);
250
251   while ((optc = getopt_long (argc, argv, short_options, long_options, NULL))
252          != -1)
253     switch (optc)
254       {
255       case '0': case '1': case '2': case '3': case '4':
256       case '5': case '6': case '7': case '8': case '9':
257         if (optind != 2)
258           {
259             /* This option is actually a process-id.  */
260             optind--;
261             goto no_more_options;
262           }
263         /* Fall through.  */
264       case 'A': case 'B': case 'C': case 'D': case 'E':
265       case 'F': case 'G': case 'H': case 'I': case 'J':
266       case 'K': case 'L': case 'M': case 'N': case 'O':
267       case 'P': case 'Q': case 'R': case 'S': case 'T':
268       case 'U': case 'V': case 'W': case 'X': case 'Y':
269       case 'Z':
270         if (! optarg)
271           optarg = argv[optind - 1] + strlen (argv[optind - 1]);
272         if (optarg != argv[optind - 1] + 2)
273           {
274             error (0, 0, _("invalid option -- %c"), optc);
275             usage (EXIT_FAILURE);
276           }
277         optarg--;
278         /* Fall through.  */
279       case 'n': /* -n is not documented, but is for Bash compatibility.  */
280       case 's':
281         if (0 <= signum)
282           {
283             error (0, 0, _("%s: multiple signals specified"), optarg);
284             usage (EXIT_FAILURE);
285           }
286         signum = operand2sig (optarg, signame);
287         if (signum < 0)
288           usage (EXIT_FAILURE);
289         break;
290
291       case 't':
292         table = true;
293         /* Fall through.  */
294       case 'l':
295         if (list)
296           {
297             error (0, 0, _("multiple -l or -t options specified"));
298             usage (EXIT_FAILURE);
299           }
300         list = true;
301         break;
302
303       case_GETOPT_HELP_CHAR;
304       case_GETOPT_VERSION_CHAR (PROGRAM_NAME, AUTHORS);
305       default:
306         usage (EXIT_FAILURE);
307       }
308  no_more_options:;
309
310   if (signum < 0)
311     signum = SIGTERM;
312   else if (list)
313     {
314       error (0, 0, _("cannot combine signal with -l or -t"));
315       usage (EXIT_FAILURE);
316     }
317
318   if ( ! list && argc <= optind)
319     {
320       error (0, 0, _("no process ID specified"));
321       usage (EXIT_FAILURE);
322     }
323
324   return (list
325           ? list_signals (table, optind < argc ? argv + optind : NULL)
326           : send_signals (signum, argv + optind));
327 }