kill.c revision 1.22 1 1.22 jschauma /* $NetBSD: kill.c,v 1.22 2003/08/04 22:31:24 jschauma Exp $ */
2 1.10 cgd
3 1.1 cgd /*
4 1.7 mycroft * Copyright (c) 1988, 1993, 1994
5 1.7 mycroft * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.1 cgd * 3. All advertising materials mentioning features or use of this software
16 1.1 cgd * must display the following acknowledgement:
17 1.1 cgd * This product includes software developed by the University of
18 1.1 cgd * California, Berkeley and its contributors.
19 1.1 cgd * 4. Neither the name of the University nor the names of its contributors
20 1.1 cgd * may be used to endorse or promote products derived from this software
21 1.1 cgd * without specific prior written permission.
22 1.1 cgd *
23 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33 1.1 cgd * SUCH DAMAGE.
34 1.1 cgd */
35 1.1 cgd
36 1.13 christos #include <sys/cdefs.h>
37 1.20 christos #if !defined(lint) && !defined(SHELL)
38 1.13 christos __COPYRIGHT("@(#) Copyright (c) 1988, 1993, 1994\n\
39 1.13 christos The Regents of the University of California. All rights reserved.\n");
40 1.1 cgd #endif /* not lint */
41 1.1 cgd
42 1.1 cgd #ifndef lint
43 1.10 cgd #if 0
44 1.11 jtc static char sccsid[] = "@(#)kill.c 8.4 (Berkeley) 4/28/95";
45 1.10 cgd #else
46 1.22 jschauma __RCSID("$NetBSD: kill.c,v 1.22 2003/08/04 22:31:24 jschauma Exp $");
47 1.10 cgd #endif
48 1.1 cgd #endif /* not lint */
49 1.1 cgd
50 1.7 mycroft #include <ctype.h>
51 1.7 mycroft #include <err.h>
52 1.7 mycroft #include <errno.h>
53 1.1 cgd #include <signal.h>
54 1.1 cgd #include <stdio.h>
55 1.1 cgd #include <stdlib.h>
56 1.1 cgd #include <string.h>
57 1.20 christos #include <termios.h>
58 1.20 christos #include <unistd.h>
59 1.20 christos #include <locale.h>
60 1.20 christos #include <sys/ioctl.h>
61 1.20 christos
62 1.20 christos #ifdef SHELL /* sh (aka ash) builtin */
63 1.20 christos #define main killcmd
64 1.20 christos #include "../../bin/sh/bltin/bltin.h"
65 1.20 christos #endif /* SHELL */
66 1.20 christos
67 1.20 christos static void nosig(char *);
68 1.20 christos static void printsignals(FILE *);
69 1.20 christos static int signame_to_signum(char *);
70 1.20 christos static void usage(void);
71 1.18 wiz int main(int, char *[]);
72 1.7 mycroft
73 1.7 mycroft int
74 1.18 wiz main(int argc, char *argv[])
75 1.1 cgd {
76 1.7 mycroft int errors, numsig, pid;
77 1.1 cgd char *ep;
78 1.1 cgd
79 1.19 wiz setprogname(argv[0]);
80 1.20 christos setlocale(LC_ALL, "");
81 1.1 cgd if (argc < 2)
82 1.1 cgd usage();
83 1.1 cgd
84 1.4 jtc numsig = SIGTERM;
85 1.7 mycroft
86 1.4 jtc argc--, argv++;
87 1.18 wiz if (strcmp(*argv, "-l") == 0) {
88 1.7 mycroft argc--, argv++;
89 1.7 mycroft if (argc > 1)
90 1.7 mycroft usage();
91 1.7 mycroft if (argc == 1) {
92 1.18 wiz if (isdigit((unsigned char)**argv) == 0)
93 1.7 mycroft usage();
94 1.7 mycroft numsig = strtol(*argv, &ep, 10);
95 1.22 jschauma if (*ep != '\0') {
96 1.22 jschauma errx(EXIT_FAILURE, "illegal signal number: %s",
97 1.22 jschauma *argv);
98 1.22 jschauma /* NOTREACHED */
99 1.22 jschauma }
100 1.7 mycroft if (numsig >= 128)
101 1.7 mycroft numsig -= 128;
102 1.7 mycroft if (numsig <= 0 || numsig >= NSIG)
103 1.7 mycroft nosig(*argv);
104 1.20 christos printf("%s\n", sys_signame[numsig]);
105 1.7 mycroft exit(0);
106 1.4 jtc }
107 1.4 jtc printsignals(stdout);
108 1.1 cgd exit(0);
109 1.7 mycroft }
110 1.7 mycroft
111 1.7 mycroft if (!strcmp(*argv, "-s")) {
112 1.7 mycroft argc--, argv++;
113 1.7 mycroft if (argc < 1) {
114 1.7 mycroft warnx("option requires an argument -- s");
115 1.4 jtc usage();
116 1.4 jtc }
117 1.7 mycroft if (strcmp(*argv, "0")) {
118 1.7 mycroft if ((numsig = signame_to_signum(*argv)) < 0)
119 1.7 mycroft nosig(*argv);
120 1.7 mycroft } else
121 1.4 jtc numsig = 0;
122 1.7 mycroft argc--, argv++;
123 1.4 jtc } else if (**argv == '-') {
124 1.1 cgd ++*argv;
125 1.17 christos if (isalpha((unsigned char)**argv)) {
126 1.7 mycroft if ((numsig = signame_to_signum(*argv)) < 0)
127 1.4 jtc nosig(*argv);
128 1.17 christos } else if (isdigit((unsigned char)**argv)) {
129 1.1 cgd numsig = strtol(*argv, &ep, 10);
130 1.22 jschauma if (!*argv || *ep) {
131 1.22 jschauma errx(EXIT_FAILURE, "illegal signal number: %s",
132 1.22 jschauma *argv);
133 1.22 jschauma /* NOTREACHED */
134 1.22 jschauma }
135 1.9 jtc if (numsig < 0 || numsig >= NSIG)
136 1.1 cgd nosig(*argv);
137 1.1 cgd } else
138 1.1 cgd nosig(*argv);
139 1.7 mycroft argc--, argv++;
140 1.1 cgd }
141 1.1 cgd
142 1.7 mycroft if (argc == 0)
143 1.1 cgd usage();
144 1.1 cgd
145 1.7 mycroft for (errors = 0; argc; argc--, argv++) {
146 1.20 christos #ifdef SHELL
147 1.20 christos extern int getjobpgrp(const char *);
148 1.20 christos if (*argv[0] == '%') {
149 1.20 christos pid = getjobpgrp(*argv);
150 1.20 christos if (pid == 0) {
151 1.20 christos warnx("illegal job id: %s", *argv);
152 1.20 christos errors = 1;
153 1.20 christos continue;
154 1.20 christos }
155 1.20 christos } else
156 1.20 christos #endif
157 1.20 christos {
158 1.20 christos pid = strtol(*argv, &ep, 10);
159 1.20 christos if (!**argv || *ep) {
160 1.20 christos warnx("illegal process id: %s", *argv);
161 1.20 christos errors = 1;
162 1.20 christos continue;
163 1.20 christos }
164 1.20 christos }
165 1.20 christos if (kill(pid, numsig) == -1) {
166 1.7 mycroft warn("%s", *argv);
167 1.1 cgd errors = 1;
168 1.1 cgd }
169 1.21 christos #ifdef SHELL
170 1.21 christos /* Wakeup the process if it was suspended, so it can
171 1.21 christos exit without an explicit 'fg'. */
172 1.21 christos if (numsig == SIGTERM || numsig == SIGHUP)
173 1.21 christos kill(pid, SIGCONT);
174 1.21 christos #endif
175 1.1 cgd }
176 1.7 mycroft
177 1.1 cgd exit(errors);
178 1.14 mycroft /* NOTREACHED */
179 1.1 cgd }
180 1.1 cgd
181 1.20 christos static int
182 1.18 wiz signame_to_signum(char *sig)
183 1.4 jtc {
184 1.6 mycroft int n;
185 1.4 jtc
186 1.18 wiz if (strncasecmp(sig, "sig", 3) == 0)
187 1.4 jtc sig += 3;
188 1.6 mycroft for (n = 1; n < NSIG; n++) {
189 1.6 mycroft if (!strcasecmp(sys_signame[n], sig))
190 1.7 mycroft return (n);
191 1.4 jtc }
192 1.7 mycroft return (-1);
193 1.4 jtc }
194 1.4 jtc
195 1.20 christos static void
196 1.18 wiz nosig(char *name)
197 1.1 cgd {
198 1.7 mycroft
199 1.7 mycroft warnx("unknown signal %s; valid signals:", name);
200 1.4 jtc printsignals(stderr);
201 1.1 cgd exit(1);
202 1.15 mycroft /* NOTREACHED */
203 1.1 cgd }
204 1.1 cgd
205 1.20 christos static void
206 1.18 wiz printsignals(FILE *fp)
207 1.1 cgd {
208 1.20 christos int sig;
209 1.20 christos int len, nl;
210 1.20 christos const char *name;
211 1.20 christos int termwidth = 80;
212 1.20 christos
213 1.20 christos if (isatty(fileno(fp))) {
214 1.20 christos struct winsize win;
215 1.20 christos if (ioctl(fileno(fp), TIOCGWINSZ, &win) == 0 && win.ws_col > 0)
216 1.20 christos termwidth = win.ws_col;
217 1.20 christos }
218 1.1 cgd
219 1.20 christos for (len = 0, sig = 1; sig < NSIG; sig++) {
220 1.20 christos name = sys_signame[sig];
221 1.20 christos nl = 1 + strlen(name);
222 1.20 christos
223 1.20 christos if (len + nl >= termwidth) {
224 1.20 christos fprintf(fp, "\n");
225 1.20 christos len = 0;
226 1.20 christos } else
227 1.20 christos if (len != 0)
228 1.20 christos fprintf(fp, " ");
229 1.20 christos len += nl;
230 1.20 christos fprintf(fp, "%s", name);
231 1.7 mycroft }
232 1.20 christos if (len != 0)
233 1.20 christos fprintf(fp, "\n");
234 1.1 cgd }
235 1.1 cgd
236 1.20 christos static void
237 1.18 wiz usage(void)
238 1.1 cgd {
239 1.7 mycroft
240 1.20 christos fprintf(stderr, "usage: %s [-s signal_name] pid ...\n"
241 1.19 wiz " %s -l [exit_status]\n"
242 1.19 wiz " %s -signal_name pid ...\n"
243 1.19 wiz " %s -signal_number pid ...\n",
244 1.19 wiz getprogname(), getprogname(), getprogname(), getprogname());
245 1.1 cgd exit(1);
246 1.15 mycroft /* NOTREACHED */
247 1.1 cgd }
248