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