kgdb_machdep.c revision 1.2 1 1.2 lukem /* $NetBSD: kgdb_machdep.c,v 1.2 2003/07/15 00:24:42 lukem 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.2 lukem __KERNEL_RCSID(0, "$NetBSD: kgdb_machdep.c,v 1.2 2003/07/15 00:24:42 lukem 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.1 briggs kgdb_acc(va, len)
54 1.1 briggs vaddr_t va;
55 1.1 briggs size_t len;
56 1.1 briggs {
57 1.1 briggs vaddr_t last_va;
58 1.1 briggs
59 1.1 briggs last_va = va + len;
60 1.1 briggs va &= ~PGOFSET;
61 1.1 briggs last_va &= ~PGOFSET;
62 1.1 briggs
63 1.1 briggs do {
64 1.1 briggs if (db_validate_address(va))
65 1.1 briggs return (0);
66 1.1 briggs va += PAGE_SIZE;
67 1.1 briggs } while (va < last_va);
68 1.1 briggs
69 1.1 briggs return (1);
70 1.1 briggs }
71 1.1 briggs
72 1.1 briggs /*
73 1.1 briggs * Translate a trap number into a unix compatible signal value.
74 1.1 briggs * (gdb only understands unix signal numbers).
75 1.1 briggs */
76 1.1 briggs int
77 1.1 briggs kgdb_signal(type)
78 1.1 briggs int type;
79 1.1 briggs {
80 1.1 briggs
81 1.1 briggs switch (type) {
82 1.1 briggs case T_BREAKPOINT:
83 1.1 briggs return(SIGTRAP);
84 1.1 briggs case -1:
85 1.1 briggs return(SIGSEGV);
86 1.1 briggs default:
87 1.1 briggs return(SIGINT);
88 1.1 briggs }
89 1.1 briggs }
90 1.1 briggs
91 1.1 briggs /*
92 1.1 briggs * Definitions exported from gdb.
93 1.1 briggs */
94 1.1 briggs
95 1.1 briggs /*
96 1.1 briggs * Translate the values stored in the kernel regs struct to the format
97 1.1 briggs * understood by gdb.
98 1.1 briggs */
99 1.1 briggs void
100 1.1 briggs kgdb_getregs(regs, gdb_regs)
101 1.1 briggs db_regs_t *regs;
102 1.1 briggs kgdb_reg_t *gdb_regs;
103 1.1 briggs {
104 1.1 briggs
105 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 0] = regs->tf_r0;
106 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 1] = regs->tf_r1;
107 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 2] = regs->tf_r2;
108 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 3] = regs->tf_r3;
109 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 4] = regs->tf_r4;
110 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 5] = regs->tf_r5;
111 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 6] = regs->tf_r6;
112 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 7] = regs->tf_r7;
113 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 8] = regs->tf_r8;
114 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 9] = regs->tf_r9;
115 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 10] = regs->tf_r10;
116 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 11] = regs->tf_r11;
117 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 12] = regs->tf_r12;
118 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 13] = regs->tf_svc_sp;
119 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 14] = regs->tf_svc_lr;
120 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 15] = regs->tf_pc;
121 1.1 briggs
122 1.1 briggs gdb_regs[KGDB_REGNUM_SPSR] = regs->tf_spsr;
123 1.1 briggs }
124 1.1 briggs
125 1.1 briggs /*
126 1.1 briggs * Reverse the above.
127 1.1 briggs */
128 1.1 briggs void
129 1.1 briggs kgdb_setregs(regs, gdb_regs)
130 1.1 briggs db_regs_t *regs;
131 1.1 briggs kgdb_reg_t *gdb_regs;
132 1.1 briggs {
133 1.1 briggs regs->tf_r0 = gdb_regs[KGDB_REGNUM_R0 + 0];
134 1.1 briggs regs->tf_r1 = gdb_regs[KGDB_REGNUM_R0 + 1];
135 1.1 briggs regs->tf_r2 = gdb_regs[KGDB_REGNUM_R0 + 2];
136 1.1 briggs regs->tf_r3 = gdb_regs[KGDB_REGNUM_R0 + 3];
137 1.1 briggs regs->tf_r4 = gdb_regs[KGDB_REGNUM_R0 + 4];
138 1.1 briggs regs->tf_r5 = gdb_regs[KGDB_REGNUM_R0 + 5];
139 1.1 briggs regs->tf_r6 = gdb_regs[KGDB_REGNUM_R0 + 6];
140 1.1 briggs regs->tf_r7 = gdb_regs[KGDB_REGNUM_R0 + 7];
141 1.1 briggs regs->tf_r8 = gdb_regs[KGDB_REGNUM_R0 + 8];
142 1.1 briggs regs->tf_r9 = gdb_regs[KGDB_REGNUM_R0 + 9];
143 1.1 briggs regs->tf_r10 = gdb_regs[KGDB_REGNUM_R0 + 10];
144 1.1 briggs regs->tf_r11 = gdb_regs[KGDB_REGNUM_R0 + 11];
145 1.1 briggs regs->tf_r12 = gdb_regs[KGDB_REGNUM_R0 + 12];
146 1.1 briggs regs->tf_svc_sp = gdb_regs[KGDB_REGNUM_R0 + 13];
147 1.1 briggs regs->tf_svc_lr = gdb_regs[KGDB_REGNUM_R0 + 14];
148 1.1 briggs regs->tf_pc = gdb_regs[KGDB_REGNUM_R0 + 15];
149 1.1 briggs
150 1.1 briggs regs->tf_spsr = gdb_regs[KGDB_REGNUM_SPSR];
151 1.1 briggs }
152 1.1 briggs
153 1.1 briggs /*
154 1.1 briggs * Trap into kgdb to wait for debugger to connect,
155 1.1 briggs * noting on the console why nothing else is going on.
156 1.1 briggs */
157 1.1 briggs void
158 1.1 briggs kgdb_connect(verbose)
159 1.1 briggs int verbose;
160 1.1 briggs {
161 1.1 briggs
162 1.1 briggs if (kgdb_dev < 0)
163 1.1 briggs return;
164 1.1 briggs
165 1.1 briggs if (verbose)
166 1.1 briggs printf("kgdb waiting...");
167 1.1 briggs
168 1.1 briggs asm volatile(KBPT_ASM);
169 1.1 briggs
170 1.1 briggs if (verbose)
171 1.1 briggs printf("connected.\n");
172 1.1 briggs
173 1.1 briggs kgdb_debug_panic = 1;
174 1.1 briggs }
175 1.1 briggs
176 1.1 briggs /*
177 1.1 briggs * Decide what to do on panic.
178 1.1 briggs * (This is called by panic, like Debugger())
179 1.1 briggs */
180 1.1 briggs void
181 1.1 briggs kgdb_panic()
182 1.1 briggs {
183 1.1 briggs
184 1.1 briggs if (kgdb_dev >= 0 && kgdb_debug_panic) {
185 1.1 briggs printf("entering kgdb\n");
186 1.1 briggs kgdb_connect(kgdb_active == 0);
187 1.1 briggs }
188 1.1 briggs }
189