ipcrm.c revision 1.6 1 1.6 drochner /* $NetBSD: ipcrm.c,v 1.6 1997/09/09 11:06:31 drochner 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.6 drochner * $NetBSD: ipcrm.c,v 1.6 1997/09/09 11:06:31 drochner Exp $
34 1.1 cgd */
35 1.1 cgd
36 1.1 cgd #include <stdio.h>
37 1.6 drochner #include <stdlib.h>
38 1.2 glass #include <unistd.h>
39 1.6 drochner #include <ctype.h>
40 1.2 glass #include <err.h>
41 1.2 glass #include <signal.h>
42 1.1 cgd #include <sys/types.h>
43 1.1 cgd #include <sys/ipc.h>
44 1.2 glass #include <sys/msg.h>
45 1.1 cgd #include <sys/sem.h>
46 1.1 cgd #include <sys/shm.h>
47 1.1 cgd
48 1.2 glass #define IPC_TO_STR(x) (x == 'Q' ? "msq" : (x == 'M' ? "shm" : "sem"))
49 1.2 glass #define IPC_TO_STRING(x) (x == 'Q' ? "message queue" : \
50 1.2 glass (x == 'M' ? "shared memory segment" : "semaphore"))
51 1.2 glass
52 1.2 glass int signaled;
53 1.2 glass
54 1.6 drochner void usage __P((void));
55 1.6 drochner int msgrm __P((key_t, int));
56 1.6 drochner int shmrm __P((key_t, int));
57 1.6 drochner int semrm __P((key_t, int));
58 1.6 drochner void not_configured __P((void));
59 1.6 drochner int main __P((int, char *[]));
60 1.6 drochner
61 1.4 glass void usage()
62 1.4 glass {
63 1.4 glass fprintf(stderr, "usage: ipcrm [ [-q msqid] [-m shmid] [-s semid]\n");
64 1.4 glass fprintf(stderr, " [-Q msgkey] [-M shmkey] [-S semkey] ...]\n");
65 1.4 glass exit(1);
66 1.4 glass }
67 1.4 glass
68 1.2 glass int msgrm(key, id)
69 1.2 glass key_t key;
70 1.2 glass int id;
71 1.2 glass {
72 1.2 glass if (key) {
73 1.2 glass id = msgget(key, 0);
74 1.2 glass if (id == -1)
75 1.2 glass return -1;
76 1.2 glass }
77 1.2 glass return msgctl(id, IPC_RMID, NULL);
78 1.2 glass }
79 1.1 cgd
80 1.2 glass int shmrm(key, id)
81 1.2 glass key_t key;
82 1.2 glass int id;
83 1.1 cgd {
84 1.2 glass if (key) {
85 1.2 glass id = shmget(key, 0, 0);
86 1.2 glass if (id == -1)
87 1.2 glass return -1;
88 1.2 glass }
89 1.2 glass return shmctl(id, IPC_RMID, NULL);
90 1.2 glass }
91 1.1 cgd
92 1.2 glass int semrm(key, id)
93 1.2 glass key_t key;
94 1.2 glass int id;
95 1.2 glass {
96 1.2 glass union semun arg;
97 1.1 cgd
98 1.2 glass if (key) {
99 1.2 glass id = semget(key, 0, 0);
100 1.2 glass if (id == -1)
101 1.2 glass return -1;
102 1.2 glass }
103 1.2 glass return semctl(id, 0, IPC_RMID, arg);
104 1.1 cgd }
105 1.1 cgd
106 1.2 glass void not_configured()
107 1.1 cgd {
108 1.2 glass signaled++;
109 1.2 glass }
110 1.2 glass
111 1.2 glass int main(argc, argv)
112 1.2 glass int argc;
113 1.2 glass char *argv[];
114 1.1 cgd
115 1.2 glass {
116 1.2 glass int c, result, errflg, target_id;
117 1.2 glass key_t target_key;
118 1.1 cgd
119 1.2 glass errflg = 0;
120 1.6 drochner signal(SIGSYS, (void (*) __P((int)))not_configured);
121 1.2 glass while ((c = getopt(argc, argv, ":q:m:s:Q:M:S:")) != -1) {
122 1.2 glass
123 1.2 glass signaled = 0;
124 1.2 glass switch (c) {
125 1.2 glass case 'q':
126 1.2 glass case 'm':
127 1.2 glass case 's':
128 1.2 glass target_id = atoi(optarg);
129 1.2 glass if (c == 'q')
130 1.2 glass result = msgrm(0, target_id);
131 1.2 glass else if (c == 'm')
132 1.2 glass result = shmrm(0, target_id);
133 1.2 glass else
134 1.2 glass result = semrm(0, target_id);
135 1.2 glass if (result < 0) {
136 1.2 glass errflg++;
137 1.2 glass if (!signaled)
138 1.2 glass warn("%sid(%d): ", IPC_TO_STR(toupper(c)), target_id);
139 1.2 glass else
140 1.2 glass warnx("%ss are not configured in the running kernel",
141 1.2 glass IPC_TO_STRING(toupper(c)));
142 1.2 glass }
143 1.2 glass break;
144 1.2 glass case 'Q':
145 1.2 glass case 'M':
146 1.2 glass case 'S':
147 1.2 glass target_key = atol(optarg);
148 1.2 glass if (target_key == IPC_PRIVATE) {
149 1.2 glass warnx("can't remove private %ss", IPC_TO_STRING(c));
150 1.2 glass continue;
151 1.2 glass }
152 1.2 glass if (c == 'Q')
153 1.2 glass result = msgrm(target_key, 0);
154 1.2 glass else if (c == 'M')
155 1.2 glass result = shmrm(target_key, 0);
156 1.2 glass else
157 1.2 glass result = semrm(target_key, 0);
158 1.2 glass if (result < 0) {
159 1.2 glass errflg++;
160 1.2 glass if (!signaled)
161 1.6 drochner warn("%skey(%ld): ", IPC_TO_STR(c), target_key);
162 1.2 glass else
163 1.2 glass warnx("%ss are not configured in the running kernel",
164 1.2 glass IPC_TO_STRING(c));
165 1.2 glass }
166 1.2 glass break;
167 1.2 glass case ':':
168 1.4 glass fprintf(stderr, "option -%c requires an argument\n", optopt);
169 1.4 glass usage();
170 1.2 glass case '?':
171 1.4 glass fprintf(stderr, "unrecognized option: -%c\n", optopt);
172 1.4 glass usage();
173 1.1 cgd }
174 1.2 glass }
175 1.4 glass
176 1.2 glass if (optind != argc) {
177 1.4 glass fprintf(stderr, "unknown argument: %s\n", argv[optind]);
178 1.4 glass usage();
179 1.2 glass }
180 1.2 glass exit(errflg);
181 1.1 cgd }
182 1.2 glass
183