Remove unnecessary null_cleanup
[deliverable/binutils-gdb.git] / gdb / i386bsd-nat.c
index 3ab4671dc7932827445b1feee03bd81945fa1d73..b6b143b6227032e8f3a25be3d0f6e9ef32fd204a 100644 (file)
@@ -1,12 +1,12 @@
 /* Native-dependent code for modern i386 BSD's.
 
-   Copyright 2000, 2001, 2002, 2003, 2004 Free Software Foundation, Inc.
+   Copyright (C) 2000-2016 Free Software Foundation, Inc.
 
    This file is part of GDB.
 
    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
-   the Free Software Foundation; either version 2 of the License, or
+   the Free Software Foundation; either version 3 of the License, or
    (at your option) any later version.
 
    This program is distributed in the hope that it will be useful,
    GNU General Public License for more details.
 
    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.  */
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
 
 #include "defs.h"
 #include "inferior.h"
 #include "regcache.h"
 
-#include "gdb_assert.h"
 #include <signal.h>
-#include <stddef.h>
 #include <sys/types.h>
 #include <sys/ptrace.h>
 #include <machine/reg.h>
@@ -33,6 +29,9 @@
 
 #include "i386-tdep.h"
 #include "i387-tdep.h"
+#include "x86bsd-nat.h"
+#include "i386bsd-nat.h"
+#include "inf-ptrace.h"
 \f
 
 /* In older BSD versions we cannot get at some of the segment
@@ -90,7 +89,7 @@ static int have_ptrace_xmmregs = -1;
 static void
 i386bsd_supply_gregset (struct regcache *regcache, const void *gregs)
 {
-  const char *regs = gregs;
+  const char *regs = (const char *) gregs;
   int regnum;
 
   for (regnum = 0; regnum < ARRAY_SIZE (i386bsd_r_reg_offset); regnum++)
@@ -110,7 +109,7 @@ static void
 i386bsd_collect_gregset (const struct regcache *regcache,
                         void *gregs, int regnum)
 {
-  char *regs = gregs;
+  char *regs = (char *) gregs;
   int i;
 
   for (i = 0; i < ARRAY_SIZE (i386bsd_r_reg_offset); i++)
@@ -128,18 +127,19 @@ i386bsd_collect_gregset (const struct regcache *regcache,
 /* Fetch register REGNUM from the inferior.  If REGNUM is -1, do this
    for all registers (including the floating point registers).  */
 
-void
-fetch_inferior_registers (int regnum)
+static void
+i386bsd_fetch_inferior_registers (struct target_ops *ops,
+                                 struct regcache *regcache, int regnum)
 {
   if (regnum == -1 || GETREGS_SUPPLIES (regnum))
     {
       struct reg regs;
 
-      if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
-                 (PTRACE_ARG3_TYPE) &regs, 0) == -1)
-       perror_with_name ("Couldn't get registers");
+      if (ptrace (PT_GETREGS, get_ptrace_pid (inferior_ptid),
+                 (PTRACE_TYPE_ARG3) &regs, 0) == -1)
+       perror_with_name (_("Couldn't get registers"));
 
-      i386bsd_supply_gregset (current_regcache, &regs);
+      i386bsd_supply_gregset (regcache, &regs);
       if (regnum != -1)
        return;
     }
@@ -149,28 +149,42 @@ fetch_inferior_registers (int regnum)
       struct fpreg fpregs;
 #ifdef HAVE_PT_GETXMMREGS
       char xmmregs[512];
