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