/* $OpenBSD: ipcs.c,v 1.8 1998/07/08 22:14:13 deraadt Exp $ */ /* $NetBSD: ipcs.c,v 1.10.6.1 1996/06/07 01:53:47 thorpej Exp $ */ /* * Copyright (c) 1994 SigmaSoft, Th. Lockert * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by SigmaSoft, Th. Lockert. * 4. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ #include #include #include #include #define _KERNEL #include #include #include #include #undef _KERNEL #include #include #include #include #include #include #include #include #include #include int semconfig __P((int, ...)); void usage __P((void)); extern char *__progname; /* from crt0.o */ static struct nlist symbols[] = { {"_sema"}, #define X_SEMA 0 {"_seminfo"}, #define X_SEMINFO 1 {"_semu"}, #define X_SEMU 2 {"_msginfo"}, #define X_MSGINFO 3 {"_msqids"}, #define X_MSQIDS 4 {"_shminfo"}, #define X_SHMINFO 5 {"_shmsegs"}, #define X_SHMSEGS 6 {NULL} }; static kvm_t *kd; char * fmt_perm(mode) u_short mode; { static char buffer[100]; buffer[0] = '-'; buffer[1] = '-'; buffer[2] = ((mode & 0400) ? 'r' : '-'); buffer[3] = ((mode & 0200) ? 'w' : '-'); buffer[4] = ((mode & 0100) ? 'a' : '-'); buffer[5] = ((mode & 0040) ? 'r' : '-'); buffer[6] = ((mode & 0020) ? 'w' : '-'); buffer[7] = ((mode & 0010) ? 'a' : '-'); buffer[8] = ((mode & 0004) ? 'r' : '-'); buffer[9] = ((mode & 0002) ? 'w' : '-'); buffer[10] = ((mode & 0001) ? 'a' : '-'); buffer[11] = '\0'; return (&buffer[0]); } void cvt_time(t, buf) time_t t; char *buf; { struct tm *tm; if (t == 0) { strcpy(buf, "no-entry"); } else { tm = localtime(&t); sprintf(buf, "%2d:%02d:%02d", tm->tm_hour, tm->tm_min, tm->tm_sec); } } #define SHMINFO 1 #define SHMTOTAL 2 #define MSGINFO 4 #define MSGTOTAL 8 #define SEMINFO 16 #define SEMTOTAL 32 #define BIGGEST 1 #define CREATOR 2 #define OUTSTANDING 4 #define PID 8 #define TIME 16 int main(argc, argv) int argc; char *argv[]; { int display = SHMINFO | MSGINFO | SEMINFO; int option = 0; char *core = NULL, *namelist = NULL; char errbuf[_POSIX2_LINE_MAX]; int i; while ((i = getopt(argc, argv, "MmQqSsabC:cN:optT")) != -1) switch (i) { case 'M': display = SHMTOTAL; break; case 'm': display = SHMINFO; break; case 'Q': display = MSGTOTAL; break; case 'q': display = MSGINFO; break; case 'S': display = SEMTOTAL; break; case 's': display = SEMINFO; break; case 'T': display = SHMTOTAL | MSGTOTAL | SEMTOTAL; break; case 'a': option |= BIGGEST | CREATOR | OUTSTANDING | PID | TIME; break; case 'b': option |= BIGGEST; break; case 'C': core = optarg; break; case 'c': option |= CREATOR; break; case 'N': namelist = optarg; break; case 'o': option |= OUTSTANDING; break; case 'p': option |= PID; break; case 't': option |= TIME; break; default: usage(); } /* * Discard setgid privileges if not the running kernel so that bad * guys can't print interesting stuff from kernel memory. */ if (namelist != NULL || core != NULL) { setegid(getgid()); setgid(getgid()); } if ((kd = kvm_open(namelist, core, NULL, O_RDONLY, "ipcs")) == NULL) exit(1); setegid(getgid()); setgid(getgid()); switch (kvm_nlist(kd, symbols)) { case 0: break; case -1: errx(1, "unable to read kernel symbol table."); default: #ifdef notdef /* they'll be told more civilly later */ warnx("nlist failed"); for (i = 0; symbols[i].n_name != NULL; i++) if (symbols[i].n_value == 0) warnx("symbol %s not found", symbols[i].n_name); break; #endif } if ((display & (MSGINFO | MSGTOTAL)) && (kvm_read(kd, symbols[X_MSGINFO].n_value, &msginfo, sizeof(msginfo)) == sizeof(msginfo))) { if (display & MSGTOTAL) { printf("msginfo:\n"); printf("\tmsgmax: %6d\t(max characters in a message)\n", msginfo.msgmax); printf("\tmsgmni: %6d\t(# of message queues)\n", msginfo.msgmni); printf("\tmsgmnb: %6d\t(max characters in a message queue)\n", msginfo.msgmnb); printf("\tmsgtql: %6d\t(max # of messages in system)\n", msginfo.msgtql); printf("\tmsgssz: %6d\t(size of a message segment)\n", msginfo.msgssz); printf("\tmsgseg: %6d\t(# of message segments in system)\n\n", msginfo.msgseg); } if (display & MSGINFO) { struct msqid_ds *xmsqids; if (kvm_read(kd, symbols[X_MSQIDS].n_value, &msqids, sizeof(msqids)) != sizeof(msqids)) errx(1, "kvm_read (%s): %s", symbols[X_MSQIDS].n_name, kvm_geterr(kd)); xmsqids = malloc(sizeof(struct msqid_ds) * msginfo.msgmni); if (kvm_read(kd, (u_long)msqids, xmsqids, sizeof(struct msqid_ds) * msginfo.msgmni) != sizeof(struct msqid_ds) * msginfo.msgmni) errx(1, "kvm_read (msqids): %s", kvm_geterr(kd)); printf("Message Queues:\n"); printf("T ID KEY MODE OWNER GROUP"); if (option & CREATOR) printf(" CREATOR CGROUP"); if (option & OUTSTANDING) printf(" CBYTES QNUM"); if (option & BIGGEST) printf(" QBYTES"); if (option & PID) printf(" LSPID LRPID"); if (option & TIME) printf(" STIME RTIME CTIME"); printf("\n"); for (i = 0; i < msginfo.msgmni; i += 1) { if (xmsqids[i].msg_qbytes != 0) { char stime_buf[100], rtime_buf[100], ctime_buf[100]; struct msqid_ds *msqptr = &xmsqids[i]; cvt_time(msqptr->msg_stime, stime_buf); cvt_time(msqptr->msg_rtime, rtime_buf); cvt_time(msqptr->msg_ctime, ctime_buf); printf("q %6d %10d %s %8s %8s", IXSEQ_TO_IPCID(i, msqptr->msg_perm), msqptr->msg_perm.key, fmt_perm(msqptr->msg_perm.mode), user_from_uid(msqptr->msg_perm.uid, 0), group_from_gid(msqptr->msg_perm.gid, 0)); if (option & CREATOR) printf(" %8s %8s", user_from_uid(msqptr->msg_perm.cuid, 0), group_from_gid(msqptr->msg_perm.cgid, 0)); if (option & OUTSTANDING) printf(" %6d %6d", msqptr->msg_cbytes, msqptr->msg_qnum); if (option & BIGGEST) printf(" %6d", msqptr->msg_qbytes); if (option & PID) printf(" %6d %6d", msqptr->msg_lspid, msqptr->msg_lrpid); if (option & TIME) printf("%s %s %s", stime_buf, rtime_buf, ctime_buf); printf("\n"); } } printf("\n"); } } else if (display & (MSGINFO | MSGTOTAL)) { fprintf(stderr, "SVID messages facility not configured in the system\n"); } if ((display & (SHMINFO | SHMTOTAL)) && (kvm_read(kd, symbols[X_SHMINFO].n_value, &shminfo, sizeof(shminfo)) == sizeof(shminfo))) { if (display & SHMTOTAL) { printf("shminfo:\n"); printf("\tshmmax: %7d\t(max shared memory segment size)\n", shminfo.shmmax); printf("\tshmmin: %7d\t(min shared memory segment size)\n", shminfo.shmmin); printf("\tshmmni: %7d\t(max number of shared memory identifiers)\n", shminfo.shmmni); printf("\tshmseg: %7d\t(max shared memory segments per process)\n", shminfo.shmseg); printf("\tshmall: %7d\t(max amount of shared memory in pages)\n\n", shminfo.shmall); } if (display & SHMINFO) { struct shmid_ds *xshmids; if (kvm_read(kd, symbols[X_SHMSEGS].n_value, &shmsegs, sizeof(shmsegs)) != sizeof(shmsegs)) errx(1, "kvm_read (%s): %s", symbols[X_SHMSEGS].n_name, kvm_geterr(kd)); xshmids = malloc(sizeof(struct shmid_ds) * shminfo.shmmni); if (kvm_read(kd, (u_long)shmsegs, xshmids, sizeof(struct shmid_ds) * shminfo.shmmni) != sizeof(struct shmid_ds) * shminfo.shmmni) errx(1, "kvm_read (shmsegs): %s", kvm_geterr(kd)); printf("Shared Memory:\n"); printf("T ID KEY MODE OWNER GROUP"); if (option & CREATOR) printf(" CREATOR CGROUP"); if (option & OUTSTANDING) printf(" NATTCH"); if (option & BIGGEST) printf(" SEGSZ"); if (option & PID) printf(" CPID LPID"); if (option & TIME) printf(" ATIME DTIME CTIME"); printf("\n"); for (i = 0; i < shminfo.shmmni; i += 1) { if (xshmids[i].shm_perm.mode & 0x0800) { char atime_buf[100], dtime_buf[100], ctime_buf[100]; struct shmid_ds *shmptr = &xshmids[i]; cvt_time(shmptr->shm_atime, atime_buf); cvt_time(shmptr->shm_dtime, dtime_buf); cvt_time(shmptr->shm_ctime, ctime_buf); printf("m %6d %10d %s %8s %8s", IXSEQ_TO_IPCID(i, shmptr->shm_perm), shmptr->shm_perm.key, fmt_perm(shmptr->shm_perm.mode), user_from_uid(shmptr->shm_perm.uid, 0), group_from_gid(shmptr->shm_perm.gid, 0)); if (option & CREATOR) printf(" %8s %8s", user_from_uid(shmptr->shm_perm.cuid, 0), group_from_gid(shmptr->shm_perm.cgid, 0)); if (option & OUTSTANDING) printf(" %6d", shmptr->shm_nattch); if (option & BIGGEST) printf(" %6d", shmptr->shm_segsz); if (option & PID) printf(" %6d %6d", shmptr->shm_cpid, shmptr->shm_lpid); if (option & TIME) printf("%s %s %s", atime_buf, dtime_buf, ctime_buf); printf("\n"); } } printf("\n"); } } else if (display & (SHMINFO | SHMTOTAL)) { fprintf(stderr, "SVID shared memory facility not configured in the system\n"); } if ((display & (SEMINFO | SEMTOTAL)) && (kvm_read(kd, symbols[X_SEMINFO].n_value, &seminfo, sizeof(seminfo)) == sizeof(seminfo))) { struct semid_ds *xsema; if (display & SEMTOTAL) { printf("seminfo:\n"); printf("\tsemmap: %6d\t(# of entries in semaphore map)\n", seminfo.semmap); printf("\tsemmni: %6d\t(# of semaphore identifiers)\n", seminfo.semmni); printf("\tsemmns: %6d\t(# of semaphores in system)\n", seminfo.semmns); printf("\tsemmnu: %6d\t(# of undo structures in system)\n", seminfo.semmnu); printf("\tsemmsl: %6d\t(max # of semaphores per id)\n", seminfo.semmsl); printf("\tsemopm: %6d\t(max # of operations per semop call)\n", seminfo.semopm); printf("\tsemume: %6d\t(max # of undo entries per process)\n", seminfo.semume); printf("\tsemusz: %6d\t(size in bytes of undo structure)\n", seminfo.semusz); printf("\tsemvmx: %6d\t(semaphore maximum value)\n", seminfo.semvmx); printf("\tsemaem: %6d\t(adjust on exit max value)\n\n", seminfo.semaem); } if (display & SEMINFO) { if (semconfig(SEM_CONFIG_FREEZE) != 0) { perror("semconfig"); fprintf(stderr, "Can't lock semaphore facility - winging it...\n"); } if (kvm_read(kd, symbols[X_SEMA].n_value, &sema, sizeof(sema)) != sizeof(sema)) errx(1, "kvm_read (%s): %s", symbols[X_SEMA].n_name, kvm_geterr(kd)); xsema = malloc(sizeof(struct semid_ds) * seminfo.semmni); if (kvm_read(kd, (u_long)sema, xsema, sizeof(struct semid_ds) * seminfo.semmni) != sizeof(struct semid_ds) * seminfo.semmni) errx(1, "kvm_read (sema): %s", kvm_geterr(kd)); printf("Semaphores:\n"); printf("T ID KEY MODE OWNER GROUP"); if (option & CREATOR) printf(" CREATOR CGROUP"); if (option & BIGGEST) printf(" NSEMS"); if (option & TIME) printf(" OTIME CTIME"); printf("\n"); for (i = 0; i < seminfo.semmni; i += 1) { if ((xsema[i].sem_perm.mode & SEM_ALLOC) != 0) { char ctime_buf[100], otime_buf[100]; struct semid_ds *semaptr = &xsema[i]; int j, value; union semun junk; cvt_time(semaptr->sem_otime, otime_buf); cvt_time(semaptr->sem_ctime, ctime_buf); printf("s %6d %10d %s %8s %8s", IXSEQ_TO_IPCID(i, semaptr->sem_perm), semaptr->sem_perm.key, fmt_perm(semaptr->sem_perm.mode), user_from_uid(semaptr->sem_perm.uid, 0), group_from_gid(semaptr->sem_perm.gid, 0)); if (option & CREATOR) printf(" %8s %8s", user_from_uid(semaptr->sem_perm.cuid, 0), group_from_gid(semaptr->sem_perm.cgid, 0)); if (option & BIGGEST) printf(" %6d", semaptr->sem_nsems); if (option & TIME) printf("%s %s", otime_buf, ctime_buf); printf("\n"); } } (void) semconfig(SEM_CONFIG_THAW); printf("\n"); } } else if (display & (SEMINFO | SEMTOTAL)) { fprintf(stderr, "SVID semaphores facility not configured in the system\n"); } kvm_close(kd); exit(0); } void usage() { fprintf(stderr, "usage: %s [-abcmopqst] [-C corefile] [-N namelist]\n", __progname); exit(1); }