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