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  * @(#) Copyright (c) 1988, 1993 The Regents of the University of California.  All rights reserved.
  34  * @(#)kdump.c  8.1 (Berkeley) 6/6/93
  35  * $FreeBSD: src/usr.bin/kdump/kdump.c,v 1.29 2006/05/20 14:27:22 netchild Exp $
  36  * $DragonFly: src/usr.bin/kdump/kdump.c,v 1.13 2008/10/16 01:52:32 swildner Exp $
  37  */
  38
  39 #define _KERNEL_STRUCTURES
  40
  41 #include <sys/errno.h>
  42 #include <sys/param.h>
  43 #include <sys/errno.h>
  44 #include <sys/time.h>
  45 #include <sys/uio.h>
  46 #include <sys/ktrace.h>
  47 #include <sys/ioctl.h>
  48 #include <sys/ptrace.h>
  49 #include <err.h>
  50 #include <locale.h>
  51 #include <stdio.h>
  52 #include <stdlib.h>
  53 #include <string.h>
  54 #include <unistd.h>
  55 #include <vis.h>
  56 #include "ktrace.h"
  57 #include "kdump_subr.h"
  58
  59 extern const char *ioctlname(u_long);
  60
  61 static int      dumpheader(struct ktr_header *);
  62 static int      fread_tail(void *, int, int);
  63 static void     ktrcsw(struct ktr_csw *);
  64 static void     ktrgenio(struct ktr_genio *, int);
  65 static void     ktrnamei(char *, int);
  66 static void     ktrpsig(struct ktr_psig *);
  67 static void     ktrsyscall(struct ktr_syscall *);
  68 static void     ktrsysret(struct ktr_sysret *);
  69 static void     ktruser(int, unsigned char *);
  70 static void     ktruser_malloc(int, unsigned char *);
  71 static void     timevalfix(struct timeval *);
  72 static void     timevalsub(struct timeval *, struct timeval *);
  73 static void     usage(void);
  74
  75 int timestamp, decimal, fancy = 1, tail, maxdata = 64;
  76 int fixedformat;
  77 const char *tracefile = DEF_TRACEFILE;
  78 struct ktr_header ktr_header;
  79
  80 #define eqs(s1, s2)     (strcmp((s1), (s2)) == 0)
  81
  82 int
  83 main(int argc, char **argv)
  84 {
  85         int ch, col, ktrlen, size;
  86         pid_t do_pid = -1;
  87         void *m;
  88         int trpoints = ALL_POINTS;
  89         char *cp;
  90
  91         (void) setlocale(LC_CTYPE, "");
  92
  93         while ((ch = getopt(argc,argv,"f:djlm:np:RTt:")) != -1)
  94                 switch((char)ch) {
  95                 case 'f':
  96                         tracefile = optarg;
  97                         break;
  98                 case 'j':
  99                         fixedformat = 1;
 100                         break;
 101                 case 'd':
 102                         decimal = 1;
 103                         break;
 104                 case 'l':
 105                         tail = 1;
 106                         break;
 107                 case 'm':
 108                         maxdata = atoi(optarg);
 109                         break;
 110                 case 'n':
 111                         fancy = 0;
 112                         break;
 113                 case 'p':
 114                         do_pid = strtoul(optarg, &cp, 0);
 115                         if (*cp != 0)
 116                                 errx(1,"invalid number %s", optarg);
 117                         break;
 118                 case 'R':
 119                         timestamp = 2;  /* relative timestamp */
 120                         break;
 121                 case 'T':
 122                         timestamp = 1;
 123                         break;
 124                 case 't':
 125                         trpoints = getpoints(optarg);
 126                         if (trpoints < 0)
 127                                 errx(1, "unknown trace point in %s", optarg);
 128                         break;
 129                 default:
 130                         usage();
 131                 }
 132
 133         if (argc > optind)
 134                 usage();
 135
 136         m = (void *)malloc(size = 1025);
 137         if (m == NULL)
 138                 errx(1, "%s", strerror(ENOMEM));
 139         if (!freopen(tracefile, "r", stdin))
 140                 err(1, "%s", tracefile);
 141         while (fread_tail(&ktr_header, sizeof(struct ktr_header), 1)) {
 142                 if (trpoints & (1 << ktr_header.ktr_type) &&
 143                     (do_pid == -1 || ktr_header.ktr_pid == do_pid))
 144                         col = dumpheader(&ktr_header);
 145                 else
 146                         col = -1;
 147                 if ((ktrlen = ktr_header.ktr_len) < 0)
 148                         errx(1, "bogus length 0x%x", ktrlen);
 149                 if (ktrlen > size) {
 150                         m = (void *)realloc(m, ktrlen+1);
 151                         if (m == NULL)
 152                                 errx(1, "%s", strerror(ENOMEM));
 153                         size = ktrlen;
 154                 }
 155                 if (ktrlen && fread_tail(m, ktrlen, 1) == 0)
 156                         errx(1, "data too short");
 157                 if ((trpoints & (1<<ktr_header.ktr_type)) == 0)
 158                         continue;
 159                 if (col == -1)
 160                         continue;
 161                 switch (ktr_header.ktr_type) {
 162                 case KTR_SYSCALL:
 163                         ktrsyscall((struct ktr_syscall *)m);
 164                         break;
 165                 case KTR_SYSRET:
 166                         ktrsysret((struct ktr_sysret *)m);
 167                         break;
 168                 case KTR_NAMEI:
 169                         ktrnamei(m, ktrlen);
 170                         break;
 171                 case KTR_GENIO:
 172                         ktrgenio((struct ktr_genio *)m, ktrlen);
 173                         break;
 174                 case KTR_PSIG:
 175                         ktrpsig((struct ktr_psig *)m);
 176                         break;
 177                 case KTR_CSW:
 178                         ktrcsw((struct ktr_csw *)m);
 179                         break;
 180                 case KTR_USER:
 181                         ktruser(ktrlen, m);
 182                         break;
 183                 }
 184                 if (tail)
 185                         (void)fflush(stdout);
 186         }
 187         exit(0);
 188 }
 189
 190 static int
 191 fread_tail(void *buf, int size, int num)
 192 {
 193         int i;
 194
 195         while ((i = fread(buf, size, num, stdin)) == 0 && tail) {
 196                 (void)sleep(1);
 197                 clearerr(stdin);
 198         }
 199         return (i);
 200 }
 201
 202 static int
 203 dumpheader(struct ktr_header *kth)
 204 {
 205         static char unknown[64];
 206         static struct timeval prevtime, temp;
 207         const char *type;
 208         int col;
 209
 210         switch (kth->ktr_type) {
 211         case KTR_SYSCALL:
 212                 type = "CALL";
 213                 break;
 214         case KTR_SYSRET:
 215                 type = "RET ";
 216                 break;
 217         case KTR_NAMEI:
 218                 type = "NAMI";
 219                 break;
 220         case KTR_GENIO:
 221                 type = "GIO ";
 222                 break;
 223         case KTR_PSIG:
 224                 type = "PSIG";
 225                 break;
 226         case KTR_CSW:
 227                 type = "CSW";
 228                 break;
 229         case KTR_USER:
 230                 type = "USER";
 231                 break;
 232         default:
 233                 (void)sprintf(unknown, "UNKNOWN(%d)", kth->ktr_type);
 234                 type = unknown;
 235         }
 236
 237         if (kth->ktr_tid || (kth->ktr_flags & KTRH_THREADED) || fixedformat)
 238                 col = printf("%5d:%-4d", kth->ktr_pid, kth->ktr_tid);
 239         else
 240                 col = printf("%5d", kth->ktr_pid);
 241         col += printf(" %-8.*s ", MAXCOMLEN, kth->ktr_comm);
 242         if (timestamp) {
 243                 if (timestamp == 2) {
 244                         temp = kth->ktr_time;
 245                         timevalsub(&kth->ktr_time, &prevtime);
 246                         prevtime = temp;
 247                 }
 248                 col += printf("%ld.%06ld ",
 249                     kth->ktr_time.tv_sec, kth->ktr_time.tv_usec);
 250         }
 251         col += printf("%s  ", type);
 252         return col;
 253 }
 254
 255 #include <sys/syscall.h>
 256 #define KTRACE
 257 #include <sys/kern/syscalls.c>
 258 #undef KTRACE
 259 int nsyscalls = sizeof (syscallnames) / sizeof (syscallnames[0]);
 260
 261 static const char *ptrace_ops[] = {
 262         "PT_TRACE_ME",  "PT_READ_I",    "PT_READ_D",    "PT_READ_U",
 263         "PT_WRITE_I",   "PT_WRITE_D",   "PT_WRITE_U",   "PT_CONTINUE",
 264         "PT_KILL",      "PT_STEP",      "PT_ATTACH",    "PT_DETACH",
 265 };
 266
 267 static void
 268 ktrsyscall(struct ktr_syscall *ktr)
 269 {
 270         int narg = ktr->ktr_narg;
 271         register_t *ip;
 272
 273         if (ktr->ktr_code >= nsyscalls || ktr->ktr_code < 0)
 274                 (void)printf("[%d]", ktr->ktr_code);
 275         else
 276                 (void)printf("%s", syscallnames[ktr->ktr_code]);
 277         ip = &ktr->ktr_args[0];
 278         if (narg) {
 279                 char c = '(';
 280                 if (fancy) {
 281
 282 #define print_number(i,n,c) do {                      \
 283         if (decimal)                                  \
 284                 (void)printf("%c%ld", c, (long)*i);   \
 285         else                                          \
 286                 (void)printf("%c%#lx", c, (long)*i);  \
 287         i++;                                          \
 288         n--;                                          \
 289         c = ',';                                      \
 290         } while (0);
 291
 292                         if (ktr->ktr_code == SYS_ioctl) {
 293                                 const char *cp;
 294                                 print_number(ip,narg,c);
 295                                 if ((cp = ioctlname(*ip)) != NULL)
 296                                         (void)printf(",%s", cp);
 297                                 else {
 298                                         if (decimal)
 299                                                 (void)printf(",%ld", (long)*ip);
 300                                         else
 301                                                 (void)printf(",%#lx ", (long)*ip);
 302                                 }
 303                                 c = ',';
 304                                 ip++;
 305                                 narg--;
 306                         } else if (ktr->ktr_code == SYS_access) {
 307                                 print_number(ip,narg,c);
 308                                 (void)putchar(',');
 309                                 accessmodename ((int)*ip);
 310                                 ip++;
 311                                 narg--;
 312                         } else if (ktr->ktr_code == SYS_open) {
 313                                 int     flags;
 314                                 int     mode;
 315                                 print_number(ip,narg,c);
 316                                 flags = *ip;
 317                                 mode = *++ip;
 318                                 (void)putchar(',');
 319                                 flagsandmodename (flags, mode, decimal);
 320                                 ip++;
 321                                 narg-=2;
 322                         } else if (ktr->ktr_code == SYS_wait4) {
 323                                 print_number(ip,narg,c);
 324                                 print_number(ip,narg,c);
 325                                 (void)putchar(',');
 326                                 wait4optname ((int)*ip);
 327                                 ip++;
 328                                 narg--;
 329                         } else if (ktr->ktr_code == SYS_chmod ||
 330                                    ktr->ktr_code == SYS_fchmod ||
 331                                    ktr->ktr_code == SYS_lchmod) {
 332                                 print_number(ip,narg,c);
 333                                 (void)putchar(',');
 334                                 modename ((int)*ip);
 335                                 ip++;
 336                                 narg--;
 337                         } else if (ktr->ktr_code == SYS_mknod) {
 338                                 print_number(ip,narg,c);
 339                                 (void)putchar(',');
 340                                 modename ((int)*ip);
 341                                 ip++;
 342                                 narg--;
 343                         } else if (ktr->ktr_code == SYS_getfsstat) {
 344                                 print_number(ip,narg,c);
 345                                 print_number(ip,narg,c);
 346                                 (void)putchar(',');
 347                                 getfsstatflagsname ((int)*ip);
 348                                 ip++;
 349                                 narg--;
 350                         } else if (ktr->ktr_code == SYS_mount) {
 351                                 print_number(ip,narg,c);
 352                                 print_number(ip,narg,c);
 353                                 (void)putchar(',');
 354                                 mountflagsname ((int)*ip);
 355                                 ip++;
 356                                 narg--;
 357                         } else if (ktr->ktr_code == SYS_unmount) {
 358                                 print_number(ip,narg,c);
 359                                 (void)putchar(',');
 360                                 mountflagsname ((int)*ip);
 361                                 ip++;
 362                                 narg--;
 363                         } else if (ktr->ktr_code == SYS_recvmsg ||
 364                                    ktr->ktr_code == SYS_sendmsg) {
 365                                 print_number(ip,narg,c);
 366                                 print_number(ip,narg,c);
 367                                 (void)putchar(',');
 368                                 sendrecvflagsname ((int)*ip);
 369                                 ip++;
 370                                 narg--;
 371                         } else if (ktr->ktr_code == SYS_recvfrom ||
 372                                    ktr->ktr_code == SYS_sendto) {
 373                                 print_number(ip,narg,c);
 374                                 print_number(ip,narg,c);
 375                                 print_number(ip,narg,c);
 376                                 (void)putchar(',');
 377                                 sendrecvflagsname ((int)*ip);
 378                                 ip++;
 379                                 narg--;
 380                         } else if (ktr->ktr_code == SYS_chflags ||
 381                                    ktr->ktr_code == SYS_fchflags) {
 382                                 print_number(ip,narg,c);
 383                                 (void)putchar(',');
 384                                 modename((int)*ip);
 385                                 ip++;
 386                                 narg--;
 387                         } else if (ktr->ktr_code == SYS_kill) {
 388                                 print_number(ip,narg,c);
 389                                 (void)putchar(',');
 390                                 signame((int)*ip);
 391                                 ip++;
 392                                 narg--;
 393                         } else if (ktr->ktr_code == SYS_reboot) {
 394                                 (void)putchar('(');
 395                                 rebootoptname((int)*ip);
 396                                 ip++;
 397                                 narg--;
 398                         } else if (ktr->ktr_code == SYS_umask) {
 399                                 (void)putchar('(');
 400                                 modename((int)*ip);
 401                                 ip++;
 402                                 narg--;
 403                         } else if (ktr->ktr_code == SYS_msync) {
 404                                 print_number(ip,narg,c);
 405                                 print_number(ip,narg,c);
 406                                 (void)putchar(',');
 407                                 msyncflagsname((int)*ip);
 408                                 ip++;
 409                                 narg--;
 410                         } else if (ktr->ktr_code == SYS_mmap) {
 411                                 print_number(ip,narg,c);
 412                                 print_number(ip,narg,c);
 413                                 (void)putchar(',');
 414                                 mmapprotname ((int)*ip);
 415                                 (void)putchar(',');
 416                                 ip++;
 417                                 narg--;
 418                                 mmapflagsname ((int)*ip);
 419                                 ip++;
 420                                 narg--;
 421                         } else if (ktr->ktr_code == SYS_mprotect) {
 422                                 print_number(ip,narg,c);
 423                                 print_number(ip,narg,c);
 424                                 (void)putchar(',');
 425                                 mmapprotname ((int)*ip);
 426                                 ip++;
 427                                 narg--;
 428                         } else if (ktr->ktr_code == SYS_madvise) {
 429                                 print_number(ip,narg,c);
 430                                 print_number(ip,narg,c);
 431                                 (void)putchar(',');
 432                                 madvisebehavname((int)*ip);
 433                                 ip++;
 434                                 narg--;
 435                         } else if (ktr->ktr_code == SYS_setpriority) {
 436                                 (void)putchar('(');
 437                                 prioname((int)*ip);
 438                                 ip++;
 439                                 narg--;
 440                                 c = ',';
 441                                 print_number(ip,narg,c);
 442                                 print_number(ip,narg,c);
 443                         } else if (ktr->ktr_code == SYS_fcntl) {
 444                                 int cmd;
 445                                 int arg;
 446                                 print_number(ip,narg,c);
 447                                 cmd = *ip;
 448                                 arg = *++ip;
 449                                 (void)putchar(',');
 450                                 fcntlcmdname(cmd, arg, decimal);
 451                                 ip++;
 452                                 narg-=2;
 453                         } else if (ktr->ktr_code == SYS_socket) {
 454                                 (void)putchar('(');
 455                                 sockdomainname((int)*ip);
 456                                 ip++;
 457                                 narg--;
 458                                 (void)putchar(',');
 459                                 socktypename((int)*ip);
 460                                 ip++;
 461                                 narg--;
 462                                 c = ',';
 463                         } else if (ktr->ktr_code == SYS_setsockopt ||
 464                                    ktr->ktr_code == SYS_getsockopt) {
 465                                 print_number(ip,narg,c);
 466                                 (void)putchar(',');
 467                                 sockoptlevelname((int)*ip, decimal);
 468                                 ip++;
 469                                 narg--;
 470                                 (void)putchar(',');
 471                                 sockoptname((int)*ip);
 472                                 ip++;
 473                                 narg--;
 474                         } else if (ktr->ktr_code == SYS_lseek) {
 475                                 print_number(ip,narg,c);
 476                                 /* Hidden 'pad' argument, not in lseek(2) */
 477                                 print_number(ip,narg,c);
 478                                 print_number(ip,narg,c);
 479                                 (void)putchar(',');
 480                                 whencename ((int)*ip);
 481                                 ip++;
 482                                 narg--;
 483                         } else if (ktr->ktr_code == SYS_flock) {
 484                                 print_number(ip,narg,c);
 485                                 (void)putchar(',');
 486                                 flockname((int)*ip);
 487                                 ip++;
 488                                 narg--;
 489                         } else if (ktr->ktr_code == SYS_mkfifo ||
 490                                    ktr->ktr_code == SYS_mkdir) {
 491                                 print_number(ip,narg,c);
 492                                 (void)putchar(',');
 493                                 modename((int)*ip);
 494                                 ip++;
 495                                 narg--;
 496                         } else if (ktr->ktr_code == SYS_shutdown) {
 497                                 print_number(ip,narg,c);
 498                                 (void)putchar(',');
 499                                 shutdownhowname((int)*ip);
 500                                 ip++;
 501                                 narg--;
 502                         } else if (ktr->ktr_code == SYS_socketpair) {
 503                                 (void)putchar('(');
 504                                 sockdomainname((int)*ip);
 505                                 ip++;
 506                                 narg--;
 507                                 (void)putchar(',');
 508                                 socktypename((int)*ip);
 509                                 ip++;
 510                                 narg--;
 511                                 c = ',';
 512                         } else if (ktr->ktr_code == SYS_getrlimit ||
 513                                    ktr->ktr_code == SYS_setrlimit) {
 514                                 (void)putchar('(');
 515                                 rlimitname((int)*ip);
 516                                 ip++;
 517                                 narg--;
 518                                 c = ',';
 519                         } else if (ktr->ktr_code == SYS_quotactl) {
 520                                 print_number(ip,narg,c);
 521                                 quotactlname((int)*ip);
 522                                 ip++;
 523                                 narg--;
 524                                 c = ',';
 525                         } else if (ktr->ktr_code == SYS_rtprio) {
 526                                 (void)putchar('(');
 527                                 rtprioname((int)*ip);
 528                                 ip++;
 529                                 narg--;
 530                                 c = ',';
 531                         } else if (ktr->ktr_code == SYS___semctl) {
 532                                 print_number(ip,narg,c);
 533                                 print_number(ip,narg,c);
 534                                 semctlname((int)*ip);
 535                                 ip++;
 536                                 narg--;
 537                         } else if (ktr->ktr_code == SYS_semget) {
 538                                 print_number(ip,narg,c);
 539                                 print_number(ip,narg,c);
 540                                 semgetname((int)*ip);
 541                                 ip++;
 542                                 narg--;
 543                         } else if (ktr->ktr_code == SYS_msgctl) {
 544                                 print_number(ip,narg,c);
 545                                 shmctlname((int)*ip);
 546                                 ip++;
 547                                 narg--;
 548                         } else if (ktr->ktr_code == SYS_shmat) {
 549                                 print_number(ip,narg,c);
 550                                 print_number(ip,narg,c);
 551                                 shmatname((int)*ip);
 552                                 ip++;
 553                                 narg--;
 554                         } else if (ktr->ktr_code == SYS_shmctl) {
 555                                 print_number(ip,narg,c);
 556                                 shmctlname((int)*ip);
 557                                 ip++;
 558                                 narg--;
 559                         } else if (ktr->ktr_code == SYS_minherit) {
 560                                 print_number(ip,narg,c);
 561                                 print_number(ip,narg,c);
 562                                 minheritname((int)*ip);
 563                                 ip++;
 564                                 narg--;
 565                         } else if (ktr->ktr_code == SYS_rfork) {
 566                                 (void)putchar('(');
 567                                 rforkname((int)*ip);
 568                                 ip++;
 569                                 narg--;
 570                                 c = ',';
 571                         } else if (ktr->ktr_code == SYS_lio_listio) {
 572                                 (void)putchar('(');
 573                                 lio_listioname((int)*ip);
 574                                 ip++;
 575                                 narg--;
 576                                 c = ',';
 577                         } else if (ktr->ktr_code == SYS_mlockall) {
 578                                 (void)putchar('(');
 579                                 mlockallname((int)*ip);
 580                                 ip++;
 581                                 narg--;
 582                         } else if (ktr->ktr_code == SYS_sched_setscheduler) {
 583                                 print_number(ip,narg,c);
 584                                 schedpolicyname((int)*ip);
 585                                 ip++;
 586                                 narg--;
 587                         } else if (ktr->ktr_code == SYS_sched_get_priority_max ||
 588                                    ktr->ktr_code == SYS_sched_get_priority_min) {
 589                                 (void)putchar('(');
 590                                 schedpolicyname((int)*ip);
 591                                 ip++;
 592                                 narg--;
 593                         } else if (ktr->ktr_code == SYS_sendfile) {
 594                                 print_number(ip,narg,c);
 595                                 print_number(ip,narg,c);
 596                                 print_number(ip,narg,c);
 597                                 print_number(ip,narg,c);
 598                                 print_number(ip,narg,c);
 599                                 print_number(ip,narg,c);
 600                                 sendfileflagsname((int)*ip);
 601                                 ip++;
 602                                 narg--;
 603                         } else if (ktr->ktr_code == SYS_kldsym) {
 604                                 print_number(ip,narg,c);
 605                                 kldsymcmdname((int)*ip);
 606                                 ip++;
 607                                 narg--;
 608                         } else if (ktr->ktr_code == SYS_sigprocmask) {
 609                                 (void)putchar('(');
 610                                 sigprocmaskhowname((int)*ip);
 611                                 ip++;
 612                                 narg--;
 613                                 c = ',';
 614                         } else if (ktr->ktr_code == SYS___acl_get_file ||
 615                                    ktr->ktr_code == SYS___acl_set_file ||
 616                                    ktr->ktr_code == SYS___acl_get_fd ||
 617                                    ktr->ktr_code == SYS___acl_set_fd ||
 618                                    ktr->ktr_code == SYS___acl_delete_file ||
 619                                    ktr->ktr_code == SYS___acl_delete_fd ||
 620                                    ktr->ktr_code == SYS___acl_aclcheck_file ||
 621                                    ktr->ktr_code == SYS___acl_aclcheck_fd) {
 622                                 print_number(ip,narg,c);
 623                                 acltypename((int)*ip);
 624                                 ip++;
 625                                 narg--;
 626                         } else if (ktr->ktr_code == SYS_sigaction) {
 627                                 (void)putchar('(');
 628                                 signame((int)*ip);
 629                                 ip++;
 630                                 narg--;
 631                                 c = ',';
 632                         } else if (ktr->ktr_code == SYS_extattrctl) {
 633                                 print_number(ip,narg,c);
 634                                 extattrctlname((int)*ip);
 635                                 ip++;
 636                                 narg--;
 637                         } else if (ktr->ktr_code == SYS_ptrace) {
 638                                 if (*ip < (register_t)(sizeof(ptrace_ops) /
 639                                     sizeof(ptrace_ops[0])) && *ip >= 0)
 640                                         (void)printf("(%s", ptrace_ops[*ip]);
 641 #ifdef PT_GETREGS
 642                                 else if (*ip == PT_GETREGS)
 643                                         (void)printf("(%s", "PT_GETREGS");
 644 #endif
 645 #ifdef PT_SETREGS
 646                                 else if (*ip == PT_SETREGS)
 647                                         (void)printf("(%s", "PT_SETREGS");
 648 #endif
 649 #ifdef PT_GETFPREGS
 650                                 else if (*ip == PT_GETFPREGS)
 651                                         (void)printf("(%s", "PT_GETFPREGS");
 652 #endif
 653 #ifdef PT_SETFPREGS
 654                                 else if (*ip == PT_SETFPREGS)
 655                                         (void)printf("(%s", "PT_SETFPREGS");
 656 #endif
 657 #ifdef PT_GETDBREGS
 658                                 else if (*ip == PT_GETDBREGS)
 659                                         (void)printf("(%s", "PT_GETDBREGS");
 660 #endif
 661 #ifdef PT_SETDBREGS
 662                                 else if (*ip == PT_SETDBREGS)
 663                                         (void)printf("(%s", "PT_SETDBREGS");
 664 #endif
 665                                 else
 666                                         (void)printf("(%ld", (long)*ip);
 667                                 c = ',';
 668                                 ip++;
 669                                 narg--;
 670                         }
 671                 }
 672                 while (narg > 0) {
 673                         print_number(ip,narg,c);
 674                 }
 675                 (void)putchar(')');
 676         }
 677         (void)putchar('\n');
 678 }
 679
 680 static void
 681 ktrsysret(struct ktr_sysret *ktr)
 682 {
 683         register_t ret = ktr->ktr_retval;
 684         int error = ktr->ktr_error;
 685         int code = ktr->ktr_code;
 686
 687         if (code >= nsyscalls || code < 0)
 688                 (void)printf("[%d] ", code);
 689         else
 690                 (void)printf("%s ", syscallnames[code]);
 691
 692         if (error == 0) {
 693                 if (fancy) {
 694                         (void)printf("%ld", (long)ret);
 695                         if (ret < 0 || ret > 9)
 696                                 (void)printf("/%#lx", (long)ret);
 697                 } else {
 698                         if (decimal)
 699                                 (void)printf("%ld", (long)ret);
 700                         else
 701                                 (void)printf("%#lx", (long)ret);
 702                 }
 703         } else if (error == ERESTART)
 704                 (void)printf("RESTART");
 705         else if (error == EJUSTRETURN)
 706                 (void)printf("JUSTRETURN");
 707         else {
 708                 (void)printf("-1 errno %d", ktr->ktr_error);
 709                 if (fancy)
 710                         (void)printf(" %s", strerror(ktr->ktr_error));
 711         }
 712         (void)putchar('\n');
 713 }
 714
 715 static void
 716 ktrnamei(char *cp, int len)
 717 {
 718         (void)printf("\"%.*s\"\n", len, cp);
 719 }
 720
 721 static void
 722 ktrgenio(struct ktr_genio *ktr, int len)
 723 {
 724         int datalen = len - sizeof (struct ktr_genio);
 725         char *dp = (char *)ktr + sizeof (struct ktr_genio);
 726         char *cp;
 727         int col = 0;
 728         int width;
 729         char visbuf[5];
 730         static int screenwidth = 0;
 731
 732         if (screenwidth == 0) {
 733                 struct winsize ws;
 734
 735                 if (fancy && ioctl(fileno(stderr), TIOCGWINSZ, &ws) != -1 &&
 736                     ws.ws_col > 8)
 737                         screenwidth = ws.ws_col;
 738                 else
 739                         screenwidth = 80;
 740         }
 741         printf("fd %d %s %d byte%s\n", ktr->ktr_fd,
 742                 ktr->ktr_rw == UIO_READ ? "read" : "wrote", datalen,
 743                 datalen == 1 ? "" : "s");
 744         if (maxdata && datalen > maxdata)
 745                 datalen = maxdata;
 746         (void)printf("       \"");
 747         col = 8;
 748         for (;datalen > 0; datalen--, dp++) {
 749                 (void) vis(visbuf, *dp, VIS_CSTYLE, *(dp+1));
 750                 cp = visbuf;
 751                 /*
 752                  * Keep track of printables and
 753                  * space chars (like fold(1)).
 754                  */
 755                 if (col == 0) {
 756                         (void)putchar('\t');
 757                         col = 8;
 758                 }
 759                 switch(*cp) {
 760                 case '\n':
 761                         col = 0;
 762                         (void)putchar('\n');
 763                         continue;
 764                 case '\t':
 765                         width = 8 - (col&07);
 766                         break;
 767                 default:
 768                         width = strlen(cp);
 769                 }
 770                 if (col + width > (screenwidth-2)) {
 771                         (void)printf("\\\n\t");
 772                         col = 8;
 773                 }
 774                 col += width;
 775                 do {
 776                         (void)putchar(*cp++);
 777                 } while (*cp);
 778         }
 779         if (col == 0)
 780                 (void)printf("       ");
 781         (void)printf("\"\n");
 782 }
 783
 784 const char *signames[NSIG] = {
 785         "NULL", "HUP", "INT", "QUIT", "ILL", "TRAP", "IOT",     /*  1 - 6  */
 786         "EMT", "FPE", "KILL", "BUS", "SEGV", "SYS",             /*  7 - 12 */
 787         "PIPE", "ALRM",  "TERM", "URG", "STOP", "TSTP",         /* 13 - 18 */
 788         "CONT", "CHLD", "TTIN", "TTOU", "IO", "XCPU",           /* 19 - 24 */
 789         "XFSZ", "VTALRM", "PROF", "WINCH", "29", "USR1",        /* 25 - 30 */
 790         "USR2", NULL,                                           /* 31 - 32 */
 791 };
 792
 793 static void
 794 ktrpsig(struct ktr_psig *psig)
 795 {
 796         (void)printf("SIG%s ", signames[psig->signo]);
 797         if (psig->action == SIG_DFL)
 798                 (void)printf("SIG_DFL\n");
 799         else
 800                 (void)printf("caught handler=0x%lx mask=0x%x code=0x%x\n",
 801                     (u_long)psig->action, psig->mask.__bits[0], psig->code);
 802 }
 803
 804 static void
 805 ktrcsw(struct ktr_csw *cs)
 806 {
 807         (void)printf("%s %s\n", cs->out ? "stop" : "resume",
 808                 cs->user ? "user" : "kernel");
 809 }
 810
 811 struct utrace_malloc {
 812         void *p;
 813         size_t s;
 814         void *r;
 815 };
 816
 817 static void
 818 ktruser_malloc(int len __unused, unsigned char *p)
 819 {
 820         struct utrace_malloc *ut = (struct utrace_malloc *)p;
 821
 822         if (ut->p == NULL) {
 823                 if (ut->s == 0 && ut->r == NULL)
 824                         printf("malloc_init()\n");
 825                 else
 826                         printf("%p = malloc(%zu)\n", ut->r, ut->s);
 827         } else {
 828                 if (ut->s == 0)
 829                         printf("free(%p)\n", ut->p);
 830                 else
 831                         printf("%p = realloc(%p, %zu)\n", ut->r, ut->p, ut->s);
 832         }
 833 }
 834
 835 static void
 836 ktruser(int len, unsigned char *p)
 837 {
 838         if (len == sizeof(struct utrace_malloc)) {
 839                 ktruser_malloc(len, p);
 840                 return;
 841         }
 842
 843         (void)printf("%d ", len);
 844         while (len--)
 845                 (void)printf(" %02x", *p++);
 846         (void)printf("\n");
 847 }
 848
 849 static void
 850 usage(void)
 851 {
 852         (void)fprintf(stderr,
 853             "usage: kdump [-dnlRT] [-f trfile] [-m maxdata] [-t [cnisuw]] [-p pid]\n");
 854         exit(1);
 855 }
 856
 857 static void
 858 timevalsub(struct timeval *t1, struct timeval *t2)
 859 {
 860         t1->tv_sec -= t2->tv_sec;
 861         t1->tv_usec -= t2->tv_usec;
 862         timevalfix(t1);
 863 }
 864
 865 static void
 866 timevalfix(struct timeval *t1)
 867 {
 868         if (t1->tv_usec < 0) {
 869                 t1->tv_sec--;
 870                 t1->tv_usec += 1000000;
 871         }
 872         if (t1->tv_usec >= 1000000) {
 873                 t1->tv_sec++;
 874                 t1->tv_usec -= 1000000;
 875         }
 876 }