1 /*-
2 * SPDX-License-Identifier: BSD-3-Clause
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.
15 * 3. Neither the name of the University nor the names of its contributors
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
32 #ifndef lint
33 static const char copyright[] =
34 "@(#) Copyright (c) 1988, 1993\n\
35 The Regents of the University of California. All rights reserved.\n";
36 #endif /* not lint */
37
38 #ifndef lint
39 #if 0
40 static char sccsid[] = "@(#)kdump.c 8.1 (Berkeley) 6/6/93";
41 #endif
42 #endif /* not lint */
43 #include <sys/cdefs.h>
44 __FBSDID("$FreeBSD$");
45
46 #define _WANT_KERNEL_ERRNO
47 #ifdef __LP64__
48 #define _WANT_KEVENT32
49 #endif
50 #define _WANT_FREEBSD11_KEVENT
51 #include <sys/param.h>
52 #include <sys/capsicum.h>
53 #include <sys/errno.h>
54 #include <sys/time.h>
55 #include <sys/uio.h>
56 #include <sys/event.h>
57 #include <sys/ktrace.h>
58 #include <sys/mman.h>
59 #include <sys/ioctl.h>
60 #include <sys/socket.h>
61 #include <sys/stat.h>
62 #include <sys/sysent.h>
63 #include <sys/umtx.h>
64 #include <sys/un.h>
65 #include <sys/queue.h>
66 #include <sys/wait.h>
67 #ifdef WITH_CASPER
68 #include <sys/nv.h>
69 #endif
70 #include <arpa/inet.h>
71 #include <netinet/in.h>
72 #include <ctype.h>
73 #include <capsicum_helpers.h>
74 #include <err.h>
75 #include <grp.h>
76 #include <inttypes.h>
77 #include <locale.h>
78 #include <netdb.h>
79 #include <nl_types.h>
80 #include <pwd.h>
81 #include <stddef.h>
82 #include <stdio.h>
83 #include <stdlib.h>
84 #include <string.h>
85 #include <sysdecode.h>
86 #include <time.h>
87 #include <unistd.h>
88 #include <vis.h>
89 #include "ktrace.h"
90
91 #ifdef WITH_CASPER
92 #include <libcasper.h>
93
94 #include <casper/cap_grp.h>
95 #include <casper/cap_pwd.h>
96 #endif
97
98 int fetchprocinfo(struct ktr_header *, u_int *);
99 u_int findabi(struct ktr_header *);
100 int fread_tail(void *, int, int);
101 void dumpheader(struct ktr_header *, u_int);
102 void ktrsyscall(struct ktr_syscall *, u_int);
103 void ktrsysret(struct ktr_sysret *, u_int);
104 void ktrnamei(char *, int);
105 void hexdump(char *, int, int);
106 void visdump(char *, int, int);
107 void ktrgenio(struct ktr_genio *, int);
108 void ktrpsig(struct ktr_psig *);
109 void ktrcsw(struct ktr_csw *);
110 void ktrcsw_old(struct ktr_csw_old *);
111 void ktruser(int, void *);
112 void ktrcaprights(cap_rights_t *);
113 void ktritimerval(struct itimerval *it);
114 void ktrsockaddr(struct sockaddr *);
115 void ktrstat(struct stat *);
116 void ktrstruct(char *, size_t);
117 void ktrcapfail(struct ktr_cap_fail *);
118 void ktrfault(struct ktr_fault *);
119 void ktrfaultend(struct ktr_faultend *);
120 void ktrkevent(struct kevent *);
121 void ktrstructarray(struct ktr_struct_array *, size_t);
122 void usage(void);
123
124 #define TIMESTAMP_NONE 0x0
125 #define TIMESTAMP_ABSOLUTE 0x1
126 #define TIMESTAMP_ELAPSED 0x2
127 #define TIMESTAMP_RELATIVE 0x4
128
129 static bool abiflag, decimal, fancy = true, resolv, suppressdata, syscallno,
130 tail, threads;
131 static int timestamp, maxdata;
132 static const char *tracefile = DEF_TRACEFILE;
133 static struct ktr_header ktr_header;
134
135 #define TIME_FORMAT "%b %e %T %Y"
136 #define eqs(s1, s2) (strcmp((s1), (s2)) == 0)
137
138 #define print_number64(first,i,n,c) do { \
139 uint64_t __v; \
140 \
141 if (quad_align && (((ptrdiff_t)((i) - (first))) & 1) == 1) { \
142 (i)++; \
143 (n)--; \
144 } \
145 if (quad_slots == 2) \
146 __v = (uint64_t)(uint32_t)(i)[0] | \
147 ((uint64_t)(uint32_t)(i)[1]) << 32; \
148 else \
149 __v = (uint64_t)*(i); \
150 if (decimal) \
151 printf("%c%jd", (c), (intmax_t)__v); \
152 else \
153 printf("%c%#jx", (c), (uintmax_t)__v); \
154 (i) += quad_slots; \
155 (n) -= quad_slots; \
156 (c) = ','; \
157 } while (0)
158
159 #define print_number(i,n,c) do { \
160 if (decimal) \
161 printf("%c%jd", c, (intmax_t)*i); \
162 else \
163 printf("%c%#jx", c, (uintmax_t)(u_register_t)*i); \
164 i++; \
165 n--; \
166 c = ','; \
167 } while (0)
168
169 struct proc_info
170 {
171 TAILQ_ENTRY(proc_info) info;
172 u_int sv_flags;
173 pid_t pid;
174 };
175
176 static TAILQ_HEAD(trace_procs, proc_info) trace_procs;
177
178 #ifdef WITH_CASPER
179 static cap_channel_t *cappwd, *capgrp;
180
181 static int
cappwdgrp_setup(cap_channel_t ** cappwdp,cap_channel_t ** capgrpp)182 cappwdgrp_setup(cap_channel_t **cappwdp, cap_channel_t **capgrpp)
183 {
184 cap_channel_t *capcas, *cappwdloc, *capgrploc;
185 const char *cmds[1], *fields[1];
186
187 capcas = cap_init();
188 if (capcas == NULL) {
189 err(1, "unable to create casper process");
190 exit(1);
191 }
192 cappwdloc = cap_service_open(capcas, "system.pwd");
193 capgrploc = cap_service_open(capcas, "system.grp");
194 /* Casper capability no longer needed. */
195 cap_close(capcas);
196 if (cappwdloc == NULL || capgrploc == NULL) {
197 if (cappwdloc == NULL)
198 warn("unable to open system.pwd service");
199 if (capgrploc == NULL)
200 warn("unable to open system.grp service");
201 exit(1);
202 }
203 /* Limit system.pwd to only getpwuid() function and pw_name field. */
204 cmds[0] = "getpwuid";
205 if (cap_pwd_limit_cmds(cappwdloc, cmds, 1) < 0)
206 err(1, "unable to limit system.pwd service");
207 fields[0] = "pw_name";
208 if (cap_pwd_limit_fields(cappwdloc, fields, 1) < 0)
209 err(1, "unable to limit system.pwd service");
210 /* Limit system.grp to only getgrgid() function and gr_name field. */
211 cmds[0] = "getgrgid";
212 if (cap_grp_limit_cmds(capgrploc, cmds, 1) < 0)
213 err(1, "unable to limit system.grp service");
214 fields[0] = "gr_name";
215 if (cap_grp_limit_fields(capgrploc, fields, 1) < 0)
216 err(1, "unable to limit system.grp service");
217
218 *cappwdp = cappwdloc;
219 *capgrpp = capgrploc;
220 return (0);
221 }
222 #endif /* WITH_CASPER */
223
224 static void
print_integer_arg(const char * (* decoder)(int),int value)225 print_integer_arg(const char *(*decoder)(int), int value)
226 {
227 const char *str;
228
229 str = decoder(value);
230 if (str != NULL)
231 printf("%s", str);
232 else {
233 if (decimal)
234 printf("<invalid=%d>", value);
235 else
236 printf("<invalid=%#x>", value);
237 }
238 }
239
240 /* Like print_integer_arg but unknown values are treated as valid. */
241 static void
print_integer_arg_valid(const char * (* decoder)(int),int value)242 print_integer_arg_valid(const char *(*decoder)(int), int value)
243 {
244 const char *str;
245
246 str = decoder(value);
247 if (str != NULL)
248 printf("%s", str);
249 else {
250 if (decimal)
251 printf("%d", value);
252 else
253 printf("%#x", value);
254 }
255 }
256
257 static bool
print_mask_arg_part(bool (* decoder)(FILE *,int,int *),int value,int * rem)258 print_mask_arg_part(bool (*decoder)(FILE *, int, int *), int value, int *rem)
259 {
260
261 printf("%#x<", value);
262 return (decoder(stdout, value, rem));
263 }
264
265 static void
print_mask_arg(bool (* decoder)(FILE *,int,int *),int value)266 print_mask_arg(bool (*decoder)(FILE *, int, int *), int value)
267 {
268 bool invalid;
269 int rem;
270
271 invalid = !print_mask_arg_part(decoder, value, &rem);
272 printf(">");
273 if (invalid)
274 printf("<invalid>%u", rem);
275 }
276
277 static void
print_mask_arg0(bool (* decoder)(FILE *,int,int *),int value)278 print_mask_arg0(bool (*decoder)(FILE *, int, int *), int value)
279 {
280 bool invalid;
281 int rem;
282
283 if (value == 0) {
284 printf("0");
285 return;
286 }
287 printf("%#x<", value);
288 invalid = !decoder(stdout, value, &rem);
289 printf(">");
290 if (invalid)
291 printf("<invalid>%u", rem);
292 }
293
294 static void
decode_fileflags(fflags_t value)295 decode_fileflags(fflags_t value)
296 {
297 bool invalid;
298 fflags_t rem;
299
300 if (value == 0) {
301 printf("0");
302 return;
303 }
304 printf("%#x<", value);
305 invalid = !sysdecode_fileflags(stdout, value, &rem);
306 printf(">");
307 if (invalid)
308 printf("<invalid>%u", rem);
309 }
310
311 static void
decode_filemode(int value)312 decode_filemode(int value)
313 {
314 bool invalid;
315 int rem;
316
317 if (value == 0) {
318 printf("0");
319 return;
320 }
321 printf("%#o<", value);
322 invalid = !sysdecode_filemode(stdout, value, &rem);
323 printf(">");
324 if (invalid)
325 printf("<invalid>%u", rem);
326 }
327
328 static void
print_mask_arg32(bool (* decoder)(FILE *,uint32_t,uint32_t *),uint32_t value)329 print_mask_arg32(bool (*decoder)(FILE *, uint32_t, uint32_t *), uint32_t value)
330 {
331 bool invalid;
332 uint32_t rem;
333
334 printf("%#x<", value);
335 invalid = !decoder(stdout, value, &rem);
336 printf(">");
337 if (invalid)
338 printf("<invalid>%u", rem);
339 }
340
341 static void
print_mask_argul(bool (* decoder)(FILE *,u_long,u_long *),u_long value)342 print_mask_argul(bool (*decoder)(FILE *, u_long, u_long *), u_long value)
343 {
344 bool invalid;
345 u_long rem;
346
347 if (value == 0) {
348 printf("0");
349 return;
350 }
351 printf("%#lx<", value);
352 invalid = !decoder(stdout, value, &rem);
353 printf(">");
354 if (invalid)
355 printf("<invalid>%lu", rem);
356 }
357
358 int
main(int argc,char * argv[])359 main(int argc, char *argv[])
360 {
361 int ch, ktrlen, size;
362 void *m;
363 int trpoints = ALL_POINTS;
364 int drop_logged;
365 pid_t pid = 0;
366 u_int sv_flags;
367
368 setlocale(LC_CTYPE, "");
369
370 timestamp = TIMESTAMP_NONE;
371
372 while ((ch = getopt(argc,argv,"f:dElm:np:AHRrSsTt:")) != -1)
373 switch (ch) {
374 case 'A':
375 abiflag = true;
376 break;
377 case 'f':
378 tracefile = optarg;
379 break;
380 case 'd':
381 decimal = true;
382 break;
383 case 'l':
384 tail = true;
385 break;
386 case 'm':
387 maxdata = atoi(optarg);
388 break;
389 case 'n':
390 fancy = false;
391 break;
392 case 'p':
393 pid = atoi(optarg);
394 break;
395 case 'r':
396 resolv = true;
397 break;
398 case 'S':
399 syscallno = true;
400 break;
401 case 's':
402 suppressdata = true;
403 break;
404 case 'E':
405 timestamp |= TIMESTAMP_ELAPSED;
406 break;
407 case 'H':
408 threads = true;
409 break;
410 case 'R':
411 timestamp |= TIMESTAMP_RELATIVE;
412 break;
413 case 'T':
414 timestamp |= TIMESTAMP_ABSOLUTE;
415 break;
416 case 't':
417 trpoints = getpoints(optarg);
418 if (trpoints < 0)
419 errx(1, "unknown trace point in %s", optarg);
420 break;
421 default:
422 usage();
423 }
424
425 if (argc > optind)
426 usage();
427
428 m = malloc(size = 1025);
429 if (m == NULL)
430 errx(1, "%s", strerror(ENOMEM));
431 if (strcmp(tracefile, "-") != 0)
432 if (!freopen(tracefile, "r", stdin))
433 err(1, "%s", tracefile);
434
435 caph_cache_catpages();
436 caph_cache_tzdata();
437
438 #ifdef WITH_CASPER
439 if (resolv) {
440 if (cappwdgrp_setup(&cappwd, &capgrp) < 0) {
441 cappwd = NULL;
442 capgrp = NULL;
443 }
444 }
445 if (!resolv || (cappwd != NULL && capgrp != NULL)) {
446 if (caph_enter() < 0)
447 err(1, "unable to enter capability mode");
448 }
449 #else
450 if (!resolv) {
451 if (caph_enter() < 0)
452 err(1, "unable to enter capability mode");
453 }
454 #endif
455 if (caph_limit_stdio() == -1)
456 err(1, "unable to limit stdio");
457
458 TAILQ_INIT(&trace_procs);
459 drop_logged = 0;
460 while (fread_tail(&ktr_header, sizeof(struct ktr_header), 1)) {
461 if (ktr_header.ktr_type & KTR_DROP) {
462 ktr_header.ktr_type &= ~KTR_DROP;
463 if (!drop_logged && threads) {
464 printf(
465 "%6jd %6jd %-8.*s Events dropped.\n",
466 (intmax_t)ktr_header.ktr_pid,
467 ktr_header.ktr_tid > 0 ?
468 (intmax_t)ktr_header.ktr_tid : 0,
469 MAXCOMLEN, ktr_header.ktr_comm);
470 drop_logged = 1;
471 } else if (!drop_logged) {
472 printf("%6jd %-8.*s Events dropped.\n",
473 (intmax_t)ktr_header.ktr_pid, MAXCOMLEN,
474 ktr_header.ktr_comm);
475 drop_logged = 1;
476 }
477 }
478 if ((ktrlen = ktr_header.ktr_len) < 0)
479 errx(1, "bogus length 0x%x", ktrlen);
480 if (ktrlen > size) {
481 m = realloc(m, ktrlen+1);
482 if (m == NULL)
483 errx(1, "%s", strerror(ENOMEM));
484 size = ktrlen;
485 }
486 if (ktrlen && fread_tail(m, ktrlen, 1) == 0)
487 errx(1, "data too short");
488 if (fetchprocinfo(&ktr_header, (u_int *)m) != 0)
489 continue;
490 if (pid && ktr_header.ktr_pid != pid &&
491 ktr_header.ktr_tid != pid)
492 continue;
493 if ((trpoints & (1<<ktr_header.ktr_type)) == 0)
494 continue;
495 sv_flags = findabi(&ktr_header);
496 dumpheader(&ktr_header, sv_flags);
497 drop_logged = 0;
498 switch (ktr_header.ktr_type) {
499 case KTR_SYSCALL:
500 ktrsyscall((struct ktr_syscall *)m, sv_flags);
501 break;
502 case KTR_SYSRET:
503 ktrsysret((struct ktr_sysret *)m, sv_flags);
504 break;
505 case KTR_NAMEI:
506 case KTR_SYSCTL:
507 ktrnamei(m, ktrlen);
508 break;
509 case KTR_GENIO:
510 ktrgenio((struct ktr_genio *)m, ktrlen);
511 break;
512 case KTR_PSIG:
513 ktrpsig((struct ktr_psig *)m);
514 break;
515 case KTR_CSW:
516 if (ktrlen == sizeof(struct ktr_csw_old))
517 ktrcsw_old((struct ktr_csw_old *)m);
518 else
519 ktrcsw((struct ktr_csw *)m);
520 break;
521 case KTR_USER:
522 ktruser(ktrlen, m);
523 break;
524 case KTR_STRUCT:
525 ktrstruct(m, ktrlen);
526 break;
527 case KTR_CAPFAIL:
528 ktrcapfail((struct ktr_cap_fail *)m);
529 break;
530 case KTR_FAULT:
531 ktrfault((struct ktr_fault *)m);
532 break;
533 case KTR_FAULTEND:
534 ktrfaultend((struct ktr_faultend *)m);
535 break;
536 case KTR_STRUCT_ARRAY:
537 ktrstructarray((struct ktr_struct_array *)m, ktrlen);
538 break;
539 default:
540 printf("\n");
541 break;
542 }
543 if (tail)
544 fflush(stdout);
545 }
546 return 0;
547 }
548
549 int
fread_tail(void * buf,int size,int num)550 fread_tail(void *buf, int size, int num)
551 {
552 int i;
553
554 while ((i = fread(buf, size, num, stdin)) == 0 && tail) {
555 sleep(1);
556 clearerr(stdin);
557 }
558 return (i);
559 }
560
561 int
fetchprocinfo(struct ktr_header * kth,u_int * flags)562 fetchprocinfo(struct ktr_header *kth, u_int *flags)
563 {
564 struct proc_info *pi;
565
566 switch (kth->ktr_type) {
567 case KTR_PROCCTOR:
568 TAILQ_FOREACH(pi, &trace_procs, info) {
569 if (pi->pid == kth->ktr_pid) {
570 TAILQ_REMOVE(&trace_procs, pi, info);
571 break;
572 }
573 }
574 pi = malloc(sizeof(struct proc_info));
575 if (pi == NULL)
576 errx(1, "%s", strerror(ENOMEM));
577 pi->sv_flags = *flags;
578 pi->pid = kth->ktr_pid;
579 TAILQ_INSERT_TAIL(&trace_procs, pi, info);
580 return (1);
581
582 case KTR_PROCDTOR:
583 TAILQ_FOREACH(pi, &trace_procs, info) {
584 if (pi->pid == kth->ktr_pid) {
585 TAILQ_REMOVE(&trace_procs, pi, info);
586 free(pi);
587 break;
588 }
589 }
590 return (1);
591 }
592
593 return (0);
594 }
595
596 u_int
findabi(struct ktr_header * kth)597 findabi(struct ktr_header *kth)
598 {
599 struct proc_info *pi;
600
601 TAILQ_FOREACH(pi, &trace_procs, info) {
602 if (pi->pid == kth->ktr_pid) {
603 return (pi->sv_flags);
604 }
605 }
606 return (0);
607 }
608
609 void
dumpheader(struct ktr_header * kth,u_int sv_flags)610 dumpheader(struct ktr_header *kth, u_int sv_flags)
611 {
612 static char unknown[64];
613 static struct timeval prevtime, prevtime_e;
614 struct timeval temp;
615 const char *abi;
616 const char *arch;
617 const char *type;
618 const char *sign;
619
620 switch (kth->ktr_type) {
621 case KTR_SYSCALL:
622 type = "CALL";
623 break;
624 case KTR_SYSRET:
625 type = "RET ";
626 break;
627 case KTR_NAMEI:
628 type = "NAMI";
629 break;
630 case KTR_GENIO:
631 type = "GIO ";
632 break;
633 case KTR_PSIG:
634 type = "PSIG";
635 break;
636 case KTR_CSW:
637 type = "CSW ";
638 break;
639 case KTR_USER:
640 type = "USER";
641 break;
642 case KTR_STRUCT:
643 case KTR_STRUCT_ARRAY:
644 type = "STRU";
645 break;
646 case KTR_SYSCTL:
647 type = "SCTL";
648 break;
649 case KTR_CAPFAIL:
650 type = "CAP ";
651 break;
652 case KTR_FAULT:
653 type = "PFLT";
654 break;
655 case KTR_FAULTEND:
656 type = "PRET";
657 break;
658 default:
659 sprintf(unknown, "UNKNOWN(%d)", kth->ktr_type);
660 type = unknown;
661 }
662
663 /*
664 * The ktr_tid field was previously the ktr_buffer field, which held
665 * the kernel pointer value for the buffer associated with data
666 * following the record header. It now holds a threadid, but only
667 * for trace files after the change. Older trace files still contain
668 * kernel pointers. Detect this and suppress the results by printing
669 * negative tid's as 0.
670 */
671 if (threads)
672 printf("%6jd %6jd %-8.*s ", (intmax_t)kth->ktr_pid,
673 kth->ktr_tid > 0 ? (intmax_t)kth->ktr_tid : 0,
674 MAXCOMLEN, kth->ktr_comm);
675 else
676 printf("%6jd %-8.*s ", (intmax_t)kth->ktr_pid, MAXCOMLEN,
677 kth->ktr_comm);
678 if (timestamp) {
679 if (timestamp & TIMESTAMP_ABSOLUTE) {
680 printf("%jd.%06ld ", (intmax_t)kth->ktr_time.tv_sec,
681 kth->ktr_time.tv_usec);
682 }
683 if (timestamp & TIMESTAMP_ELAPSED) {
684 if (prevtime_e.tv_sec == 0)
685 prevtime_e = kth->ktr_time;
686 timersub(&kth->ktr_time, &prevtime_e, &temp);
687 printf("%jd.%06ld ", (intmax_t)temp.tv_sec,
688 temp.tv_usec);
689 }
690 if (timestamp & TIMESTAMP_RELATIVE) {
691 if (prevtime.tv_sec == 0)
692 prevtime = kth->ktr_time;
693 if (timercmp(&kth->ktr_time, &prevtime, <)) {
694 timersub(&prevtime, &kth->ktr_time, &temp);
695 sign = "-";
696 } else {
697 timersub(&kth->ktr_time, &prevtime, &temp);
698 sign = "";
699 }
700 prevtime = kth->ktr_time;
701 printf("%s%jd.%06ld ", sign, (intmax_t)temp.tv_sec,
702 temp.tv_usec);
703 }
704 }
705 printf("%s ", type);
706 if (abiflag != 0) {
707 switch (sv_flags & SV_ABI_MASK) {
708 case SV_ABI_LINUX:
709 abi = "L";
710 break;
711 case SV_ABI_FREEBSD:
712 abi = "F";
713 break;
714 case SV_ABI_CLOUDABI:
715 abi = "C";
716 break;
717 default:
718 abi = "U";
719 break;
720 }
721
722 if ((sv_flags & SV_LP64) != 0)
723 arch = "64";
724 else if ((sv_flags & SV_ILP32) != 0)
725 arch = "32";
726 else
727 arch = "00";
728
729 printf("%s%s ", abi, arch);
730 }
731 }
732
733 #include <sys/syscall.h>
734
735 static void
ioctlname(unsigned long val)736 ioctlname(unsigned long val)
737 {
738 const char *str;
739
740 str = sysdecode_ioctlname(val);
741 if (str != NULL)
742 printf("%s", str);
743 else if (decimal)
744 printf("%lu", val);
745 else
746 printf("%#lx", val);
747 }
748
749 static enum sysdecode_abi
syscallabi(u_int sv_flags)750 syscallabi(u_int sv_flags)
751 {
752
753 if (sv_flags == 0)
754 return (SYSDECODE_ABI_FREEBSD);
755 switch (sv_flags & SV_ABI_MASK) {
756 case SV_ABI_FREEBSD:
757 return (SYSDECODE_ABI_FREEBSD);
758 case SV_ABI_LINUX:
759 #ifdef __LP64__
760 if (sv_flags & SV_ILP32)
761 return (SYSDECODE_ABI_LINUX32);
762 #endif
763 return (SYSDECODE_ABI_LINUX);
764 case SV_ABI_CLOUDABI:
765 return (SYSDECODE_ABI_CLOUDABI64);
766 default:
767 return (SYSDECODE_ABI_UNKNOWN);
768 }
769 }
770
771 static void
syscallname(u_int code,u_int sv_flags)772 syscallname(u_int code, u_int sv_flags)
773 {
774 const char *name;
775
776 name = sysdecode_syscallname(syscallabi(sv_flags), code);
777 if (name == NULL)
778 printf("[%d]", code);
779 else {
780 printf("%s", name);
781 if (syscallno)
782 printf("[%d]", code);
783 }
784 }
785
786 static void
print_signal(int signo)787 print_signal(int signo)
788 {
789 const char *signame;
790
791 signame = sysdecode_signal(signo);
792 if (signame != NULL)
793 printf("%s", signame);
794 else
795 printf("SIG %d", signo);
796 }
797
798 void
ktrsyscall(struct ktr_syscall * ktr,u_int sv_flags)799 ktrsyscall(struct ktr_syscall *ktr, u_int sv_flags)
800 {
801 int narg = ktr->ktr_narg;
802 register_t *ip, *first;
803 intmax_t arg;
804 int quad_align, quad_slots;
805
806 syscallname(ktr->ktr_code, sv_flags);
807 ip = first = &ktr->ktr_args[0];
808 if (narg) {
809 char c = '(';
810 if (fancy &&
811 (sv_flags == 0 ||
812 (sv_flags & SV_ABI_MASK) == SV_ABI_FREEBSD)) {
813 quad_align = 0;
814 if (sv_flags & SV_ILP32) {
815 #ifdef __powerpc__
816 quad_align = 1;
817 #endif
818 quad_slots = 2;
819 } else
820 quad_slots = 1;
821 switch (ktr->ktr_code) {
822 case SYS_bindat:
823 case SYS_chflagsat:
824 case SYS_connectat:
825 case SYS_faccessat:
826 case SYS_fchmodat:
827 case SYS_fchownat:
828 case SYS_fstatat:
829 case SYS_futimesat:
830 case SYS_linkat:
831 case SYS_mkdirat:
832 case SYS_mkfifoat:
833 case SYS_mknodat:
834 case SYS_openat:
835 case SYS_readlinkat:
836 case SYS_renameat:
837 case SYS_unlinkat:
838 case SYS_utimensat:
839 putchar('(');
840 print_integer_arg_valid(sysdecode_atfd, *ip);
841 c = ',';
842 ip++;
843 narg--;
844 break;
845 }
846 switch (ktr->ktr_code) {
847 case SYS_ioctl: {
848 print_number(ip, narg, c);
849 putchar(c);
850 ioctlname(*ip);
851 c = ',';
852 ip++;
853 narg--;
854 break;
855 }
856 case SYS_ptrace:
857 putchar('(');
858 print_integer_arg(sysdecode_ptrace_request, *ip);
859 c = ',';
860 ip++;
861 narg--;
862 break;
863 case SYS_access:
864 case SYS_eaccess:
865 case SYS_faccessat:
866 print_number(ip, narg, c);
867 putchar(',');
868 print_mask_arg(sysdecode_access_mode, *ip);
869 ip++;
870 narg--;
871 break;
872 case SYS_close_range:
873 print_number(ip, narg, c);
874 print_number(ip, narg, c);
875 putchar(',');
876 print_mask_arg(sysdecode_close_range_flags, *ip);
877 ip += 3;
878 narg -= 3;
879 break;
880 case SYS_open:
881 case SYS_openat:
882 print_number(ip, narg, c);
883 putchar(',');
884 print_mask_arg(sysdecode_open_flags, ip[0]);
885 if ((ip[0] & O_CREAT) == O_CREAT) {
886 putchar(',');
887 decode_filemode(ip[1]);
888 }
889 ip += 2;
890 narg -= 2;
891 break;
892 case SYS_wait4:
893 print_number(ip, narg, c);
894 print_number(ip, narg, c);
895 putchar(',');
896 print_mask_arg0(sysdecode_wait4_options, *ip);
897 ip++;
898 narg--;
899 break;
900 case SYS_wait6:
901 putchar('(');
902 print_integer_arg(sysdecode_idtype, *ip);
903 c = ',';
904 ip++;
905 narg--;
906 print_number64(first, ip, narg, c);
907 print_number(ip, narg, c);
908 putchar(',');
909 print_mask_arg(sysdecode_wait6_options, *ip);
910 ip++;
911 narg--;
912 break;
913 case SYS_chmod:
914 case SYS_fchmod:
915 case SYS_lchmod:
916 case SYS_fchmodat:
917 print_number(ip, narg, c);
918 putchar(',');
919 decode_filemode(*ip);
920 ip++;
921 narg--;
922 break;
923 case SYS_mknodat:
924 print_number(ip, narg, c);
925 putchar(',');
926 decode_filemode(*ip);
927 ip++;
928 narg--;
929 break;
930 case SYS_getfsstat:
931 print_number(ip, narg, c);
932 print_number(ip, narg, c);
933 putchar(',');
934 print_integer_arg(sysdecode_getfsstat_mode, *ip);
935 ip++;
936 narg--;
937 break;
938 case SYS_mount:
939 print_number(ip, narg, c);
940 print_number(ip, narg, c);
941 putchar(',');
942 print_mask_arg(sysdecode_mount_flags, *ip);
943 ip++;
944 narg--;
945 break;
946 case SYS_unmount:
947 print_number(ip, narg, c);
948 putchar(',');
949 print_mask_arg(sysdecode_mount_flags, *ip);
950 ip++;
951 narg--;
952 break;
953 case SYS_recvmsg:
954 case SYS_sendmsg:
955 print_number(ip, narg, c);
956 print_number(ip, narg, c);
957 putchar(',');
958 print_mask_arg0(sysdecode_msg_flags, *ip);
959 ip++;
960 narg--;
961 break;
962 case SYS_recvfrom:
963 case SYS_sendto:
964 print_number(ip, narg, c);
965 print_number(ip, narg, c);
966 print_number(ip, narg, c);
967 putchar(',');
968 print_mask_arg0(sysdecode_msg_flags, *ip);
969 ip++;
970 narg--;
971 break;
972 case SYS_chflags:
973 case SYS_chflagsat:
974 case SYS_fchflags:
975 case SYS_lchflags:
976 print_number(ip, narg, c);
977 putchar(',');
978 decode_fileflags(*ip);
979 ip++;
980 narg--;
981 break;
982 case SYS_kill:
983 print_number(ip, narg, c);
984 putchar(',');
985 print_signal(*ip);
986 ip++;
987 narg--;
988 break;
989 case SYS_reboot:
990 putchar('(');
991 print_mask_arg(sysdecode_reboot_howto, *ip);
992 ip++;
993 narg--;
994 break;
995 case SYS_umask:
996 putchar('(');
997 decode_filemode(*ip);
998 ip++;
999 narg--;
1000 break;
1001 case SYS_msync:
1002 print_number(ip, narg, c);
1003 print_number(ip, narg, c);
1004 putchar(',');
1005 print_mask_arg(sysdecode_msync_flags, *ip);
1006 ip++;
1007 narg--;
1008 break;
1009 #ifdef SYS_freebsd6_mmap
1010 case SYS_freebsd6_mmap:
1011 print_number(ip, narg, c);
1012 print_number(ip, narg, c);
1013 putchar(',');
1014 print_mask_arg(sysdecode_mmap_prot, *ip);
1015 putchar(',');
1016 ip++;
1017 narg--;
1018 print_mask_arg(sysdecode_mmap_flags, *ip);
1019 ip++;
1020 narg--;
1021 break;
1022 #endif
1023 case SYS_mmap:
1024 print_number(ip, narg, c);
1025 print_number(ip, narg, c);
1026 putchar(',');
1027 print_mask_arg(sysdecode_mmap_prot, *ip);
1028 putchar(',');
1029 ip++;
1030 narg--;
1031 print_mask_arg(sysdecode_mmap_flags, *ip);
1032 ip++;
1033 narg--;
1034 break;
1035 case SYS_mprotect:
1036 print_number(ip, narg, c);
1037 print_number(ip, narg, c);
1038 putchar(',');
1039 print_mask_arg(sysdecode_mmap_prot, *ip);
1040 ip++;
1041 narg--;
1042 break;
1043 case SYS_madvise:
1044 print_number(ip, narg, c);
1045 print_number(ip, narg, c);
1046 putchar(',');
1047 print_integer_arg(sysdecode_madvice, *ip);
1048 ip++;
1049 narg--;
1050 break;
1051 case SYS_pathconf:
1052 case SYS_lpathconf:
1053 case SYS_fpathconf:
1054 print_number(ip, narg, c);
1055 putchar(',');
1056 print_integer_arg(sysdecode_pathconf_name, *ip);
1057 ip++;
1058 narg--;
1059 break;
1060 case SYS_getpriority:
1061 case SYS_setpriority:
1062 putchar('(');
1063 print_integer_arg(sysdecode_prio_which, *ip);
1064 c = ',';
1065 ip++;
1066 narg--;
1067 break;
1068 case SYS_fcntl:
1069 print_number(ip, narg, c);
1070 putchar(',');
1071 print_integer_arg(sysdecode_fcntl_cmd, ip[0]);
1072 if (sysdecode_fcntl_arg_p(ip[0])) {
1073 putchar(',');
1074 if (ip[0] == F_SETFL)
1075 print_mask_arg(
1076 sysdecode_fcntl_fileflags,
1077 ip[1]);
1078 else
1079 sysdecode_fcntl_arg(stdout,
1080 ip[0], ip[1],
1081 decimal ? 10 : 16);
1082 }
1083 ip += 2;
1084 narg -= 2;
1085 break;
1086 case SYS_socket: {
1087 int sockdomain;
1088 putchar('(');
1089 sockdomain = *ip;
1090 print_integer_arg(sysdecode_socketdomain,
1091 sockdomain);
1092 ip++;
1093 narg--;
1094 putchar(',');
1095 print_mask_arg(sysdecode_socket_type, *ip);
1096 ip++;
1097 narg--;
1098 if (sockdomain == PF_INET ||
1099 sockdomain == PF_INET6) {
1100 putchar(',');
1101 print_integer_arg(sysdecode_ipproto,
1102 *ip);
1103 ip++;
1104 narg--;
1105 }
1106 c = ',';
1107 break;
1108 }
1109 case SYS_setsockopt:
1110 case SYS_getsockopt: {
1111 const char *str;
1112
1113 print_number(ip, narg, c);
1114 putchar(',');
1115 print_integer_arg_valid(sysdecode_sockopt_level,
1116 *ip);
1117 str = sysdecode_sockopt_name(ip[0], ip[1]);
1118 if (str != NULL) {
1119 printf(",%s", str);
1120 ip++;
1121 narg--;
1122 }
1123 ip++;
1124 narg--;
1125 break;
1126 }
1127 #ifdef SYS_freebsd6_lseek
1128 case SYS_freebsd6_lseek:
1129 print_number(ip, narg, c);
1130 /* Hidden 'pad' argument, not in lseek(2) */
1131 print_number(ip, narg, c);
1132 print_number64(first, ip, narg, c);
1133 putchar(',');
1134 print_integer_arg(sysdecode_whence, *ip);
1135 ip++;
1136 narg--;
1137 break;
1138 #endif
1139 case SYS_lseek:
1140 print_number(ip, narg, c);
1141 print_number64(first, ip, narg, c);
1142 putchar(',');
1143 print_integer_arg(sysdecode_whence, *ip);
1144 ip++;
1145 narg--;
1146 break;
1147 case SYS_flock:
1148 print_number(ip, narg, c);
1149 putchar(',');
1150 print_mask_arg(sysdecode_flock_operation, *ip);
1151 ip++;
1152 narg--;
1153 break;
1154 case SYS_mkfifo:
1155 case SYS_mkfifoat:
1156 case SYS_mkdir:
1157 case SYS_mkdirat:
1158 print_number(ip, narg, c);
1159 putchar(',');
1160 decode_filemode(*ip);
1161 ip++;
1162 narg--;
1163 break;
1164 case SYS_shutdown:
1165 print_number(ip, narg, c);
1166 putchar(',');
1167 print_integer_arg(sysdecode_shutdown_how, *ip);
1168 ip++;
1169 narg--;
1170 break;
1171 case SYS_socketpair:
1172 putchar('(');
1173 print_integer_arg(sysdecode_socketdomain, *ip);
1174 ip++;
1175 narg--;
1176 putchar(',');
1177 print_mask_arg(sysdecode_socket_type, *ip);
1178 ip++;
1179 narg--;
1180 c = ',';
1181 break;
1182 case SYS_getrlimit:
1183 case SYS_setrlimit:
1184 putchar('(');
1185 print_integer_arg(sysdecode_rlimit, *ip);
1186 ip++;
1187 narg--;
1188 c = ',';
1189 break;
1190 case SYS_getrusage:
1191 putchar('(');
1192 print_integer_arg(sysdecode_getrusage_who, *ip);
1193 ip++;
1194 narg--;
1195 c = ',';
1196 break;
1197 case SYS_quotactl:
1198 print_number(ip, narg, c);
1199 putchar(',');
1200 if (!sysdecode_quotactl_cmd(stdout, *ip)) {
1201 if (decimal)
1202 printf("<invalid=%d>", (int)*ip);
1203 else
1204 printf("<invalid=%#x>",
1205 (int)*ip);
1206 }
1207 ip++;
1208 narg--;
1209 c = ',';
1210 break;
1211 case SYS_nfssvc:
1212 putchar('(');
1213 print_integer_arg(sysdecode_nfssvc_flags, *ip);
1214 ip++;
1215 narg--;
1216 c = ',';
1217 break;
1218 case SYS_rtprio:
1219 case SYS_rtprio_thread:
1220 putchar('(');
1221 print_integer_arg(sysdecode_rtprio_function,
1222 *ip);
1223 ip++;
1224 narg--;
1225 c = ',';
1226 break;
1227 case SYS___semctl:
1228 print_number(ip, narg, c);
1229 print_number(ip, narg, c);
1230 putchar(',');
1231 print_integer_arg(sysdecode_semctl_cmd, *ip);
1232 ip++;
1233 narg--;
1234 break;
1235 case SYS_semget:
1236 print_number(ip, narg, c);
1237 print_number(ip, narg, c);
1238 putchar(',');
1239 print_mask_arg(sysdecode_semget_flags, *ip);
1240 ip++;
1241 narg--;
1242 break;
1243 case SYS_msgctl:
1244 print_number(ip, narg, c);
1245 putchar(',');
1246 print_integer_arg(sysdecode_msgctl_cmd, *ip);
1247 ip++;
1248 narg--;
1249 break;
1250 case SYS_shmat:
1251 print_number(ip, narg, c);
1252 print_number(ip, narg, c);
1253 putchar(',');
1254 print_mask_arg(sysdecode_shmat_flags, *ip);
1255 ip++;
1256 narg--;
1257 break;
1258 case SYS_shmctl:
1259 print_number(ip, narg, c);
1260 putchar(',');
1261 print_integer_arg(sysdecode_shmctl_cmd, *ip);
1262 ip++;
1263 narg--;
1264 break;
1265 #ifdef SYS_freebsd12_shm_open
1266 case SYS_freebsd12_shm_open:
1267 if (ip[0] == (uintptr_t)SHM_ANON) {
1268 printf("(SHM_ANON");
1269 ip++;
1270 } else {
1271 print_number(ip, narg, c);
1272 }
1273 putchar(',');
1274 print_mask_arg(sysdecode_open_flags, ip[0]);
1275 putchar(',');
1276 decode_filemode(ip[1]);
1277 ip += 2;
1278 narg -= 2;
1279 break;
1280 #endif
1281 case SYS_shm_open2:
1282 if (ip[0] == (uintptr_t)SHM_ANON) {
1283 printf("(SHM_ANON");
1284 ip++;
1285 } else {
1286 print_number(ip, narg, c);
1287 }
1288 putchar(',');
1289 print_mask_arg(sysdecode_open_flags, ip[0]);
1290 putchar(',');
1291 decode_filemode(ip[1]);
1292 putchar(',');
1293 print_mask_arg(sysdecode_shmflags, ip[2]);
1294 ip += 3;
1295 narg -= 3;
1296 break;
1297 case SYS_minherit:
1298 print_number(ip, narg, c);
1299 print_number(ip, narg, c);
1300 putchar(',');
1301 print_integer_arg(sysdecode_minherit_inherit,
1302 *ip);
1303 ip++;
1304 narg--;
1305 break;
1306 case SYS_rfork:
1307 putchar('(');
1308 print_mask_arg(sysdecode_rfork_flags, *ip);
1309 ip++;
1310 narg--;
1311 c = ',';
1312 break;
1313 case SYS_lio_listio:
1314 putchar('(');
1315 print_integer_arg(sysdecode_lio_listio_mode,
1316 *ip);
1317 ip++;
1318 narg--;
1319 c = ',';
1320 break;
1321 case SYS_mlockall:
1322 putchar('(');
1323 print_mask_arg(sysdecode_mlockall_flags, *ip);
1324 ip++;
1325 narg--;
1326 break;
1327 case SYS_sched_setscheduler:
1328 print_number(ip, narg, c);
1329 putchar(',');
1330 print_integer_arg(sysdecode_scheduler_policy,
1331 *ip);
1332 ip++;
1333 narg--;
1334 break;
1335 case SYS_sched_get_priority_max:
1336 case SYS_sched_get_priority_min:
1337 putchar('(');
1338 print_integer_arg(sysdecode_scheduler_policy,
1339 *ip);
1340 ip++;
1341 narg--;
1342 break;
1343 case SYS_sendfile:
1344 print_number(ip, narg, c);
1345 print_number(ip, narg, c);
1346 print_number(ip, narg, c);
1347 print_number(ip, narg, c);
1348 print_number(ip, narg, c);
1349 print_number(ip, narg, c);
1350 putchar(',');
1351 print_mask_arg(sysdecode_sendfile_flags, *ip);
1352 ip++;
1353 narg--;
1354 break;
1355 case SYS_kldsym:
1356 print_number(ip, narg, c);
1357 putchar(',');
1358 print_integer_arg(sysdecode_kldsym_cmd, *ip);
1359 ip++;
1360 narg--;
1361 break;
1362 case SYS_sigprocmask:
1363 putchar('(');
1364 print_integer_arg(sysdecode_sigprocmask_how,
1365 *ip);
1366 ip++;
1367 narg--;
1368 c = ',';
1369 break;
1370 case SYS___acl_get_file:
1371 case SYS___acl_set_file:
1372 case SYS___acl_get_fd:
1373 case SYS___acl_set_fd:
1374 case SYS___acl_delete_file:
1375 case SYS___acl_delete_fd:
1376 case SYS___acl_aclcheck_file:
1377 case SYS___acl_aclcheck_fd:
1378 case SYS___acl_get_link:
1379 case SYS___acl_set_link:
1380 case SYS___acl_delete_link:
1381 case SYS___acl_aclcheck_link:
1382 print_number(ip, narg, c);
1383 putchar(',');
1384 print_integer_arg(sysdecode_acltype, *ip);
1385 ip++;
1386 narg--;
1387 break;
1388 case SYS_sigaction:
1389 putchar('(');
1390 print_signal(*ip);
1391 ip++;
1392 narg--;
1393 c = ',';
1394 break;
1395 case SYS_extattrctl:
1396 print_number(ip, narg, c);
1397 putchar(',');
1398 print_integer_arg(sysdecode_extattrnamespace,
1399 *ip);
1400 ip++;
1401 narg--;
1402 break;
1403 case SYS_nmount:
1404 print_number(ip, narg, c);
1405 print_number(ip, narg, c);
1406 putchar(',');
1407 print_mask_arg(sysdecode_mount_flags, *ip);
1408 ip++;
1409 narg--;
1410 break;
1411 case SYS_thr_create:
1412 print_number(ip, narg, c);
1413 print_number(ip, narg, c);
1414 putchar(',');
1415 print_mask_arg(sysdecode_thr_create_flags, *ip);
1416 ip++;
1417 narg--;
1418 break;
1419 case SYS_thr_kill:
1420 print_number(ip, narg, c);
1421 putchar(',');
1422 print_signal(*ip);
1423 ip++;
1424 narg--;
1425 break;
1426 case SYS_kldunloadf:
1427 print_number(ip, narg, c);
1428 putchar(',');
1429 print_integer_arg(sysdecode_kldunload_flags,
1430 *ip);
1431 ip++;
1432 narg--;
1433 break;
1434 case SYS_linkat:
1435 case SYS_renameat:
1436 case SYS_symlinkat:
1437 print_number(ip, narg, c);
1438 putchar(',');
1439 print_integer_arg_valid(sysdecode_atfd, *ip);
1440 ip++;
1441 narg--;
1442 print_number(ip, narg, c);
1443 break;
1444 case SYS_cap_fcntls_limit:
1445 print_number(ip, narg, c);
1446 putchar(',');
1447 arg = *ip;
1448 ip++;
1449 narg--;
1450 print_mask_arg32(sysdecode_cap_fcntlrights, arg);
1451 break;
1452 case SYS_posix_fadvise:
1453 print_number(ip, narg, c);
1454 print_number(ip, narg, c);
1455 print_number(ip, narg, c);
1456 (void)putchar(',');
1457 print_integer_arg(sysdecode_fadvice, *ip);
1458 ip++;
1459 narg--;
1460 break;
1461 case SYS_procctl:
1462 putchar('(');
1463 print_integer_arg(sysdecode_idtype, *ip);
1464 c = ',';
1465 ip++;
1466 narg--;
1467 print_number64(first, ip, narg, c);
1468 putchar(',');
1469 print_integer_arg(sysdecode_procctl_cmd, *ip);
1470 ip++;
1471 narg--;
1472 break;
1473 case SYS__umtx_op: {
1474 int op;
1475
1476 print_number(ip, narg, c);
1477 putchar(',');
1478 if (print_mask_arg_part(sysdecode_umtx_op_flags,
1479 *ip, &op))
1480 putchar('|');
1481 print_integer_arg(sysdecode_umtx_op, op);
1482 putchar('>');
1483 switch (*ip) {
1484 case UMTX_OP_CV_WAIT:
1485 ip++;
1486 narg--;
1487 putchar(',');
1488 print_mask_argul(
1489 sysdecode_umtx_cvwait_flags, *ip);
1490 break;
1491 case UMTX_OP_RW_RDLOCK:
1492 ip++;
1493 narg--;
1494 putchar(',');
1495 print_mask_argul(
1496 sysdecode_umtx_rwlock_flags, *ip);
1497 break;
1498 }
1499 ip++;
1500 narg--;
1501 break;
1502 }
1503 case SYS_ftruncate:
1504 case SYS_truncate:
1505 print_number(ip, narg, c);
1506 print_number64(first, ip, narg, c);
1507 break;
1508 case SYS_fchownat:
1509 print_number(ip, narg, c);
1510 print_number(ip, narg, c);
1511 print_number(ip, narg, c);
1512 break;
1513 case SYS_fstatat:
1514 case SYS_utimensat:
1515 print_number(ip, narg, c);
1516 print_number(ip, narg, c);
1517 break;
1518 case SYS_unlinkat:
1519 print_number(ip, narg, c);
1520 break;
1521 case SYS_sysarch:
1522 putchar('(');
1523 print_integer_arg(sysdecode_sysarch_number, *ip);
1524 ip++;
1525 narg--;
1526 c = ',';
1527 break;
1528 }
1529 switch (ktr->ktr_code) {
1530 case SYS_chflagsat:
1531 case SYS_fchownat:
1532 case SYS_faccessat:
1533 case SYS_fchmodat:
1534 case SYS_fstatat:
1535 case SYS_linkat:
1536 case SYS_unlinkat:
1537 case SYS_utimensat:
1538 putchar(',');
1539 print_mask_arg0(sysdecode_atflags, *ip);
1540 ip++;
1541 narg--;
1542 break;
1543 }
1544 }
1545 while (narg > 0) {
1546 print_number(ip, narg, c);
1547 }
1548 putchar(')');
1549 }
1550 putchar('\n');
1551 }
1552
1553 void
ktrsysret(struct ktr_sysret * ktr,u_int sv_flags)1554 ktrsysret(struct ktr_sysret *ktr, u_int sv_flags)
1555 {
1556 register_t ret = ktr->ktr_retval;
1557 int error = ktr->ktr_error;
1558
1559 syscallname(ktr->ktr_code, sv_flags);
1560 printf(" ");
1561
1562 if (error == 0) {
1563 if (fancy) {
1564 printf("%ld", (long)ret);
1565 if (ret < 0 || ret > 9)
1566 printf("/%#lx", (unsigned long)ret);
1567 } else {
1568 if (decimal)
1569 printf("%ld", (long)ret);
1570 else
1571 printf("%#lx", (unsigned long)ret);
1572 }
1573 } else if (error == ERESTART)
1574 printf("RESTART");
1575 else if (error == EJUSTRETURN)
1576 printf("JUSTRETURN");
1577 else {
1578 printf("-1 errno %d", sysdecode_freebsd_to_abi_errno(
1579 syscallabi(sv_flags), error));
1580 if (fancy)
1581 printf(" %s", strerror(ktr->ktr_error));
1582 }
1583 putchar('\n');
1584 }
1585
1586 void
ktrnamei(char * cp,int len)1587 ktrnamei(char *cp, int len)
1588 {
1589 printf("\"%.*s\"\n", len, cp);
1590 }
1591
1592 void
hexdump(char * p,int len,int screenwidth)1593 hexdump(char *p, int len, int screenwidth)
1594 {
1595 int n, i;
1596 int width;
1597
1598 width = 0;
1599 do {
1600 width += 2;
1601 i = 13; /* base offset */
1602 i += (width / 2) + 1; /* spaces every second byte */
1603 i += (width * 2); /* width of bytes */
1604 i += 3; /* " |" */
1605 i += width; /* each byte */
1606 i += 1; /* "|" */
1607 } while (i < screenwidth);
1608 width -= 2;
1609
1610 for (n = 0; n < len; n += width) {
1611 for (i = n; i < n + width; i++) {
1612 if ((i % width) == 0) { /* beginning of line */
1613 printf(" 0x%04x", i);
1614 }
1615 if ((i % 2) == 0) {
1616 printf(" ");
1617 }
1618 if (i < len)
1619 printf("%02x", p[i] & 0xff);
1620 else
1621 printf(" ");
1622 }
1623 printf(" |");
1624 for (i = n; i < n + width; i++) {
1625 if (i >= len)
1626 break;
1627 if (p[i] >= ' ' && p[i] <= '~')
1628 printf("%c", p[i]);
1629 else
1630 printf(".");
1631 }
1632 printf("|\n");
1633 }
1634 if ((i % width) != 0)
1635 printf("\n");
1636 }
1637
1638 void
visdump(char * dp,int datalen,int screenwidth)1639 visdump(char *dp, int datalen, int screenwidth)
1640 {
1641 int col = 0;
1642 char *cp;
1643 int width;
1644 char visbuf[5];
1645
1646 printf(" \"");
1647 col = 8;
1648 for (;datalen > 0; datalen--, dp++) {
1649 vis(visbuf, *dp, VIS_CSTYLE | VIS_NOLOCALE, *(dp+1));
1650 cp = visbuf;
1651 /*
1652 * Keep track of printables and
1653 * space chars (like fold(1)).
1654 */
1655 if (col == 0) {
1656 putchar('\t');
1657 col = 8;
1658 }
1659 switch(*cp) {
1660 case '\n':
1661 col = 0;
1662 putchar('\n');
1663 continue;
1664 case '\t':
1665 width = 8 - (col&07);
1666 break;
1667 default:
1668 width = strlen(cp);
1669 }
1670 if (col + width > (screenwidth-2)) {
1671 printf("\\\n\t");
1672 col = 8;
1673 }
1674 col += width;
1675 do {
1676 putchar(*cp++);
1677 } while (*cp);
1678 }
1679 if (col == 0)
1680 printf(" ");
1681 printf("\"\n");
1682 }
1683
1684 void
ktrgenio(struct ktr_genio * ktr,int len)1685 ktrgenio(struct ktr_genio *ktr, int len)
1686 {
1687 int datalen = len - sizeof (struct ktr_genio);
1688 char *dp = (char *)ktr + sizeof (struct ktr_genio);
1689 static int screenwidth = 0;
1690 int i, binary;
1691
1692 printf("fd %d %s %d byte%s\n", ktr->ktr_fd,
1693 ktr->ktr_rw == UIO_READ ? "read" : "wrote", datalen,
1694 datalen == 1 ? "" : "s");
1695 if (suppressdata)
1696 return;
1697 if (screenwidth == 0) {
1698 struct winsize ws;
1699
1700 if (fancy && ioctl(fileno(stderr), TIOCGWINSZ, &ws) != -1 &&
1701 ws.ws_col > 8)
1702 screenwidth = ws.ws_col;
1703 else
1704 screenwidth = 80;
1705 }
1706 if (maxdata && datalen > maxdata)
1707 datalen = maxdata;
1708
1709 for (i = 0, binary = 0; i < datalen && binary == 0; i++) {
1710 if (dp[i] >= 32 && dp[i] < 127)
1711 continue;
1712 if (dp[i] == 10 || dp[i] == 13 || dp[i] == 0 || dp[i] == 9)
1713 continue;
1714 binary = 1;
1715 }
1716 if (binary)
1717 hexdump(dp, datalen, screenwidth);
1718 else
1719 visdump(dp, datalen, screenwidth);
1720 }
1721
1722 void
ktrpsig(struct ktr_psig * psig)1723 ktrpsig(struct ktr_psig *psig)
1724 {
1725 const char *str;
1726
1727 print_signal(psig->signo);
1728 if (psig->action == SIG_DFL) {
1729 printf(" SIG_DFL");
1730 } else {
1731 printf(" caught handler=0x%lx mask=0x%x",
1732 (u_long)psig->action, psig->mask.__bits[0]);
1733 }
1734 printf(" code=");
1735 str = sysdecode_sigcode(psig->signo, psig->code);
1736 if (str != NULL)
1737 printf("%s", str);
1738 else
1739 printf("<invalid=%#x>", psig->code);
1740 putchar('\n');
1741 }
1742
1743 void
ktrcsw_old(struct ktr_csw_old * cs)1744 ktrcsw_old(struct ktr_csw_old *cs)
1745 {
1746 printf("%s %s\n", cs->out ? "stop" : "resume",
1747 cs->user ? "user" : "kernel");
1748 }
1749
1750 void
ktrcsw(struct ktr_csw * cs)1751 ktrcsw(struct ktr_csw *cs)
1752 {
1753 printf("%s %s \"%s\"\n", cs->out ? "stop" : "resume",
1754 cs->user ? "user" : "kernel", cs->wmesg);
1755 }
1756
1757 void
ktruser(int len,void * p)1758 ktruser(int len, void *p)
1759 {
1760 unsigned char *cp;
1761
1762 if (sysdecode_utrace(stdout, p, len)) {
1763 printf("\n");
1764 return;
1765 }
1766
1767 printf("%d ", len);
1768 cp = p;
1769 while (len--)
1770 if (decimal)
1771 printf(" %d", *cp++);
1772 else
1773 printf(" %02x", *cp++);
1774 printf("\n");
1775 }
1776
1777 void
ktrcaprights(cap_rights_t * rightsp)1778 ktrcaprights(cap_rights_t *rightsp)
1779 {
1780
1781 printf("cap_rights_t ");
1782 sysdecode_cap_rights(stdout, rightsp);
1783 printf("\n");
1784 }
1785
1786 static void
ktrtimeval(struct timeval * tv)1787 ktrtimeval(struct timeval *tv)
1788 {
1789
1790 printf("{%ld, %ld}", (long)tv->tv_sec, tv->tv_usec);
1791 }
1792
1793 void
ktritimerval(struct itimerval * it)1794 ktritimerval(struct itimerval *it)
1795 {
1796
1797 printf("itimerval { .interval = ");
1798 ktrtimeval(&it->it_interval);
1799 printf(", .value = ");
1800 ktrtimeval(&it->it_value);
1801 printf(" }\n");
1802 }
1803
1804 void
ktrsockaddr(struct sockaddr * sa)1805 ktrsockaddr(struct sockaddr *sa)
1806 {
1807 /*
1808 TODO: Support additional address families
1809 #include <netsmb/netbios.h>
1810 struct sockaddr_nb *nb;
1811 */
1812 const char *str;
1813 char addr[64];
1814
1815 /*
1816 * note: ktrstruct() has already verified that sa points to a
1817 * buffer at least sizeof(struct sockaddr) bytes long and exactly
1818 * sa->sa_len bytes long.
1819 */
1820 printf("struct sockaddr { ");
1821 str = sysdecode_sockaddr_family(sa->sa_family);
1822 if (str != NULL)
1823 printf("%s", str);
1824 else
1825 printf("<invalid=%d>", sa->sa_family);
1826 printf(", ");
1827
1828 #define check_sockaddr_len(n) \
1829 if (sa_##n.s##n##_len < sizeof(struct sockaddr_##n)) { \
1830 printf("invalid"); \
1831 break; \
1832 }
1833
1834 switch(sa->sa_family) {
1835 case AF_INET: {
1836 struct sockaddr_in sa_in;
1837
1838 memset(&sa_in, 0, sizeof(sa_in));
1839 memcpy(&sa_in, sa, sa->sa_len);
1840 check_sockaddr_len(in);
1841 inet_ntop(AF_INET, &sa_in.sin_addr, addr, sizeof addr);
1842 printf("%s:%u", addr, ntohs(sa_in.sin_port));
1843 break;
1844 }
1845 case AF_INET6: {
1846 struct sockaddr_in6 sa_in6;
1847
1848 memset(&sa_in6, 0, sizeof(sa_in6));
1849 memcpy(&sa_in6, sa, sa->sa_len);
1850 check_sockaddr_len(in6);
1851 getnameinfo((struct sockaddr *)&sa_in6, sizeof(sa_in6),
1852 addr, sizeof(addr), NULL, 0, NI_NUMERICHOST);
1853 printf("[%s]:%u", addr, htons(sa_in6.sin6_port));
1854 break;
1855 }
1856 case AF_UNIX: {
1857 struct sockaddr_un sa_un;
1858
1859 memset(&sa_un, 0, sizeof(sa_un));
1860 memcpy(&sa_un, sa, sa->sa_len);
1861 printf("%.*s", (int)sizeof(sa_un.sun_path), sa_un.sun_path);
1862 break;
1863 }
1864 default:
1865 printf("unknown address family");
1866 }
1867 printf(" }\n");
1868 }
1869
1870 void
ktrstat(struct stat * statp)1871 ktrstat(struct stat *statp)
1872 {
1873 char mode[12], timestr[PATH_MAX + 4];
1874 struct passwd *pwd;
1875 struct group *grp;
1876 struct tm *tm;
1877
1878 /*
1879 * note: ktrstruct() has already verified that statp points to a
1880 * buffer exactly sizeof(struct stat) bytes long.
1881 */
1882 printf("struct stat {");
1883 printf("dev=%ju, ino=%ju, ",
1884 (uintmax_t)statp->st_dev, (uintmax_t)statp->st_ino);
1885 if (!resolv)
1886 printf("mode=0%jo, ", (uintmax_t)statp->st_mode);
1887 else {
1888 strmode(statp->st_mode, mode);
1889 printf("mode=%s, ", mode);
1890 }
1891 printf("nlink=%ju, ", (uintmax_t)statp->st_nlink);
1892 if (!resolv) {
1893 pwd = NULL;
1894 } else {
1895 #ifdef WITH_CASPER
1896 if (cappwd != NULL)
1897 pwd = cap_getpwuid(cappwd, statp->st_uid);
1898 else
1899 #endif
1900 pwd = getpwuid(statp->st_uid);
1901 }
1902 if (pwd == NULL)
1903 printf("uid=%ju, ", (uintmax_t)statp->st_uid);
1904 else
1905 printf("uid=\"%s\", ", pwd->pw_name);
1906 if (!resolv) {
1907 grp = NULL;
1908 } else {
1909 #ifdef WITH_CASPER
1910 if (capgrp != NULL)
1911 grp = cap_getgrgid(capgrp, statp->st_gid);
1912 else
1913 #endif
1914 grp = getgrgid(statp->st_gid);
1915 }
1916 if (grp == NULL)
1917 printf("gid=%ju, ", (uintmax_t)statp->st_gid);
1918 else
1919 printf("gid=\"%s\", ", grp->gr_name);
1920 printf("rdev=%ju, ", (uintmax_t)statp->st_rdev);
1921 printf("atime=");
1922 if (!resolv)
1923 printf("%jd", (intmax_t)statp->st_atim.tv_sec);
1924 else {
1925 tm = localtime(&statp->st_atim.tv_sec);
1926 strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1927 printf("\"%s\"", timestr);
1928 }
1929 if (statp->st_atim.tv_nsec != 0)
1930 printf(".%09ld, ", statp->st_atim.tv_nsec);
1931 else
1932 printf(", ");
1933 printf("mtime=");
1934 if (!resolv)
1935 printf("%jd", (intmax_t)statp->st_mtim.tv_sec);
1936 else {
1937 tm = localtime(&statp->st_mtim.tv_sec);
1938 strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1939 printf("\"%s\"", timestr);
1940 }
1941 if (statp->st_mtim.tv_nsec != 0)
1942 printf(".%09ld, ", statp->st_mtim.tv_nsec);
1943 else
1944 printf(", ");
1945 printf("ctime=");
1946 if (!resolv)
1947 printf("%jd", (intmax_t)statp->st_ctim.tv_sec);
1948 else {
1949 tm = localtime(&statp->st_ctim.tv_sec);
1950 strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1951 printf("\"%s\"", timestr);
1952 }
1953 if (statp->st_ctim.tv_nsec != 0)
1954 printf(".%09ld, ", statp->st_ctim.tv_nsec);
1955 else
1956 printf(", ");
1957 printf("birthtime=");
1958 if (!resolv)
1959 printf("%jd", (intmax_t)statp->st_birthtim.tv_sec);
1960 else {
1961 tm = localtime(&statp->st_birthtim.tv_sec);
1962 strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1963 printf("\"%s\"", timestr);
1964 }
1965 if (statp->st_birthtim.tv_nsec != 0)
1966 printf(".%09ld, ", statp->st_birthtim.tv_nsec);
1967 else
1968 printf(", ");
1969 printf("size=%jd, blksize=%ju, blocks=%jd, flags=0x%x",
1970 (uintmax_t)statp->st_size, (uintmax_t)statp->st_blksize,
1971 (intmax_t)statp->st_blocks, statp->st_flags);
1972 printf(" }\n");
1973 }
1974
1975 void
ktrstruct(char * buf,size_t buflen)1976 ktrstruct(char *buf, size_t buflen)
1977 {
1978 char *name, *data;
1979 size_t namelen, datalen;
1980 int i;
1981 cap_rights_t rights;
1982 struct itimerval it;
1983 struct stat sb;
1984 struct sockaddr_storage ss;
1985
1986 for (name = buf, namelen = 0;
1987 namelen < buflen && name[namelen] != '\0';
1988 ++namelen)
1989 /* nothing */;
1990 if (namelen == buflen)
1991 goto invalid;
1992 if (name[namelen] != '\0')
1993 goto invalid;
1994 data = buf + namelen + 1;
1995 datalen = buflen - namelen - 1;
1996 if (datalen == 0)
1997 goto invalid;
1998 /* sanity check */
1999 for (i = 0; i < (int)namelen; ++i)
2000 if (!isalpha(name[i]))
2001 goto invalid;
2002 if (strcmp(name, "caprights") == 0) {
2003 if (datalen != sizeof(cap_rights_t))
2004 goto invalid;
2005 memcpy(&rights, data, datalen);
2006 ktrcaprights(&rights);
2007 } else if (strcmp(name, "itimerval") == 0) {
2008 if (datalen != sizeof(struct itimerval))
2009 goto invalid;
2010 memcpy(&it, data, datalen);
2011 ktritimerval(&it);
2012 } else if (strcmp(name, "stat") == 0) {
2013 if (datalen != sizeof(struct stat))
2014 goto invalid;
2015 memcpy(&sb, data, datalen);
2016 ktrstat(&sb);
2017 } else if (strcmp(name, "sockaddr") == 0) {
2018 if (datalen > sizeof(ss))
2019 goto invalid;
2020 memcpy(&ss, data, datalen);
2021 if (datalen != ss.ss_len)
2022 goto invalid;
2023 ktrsockaddr((struct sockaddr *)&ss);
2024 } else {
2025 printf("unknown structure\n");
2026 }
2027 return;
2028 invalid:
2029 printf("invalid record\n");
2030 }
2031
2032 void
ktrcapfail(struct ktr_cap_fail * ktr)2033 ktrcapfail(struct ktr_cap_fail *ktr)
2034 {
2035 switch (ktr->cap_type) {
2036 case CAPFAIL_NOTCAPABLE:
2037 /* operation on fd with insufficient capabilities */
2038 printf("operation requires ");
2039 sysdecode_cap_rights(stdout, &ktr->cap_needed);
2040 printf(", descriptor holds ");
2041 sysdecode_cap_rights(stdout, &ktr->cap_held);
2042 break;
2043 case CAPFAIL_INCREASE:
2044 /* requested more capabilities than fd already has */
2045 printf("attempt to increase capabilities from ");
2046 sysdecode_cap_rights(stdout, &ktr->cap_held);
2047 printf(" to ");
2048 sysdecode_cap_rights(stdout, &ktr->cap_needed);
2049 break;
2050 case CAPFAIL_SYSCALL:
2051 /* called restricted syscall */
2052 printf("disallowed system call");
2053 break;
2054 case CAPFAIL_LOOKUP:
2055 /* absolute or AT_FDCWD path, ".." path, etc. */
2056 printf("restricted VFS lookup");
2057 break;
2058 default:
2059 printf("unknown capability failure: ");
2060 sysdecode_cap_rights(stdout, &ktr->cap_needed);
2061 printf(" ");
2062 sysdecode_cap_rights(stdout, &ktr->cap_held);
2063 break;
2064 }
2065 printf("\n");
2066 }
2067
2068 void
ktrfault(struct ktr_fault * ktr)2069 ktrfault(struct ktr_fault *ktr)
2070 {
2071
2072 printf("0x%jx ", (uintmax_t)ktr->vaddr);
2073 print_mask_arg(sysdecode_vmprot, ktr->type);
2074 printf("\n");
2075 }
2076
2077 void
ktrfaultend(struct ktr_faultend * ktr)2078 ktrfaultend(struct ktr_faultend *ktr)
2079 {
2080 const char *str;
2081
2082 str = sysdecode_vmresult(ktr->result);
2083 if (str != NULL)
2084 printf("%s", str);
2085 else
2086 printf("<invalid=%d>", ktr->result);
2087 printf("\n");
2088 }
2089
2090 void
ktrkevent(struct kevent * kev)2091 ktrkevent(struct kevent *kev)
2092 {
2093
2094 printf("{ ident=");
2095 switch (kev->filter) {
2096 case EVFILT_READ:
2097 case EVFILT_WRITE:
2098 case EVFILT_VNODE:
2099 case EVFILT_PROC:
2100 case EVFILT_TIMER:
2101 case EVFILT_PROCDESC:
2102 case EVFILT_EMPTY:
2103 printf("%ju", (uintmax_t)kev->ident);
2104 break;
2105 case EVFILT_SIGNAL:
2106 print_signal(kev->ident);
2107 break;
2108 default:
2109 printf("%p", (void *)kev->ident);
2110 }
2111 printf(", filter=");
2112 print_integer_arg(sysdecode_kevent_filter, kev->filter);
2113 printf(", flags=");
2114 print_mask_arg0(sysdecode_kevent_flags, kev->flags);
2115 printf(", fflags=");
2116 sysdecode_kevent_fflags(stdout, kev->filter, kev->fflags,
2117 decimal ? 10 : 16);
2118 printf(", data=%#jx, udata=%p }", (uintmax_t)kev->data, kev->udata);
2119 }
2120
2121 void
ktrstructarray(struct ktr_struct_array * ksa,size_t buflen)2122 ktrstructarray(struct ktr_struct_array *ksa, size_t buflen)
2123 {
2124 struct kevent kev;
2125 char *name, *data;
2126 size_t namelen, datalen;
2127 int i;
2128 bool first;
2129
2130 buflen -= sizeof(*ksa);
2131 for (name = (char *)(ksa + 1), namelen = 0;
2132 namelen < buflen && name[namelen] != '\0';
2133 ++namelen)
2134 /* nothing */;
2135 if (namelen == buflen)
2136 goto invalid;
2137 if (name[namelen] != '\0')
2138 goto invalid;
2139 /* sanity check */
2140 for (i = 0; i < (int)namelen; ++i)
2141 if (!isalnum(name[i]) && name[i] != '_')
2142 goto invalid;
2143 data = name + namelen + 1;
2144 datalen = buflen - namelen - 1;
2145 printf("struct %s[] = { ", name);
2146 first = true;
2147 for (; datalen >= ksa->struct_size;
2148 data += ksa->struct_size, datalen -= ksa->struct_size) {
2149 if (!first)
2150 printf("\n ");
2151 else
2152 first = false;
2153 if (strcmp(name, "kevent") == 0) {
2154 if (ksa->struct_size != sizeof(kev))
2155 goto bad_size;
2156 memcpy(&kev, data, sizeof(kev));
2157 ktrkevent(&kev);
2158 } else if (strcmp(name, "kevent_freebsd11") == 0) {
2159 struct kevent_freebsd11 kev11;
2160
2161 if (ksa->struct_size != sizeof(kev11))
2162 goto bad_size;
2163 memcpy(&kev11, data, sizeof(kev11));
2164 memset(&kev, 0, sizeof(kev));
2165 kev.ident = kev11.ident;
2166 kev.filter = kev11.filter;
2167 kev.flags = kev11.flags;
2168 kev.fflags = kev11.fflags;
2169 kev.data = kev11.data;
2170 kev.udata = kev11.udata;
2171 ktrkevent(&kev);
2172 #ifdef _WANT_KEVENT32
2173 } else if (strcmp(name, "kevent32") == 0) {
2174 struct kevent32 kev32;
2175
2176 if (ksa->struct_size != sizeof(kev32))
2177 goto bad_size;
2178 memcpy(&kev32, data, sizeof(kev32));
2179 memset(&kev, 0, sizeof(kev));
2180 kev.ident = kev32.ident;
2181 kev.filter = kev32.filter;
2182 kev.flags = kev32.flags;
2183 kev.fflags = kev32.fflags;
2184 #if BYTE_ORDER == BIG_ENDIAN
2185 kev.data = kev32.data2 | ((int64_t)kev32.data1 << 32);
2186 #else
2187 kev.data = kev32.data1 | ((int64_t)kev32.data2 << 32);
2188 #endif
2189 kev.udata = (void *)(uintptr_t)kev32.udata;
2190 ktrkevent(&kev);
2191 } else if (strcmp(name, "kevent32_freebsd11") == 0) {
2192 struct kevent32_freebsd11 kev32;
2193
2194 if (ksa->struct_size != sizeof(kev32))
2195 goto bad_size;
2196 memcpy(&kev32, data, sizeof(kev32));
2197 memset(&kev, 0, sizeof(kev));
2198 kev.ident = kev32.ident;
2199 kev.filter = kev32.filter;
2200 kev.flags = kev32.flags;
2201 kev.fflags = kev32.fflags;
2202 kev.data = kev32.data;
2203 kev.udata = (void *)(uintptr_t)kev32.udata;
2204 ktrkevent(&kev);
2205 #endif
2206 } else {
2207 printf("<unknown structure> }\n");
2208 return;
2209 }
2210 }
2211 printf(" }\n");
2212 return;
2213 invalid:
2214 printf("invalid record\n");
2215 return;
2216 bad_size:
2217 printf("<bad size> }\n");
2218 return;
2219 }
2220
2221 void
usage(void)2222 usage(void)
2223 {
2224 fprintf(stderr, "usage: kdump [-dEnlHRrSsTA] [-f trfile] "
2225 "[-m maxdata] [-p pid] [-t trstr]\n");
2226 exit(1);
2227 }
2228