OpenE2K
/
binutils-gdb
12
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Replace useless FRAME, FRAME_ADDR types with struct frame_info * 

and CORE_ADDR, respectively.
	* frame.h (FRAME, FRAME_INFO_ID, FRAME_ADDR): Remove.
	* blockframe.c (get_frame_info): Remove.
	* a29k-tdep.c, alpha-tdep.c, blockframe.c, breakpoint.c,
	breakpoint.h, energize.c, findvar.c, gdbtk.c, gould-pinsn.c,
	h8300-tdep.c, h8500-tdep.c, hppa-tdep.c, i386-tdep.c, i960-tdep.c,
	infcmd.c, inferior.h, infrun.c, m68k-tdep.c, m88k-tdep.c,
	mips-tdep.c, nindy-tdep.c, printcmd.c, pyr-tdep.c, rs6000-tdep.c,
	sh-tdep.c, sparc-tdep.c, stack.c, valops.c, z8k-tdep.c,
	config/a29k/tm-a29k.h, config/alpha/tm-alpha.h,
	config/gould/tm-pn.h, config/h8300/tm-h8300.h,
	config/h8500/tm-h8500.h, config/mips/tm-mips.h,
	config/ns32k/tm-merlin.h, config/ns32k/tm-umax.h,
	config/pyr/tm-pyr.h, config/sparc/tm-sparc.h): Replace FRAME with
	struct frame_info * everywhere, replace FRAME_ADDR with CORE_ADDR,
	rename variables consistently (using `frame' or `fi'), remove
	calls to get_frame_info and FRAME_INFO_ID, remove comments about
	FRAME and FRAME_ADDR cruftiness.
This commit is contained in:
Stan Shebs 1994-11-04 01:19:29 +00:00
parent 0128cbae50
commit 669caa9c19
20 changed files with 336 additions and 331 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

22
gdb/ChangeLog
View File

@ -1,3 +1,25 @@
Thu Nov 3 15:19:17 1994 Stan Shebs (shebs@andros.cygnus.com)
Replace useless FRAME, FRAME_ADDR types with struct frame_info *
and CORE_ADDR, respectively.
* frame.h (FRAME, FRAME_INFO_ID, FRAME_ADDR): Remove.
* blockframe.c (get_frame_info): Remove.
* a29k-tdep.c, alpha-tdep.c, blockframe.c, breakpoint.c,
breakpoint.h, energize.c, findvar.c, gdbtk.c, gould-pinsn.c,
h8300-tdep.c, h8500-tdep.c, hppa-tdep.c, i386-tdep.c, i960-tdep.c,
infcmd.c, inferior.h, infrun.c, m68k-tdep.c, m88k-tdep.c,
mips-tdep.c, nindy-tdep.c, printcmd.c, pyr-tdep.c, rs6000-tdep.c,
sh-tdep.c, sparc-tdep.c, stack.c, valops.c, z8k-tdep.c,
config/a29k/tm-a29k.h, config/alpha/tm-alpha.h,
config/gould/tm-pn.h, config/h8300/tm-h8300.h,
config/h8500/tm-h8500.h, config/mips/tm-mips.h,
config/ns32k/tm-merlin.h, config/ns32k/tm-umax.h,
config/pyr/tm-pyr.h, config/sparc/tm-sparc.h): Replace FRAME with
struct frame_info * everywhere, replace FRAME_ADDR with CORE_ADDR,
rename variables consistently (using `frame' or `fi'), remove
calls to get_frame_info and FRAME_INFO_ID, remove comments about
FRAME and FRAME_ADDR cruftiness.
Thu Nov 3 14:25:24 1994 Stu Grossman (grossman@cygnus.com) Thu Nov 3 14:25:24 1994 Stu Grossman (grossman@cygnus.com)
* corelow.c, exec.c, inftarg.c, m3-nat.c, op50-rom.c, procfs.c, * corelow.c, exec.c, inftarg.c, m3-nat.c, op50-rom.c, procfs.c,

123
gdb/a29k-tdep.c
View File

@ -41,6 +41,7 @@ extern CORE_ADDR text_start; /* FIXME, kludge... */
static CORE_ADDR rstack_high_address = UINT_MAX; static CORE_ADDR rstack_high_address = UINT_MAX;
/* Structure to hold cached info about function prologues. */ /* Structure to hold cached info about function prologues. */
struct prologue_info struct prologue_info
{ {
CORE_ADDR pc; /* First addr after fn prologue */ CORE_ADDR pc; /* First addr after fn prologue */
@ -66,6 +67,7 @@ struct prologue_info
If MFP_USED is non-NULL, *MFP_USED is set to nonzero if a memory If MFP_USED is non-NULL, *MFP_USED is set to nonzero if a memory
frame pointer is being used. */ frame pointer is being used. */
CORE_ADDR CORE_ADDR
examine_prologue (pc, rsize, msize, mfp_used) examine_prologue (pc, rsize, msize, mfp_used)
CORE_ADDR pc; CORE_ADDR pc;
@ -325,9 +327,9 @@ CORE_ADDR
skip_prologue (pc) skip_prologue (pc)
CORE_ADDR pc; CORE_ADDR pc;
{ {
return examine_prologue (pc, (unsigned *)NULL, (unsigned *)NULL, return examine_prologue (pc, NULL, NULL, NULL);
(int *)NULL);
} }
/* /*
* Examine the one or two word tag at the beginning of a function. * Examine the one or two word tag at the beginning of a function.
* The tag word is expect to be at 'p', if it is not there, we fail * The tag word is expect to be at 'p', if it is not there, we fail
@ -337,11 +339,12 @@ skip_prologue (pc)
* convention today (1/15/92). * convention today (1/15/92).
* msize is return in bytes. * msize is return in bytes.
*/ */
static int /* 0/1 - failure/success of finding the tag word */ static int /* 0/1 - failure/success of finding the tag word */
examine_tag(p, is_trans, argcount, msize, mfp_used) examine_tag (p, is_trans, argcount, msize, mfp_used)
CORE_ADDR p; CORE_ADDR p;
int *is_trans; int *is_trans;
int *argcount; int *argcount;
unsigned *msize; unsigned *msize;
int *mfp_used; int *mfp_used;
{ {
@ -371,17 +374,18 @@ examine_tag(p, is_trans, argcount, msize, mfp_used)
*argcount = (tag1 >> 16) & 0x1f; *argcount = (tag1 >> 16) & 0x1f;
if (mfp_used) if (mfp_used)
*mfp_used = ((tag1 & (1<<22)) ? 1 : 0); *mfp_used = ((tag1 & (1<<22)) ? 1 : 0);
return(1); return 1;
} }
/* Initialize the frame. In addition to setting "extra" frame info, /* Initialize the frame. In addition to setting "extra" frame info,
we also set ->frame because we use it in a nonstandard way, and ->pc we also set ->frame because we use it in a nonstandard way, and ->pc
because we need to know it to get the other stuff. See the diagram because we need to know it to get the other stuff. See the diagram
of stacks and the frame cache in tm-a29k.h for more detail. */ of stacks and the frame cache in tm-a29k.h for more detail. */
static void static void
init_frame_info (innermost_frame, fci) init_frame_info (innermost_frame, frame)
int innermost_frame; int innermost_frame;
struct frame_info *fci; struct frame_info *frame;
{ {
CORE_ADDR p; CORE_ADDR p;
long insn; long insn;
@ -390,12 +394,12 @@ init_frame_info (innermost_frame, fci)
int mfp_used, trans; int mfp_used, trans;
struct symbol *func; struct symbol *func;
p = fci->pc; p = frame->pc;
if (innermost_frame) if (innermost_frame)
fci->frame = read_register (GR1_REGNUM); frame->frame = read_register (GR1_REGNUM);
else else
fci->frame = fci->next->frame + fci->next->rsize; frame->frame = frame->next->frame + frame->next->rsize;
#if CALL_DUMMY_LOCATION == ON_STACK #if CALL_DUMMY_LOCATION == ON_STACK
This wont work; This wont work;
@ -403,14 +407,14 @@ init_frame_info (innermost_frame, fci)
if (PC_IN_CALL_DUMMY (p, 0, 0)) if (PC_IN_CALL_DUMMY (p, 0, 0))
#endif #endif
{ {
fci->rsize = DUMMY_FRAME_RSIZE; frame->rsize = DUMMY_FRAME_RSIZE;
/* This doesn't matter since we never try to get locals or args /* This doesn't matter since we never try to get locals or args
from a dummy frame. */ from a dummy frame. */
fci->msize = 0; frame->msize = 0;
/* Dummy frames always use a memory frame pointer. */ /* Dummy frames always use a memory frame pointer. */
fci->saved_msp = frame->saved_msp =
read_register_stack_integer (fci->frame + DUMMY_FRAME_RSIZE - 4, 4); read_register_stack_integer (frame->frame + DUMMY_FRAME_RSIZE - 4, 4);
fci->flags |= (TRANSPARENT|MFP_USED); frame->flags |= (TRANSPARENT|MFP_USED);
return; return;
} }
@ -440,10 +444,10 @@ init_frame_info (innermost_frame, fci)
{ {
/* Couldn't find the trace-back tag. /* Couldn't find the trace-back tag.
Something strange is going on. */ Something strange is going on. */
fci->saved_msp = 0; frame->saved_msp = 0;
fci->rsize = 0; frame->rsize = 0;
fci->msize = 0; frame->msize = 0;
fci->flags = TRANSPARENT; frame->flags = TRANSPARENT;
return; return;
} }
else else
@ -463,35 +467,35 @@ init_frame_info (innermost_frame, fci)
else /* No tag try prologue */ else /* No tag try prologue */
examine_prologue (p, &rsize, &msize, &mfp_used); examine_prologue (p, &rsize, &msize, &mfp_used);
fci->rsize = rsize; frame->rsize = rsize;
fci->msize = msize; frame->msize = msize;
fci->flags = 0; frame->flags = 0;
if (mfp_used) if (mfp_used)
fci->flags |= MFP_USED; frame->flags |= MFP_USED;
if (trans) if (trans)
fci->flags |= TRANSPARENT; frame->flags |= TRANSPARENT;
if (innermost_frame) if (innermost_frame)
{ {
fci->saved_msp = read_register (MSP_REGNUM) + msize; frame->saved_msp = read_register (MSP_REGNUM) + msize;
} }
else else
{ {
if (mfp_used) if (mfp_used)
fci->saved_msp = frame->saved_msp =
read_register_stack_integer (fci->frame + rsize - 4, 4); read_register_stack_integer (frame->frame + rsize - 4, 4);
else else
fci->saved_msp = fci->next->saved_msp + msize; frame->saved_msp = frame->next->saved_msp + msize;
} }
} }
void void
init_extra_frame_info (fci) init_extra_frame_info (frame)
struct frame_info *fci; struct frame_info *frame;
{ {
if (fci->next == 0) if (frame->next == 0)
/* Assume innermost frame. May produce strange results for "info frame" /* Assume innermost frame. May produce strange results for "info frame"
but there isn't any way to tell the difference. */ but there isn't any way to tell the difference. */
init_frame_info (1, fci); init_frame_info (1, frame);
else { else {
/* We're in get_prev_frame_info. /* We're in get_prev_frame_info.
Take care of everything in init_frame_pc. */ Take care of everything in init_frame_pc. */
@ -500,13 +504,13 @@ init_extra_frame_info (fci)
} }
void void
init_frame_pc (fromleaf, fci) init_frame_pc (fromleaf, frame)
int fromleaf; int fromleaf;
struct frame_info *fci; struct frame_info *frame;
{ {
fci->pc = (fromleaf ? SAVED_PC_AFTER_CALL (fci->next) : frame->pc = (fromleaf ? SAVED_PC_AFTER_CALL (frame->next) :
fci->next ? FRAME_SAVED_PC (fci->next) : read_pc ()); frame->next ? FRAME_SAVED_PC (frame->next) : read_pc ());
init_frame_info (fromleaf, fci); init_frame_info (fromleaf, frame);
} }
/* Local variables (i.e. LOC_LOCAL) are on the memory stack, with their /* Local variables (i.e. LOC_LOCAL) are on the memory stack, with their
@ -649,12 +653,13 @@ write_register_stack (memaddr, myaddr, actual_mem_addr)
otherwise it was fetched from a register. otherwise it was fetched from a register.
The argument RAW_BUFFER must point to aligned memory. */ The argument RAW_BUFFER must point to aligned memory. */
void void
get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lvalp) get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lvalp)
char *raw_buffer; char *raw_buffer;
int *optimized; int *optimized;
CORE_ADDR *addrp; CORE_ADDR *addrp;
FRAME frame; struct frame_info *frame;
int regnum; int regnum;
enum lval_type *lvalp; enum lval_type *lvalp;
{ {
@ -665,8 +670,6 @@ get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lvalp)
if (frame == 0) if (frame == 0)
return; return;
fi = get_frame_info (frame);
/* Once something has a register number, it doesn't get optimized out. */ /* Once something has a register number, it doesn't get optimized out. */
if (optimized != NULL) if (optimized != NULL)
*optimized = 0; *optimized = 0;
@ -674,7 +677,7 @@ get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lvalp)
{ {
if (raw_buffer != NULL) if (raw_buffer != NULL)
{ {
store_address (raw_buffer, REGISTER_RAW_SIZE (regnum), fi->frame); store_address (raw_buffer, REGISTER_RAW_SIZE (regnum), frame->frame);
} }
if (lvalp != NULL) if (lvalp != NULL)
*lvalp = not_lval; *lvalp = not_lval;
@ -684,7 +687,7 @@ get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lvalp)
{ {
if (raw_buffer != NULL) if (raw_buffer != NULL)
{ {
store_address (raw_buffer, REGISTER_RAW_SIZE (regnum), fi->pc); store_address (raw_buffer, REGISTER_RAW_SIZE (regnum), frame->pc);
} }
/* Not sure we have to do this. */ /* Not sure we have to do this. */
@ -697,10 +700,10 @@ get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lvalp)
{ {
if (raw_buffer != NULL) if (raw_buffer != NULL)
{ {
if (fi->next != NULL) if (frame->next != NULL)
{ {
store_address (raw_buffer, REGISTER_RAW_SIZE (regnum), store_address (raw_buffer, REGISTER_RAW_SIZE (regnum),
fi->next->saved_msp); frame->next->saved_msp);
} }
else else
read_register_gen (MSP_REGNUM, raw_buffer); read_register_gen (MSP_REGNUM, raw_buffer);
@ -723,7 +726,7 @@ get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lvalp)
return; return;
} }
addr = fi->frame + (regnum - LR0_REGNUM) * 4; addr = frame->frame + (regnum - LR0_REGNUM) * 4;
if (raw_buffer != NULL) if (raw_buffer != NULL)
read_register_stack (addr, raw_buffer, &addr, &lval); read_register_stack (addr, raw_buffer, &addr, &lval);
if (lvalp != NULL) if (lvalp != NULL)
@ -739,9 +742,8 @@ get_saved_register (raw_buffer, optimized, addrp, frame, regnum, lvalp)
void void
pop_frame () pop_frame ()
{ {
FRAME frame = get_current_frame (); struct frame_info *frame = get_current_frame ();
struct frame_info *fi = get_frame_info (frame); CORE_ADDR rfb = read_register (RFB_REGNUM);
CORE_ADDR rfb = read_register (RFB_REGNUM);
CORE_ADDR gr1 = fi->frame + fi->rsize; CORE_ADDR gr1 = fi->frame + fi->rsize;
CORE_ADDR lr1; CORE_ADDR lr1;
CORE_ADDR original_lr0; CORE_ADDR original_lr0;
@ -751,7 +753,7 @@ pop_frame ()
/* If popping a dummy frame, need to restore registers. */ /* If popping a dummy frame, need to restore registers. */
if (PC_IN_CALL_DUMMY (read_register (PC_REGNUM), if (PC_IN_CALL_DUMMY (read_register (PC_REGNUM),
read_register (SP_REGNUM), read_register (SP_REGNUM),
FRAME_FP (fi))) FRAME_FP (frame)))
{ {
int lrnum = LR0_REGNUM + DUMMY_ARG/4; int lrnum = LR0_REGNUM + DUMMY_ARG/4;
for (i = 0; i < DUMMY_SAVE_SR128; ++i) for (i = 0; i < DUMMY_SAVE_SR128; ++i)
@ -769,7 +771,7 @@ pop_frame ()
} }
/* Restore the memory stack pointer. */ /* Restore the memory stack pointer. */
write_register (MSP_REGNUM, fi->saved_msp); write_register (MSP_REGNUM, frame->saved_msp);
/* Restore the register stack pointer. */ /* Restore the register stack pointer. */
write_register (GR1_REGNUM, gr1); write_register (GR1_REGNUM, gr1);
@ -784,7 +786,8 @@ pop_frame ()
/* Fill. */ /* Fill. */
int num_bytes = lr1 - rfb; int num_bytes = lr1 - rfb;
int i; int i;
long word; long word;
write_register (RAB_REGNUM, read_register (RAB_REGNUM) + num_bytes); write_register (RAB_REGNUM, read_register (RAB_REGNUM) + num_bytes);
write_register (RFB_REGNUM, lr1); write_register (RFB_REGNUM, lr1);
for (i = 0; i < num_bytes; i += 4) for (i = 0; i < num_bytes; i += 4)
@ -874,37 +877,35 @@ push_dummy_frame ()
three values (FP, PC, and MSP), we really need all three to do a three values (FP, PC, and MSP), we really need all three to do a
good job. */ good job. */
FRAME struct frame_info *
setup_arbitrary_frame (argc, argv) setup_arbitrary_frame (argc, argv)
int argc; int argc;
FRAME_ADDR *argv; CORE_ADDR *argv;
{ {
FRAME fid; struct frame_info *frame;
if (argc != 3) if (argc != 3)
error ("AMD 29k frame specifications require three arguments: rsp pc msp"); error ("AMD 29k frame specifications require three arguments: rsp pc msp");
fid = create_new_frame (argv[0], argv[1]); frame = create_new_frame (argv[0], argv[1]);
if (!fid) if (!frame)
fatal ("internal: create_new_frame returned invalid frame id"); fatal ("internal: create_new_frame returned invalid frame id");
/* Creating a new frame munges the `frame' value from the current /* Creating a new frame munges the `frame' value from the current
GR1, so we restore it again here. FIXME, untangle all this GR1, so we restore it again here. FIXME, untangle all this
29K frame stuff... */ 29K frame stuff... */
fid->frame = argv[0]; frame->frame = argv[0];
/* Our MSP is in argv[2]. It'd be intelligent if we could just /* Our MSP is in argv[2]. It'd be intelligent if we could just
save this value in the FRAME. But the way it's set up (FIXME), save this value in the FRAME. But the way it's set up (FIXME),
we must save our caller's MSP. We compute that by adding our we must save our caller's MSP. We compute that by adding our
memory stack frame size to our MSP. */ memory stack frame size to our MSP. */
fid->saved_msp = argv[2] + fid->msize; frame->saved_msp = argv[2] + frame->msize;
return fid; return frame;
} }
enum a29k_processor_types processor_type = a29k_unknown; enum a29k_processor_types processor_type = a29k_unknown;
void void

103
gdb/alpha-tdep.c
View File

@ -36,23 +36,19 @@ extern struct obstack frame_cache_obstack;
/* Forward declarations. */ /* Forward declarations. */
static CORE_ADDR static CORE_ADDR read_next_frame_reg PARAMS ((struct frame_info *, int));
read_next_frame_reg PARAMS ((FRAME, int));
static CORE_ADDR static CORE_ADDR heuristic_proc_start PARAMS ((CORE_ADDR));
heuristic_proc_start PARAMS ((CORE_ADDR));
static alpha_extra_func_info_t static alpha_extra_func_info_t heuristic_proc_desc PARAMS ((CORE_ADDR,
heuristic_proc_desc PARAMS ((CORE_ADDR, CORE_ADDR, FRAME)); CORE_ADDR,
struct frame_info *));
static alpha_extra_func_info_t static alpha_extra_func_info_t find_proc_desc PARAMS ((CORE_ADDR, struct frame_info *));
find_proc_desc PARAMS ((CORE_ADDR, FRAME));
static int static int alpha_in_lenient_prologue PARAMS ((CORE_ADDR, CORE_ADDR));
alpha_in_lenient_prologue PARAMS ((CORE_ADDR, CORE_ADDR));
static void static void reinit_frame_cache_sfunc PARAMS ((char *, int, struct cmd_list_element *));
reinit_frame_cache_sfunc PARAMS ((char *, int, struct cmd_list_element *));
static CORE_ADDR after_prologue PARAMS ((CORE_ADDR pc, static CORE_ADDR after_prologue PARAMS ((CORE_ADDR pc,
alpha_extra_func_info_t proc_desc)); alpha_extra_func_info_t proc_desc));
@ -135,8 +131,8 @@ struct linked_proc_info
NULL). */ NULL). */
void void
alpha_find_saved_regs (fci) alpha_find_saved_regs (frame)
FRAME fci; struct frame_info *frame;
{ {
int ireg; int ireg;
CORE_ADDR reg_position; CORE_ADDR reg_position;
@ -144,11 +140,11 @@ alpha_find_saved_regs (fci)
alpha_extra_func_info_t proc_desc; alpha_extra_func_info_t proc_desc;
int returnreg; int returnreg;
fci->saved_regs = (struct frame_saved_regs *) frame->saved_regs = (struct frame_saved_regs *)
obstack_alloc (&frame_cache_obstack, sizeof(struct frame_saved_regs)); obstack_alloc (&frame_cache_obstack, sizeof(struct frame_saved_regs));
memset (fci->saved_regs, 0, sizeof (struct frame_saved_regs)); memset (frame->saved_regs, 0, sizeof (struct frame_saved_regs));
proc_desc = fci->proc_desc; proc_desc = frame->proc_desc;
if (proc_desc == NULL) if (proc_desc == NULL)
/* I'm not sure how/whether this can happen. Normally when we can't /* I'm not sure how/whether this can happen. Normally when we can't
find a proc_desc, we "synthesize" one using heuristic_proc_desc find a proc_desc, we "synthesize" one using heuristic_proc_desc
@ -158,7 +154,7 @@ alpha_find_saved_regs (fci)
/* Fill in the offsets for the registers which gen_mask says /* Fill in the offsets for the registers which gen_mask says
were saved. */ were saved. */
reg_position = fci->frame + PROC_REG_OFFSET (proc_desc); reg_position = frame->frame + PROC_REG_OFFSET (proc_desc);
mask = PROC_REG_MASK (proc_desc); mask = PROC_REG_MASK (proc_desc);
returnreg = PROC_PC_REG (proc_desc); returnreg = PROC_PC_REG (proc_desc);
@ -167,7 +163,7 @@ alpha_find_saved_regs (fci)
register number. */ register number. */
if (mask & (1 << returnreg)) if (mask & (1 << returnreg))
{ {
fci->saved_regs->regs[returnreg] = reg_position; frame->saved_regs->regs[returnreg] = reg_position;
reg_position += 8; reg_position += 8;
mask &= ~(1 << returnreg); /* Clear bit for RA so we mask &= ~(1 << returnreg); /* Clear bit for RA so we
don't save again later. */ don't save again later. */
@ -176,29 +172,29 @@ alpha_find_saved_regs (fci)
for (ireg = 0; ireg <= 31 ; ++ireg) for (ireg = 0; ireg <= 31 ; ++ireg)
if (mask & (1 << ireg)) if (mask & (1 << ireg))
{ {
fci->saved_regs->regs[ireg] = reg_position; frame->saved_regs->regs[ireg] = reg_position;
reg_position += 8; reg_position += 8;
} }
/* Fill in the offsets for the registers which float_mask says /* Fill in the offsets for the registers which float_mask says
were saved. */ were saved. */
reg_position = fci->frame + PROC_FREG_OFFSET (proc_desc); reg_position = frame->frame + PROC_FREG_OFFSET (proc_desc);
mask = PROC_FREG_MASK (proc_desc); mask = PROC_FREG_MASK (proc_desc);
for (ireg = 0; ireg <= 31 ; ++ireg) for (ireg = 0; ireg <= 31 ; ++ireg)
if (mask & (1 << ireg)) if (mask & (1 << ireg))
{ {
fci->saved_regs->regs[FP0_REGNUM+ireg] = reg_position; frame->saved_regs->regs[FP0_REGNUM+ireg] = reg_position;
reg_position += 8; reg_position += 8;
} }
fci->saved_regs->regs[PC_REGNUM] = fci->saved_regs->regs[returnreg]; frame->saved_regs->regs[PC_REGNUM] = frame->saved_regs->regs[returnreg];
} }
static CORE_ADDR static CORE_ADDR
read_next_frame_reg(fi, regno) read_next_frame_reg(fi, regno)
FRAME fi; struct frame_info *fi;
int regno; int regno;
{ {
/* If it is the frame for sigtramp we have a pointer to the sigcontext /* If it is the frame for sigtramp we have a pointer to the sigcontext
@ -239,7 +235,7 @@ read_next_frame_reg(fi, regno)
CORE_ADDR CORE_ADDR
alpha_frame_saved_pc(frame) alpha_frame_saved_pc(frame)
FRAME frame; struct frame_info *frame;
{ {
alpha_extra_func_info_t proc_desc = frame->proc_desc; alpha_extra_func_info_t proc_desc = frame->proc_desc;
/* We have to get the saved pc from the sigcontext /* We have to get the saved pc from the sigcontext
@ -255,7 +251,7 @@ alpha_frame_saved_pc(frame)
CORE_ADDR CORE_ADDR
alpha_saved_pc_after_call (frame) alpha_saved_pc_after_call (frame)
FRAME frame; struct frame_info *frame;
{ {
alpha_extra_func_info_t proc_desc = find_proc_desc (frame->pc, frame->next); alpha_extra_func_info_t proc_desc = find_proc_desc (frame->pc, frame->next);
int pcreg = proc_desc ? PROC_PC_REG (proc_desc) : RA_REGNUM; int pcreg = proc_desc ? PROC_PC_REG (proc_desc) : RA_REGNUM;
@ -327,7 +323,7 @@ Otherwise, you told GDB there was a function where there isn't one, or\n\
static alpha_extra_func_info_t static alpha_extra_func_info_t
heuristic_proc_desc(start_pc, limit_pc, next_frame) heuristic_proc_desc(start_pc, limit_pc, next_frame)
CORE_ADDR start_pc, limit_pc; CORE_ADDR start_pc, limit_pc;
FRAME next_frame; struct frame_info *next_frame;
{ {
CORE_ADDR sp = read_next_frame_reg (next_frame, SP_REGNUM); CORE_ADDR sp = read_next_frame_reg (next_frame, SP_REGNUM);
CORE_ADDR cur_pc; CORE_ADDR cur_pc;
@ -337,9 +333,9 @@ heuristic_proc_desc(start_pc, limit_pc, next_frame)
if (start_pc == 0) if (start_pc == 0)
return NULL; return NULL;
memset(&temp_proc_desc, '\0', sizeof(temp_proc_desc)); memset (&temp_proc_desc, '\0', sizeof(temp_proc_desc));
memset(&temp_saved_regs, '\0', sizeof(struct frame_saved_regs)); memset (&temp_saved_regs, '\0', sizeof(struct frame_saved_regs));
PROC_LOW_ADDR(&temp_proc_desc) = start_pc; PROC_LOW_ADDR (&temp_proc_desc) = start_pc;
if (start_pc + 200 < limit_pc) if (start_pc + 200 < limit_pc)
limit_pc = start_pc + 200; limit_pc = start_pc + 200;
@ -436,9 +432,9 @@ in_prologue (pc, proc_desc)
} }
static alpha_extra_func_info_t static alpha_extra_func_info_t
find_proc_desc(pc, next_frame) find_proc_desc (pc, next_frame)
CORE_ADDR pc; CORE_ADDR pc;
FRAME next_frame; struct frame_info *next_frame;
{ {
alpha_extra_func_info_t proc_desc; alpha_extra_func_info_t proc_desc;
struct block *b; struct block *b;
@ -536,9 +532,9 @@ find_proc_desc(pc, next_frame)
alpha_extra_func_info_t cached_proc_desc; alpha_extra_func_info_t cached_proc_desc;
FRAME_ADDR CORE_ADDR
alpha_frame_chain(frame) alpha_frame_chain(frame)
FRAME frame; struct frame_info *frame;
{ {
alpha_extra_func_info_t proc_desc; alpha_extra_func_info_t proc_desc;
CORE_ADDR saved_pc = FRAME_SAVED_PC(frame); CORE_ADDR saved_pc = FRAME_SAVED_PC(frame);
@ -555,7 +551,7 @@ alpha_frame_chain(frame)
/* Fetch the frame pointer for a dummy frame from the procedure /* Fetch the frame pointer for a dummy frame from the procedure
descriptor. */ descriptor. */
if (PROC_DESC_IS_DUMMY(proc_desc)) if (PROC_DESC_IS_DUMMY(proc_desc))
return (FRAME_ADDR) PROC_DUMMY_FRAME(proc_desc); return (CORE_ADDR) PROC_DUMMY_FRAME(proc_desc);
/* If no frame pointer and frame size is zero, we must be at end /* If no frame pointer and frame size is zero, we must be at end
of stack (or otherwise hosed). If we don't check frame size, of stack (or otherwise hosed). If we don't check frame size,
@ -582,45 +578,45 @@ alpha_frame_chain(frame)
} }
void void
init_extra_frame_info(fci) init_extra_frame_info (frame)
struct frame_info *fci; struct frame_info *frame;
{ {
/* Use proc_desc calculated in frame_chain */ /* Use proc_desc calculated in frame_chain */
alpha_extra_func_info_t proc_desc = alpha_extra_func_info_t proc_desc =
fci->next ? cached_proc_desc : find_proc_desc(fci->pc, fci->next); frame->next ? cached_proc_desc : find_proc_desc(frame->pc, frame->next);
fci->saved_regs = NULL; frame->saved_regs = NULL;
fci->proc_desc = frame->proc_desc =
proc_desc == &temp_proc_desc ? 0 : proc_desc; proc_desc == &temp_proc_desc ? 0 : proc_desc;
if (proc_desc) if (proc_desc)
{ {
/* Get the locals offset from the procedure descriptor, it is valid /* Get the locals offset from the procedure descriptor, it is valid
even if we are in the middle of the prologue. */ even if we are in the middle of the prologue. */
fci->localoff = PROC_LOCALOFF(proc_desc); frame->localoff = PROC_LOCALOFF(proc_desc);
/* Fixup frame-pointer - only needed for top frame */ /* Fixup frame-pointer - only needed for top frame */
/* Fetch the frame pointer for a dummy frame from the procedure /* Fetch the frame pointer for a dummy frame from the procedure
descriptor. */ descriptor. */
if (PROC_DESC_IS_DUMMY(proc_desc)) if (PROC_DESC_IS_DUMMY(proc_desc))
fci->frame = (FRAME_ADDR) PROC_DUMMY_FRAME(proc_desc); frame->frame = (CORE_ADDR) PROC_DUMMY_FRAME(proc_desc);
/* This may not be quite right, if proc has a real frame register. /* This may not be quite right, if proc has a real frame register.
Get the value of the frame relative sp, procedure might have been Get the value of the frame relative sp, procedure might have been
interrupted by a signal at it's very start. */ interrupted by a signal at it's very start. */
else if (fci->pc == PROC_LOW_ADDR (proc_desc) && !PROC_DESC_IS_DUMMY (proc_desc)) else if (frame->pc == PROC_LOW_ADDR (proc_desc) && !PROC_DESC_IS_DUMMY (proc_desc))
fci->frame = read_next_frame_reg (fci->next, SP_REGNUM); frame->frame = read_next_frame_reg (frame->next, SP_REGNUM);
else else
fci->frame = read_next_frame_reg (fci->next, PROC_FRAME_REG (proc_desc)) frame->frame = read_next_frame_reg (frame->next, PROC_FRAME_REG (proc_desc))
+ PROC_FRAME_OFFSET (proc_desc); + PROC_FRAME_OFFSET (proc_desc);
if (proc_desc == &temp_proc_desc) if (proc_desc == &temp_proc_desc)
{ {
fci->saved_regs = (struct frame_saved_regs*) frame->saved_regs = (struct frame_saved_regs*)
obstack_alloc (&frame_cache_obstack, obstack_alloc (&frame_cache_obstack,
sizeof (struct frame_saved_regs)); sizeof (struct frame_saved_regs));
*fci->saved_regs = temp_saved_regs; *frame->saved_regs = temp_saved_regs;
fci->saved_regs->regs[PC_REGNUM] = fci->saved_regs->regs[RA_REGNUM]; frame->saved_regs->regs[PC_REGNUM] = frame->saved_regs->regs[RA_REGNUM];
} }
} }
} }
@ -640,10 +636,10 @@ init_extra_frame_info(fci)
cache. This allows the rest of info frame to extract the important cache. This allows the rest of info frame to extract the important
arguments without difficulty. */ arguments without difficulty. */
FRAME struct frame_info *
setup_arbitrary_frame (argc, argv) setup_arbitrary_frame (argc, argv)
int argc; int argc;
FRAME_ADDR *argv; CORE_ADDR *argv;
{ {
if (argc != 2) if (argc != 2)
error ("ALPHA frame specifications require two arguments: sp and pc"); error ("ALPHA frame specifications require two arguments: sp and pc");
@ -847,7 +843,7 @@ void
alpha_pop_frame() alpha_pop_frame()
{ {
register int regnum; register int regnum;
FRAME frame = get_current_frame (); struct frame_info *frame = get_current_frame ();
CORE_ADDR new_sp = frame->frame; CORE_ADDR new_sp = frame->frame;
alpha_extra_func_info_t proc_desc = frame->proc_desc; alpha_extra_func_info_t proc_desc = frame->proc_desc;
@ -1056,6 +1052,7 @@ alpha_register_convert_to_raw (valtype, regnum, virtual_buffer, raw_buffer)
/* Given a return value in `regbuf' with a type `valtype', /* Given a return value in `regbuf' with a type `valtype',
extract and copy its value into `valbuf'. */ extract and copy its value into `valbuf'. */
void void
alpha_extract_return_value (valtype, regbuf, valbuf) alpha_extract_return_value (valtype, regbuf, valbuf)
struct type *valtype; struct type *valtype;
@ -1071,6 +1068,7 @@ alpha_extract_return_value (valtype, regbuf, valbuf)
/* Given a return value in `regbuf' with a type `valtype', /* Given a return value in `regbuf' with a type `valtype',
write its value into the appropriate register. */ write its value into the appropriate register. */
void void
alpha_store_return_value (valtype, valbuf) alpha_store_return_value (valtype, valbuf)
struct type *valtype; struct type *valtype;
@ -1102,6 +1100,7 @@ print_insn (memaddr, stream)
/* Just like reinit_frame_cache, but with the right arguments to be /* Just like reinit_frame_cache, but with the right arguments to be
callable as an sfunc. */ callable as an sfunc. */
static void static void
reinit_frame_cache_sfunc (args, from_tty, c) reinit_frame_cache_sfunc (args, from_tty, c)
char *args; char *args;

4
gdb/config/a29k/tm-a29k.h
View File

@ -713,6 +713,4 @@ extern enum a29k_processor_types {
"frame" or "info frame" command. */ "frame" or "info frame" command. */
#define SETUP_ARBITRARY_FRAME(argc, argv) setup_arbitrary_frame (argc, argv) #define SETUP_ARBITRARY_FRAME(argc, argv) setup_arbitrary_frame (argc, argv)
/* FIXME: Depends on equivalence between FRAME and "struct frame_info *", extern struct frame_info *setup_arbitrary_frame PARAMS ((int, FRAME_ADDR *));
and equivalence between CORE_ADDR and FRAME_ADDR. */
extern struct frame_info *setup_arbitrary_frame PARAMS ((int, CORE_ADDR *));

3
gdb/config/h8300/tm-h8300.h
View File

@ -179,6 +179,9 @@ extern CORE_ADDR h8300_skip_prologue ();
However, if FRAME_CHAIN_VALID returns zero, However, if FRAME_CHAIN_VALID returns zero,
it means the given frame is the outermost one and has no caller. */ it means the given frame is the outermost one and has no caller. */
#define FRAME_CHAIN(FRAME) h8300_frame_chain(FRAME)
CORE_ADDR h8300_frame_chain PARAMS ((struct frame_info *));
/* In the case of the H8/300, the frame's nominal address /* In the case of the H8/300, the frame's nominal address
is the address of a 2-byte word containing the calling frame's address. */ is the address of a 2-byte word containing the calling frame's address. */

2
gdb/config/h8500/tm-h8500.h
View File

@ -217,7 +217,7 @@ struct type *h8500_register_virtual_type PARAMS ((int regno));
*/ */
CORE_ADDR h8500_frame_chain (/* FRAME thisframe */); CORE_ADDR h8500_frame_chain PARAMS ((struct frame_info *));
#define INIT_EXTRA_FRAME_INFO(fromleaf, fci) ; #define INIT_EXTRA_FRAME_INFO(fromleaf, fci) ;
/* (fci)->frame |= read_register(SEG_T_REGNUM) << 16;*/ /* (fci)->frame |= read_register(SEG_T_REGNUM) << 16;*/

6
gdb/config/mips/tm-mips.h
View File

@ -34,6 +34,8 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
/* Floating point is IEEE compliant */ /* Floating point is IEEE compliant */
#define IEEE_FLOAT #define IEEE_FLOAT
extern int mips_processor_id;
/* Some MIPS boards are provided both with and without a floating /* Some MIPS boards are provided both with and without a floating
point coprocessor; we provide a user settable variable to tell gdb point coprocessor; we provide a user settable variable to tell gdb
whether there is one or not. */ whether there is one or not. */
@ -251,7 +253,7 @@ extern int in_sigtramp PARAMS ((CORE_ADDR, char *));
/* FRAME_CHAIN takes a frame's nominal address /* FRAME_CHAIN takes a frame's nominal address
and produces the frame's chain-pointer. */ and produces the frame's chain-pointer. */
#define FRAME_CHAIN(thisframe) (FRAME_ADDR)mips_frame_chain(thisframe) #define FRAME_CHAIN(thisframe) (CORE_ADDR) mips_frame_chain (thisframe)
/* Define other aspects of the stack frame. */ /* Define other aspects of the stack frame. */
@ -452,8 +454,6 @@ typedef struct mips_extra_func_info {
but there is nothing we can do about that). */ but there is nothing we can do about that). */
#define SETUP_ARBITRARY_FRAME(argc, argv) setup_arbitrary_frame (argc, argv) #define SETUP_ARBITRARY_FRAME(argc, argv) setup_arbitrary_frame (argc, argv)
/* FIXME: Depends on equivalence between FRAME and "struct frame_info *",
and equivalence between CORE_ADDR and FRAME_ADDR. */
extern struct frame_info *setup_arbitrary_frame PARAMS ((int, CORE_ADDR *)); extern struct frame_info *setup_arbitrary_frame PARAMS ((int, CORE_ADDR *));
/* Convert a dbx stab register number (from `r' declaration) to a gdb REGNUM */ /* Convert a dbx stab register number (from `r' declaration) to a gdb REGNUM */

7
gdb/config/ns32k/tm-merlin.h
View File

@ -274,14 +274,13 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
/* Discard from the stack the innermost frame, restoring all registers. */ /* Discard from the stack the innermost frame, restoring all registers. */
#define POP_FRAME \ #define POP_FRAME \
{ register FRAME frame = get_current_frame (); \ { register struct frame_info *frame = get_current_frame (); \
register CORE_ADDR fp; \ register CORE_ADDR fp; \
register int regnum; \ register int regnum; \
struct frame_saved_regs fsr; \ struct frame_saved_regs fsr; \
struct frame_info *fi; \ struct frame_info *fi; \
fi = get_frame_info (frame); \ fp = frame->frame; \
fp = fi->frame; \ get_frame_saved_regs (frame, &fsr); \
get_frame_saved_regs (fi, &fsr); \
for (regnum = 0; regnum < 8; regnum++) \ for (regnum = 0; regnum < 8; regnum++) \
if (fsr.regs[regnum]) \ if (fsr.regs[regnum]) \
write_register (regnum, read_memory_integer (fsr.regs[regnum], 4)); \ write_register (regnum, read_memory_integer (fsr.regs[regnum], 4)); \

7
gdb/config/ns32k/tm-umax.h
View File

@ -329,14 +329,13 @@ extern CORE_ADDR ns32k_get_enter_addr ();
/* Discard from the stack the innermost frame, restoring all registers. */ /* Discard from the stack the innermost frame, restoring all registers. */
#define POP_FRAME \ #define POP_FRAME \
{ register FRAME frame = get_current_frame (); \ { register struct frame_info *frame = get_current_frame (); \
register CORE_ADDR fp; \ register CORE_ADDR fp; \
register int regnum; \ register int regnum; \
struct frame_saved_regs fsr; \ struct frame_saved_regs fsr; \
struct frame_info *fi; \ struct frame_info *fi; \
fi = get_frame_info (frame); \ fp = frame->frame; \
fp = fi->frame; \ get_frame_saved_regs (frame, &fsr); \
get_frame_saved_regs (fi, &fsr); \
for (regnum = 0; regnum < 8; regnum++) \ for (regnum = 0; regnum < 8; regnum++) \
if (fsr.regs[regnum]) \ if (fsr.regs[regnum]) \
write_register (regnum, read_memory_integer (fsr.regs[regnum], 4)); \ write_register (regnum, read_memory_integer (fsr.regs[regnum], 4)); \

4
gdb/config/sparc/tm-sparc.h
View File

@ -328,7 +328,7 @@ sparc_extract_struct_value_address PARAMS ((char [REGISTER_BYTES]));
stack frames are allocated in different segments (e.g. some on a stack frames are allocated in different segments (e.g. some on a
stack, some on a heap in the data segment). */ stack, some on a heap in the data segment). */
#define EXTRA_FRAME_INFO FRAME_ADDR bottom; #define EXTRA_FRAME_INFO CORE_ADDR bottom;
#define INIT_EXTRA_FRAME_INFO(fromleaf, fci) \ #define INIT_EXTRA_FRAME_INFO(fromleaf, fci) \
(fci)->bottom = \ (fci)->bottom = \
((fci)->next ? \ ((fci)->next ? \
@ -579,8 +579,6 @@ extern void single_step PARAMS ((int));
"frame" or "info frame" command. */ "frame" or "info frame" command. */
#define SETUP_ARBITRARY_FRAME(argc, argv) setup_arbitrary_frame (argc, argv) #define SETUP_ARBITRARY_FRAME(argc, argv) setup_arbitrary_frame (argc, argv)
/* FIXME: Depends on equivalence between FRAME and "struct frame_info *",
and equivalence between CORE_ADDR and FRAME_ADDR. */
extern struct frame_info *setup_arbitrary_frame PARAMS ((int, CORE_ADDR *)); extern struct frame_info *setup_arbitrary_frame PARAMS ((int, CORE_ADDR *));
/* To print every pair of float registers as a double, we use this hook. */ /* To print every pair of float registers as a double, we use this hook. */

20
gdb/h8300-tdep.c
View File

@ -117,9 +117,9 @@ print_insn (memaddr, stream)
For us, the frame address is its stack pointer value, so we look up For us, the frame address is its stack pointer value, so we look up
the function prologue to determine the caller's sp value, and return it. */ the function prologue to determine the caller's sp value, and return it. */
FRAME_ADDR CORE_ADDR
FRAME_CHAIN (thisframe) h8300_frame_chain (thisframe)
FRAME thisframe; struct frame_info *thisframe;
{ {
frame_find_saved_regs (thisframe, (struct frame_saved_regs *) 0); frame_find_saved_regs (thisframe, (struct frame_saved_regs *) 0);
return thisframe->fsr->regs[SP_REGNUM]; return thisframe->fsr->regs[SP_REGNUM];
@ -208,7 +208,7 @@ static CORE_ADDR
examine_prologue (ip, limit, after_prolog_fp, fsr, fi) examine_prologue (ip, limit, after_prolog_fp, fsr, fi)
register CORE_ADDR ip; register CORE_ADDR ip;
register CORE_ADDR limit; register CORE_ADDR limit;
FRAME_ADDR after_prolog_fp; CORE_ADDR after_prolog_fp;
struct frame_saved_regs *fsr; struct frame_saved_regs *fsr;
struct frame_info *fi; struct frame_info *fi;
{ {
@ -331,7 +331,7 @@ init_extra_frame_info (fromleaf, fi)
CORE_ADDR CORE_ADDR
frame_saved_pc (frame) frame_saved_pc (frame)
FRAME frame; struct frame_info *frame;
{ {
return frame->from_pc; return frame->from_pc;
} }
@ -373,19 +373,15 @@ h8300_pop_frame ()
{ {
unsigned regnum; unsigned regnum;
struct frame_saved_regs fsr; struct frame_saved_regs fsr;
struct frame_info *fi; struct frame_info *frame = get_current_frame ();
FRAME frame = get_current_frame ();
fi = get_frame_info (frame); fi = get_frame_info (frame);
get_frame_saved_regs (fi, &fsr); get_frame_saved_regs (frame, &fsr);
for (regnum = 0; regnum < 8; regnum++) for (regnum = 0; regnum < 8; regnum++)
{ {
if (fsr.regs[regnum]) if (fsr.regs[regnum])
{ write_register (regnum, read_memory_integer(fsr.regs[regnum]), BINWORD);
write_register (regnum, read_memory_integer(fsr.regs[regnum]), BINWORD);
}
flush_cached_frames (); flush_cached_frames ();
} }

19
gdb/h8500-tdep.c
View File

@ -1,5 +1,5 @@
/* Target-machine dependent code for Hitachi H8/500, for GDB. /* Target-machine dependent code for Hitachi H8/500, for GDB.
Copyright (C) 1993 Free Software Foundation, Inc. Copyright (C) 1993, 1994 Free Software Foundation, Inc.
This file is part of GDB. This file is part of GDB.
@ -121,9 +121,9 @@ print_insn (memaddr, stream)
For us, the frame address is its stack pointer value, so we look up For us, the frame address is its stack pointer value, so we look up
the function prologue to determine the caller's sp value, and return it. */ the function prologue to determine the caller's sp value, and return it. */
FRAME_ADDR CORE_ADDR
h8500_frame_chain (thisframe) h8500_frame_chain (thisframe)
FRAME thisframe; struct frame_info *thisframe;
{ {
if (!inside_entry_file (thisframe->pc)) if (!inside_entry_file (thisframe->pc))
return (read_memory_integer (FRAME_FP (thisframe), PTR_SIZE)); return (read_memory_integer (FRAME_FP (thisframe), PTR_SIZE));
@ -166,9 +166,9 @@ NEXT_PROLOGUE_INSN (addr, lim, pword1)
CORE_ADDR CORE_ADDR
frame_saved_pc (frame) frame_saved_pc (frame)
FRAME frame; struct frame_info *frame;
{ {
return read_memory_integer ((frame)->frame + 2, PTR_SIZE); return read_memory_integer (FRAME_FP (frame) + 2, PTR_SIZE);
} }
CORE_ADDR CORE_ADDR
@ -193,19 +193,14 @@ h8300_pop_frame ()
{ {
unsigned regnum; unsigned regnum;
struct frame_saved_regs fsr; struct frame_saved_regs fsr;
struct frame_info *fi; struct frame_info *frame = get_current_frame ();
FRAME frame = get_current_frame (); get_frame_saved_regs (frame, &fsr);
fi = get_frame_info (frame);
get_frame_saved_regs (fi, &fsr);
for (regnum = 0; regnum < 8; regnum++) for (regnum = 0; regnum < 8; regnum++)
{ {
if (fsr.regs[regnum]) if (fsr.regs[regnum])
{
write_register (regnum, read_memory_short (fsr.regs[regnum])); write_register (regnum, read_memory_short (fsr.regs[regnum]));
}
flush_cached_frames (); flush_cached_frames ();
} }

100
gdb/hppa-tdep.c
View File

@ -1,6 +1,6 @@
/* Machine-dependent code which would otherwise be in inflow.c and core.c, /* Target-dependent code for the HP PA architecture, for GDB.
for GDB, the GNU debugger. This code is for the HP PA-RISC cpu. Copyright 1986, 1987, 1989, 1990, 1991, 1992, 1993, 1994
Copyright 1986, 1987, 1989, 1990, 1991, 1992, 1993 Free Software Foundation, Inc. Free Software Foundation, Inc.
Contributed by the Center for Software Science at the Contributed by the Center for Software Science at the
University of Utah (pa-gdb-bugs@cs.utah.edu). University of Utah (pa-gdb-bugs@cs.utah.edu).
@ -56,18 +56,29 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include "symfile.h" #include "symfile.h"
#include "objfiles.h" #include "objfiles.h"
static int restore_pc_queue PARAMS ((struct frame_saved_regs *fsr)); static int restore_pc_queue PARAMS ((struct frame_saved_regs *));
static int hppa_alignof PARAMS ((struct type *arg));
CORE_ADDR frame_saved_pc PARAMS ((FRAME frame)); static int hppa_alignof PARAMS ((struct type *));
CORE_ADDR frame_saved_pc PARAMS ((struct frame_info *));
static int prologue_inst_adjust_sp PARAMS ((unsigned long)); static int prologue_inst_adjust_sp PARAMS ((unsigned long));
static int is_branch PARAMS ((unsigned long)); static int is_branch PARAMS ((unsigned long));
static int inst_saves_gr PARAMS ((unsigned long)); static int inst_saves_gr PARAMS ((unsigned long));
static int inst_saves_fr PARAMS ((unsigned long)); static int inst_saves_fr PARAMS ((unsigned long));
static int pc_in_interrupt_handler PARAMS ((CORE_ADDR)); static int pc_in_interrupt_handler PARAMS ((CORE_ADDR));
static int pc_in_linker_stub PARAMS ((CORE_ADDR)); static int pc_in_linker_stub PARAMS ((CORE_ADDR));
static int compare_unwind_entries PARAMS ((const struct unwind_table_entry *,
static int compare_unwind_entries PARAMS ((const struct unwind_table_entry *,
const struct unwind_table_entry *)); const struct unwind_table_entry *));
static void read_unwind_info PARAMS ((struct objfile *)); static void read_unwind_info PARAMS ((struct objfile *));
static void internalize_unwinds PARAMS ((struct objfile *, static void internalize_unwinds PARAMS ((struct objfile *,
struct unwind_table_entry *, struct unwind_table_entry *,
asection *, unsigned int, asection *, unsigned int,
@ -704,7 +715,7 @@ rp_saved (pc)
int int
frameless_function_invocation (frame) frameless_function_invocation (frame)
FRAME frame; struct frame_info *frame;
{ {
struct unwind_table_entry *u; struct unwind_table_entry *u;
@ -718,7 +729,7 @@ frameless_function_invocation (frame)
CORE_ADDR CORE_ADDR
saved_pc_after_call (frame) saved_pc_after_call (frame)
FRAME frame; struct frame_info *frame;
{ {
int ret_regnum; int ret_regnum;
CORE_ADDR pc; CORE_ADDR pc;
@ -738,7 +749,7 @@ saved_pc_after_call (frame)
CORE_ADDR CORE_ADDR
frame_saved_pc (frame) frame_saved_pc (frame)
FRAME frame; struct frame_info *frame;
{ {
CORE_ADDR pc = get_frame_pc (frame); CORE_ADDR pc = get_frame_pc (frame);
struct unwind_table_entry *u; struct unwind_table_entry *u;
@ -772,11 +783,9 @@ frame_saved_pc (frame)
&& (frame->next->signal_handler_caller && (frame->next->signal_handler_caller
|| pc_in_interrupt_handler (frame->next->pc))) || pc_in_interrupt_handler (frame->next->pc)))
{ {
struct frame_info *fi;
struct frame_saved_regs saved_regs; struct frame_saved_regs saved_regs;
fi = get_frame_info (frame->next); get_frame_saved_regs (frame, &saved_regs);
get_frame_saved_regs (fi, &saved_regs);
if (read_memory_integer (saved_regs.regs[FLAGS_REGNUM], 4) & 0x2) if (read_memory_integer (saved_regs.regs[FLAGS_REGNUM], 4) & 0x2)
pc = read_memory_integer (saved_regs.regs[31], 4) & ~0x3; pc = read_memory_integer (saved_regs.regs[31], 4) & ~0x3;
else else
@ -799,11 +808,9 @@ restart:
&& (frame->next->signal_handler_caller && (frame->next->signal_handler_caller
|| pc_in_interrupt_handler (frame->next->pc))) || pc_in_interrupt_handler (frame->next->pc)))
{ {
struct frame_info *fi;
struct frame_saved_regs saved_regs; struct frame_saved_regs saved_regs;
fi = get_frame_info (frame->next); get_frame_saved_regs (frame->next, &saved_regs);
get_frame_saved_regs (fi, &saved_regs);
if (read_memory_integer (saved_regs.regs[FLAGS_REGNUM], 4) & 0x2) if (read_memory_integer (saved_regs.regs[FLAGS_REGNUM], 4) & 0x2)
pc = read_memory_integer (saved_regs.regs[31], 4) & ~0x3; pc = read_memory_integer (saved_regs.regs[31], 4) & ~0x3;
else else
@ -885,9 +892,8 @@ init_extra_frame_info (fromleaf, frame)
This may involve searching through prologues for several functions This may involve searching through prologues for several functions
at boundaries where GCC calls HP C code, or where code which has at boundaries where GCC calls HP C code, or where code which has
a frame pointer calls code without a frame pointer. */ a frame pointer calls code without a frame pointer. */
FRAME_ADDR CORE_ADDR
frame_chain (frame) frame_chain (frame)
struct frame_info *frame; struct frame_info *frame;
{ {
@ -975,11 +981,9 @@ frame_chain (frame)
/* %r3 was saved somewhere in the stack. Dig it out. */ /* %r3 was saved somewhere in the stack. Dig it out. */
else else
{ {
struct frame_info *fi;
struct frame_saved_regs saved_regs; struct frame_saved_regs saved_regs;
fi = get_frame_info (frame); get_frame_saved_regs (frame, &saved_regs);
get_frame_saved_regs (fi, &saved_regs);
return read_memory_integer (saved_regs.regs[FP_REGNUM], 4); return read_memory_integer (saved_regs.regs[FP_REGNUM], 4);
} }
} }
@ -997,13 +1001,13 @@ frame_chain (frame)
int int
frame_chain_valid (chain, thisframe) frame_chain_valid (chain, thisframe)
FRAME_ADDR chain; CORE_ADDR chain;
FRAME thisframe; struct frame_info *thisframe;
{ {
struct minimal_symbol *msym_us; struct minimal_symbol *msym_us;
struct minimal_symbol *msym_start; struct minimal_symbol *msym_start;
struct unwind_table_entry *u, *next_u = NULL; struct unwind_table_entry *u, *next_u = NULL;
FRAME next; struct frame_info *next;
if (!chain) if (!chain)
return 0; return 0;
@ -1126,16 +1130,14 @@ find_dummy_frame_regs (frame, frame_saved_regs)
int int
hppa_pop_frame () hppa_pop_frame ()
{ {
register FRAME frame = get_current_frame (); register struct frame_info *frame = get_current_frame ();
register CORE_ADDR fp; register CORE_ADDR fp;
register int regnum; register int regnum;
struct frame_saved_regs fsr; struct frame_saved_regs fsr;
struct frame_info *fi;
double freg_buffer; double freg_buffer;
fi = get_frame_info (frame); fp = FRAME_FP (frame);
fp = fi->frame; get_frame_saved_regs (frame, &fsr);
get_frame_saved_regs (fi, &fsr);
#ifndef NO_PC_SPACE_QUEUE_RESTORE #ifndef NO_PC_SPACE_QUEUE_RESTORE
if (fsr.regs[IPSW_REGNUM]) /* Restoring a call dummy frame */ if (fsr.regs[IPSW_REGNUM]) /* Restoring a call dummy frame */
@ -1398,6 +1400,7 @@ hppa_fix_call_dummy (dummy, pc, fun, nargs, args, type, gcc_p)
/* Get the PC from %r31 if currently in a syscall. Also mask out privilege /* Get the PC from %r31 if currently in a syscall. Also mask out privilege
bits. */ bits. */
CORE_ADDR CORE_ADDR
target_read_pc (pid) target_read_pc (pid)
int pid; int pid;
@ -1411,6 +1414,7 @@ target_read_pc (pid)
/* Write out the PC. If currently in a syscall, then also write the new /* Write out the PC. If currently in a syscall, then also write the new
PC value into %r31. */ PC value into %r31. */
void void
target_write_pc (v, pid) target_write_pc (v, pid)
CORE_ADDR v; CORE_ADDR v;
@ -1597,7 +1601,7 @@ skip_trampoline_code (pc, name)
} }
/* Addresses passed to dyncall may *NOT* be the actual address /* Addresses passed to dyncall may *NOT* be the actual address
of the funtion. So we may have to do something special. */ of the function. So we may have to do something special. */
if (pc == dyncall) if (pc == dyncall)
{ {
pc = (CORE_ADDR) read_register (22); pc = (CORE_ADDR) read_register (22);
@ -2016,7 +2020,7 @@ skip_prologue (pc)
void void
hppa_frame_find_saved_regs (frame_info, frame_saved_regs) hppa_frame_find_saved_regs (frame_info, frame_saved_regs)
struct frame_info *frame_info; struct frame_info *frame;
struct frame_saved_regs *frame_saved_regs; struct frame_saved_regs *frame_saved_regs;
{ {
CORE_ADDR pc; CORE_ADDR pc;
@ -2033,38 +2037,38 @@ hppa_frame_find_saved_regs (frame_info, frame_saved_regs)
examine the dummy code to determine locations of saved registers; examine the dummy code to determine locations of saved registers;
instead, let find_dummy_frame_regs fill in the correct offsets instead, let find_dummy_frame_regs fill in the correct offsets
for the saved registers. */ for the saved registers. */
if ((frame_info->pc >= frame_info->frame if ((frame->pc >= frame->frame
&& frame_info->pc <= (frame_info->frame + CALL_DUMMY_LENGTH && frame->pc <= (frame->frame + CALL_DUMMY_LENGTH
+ 32 * 4 + (NUM_REGS - FP0_REGNUM) * 8 + 32 * 4 + (NUM_REGS - FP0_REGNUM) * 8
+ 6 * 4))) + 6 * 4)))
find_dummy_frame_regs (frame_info, frame_saved_regs); find_dummy_frame_regs (frame, frame_saved_regs);
/* Interrupt handlers are special too. They lay out the register /* Interrupt handlers are special too. They lay out the register
state in the exact same order as the register numbers in GDB. */ state in the exact same order as the register numbers in GDB. */
if (pc_in_interrupt_handler (frame_info->pc)) if (pc_in_interrupt_handler (frame->pc))
{ {
for (i = 0; i < NUM_REGS; i++) for (i = 0; i < NUM_REGS; i++)
{ {
/* SP is a little special. */ /* SP is a little special. */
if (i == SP_REGNUM) if (i == SP_REGNUM)
frame_saved_regs->regs[SP_REGNUM] frame_saved_regs->regs[SP_REGNUM]
= read_memory_integer (frame_info->frame + SP_REGNUM * 4, 4); = read_memory_integer (frame->frame + SP_REGNUM * 4, 4);
else else
frame_saved_regs->regs[i] = frame_info->frame + i * 4; frame_saved_regs->regs[i] = frame->frame + i * 4;
} }
return; return;
} }
/* Handle signal handler callers. */ /* Handle signal handler callers. */
if (frame_info->signal_handler_caller) if (frame->signal_handler_caller)
{ {
FRAME_FIND_SAVED_REGS_IN_SIGTRAMP (frame_info, frame_saved_regs); FRAME_FIND_SAVED_REGS_IN_SIGTRAMP (frame, frame_saved_regs);
return; return;
} }
/* Get the starting address of the function referred to by the PC /* Get the starting address of the function referred to by the PC
saved in frame_info. */ saved in frame. */
pc = get_pc_function_start (frame_info->pc); pc = get_pc_function_start (frame->pc);
/* Yow! */ /* Yow! */
u = find_unwind_entry (pc); u = find_unwind_entry (pc);
@ -2097,7 +2101,7 @@ hppa_frame_find_saved_regs (frame_info, frame_saved_regs)
/* The frame always represents the value of %sp at entry to the /* The frame always represents the value of %sp at entry to the
current function (and is thus equivalent to the "saved" stack current function (and is thus equivalent to the "saved" stack
pointer. */ pointer. */
frame_saved_regs->regs[SP_REGNUM] = frame_info->frame; frame_saved_regs->regs[SP_REGNUM] = frame->frame;
/* Loop until we find everything of interest or hit a branch. /* Loop until we find everything of interest or hit a branch.
@ -2129,7 +2133,7 @@ hppa_frame_find_saved_regs (frame_info, frame_saved_regs)
if (inst == 0x6bc23fd9) if (inst == 0x6bc23fd9)
{ {
save_rp = 0; save_rp = 0;
frame_saved_regs->regs[RP_REGNUM] = frame_info->frame - 20; frame_saved_regs->regs[RP_REGNUM] = frame->frame - 20;
} }
/* Just note that we found the save of SP into the stack. The /* Just note that we found the save of SP into the stack. The
@ -2147,16 +2151,16 @@ hppa_frame_find_saved_regs (frame_info, frame_saved_regs)
/* stwm with a positive displacement is a *post modify*. */ /* stwm with a positive displacement is a *post modify*. */
if ((inst >> 26) == 0x1b if ((inst >> 26) == 0x1b
&& extract_14 (inst) >= 0) && extract_14 (inst) >= 0)
frame_saved_regs->regs[reg] = frame_info->frame; frame_saved_regs->regs[reg] = frame->frame;
else else
{ {
/* Handle code with and without frame pointers. */ /* Handle code with and without frame pointers. */
if (u->Save_SP) if (u->Save_SP)
frame_saved_regs->regs[reg] frame_saved_regs->regs[reg]
= frame_info->frame + extract_14 (inst); = frame->frame + extract_14 (inst);
else else
frame_saved_regs->regs[reg] frame_saved_regs->regs[reg]
= frame_info->frame + (u->Total_frame_size << 3) = frame->frame + (u->Total_frame_size << 3)
+ extract_14 (inst); + extract_14 (inst);
} }
} }
@ -2188,13 +2192,13 @@ hppa_frame_find_saved_regs (frame_info, frame_saved_regs)
/* 1st HP CC FP register store. After this instruction /* 1st HP CC FP register store. After this instruction
we've set enough state that the GCC and HPCC code are we've set enough state that the GCC and HPCC code are
both handled in the same manner. */ both handled in the same manner. */
frame_saved_regs->regs[reg + FP4_REGNUM + 4] = frame_info->frame; frame_saved_regs->regs[reg + FP4_REGNUM + 4] = frame->frame;
fp_loc = 8; fp_loc = 8;
} }
else else
{ {
frame_saved_regs->regs[reg + FP0_REGNUM + 4] frame_saved_regs->regs[reg + FP0_REGNUM + 4]
= frame_info->frame + fp_loc; = frame->frame + fp_loc;
fp_loc += 8; fp_loc += 8;
} }
} }

69
gdb/i960-tdep.c
View File

@ -19,9 +19,6 @@ You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software along with this program; if not, write to the Free Software
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
/* Miscellaneous i80960-dependent routines.
Most are called from macros defined in "tm-i960.h". */
#include "defs.h" #include "defs.h"
#include "symtab.h" #include "symtab.h"
#include "value.h" #include "value.h"
@ -125,7 +122,7 @@ static CORE_ADDR
examine_prologue (ip, limit, frame_addr, fsr) examine_prologue (ip, limit, frame_addr, fsr)
register CORE_ADDR ip; register CORE_ADDR ip;
register CORE_ADDR limit; register CORE_ADDR limit;
FRAME_ADDR frame_addr; CORE_ADDR frame_addr;
struct frame_saved_regs *fsr; struct frame_saved_regs *fsr;
{ {
register CORE_ADDR next_ip; register CORE_ADDR next_ip;
@ -298,7 +295,7 @@ skip_prologue (ip)
sal = find_pc_line (ip, 0); sal = find_pc_line (ip, 0);
limit = (sal.end) ? sal.end : 0xffffffff; limit = (sal.end) ? sal.end : 0xffffffff;
return (examine_prologue (ip, limit, (FRAME_ADDR) 0, &saved_regs_dummy)); return (examine_prologue (ip, limit, (CORE_ADDR) 0, &saved_regs_dummy));
} }
/* Put here the code to store, into a struct frame_saved_regs, /* Put here the code to store, into a struct frame_saved_regs,
@ -384,7 +381,6 @@ CORE_ADDR
frame_args_address (fi, must_be_correct) frame_args_address (fi, must_be_correct)
struct frame_info *fi; struct frame_info *fi;
{ {
register FRAME frame;
struct frame_saved_regs fsr; struct frame_saved_regs fsr;
CORE_ADDR ap; CORE_ADDR ap;
@ -392,20 +388,20 @@ frame_args_address (fi, must_be_correct)
the saved value. If the frame is current and we are being sloppy, the saved value. If the frame is current and we are being sloppy,
return the value of g14. Otherwise, return zero. */ return the value of g14. Otherwise, return zero. */
frame = FRAME_INFO_ID (fi);
get_frame_saved_regs (fi, &fsr); get_frame_saved_regs (fi, &fsr);
if (fsr.regs[G14_REGNUM]) if (fsr.regs[G14_REGNUM])
ap = read_memory_integer (fsr.regs[G14_REGNUM],4); ap = read_memory_integer (fsr.regs[G14_REGNUM],4);
else { else
if (must_be_correct) {
return 0; /* Don't cache this result */ if (must_be_correct)
if (get_next_frame (frame)) return 0; /* Don't cache this result */
ap = 0; if (get_next_frame (fi))
else ap = 0;
ap = read_register (G14_REGNUM); else
if (ap == 0) ap = read_register (G14_REGNUM);
ap = fi->frame; if (ap == 0)
} ap = fi->frame;
}
fi->arg_pointer = ap; /* Cache it for next time */ fi->arg_pointer = ap; /* Cache it for next time */
return ap; return ap;
} }
@ -417,7 +413,6 @@ CORE_ADDR
frame_struct_result_address (fi) frame_struct_result_address (fi)
struct frame_info *fi; struct frame_info *fi;
{ {
register FRAME frame;
struct frame_saved_regs fsr; struct frame_saved_regs fsr;
CORE_ADDR ap; CORE_ADDR ap;
@ -429,16 +424,17 @@ frame_struct_result_address (fi)
the function prologue, and only use the current value if we have the function prologue, and only use the current value if we have
no saved value and are at TOS? -- gnu@cygnus.com */ no saved value and are at TOS? -- gnu@cygnus.com */
frame = FRAME_INFO_ID (fi); if (get_next_frame (fi))
if (get_next_frame (frame)) { {
get_frame_saved_regs (fi, &fsr); get_frame_saved_regs (fi, &fsr);
if (fsr.regs[G13_REGNUM]) if (fsr.regs[G13_REGNUM])
ap = read_memory_integer (fsr.regs[G13_REGNUM],4); ap = read_memory_integer (fsr.regs[G13_REGNUM],4);
else else
ap = 0; ap = 0;
} else { }
else
ap = read_register (G13_REGNUM); ap = read_register (G13_REGNUM);
}
return ap; return ap;
} }
@ -507,16 +503,15 @@ leafproc_return (ip)
CORE_ADDR CORE_ADDR
saved_pc_after_call (frame) saved_pc_after_call (frame)
FRAME frame; struct frame_info *frame;
{ {
CORE_ADDR saved_pc; CORE_ADDR saved_pc;
CORE_ADDR get_frame_pc ();
saved_pc = leafproc_return (get_frame_pc (frame)); saved_pc = leafproc_return (get_frame_pc (frame));
if (!saved_pc) if (!saved_pc)
saved_pc = FRAME_SAVED_PC (frame); saved_pc = FRAME_SAVED_PC (frame);
return (saved_pc); return saved_pc;
} }
/* Discard from the stack the innermost frame, /* Discard from the stack the innermost frame,
@ -531,7 +526,7 @@ pop_frame ()
struct frame_saved_regs fsr; struct frame_saved_regs fsr;
char local_regs_buf[16 * 4]; char local_regs_buf[16 * 4];
current_fi = get_frame_info (get_current_frame ()); current_fi = get_current_frame ();
/* First, undo what the hardware does when we return. /* First, undo what the hardware does when we return.
If this is a non-leaf procedure, restore local registers from If this is a non-leaf procedure, restore local registers from
@ -542,7 +537,7 @@ pop_frame ()
if (!leaf_return_addr) if (!leaf_return_addr)
{ {
/* Non-leaf procedure. Restore local registers, incl IP. */ /* Non-leaf procedure. Restore local registers, incl IP. */
prev_fi = get_frame_info (get_prev_frame (FRAME_INFO_ID (current_fi))); prev_fi = get_prev_frame (current_fi);
read_memory (prev_fi->frame, local_regs_buf, sizeof (local_regs_buf)); read_memory (prev_fi->frame, local_regs_buf, sizeof (local_regs_buf));
write_register_bytes (REGISTER_BYTE (R0_REGNUM), local_regs_buf, write_register_bytes (REGISTER_BYTE (R0_REGNUM), local_regs_buf,
sizeof (local_regs_buf)); sizeof (local_regs_buf));
@ -585,15 +580,15 @@ i960_fault_to_signal (fault)
case 3: return TARGET_SIGNAL_FPE; /* arithmetic fault */ case 3: return TARGET_SIGNAL_FPE; /* arithmetic fault */
case 4: return TARGET_SIGNAL_FPE; /* floating point fault */ case 4: return TARGET_SIGNAL_FPE; /* floating point fault */
/* constraint fault. This appears not to distinguish between /* constraint fault. This appears not to distinguish between
a range constraint fault (which should be SIGFPE) and a privileged a range constraint fault (which should be SIGFPE) and a privileged
fault (which should be SIGILL). */ fault (which should be SIGILL). */
case 5: return TARGET_SIGNAL_ILL; case 5: return TARGET_SIGNAL_ILL;
case 6: return TARGET_SIGNAL_SEGV; /* virtual memory fault */ case 6: return TARGET_SIGNAL_SEGV; /* virtual memory fault */
/* protection fault. This is for an out-of-range argument to /* protection fault. This is for an out-of-range argument to
"calls". I guess it also could be SIGILL. */ "calls". I guess it also could be SIGILL. */
case 7: return TARGET_SIGNAL_SEGV; case 7: return TARGET_SIGNAL_SEGV;
case 8: return TARGET_SIGNAL_BUS; /* machine fault */ case 8: return TARGET_SIGNAL_BUS; /* machine fault */

55
gdb/m88k-tdep.c
View File

@ -1,5 +1,5 @@
/* Target-machine dependent code for Motorola 88000 series, for GDB. /* Target-machine dependent code for Motorola 88000 series, for GDB.
Copyright (C) 1988, 1990, 1991 Free Software Foundation, Inc. Copyright (C) 1988, 1990, 1991, 1994 Free Software Foundation, Inc.
This file is part of GDB. This file is part of GDB.
@ -22,7 +22,6 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include "inferior.h" #include "inferior.h"
#include "value.h" #include "value.h"
#include "gdbcore.h" #include "gdbcore.h"
#include "symtab.h" #include "symtab.h"
#include "setjmp.h" #include "setjmp.h"
#include "value.h" #include "value.h"
@ -32,8 +31,9 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
void frame_find_saved_regs (); void frame_find_saved_regs ();
/* is this target an m88110? Otherwise assume m88100. This has /* Is this target an m88110? Otherwise assume m88100. This has
relevance for the ways in which we screw with instruction pointers. */ relevance for the ways in which we screw with instruction pointers. */
int target_is_m88110 = 0; int target_is_m88110 = 0;
/* Given a GDB frame, determine the address of the calling function's frame. /* Given a GDB frame, determine the address of the calling function's frame.
@ -43,9 +43,9 @@ int target_is_m88110 = 0;
For us, the frame address is its stack pointer value, so we look up For us, the frame address is its stack pointer value, so we look up
the function prologue to determine the caller's sp value, and return it. */ the function prologue to determine the caller's sp value, and return it. */
FRAME_ADDR CORE_ADDR
frame_chain (thisframe) frame_chain (thisframe)
FRAME thisframe; struct frame_info *thisframe;
{ {
frame_find_saved_regs (thisframe, (struct frame_saved_regs *) 0); frame_find_saved_regs (thisframe, (struct frame_saved_regs *) 0);
@ -60,7 +60,7 @@ frame_chain (thisframe)
int int
frameless_function_invocation (frame) frameless_function_invocation (frame)
FRAME frame; struct frame_info *frame;
{ {
frame_find_saved_regs (frame, (struct frame_saved_regs *) 0); frame_find_saved_regs (frame, (struct frame_saved_regs *) 0);
@ -74,13 +74,13 @@ frameless_function_invocation (frame)
} }
void void
init_extra_frame_info (fromleaf, fi) init_extra_frame_info (fromleaf, frame)
int fromleaf; int fromleaf;
struct frame_info *fi; struct frame_info *frame;
{ {
fi->fsr = 0; /* Not yet allocated */ frame->fsr = 0; /* Not yet allocated */
fi->args_pointer = 0; /* Unknown */ frame->args_pointer = 0; /* Unknown */
fi->locals_pointer = 0; /* Unknown */ frame->locals_pointer = 0; /* Unknown */
} }
/* Examine an m88k function prologue, recording the addresses at which /* Examine an m88k function prologue, recording the addresses at which
@ -204,14 +204,15 @@ next_insn (memaddr, pword1)
/* Read a register from frames called by us (or from the hardware regs). */ /* Read a register from frames called by us (or from the hardware regs). */
static int static int
read_next_frame_reg(fi, regno) read_next_frame_reg(frame, regno)
FRAME fi; struct frame_info *frame;
int regno; int regno;
{ {
for (; fi; fi = fi->next) { for (; frame; frame = frame->next) {
if (regno == SP_REGNUM) return fi->frame; if (regno == SP_REGNUM)
else if (fi->fsr->regs[regno]) return FRAME_FP (frame);
return read_memory_integer(fi->fsr->regs[regno], 4); else if (frame->fsr->regs[regno])
return read_memory_integer(frame->fsr->regs[regno], 4);
} }
return read_register(regno); return read_register(regno);
} }
@ -229,7 +230,7 @@ static CORE_ADDR
examine_prologue (ip, limit, frame_sp, fsr, fi) examine_prologue (ip, limit, frame_sp, fsr, fi)
register CORE_ADDR ip; register CORE_ADDR ip;
register CORE_ADDR limit; register CORE_ADDR limit;
FRAME_ADDR frame_sp; CORE_ADDR frame_sp;
struct frame_saved_regs *fsr; struct frame_saved_regs *fsr;
struct frame_info *fi; struct frame_info *fi;
{ {
@ -395,7 +396,7 @@ skip_prologue (ip)
sal = find_pc_line (ip, 0); sal = find_pc_line (ip, 0);
limit = (sal.end) ? sal.end : 0xffffffff; limit = (sal.end) ? sal.end : 0xffffffff;
return (examine_prologue (ip, limit, (FRAME_ADDR) 0, &saved_regs_dummy, return (examine_prologue (ip, limit, (CORE_ADDR) 0, &saved_regs_dummy,
(struct frame_info *)0 )); (struct frame_info *)0 ));
} }
@ -502,7 +503,7 @@ frame_args_address (fi)
CORE_ADDR CORE_ADDR
frame_saved_pc (frame) frame_saved_pc (frame)
FRAME frame; struct frame_info *frame;
{ {
return read_next_frame_reg(frame, SRP_REGNUM); return read_next_frame_reg(frame, SRP_REGNUM);
} }
@ -559,17 +560,15 @@ m88k_push_dummy_frame()
void void
pop_frame () pop_frame ()
{ {
register FRAME frame = get_current_frame (); register struct frame_info *frame = get_current_frame ();
register CORE_ADDR fp; register CORE_ADDR fp;
register int regnum; register int regnum;
struct frame_saved_regs fsr; struct frame_saved_regs fsr;
struct frame_info *fi;
fi = get_frame_info (frame); fp = FRAME_FP (frame);
fp = fi -> frame; get_frame_saved_regs (frame, &fsr);
get_frame_saved_regs (fi, &fsr);
if (PC_IN_CALL_DUMMY (read_pc(), read_register(SP_REGNUM), FRAME_FP(fi))) if (PC_IN_CALL_DUMMY (read_pc (), read_register (SP_REGNUM), FRAME_FP (fi)))
{ {
/* FIXME: I think get_frame_saved_regs should be handling this so /* FIXME: I think get_frame_saved_regs should be handling this so
that we can deal with the saved registers properly (e.g. frame that we can deal with the saved registers properly (e.g. frame
@ -605,7 +604,7 @@ pop_frame ()
if (fsr.regs[regnum]) if (fsr.regs[regnum])
write_register (regnum, write_register (regnum,
read_memory_integer (fsr.regs[regnum], 4)); read_memory_integer (fsr.regs[regnum], 4));
write_pc(frame_saved_pc(frame)); write_pc (frame_saved_pc (frame));
} }
reinit_frame_cache (); reinit_frame_cache ();
} }

2
gdb/nindy-tdep.c
View File

@ -34,7 +34,7 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
int int
nindy_frame_chain_valid (chain, curframe) nindy_frame_chain_valid (chain, curframe)
unsigned int chain; unsigned int chain;
FRAME curframe; struct frame_info *curframe;
{ {
struct symbol *sym; struct symbol *sym;
struct minimal_symbol *msymbol; struct minimal_symbol *msymbol;

4
gdb/pyr-tdep.c
View File

@ -84,7 +84,7 @@ pyr_do_registers_info (regnum, fpregs)
/*** Debugging editions of various macros from m-pyr.h ****/ /*** Debugging editions of various macros from m-pyr.h ****/
CORE_ADDR frame_locals_address (frame) CORE_ADDR frame_locals_address (frame)
FRAME frame; struct frame_info *frame;
{ {
register int addr = find_saved_register (frame,CFP_REGNUM); register int addr = find_saved_register (frame,CFP_REGNUM);
register int result = read_memory_integer (addr, 4); register int result = read_memory_integer (addr, 4);
@ -109,7 +109,7 @@ CORE_ADDR frame_locals_address (frame)
} }
CORE_ADDR frame_args_addr (frame) CORE_ADDR frame_args_addr (frame)
FRAME frame; struct frame_info *frame;
{ {
register int addr = find_saved_register (frame,CFP_REGNUM); register int addr = find_saved_register (frame,CFP_REGNUM);
register int result = read_memory_integer (addr, 4); register int result = read_memory_integer (addr, 4);

12
gdb/rs6000-tdep.c
View File

@ -455,11 +455,11 @@ pop_frame ()
{ {
CORE_ADDR pc, lr, sp, prev_sp; /* %pc, %lr, %sp */ CORE_ADDR pc, lr, sp, prev_sp; /* %pc, %lr, %sp */
struct aix_framedata fdata; struct aix_framedata fdata;
FRAME fr = get_current_frame (); struct frame_info *frame = get_current_frame ();
int addr, ii; int addr, ii;
pc = read_pc (); pc = read_pc ();
sp = FRAME_FP (fr); sp = FRAME_FP (frame);
if (stop_stack_dummy && dummy_frame_count) { if (stop_stack_dummy && dummy_frame_count) {
pop_dummy_frame (); pop_dummy_frame ();
@ -492,13 +492,13 @@ pop_frame ()
addr = prev_sp - fdata.offset; addr = prev_sp - fdata.offset;
if (fdata.saved_gpr != -1) if (fdata.saved_gpr != -1)
for (ii=fdata.saved_gpr; ii <= 31; ++ii) { for (ii = fdata.saved_gpr; ii <= 31; ++ii) {
read_memory (addr, &registers [REGISTER_BYTE (ii)], 4); read_memory (addr, &registers [REGISTER_BYTE (ii)], 4);
addr += 4; addr += 4;
} }
if (fdata.saved_fpr != -1) if (fdata.saved_fpr != -1)
for (ii=fdata.saved_fpr; ii <= 31; ++ii) { for (ii = fdata.saved_fpr; ii <= 31; ++ii) {
read_memory (addr, &registers [REGISTER_BYTE (ii+FP0_REGNUM)], 8); read_memory (addr, &registers [REGISTER_BYTE (ii+FP0_REGNUM)], 8);
addr += 8; addr += 8;
} }
@ -1090,11 +1090,11 @@ frame_initial_stack_address (fi)
return fi->initial_sp = read_register (fdata.alloca_reg); return fi->initial_sp = read_register (fdata.alloca_reg);
} }
FRAME_ADDR CORE_ADDR
rs6000_frame_chain (thisframe) rs6000_frame_chain (thisframe)
struct frame_info *thisframe; struct frame_info *thisframe;
{ {
FRAME_ADDR fp; CORE_ADDR fp;
if (inside_entry_file ((thisframe)->pc)) if (inside_entry_file ((thisframe)->pc))
return 0; return 0;
if (thisframe->signal_handler_caller) if (thisframe->signal_handler_caller)

29
gdb/sh-tdep.c
View File

@ -32,9 +32,6 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include "dis-asm.h" #include "dis-asm.h"
#include "../opcodes/sh-opc.h" #include "../opcodes/sh-opc.h"
/* Prologue looks like /* Prologue looks like
[mov.l <regs>,@-r15]... [mov.l <regs>,@-r15]...
[sts.l pr,@-r15] [sts.l pr,@-r15]
@ -56,7 +53,6 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
CORE_ADDR CORE_ADDR
sh_skip_prologue (start_pc) sh_skip_prologue (start_pc)
CORE_ADDR start_pc; CORE_ADDR start_pc;
{ {
int w; int w;
@ -84,7 +80,9 @@ print_insn (memaddr, stream)
GDB_FILE *stream; GDB_FILE *stream;
{ {
disassemble_info info; disassemble_info info;
GDB_INIT_DISASSEMBLE_INFO (info, stream); GDB_INIT_DISASSEMBLE_INFO (info, stream);
return print_insn_sh (memaddr, &info); return print_insn_sh (memaddr, &info);
} }
@ -95,12 +93,12 @@ print_insn (memaddr, stream)
For us, the frame address is its stack pointer value, so we look up For us, the frame address is its stack pointer value, so we look up
the function prologue to determine the caller's sp value, and return it. */ the function prologue to determine the caller's sp value, and return it. */
FRAME_ADDR CORE_ADDR
sh_frame_chain (thisframe) sh_frame_chain (frame)
FRAME thisframe; struct frame_info *frame;
{ {
if (!inside_entry_file (thisframe->pc)) if (!inside_entry_file (frame->pc))
return (read_memory_integer (FRAME_FP (thisframe) + thisframe->f_offset, 4)); return read_memory_integer (FRAME_FP (frame) + frame->f_offset, 4);
else else
return 0; return 0;
} }
@ -254,15 +252,13 @@ init_extra_frame_info (fromleaf, fi)
void void
pop_frame () pop_frame ()
{ {
register FRAME frame = get_current_frame (); register struct frame_info *frame = get_current_frame ();
register CORE_ADDR fp; register CORE_ADDR fp;
register int regnum; register int regnum;
struct frame_saved_regs fsr; struct frame_saved_regs fsr;
struct frame_info *fi;
fi = get_frame_info (frame); fp = FRAME_FP (frame);
fp = fi->frame; get_frame_saved_regs (frame, &fsr);
get_frame_saved_regs (fi, &fsr);
/* Copy regs from where they were saved in the frame */ /* Copy regs from where they were saved in the frame */
for (regnum = 0; regnum < NUM_REGS; regnum++) for (regnum = 0; regnum < NUM_REGS; regnum++)
@ -279,10 +275,11 @@ pop_frame ()
} }
/* Print the registers in a form similar to the E7000 */ /* Print the registers in a form similar to the E7000 */
static void static void
show_regs (args, from_tty) show_regs (args, from_tty)
char *args; char *args;
int from_tty; int from_tty;
{ {
printf_filtered("PC=%08x SR=%08x PR=%08x MACH=%08x MACHL=%08x\n", printf_filtered("PC=%08x SR=%08x PR=%08x MACH=%08x MACHL=%08x\n",
read_register(PC_REGNUM), read_register(PC_REGNUM),

76
gdb/z8k-tdep.c
View File

@ -1,5 +1,5 @@
/* Target-machine dependent code for Zilog Z8000, for GDB. /* Target-machine dependent code for Zilog Z8000, for GDB.
Copyright (C) 1992,1993 Free Software Foundation, Inc. Copyright (C) 1992, 1993, 1994 Free Software Foundation, Inc.
This file is part of GDB. This file is part of GDB.
@ -29,6 +29,7 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
#include "gdbcmd.h" #include "gdbcmd.h"
#include "gdbtypes.h" #include "gdbtypes.h"
#include "dis-asm.h" #include "dis-asm.h"
/* Return the saved PC from this frame. /* Return the saved PC from this frame.
If the frame has a memory copy of SRP_REGNUM, use that. If not, If the frame has a memory copy of SRP_REGNUM, use that. If not,
@ -36,9 +37,9 @@ Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
CORE_ADDR CORE_ADDR
frame_saved_pc (frame) frame_saved_pc (frame)
FRAME frame; struct frame_info *frame;
{ {
return (read_memory_pointer (frame->frame + (BIG ? 4 : 2))); return read_memory_pointer (frame->frame + (BIG ? 4 : 2));
} }
#define IS_PUSHL(x) (BIG ? ((x & 0xfff0) == 0x91e0):((x & 0xfff0) == 0x91F0)) #define IS_PUSHL(x) (BIG ? ((x & 0xfff0) == 0x91e0):((x & 0xfff0) == 0x91F0))
@ -147,24 +148,24 @@ addr_bits_remove (x)
return x & PTR_MASK; return x & PTR_MASK;
} }
int
read_memory_pointer (x) read_memory_pointer (x)
CORE_ADDR x; CORE_ADDR x;
{ {
return read_memory_integer (ADDR_BITS_REMOVE (x), BIG ? 4 : 2); return read_memory_integer (ADDR_BITS_REMOVE (x), BIG ? 4 : 2);
} }
FRAME_ADDR CORE_ADDR
frame_chain (thisframe) frame_chain (thisframe)
FRAME thisframe; struct frame_info *thisframe;
{ {
if (thisframe->prev == 0) if (thisframe->prev == 0)
{ {
/* This is the top of the stack, let's get the sp for real */ /* This is the top of the stack, let's get the sp for real */
} }
if (!inside_entry_file ((thisframe)->pc)) if (!inside_entry_file (thisframe->pc))
{ {
return read_memory_pointer ((thisframe)->frame); return read_memory_pointer (thisframe->frame);
} }
return 0; return 0;
} }
@ -210,7 +211,7 @@ print_insn (memaddr, stream)
{ {
disassemble_info info; disassemble_info info;
GDB_INIT_DISASSEMBLE_INFO(info, stream); GDB_INIT_DISASSEMBLE_INFO (info, stream);
if (BIG) if (BIG)
{ {
@ -268,7 +269,7 @@ frame_find_saved_regs (fip, fsrp)
pc = skip_adjust (get_pc_function_start (fip->pc), &locals); pc = skip_adjust (get_pc_function_start (fip->pc), &locals);
{ {
adr = fip->frame - locals; adr = FRAME_FP (fip) - locals;
for (i = 0; i < 8; i++) for (i = 0; i < 8; i++)
{ {
int word = read_memory_short (pc); int word = read_memory_short (pc);
@ -304,41 +305,42 @@ saved_pc_after_call ()
} }
extract_return_value(type, regbuf, valbuf) extract_return_value (type, regbuf, valbuf)
struct type *type; struct type *type;
char *regbuf; char *regbuf;
char *valbuf; char *valbuf;
{ {
int b; int b;
int len = TYPE_LENGTH(type); int len = TYPE_LENGTH (type);
for (b = 0; b < len; b += 2) { for (b = 0; b < len; b += 2)
int todo = len - b;
if (todo > 2)
todo = 2;
memcpy(valbuf + b, regbuf + b, todo);
}
}
void
write_return_value(type, valbuf)
struct type *type;
char *valbuf;
{
int reg;
int len;
for (len = 0; len < TYPE_LENGTH(type); len += 2)
{ {
write_register_bytes(REGISTER_BYTE(len /2 + 2), valbuf + len, 2); int todo = len - b;
if (todo > 2)
todo = 2;
memcpy (valbuf + b, regbuf + b, todo);
} }
} }
void void
store_struct_return(addr, sp) write_return_value (type, valbuf)
CORE_ADDR addr; struct type *type;
CORE_ADDR sp; char *valbuf;
{ {
write_register(2, addr); int reg;
int len;
for (len = 0; len < TYPE_LENGTH (type); len += 2)
write_register_bytes (REGISTER_BYTE (len / 2 + 2), valbuf + len, 2);
}
void
store_struct_return (addr, sp)
CORE_ADDR addr;
CORE_ADDR sp;
{
write_register (2, addr);
} }
@ -427,10 +429,8 @@ unsegmented_command (args, from_tty)
int from_tty; int from_tty;
{ {
z8k_set_pointer_size (16); z8k_set_pointer_size (16);
} }
static void static void
set_memory (args, from_tty) set_memory (args, from_tty)
char *args; char *args;