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