kgdb_machdep.c revision 1.6 1 1.6 dsl /* $NetBSD: kgdb_machdep.c,v 1.6 2009/03/14 15:36:01 dsl Exp $ */
2 1.1 briggs
3 1.1 briggs /*
4 1.1 briggs * Copyright (c) 1996 Matthias Pfaller.
5 1.1 briggs * All rights reserved.
6 1.1 briggs *
7 1.1 briggs * Redistribution and use in source and binary forms, with or without
8 1.1 briggs * modification, are permitted provided that the following conditions
9 1.1 briggs * are met:
10 1.1 briggs * 1. Redistributions of source code must retain the above copyright
11 1.1 briggs * notice, this list of conditions and the following disclaimer.
12 1.1 briggs * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 briggs * notice, this list of conditions and the following disclaimer in the
14 1.1 briggs * documentation and/or other materials provided with the distribution.
15 1.1 briggs * 3. All advertising materials mentioning features or use of this software
16 1.1 briggs * must display the following acknowledgement:
17 1.1 briggs * This product includes software developed by Matthias Pfaller.
18 1.1 briggs * 4. The name of the author may not be used to endorse or promote products
19 1.1 briggs * derived from this software without specific prior written permission
20 1.1 briggs *
21 1.1 briggs * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 1.1 briggs * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 1.1 briggs * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 1.1 briggs * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 1.1 briggs * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 1.1 briggs * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 1.1 briggs * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 1.1 briggs * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 1.1 briggs * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 1.1 briggs * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 1.1 briggs */
32 1.2 lukem
33 1.2 lukem #include <sys/cdefs.h>
34 1.6 dsl __KERNEL_RCSID(0, "$NetBSD: kgdb_machdep.c,v 1.6 2009/03/14 15:36:01 dsl Exp $");
35 1.1 briggs
36 1.1 briggs #include "opt_ddb.h"
37 1.1 briggs #include "opt_kgdb.h"
38 1.1 briggs
39 1.1 briggs #include <sys/param.h>
40 1.1 briggs #include <sys/systm.h>
41 1.1 briggs #include <sys/kgdb.h>
42 1.1 briggs
43 1.1 briggs #include <uvm/uvm_extern.h>
44 1.1 briggs
45 1.1 briggs #include <machine/frame.h>
46 1.1 briggs #include <machine/reg.h>
47 1.1 briggs #include <machine/trap.h>
48 1.1 briggs
49 1.1 briggs /*
50 1.1 briggs * Determine if the memory at va..(va+len) is valid.
51 1.1 briggs */
52 1.1 briggs int
53 1.6 dsl kgdb_acc(vaddr_t va, size_t len)
54 1.1 briggs {
55 1.1 briggs vaddr_t last_va;
56 1.1 briggs
57 1.1 briggs last_va = va + len;
58 1.1 briggs va &= ~PGOFSET;
59 1.1 briggs last_va &= ~PGOFSET;
60 1.1 briggs
61 1.1 briggs do {
62 1.1 briggs if (db_validate_address(va))
63 1.1 briggs return (0);
64 1.1 briggs va += PAGE_SIZE;
65 1.1 briggs } while (va < last_va);
66 1.1 briggs
67 1.1 briggs return (1);
68 1.1 briggs }
69 1.1 briggs
70 1.1 briggs /*
71 1.1 briggs * Translate a trap number into a unix compatible signal value.
72 1.1 briggs * (gdb only understands unix signal numbers).
73 1.1 briggs */
74 1.1 briggs int
75 1.6 dsl kgdb_signal(int type)
76 1.1 briggs {
77 1.1 briggs
78 1.1 briggs switch (type) {
79 1.1 briggs case T_BREAKPOINT:
80 1.1 briggs return(SIGTRAP);
81 1.1 briggs case -1:
82 1.1 briggs return(SIGSEGV);
83 1.1 briggs default:
84 1.1 briggs return(SIGINT);
85 1.1 briggs }
86 1.1 briggs }
87 1.1 briggs
88 1.1 briggs /*
89 1.1 briggs * Definitions exported from gdb.
90 1.1 briggs */
91 1.1 briggs
92 1.1 briggs /*
93 1.1 briggs * Translate the values stored in the kernel regs struct to the format
94 1.1 briggs * understood by gdb.
95 1.1 briggs */
96 1.1 briggs void
97 1.6 dsl kgdb_getregs(db_regs_t *regs, kgdb_reg_t *gdb_regs)
98 1.1 briggs {
99 1.1 briggs
100 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 0] = regs->tf_r0;
101 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 1] = regs->tf_r1;
102 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 2] = regs->tf_r2;
103 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 3] = regs->tf_r3;
104 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 4] = regs->tf_r4;
105 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 5] = regs->tf_r5;
106 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 6] = regs->tf_r6;
107 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 7] = regs->tf_r7;
108 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 8] = regs->tf_r8;
109 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 9] = regs->tf_r9;
110 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 10] = regs->tf_r10;
111 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 11] = regs->tf_r11;
112 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 12] = regs->tf_r12;
113 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 13] = regs->tf_svc_sp;
114 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 14] = regs->tf_svc_lr;
115 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 15] = regs->tf_pc;
116 1.1 briggs
117 1.1 briggs gdb_regs[KGDB_REGNUM_SPSR] = regs->tf_spsr;
118 1.1 briggs }
119 1.1 briggs
120 1.1 briggs /*
121 1.1 briggs * Reverse the above.
122 1.1 briggs */
123 1.1 briggs void
124 1.6 dsl kgdb_setregs(db_regs_t *regs, kgdb_reg_t *gdb_regs)
125 1.1 briggs {
126 1.1 briggs regs->tf_r0 = gdb_regs[KGDB_REGNUM_R0 + 0];
127 1.1 briggs regs->tf_r1 = gdb_regs[KGDB_REGNUM_R0 + 1];
128 1.1 briggs regs->tf_r2 = gdb_regs[KGDB_REGNUM_R0 + 2];
129 1.1 briggs regs->tf_r3 = gdb_regs[KGDB_REGNUM_R0 + 3];
130 1.1 briggs regs->tf_r4 = gdb_regs[KGDB_REGNUM_R0 + 4];
131 1.1 briggs regs->tf_r5 = gdb_regs[KGDB_REGNUM_R0 + 5];
132 1.1 briggs regs->tf_r6 = gdb_regs[KGDB_REGNUM_R0 + 6];
133 1.1 briggs regs->tf_r7 = gdb_regs[KGDB_REGNUM_R0 + 7];
134 1.1 briggs regs->tf_r8 = gdb_regs[KGDB_REGNUM_R0 + 8];
135 1.1 briggs regs->tf_r9 = gdb_regs[KGDB_REGNUM_R0 + 9];
136 1.1 briggs regs->tf_r10 = gdb_regs[KGDB_REGNUM_R0 + 10];
137 1.1 briggs regs->tf_r11 = gdb_regs[KGDB_REGNUM_R0 + 11];
138 1.1 briggs regs->tf_r12 = gdb_regs[KGDB_REGNUM_R0 + 12];
139 1.1 briggs regs->tf_svc_sp = gdb_regs[KGDB_REGNUM_R0 + 13];
140 1.1 briggs regs->tf_svc_lr = gdb_regs[KGDB_REGNUM_R0 + 14];
141 1.1 briggs regs->tf_pc = gdb_regs[KGDB_REGNUM_R0 + 15];
142 1.1 briggs
143 1.1 briggs regs->tf_spsr = gdb_regs[KGDB_REGNUM_SPSR];
144 1.1 briggs }
145 1.1 briggs
146 1.1 briggs /*
147 1.1 briggs * Trap into kgdb to wait for debugger to connect,
148 1.1 briggs * noting on the console why nothing else is going on.
149 1.1 briggs */
150 1.1 briggs void
151 1.5 cegger kgdb_connect(int verbose)
152 1.1 briggs {
153 1.1 briggs
154 1.5 cegger if (kgdb_dev == NODEV)
155 1.1 briggs return;
156 1.1 briggs
157 1.1 briggs if (verbose)
158 1.1 briggs printf("kgdb waiting...");
159 1.1 briggs
160 1.4 perry __asm volatile(KBPT_ASM);
161 1.1 briggs
162 1.1 briggs if (verbose)
163 1.1 briggs printf("connected.\n");
164 1.1 briggs
165 1.1 briggs kgdb_debug_panic = 1;
166 1.1 briggs }
167 1.1 briggs
168 1.1 briggs /*
169 1.1 briggs * Decide what to do on panic.
170 1.1 briggs * (This is called by panic, like Debugger())
171 1.1 briggs */
172 1.1 briggs void
173 1.5 cegger kgdb_panic(void)
174 1.1 briggs {
175 1.1 briggs
176 1.5 cegger if (kgdb_dev != NODEV && kgdb_debug_panic) {
177 1.1 briggs printf("entering kgdb\n");
178 1.1 briggs kgdb_connect(kgdb_active == 0);
179 1.1 briggs }
180 1.1 briggs }
181