]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blobdiff - gdb/infptrace.c
import gdb-1999-07-07 post reformat
[thirdparty/binutils-gdb.git] / gdb / infptrace.c
index 1db7223ea3b5c891eb1e5a3d9e57f92df99c8cc9..eec7c6ae8334a5e0a0b90c8de08dae04e102d3d0 100644 (file)
@@ -2,21 +2,22 @@
    Copyright 1988, 89, 90, 91, 92, 93, 94, 95, 96, 1998 
    Free Software Foundation, Inc.
 
-This file is part of GDB.
+   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
-(at your option) any later version.
+   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
+   (at your option) any later version.
 
-This program is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   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.  */
+   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.  */
 
 #include "defs.h"
 #include "frame.h"
@@ -36,11 +37,11 @@ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
 #include <sys/ioctl.h>
 
 #ifdef HAVE_PTRACE_H
-# include <ptrace.h>
+#include <ptrace.h>
 #else
-# ifdef HAVE_SYS_PTRACE_H
-#  include <sys/ptrace.h>
-# endif
+#ifdef HAVE_SYS_PTRACE_H
+#include <sys/ptrace.h>
+#endif
 #endif
 
 #if !defined (PT_READ_I)
@@ -107,8 +108,8 @@ static void store_register PARAMS ((int));
 
 void _initialize_kernel_u_addr PARAMS ((void));
 void _initialize_infptrace PARAMS ((void));
-
 \f
+
 /* This function simply calls ptrace with the given arguments.  
    It exists so that all calls to ptrace are isolated in this 
    machine-dependent file. */
@@ -128,25 +129,27 @@ call_ptrace (request, pid, addr, data)
 #endif
 #if defined(PT_SETTRC)
   /* If the parent can be told to attach to us, try to do it.  */
-  if (request == PT_SETTRC) {
-    errno = 0;
-    pt_status = ptrace (PT_SETTRC, pid, addr, data
+  if (request == PT_SETTRC)
+    {
+      errno = 0;
+      pt_status = ptrace (PT_SETTRC, pid, addr, data
 #if defined (FIVE_ARG_PTRACE)
-                       /* Deal with HPUX 8.0 braindamage.  We never use the
-                          calls which require the fifth argument.  */
-                       0
+      /* Deal with HPUX 8.0 braindamage.  We never use the
+         calls which require the fifth argument.  */
+                         ,0
 #endif
-                       );
+       );
 
-     if (errno) perror_with_name ("ptrace");
+      if (errno)
+       perror_with_name ("ptrace");
 #if 0
-     printf (" = %d\n", pt_status);
+      printf (" = %d\n", pt_status);
 #endif
-     if (pt_status < 0)
-         return pt_status;
-     else
-         return parent_attach_all (pid, addr, data);
-  }
+      if (pt_status < 0)
+       return pt_status;
+      else
+       return parent_attach_all (pid, addr, data);
+    }
 #endif
 
 #if defined(PT_CONTIN1)
@@ -169,11 +172,11 @@ call_ptrace (request, pid, addr, data)
 #endif
   pt_status = ptrace (request, pid, addr, data
 #if defined (FIVE_ARG_PTRACE)
-                /* Deal with HPUX 8.0 braindamage.  We never use the
-                   calls which require the fifth argument.  */
-                0
+  /* Deal with HPUX 8.0 braindamage.  We never use the
+     calls which require the fifth argument.  */
+                     ,0
 #endif
-                );
+    );
 #if 0
   if (errno)
     printf (" [errno = %d]", errno);
@@ -196,8 +199,8 @@ call_ptrace (request, pid, addr, data)
 
 int
 ptrace_wait (pid, status)
