OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [gdb-5.0/] [gdb/] [remote-vxsparc.c] - Diff between revs 105 and 1765

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 105 Rev 1765
/* sparc-dependent portions of the RPC protocol
/* sparc-dependent portions of the RPC protocol
   used with a VxWorks target
   used with a VxWorks target
 
 
   Contributed by Wind River Systems.
   Contributed by Wind River Systems.
 
 
   This file is part of GDB.
   This file is part of GDB.
 
 
   This program is free software; you can redistribute it and/or modify
   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
   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 2 of the License, or
   (at your option) any later version.
   (at your option) any later version.
 
 
   This program is distributed in the hope that it will be useful,
   This program is distributed in the hope that it will be useful,
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   but WITHOUT ANY WARRANTY; without even the implied warranty of
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   GNU General Public License for more details.
 
 
   You should have received a copy of the GNU General Public License
   You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software
   along with this program; if not, write to the Free Software
   Foundation, Inc., 59 Temple Place - Suite 330,
   Foundation, Inc., 59 Temple Place - Suite 330,
   Boston, MA 02111-1307, USA.  */
   Boston, MA 02111-1307, USA.  */
 
 
#include <stdio.h>
#include <stdio.h>
#include "defs.h"
#include "defs.h"
 
 
#include "vx-share/regPacket.h"
#include "vx-share/regPacket.h"
#include "frame.h"
#include "frame.h"
#include "inferior.h"
#include "inferior.h"
#include "gdb_wait.h"
#include "gdb_wait.h"
#include "target.h"
#include "target.h"
#include "gdbcore.h"
#include "gdbcore.h"
#include "command.h"
#include "command.h"
#include "symtab.h"
#include "symtab.h"
#include "symfile.h"            /* for struct complaint */
#include "symfile.h"            /* for struct complaint */
 
 
#include "gdb_string.h"
#include "gdb_string.h"
#include <errno.h>
#include <errno.h>
#include <signal.h>
#include <signal.h>
#include <fcntl.h>
#include <fcntl.h>
#include <sys/types.h>
#include <sys/types.h>
#include <sys/time.h>
#include <sys/time.h>
#include <sys/socket.h>
#include <sys/socket.h>
 
 
#ifdef _AIX                     /* IBM claims "void *malloc()" not char * */
#ifdef _AIX                     /* IBM claims "void *malloc()" not char * */
#define malloc bogon_malloc
#define malloc bogon_malloc
#endif
#endif
 
 
#include <rpc/rpc.h>
#include <rpc/rpc.h>
#include <sys/time.h>           /* UTek's <rpc/rpc.h> doesn't #incl this */
#include <sys/time.h>           /* UTek's <rpc/rpc.h> doesn't #incl this */
#include <netdb.h>
#include <netdb.h>
#include "vx-share/ptrace.h"
#include "vx-share/ptrace.h"
#include "vx-share/xdr_ptrace.h"
#include "vx-share/xdr_ptrace.h"
#include "vx-share/xdr_ld.h"
#include "vx-share/xdr_ld.h"
#include "vx-share/xdr_rdb.h"
#include "vx-share/xdr_rdb.h"
#include "vx-share/dbgRpcLib.h"
#include "vx-share/dbgRpcLib.h"
 
 
/* get rid of value.h if possible */
/* get rid of value.h if possible */
#include <value.h>
#include <value.h>
#include <symtab.h>
#include <symtab.h>
 
 
/* Flag set if target has fpu */
/* Flag set if target has fpu */
 
 
extern int target_has_fp;
extern int target_has_fp;
 
 
/* sparc floating point format descriptor, from "sparc-tdep.c."  */
/* sparc floating point format descriptor, from "sparc-tdep.c."  */
 
 
extern struct ext_format ext_format_sparc;
extern struct ext_format ext_format_sparc;
 
 
/* Generic register read/write routines in remote-vx.c.  */
/* Generic register read/write routines in remote-vx.c.  */
 
 
extern void net_read_registers ();
extern void net_read_registers ();
extern void net_write_registers ();
extern void net_write_registers ();
 
 
/* Read a register or registers from the VxWorks target.
/* Read a register or registers from the VxWorks target.
   REGNO is the register to read, or -1 for all; currently,
   REGNO is the register to read, or -1 for all; currently,
   it is ignored.  FIXME look at regno to improve efficiency.  */
   it is ignored.  FIXME look at regno to improve efficiency.  */
 
 
