kgdb_machdep.c revision 1.1 1 1.1 briggs /* $NetBSD: kgdb_machdep.c,v 1.1 2003/04/28 01:54:50 briggs 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.1 briggs
33 1.1 briggs #include "opt_ddb.h"
34 1.1 briggs #include "opt_kgdb.h"
35 1.1 briggs
36 1.1 briggs #include <sys/param.h>
37 1.1 briggs #include <sys/systm.h>
38 1.1 briggs #include <sys/kgdb.h>
39 1.1 briggs
40 1.1 briggs #include <uvm/uvm_extern.h>
41 1.1 briggs
42 1.1 briggs #include <machine/frame.h>
43 1.1 briggs #include <machine/reg.h>
44 1.1 briggs #include <machine/trap.h>
45 1.1 briggs
46 1.1 briggs /*
47 1.1 briggs * Determine if the memory at va..(va+len) is valid.
48 1.1 briggs */
49 1.1 briggs int
50 1.1 briggs kgdb_acc(va, len)
51 1.1 briggs vaddr_t va;
52 1.1 briggs size_t len;
53 1.1 briggs {
54 1.1 briggs vaddr_t last_va;
55 1.1 briggs
56 1.1 briggs last_va = va + len;
57 1.1 briggs va &= ~PGOFSET;
58 1.1 briggs last_va &= ~PGOFSET;
59 1.1 briggs
60 1.1 briggs do {
61 1.1 briggs if (db_validate_address(va))
62 1.1 briggs return (0);
63 1.1 briggs va += PAGE_SIZE;
64 1.1 briggs } while (va < last_va);
65 1.1 briggs
66 1.1 briggs return (1);
67 1.1 briggs }
68 1.1 briggs
69 1.1 briggs /*
70 1.1 briggs * Translate a trap number into a unix compatible signal value.
71 1.1 briggs * (gdb only understands unix signal numbers).
72 1.1 briggs */
73 1.1 briggs int
74 1.1 briggs kgdb_signal(type)
75 1.1 briggs 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.1 briggs kgdb_getregs(regs, gdb_regs)
98 1.1 briggs db_regs_t *regs;
99 1.1 briggs kgdb_reg_t *gdb_regs;
100 1.1 briggs {
101 1.1 briggs
102 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 0] = regs->tf_r0;
103 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 1] = regs->tf_r1;
104 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 2] = regs->tf_r2;
105 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 3] = regs->tf_r3;
106 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 4] = regs->tf_r4;
107 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 5] = regs->tf_r5;
108 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 6] = regs->tf_r6;
109 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 7] = regs->tf_r7;
110 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 8] = regs->tf_r8;
111 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 9] = regs->tf_r9;
112 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 10] = regs->tf_r10;
113 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 11] = regs->tf_r11;
114 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 12] = regs->tf_r12;
115 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 13] = regs->tf_svc_sp;
116 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 14] = regs->tf_svc_lr;
117 1.1 briggs gdb_regs[KGDB_REGNUM_R0 + 15] = regs->tf_pc;
118 1.1 briggs
119 1.1 briggs gdb_regs[KGDB_REGNUM_SPSR] = regs->tf_spsr;
120 1.1 briggs }
121 1.1 briggs
122 1.1 briggs /*
123 1.1 briggs * Reverse the above.
124 1.1 briggs */
125 1.1 briggs void
126 1.1 briggs kgdb_setregs(regs, gdb_regs)
127 1.1 briggs db_regs_t *regs;
128 1.1 briggs kgdb_reg_t *gdb_regs;
129 1.1 briggs {
130 1.1 briggs regs->tf_r0 = gdb_regs[KGDB_REGNUM_R0 + 0];
131 1.1 briggs regs->tf_r1 = gdb_regs[KGDB_REGNUM_R0 + 1];
132 1.1 briggs regs->tf_r2 = gdb_regs[KGDB_REGNUM_R0 + 2];
133 1.1 briggs regs->tf_r3 = gdb_regs[KGDB_REGNUM_R0 + 3];
134 1.1 briggs regs->tf_r4 = gdb_regs[KGDB_REGNUM_R0 + 4];
135 1.1 briggs regs->tf_r5 = gdb_regs[KGDB_REGNUM_R0 + 5];
136 1.1 briggs regs->tf_r6 = gdb_regs[KGDB_REGNUM_R0 + 6];
137 1.1 briggs regs->tf_r7 = gdb_regs[KGDB_REGNUM_R0 + 7];
138 1.1 briggs regs->tf_r8 = gdb_regs[KGDB_REGNUM_R0 + 8];
139 1.1 briggs regs->tf_r9 = gdb_regs[KGDB_REGNUM_R0 + 9];
140 1.1 briggs regs->tf_r10 = gdb_regs[KGDB_REGNUM_R0 + 10];
141 1.1 briggs regs->tf_r11 = gdb_regs[KGDB_REGNUM_R0 + 11];
142 1.1 briggs regs->tf_r12 = gdb_regs[KGDB_REGNUM_R0 + 12];
143 1.1 briggs regs->tf_svc_sp = gdb_regs[KGDB_REGNUM_R0 + 13];
144 1.1 briggs regs->tf_svc_lr = gdb_regs[KGDB_REGNUM_R0 + 14];
145 1.1 briggs regs->tf_pc = gdb_regs[KGDB_REGNUM_R0 + 15];
146 1.1 briggs
147 1.1 briggs regs->tf_spsr = gdb_regs[KGDB_REGNUM_SPSR];
148 1.1 briggs }
149 1.1 briggs
150 1.1 briggs /*
151 1.1 briggs * Trap into kgdb to wait for debugger to connect,
152 1.1 briggs * noting on the console why nothing else is going on.
153 1.1 briggs */
154 1.1 briggs void
155 1.1 briggs kgdb_connect(verbose)
156 1.1 briggs int verbose;
157 1.1 briggs {
158 1.1 briggs
159 1.1 briggs if (kgdb_dev < 0)
160 1.1 briggs return;
161 1.1 briggs
162 1.1 briggs if (verbose)
163 1.1 briggs printf("kgdb waiting...");
164 1.1 briggs
165 1.1 briggs asm volatile(KBPT_ASM);
166 1.1 briggs
167 1.1 briggs if (verbose)
168 1.1 briggs printf("connected.\n");
169 1.1 briggs
170 1.1 briggs kgdb_debug_panic = 1;
171 1.1 briggs }
172 1.1 briggs
173 1.1 briggs /*
174 1.1 briggs * Decide what to do on panic.
175 1.1 briggs * (This is called by panic, like Debugger())
176 1.1 briggs */
177 1.1 briggs void
178 1.1 briggs kgdb_panic()
179 1.1 briggs {
180 1.1 briggs
181 1.1 briggs if (kgdb_dev >= 0 && kgdb_debug_panic) {
182 1.1 briggs printf("entering kgdb\n");
183 1.1 briggs kgdb_connect(kgdb_active == 0);
184 1.1 briggs }
185 1.1 briggs }
186