db_interface.c revision 1.58 1 /* $NetBSD: db_interface.c,v 1.58 2018/05/28 21:05:00 chs Exp $ */
2
3 /*
4 * Copyright (c) 1996 Scott K. Stevens
5 *
6 * Mach Operating System
7 * Copyright (c) 1991,1990 Carnegie Mellon University
8 * All Rights Reserved.
9 *
10 * Permission to use, copy, modify and distribute this software and its
11 * documentation is hereby granted, provided that both the copyright
12 * notice and this permission notice appear in all copies of the
13 * software, derivative works or modified versions, and any portions
14 * thereof, and that both notices appear in supporting documentation.
15 *
16 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
17 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND FOR
18 * ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
19 *
20 * Carnegie Mellon requests users of this software to return to
21 *
22 * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU
23 * School of Computer Science
24 * Carnegie Mellon University
25 * Pittsburgh PA 15213-3890
26 *
27 * any improvements or extensions that they make and grant Carnegie the
28 * rights to redistribute these changes.
29 *
30 * From: db_interface.c,v 2.4 1991/02/05 17:11:13 mrt (CMU)
31 */
32
33 /*
34 * Interface to new debugger.
35 */
36
37 #include <sys/cdefs.h>
38 __KERNEL_RCSID(0, "$NetBSD: db_interface.c,v 1.58 2018/05/28 21:05:00 chs Exp $");
39
40 #include "opt_ddb.h"
41 #include "opt_kgdb.h"
42 #include "opt_multiprocessor.h"
43
44 #include <sys/param.h>
45 #include <sys/proc.h>
46 #include <sys/reboot.h>
47 #include <sys/systm.h> /* just for boothowto */
48 #include <sys/exec.h>
49 #include <sys/atomic.h>
50 #include <sys/intr.h>
51
52 #include <uvm/uvm_extern.h>
53
54 #include <arm/arm32/db_machdep.h>
55 #include <arm/undefined.h>
56 #include <ddb/db_access.h>
57 #include <ddb/db_command.h>
58 #include <ddb/db_output.h>
59 #include <ddb/db_variables.h>
60 #include <ddb/db_sym.h>
61 #include <ddb/db_extern.h>
62 #include <ddb/db_interface.h>
63 #include <dev/cons.h>
64
65 #if defined(KGDB) || !defined(DDB)
66 #define db_printf printf
67 #endif
68
69 u_int db_fetch_reg(int, db_regs_t *);
70
71 int db_trapper(u_int, u_int, trapframe_t *, int);
72
73 int db_active = 0;
74 db_regs_t ddb_regs; /* register state */
75 db_regs_t *ddb_regp;
76
77 #ifdef MULTIPROCESSOR
78 volatile struct cpu_info *db_onproc;
79 volatile struct cpu_info *db_newcpu;
80 #endif
81
82
83
84
85 #ifdef DDB
86 /*
87 * kdb_trap - field a TRACE or BPT trap
88 */
89 int
90 kdb_trap(int type, db_regs_t *regs)
91 {
92 struct cpu_info * const ci = curcpu();
93 db_regs_t dbreg;
94 int s;
95
96 switch (type) {
97 case T_BREAKPOINT: /* breakpoint */
98 case -1: /* keyboard interrupt */
99 break;
100 #ifdef MULTIPROCESSOR
101 case -2:
102 /*
103 * We called to enter ddb from another process but by the time
104 * we got here, no one was in ddb. So ignore the request.
105 */
106 if (db_onproc == NULL)
107 return 1;
108 break;
109 #endif
110 default:
111 if (db_recover != 0) {
112 /* This will longjmp back into db_command_loop() */
113 db_error("Faulted in DDB; continuing...\n");
114 /*NOTREACHED*/
115 }
116 }
117
118 /* Should switch to kdb`s own stack here. */
119
120 #ifdef MULTIPROCESSOR
121 const bool is_mp_p = ncpu > 1;
122 if (is_mp_p) {
123 /*
124 * Try to take ownership of DDB. If we do, tell all other
125 * CPUs to enter DDB too.
126 */
127 if (atomic_cas_ptr(&db_onproc, NULL, ci) == NULL) {
128 intr_ipi_send(NULL, IPI_DDB);
129 }
130 }
131 for (;;) {
132 if (is_mp_p) {
133 /*
134 * While we aren't the master, wait until the master
135 * gives control to us or exits. If it exited, we
136 * just exit too. Otherwise this cpu will enter DDB.
137 */
138 membar_consumer();
139 while (db_onproc != ci) {
140 if (db_onproc == NULL)
141 return 1;
142 #ifdef _ARM_ARCH_6
143 __asm __volatile("wfe");
144 membar_consumer();
145 #endif
146 if (db_onproc == ci) {
147 printf("%s: switching to %s\n",
148 __func__, ci->ci_cpuname);
149 }
150 }
151 }
152 #endif
153
154 s = splhigh();
155 ci->ci_ddb_regs = &dbreg;
156 ddb_regp = &dbreg;
157 ddb_regs = *regs;
158
159 atomic_inc_32(&db_active);
160 cnpollc(true);
161 db_trap(type, 0/*code*/);
162 cnpollc(false);
163 atomic_dec_32(&db_active);
164
165 ci->ci_ddb_regs = NULL;
166 ddb_regp = &dbreg;
167 *regs = ddb_regs;
168 splx(s);
169
170 #ifdef MULTIPROCESSOR
171 if (is_mp_p && db_newcpu != NULL) {
172 db_onproc = db_newcpu;
173 db_newcpu = NULL;
174 #ifdef _ARM_ARCH_6
175 membar_producer();
176 __asm __volatile("sev; sev");
177 #endif
178 continue;
179 }
180 break;
181 }
182
183 if (is_mp_p) {
184 /*
185 * We are exiting DDB so there is noone onproc. Tell
186 * the other CPUs to exit.
187 */
188 db_onproc = NULL;
189 #ifdef _ARM_ARCH_6
190 __asm __volatile("sev; sev");
191 #endif
192 }
193 #endif
194
195 return 1;
196 }
197 #endif
198
199 int
200 db_validate_address(vaddr_t addr)
201 {
202 struct proc *p = curproc;
203 struct pmap *pmap;
204
205 if (!p || !p->p_vmspace || !p->p_vmspace->vm_map.pmap ||
206 addr >= VM_MIN_KERNEL_ADDRESS
207 )
208 pmap = pmap_kernel();
209 else
210 pmap = p->p_vmspace->vm_map.pmap;
211
212 return (pmap_extract(pmap, addr, NULL) == false);
213 }
214
215 /*
216 * Read bytes from kernel address space for debugger.
217 */
218 void
219 db_read_bytes(vaddr_t addr, size_t size, char *data)
220 {
221 char *src = (char *)addr;
222
223 if (db_validate_address((u_int)src)) {
224 db_printf("address %p is invalid\n", src);
225 return;
226 }
227
228 if (size == 4 && (addr & 3) == 0 && ((uintptr_t)data & 3) == 0) {
229 *((int*)data) = *((int*)src);
230 return;
231 }
232
233 if (size == 2 && (addr & 1) == 0 && ((uintptr_t)data & 1) == 0) {
234 *((short*)data) = *((short*)src);
235 return;
236 }
237
238 while (size-- > 0) {
239 if (db_validate_address((u_int)src)) {
240 db_printf("address %p is invalid\n", src);
241 return;
242 }
243 *data++ = *src++;
244 }
245 }
246
247 static void
248 db_write_text(vaddr_t addr, size_t size, const char *data)
249 {
250
251 ktext_write((void *)addr, data, size);
252 }
253
254 /*
255 * Write bytes to kernel address space for debugger.
256 */
257 void
258 db_write_bytes(vaddr_t addr, size_t size, const char *data)
259 {
260 extern char kernel_text[];
261 extern char etext[];
262 char *dst;
263 size_t loop;
264
265 /* If any part is in kernel text, use db_write_text() */
266 if (addr >= (vaddr_t) kernel_text && addr < (vaddr_t) etext) {
267 db_write_text(addr, size, data);
268 return;
269 }
270
271 dst = (char *)addr;
272 if (db_validate_address((u_int)dst)) {
273 db_printf("address %p is invalid\n", dst);
274 return;
275 }
276
277 if (size == 4 && (addr & 3) == 0 && ((uintptr_t)data & 3) == 0)
278 *((int*)dst) = *((const int *)data);
279 else
280 if (size == 2 && (addr & 1) == 0 && ((uintptr_t)data & 1) == 0)
281 *((short*)dst) = *((const short *)data);
282 else {
283 loop = size;
284 while (loop-- > 0) {
285 if (db_validate_address((u_int)dst)) {
286 db_printf("address %p is invalid\n", dst);
287 return;
288 }
289 *dst++ = *data++;
290 }
291 }
292
293 /* make sure the caches and memory are in sync */
294 cpu_icache_sync_range(addr, size);
295
296 /* In case the current page tables have been modified ... */
297 cpu_tlb_flushID();
298 cpu_cpwait();
299 }
300
301 #ifdef DDB
302 void
303 cpu_Debugger(void)
304 {
305 __asm(".word 0xe7ffffff");
306 }
307
308 int
309 db_trapper(u_int addr, u_int inst, trapframe_t *frame, int fault_code)
310 {
311
312 if (fault_code == 0) {
313 if ((inst & ~INSN_COND_MASK) == (BKPT_INST & ~INSN_COND_MASK))
314 kdb_trap(T_BREAKPOINT, frame);
315 else
316 kdb_trap(-1, frame);
317 } else
318 return 1;
319 return 0;
320 }
321
322 extern u_int esym;
323 extern u_int end;
324
325 static struct undefined_handler db_uh;
326
327 void
328 db_machine_init(void)
329 {
330
331 /*
332 * We get called before malloc() is available, so supply a static
333 * struct undefined_handler.
334 */
335 db_uh.uh_handler = db_trapper;
336 install_coproc_handler_static(CORE_UNKNOWN_HANDLER, &db_uh);
337 }
338 #endif
339
340 u_int
341 db_fetch_reg(int reg, db_regs_t *regs)
342 {
343
344 switch (reg) {
345 case 0:
346 return regs->tf_r0;
347 case 1:
348 return regs->tf_r1;
349 case 2:
350 return regs->tf_r2;
351 case 3:
352 return regs->tf_r3;
353 case 4:
354 return regs->tf_r4;
355 case 5:
356 return regs->tf_r5;
357 case 6:
358 return regs->tf_r6;
359 case 7:
360 return regs->tf_r7;
361 case 8:
362 return regs->tf_r8;
363 case 9:
364 return regs->tf_r9;
365 case 10:
366 return regs->tf_r10;
367 case 11:
368 return regs->tf_r11;
369 case 12:
370 return regs->tf_r12;
371 case 13:
372 return regs->tf_svc_sp;
373 case 14:
374 return regs->tf_svc_lr;
375 case 15:
376 return regs->tf_pc;
377 default:
378 panic("db_fetch_reg: botch");
379 }
380 }
381
382 u_int
383 branch_taken(u_int insn, u_int pc, db_regs_t *regs)
384 {
385 u_int addr, nregs;
386
387 switch ((insn >> 24) & 0xf) {
388 case 0xa: /* b ... */
389 case 0xb: /* bl ... */
390 addr = ((insn << 2) & 0x03ffffff);
391 if (addr & 0x02000000)
392 addr |= 0xfc000000;
393 return pc + 8 + addr;
394 case 0x7: /* ldr pc, [pc, reg, lsl #2] */
395 addr = db_fetch_reg(insn & 0xf, regs);
396 addr = pc + 8 + (addr << 2);
397 db_read_bytes(addr, 4, (char *)&addr);
398 return addr;
399 case 0x5: /* ldr pc, [reg] */
400 addr = db_fetch_reg((insn >> 16) & 0xf, regs);
401 db_read_bytes(addr, 4, (char *)&addr);
402 return addr;
403 case 0x1: /* mov pc, reg */
404 addr = db_fetch_reg(insn & 0xf, regs);
405 return addr;
406 case 0x8: /* ldmxx reg, {..., pc} */
407 case 0x9:
408 addr = db_fetch_reg((insn >> 16) & 0xf, regs);
409 nregs = (insn & 0x5555) + ((insn >> 1) & 0x5555);
410 nregs = (nregs & 0x3333) + ((nregs >> 2) & 0x3333);
411 nregs = (nregs + (nregs >> 4)) & 0x0f0f;
412 nregs = (nregs + (nregs >> 8)) & 0x001f;
413 switch ((insn >> 23) & 0x3) {
414 case 0x0: /* ldmda */
415 addr = addr - 0;
416 break;
417 case 0x1: /* ldmia */
418 addr = addr + 0 + ((nregs - 1) << 2);
419 break;
420 case 0x2: /* ldmdb */
421 addr = addr - 4;
422 break;
423 case 0x3: /* ldmib */
424 addr = addr + 4 + ((nregs - 1) << 2);
425 break;
426 }
427 db_read_bytes(addr, 4, (char *)&addr);
428 return addr;
429 default:
430 panic("branch_taken: botch");
431 }
432 }
433