* configure.in (*-*-sunos*): Use trailing * to match all

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

diff --git a/gdb/mips-xdep.c b/gdb/mips-xdep.c
index a5b0b03e655606af986e28e891c65429f4761243..806d15648917c08560a7bd89d0710652522ef4e5 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,41 @@ 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 core format is super-hairy (and completely
+   different in the new release).
+   For most mips systems, this function is defined in coredep.c.   */
 
-/* For now we stub this out; sgi format is super-hairy (and completely
-   different in the new release) */
-
-#ifdef sgi
+#if defined(sgi) 
 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;
 }
+#endif
+
+/* Access to the inferior is only good for native systems, not cross.
+   I am not sure why this is stubbed out on SGI...   --gnu@cygnus.com  */
 
+#if defined(sgi) || !defined(GDB_TARGET_IS_MIPS)
+
+/* ARGSUSED */
 void
-fetch_inferior_registers ()
+fetch_inferior_registers (regno)
+     int regno;
 {
   return;
 }
 
+/* ARGSUSED */
+void
 store_inferior_registers (regno)
      int regno;
 {
@@ -89,9 +79,9 @@ store_inferior_registers (regno)
 /* 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;
@@ -103,7 +93,8 @@ fetch_inferior_registers ()
       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);
@@ -128,7 +119,8 @@ store_inferior_registers (regno)
     {
       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);
@@ -141,11 +133,13 @@ store_inferior_registers (regno)
        {
          if (regno == ZERO_REGNUM || regno == PS_REGNUM
              || regno == BADVADDR_REGNUM || regno == CAUSE_REGNUM
-             || regno == FCRIR_REGNUM || regno == FP_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);
@@ -156,26 +150,3 @@ store_inferior_registers (regno)
 }
 
 #endif /* sgi */
-
-#if 0
-void
-fetch_core_registers ()
-{
-  register int regno;
-  int val;
-
-  for (regno = 1; regno < NUM_REGS; regno++) {
-    char buf[MAX_REGISTER_RAW_SIZE];
-
-    val = bfd_seek (core_bfd, register_addr (regno, 0));
-    if (val < 0 || (val = bfd_read (core_bfd, buf, sizeof buf)) < 0) {
-      char buffer[50];
-      strcpy (buffer, "Reading register ");
-      strcat (buffer, reg_names[regno]);
-
-      perror_with_name (buffer);
-    }
-    supply_register (regno, buf);
-  }
-}
-#endif /* 0 */