*** empty log message ***

[deliverable/binutils-gdb.git] / gdb / ia64-linux-tdep.c

diff --git a/gdb/ia64-linux-tdep.c b/gdb/ia64-linux-tdep.c
index 87c6af4b440e28c2e0ce1e0dd1aff5685853b1a4..2ce3b9a080590c1b40bda057c5274403f0cc396a 100644 (file)
--- a/gdb/ia64-linux-tdep.c
+++ b/gdb/ia64-linux-tdep.c
@@ -1,6 +1,6 @@
 /* Target-dependent code for the IA-64 for GDB, the GNU debugger.
-   Copyright 2000
-   Free Software Foundation, Inc.
+
+   Copyright 2000, 2004, 2005 Free Software Foundation, Inc.
 
    This file is part of GDB.
 
@@ -20,7 +20,12 @@
    Boston, MA 02111-1307, USA.  */
 
 #include "defs.h"
+#include "ia64-tdep.h"
 #include "arch-utils.h"
+#include "gdbcore.h"
+#include "regcache.h"
+#include "osabi.h"
+#include "solib-svr4.h"
 
 /* The sigtramp code is in a non-readable (executable-only) region
    of memory called the ``gate page''.  The addresses in question
@@ -28,10 +33,10 @@
    overly generous to allow for different pages sizes. */
 
 #define GATE_AREA_START 0xa000000000000100LL
-#define GATE_AREA_END   0xa000000000010000LL
+#define GATE_AREA_END   0xa000000000020000LL
 
 /* Offset to sigcontext structure from frame of handler */
-#define IA64_LINUX_SIGCONTEXT_OFFSET 160
+#define IA64_LINUX_SIGCONTEXT_OFFSET 192
 
 int
 ia64_linux_in_sigtramp (CORE_ADDR pc, char *func_name)
@@ -44,44 +49,91 @@ ia64_linux_in_sigtramp (CORE_ADDR pc, char *func_name)
    found.  0 is returned for registers which aren't stored in the the
    sigcontext structure. */
 
-CORE_ADDR
+static CORE_ADDR
 ia64_linux_sigcontext_register_address (CORE_ADDR sp, int regno)
 {
+  char buf[8];
+  CORE_ADDR sigcontext_addr = 0;
+
+  /* The address of the sigcontext area is found at offset 16 in the sigframe.  */
+  read_memory (sp + 16, buf, 8);
+  sigcontext_addr = extract_unsigned_integer (buf, 8);
+
   if (IA64_GR0_REGNUM <= regno && regno <= IA64_GR31_REGNUM)
-    return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 200 + 8 * (regno - IA64_GR0_REGNUM);
+    return sigcontext_addr + 200 + 8 * (regno - IA64_GR0_REGNUM);
   else if (IA64_BR0_REGNUM <= regno && regno <= IA64_BR7_REGNUM)
-    return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 136 + 8 * (regno - IA64_BR0_REGNUM);
+    return sigcontext_addr + 136 + 8 * (regno - IA64_BR0_REGNUM);
   else if (IA64_FR0_REGNUM <= regno && regno <= IA64_FR127_REGNUM)
-    return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 464 + 16 * (regno - IA64_FR0_REGNUM);
+    return sigcontext_addr + 464 + 16 * (regno - IA64_FR0_REGNUM);
   else
     switch (regno)
       {
       case IA64_IP_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 40;
+       return sigcontext_addr + 40;
       case IA64_CFM_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 48;
+       return sigcontext_addr + 48;
       case IA64_PSR_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 56;          /* user mask only */
+       return sigcontext_addr + 56;            /* user mask only */
       /* sc_ar_rsc is provided, from which we could compute bspstore, but
         I don't think it's worth it.  Anyway, if we want it, it's at offset
         64 */
       case IA64_BSP_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 72;
+       return sigcontext_addr + 72;
       case IA64_RNAT_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 80;
+       return sigcontext_addr + 80;
       case IA64_CCV_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 88;
+       return sigcontext_addr + 88;
       case IA64_UNAT_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 96;
+       return sigcontext_addr + 96;
       case IA64_FPSR_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 104;
+       return sigcontext_addr + 104;
       case IA64_PFS_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 112;
+       return sigcontext_addr + 112;
       case IA64_LC_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 120;
+       return sigcontext_addr + 120;
       case IA64_PR_REGNUM :
-       return sp + IA64_LINUX_SIGCONTEXT_OFFSET + 128;
+       return sigcontext_addr + 128;
       default :
        return 0;
       }
 }
+
+static void
+ia64_linux_write_pc (CORE_ADDR pc, ptid_t ptid)
+{
+  ia64_write_pc (pc, ptid);
+
+  /* We must be careful with modifying the instruction-pointer: if we
+     just interrupt a system call, the kernel would ordinarily try to
+     restart it when we resume the inferior, which typically results
+     in SIGSEGV or SIGILL.  We prevent this by clearing r10, which
+     will tell the kernel that r8 does NOT contain a valid error code
+     and hence it will skip system-call restart.
+
+     The clearing of r10 is safe as long as ia64_write_pc() is only
+     called as part of setting up an inferior call.  */
+  write_register_pid (IA64_GR10_REGNUM, 0, ptid);
+}
+
+static void
+ia64_linux_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
+{
+  struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
+
+  /* Set the method of obtaining the sigcontext addresses at which
+     registers are saved.  */
+  tdep->sigcontext_register_address = ia64_linux_sigcontext_register_address;
+
+  set_gdbarch_write_pc (gdbarch, ia64_linux_write_pc);
+
+  /* Enable TLS support.  */
+  set_gdbarch_fetch_tls_load_module_address (gdbarch,
+                                             svr4_fetch_objfile_link_map);
+}
+
+void
+_initialize_ia64_linux_tdep (void)
+{
+  gdbarch_register_osabi (bfd_arch_ia64, 0, GDB_OSABI_LINUX,
+                         ia64_linux_init_abi);
+}