2 * Copyright (c) 1988, 1993
3 * The Regents of the University of California. All rights reserved.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 4. Neither the name of the University nor the names of its contributors
14 * may be used to endorse or promote products derived from this software
15 * without specific prior written permission.
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 static const char copyright[] =
32 "@(#) Copyright (c) 1988, 1993\n\
33 The Regents of the University of California. All rights reserved.\n";
38 static char sccsid[] = "@(#)kdump.c 8.1 (Berkeley) 6/6/93";
41 #include <sys/cdefs.h>
42 __FBSDID("$FreeBSD$");
46 #include <sys/errno.h>
48 #include <sys/param.h>
49 #include <sys/capsicum.h>
50 #include <sys/errno.h>
55 #include <sys/ktrace.h>
56 #include <sys/ioctl.h>
57 #include <sys/socket.h>
59 #include <sys/sysent.h>
62 #include <sys/queue.h>
65 #include <sys/types.h>
66 #include <netipx/ipx.h>
69 #include <netatalk/at.h>
71 #include <arpa/inet.h>
72 #include <netinet/in.h>
90 #include "kdump_subr.h"
92 u_int abidump(struct ktr_header *);
93 int fetchprocinfo(struct ktr_header *, u_int *);
94 int fread_tail(void *, int, int);
95 void dumpheader(struct ktr_header *);
96 void ktrsyscall(struct ktr_syscall *, u_int);
97 void ktrsysret(struct ktr_sysret *, u_int);
98 void ktrnamei(char *, int);
99 void hexdump(char *, int, int);
100 void visdump(char *, int, int);
101 void ktrgenio(struct ktr_genio *, int);
102 void ktrpsig(struct ktr_psig *);
103 void ktrcsw(struct ktr_csw *);
104 void ktrcsw_old(struct ktr_csw_old *);
105 void ktruser_malloc(void *);
106 void ktruser_rtld(int, void *);
107 void ktruser(int, void *);
108 void ktrcaprights(cap_rights_t *);
109 void ktrsockaddr(struct sockaddr *);
110 void ktrstat(struct stat *);
111 void ktrstruct(char *, size_t);
112 void ktrcapfail(struct ktr_cap_fail *);
113 void ktrfault(struct ktr_fault *);
114 void ktrfaultend(struct ktr_faultend *);
115 void limitfd(int fd);
117 void ioctlname(unsigned long, int);
119 extern const char *signames[], *syscallnames[];
120 extern int nsyscalls;
122 static int timestamp, decimal, fancy = 1, suppressdata, tail, threads, maxdata,
123 resolv = 0, abiflag = 0, syscallno = 0;
124 static const char *tracefile = DEF_TRACEFILE;
125 static struct ktr_header ktr_header;
127 #define TIME_FORMAT "%b %e %T %Y"
128 #define eqs(s1, s2) (strcmp((s1), (s2)) == 0)
130 #define print_number(i,n,c) do { \
132 printf("%c%jd", c, (intmax_t)*i); \
134 printf("%c%#jx", c, (uintmax_t)(u_register_t)*i); \
140 #if defined(__amd64__) || defined(__i386__)
142 void linux_ktrsyscall(struct ktr_syscall *, u_int);
143 void linux_ktrsysret(struct ktr_sysret *, u_int);
144 extern const char *linux_syscallnames[];
146 #include <linux_syscalls.c>
150 * Linux syscalls return negative errno's, we do positive and map them
152 static int bsd_to_linux_errno[ELAST + 1] = {
153 -0, -1, -2, -3, -4, -5, -6, -7, -8, -9,
154 -10, -35, -12, -13, -14, -15, -16, -17, -18, -19,
155 -20, -21, -22, -23, -24, -25, -26, -27, -28, -29,
156 -30, -31, -32, -33, -34, -11,-115,-114, -88, -89,
157 -90, -91, -92, -93, -94, -95, -96, -97, -98, -99,
158 -100,-101,-102,-103,-104,-105,-106,-107,-108,-109,
159 -110,-111, -40, -36,-112,-113, -39, -11, -87,-122,
160 -116, -66, -6, -6, -6, -6, -6, -37, -38, -9,
161 -6, -6, -43, -42, -75,-125, -84, -95, -16, -74,
166 #if defined(__amd64__)
167 extern const char *linux32_syscallnames[];
169 #include <linux32_syscalls.c>
174 TAILQ_ENTRY(proc_info) info;
179 static TAILQ_HEAD(trace_procs, proc_info) trace_procs;
186 * Cache NLS data before entering capability mode.
187 * XXXPJD: There should be strerror_init() and strsignal_init() in libc.
189 (void)catopen("libc", NL_CAT_LOCALE);
198 * Allow localtime(3) to cache /etc/localtime content before entering
200 * XXXPJD: There should be localtime_init() in libc.
203 (void)localtime(<ime);
207 main(int argc, char *argv[])
209 int ch, ktrlen, size;
211 int trpoints = ALL_POINTS;
216 setlocale(LC_CTYPE, "");
218 while ((ch = getopt(argc,argv,"f:dElm:np:AHRrSsTt:")) != -1)
233 maxdata = atoi(optarg);
251 timestamp = 3; /* elapsed timestamp */
257 timestamp = 2; /* relative timestamp */
263 trpoints = getpoints(optarg);
265 errx(1, "unknown trace point in %s", optarg);
274 m = malloc(size = 1025);
276 errx(1, "%s", strerror(ENOMEM));
277 if (!freopen(tracefile, "r", stdin))
278 err(1, "%s", tracefile);
284 if (cap_enter() < 0 && errno != ENOSYS)
285 err(1, "unable to enter capability mode");
287 limitfd(STDIN_FILENO);
288 limitfd(STDOUT_FILENO);
289 limitfd(STDERR_FILENO);
291 TAILQ_INIT(&trace_procs);
293 while (fread_tail(&ktr_header, sizeof(struct ktr_header), 1)) {
294 if (ktr_header.ktr_type & KTR_DROP) {
295 ktr_header.ktr_type &= ~KTR_DROP;
296 if (!drop_logged && threads) {
298 "%6jd %6jd %-8.*s Events dropped.\n",
299 (intmax_t)ktr_header.ktr_pid,
300 ktr_header.ktr_tid > 0 ?
301 (intmax_t)ktr_header.ktr_tid : 0,
302 MAXCOMLEN, ktr_header.ktr_comm);
304 } else if (!drop_logged) {
305 printf("%6jd %-8.*s Events dropped.\n",
306 (intmax_t)ktr_header.ktr_pid, MAXCOMLEN,
307 ktr_header.ktr_comm);
311 if (trpoints & (1<<ktr_header.ktr_type))
312 if (pid == 0 || ktr_header.ktr_pid == pid ||
313 ktr_header.ktr_tid == pid)
314 dumpheader(&ktr_header);
315 if ((ktrlen = ktr_header.ktr_len) < 0)
316 errx(1, "bogus length 0x%x", ktrlen);
318 m = realloc(m, ktrlen+1);
320 errx(1, "%s", strerror(ENOMEM));
323 if (ktrlen && fread_tail(m, ktrlen, 1) == 0)
324 errx(1, "data too short");
325 if (fetchprocinfo(&ktr_header, (u_int *)m) != 0)
327 sv_flags = abidump(&ktr_header);
328 if (pid && ktr_header.ktr_pid != pid &&
329 ktr_header.ktr_tid != pid)
331 if ((trpoints & (1<<ktr_header.ktr_type)) == 0)
334 switch (ktr_header.ktr_type) {
336 #if defined(__amd64__) || defined(__i386__)
337 if ((sv_flags & SV_ABI_MASK) == SV_ABI_LINUX)
338 linux_ktrsyscall((struct ktr_syscall *)m,
342 ktrsyscall((struct ktr_syscall *)m, sv_flags);
345 #if defined(__amd64__) || defined(__i386__)
346 if ((sv_flags & SV_ABI_MASK) == SV_ABI_LINUX)
347 linux_ktrsysret((struct ktr_sysret *)m,
351 ktrsysret((struct ktr_sysret *)m, sv_flags);
358 ktrgenio((struct ktr_genio *)m, ktrlen);
361 ktrpsig((struct ktr_psig *)m);
364 if (ktrlen == sizeof(struct ktr_csw_old))
365 ktrcsw_old((struct ktr_csw_old *)m);
367 ktrcsw((struct ktr_csw *)m);
373 ktrstruct(m, ktrlen);
376 ktrcapfail((struct ktr_cap_fail *)m);
379 ktrfault((struct ktr_fault *)m);
382 ktrfaultend((struct ktr_faultend *)m);
400 cap_rights_init(&rights, CAP_FSTAT);
405 cap_rights_set(&rights, CAP_READ);
408 cap_rights_set(&rights, CAP_IOCTL, CAP_WRITE);
409 cmd = TIOCGETA; /* required by isatty(3) in printf(3) */
412 cap_rights_set(&rights, CAP_WRITE);
414 cap_rights_set(&rights, CAP_IOCTL);
422 if (cap_rights_limit(fd, &rights) < 0 && errno != ENOSYS)
423 err(1, "unable to limit rights for descriptor %d", fd);
424 if (cmd != 0 && cap_ioctls_limit(fd, &cmd, 1) < 0 && errno != ENOSYS)
425 err(1, "unable to limit ioctls for descriptor %d", fd);
429 fread_tail(void *buf, int size, int num)
433 while ((i = fread(buf, size, num, stdin)) == 0 && tail) {
441 fetchprocinfo(struct ktr_header *kth, u_int *flags)
443 struct proc_info *pi;
445 switch (kth->ktr_type) {
447 TAILQ_FOREACH(pi, &trace_procs, info) {
448 if (pi->pid == kth->ktr_pid) {
449 TAILQ_REMOVE(&trace_procs, pi, info);
453 pi = malloc(sizeof(struct proc_info));
455 errx(1, "%s", strerror(ENOMEM));
456 pi->sv_flags = *flags;
457 pi->pid = kth->ktr_pid;
458 TAILQ_INSERT_TAIL(&trace_procs, pi, info);
462 TAILQ_FOREACH(pi, &trace_procs, info) {
463 if (pi->pid == kth->ktr_pid) {
464 TAILQ_REMOVE(&trace_procs, pi, info);
476 abidump(struct ktr_header *kth)
478 struct proc_info *pi;
483 TAILQ_FOREACH(pi, &trace_procs, info) {
484 if (pi->pid == kth->ktr_pid) {
485 flags = pi->sv_flags;
493 switch (flags & SV_ABI_MASK) {
513 printf("%s%s ", abi, arch);
519 dumpheader(struct ktr_header *kth)
521 static char unknown[64];
522 static struct timeval prevtime, temp;
525 switch (kth->ktr_type) {
567 sprintf(unknown, "UNKNOWN(%d)", kth->ktr_type);
572 * The ktr_tid field was previously the ktr_buffer field, which held
573 * the kernel pointer value for the buffer associated with data
574 * following the record header. It now holds a threadid, but only
575 * for trace files after the change. Older trace files still contain
576 * kernel pointers. Detect this and suppress the results by printing
577 * negative tid's as 0.
580 printf("%6jd %6jd %-8.*s ", (intmax_t)kth->ktr_pid,
581 kth->ktr_tid > 0 ? (intmax_t)kth->ktr_tid : 0,
582 MAXCOMLEN, kth->ktr_comm);
584 printf("%6jd %-8.*s ", (intmax_t)kth->ktr_pid, MAXCOMLEN,
587 if (timestamp == 3) {
588 if (prevtime.tv_sec == 0)
589 prevtime = kth->ktr_time;
590 timevalsub(&kth->ktr_time, &prevtime);
592 if (timestamp == 2) {
593 temp = kth->ktr_time;
594 timevalsub(&kth->ktr_time, &prevtime);
597 printf("%jd.%06ld ", (intmax_t)kth->ktr_time.tv_sec,
598 kth->ktr_time.tv_usec);
603 #include <sys/syscall.h>
605 #include <sys/kern/syscalls.c>
607 int nsyscalls = sizeof (syscallnames) / sizeof (syscallnames[0]);
610 ktrsyscall(struct ktr_syscall *ktr, u_int flags)
612 int narg = ktr->ktr_narg;
616 if ((flags != 0 && ((flags & SV_ABI_MASK) != SV_ABI_FREEBSD)) ||
617 (ktr->ktr_code >= nsyscalls || ktr->ktr_code < 0))
618 printf("[%d]", ktr->ktr_code);
620 printf("%s", syscallnames[ktr->ktr_code]);
622 printf("[%d]", ktr->ktr_code);
624 ip = &ktr->ktr_args[0];
628 (flags == 0 || (flags & SV_ABI_MASK) == SV_ABI_FREEBSD)) {
629 switch (ktr->ktr_code) {
647 atfdname(*ip, decimal);
653 switch (ktr->ktr_code) {
655 print_number(ip, narg, c);
657 ioctlname(*ip, decimal);
673 print_number(ip, narg, c);
681 print_number(ip, narg, c);
683 flagsandmodename(ip[0], ip[1], decimal);
688 print_number(ip, narg, c);
689 print_number(ip, narg, c);
691 * A flags value of zero is valid for
692 * wait4() but not for wait6(), so
693 * handle zero special here.
696 print_number(ip, narg, c);
706 idtypename(*ip, decimal);
710 print_number(ip, narg, c);
711 print_number(ip, narg, c);
720 print_number(ip, narg, c);
728 print_number(ip, narg, c);
735 print_number(ip, narg, c);
736 print_number(ip, narg, c);
738 getfsstatflagsname(*ip);
743 print_number(ip, narg, c);
744 print_number(ip, narg, c);
751 print_number(ip, narg, c);
759 print_number(ip, narg, c);
760 print_number(ip, narg, c);
762 sendrecvflagsname(*ip);
768 print_number(ip, narg, c);
769 print_number(ip, narg, c);
770 print_number(ip, narg, c);
772 sendrecvflagsname(*ip);
779 print_number(ip, narg, c);
786 print_number(ip, narg, c);
805 print_number(ip, narg, c);
806 print_number(ip, narg, c);
812 #ifdef SYS_freebsd6_mmap
813 case SYS_freebsd6_mmap:
814 print_number(ip, narg, c);
815 print_number(ip, narg, c);
827 print_number(ip, narg, c);
828 print_number(ip, narg, c);
839 print_number(ip, narg, c);
840 print_number(ip, narg, c);
847 print_number(ip, narg, c);
848 print_number(ip, narg, c);
850 madvisebehavname(*ip);
854 case SYS_setpriority:
855 print_number(ip, narg, c);
856 print_number(ip, narg, c);
863 print_number(ip, narg, c);
865 fcntlcmdname(ip[0], ip[1], decimal);
873 sockdomainname(sockdomain);
877 socktypenamewithflags(*ip);
880 if (sockdomain == PF_INET ||
881 sockdomain == PF_INET6) {
883 sockipprotoname(*ip);
892 print_number(ip, narg, c);
894 sockoptlevelname(*ip, decimal);
895 if (*ip == SOL_SOCKET) {
904 #ifdef SYS_freebsd6_lseek
905 case SYS_freebsd6_lseek:
906 print_number(ip, narg, c);
907 /* Hidden 'pad' argument, not in lseek(2) */
908 print_number(ip, narg, c);
909 print_number(ip, narg, c);
917 print_number(ip, narg, c);
918 /* Hidden 'pad' argument, not in lseek(2) */
919 print_number(ip, narg, c);
926 print_number(ip, narg, c);
936 print_number(ip, narg, c);
943 print_number(ip, narg, c);
945 shutdownhowname(*ip);
955 socktypenamewithflags(*ip);
969 print_number(ip, narg, c);
991 print_number(ip, narg, c);
992 print_number(ip, narg, c);
999 print_number(ip, narg, c);
1000 print_number(ip, narg, c);
1007 print_number(ip, narg, c);
1014 print_number(ip, narg, c);
1015 print_number(ip, narg, c);
1022 print_number(ip, narg, c);
1029 print_number(ip, narg, c);
1032 printf(",0%o", (unsigned int)ip[1]);
1037 print_number(ip, narg, c);
1038 print_number(ip, narg, c);
1051 case SYS_lio_listio:
1053 lio_listioname(*ip);
1064 case SYS_sched_setscheduler:
1065 print_number(ip, narg, c);
1067 schedpolicyname(*ip);
1071 case SYS_sched_get_priority_max:
1072 case SYS_sched_get_priority_min:
1074 schedpolicyname(*ip);
1079 print_number(ip, narg, c);
1080 print_number(ip, narg, c);
1081 print_number(ip, narg, c);
1082 print_number(ip, narg, c);
1083 print_number(ip, narg, c);
1084 print_number(ip, narg, c);
1086 sendfileflagsname(*(int *)ip);
1091 print_number(ip, narg, c);
1097 case SYS_sigprocmask:
1099 sigprocmaskhowname(*ip);
1104 case SYS___acl_get_file:
1105 case SYS___acl_set_file:
1106 case SYS___acl_get_fd:
1107 case SYS___acl_set_fd:
1108 case SYS___acl_delete_file:
1109 case SYS___acl_delete_fd:
1110 case SYS___acl_aclcheck_file:
1111 case SYS___acl_aclcheck_fd:
1112 case SYS___acl_get_link:
1113 case SYS___acl_set_link:
1114 case SYS___acl_delete_link:
1115 case SYS___acl_aclcheck_link:
1116 print_number(ip, narg, c);
1129 case SYS_extattrctl:
1130 print_number(ip, narg, c);
1132 extattrctlname(*ip);
1137 print_number(ip, narg, c);
1138 print_number(ip, narg, c);
1140 mountflagsname(*ip);
1144 case SYS_thr_create:
1145 print_number(ip, narg, c);
1146 print_number(ip, narg, c);
1148 thrcreateflagsname(*ip);
1153 print_number(ip, narg, c);
1159 case SYS_kldunloadf:
1160 print_number(ip, narg, c);
1162 kldunloadfflagsname(*ip);
1169 print_number(ip, narg, c);
1171 atfdname(*ip, decimal);
1175 case SYS_cap_fcntls_limit:
1176 print_number(ip, narg, c);
1183 case SYS_posix_fadvise:
1184 print_number(ip, narg, c);
1185 print_number(ip, narg, c);
1186 print_number(ip, narg, c);
1188 fadvisebehavname((int)*ip);
1194 idtypename(*ip, decimal);
1198 print_number(ip, narg, c);
1200 procctlcmdname(*ip);
1205 print_number(ip, narg, c);
1209 case UMTX_OP_CV_WAIT:
1213 umtxcvwaitflags(*ip);
1215 case UMTX_OP_RW_RDLOCK:
1219 umtxrwlockflags(*ip);
1227 print_number(ip, narg, c);
1235 ktrsysret(struct ktr_sysret *ktr, u_int flags)
1237 register_t ret = ktr->ktr_retval;
1238 int error = ktr->ktr_error;
1239 int code = ktr->ktr_code;
1241 if ((flags != 0 && ((flags & SV_ABI_MASK) != SV_ABI_FREEBSD)) ||
1242 (code >= nsyscalls || code < 0))
1243 printf("[%d] ", code);
1245 printf("%s", syscallnames[code]);
1247 printf("[%d]", code);
1253 printf("%ld", (long)ret);
1254 if (ret < 0 || ret > 9)
1255 printf("/%#lx", (unsigned long)ret);
1258 printf("%ld", (long)ret);
1260 printf("%#lx", (unsigned long)ret);
1262 } else if (error == ERESTART)
1264 else if (error == EJUSTRETURN)
1265 printf("JUSTRETURN");
1267 printf("-1 errno %d", ktr->ktr_error);
1269 printf(" %s", strerror(ktr->ktr_error));
1275 ktrnamei(char *cp, int len)
1277 printf("\"%.*s\"\n", len, cp);
1281 hexdump(char *p, int len, int screenwidth)
1289 i = 13; /* base offset */
1290 i += (width / 2) + 1; /* spaces every second byte */
1291 i += (width * 2); /* width of bytes */
1293 i += width; /* each byte */
1295 } while (i < screenwidth);
1298 for (n = 0; n < len; n += width) {
1299 for (i = n; i < n + width; i++) {
1300 if ((i % width) == 0) { /* beginning of line */
1301 printf(" 0x%04x", i);
1307 printf("%02x", p[i] & 0xff);
1312 for (i = n; i < n + width; i++) {
1315 if (p[i] >= ' ' && p[i] <= '~')
1322 if ((i % width) != 0)
1327 visdump(char *dp, int datalen, int screenwidth)
1336 for (;datalen > 0; datalen--, dp++) {
1337 vis(visbuf, *dp, VIS_CSTYLE, *(dp+1));
1340 * Keep track of printables and
1341 * space chars (like fold(1)).
1353 width = 8 - (col&07);
1358 if (col + width > (screenwidth-2)) {
1373 ktrgenio(struct ktr_genio *ktr, int len)
1375 int datalen = len - sizeof (struct ktr_genio);
1376 char *dp = (char *)ktr + sizeof (struct ktr_genio);
1377 static int screenwidth = 0;
1380 printf("fd %d %s %d byte%s\n", ktr->ktr_fd,
1381 ktr->ktr_rw == UIO_READ ? "read" : "wrote", datalen,
1382 datalen == 1 ? "" : "s");
1385 if (screenwidth == 0) {
1388 if (fancy && ioctl(fileno(stderr), TIOCGWINSZ, &ws) != -1 &&
1390 screenwidth = ws.ws_col;
1394 if (maxdata && datalen > maxdata)
1397 for (i = 0, binary = 0; i < datalen && binary == 0; i++) {
1398 if (dp[i] >= 32 && dp[i] < 127)
1400 if (dp[i] == 10 || dp[i] == 13 || dp[i] == 0 || dp[i] == 9)
1405 hexdump(dp, datalen, screenwidth);
1407 visdump(dp, datalen, screenwidth);
1410 const char *signames[] = {
1411 "NULL", "HUP", "INT", "QUIT", "ILL", "TRAP", "IOT", /* 1 - 6 */
1412 "EMT", "FPE", "KILL", "BUS", "SEGV", "SYS", /* 7 - 12 */
1413 "PIPE", "ALRM", "TERM", "URG", "STOP", "TSTP", /* 13 - 18 */
1414 "CONT", "CHLD", "TTIN", "TTOU", "IO", "XCPU", /* 19 - 24 */
1415 "XFSZ", "VTALRM", "PROF", "WINCH", "29", "USR1", /* 25 - 30 */
1416 "USR2", NULL, /* 31 - 32 */
1420 ktrpsig(struct ktr_psig *psig)
1422 if (psig->signo > 0 && psig->signo < NSIG)
1423 printf("SIG%s ", signames[psig->signo]);
1425 printf("SIG %d ", psig->signo);
1426 if (psig->action == SIG_DFL) {
1427 printf("SIG_DFL code=");
1428 sigcodename(psig->signo, psig->code);
1431 printf("caught handler=0x%lx mask=0x%x code=",
1432 (u_long)psig->action, psig->mask.__bits[0]);
1433 sigcodename(psig->signo, psig->code);
1439 ktrcsw_old(struct ktr_csw_old *cs)
1441 printf("%s %s\n", cs->out ? "stop" : "resume",
1442 cs->user ? "user" : "kernel");
1446 ktrcsw(struct ktr_csw *cs)
1448 printf("%s %s \"%s\"\n", cs->out ? "stop" : "resume",
1449 cs->user ? "user" : "kernel", cs->wmesg);
1452 #define UTRACE_DLOPEN_START 1
1453 #define UTRACE_DLOPEN_STOP 2
1454 #define UTRACE_DLCLOSE_START 3
1455 #define UTRACE_DLCLOSE_STOP 4
1456 #define UTRACE_LOAD_OBJECT 5
1457 #define UTRACE_UNLOAD_OBJECT 6
1458 #define UTRACE_ADD_RUNDEP 7
1459 #define UTRACE_PRELOAD_FINISHED 8
1460 #define UTRACE_INIT_CALL 9
1461 #define UTRACE_FINI_CALL 10
1462 #define UTRACE_DLSYM_START 11
1463 #define UTRACE_DLSYM_STOP 12
1465 struct utrace_rtld {
1466 char sig[4]; /* 'RTLD' */
1472 char name[MAXPATHLEN];
1476 ktruser_rtld(int len, void *p)
1478 struct utrace_rtld *ut = p;
1483 switch (ut->event) {
1484 case UTRACE_DLOPEN_START:
1486 printf("dlopen(%s, ", ut->name);
1487 switch (mode & RTLD_MODEMASK) {
1492 printf("RTLD_LAZY");
1495 printf("%#x", mode & RTLD_MODEMASK);
1497 if (mode & RTLD_GLOBAL)
1498 printf(" | RTLD_GLOBAL");
1499 if (mode & RTLD_TRACE)
1500 printf(" | RTLD_TRACE");
1501 if (mode & ~(RTLD_MODEMASK | RTLD_GLOBAL | RTLD_TRACE))
1502 printf(" | %#x", mode &
1503 ~(RTLD_MODEMASK | RTLD_GLOBAL | RTLD_TRACE));
1506 case UTRACE_DLOPEN_STOP:
1507 printf("%p = dlopen(%s) ref %d\n", ut->handle, ut->name,
1510 case UTRACE_DLCLOSE_START:
1511 printf("dlclose(%p) (%s, %d)\n", ut->handle, ut->name,
1514 case UTRACE_DLCLOSE_STOP:
1515 printf("dlclose(%p) finished\n", ut->handle);
1517 case UTRACE_LOAD_OBJECT:
1518 printf("RTLD: loaded %p @ %p - %p (%s)\n", ut->handle,
1519 ut->mapbase, (char *)ut->mapbase + ut->mapsize - 1,
1522 case UTRACE_UNLOAD_OBJECT:
1523 printf("RTLD: unloaded %p @ %p - %p (%s)\n", ut->handle,
1524 ut->mapbase, (char *)ut->mapbase + ut->mapsize - 1,
1527 case UTRACE_ADD_RUNDEP:
1528 parent = ut->mapbase;
1529 printf("RTLD: %p now depends on %p (%s, %d)\n", parent,
1530 ut->handle, ut->name, ut->refcnt);
1532 case UTRACE_PRELOAD_FINISHED:
1533 printf("RTLD: LD_PRELOAD finished\n");
1535 case UTRACE_INIT_CALL:
1536 printf("RTLD: init %p for %p (%s)\n", ut->mapbase, ut->handle,
1539 case UTRACE_FINI_CALL:
1540 printf("RTLD: fini %p for %p (%s)\n", ut->mapbase, ut->handle,
1543 case UTRACE_DLSYM_START:
1544 printf("RTLD: dlsym(%p, %s)\n", ut->handle, ut->name);
1546 case UTRACE_DLSYM_STOP:
1547 printf("RTLD: %p = dlsym(%p, %s)\n", ut->mapbase, ut->handle,
1554 printf("RTLD: %d ", len);
1557 printf(" %d", *cp++);
1559 printf(" %02x", *cp++);
1564 struct utrace_malloc {
1571 ktruser_malloc(void *p)
1573 struct utrace_malloc *ut = p;
1575 if (ut->p == (void *)(intptr_t)(-1))
1576 printf("malloc_init()\n");
1577 else if (ut->s == 0)
1578 printf("free(%p)\n", ut->p);
1579 else if (ut->p == NULL)
1580 printf("%p = malloc(%zu)\n", ut->r, ut->s);
1582 printf("%p = realloc(%p, %zu)\n", ut->r, ut->p, ut->s);
1586 ktruser(int len, void *p)
1590 if (len >= 8 && bcmp(p, "RTLD", 4) == 0) {
1591 ktruser_rtld(len, p);
1595 if (len == sizeof(struct utrace_malloc)) {
1604 printf(" %d", *cp++);
1606 printf(" %02x", *cp++);
1611 ktrcaprights(cap_rights_t *rightsp)
1614 printf("cap_rights_t ");
1620 ktrsockaddr(struct sockaddr *sa)
1623 TODO: Support additional address families
1624 #include <netnatm/natm.h>
1625 struct sockaddr_natm *natm;
1626 #include <netsmb/netbios.h>
1627 struct sockaddr_nb *nb;
1632 * note: ktrstruct() has already verified that sa points to a
1633 * buffer at least sizeof(struct sockaddr) bytes long and exactly
1634 * sa->sa_len bytes long.
1636 printf("struct sockaddr { ");
1637 sockfamilyname(sa->sa_family);
1640 #define check_sockaddr_len(n) \
1641 if (sa_##n.s##n##_len < sizeof(struct sockaddr_##n)) { \
1642 printf("invalid"); \
1646 switch(sa->sa_family) {
1648 struct sockaddr_in sa_in;
1650 memset(&sa_in, 0, sizeof(sa_in));
1651 memcpy(&sa_in, sa, sa->sa_len);
1652 check_sockaddr_len(in);
1653 inet_ntop(AF_INET, &sa_in.sin_addr, addr, sizeof addr);
1654 printf("%s:%u", addr, ntohs(sa_in.sin_port));
1658 case AF_APPLETALK: {
1659 struct sockaddr_at sa_at;
1660 struct netrange *nr;
1662 memset(&sa_at, 0, sizeof(sa_at));
1663 memcpy(&sa_at, sa, sa->sa_len);
1664 check_sockaddr_len(at);
1665 nr = &sa_at.sat_range.r_netrange;
1666 printf("%d.%d, %d-%d, %d", ntohs(sa_at.sat_addr.s_net),
1667 sa_at.sat_addr.s_node, ntohs(nr->nr_firstnet),
1668 ntohs(nr->nr_lastnet), nr->nr_phase);
1673 struct sockaddr_in6 sa_in6;
1675 memset(&sa_in6, 0, sizeof(sa_in6));
1676 memcpy(&sa_in6, sa, sa->sa_len);
1677 check_sockaddr_len(in6);
1678 getnameinfo((struct sockaddr *)&sa_in6, sizeof(sa_in6),
1679 addr, sizeof(addr), NULL, 0, NI_NUMERICHOST);
1680 printf("[%s]:%u", addr, htons(sa_in6.sin6_port));
1685 struct sockaddr_ipx sa_ipx;
1687 memset(&sa_ipx, 0, sizeof(sa_ipx));
1688 memcpy(&sa_ipx, sa, sa->sa_len);
1689 check_sockaddr_len(ipx);
1690 /* XXX wish we had ipx_ntop */
1691 printf("%s", ipx_ntoa(sa_ipx.sipx_addr));
1697 struct sockaddr_un sa_un;
1699 memset(&sa_un, 0, sizeof(sa_un));
1700 memcpy(&sa_un, sa, sa->sa_len);
1701 printf("%.*s", (int)sizeof(sa_un.sun_path), sa_un.sun_path);
1705 printf("unknown address family");
1711 ktrstat(struct stat *statp)
1713 char mode[12], timestr[PATH_MAX + 4];
1719 * note: ktrstruct() has already verified that statp points to a
1720 * buffer exactly sizeof(struct stat) bytes long.
1722 printf("struct stat {");
1723 printf("dev=%ju, ino=%ju, ",
1724 (uintmax_t)statp->st_dev, (uintmax_t)statp->st_ino);
1726 printf("mode=0%jo, ", (uintmax_t)statp->st_mode);
1728 strmode(statp->st_mode, mode);
1729 printf("mode=%s, ", mode);
1731 printf("nlink=%ju, ", (uintmax_t)statp->st_nlink);
1732 if (resolv == 0 || (pwd = getpwuid(statp->st_uid)) == NULL)
1733 printf("uid=%ju, ", (uintmax_t)statp->st_uid);
1735 printf("uid=\"%s\", ", pwd->pw_name);
1736 if (resolv == 0 || (grp = getgrgid(statp->st_gid)) == NULL)
1737 printf("gid=%ju, ", (uintmax_t)statp->st_gid);
1739 printf("gid=\"%s\", ", grp->gr_name);
1740 printf("rdev=%ju, ", (uintmax_t)statp->st_rdev);
1743 printf("%jd", (intmax_t)statp->st_atim.tv_sec);
1745 tm = localtime(&statp->st_atim.tv_sec);
1746 strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1747 printf("\"%s\"", timestr);
1749 if (statp->st_atim.tv_nsec != 0)
1750 printf(".%09ld, ", statp->st_atim.tv_nsec);
1755 printf("%jd", (intmax_t)statp->st_mtim.tv_sec);
1757 tm = localtime(&statp->st_mtim.tv_sec);
1758 strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1759 printf("\"%s\"", timestr);
1761 if (statp->st_mtim.tv_nsec != 0)
1762 printf(".%09ld, ", statp->st_mtim.tv_nsec);
1767 printf("%jd", (intmax_t)statp->st_ctim.tv_sec);
1769 tm = localtime(&statp->st_ctim.tv_sec);
1770 strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1771 printf("\"%s\"", timestr);
1773 if (statp->st_ctim.tv_nsec != 0)
1774 printf(".%09ld, ", statp->st_ctim.tv_nsec);
1777 printf("birthtime=");
1779 printf("%jd", (intmax_t)statp->st_birthtim.tv_sec);
1781 tm = localtime(&statp->st_birthtim.tv_sec);
1782 strftime(timestr, sizeof(timestr), TIME_FORMAT, tm);
1783 printf("\"%s\"", timestr);
1785 if (statp->st_birthtim.tv_nsec != 0)
1786 printf(".%09ld, ", statp->st_birthtim.tv_nsec);
1789 printf("size=%jd, blksize=%ju, blocks=%jd, flags=0x%x",
1790 (uintmax_t)statp->st_size, (uintmax_t)statp->st_blksize,
1791 (intmax_t)statp->st_blocks, statp->st_flags);
1796 ktrstruct(char *buf, size_t buflen)
1799 size_t namelen, datalen;
1801 cap_rights_t rights;
1803 struct sockaddr_storage ss;
1805 for (name = buf, namelen = 0;
1806 namelen < buflen && name[namelen] != '\0';
1809 if (namelen == buflen)
1811 if (name[namelen] != '\0')
1813 data = buf + namelen + 1;
1814 datalen = buflen - namelen - 1;
1818 for (i = 0; i < (int)namelen; ++i)
1819 if (!isalpha(name[i]))
1821 if (strcmp(name, "caprights") == 0) {
1822 if (datalen != sizeof(cap_rights_t))
1824 memcpy(&rights, data, datalen);
1825 ktrcaprights(&rights);
1826 } else if (strcmp(name, "stat") == 0) {
1827 if (datalen != sizeof(struct stat))
1829 memcpy(&sb, data, datalen);
1831 } else if (strcmp(name, "sockaddr") == 0) {
1832 if (datalen > sizeof(ss))
1834 memcpy(&ss, data, datalen);
1835 if (datalen != ss.ss_len)
1837 ktrsockaddr((struct sockaddr *)&ss);
1839 printf("unknown structure\n");
1843 printf("invalid record\n");
1847 ktrcapfail(struct ktr_cap_fail *ktr)
1849 switch (ktr->cap_type) {
1850 case CAPFAIL_NOTCAPABLE:
1851 /* operation on fd with insufficient capabilities */
1852 printf("operation requires ");
1853 capname(&ktr->cap_needed);
1854 printf(", process holds ");
1855 capname(&ktr->cap_held);
1857 case CAPFAIL_INCREASE:
1858 /* requested more capabilities than fd already has */
1859 printf("attempt to increase capabilities from ");
1860 capname(&ktr->cap_held);
1862 capname(&ktr->cap_needed);
1864 case CAPFAIL_SYSCALL:
1865 /* called restricted syscall */
1866 printf("disallowed system call");
1868 case CAPFAIL_LOOKUP:
1869 /* used ".." in strict-relative mode */
1870 printf("restricted VFS lookup");
1873 printf("unknown capability failure: ");
1874 capname(&ktr->cap_needed);
1876 capname(&ktr->cap_held);
1883 ktrfault(struct ktr_fault *ktr)
1886 printf("0x%jx ", (uintmax_t)ktr->vaddr);
1887 vmprotname(ktr->type);
1892 ktrfaultend(struct ktr_faultend *ktr)
1895 vmresultname(ktr->result);
1899 #if defined(__amd64__) || defined(__i386__)
1901 #if defined(__amd64__)
1902 #define NLINUX_SYSCALLS(v) ((v) & SV_ILP32 ? \
1903 nitems(linux32_syscallnames) : nitems(linux_syscallnames))
1904 #define LINUX_SYSCALLNAMES(v, i) ((v) & SV_ILP32 ? \
1905 linux32_syscallnames[i] : linux_syscallnames[i])
1907 #define NLINUX_SYSCALLS(v) (nitems(linux_syscallnames))
1908 #define LINUX_SYSCALLNAMES(v, i) (linux_syscallnames[i])
1912 linux_ktrsyscall(struct ktr_syscall *ktr, u_int sv_flags)
1914 int narg = ktr->ktr_narg;
1915 unsigned code = ktr->ktr_code;
1918 if (ktr->ktr_code < 0 || code >= NLINUX_SYSCALLS(sv_flags))
1919 printf("[%d]", ktr->ktr_code);
1921 printf("%s", LINUX_SYSCALLNAMES(sv_flags, ktr->ktr_code));
1923 printf("[%d]", ktr->ktr_code);
1925 ip = &ktr->ktr_args[0];
1929 print_number(ip, narg, c);
1936 linux_ktrsysret(struct ktr_sysret *ktr, u_int sv_flags)
1938 register_t ret = ktr->ktr_retval;
1939 unsigned code = ktr->ktr_code;
1940 int error = ktr->ktr_error;
1942 if (ktr->ktr_code < 0 || code >= NLINUX_SYSCALLS(sv_flags))
1943 printf("[%d] ", ktr->ktr_code);
1945 printf("%s ", LINUX_SYSCALLNAMES(sv_flags, code));
1947 printf("[%d]", code);
1953 printf("%ld", (long)ret);
1954 if (ret < 0 || ret > 9)
1955 printf("/%#lx", (unsigned long)ret);
1958 printf("%ld", (long)ret);
1960 printf("%#lx", (unsigned long)ret);
1962 } else if (error == ERESTART)
1964 else if (error == EJUSTRETURN)
1965 printf("JUSTRETURN");
1967 if (ktr->ktr_error <= ELAST + 1)
1968 error = abs(bsd_to_linux_errno[ktr->ktr_error]);
1971 printf("-1 errno %d", error);
1973 printf(" %s", strerror(ktr->ktr_error));
1982 fprintf(stderr, "usage: kdump [-dEnlHRrSsTA] [-f trfile] "
1983 "[-m maxdata] [-p pid] [-t trstr]\n");