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  * 3. All advertising materials mentioning features or use of this software
  14  *    must display the following acknowledgement:
  15  *      This product includes software developed by the University of
  16  *      California, Berkeley and its contributors.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  */
  33
  34 #ifndef lint
  35 static const char copyright[] =
  36 "@(#) Copyright (c) 1988, 1993\n\
  37         The Regents of the University of California.  All rights reserved.\n";
  38 #endif /* not lint */
  39
  40 #ifndef lint
  41 #if 0
  42 static char sccsid[] = "@(#)kdump.c     8.1 (Berkeley) 6/6/93";
  43 #endif
  44 #endif /* not lint */
  45 #include <sys/cdefs.h>
  46 __FBSDID("$FreeBSD$");
  47
  48 #define _KERNEL
  49 extern int errno;
  50 #include <sys/errno.h>
  51 #undef _KERNEL
  52 #include <sys/param.h>
  53 #include <sys/errno.h>
  54 #define _KERNEL
  55 #include <sys/time.h>
  56 #undef _KERNEL
  57 #include <sys/uio.h>
  58 #include <sys/ktrace.h>
  59 #include <sys/ioctl.h>
  60 #include <sys/socket.h>
  61 #include <sys/stat.h>
  62 #include <sys/sysent.h>
  63 #include <sys/un.h>
  64 #include <sys/queue.h>
  65 #ifdef IPX
  66 #include <sys/types.h>
  67 #include <netipx/ipx.h>
  68 #endif
  69 #ifdef NETATALK
  70 #include <netatalk/at.h>
  71 #endif
  72 #include <arpa/inet.h>
  73 #include <netinet/in.h>
  74 #include <ctype.h>
  75 #include <dlfcn.h>
  76 #include <err.h>
  77 #include <grp.h>
  78 #include <inttypes.h>
  79 #include <locale.h>
  80 #include <pwd.h>
  81 #include <stdio.h>
  82 #include <stdlib.h>
  83 #include <string.h>
  84 #include <time.h>
  85 #include <unistd.h>
  86 #include <vis.h>
  87 #include "ktrace.h"
  88 #include "kdump_subr.h"
  89
  90 u_int abidump(struct ktr_header *);
  91 int fetchprocinfo(struct ktr_header *, u_int *);
  92 int fread_tail(void *, int, int);
  93 void dumpheader(struct ktr_header *);
  94 void ktrsyscall(struct ktr_syscall *, u_int);
  95 void ktrsysret(struct ktr_sysret *, u_int);
  96 void ktrnamei(char *, int);
  97 void hexdump(char *, int, int);
  98 void visdump(char *, int, int);
  99 void ktrgenio(struct ktr_genio *, int);
 100 void ktrpsig(struct ktr_psig *);
 101 void ktrcsw(struct ktr_csw *);
 102 void ktrcsw_old(struct ktr_csw_old *);
 103 void ktruser(int, unsigned char *);
 104 void ktrsockaddr(struct sockaddr *);
 105 void ktrstat(struct stat *);
 106 void ktrstruct(char *, size_t);
 107 void ktrfault(struct ktr_fault *);
 108 void ktrfaultend(struct ktr_faultend *);
 109 void usage(void);
 110 void sockfamilyname(int);
 111 const char *ioctlname(u_long);
 112
 113 int timestamp, decimal, fancy = 1, suppressdata, tail, threads, maxdata,
 114     resolv = 0, abiflag = 0;
 115 const char *tracefile = DEF_TRACEFILE;
 116 struct ktr_header ktr_header;
 117
 118 #define TIME_FORMAT     "%b %e %T %Y"
 119 #define eqs(s1, s2)     (strcmp((s1), (s2)) == 0)
 120
 121 #define print_number(i,n,c) do {                \
 122         if (decimal)                            \
 123                 printf("%c%ld", c, (long)*i);   \
 124         else                                    \
 125                 printf("%c%#lx", c, (long)*i);  \
 126         i++;                                    \
 127         n--;                                    \
 128         c = ',';                                \
 129         } while (0);
 130
 131 #if defined(__amd64__) || defined(__i386__)
 132
 133 void linux_ktrsyscall(struct ktr_syscall *);
 134 void linux_ktrsysret(struct ktr_sysret *);
 135 extern char *linux_syscallnames[];
 136 extern int nlinux_syscalls;
 137
 138 /*
 139  * from linux.h
 140  * Linux syscalls return negative errno's, we do positive and map them
 141  */
 142 static int bsd_to_linux_errno[ELAST + 1] = {
 143         -0,  -1,  -2,  -3,  -4,  -5,  -6,  -7,  -8,  -9,
 144         -10, -35, -12, -13, -14, -15, -16, -17, -18, -19,
 145         -20, -21, -22, -23, -24, -25, -26, -27, -28, -29,
 146         -30, -31, -32, -33, -34, -11,-115,-114, -88, -89,
 147         -90, -91, -92, -93, -94, -95, -96, -97, -98, -99,
 148         -100,-101,-102,-103,-104,-105,-106,-107,-108,-109,
 149         -110,-111, -40, -36,-112,-113, -39, -11, -87,-122,
 150         -116, -66,  -6,  -6,  -6,  -6,  -6, -37, -38,  -9,
 151         -6,  -6, -43, -42, -75,-125, -84, -95, -16, -74,
 152         -72, -67, -71
 153 };
 154 #endif
 155
 156 struct proc_info
 157 {
 158         TAILQ_ENTRY(proc_info)  info;
 159         u_int                   sv_flags;
 160         pid_t                   pid;
 161 };
 162
 163 TAILQ_HEAD(trace_procs, proc_info) trace_procs;
 164
 165 int
 166 main(int argc, char *argv[])
 167 {
 168         int ch, ktrlen, size;
 169         void *m;
 170         int trpoints = ALL_POINTS;
 171         int drop_logged;
 172         pid_t pid = 0;
 173         u_int sv_flags;
 174
 175         (void) setlocale(LC_CTYPE, "");
 176
 177         while ((ch = getopt(argc,argv,"f:dElm:np:AHRrsTt:")) != -1)
 178                 switch((char)ch) {
 179                 case 'A':
 180                         abiflag = 1;
 181                         break;
 182                 case 'f':
 183                         tracefile = optarg;
 184                         break;
 185                 case 'd':
 186                         decimal = 1;
 187                         break;
 188                 case 'l':
 189                         tail = 1;
 190                         break;
 191                 case 'm':
 192                         maxdata = atoi(optarg);
 193                         break;
 194                 case 'n':
 195                         fancy = 0;
 196                         break;
 197                 case 'p':
 198                         pid = atoi(optarg);
 199                         break;
 200                 case 'r':
 201                         resolv = 1;
 202                         break;
 203                 case 's':
 204                         suppressdata = 1;
 205                         break;
 206                 case 'E':
 207                         timestamp = 3;  /* elapsed timestamp */
 208                         break;
 209                 case 'H':
 210                         threads = 1;
 211                         break;
 212                 case 'R':
 213                         timestamp = 2;  /* relative timestamp */
 214                         break;
 215                 case 'T':
 216                         timestamp = 1;
 217                         break;
 218                 case 't':
 219                         trpoints = getpoints(optarg);
 220                         if (trpoints < 0)
 221                                 errx(1, "unknown trace point in %s", optarg);
 222                         break;
 223                 default:
 224                         usage();
 225                 }
 226
 227         if (argc > optind)
 228                 usage();
 229
 230         m = (void *)malloc(size = 1025);
 231         if (m == NULL)
 232                 errx(1, "%s", strerror(ENOMEM));
 233         if (!freopen(tracefile, "r", stdin))
 234                 err(1, "%s", tracefile);
 235         TAILQ_INIT(&trace_procs);
 236         drop_logged = 0;
 237         while (fread_tail(&ktr_header, sizeof(struct ktr_header), 1)) {
 238                 if (ktr_header.ktr_type & KTR_DROP) {
 239                         ktr_header.ktr_type &= ~KTR_DROP;
 240                         if (!drop_logged && threads) {
 241                                 (void)printf(
 242                                     "%6jd %6jd %-8.*s Events dropped.\n",
 243                                     (intmax_t)ktr_header.ktr_pid,
 244                                     ktr_header.ktr_tid > 0 ?
 245                                     (intmax_t)ktr_header.ktr_tid : 0,
 246                                     MAXCOMLEN, ktr_header.ktr_comm);
 247                                 drop_logged = 1;
 248                         } else if (!drop_logged) {
 249                                 (void)printf("%6jd %-8.*s Events dropped.\n",
 250                                     (intmax_t)ktr_header.ktr_pid, MAXCOMLEN,
 251                                     ktr_header.ktr_comm);
 252                                 drop_logged = 1;
 253                         }
 254                 }
 255                 if (trpoints & (1<<ktr_header.ktr_type))
 256                         if (pid == 0 || ktr_header.ktr_pid == pid)
 257                                 dumpheader(&ktr_header);
 258                 if ((ktrlen = ktr_header.ktr_len) < 0)
 259                         errx(1, "bogus length 0x%x", ktrlen);
 260                 if (ktrlen > size) {
 261                         m = (void *)realloc(m, ktrlen+1);
 262                         if (m == NULL)
 263                                 errx(1, "%s", strerror(ENOMEM));
 264                         size = ktrlen;
 265                 }
 266                 if (ktrlen && fread_tail(m, ktrlen, 1) == 0)
 267                         errx(1, "data too short");
 268                 if (fetchprocinfo(&ktr_header, (u_int *)m) != 0)
 269                         continue;
 270                 sv_flags = abidump(&ktr_header);
 271                 if (pid && ktr_header.ktr_pid != pid)
 272                         continue;
 273                 if ((trpoints & (1<<ktr_header.ktr_type)) == 0)
 274                         continue;
 275                 drop_logged = 0;
 276                 switch (ktr_header.ktr_type) {
 277                 case KTR_SYSCALL:
 278 #if defined(__amd64__) || defined(__i386__)
 279                         if ((sv_flags & SV_ABI_MASK) == SV_ABI_LINUX)
 280                                 linux_ktrsyscall((struct ktr_syscall *)m);
 281                         else
 282 #endif
 283                                 ktrsyscall((struct ktr_syscall *)m, sv_flags);
 284                         break;
 285                 case KTR_SYSRET:
 286 #if defined(__amd64__) || defined(__i386__)
 287                         if ((sv_flags & SV_ABI_MASK) == SV_ABI_LINUX)
 288                                 linux_ktrsysret((struct ktr_sysret *)m);
 289                         else
 290 #endif
 291                                 ktrsysret((struct ktr_sysret *)m, sv_flags);
 292                         break;
 293                 case KTR_NAMEI:
 294                 case KTR_SYSCTL:
 295                         ktrnamei(m, ktrlen);
 296                         break;
 297                 case KTR_GENIO:
 298                         ktrgenio((struct ktr_genio *)m, ktrlen);
 299                         break;
 300                 case KTR_PSIG:
 301                         ktrpsig((struct ktr_psig *)m);
 302                         break;
 303                 case KTR_CSW:
 304                         if (ktrlen == sizeof(struct ktr_csw_old))
 305                                 ktrcsw_old((struct ktr_csw_old *)m);
 306                         else
 307                                 ktrcsw((struct ktr_csw *)m);
 308                         break;
 309                 case KTR_USER:
 310                         ktruser(ktrlen, m);
 311                         break;
 312                 case KTR_STRUCT:
 313                         ktrstruct(m, ktrlen);
 314                         break;
 315                 case KTR_FAULT:
 316                         ktrfault((struct ktr_fault *)m);
 317                         break;
 318                 case KTR_FAULTEND:
 319                         ktrfaultend((struct ktr_faultend *)m);
 320                         break;
 321                 default:
 322                         printf("\n");
 323                         break;
 324                 }
 325                 if (tail)
 326                         (void)fflush(stdout);
 327         }
 328         return 0;
 329 }
 330
 331 int
 332 fread_tail(void *buf, int size, int num)
 333 {
 334         int i;
 335
 336         while ((i = fread(buf, size, num, stdin)) == 0 && tail) {
 337                 (void)sleep(1);
 338                 clearerr(stdin);
 339         }
 340         return (i);
 341 }
 342
 343 int
 344 fetchprocinfo(struct ktr_header *kth, u_int *flags)
 345 {
 346         struct proc_info *pi;
 347
 348         switch (kth->ktr_type) {
 349         case KTR_PROCCTOR:
 350                 TAILQ_FOREACH(pi, &trace_procs, info) {
 351                         if (pi->pid == kth->ktr_pid) {
 352                                 TAILQ_REMOVE(&trace_procs, pi, info);
 353                                 break;
 354                         }
 355                 }
 356                 pi = malloc(sizeof(struct proc_info));
 357                 if (pi == NULL)
 358                         errx(1, "%s", strerror(ENOMEM));
 359                 pi->sv_flags = *flags;
 360                 pi->pid = kth->ktr_pid;
 361                 TAILQ_INSERT_TAIL(&trace_procs, pi, info);
 362                 return (1);
 363
 364         case KTR_PROCDTOR:
 365                 TAILQ_FOREACH(pi, &trace_procs, info) {
 366                         if (pi->pid == kth->ktr_pid) {
 367                                 TAILQ_REMOVE(&trace_procs, pi, info);
 368                                 free(pi);
 369                                 break;
 370                         }
 371                 }
 372                 return (1);
 373         }
 374
 375         return (0);
 376 }
 377
 378 u_int
 379 abidump(struct ktr_header *kth)
 380 {
 381         struct proc_info *pi;
 382         const char *abi;
 383         const char *arch;
 384         u_int flags = 0;
 385
 386         TAILQ_FOREACH(pi, &trace_procs, info) {
 387                 if (pi->pid == kth->ktr_pid) {
 388                         flags = pi->sv_flags;
 389                         break;
 390                 }
 391         }
 392
 393         if (abiflag == 0)
 394                 return (flags);
 395
 396         switch (flags & SV_ABI_MASK) {
 397         case SV_ABI_LINUX:
 398                 abi = "L";
 399                 break;
 400         case SV_ABI_FREEBSD:
 401                 abi = "F";
 402                 break;
 403         default:
 404                 abi = "U";
 405                 break;
 406         }
 407
 408         if (flags != 0) {
 409                 if (flags & SV_LP64)
 410                         arch = "64";
 411                 else
 412                         arch = "32";
 413         } else
 414                 arch = "00";
 415
 416         printf("%s%s  ", abi, arch);
 417
 418         return (flags);
 419 }
 420
 421 void
 422 dumpheader(struct ktr_header *kth)
 423 {
 424         static char unknown[64];
 425         static struct timeval prevtime, temp;
 426         const char *type;
 427
 428         switch (kth->ktr_type) {
 429         case KTR_SYSCALL:
 430                 type = "CALL";
 431                 break;
 432         case KTR_SYSRET:
 433                 type = "RET ";
 434                 break;
 435         case KTR_NAMEI:
 436                 type = "NAMI";
 437                 break;
 438         case KTR_GENIO:
 439                 type = "GIO ";
 440                 break;
 441         case KTR_PSIG:
 442                 type = "PSIG";
 443                 break;
 444         case KTR_CSW:
 445                 type = "CSW ";
 446                 break;
 447         case KTR_USER:
 448                 type = "USER";
 449                 break;
 450         case KTR_STRUCT:
 451                 type = "STRU";
 452                 break;
 453         case KTR_SYSCTL:
 454                 type = "SCTL";
 455                 break;
 456         case KTR_PROCCTOR:
 457                 /* FALLTHROUGH */
 458         case KTR_PROCDTOR:
 459                 return;
 460         case KTR_FAULT:
 461                 type = "PFLT";
 462                 break;
 463         case KTR_FAULTEND:
 464                 type = "PRET";
 465                 break;
 466         default:
 467                 (void)sprintf(unknown, "UNKNOWN(%d)", kth->ktr_type);
 468                 type = unknown;
 469         }
 470
 471         /*
 472          * The ktr_tid field was previously the ktr_buffer field, which held
 473          * the kernel pointer value for the buffer associated with data
 474          * following the record header.  It now holds a threadid, but only
 475          * for trace files after the change.  Older trace files still contain
 476          * kernel pointers.  Detect this and suppress the results by printing
 477          * negative tid's as 0.
 478          */
 479         if (threads)
 480                 (void)printf("%6jd %6jd %-8.*s ", (intmax_t)kth->ktr_pid,
 481                     kth->ktr_tid > 0 ? (intmax_t)kth->ktr_tid : 0,
 482                     MAXCOMLEN, kth->ktr_comm);
 483         else
 484                 (void)printf("%6jd %-8.*s ", (intmax_t)kth->ktr_pid, MAXCOMLEN,
 485                     kth->ktr_comm);
 486         if (timestamp) {
 487                 if (timestamp == 3) {
 488                         if (prevtime.tv_sec == 0)
 489                                 prevtime = kth->ktr_time;
 490                         timevalsub(&kth->ktr_time, &prevtime);
 491                 }
 492                 if (timestamp == 2) {
 493                         temp = kth->ktr_time;
 494                         timevalsub(&kth->ktr_time, &prevtime);
 495                         prevtime = temp;
 496                 }
 497                 (void)printf("%jd.%06ld ", (intmax_t)kth->ktr_time.tv_sec,
 498                     kth->ktr_time.tv_usec);
 499         }
 500         (void)printf("%s  ", type);
 501 }
 502
 503 #include <sys/syscall.h>
 504 #define KTRACE
 505 #include <sys/kern/syscalls.c>
 506 #undef KTRACE
 507 int nsyscalls = sizeof (syscallnames) / sizeof (syscallnames[0]);
 508
 509 void
 510 ktrsyscall(struct ktr_syscall *ktr, u_int flags)
 511 {
 512         int narg = ktr->ktr_narg;
 513         register_t *ip;
 514
 515         if ((flags != 0 && ((flags & SV_ABI_MASK) != SV_ABI_FREEBSD)) ||
 516             (ktr->ktr_code >= nsyscalls || ktr->ktr_code < 0))
 517                 (void)printf("[%d]", ktr->ktr_code);
 518         else
 519                 (void)printf("%s", syscallnames[ktr->ktr_code]);
 520         ip = &ktr->ktr_args[0];
 521         if (narg) {
 522                 char c = '(';
 523                 if (fancy &&
 524                     (flags == 0 || (flags & SV_ABI_MASK) == SV_ABI_FREEBSD)) {
 525                         if (ktr->ktr_code == SYS_ioctl) {
 526                                 const char *cp;
 527                                 print_number(ip,narg,c);
 528                                 if ((cp = ioctlname(*ip)) != NULL)
 529                                         (void)printf(",%s", cp);
 530                                 else {
 531                                         if (decimal)
 532                                                 (void)printf(",%ld", (long)*ip);
 533                                         else
 534                                                 (void)printf(",%#lx ", (long)*ip);
 535                                 }
 536                                 c = ',';
 537                                 ip++;
 538                                 narg--;
 539                         } else if (ktr->ktr_code == SYS_ptrace) {
 540                                 (void)putchar('(');
 541                                 ptraceopname ((int)*ip);
 542                                 c = ',';
 543                                 ip++;
 544                                 narg--;
 545                         } else if (ktr->ktr_code == SYS_access ||
 546                                    ktr->ktr_code == SYS_eaccess) {
 547                                 print_number(ip,narg,c);
 548                                 (void)putchar(',');
 549                                 accessmodename ((int)*ip);
 550                                 ip++;
 551                                 narg--;
 552                         } else if (ktr->ktr_code == SYS_open) {
 553                                 int     flags;
 554                                 int     mode;
 555                                 print_number(ip,narg,c);
 556                                 flags = *ip;
 557                                 mode = *++ip;
 558                                 (void)putchar(',');
 559                                 flagsandmodename (flags, mode, decimal);
 560                                 ip++;
 561                                 narg-=2;
 562                         } else if (ktr->ktr_code == SYS_wait4) {
 563                                 print_number(ip,narg,c);
 564                                 print_number(ip,narg,c);
 565                                 (void)putchar(',');
 566                                 wait4optname ((int)*ip);
 567                                 ip++;
 568                                 narg--;
 569                         } else if (ktr->ktr_code == SYS_chmod ||
 570                                    ktr->ktr_code == SYS_fchmod ||
 571                                    ktr->ktr_code == SYS_lchmod) {
 572                                 print_number(ip,narg,c);
 573                                 (void)putchar(',');
 574                                 modename ((int)*ip);
 575                                 ip++;
 576                                 narg--;
 577                         } else if (ktr->ktr_code == SYS_mknod) {
 578                                 print_number(ip,narg,c);
 579                                 (void)putchar(',');
 580                                 modename ((int)*ip);
 581                                 ip++;
 582                                 narg--;
 583                         } else if (ktr->ktr_code == SYS_getfsstat) {
 584                                 print_number(ip,narg,c);
 585                                 print_number(ip,narg,c);
 586                                 (void)putchar(',');
 587                                 getfsstatflagsname ((int)*ip);
 588                                 ip++;
 589                                 narg--;
 590                         } else if (ktr->ktr_code == SYS_mount) {
 591                                 print_number(ip,narg,c);
 592                                 print_number(ip,narg,c);
 593                                 (void)putchar(',');
 594                                 mountflagsname ((int)*ip);
 595                                 ip++;
 596                                 narg--;
 597                         } else if (ktr->ktr_code == SYS_unmount) {
 598                                 print_number(ip,narg,c);
 599                                 (void)putchar(',');
 600                                 mountflagsname ((int)*ip);
 601                                 ip++;
 602                                 narg--;
 603                         } else if (ktr->ktr_code == SYS_recvmsg ||
 604                                    ktr->ktr_code == SYS_sendmsg) {
 605                                 print_number(ip,narg,c);
 606                                 print_number(ip,narg,c);
 607                                 (void)putchar(',');
 608                                 sendrecvflagsname ((int)*ip);
 609                                 ip++;
 610                                 narg--;
 611                         } else if (ktr->ktr_code == SYS_recvfrom ||
 612                                    ktr->ktr_code == SYS_sendto) {
 613                                 print_number(ip,narg,c);
 614                                 print_number(ip,narg,c);
 615                                 print_number(ip,narg,c);
 616                                 (void)putchar(',');
 617                                 sendrecvflagsname ((int)*ip);
 618                                 ip++;
 619                                 narg--;
 620                         } else if (ktr->ktr_code == SYS_chflags ||
 621                                    ktr->ktr_code == SYS_fchflags ||
 622                                    ktr->ktr_code == SYS_lchflags) {
 623                                 print_number(ip,narg,c);
 624                                 (void)putchar(',');
 625                                 modename((int)*ip);
 626                                 ip++;
 627                                 narg--;
 628                         } else if (ktr->ktr_code == SYS_kill) {
 629                                 print_number(ip,narg,c);
 630                                 (void)putchar(',');
 631                                 signame((int)*ip);
 632                                 ip++;
 633                                 narg--;
 634                         } else if (ktr->ktr_code == SYS_reboot) {
 635                                 (void)putchar('(');
 636                                 rebootoptname((int)*ip);
 637                                 ip++;
 638                                 narg--;
 639                         } else if (ktr->ktr_code == SYS_umask) {
 640                                 (void)putchar('(');
 641                                 modename((int)*ip);
 642                                 ip++;
 643                                 narg--;
 644                         } else if (ktr->ktr_code == SYS_msync) {
 645                                 print_number(ip,narg,c);
 646                                 print_number(ip,narg,c);
 647                                 (void)putchar(',');
 648                                 msyncflagsname((int)*ip);
 649                                 ip++;
 650                                 narg--;
 651 #ifdef SYS_freebsd6_mmap
 652                         } else if (ktr->ktr_code == SYS_freebsd6_mmap) {
 653                                 print_number(ip,narg,c);
 654                                 print_number(ip,narg,c);
 655                                 (void)putchar(',');
 656                                 mmapprotname ((int)*ip);
 657                                 (void)putchar(',');
 658                                 ip++;
 659                                 narg--;
 660                                 mmapflagsname ((int)*ip);
 661                                 ip++;
 662                                 narg--;
 663 #endif
 664                         } else if (ktr->ktr_code == SYS_mmap) {
 665                                 print_number(ip,narg,c);
 666                                 print_number(ip,narg,c);
 667                                 (void)putchar(',');
 668                                 mmapprotname ((int)*ip);
 669                                 (void)putchar(',');
 670                                 ip++;
 671                                 narg--;
 672                                 mmapflagsname ((int)*ip);
 673                                 ip++;
 674                                 narg--;
 675                         } else if (ktr->ktr_code == SYS_mprotect) {
 676                                 print_number(ip,narg,c);
 677                                 print_number(ip,narg,c);
 678                                 (void)putchar(',');
 679                                 mmapprotname ((int)*ip);
 680                                 ip++;
 681                                 narg--;
 682                         } else if (ktr->ktr_code == SYS_madvise) {
 683                                 print_number(ip,narg,c);
 684                                 print_number(ip,narg,c);
 685                                 (void)putchar(',');
 686                                 madvisebehavname((int)*ip);
 687                                 ip++;
 688                                 narg--;
 689                         } else if (ktr->ktr_code == SYS_setpriority) {
 690                                 print_number(ip,narg,c);
 691                                 print_number(ip,narg,c);
 692                                 (void)putchar(',');
 693                                 prioname((int)*ip);
 694                                 ip++;
 695                                 narg--;
 696                         } else if (ktr->ktr_code == SYS_fcntl) {
 697                                 int cmd;
 698                                 int arg;
 699                                 print_number(ip,narg,c);
 700                                 cmd = *ip;
 701                                 arg = *++ip;
 702                                 (void)putchar(',');
 703                                 fcntlcmdname(cmd, arg, decimal);
 704                                 ip++;
 705                                 narg-=2;
 706                         } else if (ktr->ktr_code == SYS_socket) {
 707                                 int sockdomain;
 708                                 (void)putchar('(');
 709                                 sockdomain=(int)*ip;
 710                                 sockdomainname(sockdomain);
 711                                 ip++;
 712                                 narg--;
 713                                 (void)putchar(',');
 714                                 socktypename((int)*ip);
 715                                 ip++;
 716                                 narg--;
 717                                 if (sockdomain == PF_INET ||
 718                                     sockdomain == PF_INET6) {
 719                                         (void)putchar(',');
 720                                         sockipprotoname((int)*ip);
 721                                         ip++;
 722                                         narg--;
 723                                 }
 724                                 c = ',';
 725                         } else if (ktr->ktr_code == SYS_setsockopt ||
 726                                    ktr->ktr_code == SYS_getsockopt) {
 727                                 print_number(ip,narg,c);
 728                                 (void)putchar(',');
 729                                 sockoptlevelname((int)*ip, decimal);
 730                                 if ((int)*ip == SOL_SOCKET) {
 731                                         ip++;
 732                                         narg--;
 733                                         (void)putchar(',');
 734                                         sockoptname((int)*ip);
 735                                 }
 736                                 ip++;
 737                                 narg--;
 738 #ifdef SYS_freebsd6_lseek
 739                         } else if (ktr->ktr_code == SYS_freebsd6_lseek) {
 740                                 print_number(ip,narg,c);
 741                                 /* Hidden 'pad' argument, not in lseek(2) */
 742                                 print_number(ip,narg,c);
 743                                 print_number(ip,narg,c);
 744                                 (void)putchar(',');
 745                                 whencename ((int)*ip);
 746                                 ip++;
 747                                 narg--;
 748 #endif
 749                         } else if (ktr->ktr_code == SYS_lseek) {
 750                                 print_number(ip,narg,c);
 751                                 /* Hidden 'pad' argument, not in lseek(2) */
 752                                 print_number(ip,narg,c);
 753                                 (void)putchar(',');
 754                                 whencename ((int)*ip);
 755                                 ip++;
 756                                 narg--;
 757
 758                         } else if (ktr->ktr_code == SYS_flock) {
 759                                 print_number(ip,narg,c);
 760                                 (void)putchar(',');
 761                                 flockname((int)*ip);
 762                                 ip++;
 763                                 narg--;
 764                         } else if (ktr->ktr_code == SYS_mkfifo ||
 765                                    ktr->ktr_code == SYS_mkdir) {
 766                                 print_number(ip,narg,c);
 767                                 (void)putchar(',');
 768                                 modename((int)*ip);
 769                                 ip++;
 770                                 narg--;
 771                         } else if (ktr->ktr_code == SYS_shutdown) {
 772                                 print_number(ip,narg,c);
 773                                 (void)putchar(',');
 774                                 shutdownhowname((int)*ip);
 775                                 ip++;
 776                                 narg--;
 777                         } else if (ktr->ktr_code == SYS_socketpair) {
 778                                 (void)putchar('(');
 779                                 sockdomainname((int)*ip);
 780                                 ip++;
 781                                 narg--;
 782                                 (void)putchar(',');
 783                                 socktypename((int)*ip);
 784                                 ip++;
 785                                 narg--;
 786                                 c = ',';
 787                         } else if (ktr->ktr_code == SYS_getrlimit ||
 788                                    ktr->ktr_code == SYS_setrlimit) {
 789                                 (void)putchar('(');
 790                                 rlimitname((int)*ip);
 791                                 ip++;
 792                                 narg--;
 793                                 c = ',';
 794                         } else if (ktr->ktr_code == SYS_quotactl) {
 795                                 print_number(ip,narg,c);
 796                                 (void)putchar(',');
 797                                 quotactlname((int)*ip);
 798                                 ip++;
 799                                 narg--;
 800                                 c = ',';
 801                         } else if (ktr->ktr_code == SYS_nfssvc) {
 802                                 (void)putchar('(');
 803                                 nfssvcname((int)*ip);
 804                                 ip++;
 805                                 narg--;
 806                                 c = ',';
 807                         } else if (ktr->ktr_code == SYS_rtprio) {
 808                                 (void)putchar('(');
 809                                 rtprioname((int)*ip);
 810                                 ip++;
 811                                 narg--;
 812                                 c = ',';
 813                         } else if (ktr->ktr_code == SYS___semctl) {
 814                                 print_number(ip,narg,c);
 815                                 print_number(ip,narg,c);
 816                                 (void)putchar(',');
 817                                 semctlname((int)*ip);
 818                                 ip++;
 819                                 narg--;
 820                         } else if (ktr->ktr_code == SYS_semget) {
 821                                 print_number(ip,narg,c);
 822                                 print_number(ip,narg,c);
 823                                 (void)putchar(',');
 824                                 semgetname((int)*ip);
 825                                 ip++;
 826                                 narg--;
 827                         } else if (ktr->ktr_code == SYS_msgctl) {
 828                                 print_number(ip,narg,c);
 829                                 (void)putchar(',');
 830                                 shmctlname((int)*ip);
 831                                 ip++;
 832                                 narg--;
 833                         } else if (ktr->ktr_code == SYS_shmat) {
 834                                 print_number(ip,narg,c);
 835                                 print_number(ip,narg,c);
 836                                 (void)putchar(',');
 837                                 shmatname((int)*ip);
 838                                 ip++;
 839                                 narg--;
 840                         } else if (ktr->ktr_code == SYS_shmctl) {
 841                                 print_number(ip,narg,c);
 842                                 (void)putchar(',');
 843                                 shmctlname((int)*ip);
 844                                 ip++;
 845                                 narg--;
 846                         } else if (ktr->ktr_code == SYS_minherit) {
 847                                 print_number(ip,narg,c);
 848                                 print_number(ip,narg,c);
 849                                 (void)putchar(',');
 850                                 minheritname((int)*ip);
 851                                 ip++;
 852                                 narg--;
 853                         } else if (ktr->ktr_code == SYS_rfork) {
 854                                 (void)putchar('(');
 855                                 rforkname((int)*ip);
 856                                 ip++;
 857                                 narg--;
 858                                 c = ',';
 859                         } else if (ktr->ktr_code == SYS_lio_listio) {
 860                                 (void)putchar('(');
 861                                 lio_listioname((int)*ip);
 862                                 ip++;
 863                                 narg--;
 864                                 c = ',';
 865                         } else if (ktr->ktr_code == SYS_mlockall) {
 866                                 (void)putchar('(');
 867                                 mlockallname((int)*ip);
 868                                 ip++;
 869                                 narg--;
 870                         } else if (ktr->ktr_code == SYS_sched_setscheduler) {
 871                                 print_number(ip,narg,c);
 872                                 (void)putchar(',');
 873                                 schedpolicyname((int)*ip);
 874                                 ip++;
 875                                 narg--;
 876                         } else if (ktr->ktr_code == SYS_sched_get_priority_max ||
 877                                    ktr->ktr_code == SYS_sched_get_priority_min) {
 878                                 (void)putchar('(');
 879                                 schedpolicyname((int)*ip);
 880                                 ip++;
 881                                 narg--;
 882                         } else if (ktr->ktr_code == SYS_sendfile) {
 883                                 print_number(ip,narg,c);
 884                                 print_number(ip,narg,c);
 885                                 print_number(ip,narg,c);
 886                                 print_number(ip,narg,c);
 887                                 print_number(ip,narg,c);
 888                                 print_number(ip,narg,c);
 889                                 (void)putchar(',');
 890                                 sendfileflagsname((int)*ip);
 891                                 ip++;
 892                                 narg--;
 893                         } else if (ktr->ktr_code == SYS_kldsym) {
 894                                 print_number(ip,narg,c);
 895                                 (void)putchar(',');
 896                                 kldsymcmdname((int)*ip);
 897                                 ip++;
 898                                 narg--;
 899                         } else if (ktr->ktr_code == SYS_sigprocmask) {
 900                                 (void)putchar('(');
 901                                 sigprocmaskhowname((int)*ip);
 902                                 ip++;
 903                                 narg--;
 904                                 c = ',';
 905                         } else if (ktr->ktr_code == SYS___acl_get_file ||
 906                                    ktr->ktr_code == SYS___acl_set_file ||
 907                                    ktr->ktr_code == SYS___acl_get_fd ||
 908                                    ktr->ktr_code == SYS___acl_set_fd ||
 909                                    ktr->ktr_code == SYS___acl_delete_file ||
 910                                    ktr->ktr_code == SYS___acl_delete_fd ||
 911                                    ktr->ktr_code == SYS___acl_aclcheck_file ||
 912                                    ktr->ktr_code == SYS___acl_aclcheck_fd ||
 913                                    ktr->ktr_code == SYS___acl_get_link ||
 914                                    ktr->ktr_code == SYS___acl_set_link ||
 915                                    ktr->ktr_code == SYS___acl_delete_link ||
 916                                    ktr->ktr_code == SYS___acl_aclcheck_link) {
 917                                 print_number(ip,narg,c);
 918                                 (void)putchar(',');
 919                                 acltypename((int)*ip);
 920                                 ip++;
 921                                 narg--;
 922                         } else if (ktr->ktr_code == SYS_sigaction) {
 923                                 (void)putchar('(');
 924                                 signame((int)*ip);
 925                                 ip++;
 926                                 narg--;
 927                                 c = ',';
 928                         } else if (ktr->ktr_code == SYS_extattrctl) {
 929                                 print_number(ip,narg,c);
 930                                 (void)putchar(',');
 931                                 extattrctlname((int)*ip);
 932                                 ip++;
 933                                 narg--;
 934                         } else if (ktr->ktr_code == SYS_nmount) {
 935                                 print_number(ip,narg,c);
 936                                 print_number(ip,narg,c);
 937                                 (void)putchar(',');
 938                                 mountflagsname ((int)*ip);
 939                                 ip++;
 940                                 narg--;
 941                         } else if (ktr->ktr_code == SYS_thr_create) {
 942                                 print_number(ip,narg,c);
 943                                 print_number(ip,narg,c);
 944                                 (void)putchar(',');
 945                                 thrcreateflagsname ((int)*ip);
 946                                 ip++;
 947                                 narg--;
 948                         } else if (ktr->ktr_code == SYS_thr_kill) {
 949                                 print_number(ip,narg,c);
 950                                 (void)putchar(',');
 951                                 signame ((int)*ip);
 952                                 ip++;
 953                                 narg--;
 954                         } else if (ktr->ktr_code == SYS_kldunloadf) {
 955                                 print_number(ip,narg,c);
 956                                 (void)putchar(',');
 957                                 kldunloadfflagsname ((int)*ip);
 958                                 ip++;
 959                                 narg--;
 960                         } else if (ktr->ktr_code == SYS_posix_fadvise) {
 961                                 print_number(ip,narg,c);
 962                                 print_number(ip,narg,c);
 963                                 print_number(ip,narg,c);
 964                                 (void)putchar(',');
 965                                 fadvisebehavname((int)*ip);
 966                                 ip++;
 967                                 narg--;
 968                         }
 969                 }
 970                 while (narg > 0) {
 971                         print_number(ip,narg,c);
 972                 }
 973                 (void)putchar(')');
 974         }
 975         (void)putchar('\n');
 976 }
 977
 978 void
 979 ktrsysret(struct ktr_sysret *ktr, u_int flags)
 980 {
 981         register_t ret = ktr->ktr_retval;
 982         int error = ktr->ktr_error;
 983         int code = ktr->ktr_code;
 984
 985         if ((flags != 0 && ((flags & SV_ABI_MASK) != SV_ABI_FREEBSD)) ||
 986             (code >= nsyscalls || code < 0))
 987                 (void)printf("[%d] ", code);
 988         else
 989                 (void)printf("%s ", syscallnames[code]);
 990
 991         if (error == 0) {
 992                 if (fancy) {
 993                         (void)printf("%ld", (long)ret);
 994                         if (ret < 0 || ret > 9)
 995                                 (void)printf("/%#lx", (long)ret);
 996                 } else {
 997                         if (decimal)
 998                                 (void)printf("%ld", (long)ret);
 999                         else
1000                                 (void)printf("%#lx", (long)ret);
1001                 }
1002         } else if (error == ERESTART)
1003                 (void)printf("RESTART");
1004         else if (error == EJUSTRETURN)
1005                 (void)printf("JUSTRETURN");
1006         else {
1007                 (void)printf("-1 errno %d", ktr->ktr_error);
1008                 if (fancy)
1009                         (void)printf(" %s", strerror(ktr->ktr_error));
1010         }
1011         (void)putchar('\n');
1012 }
1013
1014 void
1015 ktrnamei(char *cp, int len)
1016 {
1017         (void)printf("\"%.*s\"\n", len, cp);
1018 }
1019
1020 void
1021 hexdump(char *p, int len, int screenwidth)
1022 {
1023         int n, i;
1024         int width;
1025
1026         width = 0;
1027         do {
1028                 width += 2;
1029                 i = 13;                 /* base offset */
1030                 i += (width / 2) + 1;   /* spaces every second byte */
1031                 i += (width * 2);       /* width of bytes */
1032                 i += 3;                 /* "  |" */
1033                 i += width;             /* each byte */
1034                 i += 1;                 /* "|" */
1035         } while (i < screenwidth);
1036         width -= 2;
1037
1038         for (n = 0; n < len; n += width) {
1039                 for (i = n; i < n + width; i++) {
1040                         if ((i % width) == 0) { /* beginning of line */
1041                                 printf("       0x%04x", i);
1042                         }
1043                         if ((i % 2) == 0) {
1044                                 printf(" ");
1045                         }
1046                         if (i < len)
1047                                 printf("%02x", p[i] & 0xff);
1048                         else
1049                                 printf("  ");
1050                 }
1051                 printf("  |");
1052                 for (i = n; i < n + width; i++) {
1053                         if (i >= len)
1054                                 break;
1055                         if (p[i] >= ' ' && p[i] <= '~')
1056                                 printf("%c", p[i]);
1057                         else
1058                                 printf(".");
1059                 }
1060                 printf("|\n");
1061         }
1062         if ((i % width) != 0)
1063                 printf("\n");
1064 }
1065
1066 void
1067 visdump(char *dp, int datalen, int screenwidth)
1068 {
1069         int col = 0;
1070         char *cp;
1071         int width;
1072         char visbuf[5];
1073
1074         (void)printf("       \"");
1075         col = 8;
1076         for (;datalen > 0; datalen--, dp++) {
1077                 (void) vis(visbuf, *dp, VIS_CSTYLE, *(dp+1));
1078                 cp = visbuf;
1079                 /*
1080                  * Keep track of printables and
1081                  * space chars (like fold(1)).
1082                  */
1083                 if (col == 0) {
1084                         (void)putchar('\t');
1085                         col = 8;
1086                 }
1087                 switch(*cp) {
1088                 case '\n':
1089                         col = 0;
1090                         (void)putchar('\n');
1091                         continue;
1092                 case '\t':
1093                         width = 8 - (col&07);
1094                         break;
1095                 default:
1096                         width = strlen(cp);
1097                 }
1098                 if (col + width > (screenwidth-2)) {
1099                         (void)printf("\\\n\t");
1100                         col = 8;
1101                 }
1102                 col += width;
1103                 do {
1104                         (void)putchar(*cp++);
1105                 } while (*cp);
1106         }
1107         if (col == 0)
1108                 (void)printf("       ");
1109         (void)printf("\"\n");
1110 }
1111
1112 void
1113 ktrgenio(struct ktr_genio *ktr, int len)
1114 {
1115         int datalen = len - sizeof (struct ktr_genio);
1116         char *dp = (char *)ktr + sizeof (struct ktr_genio);
1117         static int screenwidth = 0;
1118         int i, binary;
1119
1120         if (screenwidth == 0) {
1121                 struct winsize ws;
1122
1123                 if (fancy && ioctl(fileno(stderr), TIOCGWINSZ, &ws) != -1 &&
1124                     ws.ws_col > 8)
1125                         screenwidth = ws.ws_col;
1126                 else
1127                         screenwidth = 80;
1128         }
1129         printf("fd %d %s %d byte%s\n", ktr->ktr_fd,
1130                 ktr->ktr_rw == UIO_READ ? "read" : "wrote", datalen,
1131                 datalen == 1 ? "" : "s");
1132         if (suppressdata)
1133                 return;
1134         if (maxdata && datalen > maxdata)
1135                 datalen = maxdata;
1136
1137         for (i = 0, binary = 0; i < datalen && binary == 0; i++)  {
1138                 if (dp[i] >= 32 && dp[i] < 127)
1139                         continue;
1140                 if (dp[i] == 10 || dp[i] == 13 || dp[i] == 0 || dp[i] == 9)
1141                         continue;
1142                 binary = 1;
1143         }
1144         if (binary)
1145                 hexdump(dp, datalen, screenwidth);
1146         else
1147                 visdump(dp, datalen, screenwidth);
1148 }
1149
1150 const char *signames[] = {
1151         "NULL", "HUP", "INT", "QUIT", "ILL", "TRAP", "IOT",     /*  1 - 6  */
1152         "EMT", "FPE", "KILL", "BUS", "SEGV", "SYS",             /*  7 - 12 */
1153         "PIPE", "ALRM",  "TERM", "URG", "STOP", "TSTP",         /* 13 - 18 */
1154         "CONT", "CHLD", "TTIN", "TTOU", "IO", "XCPU",           /* 19 - 24 */
1155         "XFSZ", "VTALRM", "PROF", "WINCH", "29", "USR1",        /* 25 - 30 */
1156         "USR2", NULL,                                           /* 31 - 32 */
1157 };
1158
1159 void
1160 ktrpsig(struct ktr_psig *psig)
1161 {
1162         if (psig->signo > 0 && psig->signo < NSIG)
1163                 (void)printf("SIG%s ", signames[psig->signo]);
1164         else
1165                 (void)printf("SIG %d ", psig->signo);
1166         if (psig->action == SIG_DFL)
1167                 (void)printf("SIG_DFL code=0x%x\n", psig->code);
1168         else {
1169                 (void)printf("caught handler=0x%lx mask=0x%x code=0x%x\n",
1170                     (u_long)psig->action, psig->mask.__bits[0], psig->code);
1171         }
1172 }
1173
1174 void
1175 ktrcsw_old(struct ktr_csw_old *cs)
1176 {
1177         (void)printf("%s %s\n", cs->out ? "stop" : "resume",
1178                 cs->user ? "user" : "kernel");
1179 }
1180
1181 void
1182 ktrcsw(struct ktr_csw *cs)
1183 {
1184         printf("%s %s \"%s\"\n", cs->out ? "stop" : "resume",
1185             cs->user ? "user" : "kernel", cs->wmesg);
1186 }
1187
1188 #define UTRACE_DLOPEN_START             1
1189 #define UTRACE_DLOPEN_STOP              2
1190 #define UTRACE_DLCLOSE_START            3
1191 #define UTRACE_DLCLOSE_STOP             4
1192 #define UTRACE_LOAD_OBJECT              5
1193 #define UTRACE_UNLOAD_OBJECT            6
1194 #define UTRACE_ADD_RUNDEP               7
1195 #define UTRACE_PRELOAD_FINISHED         8
1196 #define UTRACE_INIT_CALL                9
1197 #define UTRACE_FINI_CALL                10
1198
1199 struct utrace_rtld {
1200         char sig[4];                            /* 'RTLD' */
1201         int event;
1202         void *handle;
1203         void *mapbase;
1204         size_t mapsize;
1205         int refcnt;
1206         char name[MAXPATHLEN];
1207 };
1208
1209 void
1210 ktruser_rtld(int len, unsigned char *p)
1211 {
1212         struct utrace_rtld *ut = (struct utrace_rtld *)p;
1213         void *parent;
1214         int mode;
1215
1216         switch (ut->event) {
1217         case UTRACE_DLOPEN_START:
1218                 mode = ut->refcnt;
1219                 printf("dlopen(%s, ", ut->name);
1220                 switch (mode & RTLD_MODEMASK) {
1221                 case RTLD_NOW:
1222                         printf("RTLD_NOW");
1223                         break;
1224                 case RTLD_LAZY:
1225                         printf("RTLD_LAZY");
1226                         break;
1227                 default:
1228                         printf("%#x", mode & RTLD_MODEMASK);
1229                 }
1230                 if (mode & RTLD_GLOBAL)
1231                         printf(" | RTLD_GLOBAL");
1232                 if (mode & RTLD_TRACE)
1233                         printf(" | RTLD_TRACE");
1234                 if (mode & ~(RTLD_MODEMASK | RTLD_GLOBAL | RTLD_TRACE))
1235                         printf(" | %#x", mode &
1236                             ~(RTLD_MODEMASK | RTLD_GLOBAL | RTLD_TRACE));
1237                 printf(")\n");
1238                 break;
1239         case UTRACE_DLOPEN_STOP:
1240                 printf("%p = dlopen(%s) ref %d\n", ut->handle, ut->name,
1241                     ut->refcnt);
1242                 break;
1243         case UTRACE_DLCLOSE_START:
1244                 printf("dlclose(%p) (%s, %d)\n", ut->handle, ut->name,
1245                     ut->refcnt);
1246                 break;
1247         case UTRACE_DLCLOSE_STOP:
1248                 printf("dlclose(%p) finished\n", ut->handle);
1249                 break;
1250         case UTRACE_LOAD_OBJECT:
1251                 printf("RTLD: loaded   %p @ %p - %p (%s)\n", ut->handle,
1252                     ut->mapbase, (char *)ut->mapbase + ut->mapsize - 1,
1253                     ut->name);
1254                 break;
1255         case UTRACE_UNLOAD_OBJECT:
1256                 printf("RTLD: unloaded %p @ %p - %p (%s)\n", ut->handle,
1257                     ut->mapbase, (char *)ut->mapbase + ut->mapsize - 1,
1258                     ut->name);
1259                 break;
1260         case UTRACE_ADD_RUNDEP:
1261                 parent = ut->mapbase;
1262                 printf("RTLD: %p now depends on %p (%s, %d)\n", parent,
1263                     ut->handle, ut->name, ut->refcnt);
1264                 break;
1265         case UTRACE_PRELOAD_FINISHED:
1266                 printf("RTLD: LD_PRELOAD finished\n");
1267                 break;
1268         case UTRACE_INIT_CALL:
1269                 printf("RTLD: init %p for %p (%s)\n", ut->mapbase, ut->handle,
1270                     ut->name);
1271                 break;
1272         case UTRACE_FINI_CALL:
1273                 printf("RTLD: fini %p for %p (%s)\n", ut->mapbase, ut->handle,
1274                     ut->name);
1275                 break;
1276         default:
1277                 p += 4;
1278                 len -= 4;
1279                 printf("RTLD: %d ", len);
1280                 while (len--)
1281                         if (decimal)
1282                                 printf(" %d", *p++);
1283                         else
1284                                 printf(" %02x", *p++);
1285                 printf("\n");
1286         }
1287 }
1288
1289 struct utrace_malloc {
1290         void *p;
1291         size_t s;
1292         void *r;
1293 };
1294
1295 void
1296 ktruser_malloc(int len, unsigned char *p)
1297 {
1298         struct utrace_malloc *ut = (struct utrace_malloc *)p;
1299
1300         if (ut->p == NULL) {
1301                 if (ut->s == 0 && ut->r == NULL)
1302                         printf("malloc_init()\n");
1303                 else
1304                         printf("%p = malloc(%zu)\n", ut->r, ut->s);
1305         } else {
1306                 if (ut->s == 0)
1307                         printf("free(%p)\n", ut->p);
1308                 else
1309                         printf("%p = realloc(%p, %zu)\n", ut->r, ut->p, ut->s);
1310         }
1311 }
1312
1313 void
1314 ktruser(int len, unsigned char *p)
1315 {
1316
1317         if (len >= 8 && bcmp(p, "RTLD", 4) == 0) {
1318                 ktruser_rtld(len, p);
1319                 return;
1320         }
1321
1322         if (len == sizeof(struct utrace_malloc)) {
1323                 ktruser_malloc(len, p);
1324                 return;
1325         }
1326
1327         (void)printf("%d ", len);
1328         while (len--)
1329                 if (decimal)
1330                         (void)printf(" %d", *p++);
1331                 else
1332                         (void)printf(" %02x", *p++);
1333         (void)printf("\n");
1334 }
1335
1336 void
1337 ktrsockaddr(struct sockaddr *sa)
1338 {
1339 /*
1340  TODO: Support additional address families
1341         #include <netnatm/natm.h>
1342         struct sockaddr_natm    *natm;
1343         #include <netsmb/netbios.h>
1344         struct sockaddr_nb      *nb;
1345 */
1346         char addr[64];
1347
1348         /*
1349          * note: ktrstruct() has already verified that sa points to a
1350          * buffer at least sizeof(struct sockaddr) bytes long and exactly
1351          * sa->sa_len bytes long.
1352          */
1353         printf("struct sockaddr { ");
1354         sockfamilyname(sa->sa_family);
1355         printf(", ");
1356
1357 #define check_sockaddr_len(n)                                   \
1358         if (sa_##n->s##n##_len < sizeof(struct sockaddr_##n)) { \
1359                 printf("invalid");                              \
1360                 break;                                          \
1361         }
1362
1363         switch(sa->sa_family) {
1364         case AF_INET: {
1365                 struct sockaddr_in      *sa_in;
1366
1367                 sa_in = (struct sockaddr_in *)sa;
1368                 check_sockaddr_len(in);
1369                 inet_ntop(AF_INET, &sa_in->sin_addr, addr, sizeof addr);
1370                 printf("%s:%u", addr, ntohs(sa_in->sin_port));
1371                 break;
1372         }
1373 #ifdef NETATALK
1374         case AF_APPLETALK: {
1375                 struct sockaddr_at      *sa_at;
1376                 struct netrange         *nr;
1377
1378                 sa_at = (struct sockaddr_at *)sa;
1379                 check_sockaddr_len(at);
1380                 nr = &sa_at->sat_range.r_netrange;
1381                 printf("%d.%d, %d-%d, %d", ntohs(sa_at->sat_addr.s_net),
1382                         sa_at->sat_addr.s_node, ntohs(nr->nr_firstnet),
1383                         ntohs(nr->nr_lastnet), nr->nr_phase);
1384                 break;
1385         }
1386 #endif
1387         case AF_INET6: {
1388                 struct sockaddr_in6     *sa_in6;
1389
1390                 sa_in6 = (struct sockaddr_in6 *)sa;
1391                 check_sockaddr_len(in6);
1392                 inet_ntop(AF_INET6, &sa_in6->sin6_addr, addr, sizeof addr);
1393                 printf("[%s]:%u", addr, htons(sa_in6->sin6_port));
1394                 break;
1395         }
1396 #ifdef IPX
1397         case AF_IPX: {
1398                 struct sockaddr_ipx     *sa_ipx;
1399
1400                 sa_ipx = (struct sockaddr_ipx *)sa;
1401                 check_sockaddr_len(ipx);
1402                 /* XXX wish we had ipx_ntop */
1403                 printf("%s", ipx_ntoa(sa_ipx->sipx_addr));
1404                 break;
1405         }
1406 #endif
1407         case AF_UNIX: {
1408                 struct sockaddr_un *sa_un;
1409
1410                 sa_un = (struct sockaddr_un *)sa;
1411                 check_sockaddr_len(un);
1412                 printf("%.*s", (int)sizeof(sa_un->sun_path), sa_un->sun_path);
1413                 break;
1414         }
1415         default:
1416                 printf("unknown address family");
1417         }
1418         printf(" }\n");
1419 }
1420
1421 void
1422 ktrstat(struct stat *statp)
1423 {
1424         char mode[12], timestr[PATH_MAX + 4];
1425         struct passwd *pwd;
1426         struct group  *grp;
1427         struct tm *tm;
1428
1429         /*
1430          * note: ktrstruct() has already verified that statp points to a
1431          * buffer exactly sizeof(struct stat) bytes long.
1432          */
1433         printf("struct stat {");
1434         strmode(statp->st_mode, mode);
1435         printf("dev=%ju, ino=%ju, mode=%s, nlink=%ju, ",
1436                 (uintmax_t)statp->st_dev, (uintmax_t)statp->st_ino, mode,
1437                 (uintmax_t)statp->st_nlink);
1438         if (resolv == 0 || (pwd = getpwuid(statp->st_uid)) == NULL)
1439                 printf("uid=%ju, ", (uintmax_t)statp->st_uid);
1440         else
1441                 printf("uid=\"%s\", ", pwd->pw_name);
1442         if (resolv == 0 || (grp = getgrgid(statp->st_gid)) == NULL)
1443                 printf("gid=%ju, ", (uintmax_t)statp->st_gid);
1444         else
1445                 printf("gid=\"%s\", ", grp->gr_name);
1446         printf("rdev=%ju, ", (uintmax_t)statp->st_rdev);
1447         printf("atime=");
1448         if (resolv == 0)
1449                 printf("%jd", (intmax_t)statp->st_atimespec.tv_sec);
1450         else {
1451                 tm = localtime(&statp->st_atimespec.tv_sec);
1452                 (void)strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1453                 printf("\"%s\"", timestr);
1454         }
1455         if (statp->st_atimespec.tv_nsec != 0)
1456                 printf(".%09ld, ", statp->st_atimespec.tv_nsec);
1457         else
1458                 printf(", ");
1459         printf("stime=");
1460         if (resolv == 0)
1461                 printf("%jd", (intmax_t)statp->st_mtimespec.tv_sec);
1462         else {
1463                 tm = localtime(&statp->st_mtimespec.tv_sec);
1464                 (void)strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1465                 printf("\"%s\"", timestr);
1466         }
1467         if (statp->st_mtimespec.tv_nsec != 0)
1468                 printf(".%09ld, ", statp->st_mtimespec.tv_nsec);
1469         else
1470                 printf(", ");
1471         printf("ctime=");
1472         if (resolv == 0)
1473                 printf("%jd", (intmax_t)statp->st_ctimespec.tv_sec);
1474         else {
1475                 tm = localtime(&statp->st_ctimespec.tv_sec);
1476                 (void)strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1477                 printf("\"%s\"", timestr);
1478         }
1479         if (statp->st_ctimespec.tv_nsec != 0)
1480                 printf(".%09ld, ", statp->st_ctimespec.tv_nsec);
1481         else
1482                 printf(", ");
1483         printf("birthtime=");
1484         if (resolv == 0)
1485                 printf("%jd", (intmax_t)statp->st_birthtimespec.tv_sec);
1486         else {
1487                 tm = localtime(&statp->st_birthtimespec.tv_sec);
1488                 (void)strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1489                 printf("\"%s\"", timestr);
1490         }
1491         if (statp->st_birthtimespec.tv_nsec != 0)
1492                 printf(".%09ld, ", statp->st_birthtimespec.tv_nsec);
1493         else
1494                 printf(", ");
1495         printf("size=%jd, blksize=%ju, blocks=%jd, flags=0x%x",
1496                 (uintmax_t)statp->st_size, (uintmax_t)statp->st_blksize,
1497                 (intmax_t)statp->st_blocks, statp->st_flags);
1498         printf(" }\n");
1499 }
1500
1501 void
1502 ktrstruct(char *buf, size_t buflen)
1503 {
1504         char *name, *data;
1505         size_t namelen, datalen;
1506         int i;
1507
1508         for (name = buf, namelen = 0;
1509              namelen < buflen && name[namelen] != '\0';
1510              ++namelen)
1511                 /* nothing */;
1512         if (namelen == buflen)
1513                 goto invalid;
1514         if (name[namelen] != '\0')
1515                 goto invalid;
1516         data = buf + namelen + 1;
1517         datalen = buflen - namelen - 1;
1518         if (datalen == 0)
1519                 goto invalid;
1520         /* sanity check */
1521         for (i = 0; i < namelen; ++i)
1522                 if (!isalpha((unsigned char)name[i]))
1523                         goto invalid;
1524         if (strcmp(name, "stat") == 0) {
1525                 if (datalen != sizeof(struct stat))
1526                         goto invalid;
1527                 ktrstat((struct stat *)data);
1528         } else if (strcmp(name, "sockaddr") == 0) {
1529                 if (datalen < sizeof(struct sockaddr) ||
1530                     datalen != ((struct sockaddr *)(data))->sa_len)
1531                         goto invalid;
1532                 ktrsockaddr((struct sockaddr *)data);
1533         } else {
1534                 printf("unknown structure\n");
1535         }
1536         return;
1537 invalid:
1538         printf("invalid record\n");
1539 }
1540
1541 void
1542 ktrfault(struct ktr_fault *ktr)
1543 {
1544
1545         printf("0x%jx ", ktr->vaddr);
1546         vmprotname(ktr->type);
1547         printf("\n");
1548 }
1549
1550 void
1551 ktrfaultend(struct ktr_faultend *ktr)
1552 {
1553
1554         vmresultname(ktr->result);
1555         printf("\n");
1556 }
1557
1558 #if defined(__amd64__) || defined(__i386__)
1559 void
1560 linux_ktrsyscall(struct ktr_syscall *ktr)
1561 {
1562         int narg = ktr->ktr_narg;
1563         register_t *ip;
1564
1565         if (ktr->ktr_code >= nlinux_syscalls || ktr->ktr_code < 0)
1566                 printf("[%d]", ktr->ktr_code);
1567         else
1568                 printf("%s", linux_syscallnames[ktr->ktr_code]);
1569         ip = &ktr->ktr_args[0];
1570         if (narg) {
1571                 char c = '(';
1572                 while (narg > 0)
1573                         print_number(ip, narg, c);
1574                 putchar(')');
1575         }
1576         putchar('\n');
1577 }
1578
1579 void
1580 linux_ktrsysret(struct ktr_sysret *ktr)
1581 {
1582         register_t ret = ktr->ktr_retval;
1583         int error = ktr->ktr_error;
1584         int code = ktr->ktr_code;
1585
1586         if (code >= nlinux_syscalls || code < 0)
1587                 printf("[%d] ", code);
1588         else
1589                 printf("%s ", linux_syscallnames[code]);
1590
1591         if (error == 0) {
1592                 if (fancy) {
1593                         printf("%ld", (long)ret);
1594                         if (ret < 0 || ret > 9)
1595                                 printf("/%#lx", (long)ret);
1596                 } else {
1597                         if (decimal)
1598                                 printf("%ld", (long)ret);
1599                         else
1600                                 printf("%#lx", (long)ret);
1601                 }
1602         } else if (error == ERESTART)
1603                 printf("RESTART");
1604         else if (error == EJUSTRETURN)
1605                 printf("JUSTRETURN");
1606         else {
1607                 if (ktr->ktr_error <= ELAST + 1)
1608                         error = abs(bsd_to_linux_errno[ktr->ktr_error]);
1609                 else
1610                         error = 999;
1611                 printf("-1 errno %d", error);
1612                 if (fancy)
1613                         printf(" %s", strerror(ktr->ktr_error));
1614         }
1615         putchar('\n');
1616 }
1617 #endif
1618
1619 void
1620 usage(void)
1621 {
1622         fprintf(stderr, "usage: kdump [-dEnlHRrsTA] [-f trfile] "
1623             "[-m maxdata] [-p pid] [-t trstr]\n");
1624         exit(1);
1625 }