-    int pid;
-    int *status;
+     int pid;
+     int *status;
 {
   int wstate;
 
@@ -259,9 +262,9 @@ child_resume (pid, step, signal)
   if (step)
     {
       if (SOFTWARE_SINGLE_STEP_P)
-       abort();  /* Make sure this doesn't happen. */
+       abort ();               /* Make sure this doesn't happen. */
       else
-       ptrace (PT_STEP,     pid, (PTRACE_ARG3_TYPE) 1,
+       ptrace (PT_STEP, pid, (PTRACE_ARG3_TYPE) 1,
                target_signal_to_host (signal));
     }
   else
@@ -272,8 +275,8 @@ child_resume (pid, step, signal)
     perror_with_name ("ptrace");
 }
 #endif /* CHILD_RESUME */
-
 \f
+
 #ifdef ATTACH_DETACH
 /* Start debugging the process whose number is PID.  */
 int
@@ -358,9 +361,9 @@ fetch_register (regno)
 {
   /* This isn't really an address.  But ptrace thinks of it as one.  */
   CORE_ADDR regaddr;
-  char mess[128];                              /* For messages */
+  char mess[128];              /* For messages */
   register int i;
-  unsigned int offset;  /* Offset of registers within the u area.  */
+  unsigned int offset;         /* Offset of registers within the u area.  */
   char buf[MAX_REGISTER_RAW_SIZE];
 
   if (CANNOT_FETCH_REGISTER (regno))
@@ -376,8 +379,8 @@ fetch_register (regno)
   for (i = 0; i < REGISTER_RAW_SIZE (regno); i += sizeof (PTRACE_XFER_TYPE))
     {
       errno = 0;
-      *(PTRACE_XFER_TYPE *) &buf[i] = ptrace (PT_READ_U, inferior_pid,
-                                             (PTRACE_ARG3_TYPE) regaddr, 0);
+      *(PTRACE_XFER_TYPE *) & buf[i] = ptrace (PT_READ_U, inferior_pid,
+                                            (PTRACE_ARG3_TYPE) regaddr, 0);
       regaddr += sizeof (PTRACE_XFER_TYPE);
       if (errno != 0)
        {
@@ -423,9 +426,9 @@ store_register (regno)
 {
   /* This isn't really an address.  But ptrace thinks of it as one.  */
   CORE_ADDR regaddr;
-  char mess[128];                              /* For messages */
+  char mess[128];              /* For messages */
   register int i;
-  unsigned int offset;  /* Offset of registers within the u area.  */
+  unsigned int offset;         /* Offset of registers within the u area.  */
 
   if (CANNOT_STORE_REGISTER (regno))
     {
@@ -435,11 +438,11 @@ store_register (regno)
   offset = U_REGS_OFFSET;
 
   regaddr = register_addr (regno, offset);
-  for (i = 0; i < REGISTER_RAW_SIZE (regno); i += sizeof(PTRACE_XFER_TYPE))
+  for (i = 0; i < REGISTER_RAW_SIZE (regno); i += sizeof (PTRACE_XFER_TYPE))
     {
       errno = 0;
       ptrace (PT_WRITE_U, inferior_pid, (PTRACE_ARG3_TYPE) regaddr,
-             *(PTRACE_XFER_TYPE *) &registers[REGISTER_BYTE (regno) + i]);
+             *(PTRACE_XFER_TYPE *) & registers[REGISTER_BYTE (regno) + i]);
       regaddr += sizeof (PTRACE_XFER_TYPE);
       if (errno != 0)
        {
@@ -482,7 +485,7 @@ store_inferior_registers (regno)
 /* Copy LEN bytes to or from inferior's memory starting at MEMADDR
    to debugger memory starting at MYADDR.   Copy to inferior if
    WRITE is nonzero.
-  
+
    Returns the length copied, which is either the LEN argument or zero.
    This xfer function does not do partial moves, since child_ops
    doesn't allow memory operations to cross below us in the target stack
@@ -494,28 +497,29 @@ child_xfer_memory (memaddr, myaddr, len, write, target)
      char *myaddr;
      int len;
      int write;
-     struct target_ops *target;                /* ignored */
+     struct target_ops *target;        /* ignored */
 {
   register int i;
   /* Round starting address down to longword boundary.  */
-  register CORE_ADDR addr = memaddr & - sizeof (PTRACE_XFER_TYPE);
+  register CORE_ADDR addr = memaddr & -sizeof (PTRACE_XFER_TYPE);
   /* Round ending address up; get number of longwords that makes.  */
   register int count
-    = (((memaddr + len) - addr) + sizeof (PTRACE_XFER_TYPE) - 1)
-      / sizeof (PTRACE_XFER_TYPE);
+  = (((memaddr + len) - addr) + sizeof (PTRACE_XFER_TYPE) - 1)
+  / sizeof (PTRACE_XFER_TYPE);
   /* Allocate buffer of that many longwords.  */
   register PTRACE_XFER_TYPE *buffer
-    = (PTRACE_XFER_TYPE *) alloca (count * sizeof (PTRACE_XFER_TYPE));
+  = (PTRACE_XFER_TYPE *) alloca (count * sizeof (PTRACE_XFER_TYPE));
 
   if (write)
     {
       /* Fill start and end extra bytes of buffer with existing memory data.  */
 
-      if (addr != memaddr || len < (int) sizeof (PTRACE_XFER_TYPE)) {
-       /* Need part of initial word -- fetch it.  */
-        buffer[0] = ptrace (PT_READ_I, inferior_pid, (PTRACE_ARG3_TYPE) addr,
-                           0);
-      }
+      if (addr != memaddr || len < (int) sizeof (PTRACE_XFER_TYPE))
+       {
+         /* Need part of initial word -- fetch it.  */
+         buffer[0] = ptrace (PT_READ_I, inferior_pid, (PTRACE_ARG3_TYPE) addr,
+                             0);
+       }
 
       if (count > 1)           /* FIXME, avoid if even boundary */
        {
@@ -540,9 +544,9 @@ child_xfer_memory (memaddr, myaddr, len, write, target)
          ptrace (PT_WRITE_D, inferior_pid, (PTRACE_ARG3_TYPE) addr,
                  buffer[i]);
          if (errno)
-            {
+           {
              /* Using the appropriate one (I or D) is necessary for
-                Gould NP1, at least.  */
+                Gould NP1, at least.  */
              errno = 0;
              ptrace (PT_WRITE_I, inferior_pid, (PTRACE_ARG3_TYPE) addr,
                      buffer[i]);
@@ -551,7 +555,7 @@ child_xfer_memory (memaddr, myaddr, len, write, target)
            return 0;
        }
 #ifdef CLEAR_INSN_CACHE
-      CLEAR_INSN_CACHE();
+      CLEAR_INSN_CACHE ();
 #endif
     }
   else
@@ -574,23 +578,23 @@ child_xfer_memory (memaddr, myaddr, len, write, target)
     }
   return len;
 }
-
 \f
+
 static void
 udot_info (dummy1, dummy2)
      char *dummy1;
      int dummy2;
 {
 #if defined (KERNEL_U_SIZE)
-  int udot_off;                /* Offset into user struct */
-  int udot_val;                /* Value from user struct at udot_off */
-  char mess[128];      /* For messages */
+  int udot_off;                        /* Offset into user struct */
+  int udot_val;                        /* Value from user struct at udot_off */
+  char mess[128];              /* For messages */
 #endif
 
-   if (!target_has_execution)
-     {
-       error ("The program is not being run.");
-     }
+  if (!target_has_execution)
+    {
+      error ("The program is not being run.");
+    }
 
 #if !defined (KERNEL_U_SIZE)
 
@@ -626,8 +630,8 @@ udot_info (dummy1, dummy2)
 #endif
 }
 #endif /* !defined (CHILD_XFER_MEMORY).  */
-
 \f
+
 void
 _initialize_infptrace ()
 {