SVR4 names don't have underscores, according to the ABI.

[deliverable/binutils-gdb.git] / gdb / mips-xdep.c

diff --git a/gdb/mips-xdep.c b/gdb/mips-xdep.c
index a344e8b933b7ff2bf6dee5c1911351e51b8544b5..4052a9c4bd96e54973018e43e4896919d6985516 100644 (file)
--- a/gdb/mips-xdep.c
+++ b/gdb/mips-xdep.c
@@ -1,5 +1,5 @@
 /* Low level MIPS interface to ptrace, for GDB when running under Unix.
-   Copyright (C) 1988, 1989, 1991 Free Software Foundation, Inc.
+   Copyright 1988, 1989, 1991, 1992 Free Software Foundation, Inc.
    Contributed by Alessandro Forin(af@cs.cmu.edu) at CMU
    and by Per Bothner(bothner@cs.wisc.edu) at U.Wisconsin.
 
@@ -19,51 +19,34 @@ 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., 675 Mass Ave, Cambridge, MA 02139, USA.  */
 
-#include <stdio.h>
-#ifdef sgi
-#include <sys/inst.h>
-#else
-#include <mips/inst.h>
-#endif
 #include "defs.h"
-#include "param.h"
-#include "frame.h"
 #include "inferior.h"
-#include "symtab.h"
-#include "value.h"
-
-#ifdef USG
-#include <sys/types.h>
-#endif
-
-#include <sys/param.h>
-#include <sys/dir.h>
-#include <signal.h>
-#include <sys/ioctl.h>
-/* #include <fcntl.h>  Can we live without this?  */
-
 #include "gdbcore.h"
 
-#include <sys/user.h>          /* After a.out.h  */
-#include <sys/file.h>
-#include <sys/stat.h>
-
 /* For now we stub this out; sgi format is super-hairy (and completely
    different in the new release) */
 
-#ifdef sgi
+#if defined(sgi) || !defined(GDB_TARGET_IS_MIPS)
 void
-fetch_core_registers ()
+fetch_core_registers (core_reg_sect, core_reg_size, which, reg_addr)
+     char *core_reg_sect;
+     unsigned core_reg_size;
+     int which;
+     unsigned int reg_addr;
 {
   return;
 }
 
+/* ARGSUSED */
 void
-fetch_inferior_registers ()
+fetch_inferior_registers (regno)
+     int regno;
 {
   return;
 }
 
+/* ARGSUSED */
+void
 store_inferior_registers (regno)
      int regno;
 {
@@ -73,12 +56,25 @@ store_inferior_registers (regno)
 
 #else
 
+/* Map gdb internal register number to ptrace address. */
+
+#define REGISTER_PTRACE_ADDR(regno) \
+ (regno < 32 ? regno           \
+  : regno == PC_REGNUM ? 96    \
+  : regno == CAUSE_REGNUM ? 97 \
+  : regno == HI_REGNUM ? 98    \
+  : regno == LO_REGNUM ? 99    \
+  : regno == FCRCS_REGNUM ? 100        \
+  : regno == FCRIR_REGNUM ? 101        \
+  : regno >= FP0_REGNUM ? regno - (FP0_REGNUM-32)\
+  : 0)
+
 /* Get all registers from the inferior */
 
 void
-fetch_inferior_registers ()
+fetch_inferior_registers (regno)
+     int regno;
 {
-  register int regno;
   register unsigned int regaddr;
   char buf[MAX_REGISTER_RAW_SIZE];
   register int i;
@@ -87,10 +83,11 @@ fetch_inferior_registers ()
 
   for (regno = 1; regno < NUM_REGS; regno++)
     {
-      regaddr = register_addr (regno, 1);
+      regaddr = REGISTER_PTRACE_ADDR (regno);
       for (i = 0; i < REGISTER_RAW_SIZE (regno); i += sizeof (int))
        {
-         *(int *) &buf[i] = ptrace (3, inferior_pid, regaddr, 0);
+         *(int *) &buf[i] = ptrace (3, inferior_pid,
+                                    (PTRACE_ARG3_TYPE) regaddr, 0);
          regaddr += sizeof (int);
        }
       supply_register (regno, buf);
@@ -113,9 +110,10 @@ store_inferior_registers (regno)
 
   if (regno > 0)
     {
-      regaddr = register_addr (regno, 1);
+      regaddr = REGISTER_PTRACE_ADDR (regno);
       errno = 0;
-      ptrace (6, inferior_pid, regaddr, read_register (regno));
+      ptrace (6, inferior_pid, (PTRACE_ARG3_TYPE) regaddr,
+             read_register (regno));
       if (errno != 0)
        {
          sprintf (buf, "writing register number %d", regno);
@@ -124,13 +122,17 @@ store_inferior_registers (regno)
     }
   else
     {
-      for (regno = 1; regno < NUM_REGS; regno++)
+      for (regno = 0; regno < NUM_REGS; regno++)
        {
-         if (regno == 32 || regno == 35 || regno == 36 || regno == 71)
+         if (regno == ZERO_REGNUM || regno == PS_REGNUM
+             || regno == BADVADDR_REGNUM || regno == CAUSE_REGNUM
+             || regno == FCRIR_REGNUM || regno == FP_REGNUM
+             || (regno >= FIRST_EMBED_REGNUM && regno <= LAST_EMBED_REGNUM))
            continue;
          regaddr = register_addr (regno, 1);
          errno = 0;
-         ptrace (6, inferior_pid, regaddr, read_register (regno));
+         ptrace (6, inferior_pid, (PTRACE_ARG3_TYPE) regaddr,
+                 read_register (regno));
          if (errno != 0)
            {
              sprintf (buf, "writing all regs, number %d", regno);