This is the mail archive of the
gdb-patches@sources.redhat.com
mailing list for the GDB project.
[rfa:rs6000] Move rs6000_fix_call_dummy into push_dummy_call
- From: Andrew Cagney <ac131313 at redhat dot com>
- To: gdb-patches at sources dot redhat dot com
- Date: Tue, 09 Sep 2003 17:48:13 -0400
- Subject: [rfa:rs6000] Move rs6000_fix_call_dummy into push_dummy_call
Hello,
This isn't so obvious.
The rs6000 was unconditionally setting the FIX_CALL_DUMMY method and
then using it as a way of setting the TOC register. #include "the thing
is" ...
The function looks like:
if (rs6000_find_toc_address_hook != NULL)
{
CORE_ADDR tocvalue = (*rs6000_find_toc_address_hook) (fun);
write_register (gdbarch_tdep (current_gdbarch)->ppc_toc_regnum,
tocvalue);
}
but "rs6000_find_toc_address_hook" is only non NULL when the GDB build
includes "rs6000-nat.c" which is AIX specific.
Hence, since this is an AIX / RS6000 / PowerOpen specific thing (and not
PPC SysV), I'm only moving it to rs6000_push_dummy_call.
make sense? ok?
Andrew
2003-09-09 Andrew Cagney <cagney@redhat.com>
* rs6000-tdep.c (rs6000_fix_call_dummy): Delete function.
(rs6000_push_dummy_call): Set the "TOC" register.
Index: rs6000-tdep.c
===================================================================
RCS file: /cvs/src/src/gdb/rs6000-tdep.c,v
retrieving revision 1.152
diff -u -r1.152 rs6000-tdep.c
--- rs6000-tdep.c 9 Sep 2003 20:22:37 -0000 1.152
+++ rs6000-tdep.c 9 Sep 2003 21:45:46 -0000
@@ -1075,25 +1075,6 @@
flush_cached_frames ();
}
-/* Fixup the call sequence of a dummy function, with the real function
- address. Its arguments will be passed by gdb. */
-
-static void
-rs6000_fix_call_dummy (char *dummyname, CORE_ADDR pc, CORE_ADDR fun,
- int nargs, struct value **args, struct type *type,
- int gcc_p)
-{
- int ii;
- CORE_ADDR target_addr;
-
- if (rs6000_find_toc_address_hook != NULL)
- {
- CORE_ADDR tocvalue = (*rs6000_find_toc_address_hook) (fun);
- write_register (gdbarch_tdep (current_gdbarch)->ppc_toc_regnum,
- tocvalue);
- }
-}
-
/* All the ABI's require 16 byte alignment. */
static CORE_ADDR
rs6000_frame_align (struct gdbarch *gdbarch, CORE_ADDR addr)
@@ -1321,6 +1302,14 @@
store_unsigned_integer (tmp_buffer, 4, saved_sp);
write_memory (sp, tmp_buffer, 4);
+ /* Set the TOC register, get the value from the objfile reader
+ which, in turn, gets it from the VMAP table. */
+ if (rs6000_find_toc_address_hook != NULL)
+ {
+ CORE_ADDR tocvalue = (*rs6000_find_toc_address_hook) (func_addr);
+ regcache_raw_write_signed (regcache, tdep->ppc_toc_regnum, tocvalue);
+ }
+
target_store_registers (-1);
return sp;
}
@@ -2941,7 +2930,6 @@
set_gdbarch_long_double_bit (gdbarch, 8 * TARGET_CHAR_BIT);
set_gdbarch_char_signed (gdbarch, 0);
- set_gdbarch_deprecated_fix_call_dummy (gdbarch, rs6000_fix_call_dummy);
set_gdbarch_frame_align (gdbarch, rs6000_frame_align);
if (sysv_abi && wordsize == 8)
/* PPC64 SYSV. */