]>
Commit | Line | Data |
---|---|---|
c906108c SS |
1 | /* Parameters for target machine AMD 29000, for GDB, the GNU debugger. |
2 | Copyright 1990, 1991, 1993, 1994 Free Software Foundation, Inc. | |
3 | Contributed by Cygnus Support. Written by Jim Kingdon. | |
4 | ||
c5aa993b | 5 | This file is part of GDB. |
c906108c | 6 | |
c5aa993b JM |
7 | This program is free software; you can redistribute it and/or modify |
8 | it under the terms of the GNU General Public License as published by | |
9 | the Free Software Foundation; either version 2 of the License, or | |
10 | (at your option) any later version. | |
c906108c | 11 | |
c5aa993b JM |
12 | This program is distributed in the hope that it will be useful, |
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 | GNU General Public License for more details. | |
c906108c | 16 | |
c5aa993b JM |
17 | You should have received a copy of the GNU General Public License |
18 | along with this program; if not, write to the Free Software | |
19 | Foundation, Inc., 59 Temple Place - Suite 330, | |
20 | Boston, MA 02111-1307, USA. */ | |
c906108c SS |
21 | |
22 | /* Parameters for an EB29K (a board which plugs into a PC and is | |
23 | accessed through EBMON software running on the PC, which we | |
24 | use as we'd use a remote stub (see remote-eb.c). | |
25 | ||
26 | If gdb is ported to other a29k machines/systems, the | |
27 | machine/system-specific parts should be removed from this file (a | |
28 | la tm-m68k.h). */ | |
29 | ||
30 | /* Byte order is configurable, but this machine runs big-endian. */ | |
31 | #define TARGET_BYTE_ORDER BIG_ENDIAN | |
32 | ||
33 | /* Floating point uses IEEE representations. */ | |
34 | #define IEEE_FLOAT | |
35 | ||
36 | /* Recognize our magic number. */ | |
37 | #define BADMAG(x) ((x).f_magic != 0572) | |
38 | ||
39 | /* Offset from address of function to start of its code. | |
40 | Zero on most machines. */ | |
41 | ||
42 | #define FUNCTION_START_OFFSET 0 | |
43 | ||
44 | /* Advance PC across any function entry prologue instructions | |
45 | to reach some "real" code. */ | |
46 | ||
b83266a0 SS |
47 | #define SKIP_PROLOGUE(pc) (a29k_skip_prologue (pc)) |
48 | CORE_ADDR a29k_skip_prologue (); | |
c906108c SS |
49 | |
50 | /* Immediately after a function call, return the saved pc. | |
51 | Can't go through the frames for this because on some machines | |
52 | the new frame is not set up until the new function executes | |
53 | some instructions. */ | |
54 | ||
55 | #define SAVED_PC_AFTER_CALL(frame) ((frame->flags & TRANSPARENT_FRAME) \ | |
56 | ? read_register (TPC_REGNUM) \ | |
57 | : read_register (LR0_REGNUM)) | |
58 | ||
59 | /* Stack grows downward. */ | |
60 | ||
61 | #define INNER_THAN(lhs,rhs) ((lhs) < (rhs)) | |
62 | ||
63 | /* Stack must be aligned on 32-bit boundaries when synthesizing | |
64 | function calls. */ | |
65 | ||
66 | #define STACK_ALIGN(ADDR) (((ADDR) + 3) & ~3) | |
67 | ||
68 | /* Sequence of bytes for breakpoint instruction. */ | |
69 | /* ASNEQ 0x50, gr1, gr1 | |
70 | The trap number 0x50 is chosen arbitrarily. | |
71 | We let the command line (or previously included files) override this | |
72 | setting. */ | |
73 | #ifndef BREAKPOINT | |
74 | #if TARGET_BYTE_ORDER == BIG_ENDIAN | |
75 | #define BREAKPOINT {0x72, 0x50, 0x01, 0x01} | |
76 | #else /* Target is little-endian. */ | |
77 | #define BREAKPOINT {0x01, 0x01, 0x50, 0x72} | |
78 | #endif /* Target is little-endian. */ | |
79 | #endif /* BREAKPOINT */ | |
80 | ||
81 | /* Amount PC must be decremented by after a breakpoint. | |
82 | This is often the number of bytes in BREAKPOINT | |
83 | but not always. */ | |
84 | ||
85 | #define DECR_PC_AFTER_BREAK 0 | |
86 | ||
87 | /* Say how long (ordinary) registers are. This is a piece of bogosity | |
88 | used in push_word and a few other places; REGISTER_RAW_SIZE is the | |
89 | real way to know how big a register is. */ | |
90 | ||
91 | #define REGISTER_SIZE 4 | |
92 | ||
93 | /* Allow the register declarations here to be overridden for remote | |
94 | kernel debugging. */ | |
95 | #if !defined (REGISTER_NAMES) | |
96 | ||
97 | /* Number of machine registers */ | |
98 | ||
99 | #define NUM_REGS 205 | |
100 | ||
101 | /* Initializer for an array of names of registers. | |
102 | There should be NUM_REGS strings in this initializer. | |
103 | ||
104 | FIXME, add floating point registers and support here. | |
105 | ||
106 | Also note that this list does not attempt to deal with kernel | |
107 | debugging (in which the first 32 registers are gr64-gr95). */ | |
108 | ||
109 | #define REGISTER_NAMES \ | |
110 | {"gr96", "gr97", "gr98", "gr99", "gr100", "gr101", "gr102", "gr103", "gr104", \ | |
111 | "gr105", "gr106", "gr107", "gr108", "gr109", "gr110", "gr111", "gr112", \ | |
112 | "gr113", "gr114", "gr115", "gr116", "gr117", "gr118", "gr119", "gr120", \ | |
113 | "gr121", "gr122", "gr123", "gr124", "gr125", "gr126", "gr127", \ | |
114 | "lr0", "lr1", "lr2", "lr3", "lr4", "lr5", "lr6", "lr7", "lr8", "lr9", \ | |
115 | "lr10", "lr11", "lr12", "lr13", "lr14", "lr15", "lr16", "lr17", "lr18", \ | |
116 | "lr19", "lr20", "lr21", "lr22", "lr23", "lr24", "lr25", "lr26", "lr27", \ | |
117 | "lr28", "lr29", "lr30", "lr31", "lr32", "lr33", "lr34", "lr35", "lr36", \ | |
118 | "lr37", "lr38", "lr39", "lr40", "lr41", "lr42", "lr43", "lr44", "lr45", \ | |
119 | "lr46", "lr47", "lr48", "lr49", "lr50", "lr51", "lr52", "lr53", "lr54", \ | |
120 | "lr55", "lr56", "lr57", "lr58", "lr59", "lr60", "lr61", "lr62", "lr63", \ | |
121 | "lr64", "lr65", "lr66", "lr67", "lr68", "lr69", "lr70", "lr71", "lr72", \ | |
122 | "lr73", "lr74", "lr75", "lr76", "lr77", "lr78", "lr79", "lr80", "lr81", \ | |
123 | "lr82", "lr83", "lr84", "lr85", "lr86", "lr87", "lr88", "lr89", "lr90", \ | |
124 | "lr91", "lr92", "lr93", "lr94", "lr95", "lr96", "lr97", "lr98", "lr99", \ | |
125 | "lr100", "lr101", "lr102", "lr103", "lr104", "lr105", "lr106", "lr107", \ | |
126 | "lr108", "lr109", "lr110", "lr111", "lr112", "lr113", "lr114", "lr115", \ | |
127 | "lr116", "lr117", "lr118", "lr119", "lr120", "lr121", "lr122", "lr123", \ | |
128 | "lr124", "lr125", "lr126", "lr127", \ | |
129 | "AI0", "AI1", "AI2", "AI3", "AI4", "AI5", "AI6", "AI7", "AI8", "AI9", \ | |
130 | "AI10", "AI11", "AI12", "AI13", "AI14", "AI15", "FP", \ | |
131 | "bp", "fc", "cr", "q", \ | |
132 | "vab", "ops", "cps", "cfg", "cha", "chd", "chc", "rbp", "tmc", "tmr", \ | |
133 | "pc0", "pc1", "pc2", "mmu", "lru", "fpe", "inte", "fps", "exo", "gr1", \ | |
134 | "alu", "ipc", "ipa", "ipb" } | |
135 | ||
136 | /* | |
137 | * Converts an sdb register number to an internal gdb register number. | |
138 | * Currently under epi, gr96->0...gr127->31...lr0->32...lr127->159, or... | |
c5aa993b | 139 | * gr64->0...gr95->31, lr0->32...lr127->159. |
c906108c SS |
140 | */ |
141 | #define SDB_REG_TO_REGNUM(value) \ | |
142 | (((value) >= 96 && (value) <= 127) ? ((value) - 96) : \ | |
143 | ((value) >= 128 && (value) <= 255) ? ((value) - 128 + LR0_REGNUM) : \ | |
144 | (value)) | |
145 | ||
146 | /* | |
147 | * Provide the processor register numbers of some registers that are | |
148 | * expected/written in instructions that might change under different | |
149 | * register sets. Namely, gcc can compile (-mkernel-registers) so that | |
150 | * it uses gr64-gr95 in stead of gr96-gr127. | |
151 | */ | |
c5aa993b JM |
152 | #define MSP_HW_REGNUM 125 /* gr125 */ |
153 | #define RAB_HW_REGNUM 126 /* gr126 */ | |
c906108c SS |
154 | |
155 | /* Convert Processor Special register #x to REGISTER_NAMES register # */ | |
156 | #define SR_REGNUM(x) \ | |
157 | ((x) < 15 ? VAB_REGNUM + (x) \ | |
158 | : (x) >= 128 && (x) < 131 ? IPC_REGNUM + (x) - 128 \ | |
159 | : (x) == 131 ? Q_REGNUM \ | |
160 | : (x) == 132 ? ALU_REGNUM \ | |
161 | : (x) >= 133 && (x) < 136 ? BP_REGNUM + (x) - 133 \ | |
162 | : (x) >= 160 && (x) < 163 ? FPE_REGNUM + (x) - 160 \ | |
163 | : (x) == 164 ? EXO_REGNUM \ | |
164 | : (error ("Internal error in SR_REGNUM"), 0)) | |
165 | #define GR96_REGNUM 0 | |
166 | ||
167 | /* Define the return register separately, so it can be overridden for | |
168 | kernel procedure calling conventions. */ | |
169 | #define RETURN_REGNUM GR96_REGNUM | |
170 | #define GR1_REGNUM 200 | |
171 | /* This needs to be the memory stack pointer, not the register stack pointer, | |
172 | to make call_function work right. */ | |
173 | #define SP_REGNUM MSP_REGNUM | |
c5aa993b | 174 | #define FP_REGNUM 33 /* lr1 */ |
c906108c SS |
175 | |
176 | /* Return register for transparent calling convention (gr122). */ | |
177 | #define TPC_REGNUM (122 - 96 + GR96_REGNUM) | |
178 | ||
179 | /* Large Return Pointer (gr123). */ | |
180 | #define LRP_REGNUM (123 - 96 + GR96_REGNUM) | |
181 | ||
182 | /* Static link pointer (gr124). */ | |
183 | #define SLP_REGNUM (124 - 96 + GR96_REGNUM) | |
184 | ||
185 | /* Memory Stack Pointer (gr125). */ | |
186 | #define MSP_REGNUM (125 - 96 + GR96_REGNUM) | |
187 | ||
188 | /* Register allocate bound (gr126). */ | |
189 | #define RAB_REGNUM (126 - 96 + GR96_REGNUM) | |
190 | ||
191 | /* Register Free Bound (gr127). */ | |
192 | #define RFB_REGNUM (127 - 96 + GR96_REGNUM) | |
193 | ||
194 | /* Register Stack Pointer. */ | |
195 | #define RSP_REGNUM GR1_REGNUM | |
196 | #define LR0_REGNUM 32 | |
197 | #define BP_REGNUM 177 | |
198 | #define FC_REGNUM 178 | |
199 | #define CR_REGNUM 179 | |
200 | #define Q_REGNUM 180 | |
201 | #define VAB_REGNUM 181 | |
202 | #define OPS_REGNUM (VAB_REGNUM + 1) | |
203 | #define CPS_REGNUM (VAB_REGNUM + 2) | |
204 | #define CFG_REGNUM (VAB_REGNUM + 3) | |
205 | #define CHA_REGNUM (VAB_REGNUM + 4) | |
206 | #define CHD_REGNUM (VAB_REGNUM + 5) | |
207 | #define CHC_REGNUM (VAB_REGNUM + 6) | |
208 | #define RBP_REGNUM (VAB_REGNUM + 7) | |
209 | #define TMC_REGNUM (VAB_REGNUM + 8) | |
210 | #define TMR_REGNUM (VAB_REGNUM + 9) | |
c5aa993b JM |
211 | #define NPC_REGNUM (VAB_REGNUM + 10) /* pc0 */ |
212 | #define PC_REGNUM (VAB_REGNUM + 11) /* pc1 */ | |
c906108c SS |
213 | #define PC2_REGNUM (VAB_REGNUM + 12) |
214 | #define MMU_REGNUM (VAB_REGNUM + 13) | |
215 | #define LRU_REGNUM (VAB_REGNUM + 14) | |
216 | #define FPE_REGNUM (VAB_REGNUM + 15) | |
217 | #define INTE_REGNUM (VAB_REGNUM + 16) | |
218 | #define FPS_REGNUM (VAB_REGNUM + 17) | |
219 | #define EXO_REGNUM (VAB_REGNUM + 18) | |
220 | /* gr1 is defined above as 200 = VAB_REGNUM + 19 */ | |
221 | #define ALU_REGNUM (VAB_REGNUM + 20) | |
222 | #define PS_REGNUM ALU_REGNUM | |
223 | #define IPC_REGNUM (VAB_REGNUM + 21) | |
224 | #define IPA_REGNUM (VAB_REGNUM + 22) | |
225 | #define IPB_REGNUM (VAB_REGNUM + 23) | |
226 | ||
c5aa993b | 227 | #endif /* !defined(REGISTER_NAMES) */ |
c906108c SS |
228 | |
229 | /* Total amount of space needed to store our copies of the machine's | |
230 | register state, the array `registers'. */ | |
231 | #define REGISTER_BYTES (NUM_REGS * 4) | |
232 | ||
233 | /* Index within `registers' of the first byte of the space for | |
234 | register N. */ | |
235 | #define REGISTER_BYTE(N) ((N)*4) | |
236 | ||
237 | /* Number of bytes of storage in the actual machine representation | |
238 | for register N. */ | |
239 | ||
240 | /* All regs are 4 bytes. */ | |
241 | ||
242 | #define REGISTER_RAW_SIZE(N) (4) | |
243 | ||
244 | /* Number of bytes of storage in the program's representation | |
245 | for register N. */ | |
246 | ||
247 | /* All regs are 4 bytes. */ | |
248 | ||
249 | #define REGISTER_VIRTUAL_SIZE(N) (4) | |
250 | ||
251 | /* Largest value REGISTER_RAW_SIZE can have. */ | |
252 | ||
253 | #define MAX_REGISTER_RAW_SIZE (4) | |
254 | ||
255 | /* Largest value REGISTER_VIRTUAL_SIZE can have. */ | |
256 | ||
257 | #define MAX_REGISTER_VIRTUAL_SIZE (4) | |
258 | ||
259 | /* Return the GDB type object for the "standard" data type | |
260 | of data in register N. */ | |
261 | ||
262 | #define REGISTER_VIRTUAL_TYPE(N) \ | |
263 | (((N) == PC_REGNUM || (N) == LRP_REGNUM || (N) == SLP_REGNUM \ | |
264 | || (N) == MSP_REGNUM || (N) == RAB_REGNUM || (N) == RFB_REGNUM \ | |
265 | || (N) == GR1_REGNUM || (N) == FP_REGNUM || (N) == LR0_REGNUM \ | |
266 | || (N) == NPC_REGNUM || (N) == PC2_REGNUM) \ | |
267 | ? lookup_pointer_type (builtin_type_void) : builtin_type_int) | |
268 | \f | |
269 | /* Store the address of the place in which to copy the structure the | |
270 | subroutine will return. This is called from call_function. */ | |
271 | /* On the a29k the LRP points to the part of the structure beyond the first | |
272 | 16 words. */ | |
273 | #define STORE_STRUCT_RETURN(ADDR, SP) \ | |
274 | write_register (LRP_REGNUM, (ADDR) + 16 * 4); | |
275 | ||
276 | /* Should call_function allocate stack space for a struct return? */ | |
277 | /* On the a29k objects over 16 words require the caller to allocate space. */ | |
278 | extern use_struct_convention_fn a29k_use_struct_convention; | |
279 | #define USE_STRUCT_CONVENTION(gcc_p, type) a29k_use_struct_convention (gcc_p, type) | |
280 | ||
281 | /* Extract from an array REGBUF containing the (raw) register state | |
282 | a function return value of type TYPE, and copy that, in virtual format, | |
283 | into VALBUF. */ | |
284 | ||
285 | #define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \ | |
286 | { \ | |
287 | int reg_length = TYPE_LENGTH (TYPE); \ | |
288 | if (reg_length > 16 * 4) \ | |
289 | { \ | |
290 | reg_length = 16 * 4; \ | |
291 | read_memory (*((int *)(REGBUF) + LRP_REGNUM), (VALBUF) + 16 * 4, \ | |
292 | TYPE_LENGTH (TYPE) - 16 * 4); \ | |
293 | } \ | |
294 | memcpy ((VALBUF), ((int *)(REGBUF))+RETURN_REGNUM, reg_length); \ | |
295 | } | |
296 | ||
297 | /* Write into appropriate registers a function return value | |
298 | of type TYPE, given in virtual format. */ | |
299 | ||
300 | #define STORE_RETURN_VALUE(TYPE,VALBUF) \ | |
301 | { \ | |
302 | int reg_length = TYPE_LENGTH (TYPE); \ | |
303 | if (reg_length > 16 * 4) \ | |
304 | { \ | |
305 | reg_length = 16 * 4; \ | |
306 | write_memory (read_register (LRP_REGNUM), \ | |
307 | (char *)(VALBUF) + 16 * 4, \ | |
308 | TYPE_LENGTH (TYPE) - 16 * 4); \ | |
309 | } \ | |
310 | write_register_bytes (REGISTER_BYTE (RETURN_REGNUM), (char *)(VALBUF), \ | |
311 | TYPE_LENGTH (TYPE)); \ | |
312 | } | |
c5aa993b | 313 | \f/* *INDENT-OFF* */ |
c906108c SS |
314 | /* The a29k user's guide documents well what the stacks look like. |
315 | But what isn't so clear there is how this interracts with the | |
316 | symbols, or with GDB. | |
317 | In the following saved_msp, saved memory stack pointer (which functions | |
318 | as a memory frame pointer), means either | |
319 | a register containing the memory frame pointer or, in the case of | |
320 | functions with fixed size memory frames (i.e. those who don't use | |
321 | alloca()), the result of the calculation msp + msize. | |
322 | ||
323 | LOC_ARG, LOC_LOCAL - For GCC, these are relative to saved_msp. | |
c5aa993b | 324 | For high C, these are relative to msp (making alloca impossible). |
c906108c | 325 | LOC_REGISTER, LOC_REGPARM - The register number is the number at the |
c5aa993b JM |
326 | time the function is running (after the prologue), or in the case |
327 | of LOC_REGPARM, may be a register number in the range 160-175. | |
c906108c SS |
328 | |
329 | The compilers do things like store an argument into memory, and then put out | |
330 | a LOC_ARG for it, or put it into global registers and put out a | |
331 | LOC_REGPARM. Thus is it important to execute the first line of | |
332 | code (i.e. the line of the open brace, i.e. the prologue) of a function | |
333 | before trying to print arguments or anything. | |
334 | ||
335 | The following diagram attempts to depict what is going on in memory | |
336 | (see also the _a29k user's guide_) and also how that interacts with | |
337 | GDB frames. We arbitrarily pick fci->frame to point the same place | |
338 | as the register stack pointer; since we set it ourself in | |
339 | INIT_EXTRA_FRAME_INFO, and access it only through the FRAME_* | |
340 | macros, it doesn't really matter exactly how we | |
341 | do it. However, note that FRAME_FP is used in two ways in GDB: | |
342 | (1) as a "magic cookie" which uniquely identifies frames (even over | |
343 | calls to the inferior), (2) (in PC_IN_CALL_DUMMY [ON_STACK]) | |
344 | as the value of SP_REGNUM before the dummy frame was pushed. These | |
345 | two meanings would be incompatible for the a29k if we defined | |
346 | CALL_DUMMY_LOCATION == ON_STACK (but we don't, so don't worry about it). | |
347 | Also note that "lr1" below, while called a frame pointer | |
348 | in the user's guide, has only one function: To determine whether | |
349 | registers need to be filled in the function epilogue. | |
350 | ||
351 | Consider the code: | |
c5aa993b JM |
352 | < call bar> |
353 | loc1: . . . | |
354 | bar: sub gr1,gr1,rsize_b | |
355 | . . . | |
356 | add mfp,msp,0 | |
357 | sub msp,msp,msize_b | |
358 | . . . | |
359 | < call foo > | |
360 | loc2: . . . | |
361 | foo: sub gr1,gr1,rsize_f | |
362 | . . . | |
363 | add mfp,msp,0 | |
364 | sub msp,msp,msize_f | |
365 | . . . | |
366 | loc3: < suppose the inferior stops here > | |
367 | ||
368 | memory stack register stack | |
369 | | | |____________| | |
370 | | | |____loc1____| | |
371 | +------->|___________| | | ^ | |
372 | | | ^ | | locals_b | | | |
373 | | | | | |____________| | | |
374 | | | | | | | | rsize_b | |
375 | | | | msize_b | | args_to_f | | | |
376 | | | | | |____________| | | |
377 | | | | | |____lr1_____| V | |
378 | | | V | |____loc2____|<----------------+ | |
379 | | +--->|___________|<---------mfp | ^ | | |
380 | | | | ^ | | locals_f | | | | |
381 | | | | | msize_f | |____________| | | | |
382 | | | | | | | | | rsize_f | | |
383 | | | | V | | args | | | | |
384 | | | |___________|<msp |____________| | | | |
385 | | | |_____lr1____| V | | |
386 | | | |___garbage__| <- gr1 <----+ | | |
387 | | | | | | |
388 | | | | | | |
389 | | | pc=loc3 | | | |
390 | | | | | | |
391 | | | | | | |
392 | | | frame cache | | | |
393 | | | |_________________| | | | |
394 | | | |rsize=rsize_b | | | | |
395 | | | |msize=msize_b | | | | |
396 | +---|--------saved_msp | | | | |
397 | | |frame------------------------------------|---+ | |
398 | | |pc=loc2 | | | |
399 | | |_________________| | | |
400 | | |rsize=rsize_f | | | |
401 | | |msize=msize_f | | | |
402 | +--------saved_msp | | | |
403 | |frame------------------------------------+ | |
404 | |pc=loc3 | | |
405 | |_________________| | |
c906108c SS |
406 | |
407 | So, is that sufficiently confusing? Welcome to the 29000. | |
408 | Notes: | |
409 | * The frame for foo uses a memory frame pointer but the frame for | |
c5aa993b JM |
410 | bar does not. In the latter case the saved_msp is |
411 | computed by adding msize to the saved_msp of the | |
412 | next frame. | |
c906108c | 413 | * msize is in the frame cache only for high C's sake. */ |
9846de1b | 414 | /* *INDENT-ON* */ |
c906108c | 415 | |
c5aa993b | 416 | |
c906108c SS |
417 | void read_register_stack (); |
418 | long read_register_stack_integer (); | |
419 | \f | |
c5aa993b | 420 | #define FRAME_INIT_SAVED_REGS(fi) /*no-op */ |
c906108c SS |
421 | |
422 | #define EXTRA_FRAME_INFO \ | |
423 | CORE_ADDR saved_msp; \ | |
424 | unsigned int rsize; \ | |
425 | unsigned int msize; \ | |
426 | unsigned char flags; | |
427 | ||
428 | /* Bits for flags in EXTRA_FRAME_INFO */ | |
429 | #define TRANSPARENT_FRAME 0x1 /* This is a transparent frame */ | |
430 | #define MFP_USED 0x2 /* A memory frame pointer is used */ | |
431 | ||
432 | /* Because INIT_FRAME_PC gets passed fromleaf, that's where we init | |
433 | not only ->pc and ->frame, but all the extra stuff, when called from | |
7a292a7a | 434 | get_prev_frame, that is. */ |
c906108c SS |
435 | #define INIT_EXTRA_FRAME_INFO(fromleaf, fci) init_extra_frame_info(fci) |
436 | void init_extra_frame_info (); | |
437 | ||
438 | #define INIT_FRAME_PC(fromleaf, fci) init_frame_pc(fromleaf, fci) | |
439 | void init_frame_pc (); | |
c906108c | 440 | \f |
c5aa993b | 441 | |
c906108c SS |
442 | /* FRAME_CHAIN takes a FRAME |
443 | and produces the frame's chain-pointer. | |
444 | ||
445 | However, if FRAME_CHAIN_VALID returns zero, | |
446 | it means the given frame is the outermost one and has no caller. */ | |
447 | ||
448 | /* On the a29k, the nominal address of a frame is the address on the | |
449 | register stack of the return address (the one next to the incoming | |
450 | arguments, not down at the bottom so nominal address == stack pointer). | |
451 | ||
452 | GDB expects "nominal address" to equal contents of FP_REGNUM, | |
453 | at least when it comes time to create the innermost frame. | |
454 | However, that doesn't work for us, so when creating the innermost | |
455 | frame we set ->frame ourselves in INIT_EXTRA_FRAME_INFO. */ | |
456 | ||
457 | /* These are mostly dummies for the a29k because INIT_FRAME_PC | |
458 | sets prev->frame instead. */ | |
459 | /* If rsize is zero, we must be at end of stack (or otherwise hosed). | |
460 | If we don't check rsize, we loop forever if we see rsize == 0. */ | |
461 | #define FRAME_CHAIN(thisframe) \ | |
462 | ((thisframe)->rsize == 0 \ | |
463 | ? 0 \ | |
464 | : (thisframe)->frame + (thisframe)->rsize) | |
465 | ||
466 | /* Determine if the frame has a 'previous' and back-traceable frame. */ | |
467 | #define FRAME_IS_UNCHAINED(frame) ((frame)->flags & TRANSPARENT_FRAME) | |
468 | ||
469 | /* Find the previous frame of a transparent routine. | |
470 | * For now lets not try and trace through a transparent routine (we might | |
471 | * have to assume that all transparent routines are traps). | |
472 | */ | |
473 | #define FIND_PREV_UNCHAINED_FRAME(frame) 0 | |
474 | ||
475 | /* Define other aspects of the stack frame. */ | |
476 | ||
392a587b JM |
477 | /* An expression that tells us whether the function invocation represented |
478 | by FI does not have a frame on the stack associated with it. */ | |
479 | #define FRAMELESS_FUNCTION_INVOCATION(FI) \ | |
480 | (frameless_look_for_prologue (FI)) | |
c906108c SS |
481 | |
482 | /* Saved pc (i.e. return address). */ | |
483 | #define FRAME_SAVED_PC(fraim) \ | |
484 | (read_register_stack_integer ((fraim)->frame + (fraim)->rsize, 4)) | |
485 | ||
486 | /* Local variables (i.e. LOC_LOCAL) are on the memory stack, with their | |
487 | offsets being relative to the memory stack pointer (high C) or | |
488 | saved_msp (gcc). */ | |
489 | ||
490 | #define FRAME_LOCALS_ADDRESS(fi) frame_locals_address (fi) | |
491 | extern CORE_ADDR frame_locals_address (); | |
492 | ||
493 | /* Return number of args passed to a frame. | |
494 | Can return -1, meaning no way to tell. */ | |
495 | /* We tried going to the effort of finding the tags word and getting | |
496 | the argcount field from it, to support debugging assembler code. | |
497 | Problem was, the "argcount" field never did hold the argument | |
498 | count. */ | |
392a587b | 499 | #define FRAME_NUM_ARGS(fi) (-1) |
c906108c SS |
500 | |
501 | #define FRAME_ARGS_ADDRESS(fi) FRAME_LOCALS_ADDRESS (fi) | |
502 | ||
503 | /* Return number of bytes at start of arglist that are not really args. */ | |
504 | ||
505 | #define FRAME_ARGS_SKIP 0 | |
506 | ||
507 | /* Provide our own get_saved_register. HAVE_REGISTER_WINDOWS is insufficient | |
508 | because registers get renumbered on the a29k without getting saved. */ | |
509 | ||
7a292a7a SS |
510 | #ifdef __STDC__ |
511 | enum lval_type; | |
512 | struct frame_info; | |
513 | #endif | |
c5aa993b | 514 | void a29k_get_saved_register PARAMS ((char *raw_buffer, int *optimized, CORE_ADDR * addrp, struct frame_info * frame, int regnum, enum lval_type * lvalp)); |
7a292a7a SS |
515 | #define GET_SAVED_REGISTER(raw_buffer, optimized, addrp, frame, regnum, lval) \ |
516 | a29k_get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lval) | |
c906108c SS |
517 | \f |
518 | /* Call function stuff. */ | |
9846de1b | 519 | /* *INDENT-OFF* */ |
c906108c SS |
520 | /* The dummy frame looks like this (see also the general frame picture |
521 | above): | |
522 | ||
523 | register stack | |
524 | ||
525 | | | frame for function | |
526 | | locals_sproc | executing at time | |
527 | |________________| of call_function. | |
528 | | | We must not disturb | |
529 | | args_out_sproc | it. | |
530 | memory stack |________________| | |
531 | |____lr1_sproc___|<-+ | |
532 | | | |__retaddr_sproc_| | <-- gr1 (at start) | |
533 | |____________|<-msp 0 <-----------mfp_dummy_____| | | |
534 | | | (at start) | save regs | | | |
535 | | arg_slop | | pc0,pc1 | | | |
536 | | | | pc2,lr0 sproc | | | |
537 | | (16 words) | | gr96-gr124 | | | |
538 | |____________|<-msp 1--after | sr160-sr162 | | | |
539 | | | PUSH_DUMMY_FRAME| sr128-sr135 | | | |
540 | | struct ret | |________________| | | |
541 | | 17+ | | | | | |
542 | |____________|<- lrp | args_out_dummy | | | |
543 | | struct ret | | (16 words) | | | |
544 | | 16 | |________________| | | |
545 | | (16 words) | |____lr1_dummy___|--+ | |
546 | |____________|<- msp 2--after |_retaddr_dummy__|<- gr1 after | |
547 | | | struct ret | | PUSH_DUMMY_FRAME | |
548 | | margs17+ | area allocated | locals_inf | | |
549 | | | |________________| called | |
550 | |____________|<- msp 4--when | | function's | |
551 | | | inf called | args_out_inf | frame (set up | |
552 | | margs16 | |________________| by called | |
553 | | (16 words) | |_____lr1_inf____| function). | |
554 | |____________|<- msp 3--after | . | | |
555 | | | args pushed | . | | |
556 | | | | . | | |
557 | | | | |
558 | ||
559 | arg_slop: This area is so that when the call dummy adds 16 words to | |
560 | the msp, it won't end up larger than mfp_dummy (it is needed in the | |
561 | case where margs and struct_ret do not add up to at least 16 words). | |
562 | struct ret: This area is allocated by GDB if the return value is more | |
563 | than 16 words. struct ret_16 is not used on the a29k. | |
564 | margs: Pushed by GDB. The call dummy copies the first 16 words to | |
565 | args_out_dummy. | |
566 | retaddr_sproc: Contains the PC at the time we call the function. | |
567 | set by PUSH_DUMMY_FRAME and read by POP_FRAME. | |
568 | retaddr_dummy: This points to a breakpoint instruction in the dummy. */ | |
9846de1b | 569 | /* *INDENT-ON* */ |
c906108c | 570 | \f |
c5aa993b JM |
571 | |
572 | ||
c906108c SS |
573 | /* Rsize for dummy frame, in bytes. */ |
574 | ||
575 | /* Bytes for outgoing args, lr1, and retaddr. */ | |
576 | #define DUMMY_ARG (2 * 4 + 16 * 4) | |
577 | ||
578 | /* Number of special registers (sr128-) to save. */ | |
579 | #define DUMMY_SAVE_SR128 8 | |
580 | /* Number of special registers (sr160-) to save. */ | |
581 | #define DUMMY_SAVE_SR160 3 | |
582 | /* Number of general (gr96- or gr64-) registers to save. */ | |
583 | #define DUMMY_SAVE_GREGS 29 | |
584 | ||
585 | #define DUMMY_FRAME_RSIZE \ | |
586 | (4 /* mfp_dummy */ \ | |
587 | + 4 * 4 /* pc0, pc1, pc2, lr0 */ \ | |
588 | + DUMMY_SAVE_GREGS * 4 \ | |
589 | + DUMMY_SAVE_SR160 * 4 \ | |
590 | + DUMMY_SAVE_SR128 * 4 \ | |
591 | + DUMMY_ARG \ | |
592 | + 4 /* pad to doubleword */ ) | |
593 | ||
594 | /* Push an empty stack frame, to record the current PC, etc. */ | |
595 | ||
596 | #define PUSH_DUMMY_FRAME push_dummy_frame() | |
597 | extern void push_dummy_frame (); | |
598 | ||
599 | /* Discard from the stack the innermost frame, | |
600 | restoring all saved registers. */ | |
601 | ||
602 | #define POP_FRAME pop_frame() | |
603 | extern void pop_frame (); | |
604 | ||
605 | /* This sequence of words is the instructions | |
606 | mtsrim cr, 15 | |
607 | loadm 0, 0, lr2, msp ; load first 16 words of arguments into registers | |
608 | add msp, msp, 16 * 4 ; point to the remaining arguments | |
c5aa993b JM |
609 | CONST_INSN: |
610 | const lr0,inf ; (replaced by half of target addr) | |
611 | consth lr0,inf ; (replaced by other half of target addr) | |
c906108c SS |
612 | calli lr0, lr0 |
613 | aseq 0x40,gr1,gr1 ; nop | |
c5aa993b JM |
614 | BREAKPT_INSN: |
615 | asneq 0x50,gr1,gr1 ; breakpoint (replaced by local breakpoint insn) | |
616 | */ | |
c906108c SS |
617 | |
618 | #if TARGET_BYTE_ORDER == HOST_BYTE_ORDER | |
619 | #define BS(const) const | |
620 | #else | |
621 | #define BS(const) (((const) & 0xff) << 24) | \ | |
622 | (((const) & 0xff00) << 8) | \ | |
623 | (((const) & 0xff0000) >> 8) | \ | |
624 | (((const) & 0xff000000) >> 24) | |
625 | #endif | |
626 | ||
627 | /* Position of the "const" and blkt instructions within CALL_DUMMY in bytes. */ | |
628 | #define CONST_INSN (3 * 4) | |
629 | #define BREAKPT_INSN (7 * 4) | |
630 | #define CALL_DUMMY { \ | |
631 | BS(0x0400870f),\ | |
632 | BS(0x36008200|(MSP_HW_REGNUM)), \ | |
633 | BS(0x15000040|(MSP_HW_REGNUM<<8)|(MSP_HW_REGNUM<<16)), \ | |
634 | BS(0x03ff80ff), \ | |
635 | BS(0x02ff80ff), \ | |
636 | BS(0xc8008080), \ | |
637 | BS(0x70400101), \ | |
638 | BS(0x72500101)} | |
639 | #define CALL_DUMMY_LENGTH (8 * 4) | |
640 | ||
c5aa993b | 641 | #define CALL_DUMMY_START_OFFSET 0 /* Start execution at beginning of dummy */ |
c906108c SS |
642 | |
643 | /* Helper macro for FIX_CALL_DUMMY. WORDP is a long * which points to a | |
644 | word in target byte order; bits 0-7 and 16-23 of *WORDP are replaced with | |
645 | bits 0-7 and 8-15 of DATA (which is in host byte order). */ | |
646 | ||
647 | #if TARGET_BYTE_ORDER == BIG_ENDIAN | |
648 | #define STUFF_I16(WORDP, DATA) \ | |
649 | { \ | |
650 | *((char *)(WORDP) + 3) = ((DATA) & 0xff);\ | |
651 | *((char *)(WORDP) + 1) = (((DATA) >> 8) & 0xff);\ | |
652 | } | |
653 | #else /* Target is little endian. */ | |
654 | #define STUFF_I16(WORDP, DATA) \ | |
655 | { | |
c5aa993b JM |
656 | *(char *) (WORDP) = ((DATA) & 0xff); |
657 | *((char *) (WORDP) + 2) = (((DATA) >> 8) & 0xff); | |
658 | } | |
c906108c SS |
659 | #endif /* Target is little endian. */ |
660 | ||
661 | /* Insert the specified number of args and function address | |
662 | into a call sequence of the above form stored at DUMMYNAME. */ | |
663 | ||
664 | /* Currently this stuffs in the address of the function that we are calling. | |
665 | Since different a29k systems use different breakpoint instructions, it | |
666 | also stuffs BREAKPOINT in the right place (to avoid having to | |
667 | duplicate CALL_DUMMY in each tm-*.h file). */ | |
668 | ||
669 | #define FIX_CALL_DUMMY(dummyname, pc, fun, nargs, args, type, gcc_p) \ | |
670 | {\ | |
671 | STUFF_I16((char *)dummyname + CONST_INSN, fun); \ | |
672 | STUFF_I16((char *)dummyname + CONST_INSN + 4, fun >> 16); \ | |
673 | /* FIXME memcpy ((char *)(dummyname) + BREAKPT_INSN, break_insn, 4); */ \ | |
674 | } | |
675 | ||
676 | /* a29k architecture has separate data & instruction memories -- wired to | |
677 | different pins on the chip -- and can't execute the data memory. | |
678 | Also, there should be space after text_end; | |
679 | we won't get a SIGSEGV or scribble on data space. */ | |
680 | ||
681 | #define CALL_DUMMY_LOCATION AFTER_TEXT_END | |
682 | ||
683 | /* Because of this, we need (as a kludge) to know the addresses of the | |
684 | text section. */ | |
685 | ||
686 | #define NEED_TEXT_START_END 1 | |
687 | ||
688 | /* How to translate register numbers in the .stab's into gdb's internal register | |
689 | numbers. We don't translate them, but we warn if an invalid register | |
690 | number is seen. Note that FIXME, we use the value "sym" as an implicit | |
691 | argument in printing the error message. It happens to be available where | |
692 | this macro is used. (This macro definition appeared in a late revision | |
693 | of gdb-3.91.6 and is not well tested. Also, it should be a "complaint".) */ | |
694 | ||
695 | #define STAB_REG_TO_REGNUM(num) \ | |
696 | (((num) > LR0_REGNUM + 127) \ | |
697 | ? fprintf(stderr, \ | |
698 | "Invalid register number %d in symbol table entry for %s\n", \ | |
699 | (num), SYMBOL_SOURCE_NAME (sym)), (num) \ | |
700 | : (num)) | |
701 | ||
c5aa993b JM |
702 | extern enum a29k_processor_types |
703 | { | |
c906108c SS |
704 | a29k_unknown, |
705 | ||
706 | /* Bit 0x400 of the CPS does *not* identify freeze mode, i.e. 29000, | |
707 | 29030, etc. */ | |
708 | a29k_no_freeze_mode, | |
709 | ||
710 | /* Bit 0x400 of the CPS does identify freeze mode, i.e. 29050. */ | |
711 | a29k_freeze_mode | |
c5aa993b JM |
712 | } |
713 | processor_type; | |
c906108c SS |
714 | |
715 | /* We need three arguments for a general frame specification for the | |
716 | "frame" or "info frame" command. */ | |
717 | ||
718 | #define SETUP_ARBITRARY_FRAME(argc, argv) setup_arbitrary_frame (argc, argv) | |
719 | extern struct frame_info *setup_arbitrary_frame PARAMS ((int, CORE_ADDR *)); |