2004-08-08 Andrew Cagney <cagney@gnu.org>
[deliverable/binutils-gdb.git] / gdb / armnbsd-nat.c
index 8a191673c1bb0b90c359bb5710386c435b76cbf5..13ba0cb812541b9ada9f9815a668a04d8f4f28f3 100644 (file)
 
 #include "defs.h"
 
+#ifndef FETCH_INFERIOR_REGISTERS
+#error Not FETCH_INFERIOR_REGISTERS 
+#endif /* !FETCH_INFERIOR_REGISTERS */
+
 #include "arm-tdep.h"
 
-#ifdef FETCH_INFERIOR_REGISTERS
 #include <sys/types.h>
 #include <sys/ptrace.h>
 #include <machine/reg.h>
 #include <machine/frame.h>
 #include "inferior.h"
 #include "regcache.h"
+#include "gdbcore.h"
 
 extern int arm_apcs_32;
 
+static void
+supply_gregset (struct reg *gregset)
+{
+  int regno;
+  CORE_ADDR r_pc;
+
+  /* Integer registers.  */
+  for (regno = ARM_A1_REGNUM; regno < ARM_SP_REGNUM; regno++)
+    regcache_raw_supply (current_regcache, regno, (char *) &gregset->r[regno]);
+
+  regcache_raw_supply (current_regcache, ARM_SP_REGNUM,
+                      (char *) &gregset->r_sp);
+  regcache_raw_supply (current_regcache, ARM_LR_REGNUM,
+                      (char *) &gregset->r_lr);
+  /* This is ok: we're running native...  */
+  r_pc = ADDR_BITS_REMOVE (gregset->r_pc);
+  regcache_raw_supply (current_regcache, ARM_PC_REGNUM, (char *) &r_pc);
+
+  if (arm_apcs_32)
+    regcache_raw_supply (current_regcache, ARM_PS_REGNUM,
+                        (char *) &gregset->r_cpsr);
+  else
+    regcache_raw_supply (current_regcache, ARM_PS_REGNUM,
+                        (char *) &gregset->r_pc);
+}
+
+static void
+supply_fparegset (struct fpreg *fparegset)
+{
+  int regno;
+
+  for (regno = ARM_F0_REGNUM; regno <= ARM_F7_REGNUM; regno++)
+    regcache_raw_supply (current_regcache, regno,
+                        (char *) &fparegset->fpr[regno - ARM_F0_REGNUM]);
+
+  regcache_raw_supply (current_regcache, ARM_FPS_REGNUM,
+                      (char *) &fparegset->fpr_fpsr);
+}
+
 static void
 fetch_register (int regno)
 {
@@ -51,34 +94,40 @@ fetch_register (int regno)
   switch (regno)
     {
     case ARM_SP_REGNUM:
-      supply_register (ARM_SP_REGNUM, (char *) &inferior_registers.r_sp);
+      regcache_raw_supply (current_regcache, ARM_SP_REGNUM,
+                          (char *) &inferior_registers.r_sp);
       break;
 
     case ARM_LR_REGNUM:
-      supply_register (ARM_LR_REGNUM, (char *) &inferior_registers.r_lr);
+      regcache_raw_supply (current_regcache, ARM_LR_REGNUM,
+                          (char *) &inferior_registers.r_lr);
       break;
 
     case ARM_PC_REGNUM:
       /* This is ok: we're running native... */
       inferior_registers.r_pc = ADDR_BITS_REMOVE (inferior_registers.r_pc);
-      supply_register (ARM_PC_REGNUM, (char *) &inferior_registers.r_pc);
+      regcache_raw_supply (current_regcache, ARM_PC_REGNUM,
+                          (char *) &inferior_registers.r_pc);
       break;
 
     case ARM_PS_REGNUM:
       if (arm_apcs_32)
-       supply_register (ARM_PS_REGNUM, (char *) &inferior_registers.r_cpsr);
+       regcache_raw_supply (current_regcache, ARM_PS_REGNUM,
+                            (char *) &inferior_registers.r_cpsr);
       else
-       supply_register (ARM_PS_REGNUM, (char *) &inferior_registers.r_pc);
+       regcache_raw_supply (current_regcache, ARM_PS_REGNUM,
+                            (char *) &inferior_registers.r_pc);
       break;
 
     default:
-      supply_register (regno, (char *) &inferior_registers.r[regno]);
+      regcache_raw_supply (current_regcache, regno,
+                          (char *) &inferior_registers.r[regno]);
       break;
     }
 }
 
 static void
