From 6eb1e416743c597f8ecd3b595ddb00d3aa42c1f4 Mon Sep 17 00:00:00 2001 From: Rob Landley Date: Mon, 20 Jun 2005 04:30:36 +0000 Subject: Rodney Radford submitted ipcs and ipcrm (system V IPC stuff). They could use some more work to shrink them down. --- util-linux/ipcs.c | 686 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 686 insertions(+) create mode 100644 util-linux/ipcs.c (limited to 'util-linux/ipcs.c') diff --git a/util-linux/ipcs.c b/util-linux/ipcs.c new file mode 100644 index 0000000..23759ee --- /dev/null +++ b/util-linux/ipcs.c @@ -0,0 +1,686 @@ +/* + * ipcs.c -- provides information on allocated ipc resources. + * + * 01 Sept 2004 - Rodney Radford + * Adapted for busybox from util-linux-2.12a. + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2 of the License, or + * (at your option) any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + * General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this program; if not, write to the Free Software + * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * + * --- Pre-busybox history from util-linux-2.12a ------------------------ + * + * 1999-02-22 Arkadiusz Mi˙kiewicz + * - added Native Language Support + * + * Patched to display the key field -- hy@picksys.com 12/18/96 + * + * Patch from arnolds@ifns.de (Heinz-Ado Arnolds) applied Mon Jul 1 + * 19:30:41 1996 by janl@math.uio.no to add code missing in case PID: + * clauses. + * + * Patches from Mike Jagdis (jaggy@purplet.demon.co.uk) applied + * Wed Feb 8 12:12:21 1995 by faith@cs.unc.edu to print numeric uids + * if no passwd file entry. + * + * Modified Sat Oct 9 10:55:28 1993 for 0.99.13 + * Original author unknown, may be "krishna balasub@cis.ohio-state.edu" + * + */ + +#include +#include +#include +#include +#include +#include +#include + +/* X/OPEN tells us to use for semctl() */ +/* X/OPEN tells us to use for msgctl() */ +/* X/OPEN tells us to use for shmctl() */ +#include +#include +#include +#include +#include + +#include "busybox.h" + +/*-------------------------------------------------------------------*/ +/* SHM_DEST and SHM_LOCKED are defined in kernel headers, + but inside #ifdef __KERNEL__ ... #endif */ +#ifndef SHM_DEST +/* shm_mode upper byte flags */ +#define SHM_DEST 01000 /* segment will be destroyed on last detach */ +#define SHM_LOCKED 02000 /* segment will not be swapped */ +#endif + +/* For older kernels the same holds for the defines below */ +#ifndef MSG_STAT +#define MSG_STAT 11 +#define MSG_INFO 12 +#endif + +#ifndef SHM_STAT +#define SHM_STAT 13 +#define SHM_INFO 14 +struct shm_info { + int used_ids; + ulong shm_tot; /* total allocated shm */ + ulong shm_rss; /* total resident shm */ + ulong shm_swp; /* total swapped shm */ + ulong swap_attempts; + ulong swap_successes; +}; +#endif + +#ifndef SEM_STAT +#define SEM_STAT 18 +#define SEM_INFO 19 +#endif + +/* Some versions of libc only define IPC_INFO when __USE_GNU is defined. */ +#ifndef IPC_INFO +#define IPC_INFO 3 +#endif +/*-------------------------------------------------------------------*/ + +/* The last arg of semctl is a union semun, but where is it defined? + X/OPEN tells us to define it ourselves, but until recently + Linux include files would also define it. */ +#if defined (__GNU_LIBRARY__) && !defined(_SEM_SEMUN_UNDEFINED) +/* union semun is defined by including */ +#else +/* according to X/OPEN we have to define it ourselves */ +union semun { + int val; + struct semid_ds *buf; + unsigned short int *array; + struct seminfo *__buf; +}; +#endif + +/* X/OPEN (Jan 1987) does not define fields key, seq in struct ipc_perm; + libc 4/5 does not mention struct ipc_term at all, but includes + , which defines a struct ipc_perm with such fields. + glibc-1.09 has no support for sysv ipc. + glibc 2 uses __key, __seq */ +#if defined (__GNU_LIBRARY__) && __GNU_LIBRARY__ > 1 +#define KEY __key +#else +#define KEY key +#endif + +#define LIMITS 1 +#define STATUS 2 +#define CREATOR 3 +#define TIME 4 +#define PID 5 + +void do_shm (char format); +void do_sem (char format); +void do_msg (char format); +void print_shm (int id); +void print_msg (int id); +void print_sem (int id); + +int ipcs_main (int argc, char **argv) { + int opt, msg = 0, sem = 0, shm = 0, id=0, print=0; + char format = 0; + char options[] = "atclupsmqi:ih?"; + + while ((opt = getopt (argc, argv, options)) != -1) { + switch (opt) { + case 'i': + id = atoi (optarg); + print = 1; + break; + case 'a': + msg = shm = sem = 1; + break; + case 'q': + msg = 1; + break; + case 's': + sem = 1; + break; + case 'm': + shm = 1; + break; + case 't': + format = TIME; + break; + case 'c': + format = CREATOR; + break; + case 'p': + format = PID; + break; + case 'l': + format = LIMITS; + break; + case 'u': + format = STATUS; + break; + case 'h': + case '?': + bb_show_usage(); + bb_fflush_stdout_and_exit (0); + } + } + + if (print) { + if (shm) { + print_shm (id); + bb_fflush_stdout_and_exit (0); + } + if (sem) { + print_sem (id); + bb_fflush_stdout_and_exit (0); + } + if (msg) { + print_msg (id); + bb_fflush_stdout_and_exit (0); + } + bb_show_usage(); + bb_fflush_stdout_and_exit (0); + } + + if ( !shm && !msg && !sem) + msg = sem = shm = 1; + bb_printf ("\n"); + + if (shm) { + do_shm (format); + bb_printf ("\n"); + } + if (sem) { + do_sem (format); + bb_printf ("\n"); + } + if (msg) { + do_msg (format); + bb_printf ("\n"); + } + return 0; +} + + +static void +print_perms (int id, struct ipc_perm *ipcp) { + struct passwd *pw; + struct group *gr; + + bb_printf ("%-10d %-10o", id, ipcp->mode & 0777); + + if ((pw = getpwuid(ipcp->cuid))) + bb_printf(" %-10s", pw->pw_name); + else + bb_printf(" %-10d", ipcp->cuid); + if ((gr = getgrgid(ipcp->cgid))) + bb_printf(" %-10s", gr->gr_name); + else + bb_printf(" %-10d", ipcp->cgid); + + if ((pw = getpwuid(ipcp->uid))) + bb_printf(" %-10s", pw->pw_name); + else + bb_printf(" %-10d", ipcp->uid); + if ((gr = getgrgid(ipcp->gid))) + bb_printf(" %-10s\n", gr->gr_name); + else + bb_printf(" %-10d\n", ipcp->gid); +} + + +void do_shm (char format) +{ + int maxid, shmid, id; + struct shmid_ds shmseg; + struct shm_info shm_info; + struct shminfo shminfo; + struct ipc_perm *ipcp = &shmseg.shm_perm; + struct passwd *pw; + + maxid = shmctl (0, SHM_INFO, (struct shmid_ds *) (void *) &shm_info); + if (maxid < 0) { + bb_printf ("kernel not configured for shared memory\n"); + return; + } + + switch (format) { + case LIMITS: + bb_printf ("------ Shared Memory Limits --------\n"); + if ((shmctl (0, IPC_INFO, (struct shmid_ds *) (void *) &shminfo)) < 0 ) + return; + /* glibc 2.1.3 and all earlier libc's have ints as fields + of struct shminfo; glibc 2.1.91 has unsigned long; ach */ + bb_printf ("max number of segments = %lu\n", + (unsigned long) shminfo.shmmni); + bb_printf ("max seg size (kbytes) = %lu\n", + (unsigned long) (shminfo.shmmax >> 10)); + bb_printf ("max total shared memory (pages) = %lu\n", + (unsigned long) shminfo.shmall); + bb_printf ("min seg size (bytes) = %lu\n", + (unsigned long) shminfo.shmmin); + return; + + case STATUS: + bb_printf ("------ Shared Memory Status --------\n"); + bb_printf ("segments allocated %d\n", shm_info.used_ids); + bb_printf ("pages allocated %ld\n", shm_info.shm_tot); + bb_printf ("pages resident %ld\n", shm_info.shm_rss); + bb_printf ("pages swapped %ld\n", shm_info.shm_swp); + bb_printf ("Swap performance: %ld attempts\t %ld successes\n", + shm_info.swap_attempts, shm_info.swap_successes); + return; + + case CREATOR: + bb_printf ("------ Shared Memory Segment Creators/Owners --------\n"); + bb_printf ("%-10s %-10s %-10s %-10s %-10s %-10s\n", + "shmid","perms","cuid","cgid","uid","gid"); + break; + + case TIME: + bb_printf ("------ Shared Memory Attach/Detach/Change Times --------\n"); + bb_printf ("%-10s %-10s %-20s %-20s %-20s\n", + "shmid","owner","attached","detached","changed"); + break; + + case PID: + bb_printf ("------ Shared Memory Creator/Last-op --------\n"); + bb_printf ("%-10s %-10s %-10s %-10s\n", + "shmid","owner","cpid","lpid"); + break; + + default: + bb_printf ("------ Shared Memory Segments --------\n"); + bb_printf ("%-10s %-10s %-10s %-10s %-10s %-10s %-12s\n", + "key","shmid","owner","perms","bytes","nattch","status"); + break; + } + + for (id = 0; id <= maxid; id++) { + shmid = shmctl (id, SHM_STAT, &shmseg); + if (shmid < 0) + continue; + if (format == CREATOR) { + print_perms (shmid, ipcp); + continue; + } + pw = getpwuid(ipcp->uid); + switch (format) { + case TIME: + if (pw) + bb_printf ("%-10d %-10.10s", shmid, pw->pw_name); + else + bb_printf ("%-10d %-10d", shmid, ipcp->uid); + /* ctime uses static buffer: use separate calls */ + bb_printf(" %-20.16s", shmseg.shm_atime + ? ctime(&shmseg.shm_atime) + 4 : "Not set"); + bb_printf(" %-20.16s", shmseg.shm_dtime + ? ctime(&shmseg.shm_dtime) + 4 : "Not set"); + bb_printf(" %-20.16s\n", shmseg.shm_ctime + ? ctime(&shmseg.shm_ctime) + 4 : "Not set"); + break; + case PID: + if (pw) + bb_printf ("%-10d %-10.10s", shmid, pw->pw_name); + else + bb_printf ("%-10d %-10d", shmid, ipcp->uid); + bb_printf (" %-10d %-10d\n", + shmseg.shm_cpid, shmseg.shm_lpid); + break; + + default: + bb_printf("0x%08x ",ipcp->KEY ); + if (pw) + bb_printf ("%-10d %-10.10s", shmid, pw->pw_name); + else + bb_printf ("%-10d %-10d", shmid, ipcp->uid); + bb_printf ("%-10o %-10lu %-10ld %-6s %-6s\n", + ipcp->mode & 0777, + /* + * earlier: int, Austin has size_t + */ + (unsigned long) shmseg.shm_segsz, + /* + * glibc-2.1.3 and earlier has unsigned short; + * Austin has shmatt_t + */ + (long) shmseg.shm_nattch, + ipcp->mode & SHM_DEST ? "dest" : " ", + ipcp->mode & SHM_LOCKED ? "locked" : " "); + break; + } + } + return; +} + + +void do_sem (char format) +{ + int maxid, semid, id; + struct semid_ds semary; + struct seminfo seminfo; + struct ipc_perm *ipcp = &semary.sem_perm; + struct passwd *pw; + union semun arg; + + arg.array = (ushort *) (void *) &seminfo; + maxid = semctl (0, 0, SEM_INFO, arg); + if (maxid < 0) { + bb_printf ("kernel not configured for semaphores\n"); + return; + } + + switch (format) { + case LIMITS: + bb_printf ("------ Semaphore Limits --------\n"); + arg.array = (ushort *) (void *) &seminfo; /* damn union */ + if ((semctl (0, 0, IPC_INFO, arg)) < 0 ) + return; + bb_printf ("max number of arrays = %d\n", seminfo.semmni); + bb_printf ("max semaphores per array = %d\n", seminfo.semmsl); + bb_printf ("max semaphores system wide = %d\n", seminfo.semmns); + bb_printf ("max ops per semop call = %d\n", seminfo.semopm); + bb_printf ("semaphore max value = %d\n", seminfo.semvmx); + return; + + case STATUS: + bb_printf ("------ Semaphore Status --------\n"); + bb_printf ("used arrays = %d\n", seminfo.semusz); + bb_printf ("allocated semaphores = %d\n", seminfo.semaem); + return; + + case CREATOR: + bb_printf ("------ Semaphore Arrays Creators/Owners --------\n"); + bb_printf ("%-10s %-10s %-10s %-10s %-10s %-10s\n", + "semid","perms","cuid","cgid","uid","gid"); + break; + + case TIME: + bb_printf ("------ Shared Memory Operation/Change Times --------\n"); + bb_printf ("%-8s %-10s %-26.24s %-26.24s\n", + "shmid","owner","last-op","last-changed"); + break; + + case PID: + break; + + default: + bb_printf ("------ Semaphore Arrays --------\n"); + bb_printf ("%-10s %-10s %-10s %-10s %-10s\n", + "key","semid","owner","perms","nsems"); + break; + } + + for (id = 0; id <= maxid; id++) { + arg.buf = (struct semid_ds *) &semary; + semid = semctl (id, 0, SEM_STAT, arg); + if (semid < 0) + continue; + if (format == CREATOR) { + print_perms (semid, ipcp); + continue; + } + pw = getpwuid(ipcp->uid); + switch (format) { + case TIME: + if (pw) + bb_printf ("%-8d %-10.10s", semid, pw->pw_name); + else + bb_printf ("%-8d %-10d", semid, ipcp->uid); + bb_printf (" %-26.24s", semary.sem_otime + ? ctime(&semary.sem_otime) : "Not set"); + bb_printf (" %-26.24s\n", semary.sem_ctime + ? ctime(&semary.sem_ctime) : "Not set"); + break; + case PID: + break; + + default: + bb_printf("0x%08x ", ipcp->KEY); + if (pw) + bb_printf ("%-10d %-10.9s", semid, pw->pw_name); + else + bb_printf ("%-10d %-9d", semid, ipcp->uid); + bb_printf ("%-10o %-10ld\n", + ipcp->mode & 0777, + /* + * glibc-2.1.3 and earlier has unsigned short; + * glibc-2.1.91 has variation between + * unsigned short and unsigned long + * Austin prescribes unsigned short. + */ + (long) semary.sem_nsems); + break; + } + } +} + + +void do_msg (char format) +{ + int maxid, msqid, id; + struct msqid_ds msgque; + struct msginfo msginfo; + struct ipc_perm *ipcp = &msgque.msg_perm; + struct passwd *pw; + + maxid = msgctl (0, MSG_INFO, (struct msqid_ds *) (void *) &msginfo); + if (maxid < 0) { + bb_printf ("kernel not configured for message queues\n"); + return; + } + + switch (format) { + case LIMITS: + if ((msgctl (0, IPC_INFO, (struct msqid_ds *) (void *) &msginfo)) < 0 ) + return; + bb_printf ("------ Messages: Limits --------\n"); + bb_printf ("max queues system wide = %d\n", msginfo.msgmni); + bb_printf ("max size of message (bytes) = %d\n", msginfo.msgmax); + bb_printf ("default max size of queue (bytes) = %d\n", msginfo.msgmnb); + return; + + case STATUS: + bb_printf ("------ Messages: Status --------\n"); + bb_printf ("allocated queues = %d\n", msginfo.msgpool); + bb_printf ("used headers = %d\n", msginfo.msgmap); + bb_printf ("used space = %d bytes\n", msginfo.msgtql); + return; + + case CREATOR: + bb_printf ("------ Message Queues: Creators/Owners --------\n"); + bb_printf ("%-10s %-10s %-10s %-10s %-10s %-10s\n", + "msqid","perms","cuid","cgid","uid","gid"); + break; + + case TIME: + bb_printf ("------ Message Queues Send/Recv/Change Times --------\n"); + bb_printf ("%-8s %-10s %-20s %-20s %-20s\n", + "msqid","owner","send","recv","change"); + break; + + case PID: + bb_printf ("------ Message Queues PIDs --------\n"); + bb_printf ("%-10s %-10s %-10s %-10s\n", + "msqid","owner","lspid","lrpid"); + break; + + default: + bb_printf ("------ Message Queues --------\n"); + bb_printf ("%-10s %-10s %-10s %-10s %-12s %-12s\n", + "key", "msqid", "owner", "perms","used-bytes", "messages"); + break; + } + + for (id = 0; id <= maxid; id++) { + msqid = msgctl (id, MSG_STAT, &msgque); + if (msqid < 0) + continue; + if (format == CREATOR) { + print_perms (msqid, ipcp); + continue; + } + pw = getpwuid(ipcp->uid); + switch (format) { + case TIME: + if (pw) + bb_printf ("%-8d %-10.10s", msqid, pw->pw_name); + else + bb_printf ("%-8d %-10d", msqid, ipcp->uid); + bb_printf (" %-20.16s", msgque.msg_stime + ? ctime(&msgque.msg_stime) + 4 : "Not set"); + bb_printf (" %-20.16s", msgque.msg_rtime + ? ctime(&msgque.msg_rtime) + 4 : "Not set"); + bb_printf (" %-20.16s\n", msgque.msg_ctime + ? ctime(&msgque.msg_ctime) + 4 : "Not set"); + break; + case PID: + if (pw) + bb_printf ("%-8d %-10.10s", msqid, pw->pw_name); + else + bb_printf ("%-8d %-10d", msqid, ipcp->uid); + bb_printf (" %5d %5d\n", + msgque.msg_lspid, msgque.msg_lrpid); + break; + + default: + bb_printf( "0x%08x ",ipcp->KEY ); + if (pw) + bb_printf ("%-10d %-10.10s", msqid, pw->pw_name); + else + bb_printf ("%-10d %-10d", msqid, ipcp->uid); + bb_printf (" %-10o %-12ld %-12ld\n", + ipcp->mode & 0777, + /* + * glibc-2.1.3 and earlier has unsigned short; + * glibc-2.1.91 has variation between + * unsigned short, unsigned long + * Austin has msgqnum_t + */ + (long) msgque.msg_cbytes, + (long) msgque.msg_qnum); + break; + } + } + return; +} + + +void print_shm (int shmid) +{ + struct shmid_ds shmds; + struct ipc_perm *ipcp = &shmds.shm_perm; + + if (shmctl (shmid, IPC_STAT, &shmds) == -1) { + perror ("shmctl "); + return; + } + + bb_printf ("\nShared memory Segment shmid=%d\n", shmid); + bb_printf ("uid=%d\tgid=%d\tcuid=%d\tcgid=%d\n", + ipcp->uid, ipcp->gid, ipcp->cuid, ipcp->cgid); + bb_printf ("mode=%#o\taccess_perms=%#o\n", + ipcp->mode, ipcp->mode & 0777); + bb_printf ("bytes=%ld\tlpid=%d\tcpid=%d\tnattch=%ld\n", + (long) shmds.shm_segsz, shmds.shm_lpid, shmds.shm_cpid, + (long) shmds.shm_nattch); + bb_printf ("att_time=%-26.24s\n", + shmds.shm_atime ? ctime (&shmds.shm_atime) : "Not set"); + bb_printf ("det_time=%-26.24s\n", + shmds.shm_dtime ? ctime (&shmds.shm_dtime) : "Not set"); + bb_printf ("change_time=%-26.24s\n", ctime (&shmds.shm_ctime)); + bb_printf ("\n"); + return; +} + + +void print_msg (int msqid) +{ + struct msqid_ds buf; + struct ipc_perm *ipcp = &buf.msg_perm; + + if (msgctl (msqid, IPC_STAT, &buf) == -1) { + perror ("msgctl "); + return; + } + + bb_printf ("\nMessage Queue msqid=%d\n", msqid); + bb_printf ("uid=%d\tgid=%d\tcuid=%d\tcgid=%d\tmode=%#o\n", + ipcp->uid, ipcp->gid, ipcp->cuid, ipcp->cgid, ipcp->mode); + bb_printf ("cbytes=%ld\tqbytes=%ld\tqnum=%ld\tlspid=%d\tlrpid=%d\n", + /* + * glibc-2.1.3 and earlier has unsigned short; + * glibc-2.1.91 has variation between + * unsigned short, unsigned long + * Austin has msgqnum_t (for msg_qbytes) + */ + (long) buf.msg_cbytes, (long) buf.msg_qbytes, + (long) buf.msg_qnum, buf.msg_lspid, buf.msg_lrpid); + bb_printf ("send_time=%-26.24s\n", + buf.msg_stime ? ctime (&buf.msg_stime) : "Not set"); + bb_printf ("rcv_time=%-26.24s\n", + buf.msg_rtime ? ctime (&buf.msg_rtime) : "Not set"); + bb_printf ("change_time=%-26.24s\n", + buf.msg_ctime ? ctime (&buf.msg_ctime) : "Not set"); + bb_printf ("\n"); + return; +} + +void print_sem (int semid) +{ + struct semid_ds semds; + struct ipc_perm *ipcp = &semds.sem_perm; + union semun arg; + int i; + + arg.buf = &semds; + if (semctl (semid, 0, IPC_STAT, arg) < 0) { + perror ("semctl "); + return; + } + + bb_printf ("\nSemaphore Array semid=%d\n", semid); + bb_printf ("uid=%d\t gid=%d\t cuid=%d\t cgid=%d\n", + ipcp->uid, ipcp->gid, ipcp->cuid, ipcp->cgid); + bb_printf ("mode=%#o, access_perms=%#o\n", + ipcp->mode, ipcp->mode & 0777); + bb_printf ("nsems = %ld\n", (long) semds.sem_nsems); + bb_printf ("otime = %-26.24s\n", + semds.sem_otime ? ctime (&semds.sem_otime) : "Not set"); + bb_printf ("ctime = %-26.24s\n", ctime (&semds.sem_ctime)); + + bb_printf ("%-10s %-10s %-10s %-10s %-10s\n", + "semnum","value","ncount","zcount","pid"); + + arg.val = 0; + for (i=0; i< semds.sem_nsems; i++) { + int val, ncnt, zcnt, pid; + val = semctl (semid, i, GETVAL, arg); + ncnt = semctl (semid, i, GETNCNT, arg); + zcnt = semctl (semid, i, GETZCNT, arg); + pid = semctl (semid, i, GETPID, arg); + if (val < 0 || ncnt < 0 || zcnt < 0 || pid < 0) { + perror ("semctl "); + bb_fflush_stdout_and_exit (1); + } + bb_printf ("%-10d %-10d %-10d %-10d %-10d\n", + i, val, ncnt, zcnt, pid); + } + bb_printf ("\n"); + return; +} -- cgit v1.1