System V -style IPC removal utility. Implemented by Daniel Boulet
<danny@BouletFermat.ab.ca>. Needs a man page and serious cleanup. also: sysvshm support is #ifdef'd out, because it's not been tested.
This commit is contained in:
parent
0444b9fbd1
commit
3683d805ff
|
@ -0,0 +1,6 @@
|
|||
# $Id: Makefile,v 1.1 1993/11/14 16:27:58 cgd Exp $
|
||||
|
||||
PROG= ipcrm
|
||||
NOMAN=
|
||||
|
||||
.include <bsd.prog.mk>
|
|
@ -0,0 +1,214 @@
|
|||
/*
|
||||
* Implement the SYSV ipcrm command.
|
||||
*
|
||||
* $Id: ipcrm.c,v 1.1 1993/11/14 16:28:00 cgd Exp $
|
||||
*/
|
||||
|
||||
#include <stdio.h>
|
||||
#include <stdlib.h>
|
||||
#include <limits.h>
|
||||
#include <sys/types.h>
|
||||
#include <sys/ipc.h>
|
||||
#include <sys/sem.h>
|
||||
#include <sys/msg.h>
|
||||
#include <sys/shm.h>
|
||||
#include <errno.h>
|
||||
|
||||
#define OMIT_SHM /* don't handle shm stuff; untested */
|
||||
|
||||
int
|
||||
getnumber(char *num, long *lptr)
|
||||
{
|
||||
char *end;
|
||||
|
||||
if (num == NULL) {
|
||||
fprintf(stderr, "ipcrm: missing numeric parameter\n");
|
||||
return (0);
|
||||
}
|
||||
|
||||
*lptr = strtol(num, &end, 0);
|
||||
if (*num == '\0' || *end != '\0') {
|
||||
fprintf(stderr, "ipcrm: can't convert \"%s\" to an integer\n",
|
||||
num);
|
||||
return (0);
|
||||
}
|
||||
if (*lptr == LONG_MAX || *lptr == LONG_MIN) {
|
||||
fprintf(stderr, "ipcrm: absurd numeric parameter \"%s\"\n",
|
||||
num);
|
||||
return (0);
|
||||
}
|
||||
return (1);
|
||||
}
|
||||
|
||||
main(int argc, char **argv)
|
||||
{
|
||||
char *parm;
|
||||
char tbuf[10000];
|
||||
int errcnt = 0;
|
||||
long id;
|
||||
long key;
|
||||
|
||||
while ((parm = *++argv) != NULL) {
|
||||
|
||||
if (strcmp(parm, "-q") == 0) {
|
||||
if (getnumber(*++argv, &id)) {
|
||||
if (msgctl(id, IPC_RMID, NULL) == 0) {
|
||||
printf("msqid %s deleted\n", *argv);
|
||||
} else if (errno == ENOSYS) {
|
||||
fprintf(stderr, "ipcrm: SYSV message passing not configured in kernel\n");
|
||||
errcnt += 1;
|
||||
} else {
|
||||
strcpy(tbuf, "can't remove msqid ");
|
||||
strcat(tbuf, *argv);
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
} else {
|
||||
errcnt += 1;
|
||||
}
|
||||
} else if (strcmp(parm, "-m") == 0) {
|
||||
if (getnumber(*++argv, &id)) {
|
||||
#ifndef OMIT_SHM
|
||||
%%%untested %%%
|
||||
if (shmctl(id, IPC_RMID, NULL) == 0) {
|
||||
printf("shmid %s deleted\n", *argv);
|
||||
} else if (errno == ENOSYS) {
|
||||
fprintf(stderr, "ipcrm: SYSV shared memory not configured in kernel\n");
|
||||
errcnt += 1;
|
||||
} else {
|
||||
strcpy(tbuf, "can't remove shmid ");
|
||||
strcat(tbuf, *argv);
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
#else
|
||||
fprintf(stderr, "ipcrm: sorry, this version of ipcrm doesn't support shared memory\n");
|
||||
errcnt += 1;
|
||||
#endif
|
||||
} else {
|
||||
errcnt += 1;
|
||||
}
|
||||
} else if (strcmp(parm, "-s") == 0) {
|
||||
if (getnumber(*++argv, &id)) {
|
||||
union semun junk;
|
||||
|
||||
if (semctl(id, 0, IPC_RMID, junk) == 0) {
|
||||
printf("semid %s deleted\n", *argv);
|
||||
} else if (errno == ENOSYS) {
|
||||
fprintf(stderr, "ipcrm: SYSV semaphores not configured in kernel\n");
|
||||
errcnt += 1;
|
||||
} else {
|
||||
strcpy(tbuf, "can't remove semid ");
|
||||
strcat(tbuf, *argv);
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
} else {
|
||||
errcnt += 1;
|
||||
}
|
||||
} else if (strcmp(parm, "-Q") == 0) {
|
||||
if (getnumber(*++argv, &key)) {
|
||||
if (key == IPC_PRIVATE) {
|
||||
fprintf(stderr, "ipcrm: can't remove private message queues\n");
|
||||
} else {
|
||||
strcpy(tbuf, "can't access msq key ");
|
||||
strcat(tbuf, *argv);
|
||||
if ((id = msgget(key, 0000)) >= 0) {
|
||||
strcpy(tbuf,
|
||||
"can't remove msq key ");
|
||||
strcat(tbuf, *argv);
|
||||
if (msgctl(id, IPC_RMID, NULL)
|
||||
== 0) {
|
||||
printf("msq key %s deleted\n",
|
||||
*argv);
|
||||
} else {
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
} else if (errno == ENOSYS) {
|
||||
fprintf(stderr, "ipcrm: SYSV message passing not configured in kernel\n");
|
||||
errcnt += 1;
|
||||
} else {
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
}
|
||||
} else {
|
||||
errcnt += 1;
|
||||
}
|
||||
} else if (strcmp(parm, "-M") == 0) {
|
||||
if (getnumber(*++argv, &key)) {
|
||||
#ifndef OMIT_SHM
|
||||
%%%untested %%%
|
||||
if (key == IPC_PRIVATE) {
|
||||
fprintf(stderr, "ipcrm: can't remove private shared memory segments\n");
|
||||
} else {
|
||||
strcpy(tbuf, "can't access shm key ");
|
||||
strcat(tbuf, *argv);
|
||||
if ((id = shmget(key, 0, 0000)) >= 0) {
|
||||
strcpy(tbuf, "can't remove shm key ");
|
||||
strcat(tbuf, *argv);
|
||||
if (shmctl(id, IPC_RMID, NULL) == 0) {
|
||||
printf("shm key %s deleted\n",
|
||||
*argv);
|
||||
} else {
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
} else if (errno == ENOSYS) {
|
||||
fprintf(stderr, "ipcrm: SYSV shared memory not configured in kernel\n");
|
||||
errcnt += 1;
|
||||
} else {
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
}
|
||||
#else
|
||||
fprintf(stderr, "ipcrm: sorry, this version of ipcrm doesn't support shared memory\n");
|
||||
errcnt += 1;
|
||||
#endif
|
||||
} else {
|
||||
errcnt += 1;
|
||||
}
|
||||
} else if (strcmp(parm, "-S") == 0) {
|
||||
if (getnumber(*++argv, &key)) {
|
||||
if (key == IPC_PRIVATE) {
|
||||
fprintf(stderr, "ipcrm: can't remove private semaphores\n");
|
||||
} else {
|
||||
strcpy(tbuf, "can't access sem key ");
|
||||
strcat(tbuf, *argv);
|
||||
if ((id = semget(key, 0, 0000)) >= 0) {
|
||||
union semun junk;
|
||||
|
||||
strcpy(tbuf, "can't remove sem key ");
|
||||
strcat(tbuf, *argv);
|
||||
if (semctl(id, 0, IPC_RMID, junk) == 0) {
|
||||
printf("sem key %s deleted\n", *argv);
|
||||
} else {
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
} else if (errno == ENOSYS) {
|
||||
fprintf(stderr, "ipcrm: SYSV semaphores not configured in kernel\n");
|
||||
errcnt += 1;
|
||||
} else {
|
||||
perror(tbuf);
|
||||
errcnt += 1;
|
||||
}
|
||||
}
|
||||
} else {
|
||||
errcnt += 1;
|
||||
}
|
||||
} else {
|
||||
fprintf(stderr, "ipcrm: illegal parameter \"%s\" - bye!\n", parm);
|
||||
exit(1);
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
if (errcnt == 0) {
|
||||
exit(0);
|
||||
} else {
|
||||
exit(1);
|
||||
}
|
||||
}
|
Loading…
Reference in New Issue