-fetch_regs ()
+fetch_regs (void)
 {
   struct reg inferior_registers;
   int ret;
@@ -93,19 +142,7 @@ fetch_regs ()
       return;
     }
 
-  for (regno = ARM_A1_REGNUM; regno < ARM_SP_REGNUM; regno++)
-    supply_register (regno, (char *) &inferior_registers.r[regno]);
-
-  supply_register (ARM_SP_REGNUM, (char *) &inferior_registers.r_sp);
-  supply_register (ARM_LR_REGNUM, (char *) &inferior_registers.r_lr);
-  /* This is ok: we're running native... */
-  inferior_registers.r_pc = ADDR_BITS_REMOVE (inferior_registers.r_pc);
-  supply_register (ARM_PC_REGNUM, (char *) &inferior_registers.r_pc);
-
-  if (arm_apcs_32)
-    supply_register (ARM_PS_REGNUM, (char *) &inferior_registers.r_cpsr);
-  else
-    supply_register (ARM_PS_REGNUM, (char *) &inferior_registers.r_pc);
+  supply_gregset (&inferior_registers);
 }
 
 static void
@@ -126,19 +163,19 @@ fetch_fp_register (int regno)
   switch (regno)
     {
     case ARM_FPS_REGNUM:
-      supply_register (ARM_FPS_REGNUM,
-                      (char *) &inferior_fp_registers.fpr_fpsr);
+      regcache_raw_supply (current_regcache, ARM_FPS_REGNUM,
+                          (char *) &inferior_fp_registers.fpr_fpsr);
       break;
 
     default:
-      supply_register
-       (regno, (char *) &inferior_fp_registers.fpr[regno - ARM_F0_REGNUM]);
+      regcache_raw_supply (current_regcache, regno,
+                          (char *) &inferior_fp_registers.fpr[regno - ARM_F0_REGNUM]);
       break;
     }
 }
 
 static void
-fetch_fp_regs ()
+fetch_fp_regs (void)
 {
   struct fpreg inferior_fp_registers;
   int ret;
@@ -153,11 +190,7 @@ fetch_fp_regs ()
       return;
     }
 
-  for (regno = ARM_F0_REGNUM; regno <= ARM_F7_REGNUM; regno++)
-    supply_register
-      (regno, (char *) &inferior_fp_registers.fpr[regno - ARM_F0_REGNUM]);
-
-  supply_register (ARM_FPS_REGNUM, (char *) &inferior_fp_registers.fpr_fpsr);
+  supply_fparegset (&inferior_fp_registers);
 }
 
 void
