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