2004-07-28 Andrew Cagney <cagney@gnu.org>
[platform/upstream/binutils.git] / gdb / remote-vx68.c
1 /* 68k-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
49 #ifdef _AIX
50 #undef malloc
51 #endif
52
53 #include <sys/time.h>           /* UTek's <rpc/rpc.h> doesn't #incl this */
54 #include <netdb.h>
55 #include "vx-share/ptrace.h"
56 #include "vx-share/xdr_ptrace.h"
57 #include "vx-share/xdr_ld.h"
58 #include "vx-share/xdr_rdb.h"
59 #include "vx-share/dbgRpcLib.h"
60
61 /* get rid of value.h if possible */
62 #include <value.h>
63 #include <symtab.h>
64
65 /* Flag set if target has fpu */
66
67 extern int target_has_fp;
68
69 /* Generic register read/write routines in remote-vx.c.  */
70
71 extern void net_read_registers ();
72 extern void net_write_registers ();
73
74 /* Read a register or registers from the VxWorks target.
75    REGNO is the register to read, or -1 for all; currently,
76    it is ignored.  FIXME look at regno to improve efficiency.  */
77
78 void
79 vx_read_register (int regno)
80 {
81   char mc68k_greg_packet[MC68K_GREG_PLEN];
82   char mc68k_fpreg_packet[MC68K_FPREG_PLEN];
83
84   /* Get general-purpose registers.  */
85
86   net_read_registers (mc68k_greg_packet, MC68K_GREG_PLEN, PTRACE_GETREGS);
87
88   memcpy (deprecated_registers,
89           &mc68k_greg_packet[MC68K_R_D0]
90           16 * MC68K_GREG_SIZE);
91   memcpy (&deprecated_registers[DEPRECATED_REGISTER_BYTE (PS_REGNUM)],
92           &mc68k_greg_packet[MC68K_R_SR],
93           MC68K_GREG_SIZE);
94   memcpy (&deprecated_registers[DEPRECATED_REGISTER_BYTE (PC_REGNUM)],
95           &mc68k_greg_packet[MC68K_R_PC],
96           MC68K_GREG_SIZE);
97
98   /* Get floating-point registers, if the target system has them.
99      Otherwise, zero them.  */
100
101   if (target_has_fp)
102     {
103       net_read_registers (mc68k_fpreg_packet, MC68K_FPREG_PLEN,
104                           PTRACE_GETFPREGS);
105
106       memcpy (&deprecated_registers[DEPRECATED_REGISTER_BYTE (FP0_REGNUM)],
107               &mc68k_fpreg_packet[MC68K_R_FP0],
108               MC68K_FPREG_SIZE * 8);
109       memcpy (&deprecated_registers[DEPRECATED_REGISTER_BYTE (FPC_REGNUM)],
110               &mc68k_fpreg_packet[MC68K_R_FPCR],
111               MC68K_FPREG_PLEN - (MC68K_FPREG_SIZE * 8));
112     }
113   else
114     {
115       memset (&deprecated_registers[DEPRECATED_REGISTER_BYTE (FP0_REGNUM)],
116               0, MC68K_FPREG_SIZE * 8);
117       memset (&deprecated_registers[DEPRECATED_REGISTER_BYTE (FPC_REGNUM)],
118               0, MC68K_FPREG_PLEN - (MC68K_FPREG_SIZE * 8));
119     }
120
121   /* Mark the register cache valid.  */
122
123   deprecated_registers_fetched ();
124 }
125
126 /* Store a register or registers into the VxWorks target.
127    REGNO is the register to store, or -1 for all; currently,
128    it is ignored.  FIXME look at regno to improve efficiency.  */
129
130 void
131 vx_write_register (int regno)
132 {
133   char mc68k_greg_packet[MC68K_GREG_PLEN];
134   char mc68k_fpreg_packet[MC68K_FPREG_PLEN];
135
136   /* Store general-purpose registers.  */
137
138   memcpy (&mc68k_greg_packet[MC68K_R_D0], deprecated_registers,
139           16 * MC68K_GREG_SIZE);
140   memcpy (&mc68k_greg_packet[MC68K_R_SR],
141           &deprecated_registers[DEPRECATED_REGISTER_BYTE (PS_REGNUM)],
142           MC68K_GREG_SIZE);
143   memcpy (&mc68k_greg_packet[MC68K_R_PC],
144           &deprecated_registers[DEPRECATED_REGISTER_BYTE (PC_REGNUM)],
145           MC68K_GREG_SIZE);
146
147   net_write_registers (mc68k_greg_packet, MC68K_GREG_PLEN, PTRACE_SETREGS);
148
149   /* Store floating point registers if the target has them.  */
150
151   if (target_has_fp)
152     {
153       memcpy (&mc68k_fpreg_packet[MC68K_R_FP0],
154               &deprecated_registers[DEPRECATED_REGISTER_BYTE (FP0_REGNUM)],
155               MC68K_FPREG_SIZE * 8);
156       memcpy (&mc68k_fpreg_packet[MC68K_R_FPCR],
157               &deprecated_registers[DEPRECATED_REGISTER_BYTE (FPC_REGNUM)],
158               MC68K_FPREG_PLEN - (MC68K_FPREG_SIZE * 8));
159
160       net_write_registers (mc68k_fpreg_packet, MC68K_FPREG_PLEN,
161                            PTRACE_SETFPREGS);
162     }
163 }