(Target Conditionals): Fix last change.
[deliverable/binutils-gdb.git] / gdb / ia64-linux-tdep.c
index 97f88142bb38dfb25d5171bb977ce69f522d83cc..b64907f53a653e02969d74c8267f787a1cfe898b 100644 (file)
@@ -1,6 +1,6 @@
 /* Target-dependent code for the IA-64 for GDB, the GNU debugger.
-   Copyright 2000
-   Free Software Foundation, Inc.
+
+   Copyright (C) 2000, 2004, 2005, 2007 Free Software Foundation, Inc.
 
    This file is part of GDB.
 
 
    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
-   Foundation, Inc., 59 Temple Place - Suite 330,
-   Boston, MA 02111-1307, USA.  */
+   Foundation, Inc., 51 Franklin Street, Fifth Floor,
+   Boston, MA 02110-1301, 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"
+#include "symtab.h"
 
 /* The sigtramp code is in a non-readable (executable-only) region
    of memory called the ``gate page''.  The addresses in question
    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 192
 
-int
-ia64_linux_in_sigtramp (CORE_ADDR pc, char *func_name)
+static int
+ia64_linux_pc_in_sigtramp (CORE_ADDR pc)
 {
   return (pc >= (CORE_ADDR) GATE_AREA_START && pc < (CORE_ADDR) GATE_AREA_END);
 }
@@ -44,44 +50,96 @@ 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 (struct regcache *regcache, CORE_ADDR pc)
+{
+  ia64_write_pc (regcache, pc);
+
+  /* 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.  */
+  regcache_cooked_write_unsigned (regcache, IA64_GR10_REGNUM, 0);
+}
+
+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 the pc_in_sigtramp method.  */
+  tdep->pc_in_sigtramp = ia64_linux_pc_in_sigtramp;
+
+  set_gdbarch_write_pc (gdbarch, ia64_linux_write_pc);
+
+  set_gdbarch_skip_trampoline_code (gdbarch, find_solib_trampoline_target);
+
+  /* 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);
+}
This page took 0.026085 seconds and 4 git commands to generate.