1 /**	$MirOS: src/usr.bin/ipcs/ipcs.c,v 1.3 2005/11/23 17:36:16 tg Exp $ */
2 /*	$OpenBSD: ipcs.c,v 1.21 2005/02/22 14:47:45 jmc Exp $	*/
3 /*	$NetBSD: ipcs.c,v 1.25 2000/06/16 03:58:20 simonb Exp $	*/
4 
5 /*-
6  * Copyright (c) 2000 The NetBSD Foundation, Inc.
7  * All rights reserved.
8  *
9  * This code is derived from software contributed to The NetBSD Foundation
10  * by Simon Burge.
11  *
12  * Redistribution and use in source and binary forms, with or without
13  * modification, are permitted provided that the following conditions
14  * are met:
15  * 1. Redistributions of source code must retain the above copyright
16  *    notice, this list of conditions and the following disclaimer.
17  * 2. Redistributions in binary form must reproduce the above copyright
18  *    notice, this list of conditions and the following disclaimer in the
19  *    documentation and/or other materials provided with the distribution.
20  * 3. All advertising materials mentioning features or use of this software
21  *    must display the following acknowledgement:
22  *        This product includes software developed by the NetBSD
23  *        Foundation, Inc. and its contributors.
24  * 4. Neither the name of The NetBSD Foundation nor the names of its
25  *    contributors may be used to endorse or promote products derived
26  *    from this software without specific prior written permission.
27  *
28  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
29  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
30  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
31  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
32  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
33  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
34  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
35  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
36  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
37  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
38  * POSSIBILITY OF SUCH DAMAGE.
39  */
40 
41 /*
42  * Copyright (c) 1994 SigmaSoft, Th. Lockert <tholo@sigmasoft.com>
43  * All rights reserved.
44  *
45  * Redistribution and use in source and binary forms, with or without
46  * modification, are permitted provided that the following conditions
47  * are met:
48  * 1. Redistributions of source code must retain the above copyright
49  *    notice, this list of conditions and the following disclaimer.
50  * 2. Redistributions in binary form must reproduce the above copyright
51  *    notice, this list of conditions and the following disclaimer in the
52  *    documentation and/or other materials provided with the distribution.
53  *
54  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
55  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
56  * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
57  * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
58  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
59  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
60  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
61  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
62  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
63  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
64  */
65 
66 #include <sys/param.h>
67 #include <sys/sysctl.h>
68 #define _KERNEL			/* XXX */
69 #include <sys/ipc.h>
70 #include <sys/sem.h>
71 #include <sys/shm.h>
72 #include <sys/msg.h>
73 #undef _KERNEL
74 
75 #include <err.h>
76 #include <fcntl.h>
77 #include <grp.h>
78 #include <kvm.h>
79 #include <limits.h>
80 #include <nlist.h>
81 #include <paths.h>
82 #include <pwd.h>
83 #include <stdio.h>
84 #include <stdlib.h>
85 #include <string.h>
86 #include <time.h>
87 #include <unistd.h>
88 
89 void	cvt_time(time_t, char *, size_t);
90 char   *fmt_perm(mode_t);
91 void	ipcs_kvm(void);
92 int	main(int, char **);
93 void	msg_sysctl(void);
94 void	sem_sysctl(void);
95 void	shm_sysctl(void);
96 void	show_msginfo(time_t, time_t, time_t, int, key_t, mode_t, uid_t,
97 	    gid_t, uid_t, gid_t, u_long, u_long, u_long, pid_t, pid_t);
98 void	show_msginfo_hdr(void);
99 void	show_msgtotal(struct msginfo *);
100 void	show_seminfo_hdr(void);
101 void	show_seminfo(time_t, time_t, int, key_t, mode_t, uid_t, gid_t,
102 	    uid_t, gid_t, int16_t);
103 void	show_semtotal(struct seminfo *);
104 void	show_shminfo(time_t, time_t, time_t, int, key_t, mode_t, uid_t,
105 	    gid_t, uid_t, gid_t, u_int32_t, int, pid_t, pid_t);
106 void	show_shminfo_hdr(void);
107 void	show_shmtotal(struct shminfo *);
108 __dead	void usage(void);
109 
110 char *
fmt_perm(mode_t mode)111 fmt_perm(mode_t mode)
112 {
113 	static char buffer[12];
114 
115 	buffer[0] = '-';
116 	buffer[1] = '-';
117 	buffer[2] = ((mode & 0400) ? 'r' : '-');
118 	buffer[3] = ((mode & 0200) ? 'w' : '-');
119 	buffer[4] = ((mode & 0100) ? 'a' : '-');
120 	buffer[5] = ((mode & 0040) ? 'r' : '-');
121 	buffer[6] = ((mode & 0020) ? 'w' : '-');
122 	buffer[7] = ((mode & 0010) ? 'a' : '-');
123 	buffer[8] = ((mode & 0004) ? 'r' : '-');
124 	buffer[9] = ((mode & 0002) ? 'w' : '-');
125 	buffer[10] = ((mode & 0001) ? 'a' : '-');
126 	buffer[11] = '\0';
127 	return (&buffer[0]);
128 }
129 
130 void
cvt_time(time_t t,char * buf,size_t buflen)131 cvt_time(time_t t, char *buf, size_t buflen)
132 {
133 	struct tm *tm;
134 
135 	if (t == 0)
136 		(void)strlcpy(buf, "no-entry", buflen);
137 	else {
138 		tm = localtime(&t);
139 		(void)snprintf(buf, buflen, "%2d:%02d:%02d",
140 			tm->tm_hour, tm->tm_min, tm->tm_sec);
141 	}
142 }
143 #define	SHMINFO		1
144 #define	SHMTOTAL	2
145 #define	MSGINFO		4
146 #define	MSGTOTAL	8
147 #define	SEMINFO		16
148 #define	SEMTOTAL	32
149 
150 #define BIGGEST		1
151 #define CREATOR		2
152 #define OUTSTANDING	4
153 #define PID		8
154 #define TIME		16
155 
156 char	*core = NULL, *namelist = NULL;
157 int	display = SHMINFO | MSGINFO | SEMINFO;
158 int	option = 0;
159 
160 int
main(int argc,char ** argv)161 main(int argc, char **argv)
162 {
163 	int ch;
164 
165 	while ((ch = getopt(argc, argv, "MmQqSsabC:cN:optT")) != -1)
166 		switch (ch) {
167 		case 'M':
168 			display = SHMTOTAL;
169 			break;
170 		case 'm':
171 			display = SHMINFO;
172 			break;
173 		case 'Q':
174 			display = MSGTOTAL;
175 			break;
176 		case 'q':
177 			display = MSGINFO;
178 			break;
179 		case 'S':
180 			display = SEMTOTAL;
181 			break;
182 		case 's':
183 			display = SEMINFO;
184 			break;
185 		case 'T':
186 			display = SHMTOTAL | MSGTOTAL | SEMTOTAL;
187 			break;
188 		case 'a':
189 			option |= BIGGEST | CREATOR | OUTSTANDING | PID | TIME;
190 			break;
191 		case 'b':
192 			option |= BIGGEST;
193 			break;
194 		case 'C':
195 			core = optarg;
196 			break;
197 		case 'c':
198 			option |= CREATOR;
199 			break;
200 		case 'N':
201 			namelist = optarg;
202 			break;
203 		case 'o':
204 			option |= OUTSTANDING;
205 			break;
206 		case 'p':
207 			option |= PID;
208 			break;
209 		case 't':
210 			option |= TIME;
211 			break;
212 		default:
213 			usage();
214 		}
215 
216 	if (argc - optind > 0)
217 		usage();
218 
219 	if (namelist == NULL && core == NULL) {
220 		if (display & (MSGINFO | MSGTOTAL))
221 			msg_sysctl();
222 		if (display & (SHMINFO | SHMTOTAL))
223 			shm_sysctl();
224 		if (display & (SEMINFO | SEMTOTAL))
225 			sem_sysctl();
226 	} else
227 		ipcs_kvm();
228 
229 	exit(0);
230 }
231 
232 void
show_msgtotal(struct msginfo * msginfo)233 show_msgtotal(struct msginfo *msginfo)
234 {
235 
236 	printf("msginfo:\n");
237 	printf("\tmsgmax: %6d\t(max characters in a message)\n",
238 	    msginfo->msgmax);
239 	printf("\tmsgmni: %6d\t(# of message queues)\n",
240 	    msginfo->msgmni);
241 	printf("\tmsgmnb: %6d\t(max characters in a message queue)\n",
242 	    msginfo->msgmnb);
243 	printf("\tmsgtql: %6d\t(max # of messages in system)\n",
244 	    msginfo->msgtql);
245 	printf("\tmsgssz: %6d\t(size of a message segment)\n",
246 	    msginfo->msgssz);
247 	printf("\tmsgseg: %6d\t(# of message segments in system)\n\n",
248 	    msginfo->msgseg);
249 }
250 
251 void
show_shmtotal(struct shminfo * shminfo)252 show_shmtotal(struct shminfo *shminfo)
253 {
254 
255 	printf("shminfo:\n");
256 	printf("\tshmmax: %7d\t(max shared memory segment size)\n",
257 	    shminfo->shmmax);
258 	printf("\tshmmin: %7d\t(min shared memory segment size)\n",
259 	    shminfo->shmmin);
260 	printf("\tshmmni: %7d\t(max number of shared memory identifiers)\n",
261 	    shminfo->shmmni);
262 	printf("\tshmseg: %7d\t(max shared memory segments per process)\n",
263 	    shminfo->shmseg);
264 	printf("\tshmall: %7d\t(max amount of shared memory in pages)\n\n",
265 	    shminfo->shmall);
266 }
267 
268 void
show_semtotal(struct seminfo * seminfo)269 show_semtotal(struct seminfo *seminfo)
270 {
271 
272 	printf("seminfo:\n");
273 	printf("\tsemmni: %6d\t(# of semaphore identifiers)\n",
274 	    seminfo->semmni);
275 	printf("\tsemmns: %6d\t(# of semaphores in system)\n",
276 	    seminfo->semmns);
277 	printf("\tsemmnu: %6d\t(# of undo structures in system)\n",
278 	    seminfo->semmnu);
279 	printf("\tsemmsl: %6d\t(max # of semaphores per id)\n",
280 	    seminfo->semmsl);
281 	printf("\tsemopm: %6d\t(max # of operations per semop call)\n",
282 	    seminfo->semopm);
283 	printf("\tsemume: %6d\t(max # of undo entries per process)\n",
284 	    seminfo->semume);
285 	printf("\tsemusz: %6d\t(size in bytes of undo structure)\n",
286 	    seminfo->semusz);
287 	printf("\tsemvmx: %6d\t(semaphore maximum value)\n",
288 	    seminfo->semvmx);
289 	printf("\tsemaem: %6d\t(adjust on exit max value)\n\n",
290 	    seminfo->semaem);
291 }
292 
293 void
show_msginfo_hdr(void)294 show_msginfo_hdr(void)
295 {
296 
297 	printf("Message Queues:\n");
298 	printf("T       ID     KEY        MODE       OWNER    GROUP");
299 	if (option & CREATOR)
300 		printf("  CREATOR   CGROUP");
301 	if (option & OUTSTANDING)
302 		printf(" CBYTES  QNUM");
303 	if (option & BIGGEST)
304 		printf(" QBYTES");
305 	if (option & PID)
306 		printf(" LSPID LRPID");
307 	if (option & TIME)
308 		printf("    STIME    RTIME    CTIME");
309 	printf("\n");
310 }
311 
312 void
show_msginfo(time_t stime,time_t rtime,time_t ctime,int ipcid,key_t key,mode_t mode,uid_t uid,gid_t gid,uid_t cuid,gid_t cgid,u_long cbytes,u_long qnum,u_long qbytes,pid_t lspid,pid_t lrpid)313 show_msginfo(time_t stime, time_t rtime, time_t ctime, int ipcid, key_t key,
314     mode_t mode, uid_t uid, gid_t gid, uid_t cuid, gid_t cgid,
315     u_long cbytes, u_long qnum, u_long qbytes, pid_t lspid,
316     pid_t lrpid)
317 {
318 	char stime_buf[100], rtime_buf[100], ctime_buf[100];
319 
320 	if (option & TIME) {
321 		cvt_time(stime, stime_buf, sizeof(stime_buf));
322 		cvt_time(rtime, rtime_buf, sizeof(rtime_buf));
323 		cvt_time(ctime, ctime_buf, sizeof(ctime_buf));
324 	}
325 
326 	printf("q %8d %10ld %s %8s %8s", ipcid, key, fmt_perm(mode),
327 	    user_from_uid(uid, 0), group_from_gid(gid, 0));
328 
329 	if (option & CREATOR)
330 		printf(" %8s %8s", user_from_uid(cuid, 0),
331 		    group_from_gid(cgid, 0));
332 
333 	if (option & OUTSTANDING)
334 		printf(" %6lu %5lu", cbytes, qnum);
335 
336 	if (option & BIGGEST)
337 		printf(" %6lu", qbytes);
338 
339 	if (option & PID)
340 		printf(" %5ld %5ld", (long)lspid, (long)lrpid);
341 
342 	if (option & TIME)
343 		printf(" %s %s %s", stime_buf, rtime_buf, ctime_buf);
344 
345 	printf("\n");
346 }
347 
348 void
show_shminfo_hdr(void)349 show_shminfo_hdr(void)
350 {
351 
352 	printf("Shared Memory:\n");
353 	printf("T       ID     KEY        MODE       OWNER    GROUP");
354 	if (option & CREATOR)
355 		printf("  CREATOR   CGROUP");
356 	if (option & OUTSTANDING)
357 		printf(" NATTCH");
358 	if (option & BIGGEST)
359 		printf("   SEGSZ");
360 	if (option & PID)
361 		printf("  CPID  LPID");
362 	if (option & TIME)
363 		printf("    ATIME    DTIME    CTIME");
364 	printf("\n");
365 }
366 
367 void
show_shminfo(time_t atime,time_t dtime,time_t ctime,int ipcid,key_t key,mode_t mode,uid_t uid,gid_t gid,uid_t cuid,gid_t cgid,u_int32_t nattch,int segsz,pid_t cpid,pid_t lpid)368 show_shminfo(time_t atime, time_t dtime, time_t ctime, int ipcid, key_t key,
369     mode_t mode, uid_t uid, gid_t gid, uid_t cuid, gid_t cgid,
370     u_int32_t nattch, int segsz, pid_t cpid, pid_t lpid)
371 {
372 	char atime_buf[100], dtime_buf[100], ctime_buf[100];
373 
374 	if (option & TIME) {
375 		cvt_time(atime, atime_buf, sizeof(atime_buf));
376 		cvt_time(dtime, dtime_buf, sizeof(dtime_buf));
377 		cvt_time(ctime, ctime_buf, sizeof(ctime_buf));
378 	}
379 
380 	printf("m %8d %10ld %s %8s %8s", ipcid, key, fmt_perm(mode),
381 	    user_from_uid(uid, 0), group_from_gid(gid, 0));
382 
383 	if (option & CREATOR)
384 		printf(" %8s %8s", user_from_uid(cuid, 0),
385 		    group_from_gid(cgid, 0));
386 
387 	if (option & OUTSTANDING)
388 		printf(" %6d", nattch);
389 
390 	if (option & BIGGEST)
391 		printf(" %7d", segsz);
392 
393 	if (option & PID)
394 		printf(" %5d %5d", cpid, lpid);
395 
396 	if (option & TIME)
397 		printf(" %s %s %s",
398 		    atime_buf,
399 		    dtime_buf,
400 		    ctime_buf);
401 
402 	printf("\n");
403 }
404 
405 void
show_seminfo_hdr(void)406 show_seminfo_hdr(void)
407 {
408 
409 	printf("Semaphores:\n");
410 	printf("T       ID     KEY        MODE       OWNER    GROUP");
411 	if (option & CREATOR)
412 		printf("  CREATOR   CGROUP");
413 	if (option & BIGGEST)
414 		printf(" NSEMS");
415 	if (option & TIME)
416 		printf("    OTIME    CTIME");
417 	printf("\n");
418 }
419 
420 void
show_seminfo(time_t otime,time_t ctime,int ipcid,key_t key,mode_t mode,uid_t uid,gid_t gid,uid_t cuid,gid_t cgid,int16_t nsems)421 show_seminfo(time_t otime, time_t ctime, int ipcid, key_t key, mode_t mode,
422     uid_t uid, gid_t gid, uid_t cuid, gid_t cgid, int16_t nsems)
423 {
424 	char ctime_buf[100], otime_buf[100];
425 
426 	if (option & TIME) {
427 		cvt_time(otime, otime_buf, sizeof(otime_buf));
428 		cvt_time(ctime, ctime_buf, sizeof(ctime_buf));
429 	}
430 
431 	printf("s %8d %10ld %s %8s %8s", ipcid, key, fmt_perm(mode),
432 	    user_from_uid(uid, 0), group_from_gid(gid, 0));
433 
434 	if (option & CREATOR)
435 		printf(" %8s %8s", user_from_uid(cuid, 0),
436 		    group_from_gid(cgid, 0));
437 
438 	if (option & BIGGEST)
439 		printf(" %5d", nsems);
440 
441 	if (option & TIME)
442 		printf(" %s %s", otime_buf, ctime_buf);
443 
444 	printf("\n");
445 }
446 
447 void
msg_sysctl(void)448 msg_sysctl(void)
449 {
450 	struct msg_sysctl_info *msgsi;
451 	char *buf;
452 	int mib[3];
453 	size_t len;
454 	int i, valid;
455 
456 	mib[0] = CTL_KERN;
457 	mib[1] = KERN_SYSVMSG;
458 	len = sizeof(valid);
459 	if (sysctl(mib, 2, &valid, &len, NULL, 0) < 0) {
460 		warn("sysctl(KERN_SYSVMSG)");
461 		return;
462 	}
463 	if (!valid) {
464 		warnx("SVID messages facility not configured in the system");
465 		return;
466 	}
467 
468 	mib[0] = CTL_KERN;
469 	mib[1] = KERN_SYSVIPC_INFO;
470 	mib[2] = KERN_SYSVIPC_MSG_INFO;
471 
472 	if (!(display & MSGINFO)) {
473 		/* totals only */
474 		len = sizeof(struct msginfo);
475 	} else {
476 		if (sysctl(mib, 3, NULL, &len, NULL, 0) < 0) {
477 			warn("sysctl(KERN_SYSVIPC_MSG_INFO)");
478 			return;
479 		}
480 	}
481 
482 	if ((buf = malloc(len)) == NULL)
483 		err(1, "malloc");
484 	msgsi = (struct msg_sysctl_info *)buf;
485 	if (sysctl(mib, 3, msgsi, &len, NULL, 0) < 0) {
486 		warn("sysctl(KERN_SYSVIPC_MSG_INFO)");
487 		return;
488 	}
489 
490 	if (display & MSGTOTAL)
491 		show_msgtotal(&msgsi->msginfo);
492 
493 	if (display & MSGINFO) {
494 		show_msginfo_hdr();
495 		for (i = 0; i < msgsi->msginfo.msgmni; i++) {
496 			struct msqid_ds *msqptr = &msgsi->msgids[i];
497 			if (msqptr->msg_qbytes != 0)
498 				show_msginfo(msqptr->msg_stime,
499 				    msqptr->msg_rtime,
500 				    msqptr->msg_ctime,
501 				    IXSEQ_TO_IPCID(i, msqptr->msg_perm),
502 				    msqptr->msg_perm.key,
503 				    msqptr->msg_perm.mode,
504 				    msqptr->msg_perm.uid,
505 				    msqptr->msg_perm.gid,
506 				    msqptr->msg_perm.cuid,
507 				    msqptr->msg_perm.cgid,
508 				    msqptr->msg_cbytes,
509 				    msqptr->msg_qnum,
510 				    msqptr->msg_qbytes,
511 				    msqptr->msg_lspid,
512 				    msqptr->msg_lrpid);
513 		}
514 		printf("\n");
515 	}
516 }
517 
518 void
shm_sysctl(void)519 shm_sysctl(void)
520 {
521 	struct shm_sysctl_info *shmsi;
522 	char *buf;
523 	int mib[3];
524 	size_t len;
525 	int i, valid;
526 
527 	mib[0] = CTL_KERN;
528 	mib[1] = KERN_SYSVSHM;
529 	len = sizeof(valid);
530 	if (sysctl(mib, 2, &valid, &len, NULL, 0) < 0) {
531 		warn("sysctl(KERN_SYSVSHM)");
532 		return;
533 	}
534 	if (!valid) {
535 		warnx("SVID shared memory facility not configured in "
536 		    "the system");
537 		return;
538 	}
539 
540 	mib[0] = CTL_KERN;
541 	mib[1] = KERN_SYSVIPC_INFO;
542 	mib[2] = KERN_SYSVIPC_SHM_INFO;
543 
544 	if (!(display & SHMINFO)) {
545 		/* totals only */
546 		len = sizeof(struct shminfo);
547 	} else {
548 		if (sysctl(mib, 3, NULL, &len, NULL, 0) < 0) {
549 			warn("sysctl(KERN_SYSVIPC_SHM_INFO)");
550 			return;
551 		}
552 	}
553 
554 	if ((buf = malloc(len)) == NULL)
555 		err(1, "malloc");
556 	shmsi = (struct shm_sysctl_info *)buf;
557 	if (sysctl(mib, 3, shmsi, &len, NULL, 0) < 0) {
558 		warn("sysctl(KERN_SYSVIPC_SHM_INFO)");
559 		return;
560 	}
561 
562 	if (display & SHMTOTAL)
563 		show_shmtotal(&shmsi->shminfo);
564 
565 	if (display & SHMINFO) {
566 		show_shminfo_hdr();
567 		for (i = 0; i < shmsi->shminfo.shmmni; i++) {
568 			struct shmid_ds *shmptr = &shmsi->shmids[i];
569 			if (shmptr->shm_internal)
570 				show_shminfo(shmptr->shm_atime,
571 				    shmptr->shm_dtime,
572 				    shmptr->shm_ctime,
573 				    IXSEQ_TO_IPCID(i, shmptr->shm_perm),
574 				    shmptr->shm_perm.key,
575 				    shmptr->shm_perm.mode,
576 				    shmptr->shm_perm.uid,
577 				    shmptr->shm_perm.gid,
578 				    shmptr->shm_perm.cuid,
579 				    shmptr->shm_perm.cgid,
580 				    shmptr->shm_nattch,
581 				    shmptr->shm_segsz,
582 				    shmptr->shm_cpid,
583 				    shmptr->shm_lpid);
584 		}
585 		printf("\n");
586 	}
587 }
588 
589 void
sem_sysctl(void)590 sem_sysctl(void)
591 {
592 	struct sem_sysctl_info *semsi;
593 	char *buf;
594 	int mib[3];
595 	size_t len;
596 	int i, valid;
597 
598 	mib[0] = CTL_KERN;
599 	mib[1] = KERN_SYSVSEM;
600 	len = sizeof(valid);
601 	if (sysctl(mib, 2, &valid, &len, NULL, 0) < 0) {
602 		warn("sysctl(KERN_SYSVSEM)");
603 		return;
604 	}
605 	if (!valid) {
606 		warnx("SVID shared memory facility not configured in "
607 		    "the system");
608 		return;
609 	}
610 
611 	mib[0] = CTL_KERN;
612 	mib[1] = KERN_SYSVIPC_INFO;
613 	mib[2] = KERN_SYSVIPC_SEM_INFO;
614 
615 	if (!(display & SEMINFO)) {
616 		/* totals only */
617 		len = sizeof(struct seminfo);
618 	} else {
619 		if (sysctl(mib, 3, NULL, &len, NULL, 0) < 0) {
620 			warn("sysctl(KERN_SYSVIPC_SEM_INFO)");
621 			return;
622 		}
623 	}
624 
625 	if ((buf = malloc(len)) == NULL)
626 		err(1, "malloc");
627 	semsi = (struct sem_sysctl_info *)buf;
628 	if (sysctl(mib, 3, semsi, &len, NULL, 0) < 0) {
629 		warn("sysctl(KERN_SYSVIPC_SEM_INFO)");
630 		return;
631 	}
632 
633 	if (display & SEMTOTAL)
634 		show_semtotal(&semsi->seminfo);
635 
636 	if (display & SEMINFO) {
637 		show_seminfo_hdr();
638 		for (i = 0; i < semsi->seminfo.semmni; i++) {
639 			struct semid_ds *semaptr = &semsi->semids[i];
640 
641 			if (semaptr->sem_base != NULL)
642 				show_seminfo(semaptr->sem_otime,
643 				    semaptr->sem_ctime,
644 				    IXSEQ_TO_IPCID(i, semaptr->sem_perm),
645 				    semaptr->sem_perm.key,
646 				    semaptr->sem_perm.mode,
647 				    semaptr->sem_perm.uid,
648 				    semaptr->sem_perm.gid,
649 				    semaptr->sem_perm.cuid,
650 				    semaptr->sem_perm.cgid,
651 				    semaptr->sem_nsems);
652 		}
653 		printf("\n");
654 	}
655 }
656 
657 void
ipcs_kvm(void)658 ipcs_kvm(void)
659 {
660 	struct msginfo msginfo;
661 	struct msqid_ds *msqids;
662 	struct seminfo seminfo;
663 	struct semid_ds sem, **sema;
664 	struct shminfo shminfo;
665 	struct shmid_ds shmseg, **shmsegs;
666 	char errbuf[_POSIX2_LINE_MAX];
667 	u_long addr;
668 	kvm_t *kd;
669 	int i;
670 	struct nlist symbols[] = {
671 		{"_sema"},
672 	#define X_SEMA		0
673 		{"_seminfo"},
674 	#define X_SEMINFO	1
675 		{"_semu"},
676 	#define X_SEMU		2
677 		{"_msginfo"},
678 	#define X_MSGINFO	3
679 		{"_msqids"},
680 	#define X_MSQIDS	4
681 		{"_shminfo"},
682 	#define X_SHMINFO	5
683 		{"_shmsegs"},
684 	#define X_SHMSEGS	6
685 		{NULL}
686 	};
687 
688 	if ((kd = kvm_openfiles(namelist, core, NULL, O_RDONLY,
689 	    errbuf)) == NULL)
690 		errx(1, "can't open kvm: %s", errbuf);
691 
692 	switch (kvm_nlist(kd, symbols)) {
693 	case 0:
694 		break;
695 	case -1:
696 		errx(1, "%s: unable to read symbol table.",
697 		    namelist == NULL ? _PATH_UNIX : namelist);
698 		/* NOTREACHED */
699 	default:
700 #ifdef notdef		/* they'll be told more civilly later */
701 		warnx("nlist failed");
702 		for (i = 0; symbols[i].n_name != NULL; i++)
703 			if (symbols[i].n_value == 0)
704 				warnx("symbol %s not found", symbols[i].n_name);
705 #endif
706 		break;
707 	}
708 
709 	if ((display & (MSGINFO | MSGTOTAL)) &&
710 	    (kvm_read(kd, symbols[X_MSGINFO].n_value,
711 	     &msginfo, sizeof(msginfo)) == sizeof(msginfo))) {
712 
713 		if (display & MSGTOTAL)
714 			show_msgtotal(&msginfo);
715 
716 		if (display & MSGINFO) {
717 			if (kvm_read(kd, symbols[X_MSQIDS].n_value,
718 			    &addr, sizeof(addr)) != sizeof(addr))
719 				errx(1, "kvm_read (%s): %s",
720 				    symbols[X_MSQIDS].n_name, kvm_geterr(kd));
721 
722 			msqids = malloc(sizeof(struct msqid_ds) *
723 			    msginfo.msgmni);
724 			if (msqids == NULL)
725 				err(1, "malloc");
726 
727 			if (kvm_read(kd, addr, msqids,
728 			    sizeof(struct msqid_ds) * msginfo.msgmni) !=
729 			    sizeof(struct msqid_ds) * msginfo.msgmni)
730 				errx(1, "kvm_read (msqids): %s",
731 				    kvm_geterr(kd));
732 
733 			show_msginfo_hdr();
734 			for (i = 0; i < msginfo.msgmni; i++) {
735 				struct msqid_ds *msqptr = &msqids[i];
736 				if (msqptr->msg_qbytes != 0)
737 					show_msginfo(msqptr->msg_stime,
738 					    msqptr->msg_rtime,
739 					    msqptr->msg_ctime,
740 					    IXSEQ_TO_IPCID(i, msqptr->msg_perm),
741 					    msqptr->msg_perm.key,
742 					    msqptr->msg_perm.mode,
743 					    msqptr->msg_perm.uid,
744 					    msqptr->msg_perm.gid,
745 					    msqptr->msg_perm.cuid,
746 					    msqptr->msg_perm.cgid,
747 					    msqptr->msg_cbytes,
748 					    msqptr->msg_qnum,
749 					    msqptr->msg_qbytes,
750 					    msqptr->msg_lspid,
751 					    msqptr->msg_lrpid);
752 			}
753 			printf("\n");
754 		}
755 	} else {
756 		if (display & (MSGINFO | MSGTOTAL)) {
757 			warnx("SVID messages facility not configured in "
758 			    "the system");
759 		}
760 	}
761 	if ((display & (SHMINFO | SHMTOTAL)) &&
762 	    (kvm_read(kd, symbols[X_SHMINFO].n_value, &shminfo,
763 	     sizeof(shminfo)) == sizeof(shminfo))) {
764 
765 		if (display & SHMTOTAL)
766 			show_shmtotal(&shminfo);
767 
768 		if (display & SHMINFO) {
769 			if (kvm_read(kd, symbols[X_SHMSEGS].n_value, &addr,
770 			    sizeof(addr)) != sizeof(addr))
771 				errx(1, "kvm_read (%s): %s",
772 				    symbols[X_SHMSEGS].n_name, kvm_geterr(kd));
773 
774 			shmsegs = malloc(sizeof(struct shmid_ds *) *
775 			    shminfo.shmmni);
776 			if (shmsegs == NULL)
777 				err(1, "malloc");
778 
779 			if (kvm_read(kd, addr, shmsegs,
780 			    sizeof(struct shmid_ds *) * shminfo.shmmni) !=
781 			    sizeof(struct shmid_ds *) * shminfo.shmmni)
782 				errx(1, "kvm_read (shmsegs): %s",
783 				    kvm_geterr(kd));
784 
785 			show_shminfo_hdr();
786 			for (i = 0; i < shminfo.shmmni; i++) {
787 				if (shmsegs[i] == NULL)
788 					continue;
789 
790 				if (kvm_read(kd, (u_long)shmsegs[i], &shmseg,
791 				    sizeof(shmseg)) != sizeof(shmseg))
792 					errx(1, "kvm_read (shmseg): %s",
793 					    kvm_geterr(kd));
794 				show_shminfo(shmseg.shm_atime,
795 				    shmseg.shm_dtime,
796 				    shmseg.shm_ctime,
797 				    IXSEQ_TO_IPCID(i, shmseg.shm_perm),
798 				    shmseg.shm_perm.key,
799 				    shmseg.shm_perm.mode,
800 				    shmseg.shm_perm.uid,
801 				    shmseg.shm_perm.gid,
802 				    shmseg.shm_perm.cuid,
803 				    shmseg.shm_perm.cgid,
804 				    shmseg.shm_nattch,
805 				    shmseg.shm_segsz,
806 				    shmseg.shm_cpid,
807 				    shmseg.shm_lpid);
808 			}
809 			printf("\n");
810 		}
811 	} else
812 		if (display & (SHMINFO | SHMTOTAL)) {
813 			warnx("SVID shared memory facility not configured in "
814 			    "the system");
815 		}
816 	if ((display & (SEMINFO | SEMTOTAL)) &&
817 	    (kvm_read(kd, symbols[X_SEMINFO].n_value, &seminfo,
818 	     sizeof(seminfo)) == sizeof(seminfo))) {
819 		if (display & SEMTOTAL)
820 			show_semtotal(&seminfo);
821 
822 		if (display & SEMINFO) {
823 			if (kvm_read(kd, symbols[X_SEMA].n_value, &addr,
824 			    sizeof(addr)) != sizeof(addr))
825 				errx(1, "kvm_read (%s): %s",
826 				    symbols[X_SEMA].n_name, kvm_geterr(kd));
827 
828 			sema = malloc(sizeof(struct semid_ds *) *
829 			    seminfo.semmni);
830 			if (sema == NULL)
831 				err(1, "malloc");
832 
833 			if (kvm_read(kd, addr, sema,
834 			    sizeof(struct semid_ds *) * seminfo.semmni) !=
835 			    sizeof(struct semid_ds *) * seminfo.semmni)
836 				errx(1, "kvm_read (sema): %s",
837 				    kvm_geterr(kd));
838 
839 			show_seminfo_hdr();
840 			for (i = 0; i < seminfo.semmni; i++) {
841 				if (sema[i] == NULL)
842 					continue;
843 
844 				if (kvm_read(kd, (u_long)sema[i], &sem,
845 				    sizeof(sem)) != sizeof(sem))
846 					errx(1, "kvm_read (sem): %s",
847 					    kvm_geterr(kd));
848 				show_seminfo(sem.sem_otime,
849 				    sem.sem_ctime,
850 				    IXSEQ_TO_IPCID(i, sem.sem_perm),
851 				    sem.sem_perm.key,
852 				    sem.sem_perm.mode,
853 				    sem.sem_perm.uid,
854 				    sem.sem_perm.gid,
855 				    sem.sem_perm.cuid,
856 				    sem.sem_perm.cgid,
857 				    sem.sem_nsems);
858 			}
859 			printf("\n");
860 		}
861 	} else
862 		if (display & (SEMINFO | SEMTOTAL)) {
863 			warnx("SVID semaphores facility not configured in "
864 			    "the system");
865 		}
866 	kvm_close(kd);
867 }
868 
869 void
usage(void)870 usage(void)
871 {
872 	extern char *__progname;
873 
874 	fprintf(stderr,
875 	    "usage: %s [-abcMmopQqSsTt] [-C core] [-N system]\n",
876 	    __progname);
877 	exit(1);
878 }
879