/* Native-dependent code for Alpha BSD's.
- Copyright (C) 2000 Free Software Foundation, Inc.
+
+ Copyright (C) 2000, 2001, 2002, 2004, 2005, 2006
+ 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 "inferior.h"
+#include "regcache.h"
+
+#include "alpha-tdep.h"
+#include "alphabsd-tdep.h"
+#include "inf-ptrace.h"
#include <sys/types.h>
#include <sys/ptrace.h>
typedef struct reg gregset_t;
#endif
-#ifndef HAVE_FPREGSET_T
-typedef struct fpreg fpregset_t;
-#endif
+#ifndef HAVE_FPREGSET_T
+typedef struct fpreg fpregset_t;
+#endif
#include "gregset.h"
-/* Number of general-purpose registers. */
-#define NUM_GREGS 32
-
-/* Number of floating point registers. */
-#define NUM_FPREGS 31
-\f
-
-/* Transfering the registers between GDB, inferiors and core files. */
-
-/* Fill GDB's register array with the genereal-purpose register values
- in *GREGSETP. */
+/* Provide *regset() wrappers around the generic Alpha BSD register
+ supply/fill routines. */
void
supply_gregset (gregset_t *gregsetp)
{
- int i;
-
- for (i = 0; i < NUM_GREGS; i++)
- {
- if (CANNOT_FETCH_REGISTER (i))
- supply_register (i, NULL);
- else
- supply_register (i, (char *) &gregsetp->r_regs[i]);
- }
-
- /* The PC travels in the R_ZERO slot. */
- supply_register (PC_REGNUM, (char *) &gregsetp->r_regs[R_ZERO]);
+ alphabsd_supply_reg ((char *) gregsetp, -1);
}
-/* Fill register REGNO (if it is a general-purpose register) in
- *GREGSETPS with the value in GDB's register array. If REGNO is -1,
- do this for all registers. */
-
void
fill_gregset (gregset_t *gregsetp, int regno)
{
- int i;
-
- for (i = 0; i < NUM_GREGS; i++)
- if ((regno == -1 || regno == i) && ! CANNOT_STORE_REGISTER (i))
- memcpy (&gregsetp->r_regs[i], ®isters[REGISTER_BYTE (i)],
- REGISTER_RAW_SIZE (i));
-
- /* The PC travels in the R_ZERO slot. */
- if (regno == -1 || regno == PC_REGNUM)
- memcpy (&gregsetp->r_regs[R_ZERO], ®isters[REGISTER_BYTE (PC_REGNUM)],
- REGISTER_RAW_SIZE (PC_REGNUM));
+ alphabsd_fill_reg ((char *) gregsetp, regno);
}
-/* Fill GDB's register array with the floating-point register values
- in *FPREGSETP. */
-
void
supply_fpregset (fpregset_t *fpregsetp)
{
- int i;
-
- for (i = FP0_REGNUM; i < FP0_REGNUM + NUM_FPREGS; i++)
- {
- if (CANNOT_FETCH_REGISTER (i))
- supply_register (i, NULL);
- else
- supply_register (i, (char *) &fpregsetp->fpr_regs[i]);
- }
-
- supply_register (FPCR_REGNUM, (char *) &fpregsetp->fpr_cr);
+ alphabsd_supply_fpreg ((char *) fpregsetp, -1);
}
-/* Fill register REGNO (if it is a floating-point register) in
- *FPREGSETP with the value in GDB's register array. If REGNO is -1,
- do this for all registers. */
-
void
fill_fpregset (fpregset_t *fpregsetp, int regno)
{
- int i;
-
- for (i = FP0_REGNUM; i < FP0_REGNUM + NUM_FPREGS; i++)
- if ((regno == -1 || regno == i) && ! CANNOT_STORE_REGISTER (i))
- memcpy (&fpregsetp->fpr_regs[i - FP0_REGNUM],
- ®isters[REGISTER_BYTE (i)], REGISTER_RAW_SIZE (i));
+ alphabsd_fill_fpreg ((char *) fpregsetp, regno);
+}
+\f
+/* Determine if PT_GETREGS fetches this register. */
- if (regno == -1 || regno == FPCR_REGNUM)
- memcpy (&fpregsetp->fpr_cr, ®isters[REGISTER_BYTE (FPCR_REGNUM)],
- REGISTER_RAW_SIZE (FPCR_REGNUM));
+static int
+getregs_supplies (int regno)
+{
+ return ((regno >= ALPHA_V0_REGNUM && regno <= ALPHA_ZERO_REGNUM)
+ || regno >= ALPHA_PC_REGNUM);
}
/* Fetch register REGNO from the inferior. If REGNO is -1, do this
for all registers (including the floating point registers). */
-void
-fetch_inferior_registers (int regno)
+static void
+alphabsd_fetch_inferior_registers (int regno)
{
- gregset_t gregs;
+ if (regno == -1 || getregs_supplies (regno))
+ {
+ struct reg gregs;
- if (ptrace (PT_GETREGS, inferior_pid, (PTRACE_ARG3_TYPE) &gregs, 0) == -1)
- perror_with_name ("Couldn't get registers");
+ if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
+ (PTRACE_TYPE_ARG3) &gregs, 0) == -1)
+ perror_with_name (_("Couldn't get registers"));
- supply_gregset (&gregs);
+ alphabsd_supply_reg ((char *) &gregs, regno);
+ if (regno != -1)
+ return;
+ }
if (regno == -1 || regno >= FP0_REGNUM)
{
- fpregset_t fpregs;
+ struct fpreg fpregs;
- if (ptrace (PT_GETFPREGS, inferior_pid,
- (PTRACE_ARG3_TYPE) &fpregs, 0) == -1)
- perror_with_name ("Couldn't get floating point status");
+ if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
+ (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
+ perror_with_name (_("Couldn't get floating point status"));
- supply_fpregset (&fpregs);
+ alphabsd_supply_fpreg ((char *) &fpregs, regno);
}
-
- /* Reset virtual frame pointer. */
- supply_register (FP_REGNUM, NULL);
}
/* Store register REGNO back into the inferior. If REGNO is -1, do
this for all registers (including the floating point registers). */
-void
-store_inferior_registers (int regno)
+static void
+alphabsd_store_inferior_registers (int regno)
{
- gregset_t gregs;
+ if (regno == -1 || getregs_supplies (regno))
+ {
+ struct reg gregs;
+ if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
+ (PTRACE_TYPE_ARG3) &gregs, 0) == -1)
+ perror_with_name (_("Couldn't get registers"));
- if (ptrace (PT_GETREGS, inferior_pid, (PTRACE_ARG3_TYPE) &gregs, 0) == -1)
- perror_with_name ("Couldn't get registers");
+ alphabsd_fill_reg ((char *) &gregs, regno);
- fill_gregset (&gregs, regno);
+ if (ptrace (PT_SETREGS, PIDGET (inferior_ptid),
+ (PTRACE_TYPE_ARG3) &gregs, 0) == -1)
+ perror_with_name (_("Couldn't write registers"));
- if (ptrace (PT_SETREGS, inferior_pid, (PTRACE_ARG3_TYPE) &gregs, 0) == -1)
- perror_with_name ("Couldn't write registers");
+ if (regno != -1)
+ return;
+ }
if (regno == -1 || regno >= FP0_REGNUM)
{
- fpregset_t fpregs;
+ struct fpreg fpregs;
- if (ptrace (PT_GETFPREGS, inferior_pid,
- (PTRACE_ARG3_TYPE) &fpregs, 0) == -1)
- perror_with_name ("Couldn't get floating point status");
+ if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
+ (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
+ perror_with_name (_("Couldn't get floating point status"));
- fill_fpregset (&fpregs, regno);
+ alphabsd_fill_fpreg ((char *) &fpregs, regno);
- if (ptrace (PT_SETFPREGS, inferior_pid,
- (PTRACE_ARG3_TYPE) &fpregs, 0) == -1)
- perror_with_name ("Couldn't write floating point status");
+ if (ptrace (PT_SETFPREGS, PIDGET (inferior_ptid),
+ (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
+ perror_with_name (_("Couldn't write floating point status"));
}
}
+\f
+
+/* Support for debugging kernel virtual memory images. */
+
+#include <sys/types.h>
+#include <sys/signal.h>
+#include <machine/pcb.h>
+
+#include "bsd-kvm.h"
+
+static int
+alphabsd_supply_pcb (struct regcache *regcache, struct pcb *pcb)
+{
+ int regnum;
+
+ /* The following is true for OpenBSD 3.9:
+
+ The pcb contains the register state at the context switch inside
+ cpu_switch(). */
+
+ /* The stack pointer shouldn't be zero. */
+ if (pcb->pcb_hw.apcb_ksp == 0)
+ return 0;
+
+ regcache_raw_supply (regcache, ALPHA_SP_REGNUM, &pcb->pcb_hw.apcb_ksp);
+
+ for (regnum = ALPHA_S0_REGNUM; regnum < ALPHA_A0_REGNUM; regnum++)
+ regcache_raw_supply (regcache, regnum,
+ &pcb->pcb_context[regnum - ALPHA_S0_REGNUM]);
+ regcache_raw_supply (regcache, ALPHA_RA_REGNUM, &pcb->pcb_context[7]);
+
+ return 1;
+}
+\f
+
+/* Provide a prototype to silence -Wmissing-prototypes. */
+void _initialize_alphabsd_nat (void);
+
+void
+_initialize_alphabsd_nat (void)
+{
+ struct target_ops *t;
+
+ t = inf_ptrace_target ();
+ t->to_fetch_registers = alphabsd_fetch_inferior_registers;
+ t->to_store_registers = alphabsd_store_inferior_registers;
+ add_target (t);
+
+ /* Support debugging kernel virtual memory images. */
+ bsd_kvm_add_target (alphabsd_supply_pcb);
+}
projects / deliverable / binutils-gdb.git / blobdiff