blob: c296f5952ec84aa02260d6c3a0b534ee94e74271 [file] [log] [blame]
/* OBSOLETE /* Parameters for target machine AMD 29000, for GDB, the GNU debugger. */
/* OBSOLETE Copyright 1990, 1991, 1993, 1994, 1995, 1996, 1998, 1999, 2000, */
/* OBSOLETE 2001 Free Software Foundation, Inc. */
/* OBSOLETE Contributed by Cygnus Support. Written by Jim Kingdon. */
/* OBSOLETE */
/* OBSOLETE This file is part of GDB. */
/* OBSOLETE */
/* OBSOLETE This program is free software; you can redistribute it and/or modify */
/* OBSOLETE it under the terms of the GNU General Public License as published by */
/* OBSOLETE the Free Software Foundation; either version 2 of the License, or */
/* OBSOLETE (at your option) any later version. */
/* OBSOLETE */
/* OBSOLETE This program is distributed in the hope that it will be useful, */
/* OBSOLETE but WITHOUT ANY WARRANTY; without even the implied warranty of */
/* OBSOLETE MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the */
/* OBSOLETE GNU General Public License for more details. */
/* OBSOLETE */
/* OBSOLETE You should have received a copy of the GNU General Public License */
/* OBSOLETE along with this program; if not, write to the Free Software */
/* OBSOLETE Foundation, Inc., 59 Temple Place - Suite 330, */
/* OBSOLETE Boston, MA 02111-1307, USA. */ */
/* OBSOLETE */
/* OBSOLETE #include "regcache.h" */
/* OBSOLETE */
/* OBSOLETE /* Parameters for an EB29K (a board which plugs into a PC and is */
/* OBSOLETE accessed through EBMON software running on the PC, which we */
/* OBSOLETE use as we'd use a remote stub (see remote-eb.c). */
/* OBSOLETE */
/* OBSOLETE If gdb is ported to other a29k machines/systems, the */
/* OBSOLETE machine/system-specific parts should be removed from this file (a */
/* OBSOLETE la tm-m68k.h). */ */
/* OBSOLETE */
/* OBSOLETE /* Byte order is configurable, but this machine runs big-endian. */ */
/* OBSOLETE #define TARGET_BYTE_ORDER BFD_ENDIAN_BIG */
/* OBSOLETE */
/* OBSOLETE /* Floating point uses IEEE representations. */ */
/* OBSOLETE #define IEEE_FLOAT (1) */
/* OBSOLETE */
/* OBSOLETE /* Recognize our magic number. */ */
/* OBSOLETE #define BADMAG(x) ((x).f_magic != 0572) */
/* OBSOLETE */
/* OBSOLETE /* Offset from address of function to start of its code. */
/* OBSOLETE Zero on most machines. */ */
/* OBSOLETE */
/* OBSOLETE #define FUNCTION_START_OFFSET 0 */
/* OBSOLETE */
/* OBSOLETE /* Advance PC across any function entry prologue instructions */
/* OBSOLETE to reach some "real" code. */ */
/* OBSOLETE */
/* OBSOLETE #define SKIP_PROLOGUE(pc) (a29k_skip_prologue (pc)) */
/* OBSOLETE CORE_ADDR a29k_skip_prologue (); */
/* OBSOLETE */
/* OBSOLETE /* Immediately after a function call, return the saved pc. */
/* OBSOLETE Can't go through the frames for this because on some machines */
/* OBSOLETE the new frame is not set up until the new function executes */
/* OBSOLETE some instructions. */ */
/* OBSOLETE */
/* OBSOLETE #define SAVED_PC_AFTER_CALL(frame) ((frame->flags & TRANSPARENT_FRAME) \ */
/* OBSOLETE ? read_register (TPC_REGNUM) \ */
/* OBSOLETE : read_register (LR0_REGNUM)) */
/* OBSOLETE */
/* OBSOLETE /* Stack grows downward. */ */
/* OBSOLETE */
/* OBSOLETE #define INNER_THAN(lhs,rhs) ((lhs) < (rhs)) */
/* OBSOLETE */
/* OBSOLETE /* Stack must be aligned on 32-bit boundaries when synthesizing */
/* OBSOLETE function calls. */ */
/* OBSOLETE */
/* OBSOLETE #define STACK_ALIGN(ADDR) (((ADDR) + 3) & ~3) */
/* OBSOLETE */
/* OBSOLETE /* Sequence of bytes for breakpoint instruction. */ */
/* OBSOLETE /* ASNEQ 0x50, gr1, gr1 */
/* OBSOLETE The trap number 0x50 is chosen arbitrarily. */
/* OBSOLETE We let the command line (or previously included files) override this */
/* OBSOLETE setting. */ */
/* OBSOLETE #ifndef BREAKPOINT */
/* OBSOLETE #if TARGET_BYTE_ORDER == BFD_ENDIAN_BIG */
/* OBSOLETE #define BREAKPOINT {0x72, 0x50, 0x01, 0x01} */
/* OBSOLETE #else /* Target is little-endian. */ */
/* OBSOLETE #define BREAKPOINT {0x01, 0x01, 0x50, 0x72} */
/* OBSOLETE #endif /* Target is little-endian. */ */
/* OBSOLETE #endif /* BREAKPOINT */ */
/* OBSOLETE */
/* OBSOLETE /* Amount PC must be decremented by after a breakpoint. */
/* OBSOLETE This is often the number of bytes in BREAKPOINT */
/* OBSOLETE but not always. */ */
/* OBSOLETE */
/* OBSOLETE #define DECR_PC_AFTER_BREAK 0 */
/* OBSOLETE */
/* OBSOLETE /* Say how long (ordinary) registers are. This is a piece of bogosity */
/* OBSOLETE used in push_word and a few other places; REGISTER_RAW_SIZE is the */
/* OBSOLETE real way to know how big a register is. */ */
/* OBSOLETE */
/* OBSOLETE #define REGISTER_SIZE 4 */
/* OBSOLETE */
/* OBSOLETE /* Allow the register declarations here to be overridden for remote */
/* OBSOLETE kernel debugging. */ */
/* OBSOLETE #if !defined (REGISTER_NAMES) */
/* OBSOLETE */
/* OBSOLETE /* Number of machine registers */ */
/* OBSOLETE */
/* OBSOLETE #define NUM_REGS 205 */
/* OBSOLETE */
/* OBSOLETE /* Initializer for an array of names of registers. */
/* OBSOLETE There should be NUM_REGS strings in this initializer. */
/* OBSOLETE */
/* OBSOLETE FIXME, add floating point registers and support here. */
/* OBSOLETE */
/* OBSOLETE Also note that this list does not attempt to deal with kernel */
/* OBSOLETE debugging (in which the first 32 registers are gr64-gr95). */ */
/* OBSOLETE */
/* OBSOLETE #define REGISTER_NAMES \ */
/* OBSOLETE {"gr96", "gr97", "gr98", "gr99", "gr100", "gr101", "gr102", "gr103", "gr104", \ */
/* OBSOLETE "gr105", "gr106", "gr107", "gr108", "gr109", "gr110", "gr111", "gr112", \ */
/* OBSOLETE "gr113", "gr114", "gr115", "gr116", "gr117", "gr118", "gr119", "gr120", \ */
/* OBSOLETE "gr121", "gr122", "gr123", "gr124", "gr125", "gr126", "gr127", \ */
/* OBSOLETE "lr0", "lr1", "lr2", "lr3", "lr4", "lr5", "lr6", "lr7", "lr8", "lr9", \ */
/* OBSOLETE "lr10", "lr11", "lr12", "lr13", "lr14", "lr15", "lr16", "lr17", "lr18", \ */
/* OBSOLETE "lr19", "lr20", "lr21", "lr22", "lr23", "lr24", "lr25", "lr26", "lr27", \ */
/* OBSOLETE "lr28", "lr29", "lr30", "lr31", "lr32", "lr33", "lr34", "lr35", "lr36", \ */
/* OBSOLETE "lr37", "lr38", "lr39", "lr40", "lr41", "lr42", "lr43", "lr44", "lr45", \ */
/* OBSOLETE "lr46", "lr47", "lr48", "lr49", "lr50", "lr51", "lr52", "lr53", "lr54", \ */
/* OBSOLETE "lr55", "lr56", "lr57", "lr58", "lr59", "lr60", "lr61", "lr62", "lr63", \ */
/* OBSOLETE "lr64", "lr65", "lr66", "lr67", "lr68", "lr69", "lr70", "lr71", "lr72", \ */
/* OBSOLETE "lr73", "lr74", "lr75", "lr76", "lr77", "lr78", "lr79", "lr80", "lr81", \ */
/* OBSOLETE "lr82", "lr83", "lr84", "lr85", "lr86", "lr87", "lr88", "lr89", "lr90", \ */
/* OBSOLETE "lr91", "lr92", "lr93", "lr94", "lr95", "lr96", "lr97", "lr98", "lr99", \ */
/* OBSOLETE "lr100", "lr101", "lr102", "lr103", "lr104", "lr105", "lr106", "lr107", \ */
/* OBSOLETE "lr108", "lr109", "lr110", "lr111", "lr112", "lr113", "lr114", "lr115", \ */
/* OBSOLETE "lr116", "lr117", "lr118", "lr119", "lr120", "lr121", "lr122", "lr123", \ */
/* OBSOLETE "lr124", "lr125", "lr126", "lr127", \ */
/* OBSOLETE "AI0", "AI1", "AI2", "AI3", "AI4", "AI5", "AI6", "AI7", "AI8", "AI9", \ */
/* OBSOLETE "AI10", "AI11", "AI12", "AI13", "AI14", "AI15", "FP", \ */
/* OBSOLETE "bp", "fc", "cr", "q", \ */
/* OBSOLETE "vab", "ops", "cps", "cfg", "cha", "chd", "chc", "rbp", "tmc", "tmr", \ */
/* OBSOLETE "pc0", "pc1", "pc2", "mmu", "lru", "fpe", "inte", "fps", "exo", "gr1", \ */
/* OBSOLETE "alu", "ipc", "ipa", "ipb" } */
/* OBSOLETE */
/* OBSOLETE /* */
/* OBSOLETE * Converts an sdb register number to an internal gdb register number. */
/* OBSOLETE * Currently under epi, gr96->0...gr127->31...lr0->32...lr127->159, or... */
/* OBSOLETE * gr64->0...gr95->31, lr0->32...lr127->159. */
/* OBSOLETE */ */
/* OBSOLETE #define SDB_REG_TO_REGNUM(value) \ */
/* OBSOLETE (((value) >= 96 && (value) <= 127) ? ((value) - 96) : \ */
/* OBSOLETE ((value) >= 128 && (value) <= 255) ? ((value) - 128 + LR0_REGNUM) : \ */
/* OBSOLETE (value)) */
/* OBSOLETE */
/* OBSOLETE /* */
/* OBSOLETE * Provide the processor register numbers of some registers that are */
/* OBSOLETE * expected/written in instructions that might change under different */
/* OBSOLETE * register sets. Namely, gcc can compile (-mkernel-registers) so that */
/* OBSOLETE * it uses gr64-gr95 in stead of gr96-gr127. */
/* OBSOLETE */ */
/* OBSOLETE #define MSP_HW_REGNUM 125 /* gr125 */ */
/* OBSOLETE #define RAB_HW_REGNUM 126 /* gr126 */ */
/* OBSOLETE */
/* OBSOLETE /* Convert Processor Special register #x to REGISTER_NAMES register # */ */
/* OBSOLETE #define SR_REGNUM(x) \ */
/* OBSOLETE ((x) < 15 ? VAB_REGNUM + (x) \ */
/* OBSOLETE : (x) >= 128 && (x) < 131 ? IPC_REGNUM + (x) - 128 \ */
/* OBSOLETE : (x) == 131 ? Q_REGNUM \ */
/* OBSOLETE : (x) == 132 ? ALU_REGNUM \ */
/* OBSOLETE : (x) >= 133 && (x) < 136 ? BP_REGNUM + (x) - 133 \ */
/* OBSOLETE : (x) >= 160 && (x) < 163 ? FPE_REGNUM + (x) - 160 \ */
/* OBSOLETE : (x) == 164 ? EXO_REGNUM \ */
/* OBSOLETE : (error ("Internal error in SR_REGNUM"), 0)) */
/* OBSOLETE #define GR96_REGNUM 0 */
/* OBSOLETE */
/* OBSOLETE /* Define the return register separately, so it can be overridden for */
/* OBSOLETE kernel procedure calling conventions. */ */
/* OBSOLETE #define RETURN_REGNUM GR96_REGNUM */
/* OBSOLETE #define GR1_REGNUM 200 */
/* OBSOLETE /* This needs to be the memory stack pointer, not the register stack pointer, */
/* OBSOLETE to make call_function work right. */ */
/* OBSOLETE #define SP_REGNUM MSP_REGNUM */
/* OBSOLETE #define FP_REGNUM 33 /* lr1 */ */
/* OBSOLETE */
/* OBSOLETE /* Return register for transparent calling convention (gr122). */ */
/* OBSOLETE #define TPC_REGNUM (122 - 96 + GR96_REGNUM) */
/* OBSOLETE */
/* OBSOLETE /* Large Return Pointer (gr123). */ */
/* OBSOLETE #define LRP_REGNUM (123 - 96 + GR96_REGNUM) */
/* OBSOLETE */
/* OBSOLETE /* Static link pointer (gr124). */ */
/* OBSOLETE #define SLP_REGNUM (124 - 96 + GR96_REGNUM) */
/* OBSOLETE */
/* OBSOLETE /* Memory Stack Pointer (gr125). */ */
/* OBSOLETE #define MSP_REGNUM (125 - 96 + GR96_REGNUM) */
/* OBSOLETE */
/* OBSOLETE /* Register allocate bound (gr126). */ */
/* OBSOLETE #define RAB_REGNUM (126 - 96 + GR96_REGNUM) */
/* OBSOLETE */
/* OBSOLETE /* Register Free Bound (gr127). */ */
/* OBSOLETE #define RFB_REGNUM (127 - 96 + GR96_REGNUM) */
/* OBSOLETE */
/* OBSOLETE /* Register Stack Pointer. */ */
/* OBSOLETE #define RSP_REGNUM GR1_REGNUM */
/* OBSOLETE #define LR0_REGNUM 32 */
/* OBSOLETE #define BP_REGNUM 177 */
/* OBSOLETE #define FC_REGNUM 178 */
/* OBSOLETE #define CR_REGNUM 179 */
/* OBSOLETE #define Q_REGNUM 180 */
/* OBSOLETE #define VAB_REGNUM 181 */
/* OBSOLETE #define OPS_REGNUM (VAB_REGNUM + 1) */
/* OBSOLETE #define CPS_REGNUM (VAB_REGNUM + 2) */
/* OBSOLETE #define CFG_REGNUM (VAB_REGNUM + 3) */
/* OBSOLETE #define CHA_REGNUM (VAB_REGNUM + 4) */
/* OBSOLETE #define CHD_REGNUM (VAB_REGNUM + 5) */
/* OBSOLETE #define CHC_REGNUM (VAB_REGNUM + 6) */
/* OBSOLETE #define RBP_REGNUM (VAB_REGNUM + 7) */
/* OBSOLETE #define TMC_REGNUM (VAB_REGNUM + 8) */
/* OBSOLETE #define TMR_REGNUM (VAB_REGNUM + 9) */
/* OBSOLETE #define NPC_REGNUM (VAB_REGNUM + 10) /* pc0 */ */
/* OBSOLETE #define PC_REGNUM (VAB_REGNUM + 11) /* pc1 */ */
/* OBSOLETE #define PC2_REGNUM (VAB_REGNUM + 12) */
/* OBSOLETE #define MMU_REGNUM (VAB_REGNUM + 13) */
/* OBSOLETE #define LRU_REGNUM (VAB_REGNUM + 14) */
/* OBSOLETE #define FPE_REGNUM (VAB_REGNUM + 15) */
/* OBSOLETE #define INTE_REGNUM (VAB_REGNUM + 16) */
/* OBSOLETE #define FPS_REGNUM (VAB_REGNUM + 17) */
/* OBSOLETE #define EXO_REGNUM (VAB_REGNUM + 18) */
/* OBSOLETE /* gr1 is defined above as 200 = VAB_REGNUM + 19 */ */
/* OBSOLETE #define ALU_REGNUM (VAB_REGNUM + 20) */
/* OBSOLETE #define PS_REGNUM ALU_REGNUM */
/* OBSOLETE #define IPC_REGNUM (VAB_REGNUM + 21) */
/* OBSOLETE #define IPA_REGNUM (VAB_REGNUM + 22) */
/* OBSOLETE #define IPB_REGNUM (VAB_REGNUM + 23) */
/* OBSOLETE */
/* OBSOLETE #endif /* !defined(REGISTER_NAMES) */ */
/* OBSOLETE */
/* OBSOLETE /* Total amount of space needed to store our copies of the machine's */
/* OBSOLETE register state, the array `registers'. */ */
/* OBSOLETE #define REGISTER_BYTES (NUM_REGS * 4) */
/* OBSOLETE */
/* OBSOLETE /* Index within `registers' of the first byte of the space for */
/* OBSOLETE register N. */ */
/* OBSOLETE #define REGISTER_BYTE(N) ((N)*4) */
/* OBSOLETE */
/* OBSOLETE /* Number of bytes of storage in the actual machine representation */
/* OBSOLETE for register N. */ */
/* OBSOLETE */
/* OBSOLETE /* All regs are 4 bytes. */ */
/* OBSOLETE */
/* OBSOLETE #define REGISTER_RAW_SIZE(N) (4) */
/* OBSOLETE */
/* OBSOLETE /* Number of bytes of storage in the program's representation */
/* OBSOLETE for register N. */ */
/* OBSOLETE */
/* OBSOLETE /* All regs are 4 bytes. */ */
/* OBSOLETE */
/* OBSOLETE #define REGISTER_VIRTUAL_SIZE(N) (4) */
/* OBSOLETE */
/* OBSOLETE /* Largest value REGISTER_RAW_SIZE can have. */ */
/* OBSOLETE */
/* OBSOLETE #define MAX_REGISTER_RAW_SIZE (4) */
/* OBSOLETE */
/* OBSOLETE /* Largest value REGISTER_VIRTUAL_SIZE can have. */ */
/* OBSOLETE */
/* OBSOLETE #define MAX_REGISTER_VIRTUAL_SIZE (4) */
/* OBSOLETE */
/* OBSOLETE /* Return the GDB type object for the "standard" data type */
/* OBSOLETE of data in register N. */ */
/* OBSOLETE */
/* OBSOLETE #define REGISTER_VIRTUAL_TYPE(N) \ */
/* OBSOLETE (((N) == PC_REGNUM || (N) == LRP_REGNUM || (N) == SLP_REGNUM \ */
/* OBSOLETE || (N) == MSP_REGNUM || (N) == RAB_REGNUM || (N) == RFB_REGNUM \ */
/* OBSOLETE || (N) == GR1_REGNUM || (N) == FP_REGNUM || (N) == LR0_REGNUM \ */
/* OBSOLETE || (N) == NPC_REGNUM || (N) == PC2_REGNUM) \ */
/* OBSOLETE ? lookup_pointer_type (builtin_type_void) : builtin_type_int) */
/* OBSOLETE */
/* OBSOLETE /* Store the address of the place in which to copy the structure the */
/* OBSOLETE subroutine will return. This is called from call_function. */ */
/* OBSOLETE /* On the a29k the LRP points to the part of the structure beyond the first */
/* OBSOLETE 16 words. */ */
/* OBSOLETE #define STORE_STRUCT_RETURN(ADDR, SP) \ */
/* OBSOLETE write_register (LRP_REGNUM, (ADDR) + 16 * 4); */
/* OBSOLETE */
/* OBSOLETE /* Should call_function allocate stack space for a struct return? */ */
/* OBSOLETE /* On the a29k objects over 16 words require the caller to allocate space. */ */
/* OBSOLETE extern use_struct_convention_fn a29k_use_struct_convention; */
/* OBSOLETE #define USE_STRUCT_CONVENTION(gcc_p, type) a29k_use_struct_convention (gcc_p, type) */
/* OBSOLETE */
/* OBSOLETE /* Extract from an array REGBUF containing the (raw) register state */
/* OBSOLETE a function return value of type TYPE, and copy that, in virtual format, */
/* OBSOLETE into VALBUF. */ */
/* OBSOLETE */
/* OBSOLETE #define EXTRACT_RETURN_VALUE(TYPE,REGBUF,VALBUF) \ */
/* OBSOLETE { \ */
/* OBSOLETE int reg_length = TYPE_LENGTH (TYPE); \ */
/* OBSOLETE if (reg_length > 16 * 4) \ */
/* OBSOLETE { \ */
/* OBSOLETE reg_length = 16 * 4; \ */
/* OBSOLETE read_memory (*((int *)(REGBUF) + LRP_REGNUM), (VALBUF) + 16 * 4, \ */
/* OBSOLETE TYPE_LENGTH (TYPE) - 16 * 4); \ */
/* OBSOLETE } \ */
/* OBSOLETE memcpy ((VALBUF), ((int *)(REGBUF))+RETURN_REGNUM, reg_length); \ */
/* OBSOLETE } */
/* OBSOLETE */
/* OBSOLETE /* Write into appropriate registers a function return value */
/* OBSOLETE of type TYPE, given in virtual format. */ */
/* OBSOLETE */
/* OBSOLETE #define STORE_RETURN_VALUE(TYPE,VALBUF) \ */
/* OBSOLETE { \ */
/* OBSOLETE int reg_length = TYPE_LENGTH (TYPE); \ */
/* OBSOLETE if (reg_length > 16 * 4) \ */
/* OBSOLETE { \ */
/* OBSOLETE reg_length = 16 * 4; \ */
/* OBSOLETE write_memory (read_register (LRP_REGNUM), \ */
/* OBSOLETE (char *)(VALBUF) + 16 * 4, \ */
/* OBSOLETE TYPE_LENGTH (TYPE) - 16 * 4); \ */
/* OBSOLETE } \ */
/* OBSOLETE write_register_bytes (REGISTER_BYTE (RETURN_REGNUM), (char *)(VALBUF), \ */
/* OBSOLETE TYPE_LENGTH (TYPE)); \ */
/* OBSOLETE } */
/* OBSOLETE /* *INDENT-OFF* */ */
/* OBSOLETE /* The a29k user's guide documents well what the stacks look like. */
/* OBSOLETE But what isn't so clear there is how this interracts with the */
/* OBSOLETE symbols, or with GDB. */
/* OBSOLETE In the following saved_msp, saved memory stack pointer (which functions */
/* OBSOLETE as a memory frame pointer), means either */
/* OBSOLETE a register containing the memory frame pointer or, in the case of */
/* OBSOLETE functions with fixed size memory frames (i.e. those who don't use */
/* OBSOLETE alloca()), the result of the calculation msp + msize. */
/* OBSOLETE */
/* OBSOLETE LOC_ARG, LOC_LOCAL - For GCC, these are relative to saved_msp. */
/* OBSOLETE For high C, these are relative to msp (making alloca impossible). */
/* OBSOLETE LOC_REGISTER, LOC_REGPARM - The register number is the number at the */
/* OBSOLETE time the function is running (after the prologue), or in the case */
/* OBSOLETE of LOC_REGPARM, may be a register number in the range 160-175. */
/* OBSOLETE */
/* OBSOLETE The compilers do things like store an argument into memory, and then put out */
/* OBSOLETE a LOC_ARG for it, or put it into global registers and put out a */
/* OBSOLETE LOC_REGPARM. Thus is it important to execute the first line of */
/* OBSOLETE code (i.e. the line of the open brace, i.e. the prologue) of a function */
/* OBSOLETE before trying to print arguments or anything. */
/* OBSOLETE */
/* OBSOLETE The following diagram attempts to depict what is going on in memory */
/* OBSOLETE (see also the _a29k user's guide_) and also how that interacts with */
/* OBSOLETE GDB frames. We arbitrarily pick fci->frame to point the same place */
/* OBSOLETE as the register stack pointer; since we set it ourself in */
/* OBSOLETE INIT_EXTRA_FRAME_INFO, and access it only through the FRAME_* */
/* OBSOLETE macros, it doesn't really matter exactly how we */
/* OBSOLETE do it. However, note that FRAME_FP is used in two ways in GDB: */
/* OBSOLETE (1) as a "magic cookie" which uniquely identifies frames (even over */
/* OBSOLETE calls to the inferior), (2) (in PC_IN_CALL_DUMMY [ON_STACK]) */
/* OBSOLETE as the value of SP_REGNUM before the dummy frame was pushed. These */
/* OBSOLETE two meanings would be incompatible for the a29k if we defined */
/* OBSOLETE CALL_DUMMY_LOCATION == ON_STACK (but we don't, so don't worry about it). */
/* OBSOLETE Also note that "lr1" below, while called a frame pointer */
/* OBSOLETE in the user's guide, has only one function: To determine whether */
/* OBSOLETE registers need to be filled in the function epilogue. */
/* OBSOLETE */
/* OBSOLETE Consider the code: */
/* OBSOLETE < call bar> */
/* OBSOLETE loc1: . . . */
/* OBSOLETE bar: sub gr1,gr1,rsize_b */
/* OBSOLETE . . . */
/* OBSOLETE add mfp,msp,0 */
/* OBSOLETE sub msp,msp,msize_b */
/* OBSOLETE . . . */
/* OBSOLETE < call foo > */
/* OBSOLETE loc2: . . . */
/* OBSOLETE foo: sub gr1,gr1,rsize_f */
/* OBSOLETE . . . */
/* OBSOLETE add mfp,msp,0 */
/* OBSOLETE sub msp,msp,msize_f */
/* OBSOLETE . . . */
/* OBSOLETE loc3: < suppose the inferior stops here > */
/* OBSOLETE */
/* OBSOLETE memory stack register stack */
/* OBSOLETE | | |____________| */
/* OBSOLETE | | |____loc1____| */
/* OBSOLETE +------->|___________| | | ^ */
/* OBSOLETE | | ^ | | locals_b | | */
/* OBSOLETE | | | | |____________| | */
/* OBSOLETE | | | | | | | rsize_b */
/* OBSOLETE | | | msize_b | | args_to_f | | */
/* OBSOLETE | | | | |____________| | */
/* OBSOLETE | | | | |____lr1_____| V */
/* OBSOLETE | | V | |____loc2____|<----------------+ */
/* OBSOLETE | +--->|___________|<---------mfp | ^ | */
/* OBSOLETE | | | ^ | | locals_f | | | */
/* OBSOLETE | | | | msize_f | |____________| | | */
/* OBSOLETE | | | | | | | | rsize_f | */
/* OBSOLETE | | | V | | args | | | */
/* OBSOLETE | | |___________|<msp |____________| | | */
/* OBSOLETE | | |_____lr1____| V | */
/* OBSOLETE | | |___garbage__| <- gr1 <----+ | */
/* OBSOLETE | | | | */
/* OBSOLETE | | | | */
/* OBSOLETE | | pc=loc3 | | */
/* OBSOLETE | | | | */
/* OBSOLETE | | | | */
/* OBSOLETE | | frame cache | | */
/* OBSOLETE | | |_________________| | | */
/* OBSOLETE | | |rsize=rsize_b | | | */
/* OBSOLETE | | |msize=msize_b | | | */
/* OBSOLETE +---|--------saved_msp | | | */
/* OBSOLETE | |frame------------------------------------|---+ */
/* OBSOLETE | |pc=loc2 | | */
/* OBSOLETE | |_________________| | */
/* OBSOLETE | |rsize=rsize_f | | */
/* OBSOLETE | |msize=msize_f | | */
/* OBSOLETE +--------saved_msp | | */
/* OBSOLETE |frame------------------------------------+ */
/* OBSOLETE |pc=loc3 | */
/* OBSOLETE |_________________| */
/* OBSOLETE */
/* OBSOLETE So, is that sufficiently confusing? Welcome to the 29000. */
/* OBSOLETE Notes: */
/* OBSOLETE * The frame for foo uses a memory frame pointer but the frame for */
/* OBSOLETE bar does not. In the latter case the saved_msp is */
/* OBSOLETE computed by adding msize to the saved_msp of the */
/* OBSOLETE next frame. */
/* OBSOLETE * msize is in the frame cache only for high C's sake. */ */
/* OBSOLETE /* *INDENT-ON* */ */
/* OBSOLETE */
/* OBSOLETE */
/* OBSOLETE void read_register_stack (); */
/* OBSOLETE long read_register_stack_integer (); */
/* OBSOLETE */
/* OBSOLETE #define FRAME_INIT_SAVED_REGS(fi) /*no-op */ */
/* OBSOLETE */
/* OBSOLETE #define EXTRA_FRAME_INFO \ */
/* OBSOLETE CORE_ADDR saved_msp; \ */
/* OBSOLETE unsigned int rsize; \ */
/* OBSOLETE unsigned int msize; \ */
/* OBSOLETE unsigned char flags; */
/* OBSOLETE */
/* OBSOLETE /* Bits for flags in EXTRA_FRAME_INFO */ */
/* OBSOLETE #define TRANSPARENT_FRAME 0x1 /* This is a transparent frame */ */
/* OBSOLETE #define MFP_USED 0x2 /* A memory frame pointer is used */ */
/* OBSOLETE */
/* OBSOLETE /* Because INIT_FRAME_PC gets passed fromleaf, that's where we init */
/* OBSOLETE not only ->pc and ->frame, but all the extra stuff, when called from */
/* OBSOLETE get_prev_frame, that is. */ */
/* OBSOLETE #define INIT_EXTRA_FRAME_INFO(fromleaf, fci) init_extra_frame_info(fci) */
/* OBSOLETE void init_extra_frame_info (); */
/* OBSOLETE */
/* OBSOLETE #define INIT_FRAME_PC(fromleaf, fci) init_frame_pc(fromleaf, fci) */
/* OBSOLETE void init_frame_pc (); */
/* OBSOLETE */
/* OBSOLETE */
/* OBSOLETE /* FRAME_CHAIN takes a FRAME */
/* OBSOLETE and produces the frame's chain-pointer. */
/* OBSOLETE */
/* OBSOLETE However, if FRAME_CHAIN_VALID returns zero, */
/* OBSOLETE it means the given frame is the outermost one and has no caller. */ */
/* OBSOLETE */
/* OBSOLETE /* On the a29k, the nominal address of a frame is the address on the */
/* OBSOLETE register stack of the return address (the one next to the incoming */
/* OBSOLETE arguments, not down at the bottom so nominal address == stack pointer). */
/* OBSOLETE */
/* OBSOLETE GDB expects "nominal address" to equal contents of FP_REGNUM, */
/* OBSOLETE at least when it comes time to create the innermost frame. */
/* OBSOLETE However, that doesn't work for us, so when creating the innermost */
/* OBSOLETE frame we set ->frame ourselves in INIT_EXTRA_FRAME_INFO. */ */
/* OBSOLETE */
/* OBSOLETE /* These are mostly dummies for the a29k because INIT_FRAME_PC */
/* OBSOLETE sets prev->frame instead. */ */
/* OBSOLETE /* If rsize is zero, we must be at end of stack (or otherwise hosed). */
/* OBSOLETE If we don't check rsize, we loop forever if we see rsize == 0. */ */
/* OBSOLETE #define FRAME_CHAIN(thisframe) \ */
/* OBSOLETE ((thisframe)->rsize == 0 \ */
/* OBSOLETE ? 0 \ */
/* OBSOLETE : (thisframe)->frame + (thisframe)->rsize) */
/* OBSOLETE */
/* OBSOLETE /* Determine if the frame has a 'previous' and back-traceable frame. */ */
/* OBSOLETE #define FRAME_IS_UNCHAINED(frame) ((frame)->flags & TRANSPARENT_FRAME) */
/* OBSOLETE */
/* OBSOLETE /* Find the previous frame of a transparent routine. */
/* OBSOLETE * For now lets not try and trace through a transparent routine (we might */
/* OBSOLETE * have to assume that all transparent routines are traps). */
/* OBSOLETE */ */
/* OBSOLETE #define FIND_PREV_UNCHAINED_FRAME(frame) 0 */
/* OBSOLETE */
/* OBSOLETE /* Define other aspects of the stack frame. */ */
/* OBSOLETE */
/* OBSOLETE /* An expression that tells us whether the function invocation represented */
/* OBSOLETE by FI does not have a frame on the stack associated with it. */ */
/* OBSOLETE #define FRAMELESS_FUNCTION_INVOCATION(FI) \ */
/* OBSOLETE (frameless_look_for_prologue (FI)) */
/* OBSOLETE */
/* OBSOLETE /* Saved pc (i.e. return address). */ */
/* OBSOLETE #define FRAME_SAVED_PC(fraim) \ */
/* OBSOLETE (read_register_stack_integer ((fraim)->frame + (fraim)->rsize, 4)) */
/* OBSOLETE */
/* OBSOLETE /* Local variables (i.e. LOC_LOCAL) are on the memory stack, with their */
/* OBSOLETE offsets being relative to the memory stack pointer (high C) or */
/* OBSOLETE saved_msp (gcc). */ */
/* OBSOLETE */
/* OBSOLETE #define FRAME_LOCALS_ADDRESS(fi) frame_locals_address (fi) */
/* OBSOLETE extern CORE_ADDR frame_locals_address (); */
/* OBSOLETE */
/* OBSOLETE /* Return number of args passed to a frame. */
/* OBSOLETE Can return -1, meaning no way to tell. */ */
/* OBSOLETE /* We tried going to the effort of finding the tags word and getting */
/* OBSOLETE the argcount field from it, to support debugging assembler code. */
/* OBSOLETE Problem was, the "argcount" field never did hold the argument */
/* OBSOLETE count. */ */
/* OBSOLETE #define FRAME_NUM_ARGS(fi) (-1) */
/* OBSOLETE */
/* OBSOLETE #define FRAME_ARGS_ADDRESS(fi) FRAME_LOCALS_ADDRESS (fi) */
/* OBSOLETE */
/* OBSOLETE /* Return number of bytes at start of arglist that are not really args. */ */
/* OBSOLETE */
/* OBSOLETE #define FRAME_ARGS_SKIP 0 */
/* OBSOLETE */
/* OBSOLETE /* Provide our own get_saved_register. HAVE_REGISTER_WINDOWS is insufficient */
/* OBSOLETE because registers get renumbered on the a29k without getting saved. */ */
/* OBSOLETE */
/* OBSOLETE struct frame_info; */
/* OBSOLETE void a29k_get_saved_register (char *raw_buffer, int *optimized, */
/* OBSOLETE CORE_ADDR * addrp, struct frame_info *frame, */
/* OBSOLETE int regnum, enum lval_type *lvalp); */
/* OBSOLETE #define GET_SAVED_REGISTER(raw_buffer, optimized, addrp, frame, regnum, lval) \ */
/* OBSOLETE a29k_get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lval) */
/* OBSOLETE */
/* OBSOLETE /* Call function stuff. */ */
/* OBSOLETE /* *INDENT-OFF* */ */
/* OBSOLETE /* The dummy frame looks like this (see also the general frame picture */
/* OBSOLETE above): */
/* OBSOLETE */
/* OBSOLETE register stack */
/* OBSOLETE */
/* OBSOLETE | | frame for function */
/* OBSOLETE | locals_sproc | executing at time */
/* OBSOLETE |________________| of call_function. */
/* OBSOLETE | | We must not disturb */
/* OBSOLETE | args_out_sproc | it. */
/* OBSOLETE memory stack |________________| */
/* OBSOLETE |____lr1_sproc___|<-+ */
/* OBSOLETE | | |__retaddr_sproc_| | <-- gr1 (at start) */
/* OBSOLETE |____________|<-msp 0 <-----------mfp_dummy_____| | */
/* OBSOLETE | | (at start) | save regs | | */
/* OBSOLETE | arg_slop | | pc0,pc1 | | */
/* OBSOLETE | | | pc2,lr0 sproc | | */
/* OBSOLETE | (16 words) | | gr96-gr124 | | */
/* OBSOLETE |____________|<-msp 1--after | sr160-sr162 | | */
/* OBSOLETE | | PUSH_DUMMY_FRAME| sr128-sr135 | | */
/* OBSOLETE | struct ret | |________________| | */
/* OBSOLETE | 17+ | | | | */
/* OBSOLETE |____________|<- lrp | args_out_dummy | | */
/* OBSOLETE | struct ret | | (16 words) | | */
/* OBSOLETE | 16 | |________________| | */
/* OBSOLETE | (16 words) | |____lr1_dummy___|--+ */
/* OBSOLETE |____________|<- msp 2--after |_retaddr_dummy__|<- gr1 after */
/* OBSOLETE | | struct ret | | PUSH_DUMMY_FRAME */
/* OBSOLETE | margs17+ | area allocated | locals_inf | */
/* OBSOLETE | | |________________| called */
/* OBSOLETE |____________|<- msp 4--when | | function's */
/* OBSOLETE | | inf called | args_out_inf | frame (set up */
/* OBSOLETE | margs16 | |________________| by called */
/* OBSOLETE | (16 words) | |_____lr1_inf____| function). */
/* OBSOLETE |____________|<- msp 3--after | . | */
/* OBSOLETE | | args pushed | . | */
/* OBSOLETE | | | . | */
/* OBSOLETE | | */
/* OBSOLETE */
/* OBSOLETE arg_slop: This area is so that when the call dummy adds 16 words to */
/* OBSOLETE the msp, it won't end up larger than mfp_dummy (it is needed in the */
/* OBSOLETE case where margs and struct_ret do not add up to at least 16 words). */
/* OBSOLETE struct ret: This area is allocated by GDB if the return value is more */
/* OBSOLETE than 16 words. struct ret_16 is not used on the a29k. */
/* OBSOLETE margs: Pushed by GDB. The call dummy copies the first 16 words to */
/* OBSOLETE args_out_dummy. */
/* OBSOLETE retaddr_sproc: Contains the PC at the time we call the function. */
/* OBSOLETE set by PUSH_DUMMY_FRAME and read by POP_FRAME. */
/* OBSOLETE retaddr_dummy: This points to a breakpoint instruction in the dummy. */ */
/* OBSOLETE /* *INDENT-ON* */ */
/* OBSOLETE */
/* OBSOLETE */
/* OBSOLETE */
/* OBSOLETE /* Rsize for dummy frame, in bytes. */ */
/* OBSOLETE */
/* OBSOLETE /* Bytes for outgoing args, lr1, and retaddr. */ */
/* OBSOLETE #define DUMMY_ARG (2 * 4 + 16 * 4) */
/* OBSOLETE */
/* OBSOLETE /* Number of special registers (sr128-) to save. */ */
/* OBSOLETE #define DUMMY_SAVE_SR128 8 */
/* OBSOLETE /* Number of special registers (sr160-) to save. */ */
/* OBSOLETE #define DUMMY_SAVE_SR160 3 */
/* OBSOLETE /* Number of general (gr96- or gr64-) registers to save. */ */
/* OBSOLETE #define DUMMY_SAVE_GREGS 29 */
/* OBSOLETE */
/* OBSOLETE #define DUMMY_FRAME_RSIZE \ */
/* OBSOLETE (4 /* mfp_dummy */ \ */
/* OBSOLETE + 4 * 4 /* pc0, pc1, pc2, lr0 */ \ */
/* OBSOLETE + DUMMY_SAVE_GREGS * 4 \ */
/* OBSOLETE + DUMMY_SAVE_SR160 * 4 \ */
/* OBSOLETE + DUMMY_SAVE_SR128 * 4 \ */
/* OBSOLETE + DUMMY_ARG \ */
/* OBSOLETE + 4 /* pad to doubleword */ ) */
/* OBSOLETE */
/* OBSOLETE /* Push an empty stack frame, to record the current PC, etc. */ */
/* OBSOLETE */
/* OBSOLETE #define PUSH_DUMMY_FRAME push_dummy_frame() */
/* OBSOLETE extern void push_dummy_frame (); */
/* OBSOLETE */
/* OBSOLETE /* Discard from the stack the innermost frame, */
/* OBSOLETE restoring all saved registers. */ */
/* OBSOLETE */
/* OBSOLETE #define POP_FRAME pop_frame() */
/* OBSOLETE extern void pop_frame (); */
/* OBSOLETE */
/* OBSOLETE /* This sequence of words is the instructions */
/* OBSOLETE mtsrim cr, 15 */
/* OBSOLETE loadm 0, 0, lr2, msp ; load first 16 words of arguments into registers */
/* OBSOLETE add msp, msp, 16 * 4 ; point to the remaining arguments */
/* OBSOLETE CONST_INSN: */
/* OBSOLETE const lr0,inf ; (replaced by half of target addr) */
/* OBSOLETE consth lr0,inf ; (replaced by other half of target addr) */
/* OBSOLETE calli lr0, lr0 */
/* OBSOLETE aseq 0x40,gr1,gr1 ; nop */
/* OBSOLETE BREAKPT_INSN: */
/* OBSOLETE asneq 0x50,gr1,gr1 ; breakpoint (replaced by local breakpoint insn) */
/* OBSOLETE */ */
/* OBSOLETE */
/* OBSOLETE #error "This file is broken. GDB does not define HOST_BYTE_ORDER." */
/* OBSOLETE #if TARGET_BYTE_ORDER == HOST_BYTE_ORDER */
/* OBSOLETE #define BS(const) const */
/* OBSOLETE #else */
/* OBSOLETE #define BS(const) (((const) & 0xff) << 24) | \ */
/* OBSOLETE (((const) & 0xff00) << 8) | \ */
/* OBSOLETE (((const) & 0xff0000) >> 8) | \ */
/* OBSOLETE (((const) & 0xff000000) >> 24) */
/* OBSOLETE #endif */
/* OBSOLETE */
/* OBSOLETE /* Position of the "const" and blkt instructions within CALL_DUMMY in bytes. */ */
/* OBSOLETE #define CONST_INSN (3 * 4) */
/* OBSOLETE #define BREAKPT_INSN (7 * 4) */
/* OBSOLETE #define CALL_DUMMY { \ */
/* OBSOLETE BS(0x0400870f),\ */
/* OBSOLETE BS(0x36008200|(MSP_HW_REGNUM)), \ */
/* OBSOLETE BS(0x15000040|(MSP_HW_REGNUM<<8)|(MSP_HW_REGNUM<<16)), \ */
/* OBSOLETE BS(0x03ff80ff), \ */
/* OBSOLETE BS(0x02ff80ff), \ */
/* OBSOLETE BS(0xc8008080), \ */
/* OBSOLETE BS(0x70400101), \ */
/* OBSOLETE BS(0x72500101)} */
/* OBSOLETE #define CALL_DUMMY_LENGTH (8 * 4) */
/* OBSOLETE */
/* OBSOLETE #define CALL_DUMMY_START_OFFSET 0 /* Start execution at beginning of dummy */ */
/* OBSOLETE */
/* OBSOLETE /* Helper macro for FIX_CALL_DUMMY. WORDP is a long * which points to a */
/* OBSOLETE word in target byte order; bits 0-7 and 16-23 of *WORDP are replaced with */
/* OBSOLETE bits 0-7 and 8-15 of DATA (which is in host byte order). */ */
/* OBSOLETE */
/* OBSOLETE #if TARGET_BYTE_ORDER == BFD_ENDIAN_BIG */
/* OBSOLETE #define STUFF_I16(WORDP, DATA) \ */
/* OBSOLETE { \ */
/* OBSOLETE *((char *)(WORDP) + 3) = ((DATA) & 0xff);\ */
/* OBSOLETE *((char *)(WORDP) + 1) = (((DATA) >> 8) & 0xff);\ */
/* OBSOLETE } */
/* OBSOLETE #else /* Target is little endian. */ */
/* OBSOLETE #define STUFF_I16(WORDP, DATA) \ */
/* OBSOLETE { */
/* OBSOLETE *(char *) (WORDP) = ((DATA) & 0xff); */
/* OBSOLETE *((char *) (WORDP) + 2) = (((DATA) >> 8) & 0xff); */
/* OBSOLETE } */
/* OBSOLETE #endif /* Target is little endian. */ */
/* OBSOLETE */
/* OBSOLETE /* Insert the specified number of args and function address */
/* OBSOLETE into a call sequence of the above form stored at DUMMYNAME. */ */
/* OBSOLETE */
/* OBSOLETE /* Currently this stuffs in the address of the function that we are calling. */
/* OBSOLETE Since different a29k systems use different breakpoint instructions, it */
/* OBSOLETE also stuffs BREAKPOINT in the right place (to avoid having to */
/* OBSOLETE duplicate CALL_DUMMY in each tm-*.h file). */ */
/* OBSOLETE */
/* OBSOLETE #define FIX_CALL_DUMMY(dummyname, pc, fun, nargs, args, type, gcc_p) \ */
/* OBSOLETE {\ */
/* OBSOLETE STUFF_I16((char *)dummyname + CONST_INSN, fun); \ */
/* OBSOLETE STUFF_I16((char *)dummyname + CONST_INSN + 4, fun >> 16); \ */
/* OBSOLETE /* FIXME memcpy ((char *)(dummyname) + BREAKPT_INSN, break_insn, 4); */ \ */
/* OBSOLETE } */
/* OBSOLETE */
/* OBSOLETE /* a29k architecture has separate data & instruction memories -- wired to */
/* OBSOLETE different pins on the chip -- and can't execute the data memory. */
/* OBSOLETE Also, there should be space after text_end; */
/* OBSOLETE we won't get a SIGSEGV or scribble on data space. */ */
/* OBSOLETE */
/* OBSOLETE #define CALL_DUMMY_LOCATION AFTER_TEXT_END */
/* OBSOLETE */
/* OBSOLETE /* Because of this, we need (as a kludge) to know the addresses of the */
/* OBSOLETE text section. */ */
/* OBSOLETE */
/* OBSOLETE #define NEED_TEXT_START_END 1 */
/* OBSOLETE */
/* OBSOLETE /* How to translate register numbers in the .stab's into gdb's internal register */
/* OBSOLETE numbers. We don't translate them, but we warn if an invalid register */
/* OBSOLETE number is seen. Note that FIXME, we use the value "sym" as an implicit */
/* OBSOLETE argument in printing the error message. It happens to be available where */
/* OBSOLETE this macro is used. (This macro definition appeared in a late revision */
/* OBSOLETE of gdb-3.91.6 and is not well tested. Also, it should be a "complaint".) */ */
/* OBSOLETE */
/* OBSOLETE #define STAB_REG_TO_REGNUM(num) \ */
/* OBSOLETE (((num) > LR0_REGNUM + 127) \ */
/* OBSOLETE ? fprintf(stderr, \ */
/* OBSOLETE "Invalid register number %d in symbol table entry for %s\n", \ */
/* OBSOLETE (num), SYMBOL_SOURCE_NAME (sym)), (num) \ */
/* OBSOLETE : (num)) */
/* OBSOLETE */
/* OBSOLETE extern enum a29k_processor_types */
/* OBSOLETE { */
/* OBSOLETE a29k_unknown, */
/* OBSOLETE */
/* OBSOLETE /* Bit 0x400 of the CPS does *not* identify freeze mode, i.e. 29000, */
/* OBSOLETE 29030, etc. */ */
/* OBSOLETE a29k_no_freeze_mode, */
/* OBSOLETE */
/* OBSOLETE /* Bit 0x400 of the CPS does identify freeze mode, i.e. 29050. */ */
/* OBSOLETE a29k_freeze_mode */
/* OBSOLETE } */
/* OBSOLETE processor_type; */
/* OBSOLETE */
/* OBSOLETE /* We need three arguments for a general frame specification for the */
/* OBSOLETE "frame" or "info frame" command. */ */
/* OBSOLETE */
/* OBSOLETE #define SETUP_ARBITRARY_FRAME(argc, argv) setup_arbitrary_frame (argc, argv) */
/* OBSOLETE extern struct frame_info *setup_arbitrary_frame (int, CORE_ADDR *); */