Commit | Line | Data |
---|---|---|
c906108c | 1 | /* Am29k-dependent portions of the RPC protocol |
c906108c | 2 | |
c5aa993b | 3 | Contributed by Wind River Systems. |
c906108c | 4 | |
c5aa993b | 5 | This file is part of GDB. |
c906108c | 6 | |
c5aa993b JM |
7 | This program is free software; you can redistribute it and/or modify |
8 | it under the terms of the GNU General Public License as published by | |
9 | the Free Software Foundation; either version 2 of the License, or | |
10 | (at your option) any later version. | |
c906108c | 11 | |
c5aa993b JM |
12 | This program is distributed in the hope that it will be useful, |
13 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
14 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
15 | GNU General Public License for more details. | |
c906108c | 16 | |
c5aa993b JM |
17 | You should have received a copy of the GNU General Public License |
18 | along with this program; if not, write to the Free Software | |
19 | Foundation, Inc., 59 Temple Place - Suite 330, | |
20 | Boston, MA 02111-1307, USA. */ | |
c906108c SS |
21 | |
22 | #include <stdio.h> | |
23 | #include "defs.h" | |
24 | ||
c5aa993b | 25 | #include "vx-share/regPacket.h" |
c906108c SS |
26 | #include "frame.h" |
27 | #include "inferior.h" | |
c906108c SS |
28 | #include "target.h" |
29 | #include "gdbcore.h" | |
30 | #include "command.h" | |
31 | #include "symtab.h" | |
32 | #include "symfile.h" /* for struct complaint */ | |
4e052eda | 33 | #include "regcache.h" |
c906108c SS |
34 | |
35 | #include "gdb_string.h" | |
36 | #include <errno.h> | |
c906108c SS |
37 | #include <fcntl.h> |
38 | #include <sys/types.h> | |
39 | #include <sys/time.h> | |
40 | #include <sys/socket.h> | |
41 | ||
c5aa993b | 42 | #ifdef _AIX /* IBM claims "void *malloc()" not char * */ |
c906108c SS |
43 | #define malloc bogon_malloc |
44 | #endif | |
45 | ||
46 | #include <rpc/rpc.h> | |
47 | #include <sys/time.h> /* UTek's <rpc/rpc.h> doesn't #incl this */ | |
48 | #include <netdb.h> | |
49 | #include "vx-share/ptrace.h" | |
50 | #include "vx-share/xdr_ptrace.h" | |
51 | #include "vx-share/xdr_ld.h" | |
52 | #include "vx-share/xdr_rdb.h" | |
53 | #include "vx-share/dbgRpcLib.h" | |
54 | ||
55 | /* get rid of value.h if possible */ | |
56 | #include <value.h> | |
57 | #include <symtab.h> | |
58 | ||
59 | /* Flag set if target has fpu */ | |
60 | ||
61 | extern int target_has_fp; | |
62 | ||
63 | /* Generic register read/write routines in remote-vx.c. */ | |
64 | ||
65 | extern void net_read_registers (); | |
66 | extern void net_write_registers (); | |
67 | ||
68 | /* Read a register or registers from the VxWorks target. | |
69 | REGNO is the register to read, or -1 for all; currently, | |
70 | it is ignored. FIXME look at regno to improve efficiency. */ | |
71 | ||
72 | void | |
fba45db2 | 73 | vx_read_register (int regno) |
c906108c SS |
74 | { |
75 | char am29k_greg_packet[AM29K_GREG_PLEN]; | |
76 | char am29k_fpreg_packet[AM29K_FPREG_PLEN]; | |
77 | ||
78 | /* Get general-purpose registers. When copying values into | |
79 | registers [], don't assume that a location in registers [] | |
80 | is properly aligned for the target data type. */ | |
81 | ||
82 | net_read_registers (am29k_greg_packet, AM29K_GREG_PLEN, PTRACE_GETREGS); | |
83 | ||
84 | /* Now copy the register values into registers[]. | |
85 | Note that this code depends on the ordering of the REGNUMs | |
86 | as defined in "tm-29k.h". */ | |
87 | ||
88 | bcopy (&am29k_greg_packet[AM29K_R_GR96], | |
89 | ®isters[REGISTER_BYTE (GR96_REGNUM)], 160 * AM29K_GREG_SIZE); | |
90 | bcopy (&am29k_greg_packet[AM29K_R_VAB], | |
91 | ®isters[REGISTER_BYTE (VAB_REGNUM)], 15 * AM29K_GREG_SIZE); | |
92 | registers[REGISTER_BYTE (INTE_REGNUM)] = am29k_greg_packet[AM29K_R_INTE]; | |
93 | bcopy (&am29k_greg_packet[AM29K_R_RSP], | |
94 | ®isters[REGISTER_BYTE (GR1_REGNUM)], 5 * AM29K_GREG_SIZE); | |
95 | ||
96 | /* PAD For now, don't care about exop register */ | |
97 | ||
98 | memset (®isters[REGISTER_BYTE (EXO_REGNUM)], '\0', AM29K_GREG_SIZE); | |
99 | ||
100 | /* If the target has floating point registers, fetch them. | |
101 | Otherwise, zero the floating point register values in | |
102 | registers[] for good measure, even though we might not | |
103 | need to. */ | |
104 | ||
105 | if (target_has_fp) | |
106 | { | |
107 | net_read_registers (am29k_fpreg_packet, AM29K_FPREG_PLEN, | |
c5aa993b | 108 | PTRACE_GETFPREGS); |
c906108c SS |
109 | registers[REGISTER_BYTE (FPE_REGNUM)] = am29k_fpreg_packet[AM29K_R_FPE]; |
110 | registers[REGISTER_BYTE (FPS_REGNUM)] = am29k_fpreg_packet[AM29K_R_FPS]; | |
111 | ||
112 | /* PAD For now, don't care about registers (?) AI0 to q */ | |
113 | ||
114 | memset (®isters[REGISTER_BYTE (161)], '\0', 21 * AM29K_FPREG_SIZE); | |
115 | } | |
116 | else | |
c5aa993b | 117 | { |
c906108c SS |
118 | memset (®isters[REGISTER_BYTE (FPE_REGNUM)], '\0', AM29K_FPREG_SIZE); |
119 | memset (®isters[REGISTER_BYTE (FPS_REGNUM)], '\0', AM29K_FPREG_SIZE); | |
120 | ||
121 | /* PAD For now, don't care about registers (?) AI0 to q */ | |
122 | ||
123 | memset (®isters[REGISTER_BYTE (161)], '\0', 21 * AM29K_FPREG_SIZE); | |
124 | } | |
125 | ||
126 | /* Mark the register cache valid. */ | |
127 | ||
128 | registers_fetched (); | |
129 | } | |
130 | ||
131 | /* Store a register or registers into the VxWorks target. | |
132 | REGNO is the register to store, or -1 for all; currently, | |
133 | it is ignored. FIXME look at regno to improve efficiency. */ | |
134 | ||
135 | void | |
fba45db2 | 136 | vx_write_register (int regno) |
c906108c SS |
137 | { |
138 | char am29k_greg_packet[AM29K_GREG_PLEN]; | |
139 | char am29k_fpreg_packet[AM29K_FPREG_PLEN]; | |
140 | ||
141 | /* Store general purpose registers. When copying values from | |
142 | registers [], don't assume that a location in registers [] | |
143 | is properly aligned for the target data type. */ | |
144 | ||
145 | bcopy (®isters[REGISTER_BYTE (GR96_REGNUM)], | |
146 | &am29k_greg_packet[AM29K_R_GR96], 160 * AM29K_GREG_SIZE); | |
147 | bcopy (®isters[REGISTER_BYTE (VAB_REGNUM)], | |
148 | &am29k_greg_packet[AM29K_R_VAB], 15 * AM29K_GREG_SIZE); | |
149 | am29k_greg_packet[AM29K_R_INTE] = registers[REGISTER_BYTE (INTE_REGNUM)]; | |
150 | bcopy (®isters[REGISTER_BYTE (GR1_REGNUM)], | |
151 | &am29k_greg_packet[AM29K_R_RSP], 5 * AM29K_GREG_SIZE); | |
152 | ||
153 | net_write_registers (am29k_greg_packet, AM29K_GREG_PLEN, PTRACE_SETREGS); | |
154 | ||
155 | /* Store floating point registers if the target has them. */ | |
156 | ||
157 | if (target_has_fp) | |
158 | { | |
159 | am29k_fpreg_packet[AM29K_R_FPE] = registers[REGISTER_BYTE (FPE_REGNUM)]; | |
160 | am29k_fpreg_packet[AM29K_R_FPS] = registers[REGISTER_BYTE (FPS_REGNUM)]; | |
161 | ||
162 | net_write_registers (am29k_fpreg_packet, AM29K_FPREG_PLEN, | |
c5aa993b | 163 | PTRACE_SETFPREGS); |
c906108c SS |
164 | } |
165 | } | |
166 | ||
167 | /* VxWorks zeroes fp when the task is initialized; we use this | |
168 | to terminate the frame chain. Chain means here the nominal address of | |
169 | a frame, that is, the return address (lr0) address in the stack. To | |
170 | obtain the frame pointer (lr1) contents, we must add 4 bytes. | |
171 | Note : may be we should modify init_frame_info() to get the frame pointer | |
c5aa993b | 172 | and store it into the frame_info struct rather than reading its |
c338868a | 173 | contents when FRAME_CHAIN_VALID is invoked. THISFRAME is unused. */ |
c906108c SS |
174 | |
175 | int | |
c338868a | 176 | vx29k_frame_chain_valid (CORE_ADDR chain, struct frame_info *thisframe) |
c906108c | 177 | { |
c5aa993b | 178 | int fp_contents; |
c906108c | 179 | |
c5aa993b JM |
180 | read_memory ((CORE_ADDR) (chain + 4), (char *) &fp_contents, 4); |
181 | return (fp_contents != 0); | |
c906108c | 182 | } |