gdb/remote-vxsparc.c

   1 /* sparc-dependent portions of the RPC protocol
   2    used with a VxWorks target
   3
   4    Contributed by Wind River Systems.
   5
   6    This file is part of GDB.
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 2 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program; if not, write to the Free Software
  20    Foundation, Inc., 59 Temple Place - Suite 330,
  21    Boston, MA 02111-1307, USA.  */
  22
  23 #include <stdio.h>
  24 #include "defs.h"
  25
  26 #include "vx-share/regPacket.h"
  27 #include "frame.h"
  28 #include "inferior.h"
  29 #include "target.h"
  30 #include "gdbcore.h"
  31 #include "command.h"
  32 #include "symtab.h"
  33 #include "symfile.h"
  34 #include "regcache.h"
  35
  36 #include "gdb_string.h"
  37 #include <errno.h>
  38 #include <fcntl.h>
  39 #include <sys/types.h>
  40 #include <sys/time.h>
  41 #include <sys/socket.h>
  42
  43 #ifdef _AIX                     /* IBM claims "void *malloc()" not char * */
  44 #define malloc bogon_malloc
  45 #endif
  46
  47 #include <rpc/rpc.h>
  48 #include <sys/time.h>           /* UTek's <rpc/rpc.h> doesn't #incl this */
  49 #include <netdb.h>
  50 #include "vx-share/ptrace.h"
  51 #include "vx-share/xdr_ptrace.h"
  52 #include "vx-share/xdr_ld.h"
  53 #include "vx-share/xdr_rdb.h"
  54 #include "vx-share/dbgRpcLib.h"
  55
  56 /* get rid of value.h if possible */
  57 #include <value.h>
  58 #include <symtab.h>
  59
  60 /* Flag set if target has fpu */
  61
  62 extern int target_has_fp;
  63
  64 /* sparc floating point format descriptor, from "sparc-tdep.c."  */
  65
  66 extern struct ext_format ext_format_sparc;
  67
  68 /* Generic register read/write routines in remote-vx.c.  */
  69
  70 extern void net_read_registers ();
  71 extern void net_write_registers ();
  72
  73 /* Read a register or registers from the VxWorks target.
  74    REGNO is the register to read, or -1 for all; currently,
  75    it is ignored.  FIXME look at regno to improve efficiency.  */
  76
  77 void
  78 vx_read_register (int regno)
  79 {
  80   char sparc_greg_packet[SPARC_GREG_PLEN];
  81   char sparc_fpreg_packet[SPARC_FPREG_PLEN];
  82   CORE_ADDR sp;
  83
  84   /* Get general-purpose registers.  When copying values into
  85      registers [], don't assume that a location in registers []
  86      is properly aligned for the target data type.  */
  87
  88   net_read_registers (sparc_greg_packet, SPARC_GREG_PLEN, PTRACE_GETREGS);
  89
  90   /* Now copy the register values into registers[].
  91      Note that this code depends on the ordering of the REGNUMs
  92      as defined in "tm-sparc.h".  */
  93
  94   bcopy (&sparc_greg_packet[SPARC_R_G0],
  95          &deprecated_registers[REGISTER_BYTE (G0_REGNUM)],
  96          32 * SPARC_GREG_SIZE);
  97   bcopy (&sparc_greg_packet[SPARC_R_Y],
  98          &deprecated_registers[REGISTER_BYTE (Y_REGNUM)], 6 * SPARC_GREG_SIZE);
  99
 100   /* Now write the local and in registers to the register window
 101      spill area in the frame.  VxWorks does not do this for the
 102      active frame automatically; it greatly simplifies debugging
 103      (FRAME_FIND_SAVED_REGS, in particular, depends on this).  */
 104
 105   sp = extract_address (&deprecated_registers[REGISTER_BYTE (SP_REGNUM)],
 106                         REGISTER_RAW_SIZE (SP_REGNUM));
 107   write_memory (sp, &deprecated_registers[REGISTER_BYTE (L0_REGNUM)],
 108                 16 * REGISTER_RAW_SIZE (L0_REGNUM));
 109
 110   /* If the target has floating point registers, fetch them.
 111      Otherwise, zero the floating point register values in
 112      registers[] for good measure, even though we might not
 113      need to.  */
 114
 115   if (target_has_fp)
 116     {
 117       net_read_registers (sparc_fpreg_packet, SPARC_FPREG_PLEN,
 118                           PTRACE_GETFPREGS);
 119       bcopy (&sparc_fpreg_packet[SPARC_R_FP0],
 120              &deprecated_registers[REGISTER_BYTE (FP0_REGNUM)],
 121              32 * SPARC_FPREG_SIZE);
 122       bcopy (&sparc_fpreg_packet[SPARC_R_FSR],
 123              &deprecated_registers[REGISTER_BYTE (FPS_REGNUM)],
 124              1 * SPARC_FPREG_SIZE);
 125     }
 126   else
 127     {
 128       bzero (&deprecated_registers[REGISTER_BYTE (FP0_REGNUM)],
 129              32 * SPARC_FPREG_SIZE);
 130       bzero (&deprecated_registers[REGISTER_BYTE (FPS_REGNUM)],
 131              1 * SPARC_FPREG_SIZE);
 132     }
 133
 134   /* Mark the register cache valid.  */
 135
 136   deprecated_registers_fetched ();
 137 }
 138
 139 /* Store a register or registers into the VxWorks target.
 140    REGNO is the register to store, or -1 for all; currently,
 141    it is ignored.  FIXME look at regno to improve efficiency.  */
 142
 143 void
 144 vx_write_register (int regno)
 145 {
 146   char sparc_greg_packet[SPARC_GREG_PLEN];
 147   char sparc_fpreg_packet[SPARC_FPREG_PLEN];
 148   int in_gp_regs;
 149   int in_fp_regs;
 150   CORE_ADDR sp;
 151
 152   /* Store general purpose registers.  When copying values from
 153      registers [], don't assume that a location in registers []
 154      is properly aligned for the target data type.  */
 155
 156   in_gp_regs = 1;
 157   in_fp_regs = 1;
 158   if (regno >= 0)
 159     {
 160       if ((G0_REGNUM <= regno && regno <= I7_REGNUM)
 161           || (Y_REGNUM <= regno && regno <= NPC_REGNUM))
 162         in_fp_regs = 0;
 163       else
 164         in_gp_regs = 0;
 165     }
 166   if (in_gp_regs)
 167     {
 168       bcopy (&deprecated_registers[REGISTER_BYTE (G0_REGNUM)],
 169              &sparc_greg_packet[SPARC_R_G0], 32 * SPARC_GREG_SIZE);
 170       bcopy (&deprecated_registers[REGISTER_BYTE (Y_REGNUM)],
 171              &sparc_greg_packet[SPARC_R_Y], 6 * SPARC_GREG_SIZE);
 172
 173       net_write_registers (sparc_greg_packet, SPARC_GREG_PLEN, PTRACE_SETREGS);
 174
 175       /* If this is a local or in register, or we're storing all
 176          registers, update the register window spill area.  */
 177
 178       if (regno < 0 || (L0_REGNUM <= regno && regno <= I7_REGNUM))
 179         {
 180           sp = extract_address (&deprecated_registers[REGISTER_BYTE (SP_REGNUM)],
 181                                 REGISTER_RAW_SIZE (SP_REGNUM));
 182           write_memory (sp, &deprecated_registers[REGISTER_BYTE (L0_REGNUM)],
 183                         16 * REGISTER_RAW_SIZE (L0_REGNUM));
 184         }
 185     }
 186
 187   /* Store floating point registers if the target has them.  */
 188
 189   if (in_fp_regs && target_has_fp)
 190     {
 191       bcopy (&deprecated_registers[REGISTER_BYTE (FP0_REGNUM)],
 192              &sparc_fpreg_packet[SPARC_R_FP0], 32 * SPARC_FPREG_SIZE);
 193       bcopy (&deprecated_registers[REGISTER_BYTE (FPS_REGNUM)],
 194              &sparc_fpreg_packet[SPARC_R_FSR], 1 * SPARC_FPREG_SIZE);
 195
 196       net_write_registers (sparc_fpreg_packet, SPARC_FPREG_PLEN,
 197                            PTRACE_SETFPREGS);
 198     }
 199 }