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 33 static 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 53 int signaled; 54 55 void 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 63 int 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 75 int 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 87 int 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 101 void not_configured() 102 { 103 signaled++; 104 } 105 106 int 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