xref: /freebsd/sys/arm/arm/gdb_machdep.c (revision 19261079)
1 /*-
2  * SPDX-License-Identifier: BSD-2-Clause-FreeBSD
3  *
4  * Copyright (c) 2006 Olivier Houchard
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  *
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  */
28 
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31 
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/kdb.h>
35 #include <sys/kernel.h>
36 #include <sys/proc.h>
37 #include <sys/signal.h>
38 
39 #include <machine/gdb_machdep.h>
40 #include <machine/db_machdep.h>
41 #include <machine/vmparam.h>
42 #include <machine/pcb.h>
43 #include <machine/trap.h>
44 #include <machine/frame.h>
45 #include <machine/endian.h>
46 
47 #include <gdb/gdb.h>
48 
49 static register_t stacktest;
50 
51 void *
52 gdb_cpu_getreg(int regnum, size_t *regsz)
53 {
54 
55 	*regsz = gdb_cpu_regsz(regnum);
56 
57 	if (kdb_thread == curthread) {
58 		if (regnum < 13)
59 			return (&kdb_frame->tf_r0 + regnum);
60 		if (regnum == 13)
61 			return (&kdb_frame->tf_svc_sp);
62 		if (regnum == 14)
63 			return (&kdb_frame->tf_svc_lr);
64 		if (regnum == 15)
65 			return (&kdb_frame->tf_pc);
66 		if (regnum == 25)
67 			return (&kdb_frame->tf_spsr);
68 	}
69 
70 	switch (regnum) {
71 	case 4:  return (&kdb_thrctx->pcb_regs.sf_r4);
72 	case 5:  return (&kdb_thrctx->pcb_regs.sf_r5);
73 	case 6:  return (&kdb_thrctx->pcb_regs.sf_r6);
74 	case 7:  return (&kdb_thrctx->pcb_regs.sf_r7);
75 	case 8:  return (&kdb_thrctx->pcb_regs.sf_r8);
76 	case 9:  return (&kdb_thrctx->pcb_regs.sf_r9);
77 	case 10:  return (&kdb_thrctx->pcb_regs.sf_r10);
78 	case 11:  return (&kdb_thrctx->pcb_regs.sf_r11);
79 	case 12:  return (&kdb_thrctx->pcb_regs.sf_r12);
80 	case 13:  stacktest = kdb_thrctx->pcb_regs.sf_sp + 5 * 4;
81 		  return (&stacktest);
82 	case 15:
83 		  /*
84 		   * On context switch, the PC is not put in the PCB, but
85 		   * we can retrieve it from the stack.
86 		   */
87 		  if (kdb_thrctx->pcb_regs.sf_sp > KERNBASE) {
88 			  kdb_thrctx->pcb_regs.sf_pc = *(register_t *)
89 			      (kdb_thrctx->pcb_regs.sf_sp + 4 * 4);
90 			  return (&kdb_thrctx->pcb_regs.sf_pc);
91 		  }
92 	}
93 
94 	return (NULL);
95 }
96 
97 void
98 gdb_cpu_setreg(int regnum, void *val)
99 {
100 	if (kdb_thread != curthread)
101 		return;
102 
103 	switch (regnum) {
104 	case GDB_REG_PC:
105 		kdb_frame->tf_pc = *(register_t *)val;
106 		break;
107 	case GDB_REG_SP:
108 		kdb_frame->tf_svc_sp = *(register_t *)val;
109 		break;
110 	case GDB_REG_LR:
111 		kdb_frame->tf_svc_lr = *(register_t *)val;
112 		break;
113 	default:
114 		/* Write to the general purpose registers r0-r12. */
115 		if (regnum >= 0 && regnum <= 12) {
116 			*(&kdb_frame->tf_r0 + regnum) = *(register_t *)val;
117 		}
118 		break;
119 	}
120 }
121 
122 int
123 gdb_cpu_signal(int type, int code)
124 {
125 
126 	switch (type) {
127 	case T_BREAKPOINT: return (SIGTRAP);
128 	}
129 	return (SIGEMT);
130 }
131