usr.bin/kdump/kdump.c

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