void
void
vx_read_register (regno)
vx_read_register (regno)
     int regno;
     int regno;
{
{
  char sparc_greg_packet[SPARC_GREG_PLEN];
  char sparc_greg_packet[SPARC_GREG_PLEN];
  char sparc_fpreg_packet[SPARC_FPREG_PLEN];
  char sparc_fpreg_packet[SPARC_FPREG_PLEN];
  CORE_ADDR sp;
  CORE_ADDR sp;
 
 
  /* Get general-purpose registers.  When copying values into
  /* Get general-purpose registers.  When copying values into
     registers [], don't assume that a location in registers []
     registers [], don't assume that a location in registers []
     is properly aligned for the target data type.  */
     is properly aligned for the target data type.  */
 
 
  net_read_registers (sparc_greg_packet, SPARC_GREG_PLEN, PTRACE_GETREGS);
  net_read_registers (sparc_greg_packet, SPARC_GREG_PLEN, PTRACE_GETREGS);
 
 
  /* Now copy the register values into registers[].
  /* Now copy the register values into registers[].
     Note that this code depends on the ordering of the REGNUMs
     Note that this code depends on the ordering of the REGNUMs
     as defined in "tm-sparc.h".  */
     as defined in "tm-sparc.h".  */
 
 
  bcopy (&sparc_greg_packet[SPARC_R_G0],
  bcopy (&sparc_greg_packet[SPARC_R_G0],
         &registers[REGISTER_BYTE (G0_REGNUM)], 32 * SPARC_GREG_SIZE);
         &registers[REGISTER_BYTE (G0_REGNUM)], 32 * SPARC_GREG_SIZE);
  bcopy (&sparc_greg_packet[SPARC_R_Y],
  bcopy (&sparc_greg_packet[SPARC_R_Y],
         &registers[REGISTER_BYTE (Y_REGNUM)], 6 * SPARC_GREG_SIZE);
         &registers[REGISTER_BYTE (Y_REGNUM)], 6 * SPARC_GREG_SIZE);
 
 
  /* Now write the local and in registers to the register window
  /* Now write the local and in registers to the register window
     spill area in the frame.  VxWorks does not do this for the
     spill area in the frame.  VxWorks does not do this for the
     active frame automatically; it greatly simplifies debugging
     active frame automatically; it greatly simplifies debugging
     (FRAME_FIND_SAVED_REGS, in particular, depends on this).  */
     (FRAME_FIND_SAVED_REGS, in particular, depends on this).  */
 
 
  sp = extract_address (&registers[REGISTER_BYTE (SP_REGNUM)],
  sp = extract_address (&registers[REGISTER_BYTE (SP_REGNUM)],
                        REGISTER_RAW_SIZE (CORE_ADDR));
                        REGISTER_RAW_SIZE (CORE_ADDR));
  write_memory (sp, &registers[REGISTER_BYTE (L0_REGNUM)],
  write_memory (sp, &registers[REGISTER_BYTE (L0_REGNUM)],
                16 * REGISTER_RAW_SIZE (L0_REGNUM));
                16 * REGISTER_RAW_SIZE (L0_REGNUM));
 
 
  /* If the target has floating point registers, fetch them.
  /* If the target has floating point registers, fetch them.
     Otherwise, zero the floating point register values in
     Otherwise, zero the floating point register values in
     registers[] for good measure, even though we might not
     registers[] for good measure, even though we might not
     need to.  */
     need to.  */
 
 
  if (target_has_fp)
  if (target_has_fp)
    {
    {
      net_read_registers (sparc_fpreg_packet, SPARC_FPREG_PLEN,
      net_read_registers (sparc_fpreg_packet, SPARC_FPREG_PLEN,
                          PTRACE_GETFPREGS);
                          PTRACE_GETFPREGS);
      bcopy (&sparc_fpreg_packet[SPARC_R_FP0],
      bcopy (&sparc_fpreg_packet[SPARC_R_FP0],
             &registers[REGISTER_BYTE (FP0_REGNUM)], 32 * SPARC_FPREG_SIZE);
             &registers[REGISTER_BYTE (FP0_REGNUM)], 32 * SPARC_FPREG_SIZE);
      bcopy (&sparc_fpreg_packet[SPARC_R_FSR],
      bcopy (&sparc_fpreg_packet[SPARC_R_FSR],
             &registers[REGISTER_BYTE (FPS_REGNUM)], 1 * SPARC_FPREG_SIZE);
             &registers[REGISTER_BYTE (FPS_REGNUM)], 1 * SPARC_FPREG_SIZE);
    }
    }
  else
  else
    {
    {
      bzero (&registers[REGISTER_BYTE (FP0_REGNUM)], 32 * SPARC_FPREG_SIZE);
      bzero (&registers[REGISTER_BYTE (FP0_REGNUM)], 32 * SPARC_FPREG_SIZE);
      bzero (&registers[REGISTER_BYTE (FPS_REGNUM)], 1 * SPARC_FPREG_SIZE);
      bzero (&registers[REGISTER_BYTE (FPS_REGNUM)], 1 * SPARC_FPREG_SIZE);
    }
    }
 
 
  /* Mark the register cache valid.  */
  /* Mark the register cache valid.  */
 
 
  registers_fetched ();
  registers_fetched ();
}
}
 
 
/* Store a register or registers into the VxWorks target.
/* Store a register or registers into the VxWorks target.
   REGNO is the register to store, or -1 for all; currently,
   REGNO is the register to store, or -1 for all; currently,
   it is ignored.  FIXME look at regno to improve efficiency.  */
   it is ignored.  FIXME look at regno to improve efficiency.  */
 
 