+#endif
+
+#ifdef PT_GETXSTATE_INFO
+      if (x86bsd_xsave_len != 0)
+       {
+         void *xstateregs;
+
+         xstateregs = alloca (x86bsd_xsave_len);
+         if (ptrace (PT_GETXSTATE, get_ptrace_pid (inferior_ptid),
+                     (PTRACE_TYPE_ARG3) xstateregs, 0) == -1)
+           perror_with_name (_("Couldn't get extended state status"));
 
+         i387_supply_xsave (regcache, -1, xstateregs);
+         return;
+       }
+#endif
+      
+#ifdef HAVE_PT_GETXMMREGS
       if (have_ptrace_xmmregs != 0
-         && ptrace(PT_GETXMMREGS, PIDGET (inferior_ptid),
-                   (PTRACE_ARG3_TYPE) xmmregs, 0) == 0)
+         && ptrace(PT_GETXMMREGS, get_ptrace_pid (inferior_ptid),
+                   (PTRACE_TYPE_ARG3) xmmregs, 0) == 0)
        {
          have_ptrace_xmmregs = 1;
-         i387_supply_fxsave (current_regcache, -1, xmmregs);
+         i387_supply_fxsave (regcache, -1, xmmregs);
        }
       else
        {
-          if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
-                     (PTRACE_ARG3_TYPE) &fpregs, 0) == -1)
-           perror_with_name ("Couldn't get floating point status");
+         have_ptrace_xmmregs = 0;
+#endif
+          if (ptrace (PT_GETFPREGS, get_ptrace_pid (inferior_ptid),
+                     (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
+           perror_with_name (_("Couldn't get floating point status"));
 
-         i387_supply_fsave (current_regcache, -1, &fpregs);
+         i387_supply_fsave (regcache, -1, &fpregs);
+#ifdef HAVE_PT_GETXMMREGS
        }
-#else
-      if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
-                 (PTRACE_ARG3_TYPE) &fpregs, 0) == -1)
-       perror_with_name ("Couldn't get floating point status");
-
-      i387_supply_fsave (current_regcache, -1, &fpregs);
 #endif
     }
 }
@@ -178,22 +192,23 @@ fetch_inferior_registers (int regnum)
 /* Store register REGNUM back into the inferior.  If REGNUM is -1, do
    this for all registers (including the floating point registers).  */
 
-void
-store_inferior_registers (int regnum)
+static void
+i386bsd_store_inferior_registers (struct target_ops *ops,
+                                 struct regcache *regcache, int regnum)
 {
   if (regnum == -1 || GETREGS_SUPPLIES (regnum))
     {
       struct reg regs;
 
-      if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
-                  (PTRACE_ARG3_TYPE) &regs, 0) == -1)
-        perror_with_name ("Couldn't get registers");
+      if (ptrace (PT_GETREGS, get_ptrace_pid (inferior_ptid),
+                  (PTRACE_TYPE_ARG3) &regs, 0) == -1)
+        perror_with_name (_("Couldn't get registers"));
 
-      i386bsd_collect_gregset (current_regcache, &regs, regnum);
+      i386bsd_collect_gregset (regcache, &regs, regnum);
 
-      if (ptrace (PT_SETREGS, PIDGET (inferior_ptid),
-                 (PTRACE_ARG3_TYPE) &regs, 0) == -1)
-        perror_with_name ("Couldn't write registers");
+      if (ptrace (PT_SETREGS, get_ptrace_pid (inferior_ptid),
+                 (PTRACE_TYPE_ARG3) &regs, 0) == -1)
+        perror_with_name (_("Couldn't write registers"));
 
       if (regnum != -1)
        return;
@@ -204,140 +219,77 @@ store_inferior_registers (int regnum)
       struct fpreg fpregs;
 #ifdef HAVE_PT_GETXMMREGS
       char xmmregs[512];
+#endif
+
+#ifdef PT_GETXSTATE_INFO
+      if (x86bsd_xsave_len != 0)
+       {
+         void *xstateregs;
+
+         xstateregs = alloca (x86bsd_xsave_len);
+         if (ptrace (PT_GETXSTATE, get_ptrace_pid (inferior_ptid),
+                     (PTRACE_TYPE_ARG3) xstateregs, 0) == -1)
+           perror_with_name (_("Couldn't get extended state status"));
+
+         i387_collect_xsave (regcache, -1, xstateregs, 0);
+
+         if (ptrace (PT_SETXSTATE, get_ptrace_pid (inferior_ptid),
+                     (PTRACE_TYPE_ARG3) xstateregs, x86bsd_xsave_len) == -1)
+           perror_with_name (_("Couldn't write extended state status"));
+         return;
+       }
+#endif
 
