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