void
void
vx_write_register (regno)
vx_write_register (regno)
     int regno;
     int regno;
{
{
  char sparc_greg_packet[SPARC_GREG_PLEN];
  char sparc_greg_packet[SPARC_GREG_PLEN];
  char sparc_fpreg_packet[SPARC_FPREG_PLEN];
  char sparc_fpreg_packet[SPARC_FPREG_PLEN];
  int in_gp_regs;
  int in_gp_regs;
  int in_fp_regs;
  int in_fp_regs;
  CORE_ADDR sp;
  CORE_ADDR sp;
 
 
  /* Store general purpose registers.  When copying values from
  /* Store general purpose registers.  When copying values from
     registers [], don't assume that a location in registers []
     registers [], don't assume that a location in registers []
     is properly aligned for the target data type.  */
     is properly aligned for the target data type.  */
 
 
  in_gp_regs = 1;
  in_gp_regs = 1;
  in_fp_regs = 1;
  in_fp_regs = 1;
  if (regno >= 0)
  if (regno >= 0)
    {
    {
      if ((G0_REGNUM <= regno && regno <= I7_REGNUM)
      if ((G0_REGNUM <= regno && regno <= I7_REGNUM)
          || (Y_REGNUM <= regno && regno <= NPC_REGNUM))
          || (Y_REGNUM <= regno && regno <= NPC_REGNUM))
        in_fp_regs = 0;
        in_fp_regs = 0;
      else
      else
        in_gp_regs = 0;
        in_gp_regs = 0;
    }
    }
  if (in_gp_regs)
  if (in_gp_regs)
    {
    {
      bcopy (&registers[REGISTER_BYTE (G0_REGNUM)],
      bcopy (&registers[REGISTER_BYTE (G0_REGNUM)],
             &sparc_greg_packet[SPARC_R_G0], 32 * SPARC_GREG_SIZE);
             &sparc_greg_packet[SPARC_R_G0], 32 * SPARC_GREG_SIZE);
      bcopy (&registers[REGISTER_BYTE (Y_REGNUM)],
      bcopy (&registers[REGISTER_BYTE (Y_REGNUM)],
             &sparc_greg_packet[SPARC_R_Y], 6 * SPARC_GREG_SIZE);
             &sparc_greg_packet[SPARC_R_Y], 6 * SPARC_GREG_SIZE);
 
 
      net_write_registers (sparc_greg_packet, SPARC_GREG_PLEN, PTRACE_SETREGS);
      net_write_registers (sparc_greg_packet, SPARC_GREG_PLEN, PTRACE_SETREGS);
 
 
      /* If this is a local or in register, or we're storing all
      /* If this is a local or in register, or we're storing all
         registers, update the register window spill area.  */
         registers, update the register window spill area.  */
 
 
      if (regno < 0 || (L0_REGNUM <= regno && regno <= I7_REGNUM))
      if (regno < 0 || (L0_REGNUM <= regno && regno <= I7_REGNUM))
        {
        {
          sp = extract_address (&registers[REGISTER_BYTE (SP_REGNUM)],
          sp = extract_address (&registers[REGISTER_BYTE (SP_REGNUM)],
                                REGISTER_RAW_SIZE (CORE_ADDR));
                                REGISTER_RAW_SIZE (CORE_ADDR));
          write_memory (sp, &registers[REGISTER_BYTE (L0_REGNUM)],
          write_memory (sp, &registers[REGISTER_BYTE (L0_REGNUM)],
                        16 * REGISTER_RAW_SIZE (L0_REGNUM));
                        16 * REGISTER_RAW_SIZE (L0_REGNUM));
        }
        }
    }
    }
 
 
  /* Store floating point registers if the target has them.  */
  /* Store floating point registers if the target has them.  */
 
 
  if (in_fp_regs && target_has_fp)
  if (in_fp_regs && target_has_fp)
    {
    {
      bcopy (&registers[REGISTER_BYTE (FP0_REGNUM)],
      bcopy (&registers[REGISTER_BYTE (FP0_REGNUM)],
             &sparc_fpreg_packet[SPARC_R_FP0], 32 * SPARC_FPREG_SIZE);
             &sparc_fpreg_packet[SPARC_R_FP0], 32 * SPARC_FPREG_SIZE);
      bcopy (&registers[REGISTER_BYTE (FPS_REGNUM)],
      bcopy (&registers[REGISTER_BYTE (FPS_REGNUM)],
             &sparc_fpreg_packet[SPARC_R_FSR], 1 * SPARC_FPREG_SIZE);
             &sparc_fpreg_packet[SPARC_R_FSR], 1 * SPARC_FPREG_SIZE);
 
 
      net_write_registers (sparc_fpreg_packet, SPARC_FPREG_PLEN,
      net_write_registers (sparc_fpreg_packet, SPARC_FPREG_PLEN,
                           PTRACE_SETFPREGS);
                           PTRACE_SETFPREGS);
    }
    }
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.