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