1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
|
/* Definitions to make GDB hosted on a tahoe running 4.3-Reno
Copyright (C) 1986, 1987, 1989, 1991 Free Software Foundation, Inc.
This file is part of GDB.
GDB is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 1, or (at your option)
any later version.
GDB is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GDB; see the file COPYING. If not, write to
the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
/*
* Ported by the State University of New York at Buffalo by the Distributed
* Computer Systems Lab, Department of Computer Science, 1991.
*/
/* Get rid of any system-imposed stack limit if possible. */
#define SET_STACK_LIMIT_HUGE
#define REGISTER_U_ADDR(addr, blockend, regno) \
{ addr = blockend - 100 + regno * 4; \
if (regno == PC_REGNUM) addr = blockend - 8; \
if (regno == PS_REGNUM) addr = blockend - 4; \
if (regno == FP_REGNUM) addr = blockend - 40; \
if (regno == SP_REGNUM) addr = blockend - 36; \
if (regno == AL_REGNUM) addr = blockend - 20; \
if (regno == AH_REGNUM) addr = blockend - 24;}
/* Interface definitions for kernel debugger KDB. */
/* Map machine fault codes into signal numbers.
First subtract 0, divide by 4, then index in a table.
Faults for which the entry in this table is 0
are not handled by KDB; the program's own trap handler
gets to handle then. */
#define FAULT_CODE_ORIGIN 0
#define FAULT_CODE_UNITS 4
#define FAULT_TABLE \
{ 0, SIGKILL, SIGSEGV, 0, 0, 0, 0, 0, \
0, 0, SIGTRAP, SIGTRAP, 0, 0, 0, 0, \
0, 0, 0, 0, 0, 0, 0, 0}
/* Start running with a stack stretching from BEG to END.
BEG and END should be symbols meaningful to the assembler.
This is used only for kdb. */
#define INIT_STACK(beg, end) \
{ asm (".globl end"); \
asm ("movl $ end, sp"); \
asm ("clrl fp"); }
/* Push the frame pointer register on the stack. */
#define PUSH_FRAME_PTR \
asm ("pushl fp");
/* Copy the top-of-stack to the frame pointer register. */
#define POP_FRAME_PTR \
asm ("movl (sp), fp");
/* After KDB is entered by a fault, push all registers
that GDB thinks about (all NUM_REGS of them),
so that they appear in order of ascending GDB register number.
The fault code will be on the stack beyond the last register. */
#define PUSH_REGISTERS \
{ asm ("pushl 8(sp)"); \
asm ("pushl 8(sp)"); \
asm ("pushal 0x41(sp)"); \
asm ("pushl r0" ); \
asm ("pushl r1" ); \
asm ("pushl r2" ); \
asm ("pushl r3" ); \
asm ("pushl r4" ); \
asm ("pushl r5" ); \
asm ("pushl r6" ); \
asm ("pushl r7" ); \
asm ("pushl r8" ); \
asm ("pushl r9" ); \
asm ("pushl r10" ); \
asm ("pushl r11" ); \
asm ("pushl r12" ); \
asm ("pushl fp" ); \
asm ("pushl sp" ); \
asm ("pushl pc" ); \
asm ("pushl ps" ); \
asm ("pushl aclo" ); \
asm ("pushl achi" ); \
}
/* Assuming the registers (including processor status) have been
pushed on the stack in order of ascending GDB register number,
restore them and return to the address in the saved PC register. */
#define POP_REGISTERS \
{ \
asm ("movl (sp)+, achi"); \
asm ("movl (sp)+, aclo"); \
asm ("movl (sp)+, ps"); \
asm ("movl (sp)+, pc"); \
asm ("movl (sp)+, sp"); \
asm ("movl (sp)+, fp"); \
asm ("movl (sp)+, r12"); \
asm ("movl (sp)+, r11"); \
asm ("movl (sp)+, r10"); \
asm ("movl (sp)+, r9"); \
asm ("movl (sp)+, r8"); \
asm ("movl (sp)+, r7"); \
asm ("movl (sp)+, r6"); \
asm ("movl (sp)+, r5"); \
asm ("movl (sp)+, r4"); \
asm ("movl (sp)+, r3"); \
asm ("movl (sp)+, r2"); \
asm ("movl (sp)+, r1"); \
asm ("movl (sp)+, r0"); \
asm ("subl2 $8,(sp)"); \
asm ("movl (sp),sp"); \
asm ("rei"); }
|