* gdbarch.sh (deprecated_register_size): Remove.

[deliverable/binutils-gdb.git] / gdb / alpha-linux-nat.c

diff --git a/gdb/alpha-linux-nat.c b/gdb/alpha-linux-nat.c
index d93494de8ab9b4d1fc1eb32723112d0f8f39227b..aafd198f1762f5590ff69cc910318aacbd112667 100644 (file)
--- a/gdb/alpha-linux-nat.c
+++ b/gdb/alpha-linux-nat.c
@@ -20,12 +20,86 @@
 
 #include "defs.h"
 #include "target.h"
+#include "regcache.h"
 #include "linux-nat.h"
 
+#include "alpha-tdep.h"
+
+#include <sys/ptrace.h>
+#include <alpha/ptrace.h>
+
+#include <sys/procfs.h>
+#include "gregset.h"
+
+/* The address of UNIQUE for ptrace.  */
+#define ALPHA_UNIQUE_PTRACE_ADDR 65
+
+
+/*
+ * See the comment in m68k-tdep.c regarding the utility of these functions.
+ */
+
+void
+supply_gregset (struct regcache *regcache, const gdb_gregset_t *gregsetp)
+{
+  const long *regp = (const long *)gregsetp;
+
+  /* PC is in slot 32, UNIQUE is in slot 33.  */
+  alpha_supply_int_regs (regcache, -1, regp, regp + 31, regp + 32);
+}
+
+void
+fill_gregset (const struct regcache *regcache,
+             gdb_gregset_t *gregsetp, int regno)
+{
+  long *regp = (long *)gregsetp;
+
+  /* PC is in slot 32, UNIQUE is in slot 33.  */
+  alpha_fill_int_regs (regcache, regno, regp, regp + 31, regp + 32);
+}
+
+/*
+ * Now we do the same thing for floating-point registers.
+ * Again, see the comments in m68k-tdep.c.
+ */
+
+void
+supply_fpregset (struct regcache *regcache, const gdb_fpregset_t *fpregsetp)
+{
+  const long *regp = (const long *)fpregsetp;
+
+  /* FPCR is in slot 32.  */
+  alpha_supply_fp_regs (regcache, -1, regp, regp + 31);
+}
+
+void
+fill_fpregset (const struct regcache *regcache,
+              gdb_fpregset_t *fpregsetp, int regno)
+{
+  long *regp = (long *)fpregsetp;
+
+  /* FPCR is in slot 32.  */
+  alpha_fill_fp_regs (regcache, regno, regp, regp + 31);
+}
+
+
+static CORE_ADDR
+alpha_linux_register_u_offset (struct gdbarch *gdbarch, int regno, int store_p)
+{
+  if (regno == gdbarch_pc_regnum (current_gdbarch))
+    return PC;
+  if (regno == ALPHA_UNIQUE_REGNUM)
+    return ALPHA_UNIQUE_PTRACE_ADDR;
+  if (regno < gdbarch_fp0_regnum (current_gdbarch))
+    return GPR_BASE + regno;
+  else
+    return FPR_BASE + regno - gdbarch_fp0_regnum (current_gdbarch);
+}
+
 void _initialialize_alpha_linux_nat (void);
 
 void
 _initialize_alpha_linux_nat (void)
 {
-  linux_nat_add_target (linux_target ());
+  linux_nat_add_target (linux_trad_target (alpha_linux_register_u_offset));
 }