1 /* GNU/Linux/MIPS specific low level interface, for the remote server for GDB.
2 Copyright (C) 1995, 1996, 1998, 1999, 2000, 2001, 2002, 2005, 2006, 2007,
3 2008 Free Software Foundation, Inc.
5 This file is part of GDB.
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 3 of the License, or
10 (at your option) any later version.
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.
17 You should have received a copy of the GNU General Public License
18 along with this program. If not, see <http://www.gnu.org/licenses/>. */
21 #include "linux-low.h"
23 #include <sys/ptrace.h>
26 #include "gdb_proc_service.h"
28 #ifndef PTRACE_GET_THREAD_AREA
29 #define PTRACE_GET_THREAD_AREA 25
36 #define mips_num_regs 73
38 #include <asm/ptrace.h>
44 /* Deliberately signed, for proper sign extension. */
49 /* Return the ptrace ``address'' of register REGNO. */
51 static int mips_regmap
[] = {
52 -1, 1, 2, 3, 4, 5, 6, 7,
53 8, 9, 10, 11, 12, 13, 14, 15,
54 16, 17, 18, 19, 20, 21, 22, 23,
55 24, 25, 26, 27, 28, 29, 30, 31,
57 -1, MMLO
, MMHI
, BADVADDR
, CAUSE
, PC
,
59 FPR_BASE
, FPR_BASE
+ 1, FPR_BASE
+ 2, FPR_BASE
+ 3,
60 FPR_BASE
+ 4, FPR_BASE
+ 5, FPR_BASE
+ 6, FPR_BASE
+ 7,
61 FPR_BASE
+ 8, FPR_BASE
+ 8, FPR_BASE
+ 10, FPR_BASE
+ 11,
62 FPR_BASE
+ 12, FPR_BASE
+ 13, FPR_BASE
+ 14, FPR_BASE
+ 15,
63 FPR_BASE
+ 16, FPR_BASE
+ 17, FPR_BASE
+ 18, FPR_BASE
+ 19,
64 FPR_BASE
+ 20, FPR_BASE
+ 21, FPR_BASE
+ 22, FPR_BASE
+ 23,
65 FPR_BASE
+ 24, FPR_BASE
+ 25, FPR_BASE
+ 26, FPR_BASE
+ 27,
66 FPR_BASE
+ 28, FPR_BASE
+ 29, FPR_BASE
+ 30, FPR_BASE
+ 31,
72 /* From mips-linux-nat.c. */
74 /* Pseudo registers can not be read. ptrace does not provide a way to
75 read (or set) PS_REGNUM, and there's no point in reading or setting
76 ZERO_REGNUM. We also can not set BADVADDR, CAUSE, or FCRIR via
80 mips_cannot_fetch_register (int regno
)
82 if (mips_regmap
[regno
] == -1)
85 if (find_regno ("r0") == regno
)
92 mips_cannot_store_register (int regno
)
94 if (mips_regmap
[regno
] == -1)
97 if (find_regno ("r0") == regno
)
100 if (find_regno ("cause") == regno
)
103 if (find_regno ("badvaddr") == regno
)
106 if (find_regno ("fir") == regno
)
115 union mips_register pc
;
116 collect_register_by_name ("pc", pc
.buf
);
117 return register_size (0) == 4 ? pc
.reg32
: pc
.reg64
;
121 mips_set_pc (CORE_ADDR pc
)
123 union mips_register newpc
;
124 if (register_size (0) == 4)
129 supply_register_by_name ("pc", newpc
.buf
);
132 /* Correct in either endianness. */
133 static const unsigned int mips_breakpoint
= 0x0005000d;
134 #define mips_breakpoint_len 4
136 /* We only place breakpoints in empty marker functions, and thread locking
137 is outside of the function. So rather than importing software single-step,
138 we can just run until exit. */
140 mips_reinsert_addr ()
142 union mips_register ra
;
143 collect_register_by_name ("r31", ra
.buf
);
144 return register_size (0) == 4 ? ra
.reg32
: ra
.reg64
;
148 mips_breakpoint_at (CORE_ADDR where
)
152 (*the_target
->read_memory
) (where
, (unsigned char *) &insn
, 4);
153 if (insn
== mips_breakpoint
)
156 /* If necessary, recognize more trap instructions here. GDB only uses the
161 /* Fetch the thread-local storage pointer for libthread_db. */
164 ps_get_thread_area (const struct ps_prochandle
*ph
,
165 lwpid_t lwpid
, int idx
, void **base
)
167 if (ptrace (PTRACE_GET_THREAD_AREA
, lwpid
, NULL
, base
) != 0)
170 /* IDX is the bias from the thread pointer to the beginning of the
171 thread descriptor. It has to be subtracted due to implementation
172 quirks in libthread_db. */
173 *base
= (void *) ((char *)*base
- idx
);
178 #ifdef HAVE_PTRACE_GETREGS
181 mips_collect_register (int use_64bit
, int regno
, union mips_register
*reg
)
183 union mips_register tmp_reg
;
187 collect_register (regno
, &tmp_reg
.reg64
);
192 collect_register (regno
, &tmp_reg
.reg32
);
193 reg
->reg64
= tmp_reg
.reg32
;
198 mips_supply_register (int use_64bit
, int regno
, const union mips_register
*reg
)
202 /* For big-endian 32-bit targets, ignore the high four bytes of each
204 if (__BYTE_ORDER
== __BIG_ENDIAN
&& !use_64bit
)
207 supply_register (regno
, reg
->buf
+ offset
);
211 mips_collect_register_32bit (int use_64bit
, int regno
, unsigned char *buf
)
213 union mips_register tmp_reg
;
216 mips_collect_register (use_64bit
, regno
, &tmp_reg
);
217 reg32
= tmp_reg
.reg64
;
218 memcpy (buf
, ®32
, 4);
222 mips_supply_register_32bit (int use_64bit
, int regno
, const unsigned char *buf
)
224 union mips_register tmp_reg
;
227 memcpy (®32
, buf
, 4);
228 tmp_reg
.reg64
= reg32
;
229 mips_supply_register (use_64bit
, regno
, &tmp_reg
);
233 mips_fill_gregset (void *buf
)
235 union mips_register
*regset
= buf
;
238 use_64bit
= (register_size (0) == 8);
240 for (i
= 1; i
< 32; i
++)
241 mips_collect_register (use_64bit
, i
, regset
+ i
);
243 mips_collect_register (use_64bit
, find_regno ("lo"), regset
+ 32);
244 mips_collect_register (use_64bit
, find_regno ("hi"), regset
+ 33);
245 mips_collect_register (use_64bit
, find_regno ("pc"), regset
+ 34);
246 mips_collect_register (use_64bit
, find_regno ("badvaddr"), regset
+ 35);
247 mips_collect_register (use_64bit
, find_regno ("status"), regset
+ 36);
248 mips_collect_register (use_64bit
, find_regno ("cause"), regset
+ 37);
250 mips_collect_register (use_64bit
, find_regno ("restart"), regset
+ 0);
254 mips_store_gregset (const void *buf
)
256 const union mips_register
*regset
= buf
;
259 use_64bit
= (register_size (0) == 8);
261 for (i
= 0; i
< 32; i
++)
262 mips_supply_register (use_64bit
, i
, regset
+ i
);
264 mips_supply_register (use_64bit
, find_regno ("lo"), regset
+ 32);
265 mips_supply_register (use_64bit
, find_regno ("hi"), regset
+ 33);
266 mips_supply_register (use_64bit
, find_regno ("pc"), regset
+ 34);
267 mips_supply_register (use_64bit
, find_regno ("badvaddr"), regset
+ 35);
268 mips_supply_register (use_64bit
, find_regno ("status"), regset
+ 36);
269 mips_supply_register (use_64bit
, find_regno ("cause"), regset
+ 37);
271 mips_supply_register (use_64bit
, find_regno ("restart"), regset
+ 0);
275 mips_fill_fpregset (void *buf
)
277 union mips_register
*regset
= buf
;
278 int i
, use_64bit
, first_fp
, big_endian
;
280 use_64bit
= (register_size (0) == 8);
281 first_fp
= find_regno ("f0");
282 big_endian
= (__BYTE_ORDER
== __BIG_ENDIAN
);
284 /* See GDB for a discussion of this peculiar layout. */
285 for (i
= 0; i
< 32; i
++)
287 collect_register (first_fp
+ i
, regset
[i
].buf
);
289 collect_register (first_fp
+ i
,
290 regset
[i
& ~1].buf
+ 4 * (big_endian
!= (i
& 1)));
292 mips_collect_register_32bit (use_64bit
, find_regno ("fcsr"), regset
[32].buf
);
293 mips_collect_register_32bit (use_64bit
, find_regno ("fir"),
298 mips_store_fpregset (const void *buf
)
300 const union mips_register
*regset
= buf
;
301 int i
, use_64bit
, first_fp
, big_endian
;
303 use_64bit
= (register_size (0) == 8);
304 first_fp
= find_regno ("f0");
305 big_endian
= (__BYTE_ORDER
== __BIG_ENDIAN
);
307 /* See GDB for a discussion of this peculiar layout. */
308 for (i
= 0; i
< 32; i
++)
310 supply_register (first_fp
+ i
, regset
[i
].buf
);
312 supply_register (first_fp
+ i
,
313 regset
[i
& ~1].buf
+ 4 * (big_endian
!= (i
& 1)));
315 mips_supply_register_32bit (use_64bit
, find_regno ("fcsr"), regset
[32].buf
);
316 mips_supply_register_32bit (use_64bit
, find_regno ("fir"),
319 #endif /* HAVE_PTRACE_GETREGS */
321 struct regset_info target_regsets
[] = {
322 #ifdef HAVE_PTRACE_GETREGS
323 { PTRACE_GETREGS
, PTRACE_SETREGS
, 38 * 8, GENERAL_REGS
,
324 mips_fill_gregset
, mips_store_gregset
},
325 { PTRACE_GETFPREGS
, PTRACE_SETFPREGS
, 33 * 8, FP_REGS
,
326 mips_fill_fpregset
, mips_store_fpregset
},
327 #endif /* HAVE_PTRACE_GETREGS */
328 { 0, 0, -1, -1, NULL
, NULL
}
331 struct linux_target_ops the_low_target
= {
334 mips_cannot_fetch_register
,
335 mips_cannot_store_register
,
338 (const unsigned char *) &mips_breakpoint
,