Home | History | Annotate | Line # | Download | only in ipcrm
ipcrm.c revision 1.5
      1  1.5    tls /*	$NetBSD: ipcrm.c,v 1.5 1997/01/09 20:20:22 tls Exp $	*/
      2  1.5    tls 
      3  1.1    cgd /*
      4  1.2  glass  * Copyright (c) 1994 Adam Glass
      5  1.2  glass  * All rights reserved.
      6  1.1    cgd  *
      7  1.2  glass  * Redistribution and use in source and binary forms, with or without
      8  1.2  glass  * modification, are permitted provided that the following conditions
      9  1.2  glass  * are met:
     10  1.2  glass  * 1. Redistributions of source code must retain the above copyright
     11  1.2  glass  *    notice, this list of conditions and the following disclaimer.
     12  1.4  glass  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.4  glass  *    notice, this list of conditions and the following disclaimer in the
     14  1.4  glass  *    documentation and/or other materials provided with the distribution.
     15  1.4  glass  * 3. All advertising materials mentioning features or use of this software
     16  1.4  glass  *    must display the following acknowledgement:
     17  1.4  glass  *	This product includes software developed by Adam Glass.
     18  1.4  glass  * 4. The name of the Author may not be used to endorse or promote products
     19  1.2  glass  *    derived from this software without specific prior written permission.
     20  1.2  glass  *
     21  1.2  glass  * THIS SOFTWARE IS PROVIDED BY Adam Glass ``AS IS'' AND
     22  1.2  glass  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     23  1.2  glass  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     24  1.2  glass  * ARE DISCLAIMED.  IN NO EVENT SHALL Adam Glass BE LIABLE
     25  1.2  glass  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     26  1.2  glass  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     27  1.2  glass  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     28  1.2  glass  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     29  1.2  glass  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     30  1.2  glass  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     31  1.2  glass  * SUCH DAMAGE.
     32  1.2  glass  *
     33  1.5    tls  * $NetBSD: ipcrm.c,v 1.5 1997/01/09 20:20:22 tls Exp $
     34  1.1    cgd  */
     35  1.1    cgd 
     36  1.1    cgd #include <stdio.h>
     37  1.2  glass #include <unistd.h>
     38  1.2  glass #include <err.h>
     39  1.2  glass #include <signal.h>
     40  1.1    cgd #include <sys/types.h>
     41  1.1    cgd #include <sys/ipc.h>
     42  1.2  glass #include <sys/msg.h>
     43  1.1    cgd #include <sys/sem.h>
     44  1.1    cgd #include <sys/shm.h>
     45  1.1    cgd 
     46  1.2  glass #define IPC_TO_STR(x) (x == 'Q' ? "msq" : (x == 'M' ? "shm" : "sem"))
     47  1.2  glass #define IPC_TO_STRING(x) (x == 'Q' ? "message queue" : \
     48  1.2  glass 	(x == 'M' ? "shared memory segment" : "semaphore"))
     49  1.2  glass 
     50  1.2  glass int signaled;
     51  1.2  glass 
     52  1.4  glass void usage()
     53  1.4  glass {
     54  1.4  glass         fprintf(stderr, "usage: ipcrm [ [-q msqid] [-m shmid] [-s semid]\n");
     55  1.4  glass 	fprintf(stderr, "        [-Q msgkey] [-M shmkey] [-S semkey] ...]\n");
     56  1.4  glass 	exit(1);
     57  1.4  glass }
     58  1.4  glass 
     59  1.2  glass int msgrm(key, id)
     60  1.2  glass     key_t key;
     61  1.2  glass     int id;
     62  1.2  glass {
     63  1.2  glass     if (key) {
     64  1.2  glass 	id = msgget(key, 0);
     65  1.2  glass 	if (id == -1)
     66  1.2  glass 	    return -1;
     67  1.2  glass     }
     68  1.2  glass     return msgctl(id, IPC_RMID, NULL);
     69  1.2  glass }
     70  1.1    cgd 
     71  1.2  glass int shmrm(key, id)
     72  1.2  glass     key_t key;
     73  1.2  glass     int id;
     74  1.1    cgd {
     75  1.2  glass     if (key) {
     76  1.2  glass 	id = shmget(key, 0, 0);
     77  1.2  glass 	if (id == -1)
     78  1.2  glass 	    return -1;
     79  1.2  glass     }
     80  1.2  glass     return shmctl(id, IPC_RMID, NULL);
     81  1.2  glass }
     82  1.1    cgd 
     83  1.2  glass int semrm(key, id)
     84  1.2  glass     key_t key;
     85  1.2  glass     int id;
     86  1.2  glass {
     87  1.2  glass     union semun arg;
     88  1.1    cgd 
     89  1.2  glass     if (key) {
     90  1.2  glass 	id = semget(key, 0, 0);
     91  1.2  glass 	if (id == -1)
     92  1.2  glass 	    return -1;
     93  1.2  glass     }
     94  1.2  glass     return semctl(id, 0, IPC_RMID, arg);
     95  1.1    cgd }
     96  1.1    cgd 
     97  1.2  glass void not_configured()
     98  1.1    cgd {
     99  1.2  glass     signaled++;
    100  1.2  glass }
    101  1.2  glass 
    102  1.2  glass int main(argc, argv)
    103  1.2  glass     int argc;
    104  1.2  glass     char *argv[];
    105  1.1    cgd 
    106  1.2  glass {
    107  1.2  glass     int c, result, errflg, target_id;
    108  1.2  glass     key_t target_key;
    109  1.1    cgd 
    110  1.2  glass     errflg = 0;
    111  1.2  glass     signal(SIGSYS, not_configured);
    112  1.2  glass     while ((c = getopt(argc, argv, ":q:m:s:Q:M:S:")) != -1) {
    113  1.2  glass 
    114  1.2  glass 	signaled = 0;
    115  1.2  glass 	switch (c) {
    116  1.2  glass 	case 'q':
    117  1.2  glass 	case 'm':
    118  1.2  glass 	case 's':
    119  1.2  glass 	    target_id = atoi(optarg);
    120  1.2  glass 	    if (c == 'q')
    121  1.2  glass 		result = msgrm(0, target_id);
    122  1.2  glass 	    else if (c == 'm')
    123  1.2  glass 		result = shmrm(0, target_id);
    124  1.2  glass 	    else
    125  1.2  glass 		result = semrm(0, target_id);
    126  1.2  glass 	    if (result < 0) {
    127  1.2  glass 		errflg++;
    128  1.2  glass 		if (!signaled)
    129  1.2  glass 		    warn("%sid(%d): ", IPC_TO_STR(toupper(c)), target_id);
    130  1.2  glass 		else
    131  1.2  glass 		    warnx("%ss are not configured in the running kernel",
    132  1.2  glass 			  IPC_TO_STRING(toupper(c)));
    133  1.2  glass 	    }
    134  1.2  glass 	    break;
    135  1.2  glass 	case 'Q':
    136  1.2  glass 	case 'M':
    137  1.2  glass 	case 'S':
    138  1.2  glass 	    target_key = atol(optarg);
    139  1.2  glass 	    if (target_key == IPC_PRIVATE) {
    140  1.2  glass 		warnx("can't remove private %ss", IPC_TO_STRING(c));
    141  1.2  glass 		continue;
    142  1.2  glass 	    }
    143  1.2  glass 	    if (c == 'Q')
    144  1.2  glass 		result = msgrm(target_key, 0);
    145  1.2  glass 	    else if (c == 'M')
    146  1.2  glass 		result = shmrm(target_key, 0);
    147  1.2  glass 	    else
    148  1.2  glass 		result = semrm(target_key, 0);
    149  1.2  glass 	    if (result < 0) {
    150  1.2  glass 		errflg++;
    151  1.2  glass 		if (!signaled)
    152  1.2  glass 		    warn("%key(%ld): ", IPC_TO_STR(c), target_key);
    153  1.2  glass 		else
    154  1.2  glass 		    warnx("%ss are not configured in the running kernel",
    155  1.2  glass 			  IPC_TO_STRING(c));
    156  1.2  glass 	    }
    157  1.2  glass 	    break;
    158  1.2  glass 	case ':':
    159  1.4  glass 	    fprintf(stderr, "option -%c requires an argument\n", optopt);
    160  1.4  glass 	    usage();
    161  1.2  glass 	case '?':
    162  1.4  glass 	    fprintf(stderr, "unrecognized option: -%c\n", optopt);
    163  1.4  glass 	    usage();
    164  1.1    cgd 	}
    165  1.2  glass     }
    166  1.4  glass 
    167  1.2  glass     if (optind != argc) {
    168  1.4  glass 	    fprintf(stderr, "unknown argument: %s\n", argv[optind]);
    169  1.4  glass 	    usage();
    170  1.2  glass     }
    171  1.2  glass     exit(errflg);
    172  1.1    cgd }
    173  1.2  glass 
    174