@@ -196,21 +229,25 @@ store_register (int regno)
   switch (regno)
     {
     case ARM_SP_REGNUM:
-      regcache_collect (ARM_SP_REGNUM, (char *) &inferior_registers.r_sp);
+      regcache_raw_collect (current_regcache, ARM_SP_REGNUM,
+                           (char *) &inferior_registers.r_sp);
       break;
 
     case ARM_LR_REGNUM:
-      regcache_collect (ARM_LR_REGNUM, (char *) &inferior_registers.r_lr);
+      regcache_raw_collect (current_regcache, ARM_LR_REGNUM,
+                           (char *) &inferior_registers.r_lr);
       break;
 
     case ARM_PC_REGNUM:
       if (arm_apcs_32)
-       regcache_collect (ARM_PC_REGNUM, (char *) &inferior_registers.r_pc);
+       regcache_raw_collect (current_regcache, ARM_PC_REGNUM,
+                             (char *) &inferior_registers.r_pc);
       else
        {
          unsigned pc_val;
 
-         regcache_collect (ARM_PC_REGNUM, (char *) &pc_val);
+         regcache_raw_collect (current_regcache, ARM_PC_REGNUM,
+                               (char *) &pc_val);
          
          pc_val = ADDR_BITS_REMOVE (pc_val);
          inferior_registers.r_pc
@@ -221,12 +258,14 @@ store_register (int regno)
 
     case ARM_PS_REGNUM:
       if (arm_apcs_32)
-       regcache_collect (ARM_PS_REGNUM, (char *) &inferior_registers.r_cpsr);
+       regcache_raw_collect (current_regcache, ARM_PS_REGNUM,
+                             (char *) &inferior_registers.r_cpsr);
       else
        {
          unsigned psr_val;
 
-         regcache_collect (ARM_PS_REGNUM, (char *) &psr_val);
+         regcache_raw_collect (current_regcache, ARM_PS_REGNUM,
+                               (char *) &psr_val);
 
          psr_val ^= ADDR_BITS_REMOVE (psr_val);
          inferior_registers.r_pc = ADDR_BITS_REMOVE (inferior_registers.r_pc);
@@ -235,7 +274,8 @@ store_register (int regno)
       break;
 
     default:
-      regcache_collect (regno, (char *) &inferior_registers.r[regno]);
+      regcache_raw_collect (current_regcache, regno,
+                           (char *) &inferior_registers.r[regno]);
       break;
     }
 
@@ -247,7 +287,7 @@ store_register (int regno)
 }
 
 static void
-store_regs ()
+store_regs (void)
 {
   struct reg inferior_registers;
   int ret;
@@ -255,23 +295,30 @@ store_regs ()
 
 
   for (regno = ARM_A1_REGNUM; regno < ARM_SP_REGNUM; regno++)
-    regcache_collect (regno, (char *) &inferior_registers.r[regno]);
+    regcache_raw_collect (current_regcache, regno,
+                         (char *) &inferior_registers.r[regno]);
 
-  regcache_collect (ARM_SP_REGNUM, (char *) &inferior_registers.r_sp);
-  regcache_collect (ARM_LR_REGNUM, (char *) &inferior_registers.r_lr);
+  regcache_raw_collect (current_regcache, ARM_SP_REGNUM,
+                       (char *) &inferior_registers.r_sp);
+  regcache_raw_collect (current_regcache, ARM_LR_REGNUM,
+                       (char *) &inferior_registers.r_lr);
 
   if (arm_apcs_32)
     {
-      regcache_collect (ARM_PC_REGNUM, (char *) &inferior_registers.r_pc);
-      regcache_collect (ARM_PS_REGNUM, (char *) &inferior_registers.r_cpsr);
+      regcache_raw_collect (current_regcache, ARM_PC_REGNUM,
+                           (char *) &inferior_registers.r_pc);
+      regcache_raw_collect (current_regcache, ARM_PS_REGNUM,
+                           (char *) &inferior_registers.r_cpsr);
     }
   else
     {
       unsigned pc_val;
       unsigned psr_val;
 
-      regcache_collect (ARM_PC_REGNUM, (char *) &pc_val);
-      regcache_collect (ARM_PS_REGNUM, (char *) &psr_val);
+      regcache_raw_collect (current_regcache, ARM_PC_REGNUM,
+                           (char *) &pc_val);
+      regcache_raw_collect (current_regcache, ARM_PS_REGNUM,
+                           (char *) &psr_val);
          
       pc_val = ADDR_BITS_REMOVE (pc_val);
       psr_val ^= ADDR_BITS_REMOVE (psr_val);
@@ -304,13 +351,13 @@ store_fp_register (int regno)
   switch (regno)
     {
     case ARM_FPS_REGNUM:
-      regcache_collect (ARM_FPS_REGNUM,
-                       (char *) &inferior_fp_registers.fpr_fpsr);
+      regcache_raw_collect (current_regcache, ARM_FPS_REGNUM,
+                           (char *) &inferior_fp_registers.fpr_fpsr);
       break;
 
     default:
-      regcache_collect
-       (regno, (char *) &inferior_fp_registers.fpr[regno - ARM_F0_REGNUM]);
+      regcache_raw_collect (current_regcache, regno,
+                           (char *) &inferior_fp_registers.fpr[regno - ARM_F0_REGNUM]);
       break;
     }
 
@@ -322,7 +369,7 @@ store_fp_register (int regno)
 }
 
 static void
-store_fp_regs ()
+store_fp_regs (void)
 {
   struct fpreg inferior_fp_registers;
   int ret;
@@ -330,10 +377,11 @@ store_fp_regs ()
 
 
   for (regno = ARM_F0_REGNUM; regno <= ARM_F7_REGNUM; regno++)
-    regcache_collect
-      (regno, (char *) &inferior_fp_registers.fpr[regno - ARM_F0_REGNUM]);
+    regcache_raw_collect (current_regcache, regno,
+                         (char *) &inferior_fp_registers.fpr[regno - ARM_F0_REGNUM]);
 
-  regcache_collect (ARM_FPS_REGNUM, (char *) &inferior_fp_registers.fpr_fpsr);
+  regcache_raw_collect (current_regcache, ARM_FPS_REGNUM,
+                       (char *) &inferior_fp_registers.fpr_fpsr);
 
   ret = ptrace (PT_SETFPREGS, PIDGET (inferior_ptid),
                (PTRACE_ARG3_TYPE) &inferior_fp_registers, 0);
@@ -365,19 +413,78 @@ struct md_core
   struct fpreg freg;
 };
 
-void
+static void
 fetch_core_registers (char *core_reg_sect, unsigned core_reg_size,
                      int which, CORE_ADDR ignore)
 {
   struct md_core *core_reg = (struct md_core *) core_reg_sect;
+  int regno;
+  CORE_ADDR r_pc;
 
-  /* integer registers */
-  memcpy (&registers[REGISTER_BYTE (0)], &core_reg->intreg,
-         sizeof (struct reg));
-  /* floating point registers */
-  /* XXX */
+  supply_gregset (&core_reg->intreg);
+  supply_fparegset (&core_reg->freg);
 }
 
-#else
-#error Not FETCH_INFERIOR_REGISTERS 
-#endif /* !FETCH_INFERIOR_REGISTERS */
+static void
+fetch_elfcore_registers (char *core_reg_sect, unsigned core_reg_size,
+                        int which, CORE_ADDR ignore)
+{
+  struct reg gregset;
+  struct fpreg fparegset;
+
+  switch (which)
+    {
+    case 0:    /* Integer registers.  */
+      if (core_reg_size != sizeof (struct reg))
+       warning ("wrong size of register set in core file");
+      else
+       {
+         /* The memcpy may be unnecessary, but we can't really be sure
+            of the alignment of the data in the core file.  */
+         memcpy (&gregset, core_reg_sect, sizeof (gregset));
+         supply_gregset (&gregset);
+       }
+      break;
+
+    case 2:
+      if (core_reg_size != sizeof (struct fpreg))
+       warning ("wrong size of FPA register set in core file");
+      else
+       {
+         /* The memcpy may be unnecessary, but we can't really be sure
+            of the alignment of the data in the core file.  */
+         memcpy (&fparegset, core_reg_sect, sizeof (fparegset));
+         supply_fparegset (&fparegset);
+       }
+      break;
+
+    default:
+      /* Don't know what kind of register request this is; just ignore it.  */
+      break;
+    }
+}
+
+static struct core_fns arm_netbsd_core_fns =
+{
+  bfd_target_unknown_flavour,          /* core_flovour.  */
+  default_check_format,                        /* check_format.  */
+  default_core_sniffer,                        /* core_sniffer.  */
+  fetch_core_registers,                        /* core_read_registers.  */
+  NULL
+};
+
+static struct core_fns arm_netbsd_elfcore_fns =
+{
+  bfd_target_elf_flavour,              /* core_flovour.  */
+  default_check_format,                        /* check_format.  */
+  default_core_sniffer,                        /* core_sniffer.  */
+  fetch_elfcore_registers,             /* core_read_registers.  */
+  NULL
+};
+
+void
+_initialize_arm_netbsd_nat (void)
+{
+  deprecated_add_core_fns (&arm_netbsd_core_fns);
+  deprecated_add_core_fns (&arm_netbsd_elfcore_fns);
+}
This page took 0.028056 seconds and 4 git commands to generate.