Annotation of src/usr.bin/kdump/kdump.c, Revision 1.107
1.107 ! jmc 1: /* $OpenBSD: kdump.c,v 1.106 2015/10/02 05:07:41 guenther Exp $ */
1.4 deraadt 2:
1.1 deraadt 3: /*-
4: * Copyright (c) 1988, 1993
5: * The Regents of the University of California. All rights reserved.
6: *
7: * Redistribution and use in source and binary forms, with or without
8: * modification, are permitted provided that the following conditions
9: * are met:
10: * 1. Redistributions of source code must retain the above copyright
11: * notice, this list of conditions and the following disclaimer.
12: * 2. Redistributions in binary form must reproduce the above copyright
13: * notice, this list of conditions and the following disclaimer in the
14: * documentation and/or other materials provided with the distribution.
1.21 millert 15: * 3. Neither the name of the University nor the names of its contributors
1.1 deraadt 16: * may be used to endorse or promote products derived from this software
17: * without specific prior written permission.
18: *
19: * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``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 THE REGENTS OR CONTRIBUTORS 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:
1.97 deraadt 32: #include <sys/param.h> /* MAXCOMLEN nitems */
1.1 deraadt 33: #include <sys/time.h>
1.97 deraadt 34: #include <sys/signal.h>
1.1 deraadt 35: #include <sys/uio.h>
36: #include <sys/ktrace.h>
37: #include <sys/ioctl.h>
1.62 otto 38: #include <sys/malloc.h>
39: #include <sys/namei.h>
1.1 deraadt 40: #include <sys/ptrace.h>
1.62 otto 41: #include <sys/sem.h>
42: #include <sys/shm.h>
1.51 otto 43: #include <sys/socket.h>
1.28 deraadt 44: #include <sys/sysctl.h>
1.63 deraadt 45: #include <sys/siginfo.h>
1.62 otto 46: #include <sys/vmmeter.h>
47: #include <sys/tty.h>
1.82 guenther 48: #include <sys/wait.h>
1.1 deraadt 49: #define _KERNEL
1.84 guenther 50: #include <errno.h>
1.1 deraadt 51: #undef _KERNEL
1.62 otto 52: #include <ddb/db_var.h>
53: #include <machine/cpu.h>
1.1 deraadt 54:
1.33 tedu 55: #include <ctype.h>
1.1 deraadt 56: #include <err.h>
1.61 matthew 57: #include <fcntl.h>
1.64 guenther 58: #include <limits.h>
1.100 guenther 59: #include <netdb.h>
1.77 guenther 60: #include <poll.h>
1.1 deraadt 61: #include <signal.h>
62: #include <stdio.h>
63: #include <stdlib.h>
1.55 otto 64: #include <stdint.h>
1.1 deraadt 65: #include <string.h>
66: #include <unistd.h>
67: #include <vis.h>
68:
69: #include "ktrace.h"
1.22 deraadt 70: #include "kdump.h"
1.51 otto 71: #include "kdump_subr.h"
1.12 espie 72: #include "extern.h"
1.1 deraadt 73:
1.67 mikeb 74: int timestamp, decimal, iohex, fancy = 1, maxdata = INT_MAX;
1.94 guenther 75: int needtid, tail;
1.1 deraadt 76: char *tracefile = DEF_TRACEFILE;
77: struct ktr_header ktr_header;
1.85 guenther 78: pid_t pid_opt = -1;
1.1 deraadt 79:
80: #define eqs(s1, s2) (strcmp((s1), (s2)) == 0)
81:
82: #include <sys/syscall.h>
83:
1.25 mickey 84: #include <compat/linux/linux_syscall.h>
1.1 deraadt 85:
86: #define KTRACE
1.19 mickey 87: #define PTRACE
1.7 deraadt 88: #define NFSCLIENT
89: #define NFSSERVER
90: #define SYSVSEM
91: #define SYSVMSG
92: #define SYSVSHM
93: #define LFS
1.25 mickey 94: #include <kern/syscalls.c>
1.1 deraadt 95:
1.25 mickey 96: #include <compat/linux/linux_syscalls.c>
1.1 deraadt 97: #undef KTRACE
1.19 mickey 98: #undef PTRACE
1.7 deraadt 99: #undef NFSCLIENT
100: #undef NFSSERVER
101: #undef SYSVSEM
102: #undef SYSVMSG
103: #undef SYSVSHM
104: #undef LFS
1.1 deraadt 105:
106: struct emulation {
107: char *name; /* Emulation name */
108: char **sysnames; /* Array of system call names */
109: int nsysnames; /* Number of */
110: };
111:
112: static struct emulation emulations[] = {
1.9 deraadt 113: { "native", syscallnames, SYS_MAXSYSCALL },
114: { "linux", linux_syscallnames, LINUX_SYS_MAXSYSCALL },
1.49 miod 115: { NULL, NULL, 0 }
1.1 deraadt 116: };
117:
1.59 otto 118: static struct emulation *current;
1.60 otto 119: static struct emulation *def_emul;
1.59 otto 120:
121: struct pid_emul {
122: struct emulation *e;
123: pid_t p;
124: };
125:
126: static struct pid_emul *pe_table;
127: static size_t pe_size;
1.1 deraadt 128:
129:
130: static char *ptrace_ops[] = {
131: "PT_TRACE_ME", "PT_READ_I", "PT_READ_D", "PT_READ_U",
132: "PT_WRITE_I", "PT_WRITE_D", "PT_WRITE_U", "PT_CONTINUE",
1.15 art 133: "PT_KILL", "PT_ATTACH", "PT_DETACH", "PT_IO",
1.64 guenther 134: "PT_SET_EVENT_MASK", "PT_GET_EVENT_MASK", "PT_GET_PROCESS_STATE",
1.71 guenther 135: "PT_GET_THREAD_FIRST", "PT_GET_THREAD_NEXT",
1.1 deraadt 136: };
137:
1.59 otto 138: static void mappidtoemul(pid_t, struct emulation *);
139: static struct emulation * findemul(pid_t);
1.37 tedu 140: static int fread_tail(void *, size_t, size_t);
1.13 millert 141: static void dumpheader(struct ktr_header *);
1.37 tedu 142: static void ktremul(char *, size_t);
143: static void ktrgenio(struct ktr_genio *, size_t);
144: static void ktrnamei(const char *, size_t);
1.13 millert 145: static void ktrpsig(struct ktr_psig *);
1.93 jsg 146: static void ktrsyscall(struct ktr_syscall *, size_t);
1.94 guenther 147: static const char *kresolvsysctl(int, const int *);
1.103 guenther 148: static void ktrsysret(struct ktr_sysret *, size_t);
1.81 miod 149: static void ktruser(struct ktr_user *, size_t);
1.106 guenther 150: static void ktrexec(const char*, size_t);
1.13 millert 151: static void setemul(const char *);
152: static void usage(void);
1.92 guenther 153: static void ioctldecode(int);
154: static void ptracedecode(int);
1.61 matthew 155: static void atfd(int);
1.77 guenther 156: static void polltimeout(int);
1.82 guenther 157: static void wait4pid(int);
1.83 guenther 158: static void signame(int);
159: static void semctlname(int);
160: static void shmctlname(int);
161: static void semgetname(int);
1.92 guenther 162: static void flagsandmodename(int);
1.83 guenther 163: static void clockname(int);
164: static void sockoptlevelname(int);
1.88 guenther 165: static void ktraceopname(int);
1.12 espie 166:
1.102 deraadt 167: static int screenwidth;
168:
1.1 deraadt 169: int
1.17 deraadt 170: main(int argc, char *argv[])
1.1 deraadt 171: {
1.37 tedu 172: int ch, silent;
173: size_t ktrlen, size;
1.17 deraadt 174: int trpoints = ALL_POINTS;
1.101 deraadt 175: const char *errstr;
1.12 espie 176: void *m;
1.1 deraadt 177:
1.60 otto 178: def_emul = current = &emulations[0]; /* native */
1.1 deraadt 179:
1.102 deraadt 180: if (screenwidth == 0) {
181: struct winsize ws;
182:
183: if (fancy && ioctl(fileno(stderr), TIOCGWINSZ, &ws) != -1 &&
184: ws.ws_col > 8)
185: screenwidth = ws.ws_col;
186: else
187: screenwidth = 80;
188: }
189:
1.94 guenther 190: while ((ch = getopt(argc, argv, "e:f:dHlm:nRp:Tt:xX")) != -1)
1.1 deraadt 191: switch (ch) {
192: case 'e':
193: setemul(optarg);
1.60 otto 194: def_emul = current;
1.1 deraadt 195: break;
196: case 'f':
197: tracefile = optarg;
198: break;
199: case 'd':
200: decimal = 1;
201: break;
1.67 mikeb 202: case 'H':
203: needtid = 1;
204: break;
1.1 deraadt 205: case 'l':
206: tail = 1;
207: break;
208: case 'm':
1.101 deraadt 209: maxdata = strtonum(optarg, 0, INT_MAX, &errstr);
210: if (errstr)
211: errx(1, "-m %s: %s", optarg, errstr);
1.1 deraadt 212: break;
213: case 'n':
214: fancy = 0;
215: break;
1.17 deraadt 216: case 'p':
1.101 deraadt 217: pid_opt = strtonum(optarg, 1, INT_MAX, &errstr);
218: if (errstr)
219: errx(1, "-p %s: %s", optarg, errstr);
1.17 deraadt 220: break;
1.1 deraadt 221: case 'R':
222: timestamp = 2; /* relative timestamp */
223: break;
224: case 'T':
225: timestamp = 1;
226: break;
227: case 't':
228: trpoints = getpoints(optarg);
229: if (trpoints < 0)
230: errx(1, "unknown trace point in %s", optarg);
231: break;
1.31 tedu 232: case 'x':
233: iohex = 1;
234: break;
235: case 'X':
236: iohex = 2;
237: break;
1.1 deraadt 238: default:
239: usage();
240: }
1.5 deraadt 241: if (argc > optind)
1.1 deraadt 242: usage();
243:
1.37 tedu 244: m = malloc(size = 1025);
1.1 deraadt 245: if (m == NULL)
1.37 tedu 246: err(1, NULL);
1.1 deraadt 247: if (!freopen(tracefile, "r", stdin))
248: err(1, "%s", tracefile);
1.67 mikeb 249: if (fread_tail(&ktr_header, sizeof(struct ktr_header), 1) == 0 ||
250: ktr_header.ktr_type != htobe32(KTR_START))
251: errx(1, "%s: not a dump", tracefile);
1.1 deraadt 252: while (fread_tail(&ktr_header, sizeof(struct ktr_header), 1)) {
1.17 deraadt 253: silent = 0;
1.59 otto 254: if (pe_size == 0)
255: mappidtoemul(ktr_header.ktr_pid, current);
1.85 guenther 256: if (pid_opt != -1 && pid_opt != ktr_header.ktr_pid)
1.17 deraadt 257: silent = 1;
258: if (silent == 0 && trpoints & (1<<ktr_header.ktr_type))
1.1 deraadt 259: dumpheader(&ktr_header);
1.37 tedu 260: ktrlen = ktr_header.ktr_len;
1.1 deraadt 261: if (ktrlen > size) {
1.23 tedu 262: void *newm;
263:
1.64 guenther 264: if (ktrlen == SIZE_MAX)
265: errx(1, "data too long");
1.23 tedu 266: newm = realloc(m, ktrlen+1);
267: if (newm == NULL)
1.66 deraadt 268: err(1, "realloc");
1.23 tedu 269: m = newm;
1.1 deraadt 270: size = ktrlen;
271: }
272: if (ktrlen && fread_tail(m, ktrlen, 1) == 0)
273: errx(1, "data too short");
1.17 deraadt 274: if (silent)
275: continue;
1.1 deraadt 276: if ((trpoints & (1<<ktr_header.ktr_type)) == 0)
277: continue;
1.59 otto 278: current = findemul(ktr_header.ktr_pid);
1.1 deraadt 279: switch (ktr_header.ktr_type) {
280: case KTR_SYSCALL:
1.93 jsg 281: ktrsyscall((struct ktr_syscall *)m, ktrlen);
1.1 deraadt 282: break;
283: case KTR_SYSRET:
1.103 guenther 284: ktrsysret((struct ktr_sysret *)m, ktrlen);
1.1 deraadt 285: break;
286: case KTR_NAMEI:
287: ktrnamei(m, ktrlen);
288: break;
289: case KTR_GENIO:
290: ktrgenio((struct ktr_genio *)m, ktrlen);
291: break;
292: case KTR_PSIG:
293: ktrpsig((struct ktr_psig *)m);
294: break;
295: case KTR_EMUL:
296: ktremul(m, ktrlen);
1.59 otto 297: mappidtoemul(ktr_header.ktr_pid, current);
1.1 deraadt 298: break;
1.55 otto 299: case KTR_STRUCT:
300: ktrstruct(m, ktrlen);
301: break;
1.81 miod 302: case KTR_USER:
303: ktruser(m, ktrlen);
304: break;
1.106 guenther 305: case KTR_EXECARGS:
306: case KTR_EXECENV:
307: ktrexec(m, ktrlen);
308: break;
1.1 deraadt 309: }
310: if (tail)
311: (void)fflush(stdout);
312: }
1.12 espie 313: exit(0);
1.1 deraadt 314: }
315:
1.59 otto 316: static void
317: mappidtoemul(pid_t pid, struct emulation *emul)
318: {
319: size_t i;
320: struct pid_emul *tmp;
321:
322: for (i = 0; i < pe_size; i++) {
323: if (pe_table[i].p == pid) {
324: pe_table[i].e = emul;
325: return;
326: }
327: }
1.90 doug 328: tmp = reallocarray(pe_table, pe_size + 1, sizeof(*pe_table));
1.59 otto 329: if (tmp == NULL)
330: err(1, NULL);
331: pe_table = tmp;
332: pe_table[pe_size].p = pid;
333: pe_table[pe_size].e = emul;
334: pe_size++;
335: }
336:
337: static struct emulation*
338: findemul(pid_t pid)
339: {
340: size_t i;
341:
342: for (i = 0; i < pe_size; i++)
343: if (pe_table[i].p == pid)
344: return pe_table[i].e;
1.60 otto 345: return def_emul;
1.59 otto 346: }
347:
1.12 espie 348: static int
1.37 tedu 349: fread_tail(void *buf, size_t size, size_t num)
1.1 deraadt 350: {
351: int i;
352:
353: while ((i = fread(buf, size, num, stdin)) == 0 && tail) {
354: (void)sleep(1);
355: clearerr(stdin);
356: }
357: return (i);
358: }
359:
1.12 espie 360: static void
1.17 deraadt 361: dumpheader(struct ktr_header *kth)
1.1 deraadt 362: {
1.67 mikeb 363: static struct timespec prevtime;
1.1 deraadt 364: char unknown[64], *type;
1.67 mikeb 365: struct timespec temp;
1.1 deraadt 366:
367: switch (kth->ktr_type) {
368: case KTR_SYSCALL:
369: type = "CALL";
370: break;
371: case KTR_SYSRET:
372: type = "RET ";
373: break;
374: case KTR_NAMEI:
375: type = "NAMI";
376: break;
377: case KTR_GENIO:
378: type = "GIO ";
379: break;
380: case KTR_PSIG:
381: type = "PSIG";
382: break;
383: case KTR_EMUL:
384: type = "EMUL";
385: break;
1.55 otto 386: case KTR_STRUCT:
387: type = "STRU";
388: break;
1.81 miod 389: case KTR_USER:
390: type = "USER";
391: break;
1.106 guenther 392: case KTR_EXECARGS:
393: type = "ARGS";
394: break;
395: case KTR_EXECENV:
396: type = "ENV ";
397: break;
1.1 deraadt 398: default:
1.17 deraadt 399: (void)snprintf(unknown, sizeof unknown, "UNKNOWN(%d)",
400: kth->ktr_type);
1.1 deraadt 401: type = unknown;
402: }
403:
1.67 mikeb 404: (void)printf("%6ld", (long)kth->ktr_pid);
405: if (needtid)
1.69 mikeb 406: (void)printf("/%-7ld", (long)kth->ktr_tid);
1.67 mikeb 407: (void)printf(" %-8.*s ", MAXCOMLEN, kth->ktr_comm);
1.1 deraadt 408: if (timestamp) {
409: if (timestamp == 2) {
1.67 mikeb 410: timespecsub(&kth->ktr_time, &prevtime, &temp);
1.1 deraadt 411: prevtime = kth->ktr_time;
412: } else
413: temp = kth->ktr_time;
1.79 deraadt 414: printf("%lld.%06ld ", (long long)temp.tv_sec,
415: temp.tv_nsec / 1000);
1.1 deraadt 416: }
417: (void)printf("%s ", type);
418: }
419:
1.92 guenther 420: /*
421: * Base Formatters
422: */
423:
424: /* some syscalls have padding that shouldn't be shown */
425: static int
426: pad(long arg)
427: {
428: /* nothing printed */
429: return (1);
430: }
431:
432: /* a formatter that just saves the argument for the next formatter */
433: int arg1;
434: static int
435: pass_two(long arg)
436: {
437: arg1 = (int)arg;
438:
439: /* nothing printed */
440: return (1);
441: }
442:
443: static int
444: pdeclong(long arg)
445: {
446: (void)printf("%ld", arg);
447: return (0);
448: }
449:
450: static int
451: pdeculong(long arg)
1.2 deraadt 452: {
1.92 guenther 453: (void)printf("%lu", arg);
454: return (0);
455: }
1.2 deraadt 456:
1.92 guenther 457: static int
458: phexlong(long arg)
459: {
460: (void)printf("%#lx", arg);
461: return (0);
462: }
1.2 deraadt 463:
1.92 guenther 464: static int
465: pnonfancy(long arg)
466: {
467: if (decimal)
468: (void)printf("%ld", arg);
1.2 deraadt 469: else
1.92 guenther 470: (void)printf("%#lx", arg);
471: return (0);
1.2 deraadt 472: }
1.1 deraadt 473:
1.52 otto 474: static void
1.92 guenther 475: pdecint(int arg)
1.52 otto 476: {
1.92 guenther 477: (void)printf("%d", arg);
1.52 otto 478: }
479:
480: static void
1.92 guenther 481: pdecuint(int arg)
1.52 otto 482: {
1.92 guenther 483: (void)printf("%u", arg);
1.52 otto 484: }
485:
486: static void
1.92 guenther 487: phexint(int arg)
1.52 otto 488: {
1.92 guenther 489: (void)printf("%#x", arg);
1.52 otto 490: }
1.92 guenther 491:
1.52 otto 492: static void
1.92 guenther 493: poctint(int arg)
494: {
495: (void)printf("%#o", arg);
496: }
497:
498:
499: #ifdef __LP64__
500:
501: /* on LP64, long long arguments are the same as long arguments */
502: #define Phexlonglong Phexlong
503: #define phexll NULL /* not actually used on LP64 */
504:
505: #else /* __LP64__ */
506:
507: /* on ILP32, long long arguments are passed as two 32bit args */
508: #define Phexlonglong PASS_LONGLONG, Phexll
509:
510: static int
511: phexll(long arg2)
1.52 otto 512: {
1.92 guenther 513: long long val;
514:
515: #if _BYTE_ORDER == _LITTLE_ENDIAN
516: val = ((long long)arg2 << 32) | ((long long)arg1 & 0xffffffff);
517: #else
518: val = ((long long)arg1 << 32) | ((long long)arg2 & 0xffffffff);
519: #endif
520:
521: if (fancy || !decimal)
522: (void)printf("%#llx", val);
523: else
1.52 otto 524: (void)printf("%lld", val);
1.92 guenther 525: return (0);
1.52 otto 526: }
1.92 guenther 527:
528: #endif /* __LP64__ */
529:
530: static int (*long_formatters[])(long) = {
531: NULL,
532: pdeclong,
533: pdeculong,
534: phexlong,
535: pass_two,
536: pass_two,
537: phexll,
538: pad,
539: pnonfancy,
540: };
541:
542: static void (*formatters[])(int) = {
543: NULL,
544: pdecint,
545: phexint,
546: poctint,
547: pdecuint,
548: ioctldecode,
549: ptracedecode,
550: atfd,
551: polltimeout,
552: wait4pid,
553: signame,
554: semctlname,
555: shmctlname,
556: semgetname,
557: flagsandmodename,
558: clockname,
559: sockoptlevelname,
560: ktraceopname,
561: fcntlcmdname,
562: modename,
563: flagsname,
564: openflagsname,
565: atflagsname,
566: accessmodename,
567: mmapprotname,
568: mmapflagsname,
569: wait4optname,
570: sendrecvflagsname,
571: mountflagsname,
572: rebootoptname,
573: flockname,
574: sockoptname,
575: sockipprotoname,
576: socktypename,
577: sockflagsname,
578: sockfamilyname,
579: mlockallname,
580: shmatname,
581: whencename,
582: pathconfname,
583: rlimitname,
584: shutdownhowname,
585: prioname,
586: madvisebehavname,
587: msyncflagsname,
588: clocktypename,
589: rusagewho,
590: sigactionflagname,
591: sigprocmaskhowname,
592: minheritname,
593: quotactlname,
594: sigill_name,
595: sigtrap_name,
596: sigemt_name,
597: sigfpe_name,
598: sigbus_name,
599: sigsegv_name,
600: sigchld_name,
601: ktracefacname,
602: itimername,
603: sigset,
1.94 guenther 604: uidname,
605: gidname,
1.92 guenther 606: };
607:
608: enum {
609: /* the end of the (known) arguments is recognized by the zero fill */
610: end_of_args = 0,
611:
612: /* negative are the negative of the index into long_formatters[] */
613: Pdeclong = -1,
614: Pdeculong = -2,
615: Phexlong = -3,
616: PASS_TWO = -4,
617:
618: /* the remaining long formatters still get called when non-fancy (-n option) */
619: #define FMT_IS_NONFANCY(x) ((x) <= PASS_LONGLONG)
620: PASS_LONGLONG = -5,
621: Phexll = -6,
622: PAD = -7,
623: Pnonfancy = -8,
624:
625: /* positive values are the index into formatters[] */
626: Pdecint = 1,
627: Phexint,
628: Poctint,
629: Pdecuint,
630: Ioctldecode,
631: Ptracedecode,
632: Atfd,
633: Polltimeout,
634: Wait4pid,
635: Signame,
636: Semctlname,
637: Shmctlname,
638: Semgetname,
639: Flagsandmodename,
640: Clockname,
641: Sockoptlevelname,
642: Ktraceopname,
643: Fcntlcmdname,
644: Modename,
645: Flagsname,
646: Openflagsname,
647: Atflagsname,
648: Accessmodename,
649: Mmapprotname,
650: Mmapflagsname,
651: Wait4optname,
652: Sendrecvflagsname,
653: Mountflagsname,
654: Rebootoptname,
655: Flockname,
656: Sockoptname,
657: Sockipprotoname,
658: Socktypename,
659: Sockflagsname,
660: Sockfamilyname,
661: Mlockallname,
662: Shmatname,
663: Whencename,
664: Pathconfname,
665: Rlimitname,
666: Shutdownhowname,
667: Prioname,
668: Madvisebehavname,
669: Msyncflagsname,
670: Clocktypename,
671: Rusagewho,
672: Sigactionflagname,
673: Sigprocmaskhowname,
674: Minheritname,
675: Quotactlname,
676: Sigill_name,
677: Sigtrap_name,
678: Sigemt_name,
679: Sigfpe_name,
680: Sigbus_name,
681: Sigsegv_name,
682: Sigchld_name,
683: Ktracefacname,
684: Itimername,
685: Sigset,
1.94 guenther 686: Uidname,
687: Gidname,
1.92 guenther 688: };
689:
690: #define Pptr Phexlong
691: #define Psize Pdeculong /* size_t for small buffers */
692: #define Pbigsize Phexlong /* size_t for I/O buffers */
693: #define Pcount Pdecint /* int for a count of something */
694: #define Pfd Pdecint
695: #define Ppath Phexlong
696: #define Pdev_t Pdecint
697: #define Ppid_t Pdecint
698: #define Ppgid Pdecint /* pid or negative pgid */
699: #define Poff_t Phexlonglong
700: #define Pmsqid Pdecint
701: #define Pshmid Pdecint
702: #define Psemid Pdecint
703: #define Pkey_t Pdecint
704: #define Pucount Pdecuint
705: #define Chflagsname Phexlong /* to be added */
706: #define Sockprotoname Phexlong /* to be added */
707: #define Swapctlname Phexlong /* to be added */
708: #define Msgflgname Phexlong /* to be added */
709:
710:
711: typedef signed char formatter;
712: static const formatter scargs[][8] = {
713: [SYS_exit] = { Pdecint },
714: [SYS_read] = { Pfd, Pptr, Pbigsize },
715: [SYS_write] = { Pfd, Pptr, Pbigsize },
716: [SYS_open] = { Ppath, PASS_TWO, Flagsandmodename },
717: [SYS_close] = { Pfd },
718: [SYS_getentropy] = { Pptr, Psize },
719: [SYS___tfork] = { Pptr, Psize },
720: [SYS_link] = { Ppath, Ppath },
721: [SYS_unlink] = { Ppath },
722: [SYS_wait4] = { Wait4pid, Pptr, Wait4optname },
723: [SYS_chdir] = { Ppath },
724: [SYS_fchdir] = { Pfd },
725: [SYS_mknod] = { Ppath, Modename, Pdev_t },
726: [SYS_chmod] = { Ppath, Modename },
1.94 guenther 727: [SYS_chown] = { Ppath, Uidname, Gidname },
1.92 guenther 728: [SYS_break] = { Pptr },
729: [SYS_getrusage] = { Rusagewho, Pptr },
730: [SYS_mount] = { Pptr, Ppath, Mountflagsname, Pptr },
731: [SYS_unmount] = { Ppath, Mountflagsname },
1.94 guenther 732: [SYS_setuid] = { Uidname },
1.92 guenther 733: [SYS_ptrace] = { Ptracedecode, Ppid_t, Pptr, Pdecint },
734: [SYS_recvmsg] = { Pfd, Pptr, Sendrecvflagsname },
735: [SYS_sendmsg] = { Pfd, Pptr, Sendrecvflagsname },
736: [SYS_recvfrom] = { Pfd, Pptr, Pbigsize, Sendrecvflagsname },
737: [SYS_accept] = { Pfd, Pptr, Pptr },
738: [SYS_getpeername] = { Pfd, Pptr, Pptr },
739: [SYS_getsockname] = { Pfd, Pptr, Pptr },
740: [SYS_access] = { Ppath, Accessmodename },
741: [SYS_chflags] = { Ppath, Chflagsname },
742: [SYS_fchflags] = { Pfd, Chflagsname },
743: [SYS_kill] = { Ppgid, Signame },
744: [SYS_stat] = { Ppath, Pptr },
745: [SYS_lstat] = { Ppath, Pptr },
746: [SYS_dup] = { Pfd },
747: [SYS_fstatat] = { Atfd, Ppath, Pptr, Atflagsname },
748: [SYS_profil] = { Pptr, Pbigsize, Pbigsize, Pdecuint },
749: [SYS_ktrace] = { Ppath, Ktraceopname, Ktracefacname, Ppgid },
750: [SYS_sigaction] = { Signame, Pptr, Pptr },
751: [SYS_sigprocmask] = { Sigprocmaskhowname, Sigset },
752: [SYS_getlogin] = { Pptr, Pucount },
753: [SYS_setlogin] = { Pptr },
754: [SYS_acct] = { Ppath },
755: [SYS_fstat] = { Pfd, Pptr },
756: [SYS_ioctl] = { Pfd, Ioctldecode, Pptr },
757: [SYS_reboot] = { Rebootoptname },
758: [SYS_revoke] = { Ppath },
759: [SYS_symlink] = { Ppath, Ppath },
760: [SYS_readlink] = { Ppath, Pptr, Psize },
761: [SYS_execve] = { Ppath, Pptr, Pptr },
762: [SYS_umask] = { Modename },
763: [SYS_chroot] = { Ppath },
764: [SYS_getfsstat] = { Pptr, Pbigsize, Mountflagsname },
765: [SYS_statfs] = { Ppath, Pptr },
766: [SYS_fstatfs] = { Pfd, Pptr },
767: [SYS_fhstatfs] = { Pptr, Pptr },
768: [SYS_gettimeofday] = { Pptr, Pptr },
769: [SYS_settimeofday] = { Pptr, Pptr },
770: [SYS_setitimer] = { Itimername, Pptr, Pptr },
771: [SYS_getitimer] = { Itimername, Pptr },
772: [SYS_select] = { Pcount, Pptr, Pptr, Pptr, Pptr },
773: [SYS_kevent] = { Pfd, Pptr, Pcount, Pptr, Pcount, Pptr },
774: [SYS_munmap] = { Pptr, Pbigsize },
775: [SYS_mprotect] = { Pptr, Pbigsize, Mmapprotname },
776: [SYS_madvise] = { Pptr, Pbigsize, Madvisebehavname },
777: [SYS_utimes] = { Ppath, Pptr },
778: [SYS_futimes] = { Pfd, Pptr },
779: [SYS_mincore] = { Pptr, Pbigsize, Pptr },
780: [SYS_getgroups] = { Pcount, Pptr },
781: [SYS_setgroups] = { Pcount, Pptr },
782: [SYS_setpgid] = { Ppid_t, Ppid_t },
783: [SYS_sendsyslog] = { Pptr, Psize },
784: [SYS_utimensat] = { Atfd, Ppath, Pptr, Atflagsname },
785: [SYS_futimens] = { Pfd, Pptr },
786: [SYS_clock_gettime] = { Clockname, Pptr },
787: [SYS_clock_settime] = { Clockname, Pptr },
788: [SYS_clock_getres] = { Clockname, Pptr },
789: [SYS_dup2] = { Pfd, Pfd },
790: [SYS_nanosleep] = { Pptr, Pptr },
791: [SYS_fcntl] = { Pfd, PASS_TWO, Fcntlcmdname },
792: [SYS_accept4] = { Pfd, Pptr, Pptr, Sockflagsname },
793: [SYS___thrsleep] = { Pptr, Clockname, Pptr, Pptr, Pptr },
794: [SYS_fsync] = { Pfd },
795: [SYS_setpriority] = { Prioname, Ppid_t, Pdecint },
1.99 guenther 796: [SYS_socket] = { Sockfamilyname, Socktypename, Sockprotoname },
1.92 guenther 797: [SYS_connect] = { Pfd, Pptr, Pucount },
798: [SYS_getdents] = { Pfd, Pptr, Pbigsize },
799: [SYS_getpriority] = { Prioname, Ppid_t },
800: [SYS_pipe2] = { Pptr, Flagsname },
801: [SYS_dup3] = { Pfd, Pfd, Flagsname },
802: [SYS_sigreturn] = { Pptr },
803: [SYS_bind] = { Pfd, Pptr, Pucount },
804: [SYS_setsockopt] = { Pfd, PASS_TWO, Sockoptlevelname, Pptr, Pdecint },
805: [SYS_listen] = { Pfd, Pdecint },
806: [SYS_chflagsat] = { Atfd, Ppath, Chflagsname, Atflagsname },
807: [SYS_ppoll] = { Pptr, Pucount, Pptr, Pptr },
808: [SYS_pselect] = { Pcount, Pptr, Pptr, Pptr, Pptr, Pptr },
809: [SYS_sigsuspend] = { Sigset },
810: [SYS_getsockopt] = { Pfd, PASS_TWO, Sockoptlevelname, Pptr, Pptr },
811: [SYS_readv] = { Pfd, Pptr, Pcount },
812: [SYS_writev] = { Pfd, Pptr, Pcount },
1.94 guenther 813: [SYS_fchown] = { Pfd, Uidname, Gidname },
1.92 guenther 814: [SYS_fchmod] = { Pfd, Modename },
1.94 guenther 815: [SYS_setreuid] = { Uidname, Uidname },
816: [SYS_setregid] = { Gidname, Gidname },
1.92 guenther 817: [SYS_rename] = { Ppath, Ppath },
818: [SYS_flock] = { Pfd, Flockname },
819: [SYS_mkfifo] = { Ppath, Modename },
820: [SYS_sendto] = { Pfd, Pptr, Pbigsize, Sendrecvflagsname },
821: [SYS_shutdown] = { Pfd, Shutdownhowname },
1.99 guenther 822: [SYS_socketpair] = { Sockfamilyname, Socktypename, Sockprotoname, Pptr },
1.92 guenther 823: [SYS_mkdir] = { Ppath, Modename },
824: [SYS_rmdir] = { Ppath },
825: [SYS_adjtime] = { Pptr, Pptr },
1.94 guenther 826: [SYS_quotactl] = { Ppath, Quotactlname, Uidname, Pptr },
1.92 guenther 827: [SYS_nfssvc] = { Phexint, Pptr },
828: [SYS_getfh] = { Ppath, Pptr },
829: [SYS_sysarch] = { Pdecint, Pptr },
830: [SYS_pread] = { Pfd, Pptr, Pbigsize, PAD, Poff_t },
831: [SYS_pwrite] = { Pfd, Pptr, Pbigsize, PAD, Poff_t },
1.94 guenther 832: [SYS_setgid] = { Gidname },
833: [SYS_setegid] = { Gidname },
834: [SYS_seteuid] = { Uidname },
1.92 guenther 835: [SYS_pathconf] = { Ppath, Pathconfname },
836: [SYS_fpathconf] = { Pfd, Pathconfname },
837: [SYS_swapctl] = { Swapctlname, Pptr, Pdecint },
838: [SYS_getrlimit] = { Rlimitname, Pptr },
839: [SYS_setrlimit] = { Rlimitname, Pptr },
840: [SYS_mmap] = { Pptr, Pbigsize, Mmapprotname, Mmapflagsname, Pfd, PAD, Poff_t },
841: [SYS_lseek] = { Pfd, PAD, Poff_t, Whencename },
842: [SYS_truncate] = { Ppath, PAD, Poff_t },
843: [SYS_ftruncate] = { Pfd, PAD, Poff_t },
1.105 guenther 844: /* [SYS_sysctl] = { }, Magic */
1.92 guenther 845: [SYS_mlock] = { Pptr, Pbigsize },
846: [SYS_munlock] = { Pptr, Pbigsize },
847: [SYS_getpgid] = { Ppid_t },
848: [SYS_utrace] = { Pptr, Pptr, Psize },
849: [SYS_semget] = { Pkey_t, Pcount, Semgetname },
850: [SYS_msgget] = { Pkey_t, Msgflgname },
851: [SYS_msgsnd] = { Pmsqid, Pptr, Psize, Msgflgname },
852: [SYS_msgrcv] = { Pmsqid, Pptr, Psize, Pdeclong, Msgflgname },
853: [SYS_shmat] = { Pshmid, Pptr, Shmatname },
854: [SYS_shmdt] = { Pptr },
855: [SYS_minherit] = { Pptr, Pbigsize, Minheritname },
856: [SYS_poll] = { Pptr, Pucount, Polltimeout },
1.94 guenther 857: [SYS_lchown] = { Ppath, Uidname, Gidname },
1.92 guenther 858: [SYS_getsid] = { Ppid_t },
859: [SYS_msync] = { Pptr, Pbigsize, Msyncflagsname },
860: [SYS_pipe] = { Pptr },
861: [SYS_fhopen] = { Pptr, Openflagsname },
862: [SYS_preadv] = { Pfd, Pptr, Pcount, PAD, Poff_t },
863: [SYS_pwritev] = { Pfd, Pptr, Pcount, PAD, Poff_t },
864: [SYS_mlockall] = { Mlockallname },
865: [SYS_getresuid] = { Pptr, Pptr, Pptr },
1.94 guenther 866: [SYS_setresuid] = { Uidname, Uidname, Uidname },
1.92 guenther 867: [SYS_getresgid] = { Pptr, Pptr, Pptr },
1.94 guenther 868: [SYS_setresgid] = { Gidname, Gidname, Gidname },
1.92 guenther 869: [SYS_mquery] = { Pptr, Pbigsize, Mmapprotname, Mmapflagsname, Pfd, PAD, Poff_t },
870: [SYS_closefrom] = { Pfd },
871: [SYS_sigaltstack] = { Pptr, Pptr },
872: [SYS_shmget] = { Pkey_t, Pbigsize, Semgetname },
873: [SYS_semop] = { Psemid, Pptr, Psize },
874: [SYS_fhstat] = { Pptr, Pptr },
875: [SYS___semctl] = { Psemid, Pcount, Semctlname, Pptr },
876: [SYS_shmctl] = { Pshmid, Shmctlname, Pptr },
877: [SYS_msgctl] = { Pmsqid, Shmctlname, Pptr },
878: [SYS___thrwakeup] = { Pptr, Pcount },
879: [SYS___threxit] = { Pptr },
880: [SYS___thrsigdivert] = { Sigset, Pptr, Pptr },
881: [SYS___getcwd] = { Pptr, Psize },
882: [SYS_adjfreq] = { Pptr, Pptr },
883: [SYS_setrtable] = { Pdecint },
884: [SYS_faccessat] = { Atfd, Ppath, Accessmodename, Atflagsname },
885: [SYS_fchmodat] = { Atfd, Ppath, Modename, Atflagsname },
1.94 guenther 886: [SYS_fchownat] = { Atfd, Ppath, Uidname, Gidname, Atflagsname },
1.92 guenther 887: [SYS_linkat] = { Atfd, Ppath, Atfd, Ppath, Atflagsname },
888: [SYS_mkdirat] = { Atfd, Ppath, Modename },
889: [SYS_mkfifoat] = { Atfd, Ppath, Modename },
890: [SYS_mknodat] = { Atfd, Ppath, Modename, Pdev_t },
891: [SYS_openat] = { Atfd, Ppath, PASS_TWO, Flagsandmodename },
892: [SYS_readlinkat] = { Atfd, Ppath, Pptr, Psize },
893: [SYS_renameat] = { Atfd, Ppath, Atfd, Ppath },
1.98 guenther 894: [SYS_symlinkat] = { Ppath, Atfd, Ppath },
1.92 guenther 895: [SYS_unlinkat] = { Atfd, Ppath, Atflagsname },
896: [SYS___set_tcb] = { Pptr },
897: };
898:
1.51 otto 899:
1.12 espie 900: static void
1.93 jsg 901: ktrsyscall(struct ktr_syscall *ktr, size_t ktrlen)
1.1 deraadt 902: {
1.92 guenther 903: register_t *ap;
904: int narg;
905: char sep;
906:
1.93 jsg 907: if (ktr->ktr_argsize > ktrlen)
908: errx(1, "syscall argument length %d > ktr header length %zu",
909: ktr->ktr_argsize, ktrlen);
910:
1.52 otto 911: narg = ktr->ktr_argsize / sizeof(register_t);
912: sep = '\0';
1.1 deraadt 913:
914: if (ktr->ktr_code >= current->nsysnames || ktr->ktr_code < 0)
915: (void)printf("[%d]", ktr->ktr_code);
916: else
917: (void)printf("%s", current->sysnames[ktr->ktr_code]);
918: ap = (register_t *)((char *)ktr + sizeof(struct ktr_syscall));
1.27 mickey 919: (void)putchar('(');
1.52 otto 920:
1.54 otto 921: if (current != &emulations[0])
922: goto nonnative;
923:
1.105 guenther 924: if (ktr->ktr_code == SYS_sysctl) {
1.62 otto 925: const char *s;
1.94 guenther 926: int n, i, *top;
1.52 otto 927:
928: if (!fancy)
1.92 guenther 929: goto nonnative;
1.52 otto 930: n = ap[1];
931: if (n > CTL_MAXNAME)
932: n = CTL_MAXNAME;
1.93 jsg 933: if (n < 0)
934: errx(1, "invalid sysctl length %d", n);
1.94 guenther 935: if (n > 0) {
936: top = (int *)(ap + 6);
937: printf("%d", top[0]);
938: for (i = 1; i < n; i++)
939: printf(".%d", top[i]);
940: if ((s = kresolvsysctl(0, top)) != NULL) {
941: printf("<%s", s);
942: for (i = 1; i < n; i++) {
943: if ((s = kresolvsysctl(i, top)) != NULL)
944: printf(".%s", s);
945: else
946: printf(".%d", top[i]);
947: }
948: putchar('>');
949: }
1.1 deraadt 950: }
1.52 otto 951:
952: sep = ',';
953: ap += 2;
954: narg -= 2;
1.92 guenther 955: } else if (ktr->ktr_code < nitems(scargs)) {
956: const formatter *fmts = scargs[ktr->ktr_code];
957: int fmt;
1.52 otto 958:
1.92 guenther 959: while (narg && (fmt = *fmts) != 0) {
960: if (sep)
961: putchar(sep);
962: sep = ',';
963: if (!fancy && !FMT_IS_NONFANCY(fmt))
964: fmt = Pnonfancy;
965: if (fmt > 0)
966: formatters[fmt]((int)*ap);
967: else if (long_formatters[-fmt](*ap))
968: sep = '\0';
969: fmts++;
970: ap++;
971: narg--;
972: }
1.52 otto 973: }
974:
1.54 otto 975: nonnative:
1.93 jsg 976: while (narg > 0) {
1.52 otto 977: if (sep)
978: putchar(sep);
979: if (decimal)
980: (void)printf("%ld", (long)*ap);
981: else
982: (void)printf("%#lx", (long)*ap);
983: sep = ',';
984: ap++;
985: narg--;
1.1 deraadt 986: }
1.27 mickey 987: (void)printf(")\n");
1.62 otto 988: }
989:
990: static struct ctlname topname[] = CTL_NAMES;
991: static struct ctlname kernname[] = CTL_KERN_NAMES;
992: static struct ctlname vmname[] = CTL_VM_NAMES;
993: static struct ctlname fsname[] = CTL_FS_NAMES;
994: static struct ctlname netname[] = CTL_NET_NAMES;
995: static struct ctlname hwname[] = CTL_HW_NAMES;
996: static struct ctlname debugname[CTL_DEBUG_MAXID];
997: static struct ctlname kernmallocname[] = CTL_KERN_MALLOC_NAMES;
998: static struct ctlname forkstatname[] = CTL_KERN_FORKSTAT_NAMES;
999: static struct ctlname nchstatsname[] = CTL_KERN_NCHSTATS_NAMES;
1.88 guenther 1000: static struct ctlname kernprocname[] = {
1.64 guenther 1001: { NULL },
1002: { "all" },
1003: { "pid" },
1004: { "pgrp" },
1005: { "session" },
1006: { "tty" },
1007: { "uid" },
1008: { "ruid" },
1.77 guenther 1009: { "kthread" },
1.64 guenther 1010: };
1.62 otto 1011: static struct ctlname ttysname[] = CTL_KERN_TTY_NAMES;
1012: static struct ctlname semname[] = CTL_KERN_SEMINFO_NAMES;
1013: static struct ctlname shmname[] = CTL_KERN_SHMINFO_NAMES;
1014: static struct ctlname watchdogname[] = CTL_KERN_WATCHDOG_NAMES;
1015: static struct ctlname tcname[] = CTL_KERN_TIMECOUNTER_NAMES;
1016: #ifdef CTL_MACHDEP_NAMES
1017: static struct ctlname machdepname[] = CTL_MACHDEP_NAMES;
1018: #endif
1019: static struct ctlname ddbname[] = CTL_DDB_NAMES;
1020:
1021: #ifndef nitems
1022: #define nitems(_a) (sizeof((_a)) / sizeof((_a)[0]))
1023: #endif
1024:
1025: #define SETNAME(name) do { names = (name); limit = nitems(name); } while (0)
1026:
1027: static const char *
1.94 guenther 1028: kresolvsysctl(int depth, const int *top)
1.62 otto 1029: {
1030: struct ctlname *names;
1031: size_t limit;
1.94 guenther 1032: int idx = top[depth];
1.62 otto 1033:
1034: names = NULL;
1035:
1036: switch (depth) {
1037: case 0:
1038: SETNAME(topname);
1039: break;
1040: case 1:
1041: switch (top[0]) {
1042: case CTL_KERN:
1043: SETNAME(kernname);
1044: break;
1045: case CTL_VM:
1046: SETNAME(vmname);
1047: break;
1048: case CTL_FS:
1049: SETNAME(fsname);
1050: break;
1051: case CTL_NET:
1052: SETNAME(netname);
1053: break;
1054: case CTL_DEBUG:
1055: SETNAME(debugname);
1056: break;
1057: case CTL_HW:
1058: SETNAME(hwname);
1059: break;
1060: #ifdef CTL_MACHDEP_NAMES
1061: case CTL_MACHDEP:
1062: SETNAME(machdepname);
1063: break;
1064: #endif
1065: case CTL_DDB:
1066: SETNAME(ddbname);
1067: break;
1068: }
1069: break;
1070: case 2:
1071: switch (top[0]) {
1072: case CTL_KERN:
1073: switch (top[1]) {
1074: case KERN_MALLOCSTATS:
1075: SETNAME(kernmallocname);
1076: break;
1077: case KERN_FORKSTAT:
1078: SETNAME(forkstatname);
1079: break;
1080: case KERN_NCHSTATS:
1081: SETNAME(nchstatsname);
1082: break;
1083: case KERN_TTY:
1084: SETNAME(ttysname);
1085: break;
1086: case KERN_SEMINFO:
1087: SETNAME(semname);
1088: break;
1089: case KERN_SHMINFO:
1090: SETNAME(shmname);
1091: break;
1092: case KERN_WATCHDOG:
1093: SETNAME(watchdogname);
1094: break;
1.64 guenther 1095: case KERN_PROC:
1096: idx++; /* zero is valid at this level */
1097: SETNAME(kernprocname);
1098: break;
1.62 otto 1099: case KERN_TIMECOUNTER:
1100: SETNAME(tcname);
1101: break;
1102: }
1103: }
1104: break;
1105: }
1106: if (names != NULL && idx > 0 && idx < limit)
1107: return (names[idx].ctl_name);
1108: return (NULL);
1.1 deraadt 1109: }
1110:
1.12 espie 1111: static void
1.103 guenther 1112: ktrsysret(struct ktr_sysret *ktr, size_t ktrlen)
1.1 deraadt 1113: {
1.103 guenther 1114: register_t ret = 0;
1115: long long retll;
1.12 espie 1116: int error = ktr->ktr_error;
1117: int code = ktr->ktr_code;
1.1 deraadt 1118:
1.103 guenther 1119: if (ktrlen < sizeof(*ktr))
1120: errx(1, "sysret length %zu < ktr header length %zu",
1121: ktrlen, sizeof(*ktr));
1122: ktrlen -= sizeof(*ktr);
1123: if (error == 0) {
1124: if (ktrlen == sizeof(ret)) {
1125: memcpy(&ret, ktr+1, sizeof(ret));
1126: retll = ret;
1127: } else if (ktrlen == sizeof(retll))
1128: memcpy(&retll, ktr+1, sizeof(retll));
1129: else
1130: errx(1, "sysret bogus length %zu", ktrlen);
1131: }
1132:
1.1 deraadt 1133: if (code >= current->nsysnames || code < 0)
1134: (void)printf("[%d] ", code);
1.59 otto 1135: else {
1.1 deraadt 1136: (void)printf("%s ", current->sysnames[code]);
1.103 guenther 1137: if (error == 0 && ret > 0 &&
1138: (strcmp(current->sysnames[code], "fork") == 0 ||
1.59 otto 1139: strcmp(current->sysnames[code], "vfork") == 0 ||
1.64 guenther 1140: strcmp(current->sysnames[code], "__tfork") == 0 ||
1.59 otto 1141: strcmp(current->sysnames[code], "clone") == 0))
1142: mappidtoemul(ret, current);
1143: }
1.1 deraadt 1144:
1145: if (error == 0) {
1146: if (fancy) {
1.64 guenther 1147: switch (current == &emulations[0] ? code : -1) {
1.103 guenther 1148: case SYS_lseek:
1149: (void)printf("%lld", retll);
1150: if (retll < 0 || retll > 9)
1151: (void)printf("/%#llx", retll);
1152: break;
1.64 guenther 1153: case SYS_sigprocmask:
1.73 guenther 1154: case SYS_sigpending:
1.64 guenther 1155: sigset(ret);
1156: break;
1157: case SYS___thrsigdivert:
1158: signame(ret);
1.94 guenther 1159: break;
1160: case SYS_getuid:
1161: case SYS_geteuid:
1162: uidname(ret);
1163: break;
1164: case SYS_getgid:
1165: case SYS_getegid:
1166: gidname(ret);
1.64 guenther 1167: break;
1168: case -1: /* non-default emulation */
1169: default:
1170: (void)printf("%ld", (long)ret);
1171: if (ret < 0 || ret > 9)
1172: (void)printf("/%#lx", (long)ret);
1173: }
1.1 deraadt 1174: } else {
1175: if (decimal)
1.103 guenther 1176: (void)printf("%lld", retll);
1.1 deraadt 1177: else
1.103 guenther 1178: (void)printf("%#llx", retll);
1.1 deraadt 1179: }
1180: } else if (error == ERESTART)
1181: (void)printf("RESTART");
1182: else if (error == EJUSTRETURN)
1183: (void)printf("JUSTRETURN");
1184: else {
1185: (void)printf("-1 errno %d", ktr->ktr_error);
1186: if (fancy)
1187: (void)printf(" %s", strerror(ktr->ktr_error));
1188: }
1189: (void)putchar('\n');
1190: }
1191:
1.12 espie 1192: static void
1.37 tedu 1193: ktrnamei(const char *cp, size_t len)
1.1 deraadt 1194: {
1.37 tedu 1195: (void)printf("\"%.*s\"\n", (int)len, cp);
1.1 deraadt 1196: }
1197:
1.12 espie 1198: static void
1.37 tedu 1199: ktremul(char *cp, size_t len)
1.1 deraadt 1200: {
1201: char name[1024];
1202:
1203: if (len >= sizeof(name))
1204: errx(1, "Emulation name too long");
1205:
1206: strncpy(name, cp, len);
1207: name[len] = '\0';
1208: (void)printf("\"%s\"\n", name);
1209:
1210: setemul(name);
1211: }
1212:
1.12 espie 1213: static void
1.106 guenther 1214: showbufc(const char *prefix, unsigned char *dp, size_t datalen)
1215: {
1216: int i, j;
1217: int col, width, bpl;
1218: unsigned char visbuf[5], *cp, c;
1219:
1220: (void)printf(" ");
1221:
1222: col = 8;
1223: if (prefix != NULL) {
1224: printf("%s", prefix);
1225: col += strlen(prefix);
1226: }
1227:
1228: putchar('"');
1229: for (; datalen > 0; datalen--, dp++) {
1230: (void)vis(visbuf, *dp, VIS_CSTYLE, *(dp+1));
1231: cp = visbuf;
1232:
1233: /*
1234: * Keep track of printables and
1235: * space chars (like fold(1)).
1236: */
1237: if (col == 0) {
1238: (void)putchar('\t');
1239: col = 8;
1240: }
1241: switch (*cp) {
1242: case '\n':
1243: col = 0;
1244: (void)putchar('\n');
1245: continue;
1246: case '\t':
1247: width = 8 - (col&07);
1248: break;
1249: default:
1250: width = strlen(cp);
1251: }
1252: if (col + width > (screenwidth-2)) {
1253: (void)printf("\\\n\t");
1254: col = 8;
1255: }
1256: col += width;
1257: do {
1258: (void)putchar(*cp++);
1259: } while (*cp);
1260: }
1261: if (col == 0)
1262: (void)printf(" ");
1263: (void)printf("\"\n");
1264: }
1265:
1266: static void
1.81 miod 1267: showbuf(unsigned char *dp, size_t datalen)
1.1 deraadt 1268: {
1.37 tedu 1269: int i, j;
1.31 tedu 1270: int col = 0, width, bpl;
1.32 tedu 1271: unsigned char visbuf[5], *cp, c;
1.1 deraadt 1272:
1.31 tedu 1273: if (iohex == 1) {
1274: putchar('\t');
1275: col = 8;
1276: for (i = 0; i < datalen; i++) {
1.35 tedu 1277: printf("%02x", dp[i]);
1.31 tedu 1278: col += 3;
1279: if (i < datalen - 1) {
1280: if (col + 3 > screenwidth) {
1281: printf("\n\t");
1282: col = 8;
1283: } else
1284: putchar(' ');
1285: }
1286: }
1287: putchar('\n');
1288: return;
1289: }
1290: if (iohex == 2) {
1291: bpl = (screenwidth - 13)/4;
1292: if (bpl <= 0)
1293: bpl = 1;
1294: for (i = 0; i < datalen; i += bpl) {
1295: printf(" %04x: ", i);
1296: for (j = 0; j < bpl; j++) {
1297: if (i+j >= datalen)
1298: printf(" ");
1299: else
1.35 tedu 1300: printf("%02x ", dp[i+j]);
1.31 tedu 1301: }
1302: putchar(' ');
1303: for (j = 0; j < bpl; j++) {
1304: if (i+j >= datalen)
1305: break;
1306: c = dp[i+j];
1307: if (!isprint(c))
1308: c = '.';
1309: putchar(c);
1310: }
1311: putchar('\n');
1312: }
1313: return;
1314: }
1.106 guenther 1315: showbufc(NULL, dp, datalen);
1.1 deraadt 1316: }
1317:
1.12 espie 1318: static void
1.81 miod 1319: ktrgenio(struct ktr_genio *ktr, size_t len)
1320: {
1321: unsigned char *dp = (unsigned char *)ktr + sizeof(struct ktr_genio);
1.93 jsg 1322: size_t datalen;
1323:
1324: if (len < sizeof(struct ktr_genio))
1325: errx(1, "invalid ktr genio length %zu", len);
1326:
1327: datalen = len - sizeof(struct ktr_genio);
1.81 miod 1328:
1329: printf("fd %d %s %zu bytes\n", ktr->ktr_fd,
1330: ktr->ktr_rw == UIO_READ ? "read" : "wrote", datalen);
1331: if (maxdata == 0)
1332: return;
1333: if (datalen > maxdata)
1334: datalen = maxdata;
1335: if (iohex && !datalen)
1336: return;
1337: showbuf(dp, datalen);
1338: }
1339:
1340: static void
1.17 deraadt 1341: ktrpsig(struct ktr_psig *psig)
1.1 deraadt 1342: {
1.93 jsg 1343: signame(psig->signo);
1.96 bluhm 1344: printf(" ");
1.1 deraadt 1345: if (psig->action == SIG_DFL)
1.63 deraadt 1346: (void)printf("SIG_DFL");
1.64 guenther 1347: else {
1348: (void)printf("caught handler=0x%lx mask=",
1349: (u_long)psig->action);
1350: sigset(psig->mask);
1351: }
1.63 deraadt 1352: if (psig->code) {
1353: printf(" code ");
1354: if (fancy) {
1355: switch (psig->signo) {
1356: case SIGILL:
1357: sigill_name(psig->code);
1358: break;
1359: case SIGTRAP:
1360: sigtrap_name(psig->code);
1361: break;
1362: case SIGEMT:
1363: sigemt_name(psig->code);
1364: break;
1365: case SIGFPE:
1366: sigfpe_name(psig->code);
1367: break;
1368: case SIGBUS:
1369: sigbus_name(psig->code);
1370: break;
1371: case SIGSEGV:
1372: sigsegv_name(psig->code);
1373: break;
1374: case SIGCHLD:
1375: sigchld_name(psig->code);
1376: break;
1377: }
1378: }
1379: printf("<%d>", psig->code);
1380: }
1381:
1.14 deraadt 1382: switch (psig->signo) {
1383: case SIGSEGV:
1384: case SIGILL:
1385: case SIGBUS:
1386: case SIGFPE:
1387: printf(" addr=%p trapno=%d", psig->si.si_addr,
1388: psig->si.si_trapno);
1389: break;
1390: default:
1391: break;
1392: }
1393: printf("\n");
1.1 deraadt 1394: }
1395:
1.64 guenther 1396: static void
1.81 miod 1397: ktruser(struct ktr_user *usr, size_t len)
1398: {
1.93 jsg 1399: if (len < sizeof(struct ktr_user))
1400: errx(1, "invalid ktr user length %zu", len);
1.81 miod 1401: len -= sizeof(struct ktr_user);
1402: printf("%.*s:", KTR_USER_MAXIDLEN, usr->ktr_id);
1403: printf(" %zu bytes\n", len);
1404: showbuf((unsigned char *)(usr + 1), len);
1.106 guenther 1405: }
1406:
1407: static void
1408: ktrexec(const char *ptr, size_t len)
1409: {
1410: char buf[sizeof("[2147483648] = ")];
1411: int i;
1412: size_t l;
1413:
1414: putchar('\n');
1415: i = 0;
1416: while (len > 0) {
1417: l = strnlen(ptr, len);
1418: snprintf(buf, sizeof(buf), "[%d] = ", i++);
1419: showbufc(buf, (unsigned char *)ptr, l);
1420: if (l == len) {
1421: printf("\tunterminated argument\n");
1422: break;
1423: }
1424: len -= l + 1;
1425: ptr += l + 1;
1426: }
1.81 miod 1427: }
1428:
1429: static void
1.17 deraadt 1430: usage(void)
1.1 deraadt 1431: {
1432:
1.19 mickey 1433: extern char *__progname;
1434: fprintf(stderr, "usage: %s "
1.95 jmc 1435: "[-dHlnRTXx] [-e emulation] [-f file] [-m maxdata] [-p pid]\n"
1.107 ! jmc 1436: "%*s[-t [ceinstuxX+]]\n",
1.51 otto 1437: __progname, (int)(sizeof("usage: ") + strlen(__progname)), "");
1.1 deraadt 1438: exit(1);
1439: }
1440:
1.12 espie 1441: static void
1.17 deraadt 1442: setemul(const char *name)
1.1 deraadt 1443: {
1444: int i;
1.17 deraadt 1445:
1.1 deraadt 1446: for (i = 0; emulations[i].name != NULL; i++)
1447: if (strcmp(emulations[i].name, name) == 0) {
1448: current = &emulations[i];
1449: return;
1450: }
1451: warnx("Emulation `%s' unknown", name);
1.61 matthew 1452: }
1453:
1.92 guenther 1454: /*
1455: * FORMATTERS
1456: */
1457:
1458: static void
1459: ioctldecode(int cmd)
1460: {
1461: char dirbuf[4], *dir = dirbuf;
1462: const char *cp;
1463:
1464: if ((cp = ioctlname((unsigned)cmd)) != NULL) {
1465: (void)printf("%s", cp);
1466: return;
1467: }
1468:
1469: if (cmd & IOC_IN)
1470: *dir++ = 'W';
1471: if (cmd & IOC_OUT)
1472: *dir++ = 'R';
1473: *dir = '\0';
1474:
1475: printf("_IO%s('%c',%lu",
1476: dirbuf, (int)((cmd >> 8) & 0xff), cmd & 0xff);
1477: if ((cmd & IOC_VOID) == 0)
1478: printf(decimal ? ",%u)" : ",%#x)", (cmd >> 16) & 0xff);
1479: else
1480: printf(")");
1481: }
1482:
1483: static void
1484: ptracedecode(int request)
1485: {
1486: if (request >= 0 && request < nitems(ptrace_ops))
1487: (void)printf("%s", ptrace_ops[request]);
1488: else switch(request) {
1489: #ifdef PT_GETFPREGS
1490: case PT_GETFPREGS:
1491: (void)printf("PT_GETFPREGS");
1492: break;
1493: #endif
1494: case PT_GETREGS:
1495: (void)printf("PT_GETREGS");
1496: break;
1497: #ifdef PT_GETXMMREGS
1498: case PT_GETXMMREGS:
1499: (void)printf("PT_GETXMMREGS");
1500: break;
1501: #endif
1502: #ifdef PT_SETFPREGS
1503: case PT_SETFPREGS:
1504: (void)printf("PT_SETFPREGS");
1505: break;
1506: #endif
1507: case PT_SETREGS:
1508: (void)printf("PT_SETREGS");
1509: break;
1510: #ifdef PT_SETXMMREGS
1511: case PT_SETXMMREGS:
1512: (void)printf("PT_SETXMMREGS");
1513: break;
1514: #endif
1515: #ifdef PT_STEP
1516: case PT_STEP:
1517: (void)printf("PT_STEP");
1518: break;
1519: #endif
1520: #ifdef PT_WCOOKIE
1521: case PT_WCOOKIE:
1522: (void)printf("PT_WCOOKIE");
1523: break;
1524: #endif
1525: default:
1526: pdecint(request);
1527: }
1528: }
1529:
1530:
1.61 matthew 1531: static void
1532: atfd(int fd)
1533: {
1534: if (fd == AT_FDCWD)
1535: (void)printf("AT_FDCWD");
1536: else
1.92 guenther 1537: pdecint(fd);
1.77 guenther 1538: }
1539:
1540: static void
1541: polltimeout(int timeout)
1542: {
1543: if (timeout == INFTIM)
1544: (void)printf("INFTIM");
1545: else
1.92 guenther 1546: pdecint(timeout);
1.82 guenther 1547: }
1548:
1549: static void
1550: wait4pid(int pid)
1551: {
1552: if (pid == WAIT_ANY)
1553: (void)printf("WAIT_ANY");
1554: else if (pid == WAIT_MYPGRP)
1555: (void)printf("WAIT_MYPGRP");
1556: else
1.92 guenther 1557: pdecint(pid); /* ppgid */
1.1 deraadt 1558: }
1.83 guenther 1559:
1560: static void
1561: signame(int sig)
1562: {
1563: if (sig > 0 && sig < NSIG)
1564: (void)printf("SIG%s", sys_signame[sig]);
1565: else
1566: (void)printf("SIG %d", sig);
1567: }
1568:
1.84 guenther 1569: void
1.83 guenther 1570: sigset(int ss)
1571: {
1572: int or = 0;
1573: int cnt = 0;
1574: int i;
1575:
1576: for (i = 1; i < NSIG; i++)
1577: if (sigismember(&ss, i))
1578: cnt++;
1579: if (cnt > (NSIG-1)/2) {
1580: ss = ~ss;
1581: putchar('~');
1582: }
1583:
1584: if (ss == 0) {
1585: (void)printf("0<>");
1586: return;
1587: }
1588:
1589: printf("%#x<", ss);
1590: for (i = 1; i < NSIG; i++)
1591: if (sigismember(&ss, i)) {
1592: if (or) putchar('|'); else or=1;
1593: signame(i);
1594: }
1595: printf(">");
1596: }
1597:
1598: static void
1599: semctlname(int cmd)
1600: {
1601: switch (cmd) {
1602: case GETNCNT:
1603: (void)printf("GETNCNT");
1604: break;
1605: case GETPID:
1606: (void)printf("GETPID");
1607: break;
1608: case GETVAL:
1609: (void)printf("GETVAL");
1610: break;
1611: case GETALL:
1612: (void)printf("GETALL");
1613: break;
1614: case GETZCNT:
1615: (void)printf("GETZCNT");
1616: break;
1617: case SETVAL:
1618: (void)printf("SETVAL");
1619: break;
1620: case SETALL:
1621: (void)printf("SETALL");
1622: break;
1623: case IPC_RMID:
1624: (void)printf("IPC_RMID");
1625: break;
1626: case IPC_SET:
1627: (void)printf("IPC_SET");
1628: break;
1629: case IPC_STAT:
1630: (void)printf("IPC_STAT");
1631: break;
1632: default: /* Should not reach */
1.92 guenther 1633: (void)printf("<invalid=%d>", cmd);
1.83 guenther 1634: }
1635: }
1636:
1637: static void
1.88 guenther 1638: shmctlname(int cmd)
1639: {
1.83 guenther 1640: switch (cmd) {
1641: case IPC_RMID:
1642: (void)printf("IPC_RMID");
1643: break;
1644: case IPC_SET:
1645: (void)printf("IPC_SET");
1646: break;
1647: case IPC_STAT:
1648: (void)printf("IPC_STAT");
1649: break;
1650: default: /* Should not reach */
1.92 guenther 1651: (void)printf("<invalid=%d>", cmd);
1.83 guenther 1652: }
1653: }
1654:
1655:
1656: static void
1.88 guenther 1657: semgetname(int flag)
1658: {
1.83 guenther 1659: int or = 0;
1660: if_print_or(flag, IPC_CREAT, or);
1661: if_print_or(flag, IPC_EXCL, or);
1662: if_print_or(flag, SEM_R, or);
1663: if_print_or(flag, SEM_A, or);
1664: if_print_or(flag, (SEM_R>>3), or);
1665: if_print_or(flag, (SEM_A>>3), or);
1666: if_print_or(flag, (SEM_R>>6), or);
1667: if_print_or(flag, (SEM_A>>6), or);
1.92 guenther 1668:
1669: if (flag & ~(IPC_CREAT|IPC_EXCL|SEM_R|SEM_A|((SEM_R|SEM_A)>>3)|
1670: ((SEM_R|SEM_A)>>6)))
1671: printf("<invalid=%#x>", flag);
1.83 guenther 1672: }
1673:
1674:
1675: /*
1.92 guenther 1676: * Only used by SYS_open and SYS_openat. Unless O_CREAT is set in flags, the
1.83 guenther 1677: * mode argument is unused (and often bogus and misleading).
1678: */
1679: static void
1.92 guenther 1680: flagsandmodename(int mode)
1.88 guenther 1681: {
1.92 guenther 1682: openflagsname(arg1);
1683: if ((arg1 & O_CREAT) == O_CREAT) {
1.83 guenther 1684: (void)putchar(',');
1.92 guenther 1685: modename(mode);
1686: } else if (!fancy)
1687: (void)printf(",<unused>%#o", mode);
1.83 guenther 1688: }
1689:
1690: static void
1691: clockname(int clockid)
1692: {
1693: clocktypename(__CLOCK_TYPE(clockid));
1694: if (__CLOCK_PTID(clockid) != 0)
1695: printf("(%d)", __CLOCK_PTID(clockid));
1696: }
1697:
1698: /*
1699: * [g|s]etsockopt's level argument can either be SOL_SOCKET or a value
1.100 guenther 1700: * referring to a line in /etc/protocols.
1.83 guenther 1701: */
1702: static void
1.100 guenther 1703: sockoptlevelname(int optname)
1.83 guenther 1704: {
1.100 guenther 1705: struct protoent *pe;
1706:
1707: if (arg1 == SOL_SOCKET) {
1708: (void)printf("SOL_SOCKET,");
1709: sockoptname(optname);
1710: } else {
1711: pe = getprotobynumber(arg1);
1712: (void)printf("%u<%s>,%d", arg1,
1713: pe != NULL ? pe->p_name : "unknown", optname);
1714: }
1.83 guenther 1715: }
1716:
1.88 guenther 1717: static void
1718: ktraceopname(int ops)
1719: {
1720: int invalid = 0;
1721:
1722: printf("%#x<", ops);
1723: switch (KTROP(ops)) {
1724: case KTROP_SET:
1725: printf("KTROP_SET");
1726: break;
1727: case KTROP_CLEAR:
1728: printf("KTROP_CLEAR");
1729: break;
1730: case KTROP_CLEARFILE:
1731: printf("KTROP_CLEARFILE");
1732: break;
1733: default:
1734: printf("KTROP(%d)", KTROP(ops));
1735: invalid = 1;
1736: break;
1737: }
1.92 guenther 1738: if (ops & KTRFLAG_DESCEND) printf("|KTRFLAG_DESCEND");
1.88 guenther 1739: printf(">");
1740: if (invalid || (ops & ~(KTROP((unsigned)-1) | KTRFLAG_DESCEND)))
1.92 guenther 1741: (void)printf("<invalid>%d", ops);
1.88 guenther 1742: }