xref: /netbsd-src/sys/arch/hppa/hppa/db_interface.c (revision 404fbe5fb94ca1e054339640cabb2801ce52dd30)
1 /*	$NetBSD: db_interface.c,v 1.16 2008/04/24 07:28:30 skrll Exp $	*/
2 
3 /*	$OpenBSD: db_interface.c,v 1.16 2001/03/22 23:31:45 mickey Exp $	*/
4 
5 /*
6  * Copyright (c) 1999-2000 Michael Shalayeff
7  * All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  * 3. All advertising materials mentioning features or use of this software
18  *    must display the following acknowledgement:
19  *      This product includes software developed by Michael Shalayeff.
20  * 4. The name of the author may not be used to endorse or promote products
21  *    derived from this software without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
24  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
25  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
26  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
27  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
28  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
29  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
30  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
31  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
32  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
33  */
34 
35 #include <sys/cdefs.h>
36 __KERNEL_RCSID(0, "$NetBSD: db_interface.c,v 1.16 2008/04/24 07:28:30 skrll Exp $");
37 
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/proc.h>
41 #include <sys/user.h>
42 
43 #include <machine/db_machdep.h>
44 #include <machine/frame.h>
45 #include <machine/cpufunc.h>
46 
47 #include <ddb/db_access.h>
48 #include <ddb/db_command.h>
49 #include <ddb/db_output.h>
50 #include <ddb/db_run.h>
51 #include <ddb/db_sym.h>
52 #include <ddb/db_variables.h>
53 #include <ddb/db_extern.h>
54 #include <ddb/db_interface.h>
55 #include <ddb/ddbvar.h>
56 
57 #include <dev/cons.h>
58 
59 void kdbprinttrap(int, int);
60 
61 extern label_t *db_recover;
62 extern int db_active;
63 extern char *trap_type[];
64 extern int trap_types;
65 
66 db_regs_t	ddb_regs;
67 const struct db_variable db_regs[] = {
68 	{ "flags", (long *)&ddb_regs.tf_flags,  FCN_NULL },
69 	{ "r1",    (long *)&ddb_regs.tf_r1,  FCN_NULL },
70 	{ "rp",    (long *)&ddb_regs.tf_rp,  FCN_NULL },
71 	{ "r3",    (long *)&ddb_regs.tf_r3,  FCN_NULL },
72 	{ "r4",    (long *)&ddb_regs.tf_r4,  FCN_NULL },
73 	{ "r5",    (long *)&ddb_regs.tf_r5,  FCN_NULL },
74 	{ "r6",    (long *)&ddb_regs.tf_r6,  FCN_NULL },
75 	{ "r7",    (long *)&ddb_regs.tf_r7,  FCN_NULL },
76 	{ "r8",    (long *)&ddb_regs.tf_r8,  FCN_NULL },
77 	{ "r9",    (long *)&ddb_regs.tf_r9,  FCN_NULL },
78 	{ "r10",   (long *)&ddb_regs.tf_r10, FCN_NULL },
79 	{ "r11",   (long *)&ddb_regs.tf_r11, FCN_NULL },
80 	{ "r12",   (long *)&ddb_regs.tf_r12, FCN_NULL },
81 	{ "r13",   (long *)&ddb_regs.tf_r13, FCN_NULL },
82 	{ "r14",   (long *)&ddb_regs.tf_r14, FCN_NULL },
83 	{ "r15",   (long *)&ddb_regs.tf_r15, FCN_NULL },
84 	{ "r16",   (long *)&ddb_regs.tf_r16, FCN_NULL },
85 	{ "r17",   (long *)&ddb_regs.tf_r17, FCN_NULL },
86 	{ "r18",   (long *)&ddb_regs.tf_r18, FCN_NULL },
87 	{ "t4",    (long *)&ddb_regs.tf_t4,  FCN_NULL },
88 	{ "t3",    (long *)&ddb_regs.tf_t3,  FCN_NULL },
89 	{ "t2",    (long *)&ddb_regs.tf_t2,  FCN_NULL },
90 	{ "t1",    (long *)&ddb_regs.tf_t1,  FCN_NULL },
91 	{ "arg3",  (long *)&ddb_regs.tf_arg3,  FCN_NULL },
92 	{ "arg2",  (long *)&ddb_regs.tf_arg2,  FCN_NULL },
93 	{ "arg1",  (long *)&ddb_regs.tf_arg1,  FCN_NULL },
94 	{ "arg0",  (long *)&ddb_regs.tf_arg0,  FCN_NULL },
95 	{ "dp",    (long *)&ddb_regs.tf_dp,    FCN_NULL },
96 	{ "ret0",  (long *)&ddb_regs.tf_ret0,  FCN_NULL },
97 	{ "ret1",  (long *)&ddb_regs.tf_ret1,  FCN_NULL },
98 	{ "sp",    (long *)&ddb_regs.tf_sp,    FCN_NULL },
99 	{ "r31",   (long *)&ddb_regs.tf_r31,   FCN_NULL },
100 	{ "sar",   (long *)&ddb_regs.tf_sar,   FCN_NULL },
101 
102 	{ "eirr",  (long *)&ddb_regs.tf_eirr,  FCN_NULL },
103 	{ "eiem",  (long *)&ddb_regs.tf_eiem,  FCN_NULL },
104 	{ "iir",   (long *)&ddb_regs.tf_iir,   FCN_NULL },
105 	{ "isr",   (long *)&ddb_regs.tf_isr,   FCN_NULL },
106 	{ "ior",   (long *)&ddb_regs.tf_ior,   FCN_NULL },
107 	{ "ipsw",  (long *)&ddb_regs.tf_ipsw,  FCN_NULL },
108 	{ "iisqh", (long *)&ddb_regs.tf_iisq_head,  FCN_NULL },
109 	{ "iioqh", (long *)&ddb_regs.tf_iioq_head,  FCN_NULL },
110 	{ "iisqt", (long *)&ddb_regs.tf_iisq_tail,  FCN_NULL },
111 	{ "iioqt", (long *)&ddb_regs.tf_iioq_tail,  FCN_NULL },
112 
113 	{ "sr0",   (long *)&ddb_regs.tf_sr0,   FCN_NULL },
114 	{ "sr1",   (long *)&ddb_regs.tf_sr1,   FCN_NULL },
115 	{ "sr2",   (long *)&ddb_regs.tf_sr2,   FCN_NULL },
116 	{ "sr3",   (long *)&ddb_regs.tf_sr3,   FCN_NULL },
117 	{ "sr4",   (long *)&ddb_regs.tf_sr4,   FCN_NULL },
118 	{ "sr5",   (long *)&ddb_regs.tf_sr5,   FCN_NULL },
119 	{ "sr6",   (long *)&ddb_regs.tf_sr6,   FCN_NULL },
120 	{ "sr7",   (long *)&ddb_regs.tf_sr7,   FCN_NULL },
121 
122 	{ "pidr1", (long *)&ddb_regs.tf_pidr1, FCN_NULL },
123 	{ "pidr2", (long *)&ddb_regs.tf_pidr2, FCN_NULL },
124 #ifdef pbably_not_worth_it
125 	{ "pidr3", (long *)&ddb_regs.tf_pidr3, FCN_NULL },
126 	{ "pidr4", (long *)&ddb_regs.tf_pidr4, FCN_NULL },
127 #endif
128 
129 	{ "hptm",  (long *)&ddb_regs.tf_hptm,  FCN_NULL },
130 	{ "vtop",  (long *)&ddb_regs.tf_vtop,  FCN_NULL },
131 	{ "cr28",  (long *)&ddb_regs.tf_cr28,  FCN_NULL },
132 	{ "cr30",  (long *)&ddb_regs.tf_cr30,  FCN_NULL },
133 };
134 const struct db_variable * const db_eregs = db_regs + sizeof(db_regs)/sizeof(db_regs[0]);
135 int db_active = 0;
136 
137 void
138 Debugger(void)
139 {
140 	__asm volatile ("break	%0, %1"
141 			  :: "i" (HPPA_BREAK_KERNEL), "i" (HPPA_BREAK_KGDB));
142 }
143 
144 /*
145  * Print trap reason.
146  */
147 void
148 kdbprinttrap(int type, int code)
149 {
150 	db_printf("kernel: ");
151 	if (type >= trap_types || type < 0)
152 		db_printf("type %d", type);
153 	else
154 		db_printf("%s", trap_type[type]);
155 	db_printf(" trap, code=%x\n", code);
156 }
157 
158 /*
159  *  kdb_trap - field a BPT trap
160  */
161 int
162 kdb_trap(int type, int code, db_regs_t *regs)
163 {
164 	int s;
165 
166 	switch (type) {
167 	case T_RECOVERY:
168 	case T_IBREAK:
169 	case T_DBREAK:
170 	case -1:
171 		break;
172 	default:
173 		if (!db_onpanic && db_recover == 0)
174 			return 0;
175 
176 		kdbprinttrap(type, code);
177 		if (db_recover != 0) {
178 			db_error("Caught exception in DDB; continuing...\n");
179 			/* NOT REACHED */
180 		}
181 	}
182 
183 	/* XXX Should switch to kdb`s own stack here. */
184 
185 	ddb_regs = *regs;
186 
187 	s = splhigh();
188 	db_active++;
189 	cnpollc(true);
190 	db_trap(type, code);
191 	cnpollc(false);
192 	db_active--;
193 	splx(s);
194 
195 	*regs = ddb_regs;
196 	return (1);
197 }
198 
199 /*
200  *  Validate an address for use as a breakpoint.
201  *  Any address is allowed for now.
202  */
203 int
204 db_valid_breakpoint(db_addr_t addr)
205 {
206 	return (1);
207 }
208