db_trace.c revision 1.2 1 1.2 perry /* $NetBSD: db_trace.c,v 1.2 1998/01/05 07:03:02 perry Exp $ */
2 1.2 perry
3 1.1 jonathan /*
4 1.1 jonathan * Mach Operating System
5 1.1 jonathan * Copyright (c) 1993-1987 Carnegie Mellon University
6 1.1 jonathan * All Rights Reserved.
7 1.1 jonathan *
8 1.1 jonathan * Permission to use, copy, modify and distribute this software and its
9 1.1 jonathan * documentation is hereby granted, provided that both the copyright
10 1.1 jonathan * notice and this permission notice appear in all copies of the
11 1.1 jonathan * software, derivative works or modified versions, and any portions
12 1.1 jonathan * thereof, and that both notices appear in supporting documentation.
13 1.1 jonathan *
14 1.1 jonathan * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
15 1.1 jonathan * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
16 1.1 jonathan * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
17 1.1 jonathan *
18 1.1 jonathan * Carnegie Mellon requests users of this software to return to
19 1.1 jonathan *
20 1.1 jonathan * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU
21 1.1 jonathan * School of Computer Science
22 1.1 jonathan * Carnegie Mellon University
23 1.1 jonathan * Pittsburgh PA 15213-3890
24 1.1 jonathan *
25 1.1 jonathan * any improvements or extensions that they make and grant Carnegie Mellon
26 1.1 jonathan * the rights to redistribute these changes.
27 1.1 jonathan */
28 1.1 jonathan
29 1.1 jonathan #include <sys/types.h>
30 1.1 jonathan #include <vm/vm_param.h> /* XXX boolean_t */
31 1.1 jonathan
32 1.1 jonathan #include <machine/param.h>
33 1.1 jonathan #include <mips/db_machdep.h>
34 1.1 jonathan #include <ddb/db_interface.h>
35 1.1 jonathan #include <ddb/db_output.h>
36 1.1 jonathan #include <ddb/db_variables.h>
37 1.1 jonathan #include <ddb/db_sym.h>
38 1.1 jonathan
39 1.1 jonathan extern int __start __P((void)); /* lowest kernel code address */
40 1.1 jonathan extern vm_offset_t db_maxoff;
41 1.1 jonathan extern vm_offset_t getreg_val __P((db_expr_t regno));
42 1.1 jonathan
43 1.1 jonathan #define REG_ARG(i) (4+i)
44 1.1 jonathan #define SAVES_RA(x) isa_spill((x),31)
45 1.1 jonathan
46 1.1 jonathan #define KERN_SAVE_REG_IDX(vp) ( \
47 1.1 jonathan ((vp)->valuep >= (int *)(&((struct mips_saved_state *)0)->s0) && \
48 1.1 jonathan (vp)->valuep <= (int *)(&((struct mips_saved_state *)0)->s7))? \
49 1.1 jonathan vp->valuep - (int *)(&((struct mips_saved_state *)0)->s0): \
50 1.1 jonathan ((vp)->valuep >= (int *)(&((struct mips_saved_state *)0)->sp) && \
51 1.1 jonathan (vp)->valuep <= (int *)(&((struct mips_saved_state *)0)->ra))? \
52 1.1 jonathan ((vp)->valuep-(int *)(&((struct mips_saved_state *)0)->sp)) + \
53 1.1 jonathan ((int *)(&((struct mips_kernel_state *)0)->sp) - (int *)0): \
54 1.1 jonathan -1)
55 1.1 jonathan
56 1.1 jonathan extern db_sym_t localsym __P((db_sym_t sym, boolean_t isreg, int *lex_level));
57 1.1 jonathan
58 1.1 jonathan /*
59 1.1 jonathan * Machine register set.
60 1.1 jonathan */
61 1.1 jonathan struct mips_saved_state *db_cur_exc_frame = 0;
62 1.1 jonathan
63 1.1 jonathan /*
64 1.1 jonathan * forward declarations
65 1.1 jonathan */
66 1.1 jonathan int print_exception_frame __P((register struct mips_saved_state *fp,
67 1.1 jonathan unsigned epc));
68 1.1 jonathan
69 1.1 jonathan /*XXX*/
70 1.1 jonathan extern void stacktrace_subr __P((int a0, int a1, int a2, int a3,
71 1.1 jonathan u_int pc, u_int sp, u_int fp, u_int ra,
72 1.1 jonathan void (*)(const char*, ...)));
73 1.1 jonathan
74 1.1 jonathan /*
75 1.1 jonathan * Stack trace helper.
76 1.1 jonathan */
77 1.1 jonathan void db_mips_stack_trace __P((int count, vm_offset_t stackp,
78 1.1 jonathan vm_offset_t the_pc, vm_offset_t the_ra, int flags, vm_offset_t kstackp));
79 1.1 jonathan
80 1.1 jonathan
81 1.1 jonathan #define DB_SETF_REGS FCN_NULL
82 1.1 jonathan #define DBREGS_REG()
83 1.1 jonathan
84 1.1 jonathan struct db_variable db_regs[] = {
85 1.1 jonathan { "at", (long *)&ddb_regs.f_regs[AST], DB_SETF_REGS },
86 1.1 jonathan { "v0", (long *)&ddb_regs.f_regs[V0], DB_SETF_REGS },
87 1.1 jonathan { "v1", (long *)&ddb_regs.f_regs[V1], DB_SETF_REGS },
88 1.1 jonathan { "a0", (long *)&ddb_regs.f_regs[A0], DB_SETF_REGS },
89 1.1 jonathan { "a1", (long *)&ddb_regs.f_regs[A1], DB_SETF_REGS },
90 1.1 jonathan { "a2", (long *)&ddb_regs.f_regs[A2], DB_SETF_REGS },
91 1.1 jonathan { "a3", (long *)&ddb_regs.f_regs[A3], DB_SETF_REGS },
92 1.1 jonathan { "t0", (long *)&ddb_regs.f_regs[T0], DB_SETF_REGS },
93 1.1 jonathan { "t1", (long *)&ddb_regs.f_regs[T1], DB_SETF_REGS },
94 1.1 jonathan { "t2", (long *)&ddb_regs.f_regs[T2], DB_SETF_REGS },
95 1.1 jonathan { "t3", (long *)&ddb_regs.f_regs[T3], DB_SETF_REGS },
96 1.1 jonathan { "t4", (long *)&ddb_regs.f_regs[T4], DB_SETF_REGS },
97 1.1 jonathan { "t5", (long *)&ddb_regs.f_regs[T5], DB_SETF_REGS },
98 1.1 jonathan { "t6", (long *)&ddb_regs.f_regs[T6], DB_SETF_REGS },
99 1.1 jonathan { "t7", (long *)&ddb_regs.f_regs[T7], DB_SETF_REGS },
100 1.1 jonathan { "s0", (long *)&ddb_regs.f_regs[S0], DB_SETF_REGS },
101 1.1 jonathan { "s1", (long *)&ddb_regs.f_regs[S1], DB_SETF_REGS },
102 1.1 jonathan { "s2", (long *)&ddb_regs.f_regs[S2], DB_SETF_REGS },
103 1.1 jonathan { "s3", (long *)&ddb_regs.f_regs[S3], DB_SETF_REGS },
104 1.1 jonathan { "s4", (long *)&ddb_regs.f_regs[S4], DB_SETF_REGS },
105 1.1 jonathan { "s5", (long *)&ddb_regs.f_regs[S5], DB_SETF_REGS },
106 1.1 jonathan { "s6", (long *)&ddb_regs.f_regs[S6], DB_SETF_REGS },
107 1.1 jonathan { "s7", (long *)&ddb_regs.f_regs[S7], DB_SETF_REGS },
108 1.1 jonathan { "t8", (long *)&ddb_regs.f_regs[T8], DB_SETF_REGS },
109 1.1 jonathan { "t9", (long *)&ddb_regs.f_regs[T9], DB_SETF_REGS },
110 1.1 jonathan { "k0", (long *)&ddb_regs.f_regs[K0], DB_SETF_REGS },
111 1.1 jonathan { "k1", (long *)&ddb_regs.f_regs[K1], DB_SETF_REGS },
112 1.1 jonathan { "gp", (long *)&ddb_regs.f_regs[GP], DB_SETF_REGS },
113 1.1 jonathan { "sp", (long *)&ddb_regs.f_regs[SP], DB_SETF_REGS },
114 1.1 jonathan { "fp", (long *)&ddb_regs.f_regs[S8], DB_SETF_REGS }, /* frame ptr */
115 1.1 jonathan { "ra", (long *)&ddb_regs.f_regs[RA], DB_SETF_REGS },
116 1.1 jonathan { "sr", (long *)&ddb_regs.f_regs[SR], DB_SETF_REGS },
117 1.1 jonathan { "mdlo",(long *)&ddb_regs.f_regs[MULLO], DB_SETF_REGS },
118 1.1 jonathan { "mdhi",(long *)&ddb_regs.f_regs[MULHI], DB_SETF_REGS },
119 1.1 jonathan { "bad", (long *)&ddb_regs.f_regs[BADVADDR], DB_SETF_REGS },
120 1.1 jonathan { "cs", (long *)&ddb_regs.f_regs[CAUSE], DB_SETF_REGS },
121 1.1 jonathan { "pc", (long *)&ddb_regs.f_regs[PC], DB_SETF_REGS },
122 1.1 jonathan };
123 1.1 jonathan struct db_variable *db_eregs = db_regs + sizeof(db_regs)/sizeof(db_regs[0]);
124 1.1 jonathan
125 1.1 jonathan
126 1.1 jonathan
127 1.1 jonathan void
128 1.1 jonathan db_stack_trace_cmd(addr, have_addr, count, modif)
129 1.1 jonathan db_expr_t addr;
130 1.1 jonathan boolean_t have_addr;
131 1.1 jonathan db_expr_t count;
132 1.1 jonathan char *modif;
133 1.1 jonathan {
134 1.1 jonathan stacktrace_subr(ddb_regs.f_regs[A0], ddb_regs.f_regs[A1],
135 1.1 jonathan ddb_regs.f_regs[A2], ddb_regs.f_regs[A3],
136 1.1 jonathan ddb_regs.f_regs[PC],
137 1.1 jonathan ddb_regs.f_regs[SP],
138 1.1 jonathan ddb_regs.f_regs[S8], /* non-virtual fame pointer */
139 1.1 jonathan ddb_regs.f_regs[RA],
140 1.1 jonathan db_printf);
141 1.1 jonathan }
142 1.1 jonathan
143 1.1 jonathan
144 1.1 jonathan void
145 1.1 jonathan db_mips_stack_trace(count, stackp, the_pc, the_ra, flags, kstackp)
146 1.1 jonathan int count;
147 1.1 jonathan vm_offset_t stackp, the_pc, the_ra;
148 1.1 jonathan int flags;
149 1.1 jonathan vm_offset_t kstackp;
150 1.1 jonathan {
151 1.1 jonathan return;
152 1.1 jonathan }
153 1.1 jonathan
154