diff options
author | Jeff Law <law@redhat.com> | 1994-12-28 21:55:21 +0000 |
---|---|---|
committer | Jeff Law <law@redhat.com> | 1994-12-28 21:55:21 +0000 |
commit | 244f7460fb4c76a765df71bacb1966b76a2e4343 (patch) | |
tree | be674c24bdeb0605a6a5683fe1b7193ab4fe553b | |
parent | 4a9c666ec2f5f6355403ce8b36cfaac0822facde (diff) | |
download | gdb-244f7460fb4c76a765df71bacb1966b76a2e4343.zip gdb-244f7460fb4c76a765df71bacb1966b76a2e4343.tar.gz gdb-244f7460fb4c76a765df71bacb1966b76a2e4343.tar.bz2 |
* hppa-tdep.c (push_dummy_frame): Refine code to determine what
space ID to place in the stack & inf_status structure.
(hppa_pop_frame): Don't walk through trampoline code if popping a
call dummy frame.
(hppa_fix_call_dummy): Call the stack dummy directly if the
current PC is in a shared library.
-rw-r--r-- | gdb/ChangeLog | 7 | ||||
-rw-r--r-- | gdb/hppa-tdep.c | 23 |
2 files changed, 26 insertions, 4 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index fa9bd14..47eff8f 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,12 @@ Wed Dec 28 12:21:39 1994 Jeff Law (law@snake.cs.utah.edu) + * hppa-tdep.c (push_dummy_frame): Refine code to determine what + space ID to place in the stack & inf_status structure. + (hppa_pop_frame): Don't walk through trampoline code if popping a + call dummy frame. + (hppa_fix_call_dummy): Call the stack dummy directly if the + current PC is in a shared library. + * hppa-tdep.c (push_dummy_frame): Return type is void. Clear in_syscall bit in flags. Don't depend on the PC queue registers when in_syscall is set, they're not valid. diff --git a/gdb/hppa-tdep.c b/gdb/hppa-tdep.c index dbdd1e5..1b96ba9 100644 --- a/gdb/hppa-tdep.c +++ b/gdb/hppa-tdep.c @@ -1101,13 +1101,18 @@ push_dummy_frame (inf_status) int_buffer = read_register (FLAGS_REGNUM); if (int_buffer & 0x2) { + unsigned int sid; int_buffer &= ~0x2; memcpy (inf_status->registers, &int_buffer, 4); memcpy (inf_status->registers + REGISTER_BYTE (PCOQ_HEAD_REGNUM), &pc, 4); pc += 4; memcpy (inf_status->registers + REGISTER_BYTE (PCOQ_TAIL_REGNUM), &pc, 4); pc -= 4; - pcspace = read_register (SR4_REGNUM); + sid = (pc >> 30) & 0x3; + if (sid == 0) + pcspace = read_register (SR4_REGNUM); + else + pcspace = read_register (SR4_REGNUM + 4 + sid); memcpy (inf_status->registers + REGISTER_BYTE (PCSQ_HEAD_REGNUM), &pcspace, 4); memcpy (inf_status->registers + REGISTER_BYTE (PCSQ_TAIL_REGNUM), @@ -1241,9 +1246,11 @@ hppa_pop_frame () we want to restart the inferior and run it through the trampoline. Do this by setting a momentary breakpoint at the location the - trampoline returns to. */ + trampoline returns to. + + Don't skip through the trampoline if we're popping a dummy frame. */ target_pc = SKIP_TRAMPOLINE_CODE (npc & ~0x3) & ~0x3; - if (target_pc) + if (target_pc && !fsr.regs[IPSW_REGNUM]) { struct symtab_and_line sal; struct breakpoint *breakpoint; @@ -1491,9 +1498,17 @@ hppa_fix_call_dummy (dummy, pc, fun, nargs, args, type, gcc_p) directly. $$dyncall is not needed as the kernel sets up the space id registers properly based on the value in %r31. In fact calling $$dyncall will not work because the value in %r22 - will be clobbered on the syscall exit path. */ + will be clobbered on the syscall exit path. + + Similarly if the current PC is in a shared library. Note however, + this scheme won't work if the shared library isn't mapped into + the same space as the stack. */ if (flags & 2) return pc; +#ifndef GDB_TARGET_IS_PA_ELF + else if (som_solib_get_got_by_pc (target_read_pc (inferior_pid))) + return pc; +#endif else return dyncall_addr; |