+#ifdef HAVE_PT_GETXMMREGS
       if (have_ptrace_xmmregs != 0
-         && ptrace(PT_GETXMMREGS, PIDGET (inferior_ptid),
-                   (PTRACE_ARG3_TYPE) xmmregs, 0) == 0)
+         && ptrace(PT_GETXMMREGS, get_ptrace_pid (inferior_ptid),
+                   (PTRACE_TYPE_ARG3) xmmregs, 0) == 0)
        {
          have_ptrace_xmmregs = 1;
 
-         i387_collect_fxsave (current_regcache, regnum, xmmregs);
+         i387_collect_fxsave (regcache, regnum, xmmregs);
 
-         if (ptrace (PT_SETXMMREGS, PIDGET (inferior_ptid),
-                     (PTRACE_ARG3_TYPE) xmmregs, 0) == -1)
-            perror_with_name ("Couldn't write XMM registers");
+         if (ptrace (PT_SETXMMREGS, get_ptrace_pid (inferior_ptid),
+                     (PTRACE_TYPE_ARG3) xmmregs, 0) == -1)
+            perror_with_name (_("Couldn't write XMM registers"));
        }
       else
        {
          have_ptrace_xmmregs = 0;
 #endif
-          if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
-                     (PTRACE_ARG3_TYPE) &fpregs, 0) == -1)
-           perror_with_name ("Couldn't get floating point status");
+          if (ptrace (PT_GETFPREGS, get_ptrace_pid (inferior_ptid),
+                     (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
+           perror_with_name (_("Couldn't get floating point status"));
 
-          i387_collect_fsave (current_regcache, regnum, &fpregs);
+          i387_collect_fsave (regcache, regnum, &fpregs);
 
-          if (ptrace (PT_SETFPREGS, PIDGET (inferior_ptid),
-                     (PTRACE_ARG3_TYPE) &fpregs, 0) == -1)
-           perror_with_name ("Couldn't write floating point status");
+          if (ptrace (PT_SETFPREGS, get_ptrace_pid (inferior_ptid),
+                     (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
+           perror_with_name (_("Couldn't write floating point status"));
 #ifdef HAVE_PT_GETXMMREGS
         }
 #endif
     }
 }
-\f
-
-/* Support for debug registers.  */
-
-#ifdef HAVE_PT_GETDBREGS
-
-/* Not all versions of FreeBSD/i386 that support the debug registers
-   have this macro.  */
-#ifndef DBREG_DRX
-#define DBREG_DRX(d, x) ((&d->dr0)[x])
-#endif
-
-static void
-i386bsd_dr_set (int regnum, unsigned int value)
-{
-  struct dbreg dbregs;
-
-  if (ptrace (PT_GETDBREGS, PIDGET (inferior_ptid),
-              (PTRACE_ARG3_TYPE) &dbregs, 0) == -1)
-    perror_with_name ("Couldn't get debug registers");
-
-  /* For some mysterious reason, some of the reserved bits in the
-     debug control register get set.  Mask these off, otherwise the
-     ptrace call below will fail.  */
-  DBREG_DRX ((&dbregs), 7) &= ~(0x0000fc00);
-
-  DBREG_DRX ((&dbregs), regnum) = value;
-
-  if (ptrace (PT_SETDBREGS, PIDGET (inferior_ptid),
-              (PTRACE_ARG3_TYPE) &dbregs, 0) == -1)
-    perror_with_name ("Couldn't write debug registers");
-}
-
-void
-i386bsd_dr_set_control (unsigned long control)
-{
-  i386bsd_dr_set (7, control);
-}
-
-void
-i386bsd_dr_set_addr (int regnum, CORE_ADDR addr)
-{
-  gdb_assert (regnum >= 0 && regnum <= 4);
-
-  i386bsd_dr_set (regnum, addr);
-}
-
-void
-i386bsd_dr_reset_addr (int regnum)
-{
-  gdb_assert (regnum >= 0 && regnum <= 4);
 
-  i386bsd_dr_set (regnum, 0);
-}
+/* Create a prototype *BSD/i386 target.  The client can override it
+   with local methods.  */
 
-unsigned long
-i386bsd_dr_get_status (void)
+struct target_ops *
+i386bsd_target (void)
 {
-  struct dbreg dbregs;
-
-  /* FIXME: kettenis/2001-03-31: Calling perror_with_name if the
-     ptrace call fails breaks debugging remote targets.  The correct
-     way to fix this is to add the hardware breakpoint and watchpoint
-     stuff to the target vector.  For now, just return zero if the
-     ptrace call fails.  */
-  if (ptrace (PT_GETDBREGS, PIDGET (inferior_ptid),
-             (PTRACE_ARG3_TYPE) & dbregs, 0) == -1)
-#if 0
-    perror_with_name ("Couldn't read debug registers");
-#else
-    return 0;
-#endif
+  struct target_ops *t;
 
-  return DBREG_DRX ((&dbregs), 6);
+  t = x86bsd_target ();
+  t->to_fetch_registers = i386bsd_fetch_inferior_registers;
+  t->to_store_registers = i386bsd_store_inferior_registers;
+  return t;
 }
-
-#endif /* PT_GETDBREGS */
 \f
 
-/* Support for the user struct.  */
-
-/* Return the address register REGNUM.  BLOCKEND is the value of
-   u.u_ar0, which should point to the registers.  */
-
-CORE_ADDR
-register_u_addr (CORE_ADDR blockend, int regnum)
-{
-  gdb_assert (regnum >= 0 && regnum < ARRAY_SIZE (i386bsd_r_reg_offset));
-
-  return blockend + i386bsd_r_reg_offset[regnum];
-}
-
-#include <sys/param.h>
-#include <sys/user.h>
+/* Provide a prototype to silence -Wmissing-prototypes.  */
+void _initialize_i386bsd_nat (void);
 
-/* Return the size of the user struct.  */
-
-int
-kernel_u_size (void)
-{
-  return (sizeof (struct user));
-}
-\f
 void
 _initialize_i386bsd_nat (void)
 {
@@ -377,9 +329,9 @@ _initialize_i386bsd_nat (void)
 
   if (SC_PC_OFFSET != offset)
     {
-      warning ("\
+      warning (_("\
 offsetof (struct sigcontext, sc_pc) yields %d instead of %d.\n\
-Please report this to <bug-gdb@gnu.org>.", 
+Please report this to <bug-gdb@gnu.org>.")
               offset, SC_PC_OFFSET);
     }
 
@@ -390,9 +342,9 @@ Please report this to <bug-gdb@gnu.org>.",
 
   if (SC_SP_OFFSET != offset)
     {
-      warning ("\
+      warning (_("\
 offsetof (struct sigcontext, sc_sp) yields %d instead of %d.\n\
-Please report this to <bug-gdb@gnu.org>.",
+Please report this to <bug-gdb@gnu.org>."),
               offset, SC_SP_OFFSET);
     }
 
@@ -403,9 +355,9 @@ Please report this to <bug-gdb@gnu.org>.",
 
   if (SC_FP_OFFSET != offset)
     {
-      warning ("\
+      warning (_("\
 offsetof (struct sigcontext, sc_fp) yields %d instead of %d.\n\
-Please report this to <bug-gdb@gnu.org>.",
+Please report this to <bug-gdb@gnu.org>."),
               offset, SC_FP_OFFSET);
     }
 
This page took 0.029553 seconds and 4 git commands to generate.