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

* mips-tdep.c (init_extra_frame_info): Use frame relative stack

Browse Source 
pointer value when fixing up the frame at the start of a function
This commit is contained in:
Peter Schauer 1994-01-22 20:45:55 +00:00
parent e90445c997
commit 5efd597b3c
2 changed files with 38 additions and 20 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gdb/ChangeLog
View File

@ -1,3 +1,8 @@
Sat Jan 22 20:25:11 1994 Peter Schauer (pes@regent.e-technik.tu-muenchen.de)
* mips-tdep.c (init_extra_frame_info): Use frame relative stack
pointer value when fixing up the frame at the start of a function
Sat Jan 22 12:29:13 1994 Stu Grossman (grossman at cygnus.com) Sat Jan 22 12:29:13 1994 Stu Grossman (grossman at cygnus.com)
* lynx-nat.c (fetch_core_registers): Load the I & L regs for the * lynx-nat.c (fetch_core_registers): Load the I & L regs for the

51
gdb/mips-tdep.c
View File

@ -83,6 +83,8 @@ read_next_frame_reg(fi, regno)
#define SIGFRAME_BASE 0x12c /* sizeof(sigcontext) */ #define SIGFRAME_BASE 0x12c /* sizeof(sigcontext) */
#define SIGFRAME_PC_OFF (-SIGFRAME_BASE + 2 * 4) #define SIGFRAME_PC_OFF (-SIGFRAME_BASE + 2 * 4)
#define SIGFRAME_REGSAVE_OFF (-SIGFRAME_BASE + 3 * 4) #define SIGFRAME_REGSAVE_OFF (-SIGFRAME_BASE + 3 * 4)
#endif
#ifndef SIGFRAME_REG_SIZE
#define SIGFRAME_REG_SIZE 4 #define SIGFRAME_REG_SIZE 4
#endif #endif
for (; fi; fi = fi->next) for (; fi; fi = fi->next)
@ -382,9 +384,11 @@ init_extra_frame_info(fci)
int kernel_trap = PROC_REG_MASK(proc_desc) & 1; int kernel_trap = PROC_REG_MASK(proc_desc) & 1;
/* Fixup frame-pointer - only needed for top frame */ /* Fixup frame-pointer - only needed for top frame */
/* 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
interrupted by a signal at it's very start. */
if (fci->pc == PROC_LOW_ADDR(proc_desc) && !PROC_DESC_IS_DUMMY(proc_desc)) if (fci->pc == PROC_LOW_ADDR(proc_desc) && !PROC_DESC_IS_DUMMY(proc_desc))
fci->frame = read_register (SP_REGNUM); fci->frame = READ_FRAME_REG(fci, SP_REGNUM);
else else
fci->frame = READ_FRAME_REG(fci, PROC_FRAME_REG(proc_desc)) fci->frame = READ_FRAME_REG(fci, PROC_FRAME_REG(proc_desc))
+ PROC_FRAME_OFFSET(proc_desc); + PROC_FRAME_OFFSET(proc_desc);
@ -533,7 +537,6 @@ mips_push_arguments(nargs, args, sp, struct_return, struct_addr)
int struct_return; int struct_return;
CORE_ADDR struct_addr; CORE_ADDR struct_addr;
{ {
CORE_ADDR buf;
register i; register i;
int accumulate_size = struct_return ? 4 : 0; int accumulate_size = struct_return ? 4 : 0;
struct mips_arg { char *contents; int len; int offset; }; struct mips_arg { char *contents; int len; int offset; };
@ -561,9 +564,12 @@ mips_push_arguments(nargs, args, sp, struct_return, struct_addr)
sp -= accumulate_size; sp -= accumulate_size;
for (i = nargs; m_arg--, --i >= 0; ) for (i = nargs; m_arg--, --i >= 0; )
write_memory(sp + m_arg->offset, m_arg->contents, m_arg->len); write_memory(sp + m_arg->offset, m_arg->contents, m_arg->len);
if (struct_return) { if (struct_return)
buf = struct_addr; {
write_memory(sp, (char *)&buf, sizeof(CORE_ADDR)); char buf[TARGET_PTR_BIT / HOST_CHAR_BIT];
store_address (buf, sizeof buf, struct_addr);
write_memory (sp, buf, sizeof buf);
} }
return sp; return sp;
} }
@ -574,13 +580,13 @@ mips_push_arguments(nargs, args, sp, struct_return, struct_addr)
void void
mips_push_dummy_frame() mips_push_dummy_frame()
{ {
char buffer[MAX_REGISTER_RAW_SIZE];
int ireg; int ireg;
struct linked_proc_info *link = (struct linked_proc_info*) struct linked_proc_info *link = (struct linked_proc_info*)
xmalloc(sizeof(struct linked_proc_info)); xmalloc(sizeof(struct linked_proc_info));
mips_extra_func_info_t proc_desc = &link->info; mips_extra_func_info_t proc_desc = &link->info;
CORE_ADDR sp = read_register (SP_REGNUM); CORE_ADDR sp = read_register (SP_REGNUM);
CORE_ADDR save_address; CORE_ADDR save_address;
REGISTER_TYPE buffer;
link->next = linked_proc_desc_table; link->next = linked_proc_desc_table;
linked_proc_desc_table = link; linked_proc_desc_table = link;
#define PUSH_FP_REGNUM 16 /* must be a register preserved across calls */ #define PUSH_FP_REGNUM 16 /* must be a register preserved across calls */
@ -621,8 +627,9 @@ mips_push_dummy_frame()
for (ireg = 32; --ireg >= 0; ) for (ireg = 32; --ireg >= 0; )
if (PROC_REG_MASK(proc_desc) & (1 << ireg)) if (PROC_REG_MASK(proc_desc) & (1 << ireg))
{ {
buffer = read_register (ireg); store_unsigned_integer (buffer, REGISTER_RAW_SIZE (ireg),
write_memory (save_address, (char *)&buffer, sizeof(REGISTER_TYPE)); read_register (ireg));
write_memory (save_address, buffer, REGISTER_RAW_SIZE (ireg));
save_address -= 4; save_address -= 4;
} }
/* save floating-points registers starting with high order word */ /* save floating-points registers starting with high order word */
@ -630,21 +637,27 @@ mips_push_dummy_frame()
for (ireg = 32; --ireg >= 0; ) for (ireg = 32; --ireg >= 0; )
if (PROC_FREG_MASK(proc_desc) & (1 << ireg)) if (PROC_FREG_MASK(proc_desc) & (1 << ireg))
{ {
buffer = read_register (ireg + FP0_REGNUM); store_unsigned_integer (buffer, 4, read_register (ireg + FP0_REGNUM));
write_memory (save_address, (char *)&buffer, 4); write_memory (save_address, buffer, 4);
save_address -= 4; save_address -= 4;
} }
write_register (PUSH_FP_REGNUM, sp); write_register (PUSH_FP_REGNUM, sp);
PROC_FRAME_REG(proc_desc) = PUSH_FP_REGNUM; PROC_FRAME_REG(proc_desc) = PUSH_FP_REGNUM;
PROC_FRAME_OFFSET(proc_desc) = 0; PROC_FRAME_OFFSET(proc_desc) = 0;
buffer = read_register (PC_REGNUM); store_unsigned_integer (buffer, REGISTER_RAW_SIZE (PC_REGNUM),
write_memory (sp - 4, (char *)&buffer, sizeof(REGISTER_TYPE)); read_register (PC_REGNUM));
buffer = read_register (HI_REGNUM); write_memory (sp - 4, buffer, REGISTER_RAW_SIZE (PC_REGNUM));
write_memory (sp - 8, (char *)&buffer, sizeof(REGISTER_TYPE)); store_unsigned_integer (buffer, REGISTER_RAW_SIZE (HI_REGNUM),
buffer = read_register (LO_REGNUM); read_register (HI_REGNUM));
write_memory (sp - 12, (char *)&buffer, sizeof(REGISTER_TYPE)); write_memory (sp - 8, buffer, REGISTER_RAW_SIZE (HI_REGNUM));
buffer = read_register (mips_fpu ? FCRCS_REGNUM : ZERO_REGNUM); store_unsigned_integer (buffer, REGISTER_RAW_SIZE (LO_REGNUM),
write_memory (sp - 16, (char *)&buffer, sizeof(REGISTER_TYPE)); read_register (LO_REGNUM));
write_memory (sp - 12, buffer, REGISTER_RAW_SIZE (LO_REGNUM));
store_unsigned_integer
(buffer,
REGISTER_RAW_SIZE (FCRCS_REGNUM),
mips_fpu ? read_register (FCRCS_REGNUM) : 0);
write_memory (sp - 16, buffer, REGISTER_RAW_SIZE (FCRCS_REGNUM));
sp -= 4 * (GEN_REG_SAVE_COUNT sp -= 4 * (GEN_REG_SAVE_COUNT
+ (mips_fpu ? FLOAT_REG_SAVE_COUNT : 0) + (mips_fpu ? FLOAT_REG_SAVE_COUNT : 0)
+ SPECIAL_REG_SAVE_COUNT); + SPECIAL_REG_SAVE_COUNT);