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