]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - gdb/gdbserver/linux-mips-low.c
Change signature of linux_target_ops.new_thread
[thirdparty/binutils-gdb.git] / gdb / gdbserver / linux-mips-low.c
CommitLineData
0a30fbc4 1/* GNU/Linux/MIPS specific low level interface, for the remote server for GDB.
32d0add0 2 Copyright (C) 1995-2015 Free Software Foundation, Inc.
0a30fbc4
DJ
3
4 This file is part of GDB.
5
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
a9762ec7 8 the Free Software Foundation; either version 3 of the License, or
0a30fbc4
DJ
9 (at your option) any later version.
10
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
15
16 You should have received a copy of the GNU General Public License
a9762ec7 17 along with this program. If not, see <http://www.gnu.org/licenses/>. */
0a30fbc4
DJ
18
19#include "server.h"
58caa3dc 20#include "linux-low.h"
0a30fbc4 21
21b0f40c 22#include <sys/ptrace.h>
186947f7 23#include <endian.h>
21b0f40c 24
125f8a3d 25#include "nat/mips-linux-watch.h"
21b0f40c
DJ
26#include "gdb_proc_service.h"
27
d05b4ac3
UW
28/* Defined in auto-generated file mips-linux.c. */
29void init_registers_mips_linux (void);
3aee8918
PA
30extern const struct target_desc *tdesc_mips_linux;
31
1faeff08
MR
32/* Defined in auto-generated file mips-dsp-linux.c. */
33void init_registers_mips_dsp_linux (void);
3aee8918
PA
34extern const struct target_desc *tdesc_mips_dsp_linux;
35
d05b4ac3
UW
36/* Defined in auto-generated file mips64-linux.c. */
37void init_registers_mips64_linux (void);
3aee8918
PA
38extern const struct target_desc *tdesc_mips64_linux;
39
1faeff08
MR
40/* Defined in auto-generated file mips64-dsp-linux.c. */
41void init_registers_mips64_dsp_linux (void);
3aee8918 42extern const struct target_desc *tdesc_mips64_dsp_linux;
1faeff08
MR
43
44#ifdef __mips64
3aee8918
PA
45#define tdesc_mips_linux tdesc_mips64_linux
46#define tdesc_mips_dsp_linux tdesc_mips64_dsp_linux
1faeff08 47#endif
d05b4ac3 48
21b0f40c
DJ
49#ifndef PTRACE_GET_THREAD_AREA
50#define PTRACE_GET_THREAD_AREA 25
51#endif
52
0a30fbc4
DJ
53#ifdef HAVE_SYS_REG_H
54#include <sys/reg.h>
55#endif
56
117ce543 57#define mips_num_regs 73
1faeff08 58#define mips_dsp_num_regs 80
0a30fbc4
DJ
59
60#include <asm/ptrace.h>
61
1faeff08
MR
62#ifndef DSP_BASE
63#define DSP_BASE 71
64#define DSP_CONTROL 77
65#endif
66
186947f7
DJ
67union mips_register
68{
69 unsigned char buf[8];
70
71 /* Deliberately signed, for proper sign extension. */
72 int reg32;
73 long long reg64;
74};
75
0a30fbc4
DJ
76/* Return the ptrace ``address'' of register REGNO. */
77
1faeff08
MR
78#define mips_base_regs \
79 -1, 1, 2, 3, 4, 5, 6, 7, \
80 8, 9, 10, 11, 12, 13, 14, 15, \
81 16, 17, 18, 19, 20, 21, 22, 23, \
82 24, 25, 26, 27, 28, 29, 30, 31, \
83 \
84 -1, MMLO, MMHI, BADVADDR, CAUSE, PC, \
85 \
86 FPR_BASE, FPR_BASE + 1, FPR_BASE + 2, FPR_BASE + 3, \
87 FPR_BASE + 4, FPR_BASE + 5, FPR_BASE + 6, FPR_BASE + 7, \
88 FPR_BASE + 8, FPR_BASE + 9, FPR_BASE + 10, FPR_BASE + 11, \
89 FPR_BASE + 12, FPR_BASE + 13, FPR_BASE + 14, FPR_BASE + 15, \
90 FPR_BASE + 16, FPR_BASE + 17, FPR_BASE + 18, FPR_BASE + 19, \
91 FPR_BASE + 20, FPR_BASE + 21, FPR_BASE + 22, FPR_BASE + 23, \
92 FPR_BASE + 24, FPR_BASE + 25, FPR_BASE + 26, FPR_BASE + 27, \
93 FPR_BASE + 28, FPR_BASE + 29, FPR_BASE + 30, FPR_BASE + 31, \
94 FPC_CSR, FPC_EIR
95
96#define mips_dsp_regs \
97 DSP_BASE, DSP_BASE + 1, DSP_BASE + 2, DSP_BASE + 3, \
98 DSP_BASE + 4, DSP_BASE + 5, \
99 DSP_CONTROL
100
101static int mips_regmap[mips_num_regs] = {
102 mips_base_regs,
103 0
104};
0a30fbc4 105
1faeff08
MR
106static int mips_dsp_regmap[mips_dsp_num_regs] = {
107 mips_base_regs,
108 mips_dsp_regs,
109 0
110};
0a30fbc4 111
1faeff08
MR
112/* DSP registers are not in any regset and can only be accessed
113 individually. */
0a30fbc4 114
1faeff08
MR
115static unsigned char mips_dsp_regset_bitmap[(mips_dsp_num_regs + 7) / 8] = {
116 0xfe, 0xff, 0xff, 0xff, 0xfe, 0xff, 0xff, 0xff, 0xff, 0x80
0a30fbc4
DJ
117};
118
3aee8918
PA
119static int have_dsp = -1;
120
1faeff08
MR
121/* Try peeking at an arbitrarily chosen DSP register and pick the available
122 user register set accordingly. */
123
3aee8918
PA
124static const struct target_desc *
125mips_read_description (void)
1faeff08 126{
3aee8918 127 if (have_dsp < 0)
1faeff08 128 {
0bfdf32f 129 int pid = lwpid_of (current_thread);
1faeff08 130
ac740bc7 131 errno = 0;
1faeff08
MR
132 ptrace (PTRACE_PEEKUSER, pid, DSP_CONTROL, 0);
133 switch (errno)
134 {
135 case 0:
3aee8918 136 have_dsp = 1;
1faeff08
MR
137 break;
138 case EIO:
3aee8918 139 have_dsp = 0;
1faeff08
MR
140 break;
141 default:
142 perror_with_name ("ptrace");
143 break;
144 }
145 }
3aee8918
PA
146
147 return have_dsp ? tdesc_mips_dsp_linux : tdesc_mips_linux;
148}
149
150static void
151mips_arch_setup (void)
152{
153 current_process ()->tdesc = mips_read_description ();
154}
155
156static struct usrregs_info *
157get_usrregs_info (void)
158{
159 const struct regs_info *regs_info = the_low_target.regs_info ();
160
161 return regs_info->usrregs;
1faeff08
MR
162}
163
7a60ad40
YQ
164/* Per-process arch-specific data we want to keep. */
165
166struct arch_process_info
167{
168 /* -1 if the kernel and/or CPU do not support watch registers.
169 1 if watch_readback is valid and we can read style, num_valid
170 and the masks.
171 0 if we need to read the watch_readback. */
172
173 int watch_readback_valid;
174
175 /* Cached watch register read values. */
176
177 struct pt_watch_regs watch_readback;
178
179 /* Current watchpoint requests for this process. */
180
181 struct mips_watchpoint *current_watches;
182
183 /* The current set of watch register values for writing the
184 registers. */
185
186 struct pt_watch_regs watch_mirror;
187};
188
189/* Per-thread arch-specific data we want to keep. */
190
191struct arch_lwp_info
192{
193 /* Non-zero if our copy differs from what's recorded in the thread. */
194 int watch_registers_changed;
195};
196
0a30fbc4
DJ
197/* From mips-linux-nat.c. */
198
199/* Pseudo registers can not be read. ptrace does not provide a way to
200 read (or set) PS_REGNUM, and there's no point in reading or setting
201 ZERO_REGNUM. We also can not set BADVADDR, CAUSE, or FCRIR via
202 ptrace(). */
203
2ec06d2e
DJ
204static int
205mips_cannot_fetch_register (int regno)
0a30fbc4 206{
3aee8918
PA
207 const struct target_desc *tdesc;
208
209 if (get_usrregs_info ()->regmap[regno] == -1)
0a30fbc4
DJ
210 return 1;
211
3aee8918
PA
212 tdesc = current_process ()->tdesc;
213
214 if (find_regno (tdesc, "r0") == regno)
0a30fbc4
DJ
215 return 1;
216
217 return 0;
218}
219
2ec06d2e
DJ
220static int
221mips_cannot_store_register (int regno)
0a30fbc4 222{
3aee8918
PA
223 const struct target_desc *tdesc;
224
225 if (get_usrregs_info ()->regmap[regno] == -1)
0a30fbc4
DJ
226 return 1;
227
3aee8918
PA
228 tdesc = current_process ()->tdesc;
229
230 if (find_regno (tdesc, "r0") == regno)
0a30fbc4
DJ
231 return 1;
232
3aee8918 233 if (find_regno (tdesc, "cause") == regno)
0a30fbc4
DJ
234 return 1;
235
3aee8918 236 if (find_regno (tdesc, "badvaddr") == regno)
0a30fbc4
DJ
237 return 1;
238
3aee8918 239 if (find_regno (tdesc, "fir") == regno)
0a30fbc4
DJ
240 return 1;
241
242 return 0;
243}
2ec06d2e 244
0d62e5e8 245static CORE_ADDR
442ea881 246mips_get_pc (struct regcache *regcache)
0d62e5e8 247{
186947f7 248 union mips_register pc;
442ea881 249 collect_register_by_name (regcache, "pc", pc.buf);
3aee8918 250 return register_size (regcache->tdesc, 0) == 4 ? pc.reg32 : pc.reg64;
0d62e5e8
DJ
251}
252
253static void
442ea881 254mips_set_pc (struct regcache *regcache, CORE_ADDR pc)
0d62e5e8 255{
186947f7 256 union mips_register newpc;
3aee8918 257 if (register_size (regcache->tdesc, 0) == 4)
186947f7
DJ
258 newpc.reg32 = pc;
259 else
260 newpc.reg64 = pc;
261
442ea881 262 supply_register_by_name (regcache, "pc", newpc.buf);
0d62e5e8
DJ
263}
264
265/* Correct in either endianness. */
186947f7 266static const unsigned int mips_breakpoint = 0x0005000d;
0d62e5e8
DJ
267#define mips_breakpoint_len 4
268
269/* We only place breakpoints in empty marker functions, and thread locking
270 is outside of the function. So rather than importing software single-step,
271 we can just run until exit. */
272static CORE_ADDR
442ea881 273mips_reinsert_addr (void)
0d62e5e8 274{
0bfdf32f 275 struct regcache *regcache = get_thread_regcache (current_thread, 1);
186947f7 276 union mips_register ra;
442ea881 277 collect_register_by_name (regcache, "r31", ra.buf);
3aee8918 278 return register_size (regcache->tdesc, 0) == 4 ? ra.reg32 : ra.reg64;
0d62e5e8
DJ
279}
280
281static int
282mips_breakpoint_at (CORE_ADDR where)
283{
186947f7 284 unsigned int insn;
0d62e5e8 285
f450004a 286 (*the_target->read_memory) (where, (unsigned char *) &insn, 4);
0d62e5e8
DJ
287 if (insn == mips_breakpoint)
288 return 1;
289
290 /* If necessary, recognize more trap instructions here. GDB only uses the
291 one. */
292 return 0;
293}
294
7a60ad40
YQ
295/* Mark the watch registers of lwp, represented by ENTRY, as changed,
296 if the lwp's process id is *PID_P. */
297
298static int
299update_watch_registers_callback (struct inferior_list_entry *entry,
300 void *pid_p)
301{
d86d4aaf
DE
302 struct thread_info *thread = (struct thread_info *) entry;
303 struct lwp_info *lwp = get_thread_lwp (thread);
7a60ad40
YQ
304 int pid = *(int *) pid_p;
305
306 /* Only update the threads of this process. */
d86d4aaf 307 if (pid_of (thread) == pid)
7a60ad40
YQ
308 {
309 /* The actual update is done later just before resuming the lwp,
310 we just mark that the registers need updating. */
311 lwp->arch_private->watch_registers_changed = 1;
312
313 /* If the lwp isn't stopped, force it to momentarily pause, so
314 we can update its watch registers. */
315 if (!lwp->stopped)
316 linux_stop_lwp (lwp);
317 }
318
319 return 0;
320}
321
322/* This is the implementation of linux_target_ops method
323 new_process. */
324
325static struct arch_process_info *
326mips_linux_new_process (void)
327{
328 struct arch_process_info *info = xcalloc (1, sizeof (*info));
329
330 return info;
331}
332
333/* This is the implementation of linux_target_ops method new_thread.
334 Mark the watch registers as changed, so the threads' copies will
335 be updated. */
336
34c703da
GB
337static void
338mips_linux_new_thread (struct lwp_info *lwp)
7a60ad40
YQ
339{
340 struct arch_lwp_info *info = xcalloc (1, sizeof (*info));
341
342 info->watch_registers_changed = 1;
343
34c703da 344 lwp->arch_private = info;
7a60ad40
YQ
345}
346
347/* This is the implementation of linux_target_ops method
348 prepare_to_resume. If the watch regs have changed, update the
349 thread's copies. */
350
351static void
352mips_linux_prepare_to_resume (struct lwp_info *lwp)
353{
d86d4aaf 354 ptid_t ptid = ptid_of (get_lwp_thread (lwp));
7a60ad40 355 struct process_info *proc = find_process_pid (ptid_get_pid (ptid));
fe978cb0 356 struct arch_process_info *priv = proc->priv->arch_private;
7a60ad40
YQ
357
358 if (lwp->arch_private->watch_registers_changed)
359 {
360 /* Only update the watch registers if we have set or unset a
361 watchpoint already. */
fe978cb0 362 if (mips_linux_watch_get_num_valid (&priv->watch_mirror) > 0)
7a60ad40
YQ
363 {
364 /* Write the mirrored watch register values. */
365 int tid = ptid_get_lwp (ptid);
366
367 if (-1 == ptrace (PTRACE_SET_WATCH_REGS, tid,
fe978cb0 368 &priv->watch_mirror))
7a60ad40
YQ
369 perror_with_name ("Couldn't write watch register");
370 }
371
372 lwp->arch_private->watch_registers_changed = 0;
373 }
374}
375
802e8e6d
PA
376static int
377mips_supports_z_point_type (char z_type)
378{
379 switch (z_type)
380 {
381 case Z_PACKET_WRITE_WP:
382 case Z_PACKET_READ_WP:
383 case Z_PACKET_ACCESS_WP:
384 return 1;
385 default:
386 return 0;
387 }
388}
389
7a60ad40
YQ
390/* This is the implementation of linux_target_ops method
391 insert_point. */
392
393static int
802e8e6d
PA
394mips_insert_point (enum raw_bkpt_type type, CORE_ADDR addr,
395 int len, struct raw_breakpoint *bp)
7a60ad40
YQ
396{
397 struct process_info *proc = current_process ();
fe978cb0 398 struct arch_process_info *priv = proc->priv->arch_private;
7a60ad40
YQ
399 struct pt_watch_regs regs;
400 struct mips_watchpoint *new_watch;
401 struct mips_watchpoint **pw;
402 int pid;
403 long lwpid;
404 enum target_hw_bp_type watch_type;
405 uint32_t irw;
406
0bfdf32f 407 lwpid = lwpid_of (current_thread);
7a60ad40 408 if (!mips_linux_read_watch_registers (lwpid,
fe978cb0
PA
409 &priv->watch_readback,
410 &priv->watch_readback_valid,
7a60ad40
YQ
411 0))
412 return -1;
413
414 if (len <= 0)
415 return -1;
416
fe978cb0 417 regs = priv->watch_readback;
7a60ad40 418 /* Add the current watches. */
fe978cb0 419 mips_linux_watch_populate_regs (priv->current_watches, &regs);
7a60ad40
YQ
420
421 /* Now try to add the new watch. */
802e8e6d 422 watch_type = raw_bkpt_type_to_target_hw_bp_type (type);
7a60ad40
YQ
423 irw = mips_linux_watch_type_to_irw (watch_type);
424 if (!mips_linux_watch_try_one_watch (&regs, addr, len, irw))
425 return -1;
426
427 /* It fit. Stick it on the end of the list. */
428 new_watch = xmalloc (sizeof (struct mips_watchpoint));
429 new_watch->addr = addr;
430 new_watch->len = len;
431 new_watch->type = watch_type;
432 new_watch->next = NULL;
433
fe978cb0 434 pw = &priv->current_watches;
7a60ad40
YQ
435 while (*pw != NULL)
436 pw = &(*pw)->next;
437 *pw = new_watch;
438
fe978cb0 439 priv->watch_mirror = regs;
7a60ad40
YQ
440
441 /* Only update the threads of this process. */
442 pid = pid_of (proc);
d86d4aaf 443 find_inferior (&all_threads, update_watch_registers_callback, &pid);
7a60ad40
YQ
444
445 return 0;
446}
447
448/* This is the implementation of linux_target_ops method
449 remove_point. */
450
451static int
802e8e6d
PA
452mips_remove_point (enum raw_bkpt_type type, CORE_ADDR addr,
453 int len, struct raw_breakpoint *bp)
7a60ad40
YQ
454{
455 struct process_info *proc = current_process ();
fe978cb0 456 struct arch_process_info *priv = proc->priv->arch_private;
7a60ad40
YQ
457
458 int deleted_one;
459 int pid;
460 enum target_hw_bp_type watch_type;
461
462 struct mips_watchpoint **pw;
463 struct mips_watchpoint *w;
464
7a60ad40 465 /* Search for a known watch that matches. Then unlink and free it. */
802e8e6d 466 watch_type = raw_bkpt_type_to_target_hw_bp_type (type);
7a60ad40 467 deleted_one = 0;
fe978cb0 468 pw = &priv->current_watches;
7a60ad40
YQ
469 while ((w = *pw))
470 {
471 if (w->addr == addr && w->len == len && w->type == watch_type)
472 {
473 *pw = w->next;
474 free (w);
475 deleted_one = 1;
476 break;
477 }
478 pw = &(w->next);
479 }
480
481 if (!deleted_one)
482 return -1; /* We don't know about it, fail doing nothing. */
483
484 /* At this point watch_readback is known to be valid because we
485 could not have added the watch without reading it. */
fe978cb0 486 gdb_assert (priv->watch_readback_valid == 1);
7a60ad40 487
fe978cb0
PA
488 priv->watch_mirror = priv->watch_readback;
489 mips_linux_watch_populate_regs (priv->current_watches,
490 &priv->watch_mirror);
7a60ad40
YQ
491
492 /* Only update the threads of this process. */
493 pid = pid_of (proc);
d86d4aaf 494 find_inferior (&all_threads, update_watch_registers_callback, &pid);
7a60ad40
YQ
495 return 0;
496}
497
498/* This is the implementation of linux_target_ops method
499 stopped_by_watchpoint. The watchhi R and W bits indicate
500 the watch register triggered. */
501
502static int
503mips_stopped_by_watchpoint (void)
504{
505 struct process_info *proc = current_process ();
fe978cb0 506 struct arch_process_info *priv = proc->priv->arch_private;
7a60ad40
YQ
507 int n;
508 int num_valid;
0bfdf32f 509 long lwpid = lwpid_of (current_thread);
7a60ad40
YQ
510
511 if (!mips_linux_read_watch_registers (lwpid,
fe978cb0
PA
512 &priv->watch_readback,
513 &priv->watch_readback_valid,
7a60ad40
YQ
514 1))
515 return 0;
516
fe978cb0 517 num_valid = mips_linux_watch_get_num_valid (&priv->watch_readback);
7a60ad40
YQ
518
519 for (n = 0; n < MAX_DEBUG_REGISTER && n < num_valid; n++)
fe978cb0 520 if (mips_linux_watch_get_watchhi (&priv->watch_readback, n)
7a60ad40
YQ
521 & (R_MASK | W_MASK))
522 return 1;
523
524 return 0;
525}
526
527/* This is the implementation of linux_target_ops method
528 stopped_data_address. */
529
530static CORE_ADDR
531mips_stopped_data_address (void)
532{
533 struct process_info *proc = current_process ();
fe978cb0 534 struct arch_process_info *priv = proc->priv->arch_private;
7a60ad40
YQ
535 int n;
536 int num_valid;
0bfdf32f 537 long lwpid = lwpid_of (current_thread);
7a60ad40
YQ
538
539 /* On MIPS we don't know the low order 3 bits of the data address.
540 GDB does not support remote targets that can't report the
541 watchpoint address. So, make our best guess; return the starting
542 address of a watchpoint request which overlaps the one that
543 triggered. */
544
545 if (!mips_linux_read_watch_registers (lwpid,
fe978cb0
PA
546 &priv->watch_readback,
547 &priv->watch_readback_valid,
7a60ad40
YQ
548 0))
549 return 0;
550
fe978cb0 551 num_valid = mips_linux_watch_get_num_valid (&priv->watch_readback);
7a60ad40
YQ
552
553 for (n = 0; n < MAX_DEBUG_REGISTER && n < num_valid; n++)
fe978cb0 554 if (mips_linux_watch_get_watchhi (&priv->watch_readback, n)
7a60ad40
YQ
555 & (R_MASK | W_MASK))
556 {
557 CORE_ADDR t_low, t_hi;
558 int t_irw;
559 struct mips_watchpoint *watch;
560
fe978cb0 561 t_low = mips_linux_watch_get_watchlo (&priv->watch_readback, n);
7a60ad40 562 t_irw = t_low & IRW_MASK;
fe978cb0 563 t_hi = (mips_linux_watch_get_watchhi (&priv->watch_readback, n)
7a60ad40
YQ
564 | IRW_MASK);
565 t_low &= ~(CORE_ADDR)t_hi;
566
fe978cb0 567 for (watch = priv->current_watches;
7a60ad40
YQ
568 watch != NULL;
569 watch = watch->next)
570 {
571 CORE_ADDR addr = watch->addr;
572 CORE_ADDR last_byte = addr + watch->len - 1;
573
574 if ((t_irw & mips_linux_watch_type_to_irw (watch->type)) == 0)
575 {
576 /* Different type. */
577 continue;
578 }
579 /* Check for overlap of even a single byte. */
580 if (last_byte >= t_low && addr <= t_low + t_hi)
581 return addr;
582 }
583 }
584
585 /* Shouldn't happen. */
586 return 0;
587}
588
21b0f40c
DJ
589/* Fetch the thread-local storage pointer for libthread_db. */
590
591ps_err_e
592ps_get_thread_area (const struct ps_prochandle *ph,
1b3f6016 593 lwpid_t lwpid, int idx, void **base)
21b0f40c
DJ
594{
595 if (ptrace (PTRACE_GET_THREAD_AREA, lwpid, NULL, base) != 0)
596 return PS_ERR;
597
598 /* IDX is the bias from the thread pointer to the beginning of the
599 thread descriptor. It has to be subtracted due to implementation
600 quirks in libthread_db. */
601 *base = (void *) ((char *)*base - idx);
602
603 return PS_OK;
604}
605
186947f7
DJ
606#ifdef HAVE_PTRACE_GETREGS
607
608static void
442ea881
PA
609mips_collect_register (struct regcache *regcache,
610 int use_64bit, int regno, union mips_register *reg)
186947f7
DJ
611{
612 union mips_register tmp_reg;
613
614 if (use_64bit)
615 {
442ea881 616 collect_register (regcache, regno, &tmp_reg.reg64);
186947f7
DJ
617 *reg = tmp_reg;
618 }
619 else
620 {
442ea881 621 collect_register (regcache, regno, &tmp_reg.reg32);
186947f7
DJ
622 reg->reg64 = tmp_reg.reg32;
623 }
624}
625
626static void
442ea881
PA
627mips_supply_register (struct regcache *regcache,
628 int use_64bit, int regno, const union mips_register *reg)
186947f7
DJ
629{
630 int offset = 0;
631
632 /* For big-endian 32-bit targets, ignore the high four bytes of each
633 eight-byte slot. */
634 if (__BYTE_ORDER == __BIG_ENDIAN && !use_64bit)
635 offset = 4;
636
442ea881 637 supply_register (regcache, regno, reg->buf + offset);
186947f7
DJ
638}
639
640static void
442ea881
PA
641mips_collect_register_32bit (struct regcache *regcache,
642 int use_64bit, int regno, unsigned char *buf)
186947f7
DJ
643{
644 union mips_register tmp_reg;
645 int reg32;
646
442ea881 647 mips_collect_register (regcache, use_64bit, regno, &tmp_reg);
186947f7
DJ
648 reg32 = tmp_reg.reg64;
649 memcpy (buf, &reg32, 4);
650}
651
652static void
442ea881
PA
653mips_supply_register_32bit (struct regcache *regcache,
654 int use_64bit, int regno, const unsigned char *buf)
186947f7
DJ
655{
656 union mips_register tmp_reg;
657 int reg32;
658
659 memcpy (&reg32, buf, 4);
660 tmp_reg.reg64 = reg32;
442ea881 661 mips_supply_register (regcache, use_64bit, regno, &tmp_reg);
186947f7
DJ
662}
663
664static void
442ea881 665mips_fill_gregset (struct regcache *regcache, void *buf)
186947f7
DJ
666{
667 union mips_register *regset = buf;
668 int i, use_64bit;
3aee8918 669 const struct target_desc *tdesc = regcache->tdesc;
186947f7 670
3aee8918 671 use_64bit = (register_size (tdesc, 0) == 8);
186947f7 672
117ce543 673 for (i = 1; i < 32; i++)
442ea881
PA
674 mips_collect_register (regcache, use_64bit, i, regset + i);
675
676 mips_collect_register (regcache, use_64bit,
3aee8918 677 find_regno (tdesc, "lo"), regset + 32);
442ea881 678 mips_collect_register (regcache, use_64bit,
3aee8918 679 find_regno (tdesc, "hi"), regset + 33);
442ea881 680 mips_collect_register (regcache, use_64bit,
3aee8918 681 find_regno (tdesc, "pc"), regset + 34);
442ea881 682 mips_collect_register (regcache, use_64bit,
3aee8918 683 find_regno (tdesc, "badvaddr"), regset + 35);
442ea881 684 mips_collect_register (regcache, use_64bit,
3aee8918 685 find_regno (tdesc, "status"), regset + 36);
442ea881 686 mips_collect_register (regcache, use_64bit,
3aee8918 687 find_regno (tdesc, "cause"), regset + 37);
442ea881
PA
688
689 mips_collect_register (regcache, use_64bit,
3aee8918 690 find_regno (tdesc, "restart"), regset + 0);
186947f7
DJ
691}
692
693static void
442ea881 694mips_store_gregset (struct regcache *regcache, const void *buf)
186947f7
DJ
695{
696 const union mips_register *regset = buf;
697 int i, use_64bit;
698
3aee8918 699 use_64bit = (register_size (regcache->tdesc, 0) == 8);
186947f7
DJ
700
701 for (i = 0; i < 32; i++)
442ea881
PA
702 mips_supply_register (regcache, use_64bit, i, regset + i);
703
442ea881 704 mips_supply_register (regcache, use_64bit,
3aee8918
PA
705 find_regno (regcache->tdesc, "lo"), regset + 32);
706 mips_supply_register (regcache, use_64bit,
707 find_regno (regcache->tdesc, "hi"), regset + 33);
442ea881 708 mips_supply_register (regcache, use_64bit,
3aee8918 709 find_regno (regcache->tdesc, "pc"), regset + 34);
442ea881 710 mips_supply_register (regcache, use_64bit,
3aee8918
PA
711 find_regno (regcache->tdesc, "badvaddr"), regset + 35);
712 mips_supply_register (regcache, use_64bit,
713 find_regno (regcache->tdesc, "status"), regset + 36);
714 mips_supply_register (regcache, use_64bit,
715 find_regno (regcache->tdesc, "cause"), regset + 37);
442ea881
PA
716
717 mips_supply_register (regcache, use_64bit,
3aee8918 718 find_regno (regcache->tdesc, "restart"), regset + 0);
186947f7
DJ
719}
720
721static void
442ea881 722mips_fill_fpregset (struct regcache *regcache, void *buf)
186947f7
DJ
723{
724 union mips_register *regset = buf;
725 int i, use_64bit, first_fp, big_endian;
726
3aee8918
PA
727 use_64bit = (register_size (regcache->tdesc, 0) == 8);
728 first_fp = find_regno (regcache->tdesc, "f0");
186947f7
DJ
729 big_endian = (__BYTE_ORDER == __BIG_ENDIAN);
730
731 /* See GDB for a discussion of this peculiar layout. */
732 for (i = 0; i < 32; i++)
733 if (use_64bit)
442ea881 734 collect_register (regcache, first_fp + i, regset[i].buf);
186947f7 735 else
442ea881 736 collect_register (regcache, first_fp + i,
186947f7
DJ
737 regset[i & ~1].buf + 4 * (big_endian != (i & 1)));
738
442ea881 739 mips_collect_register_32bit (regcache, use_64bit,
3aee8918
PA
740 find_regno (regcache->tdesc, "fcsr"), regset[32].buf);
741 mips_collect_register_32bit (regcache, use_64bit,
742 find_regno (regcache->tdesc, "fir"),
186947f7
DJ
743 regset[32].buf + 4);
744}
745
746static void
442ea881 747mips_store_fpregset (struct regcache *regcache, const void *buf)
186947f7
DJ
748{
749 const union mips_register *regset = buf;
750 int i, use_64bit, first_fp, big_endian;
751
3aee8918
PA
752 use_64bit = (register_size (regcache->tdesc, 0) == 8);
753 first_fp = find_regno (regcache->tdesc, "f0");
186947f7
DJ
754 big_endian = (__BYTE_ORDER == __BIG_ENDIAN);
755
756 /* See GDB for a discussion of this peculiar layout. */
757 for (i = 0; i < 32; i++)
758 if (use_64bit)
442ea881 759 supply_register (regcache, first_fp + i, regset[i].buf);
186947f7 760 else
442ea881 761 supply_register (regcache, first_fp + i,
186947f7
DJ
762 regset[i & ~1].buf + 4 * (big_endian != (i & 1)));
763
442ea881 764 mips_supply_register_32bit (regcache, use_64bit,
3aee8918
PA
765 find_regno (regcache->tdesc, "fcsr"),
766 regset[32].buf);
767 mips_supply_register_32bit (regcache, use_64bit,
768 find_regno (regcache->tdesc, "fir"),
186947f7
DJ
769 regset[32].buf + 4);
770}
771#endif /* HAVE_PTRACE_GETREGS */
772
3aee8918 773static struct regset_info mips_regsets[] = {
186947f7 774#ifdef HAVE_PTRACE_GETREGS
1570b33e 775 { PTRACE_GETREGS, PTRACE_SETREGS, 0, 38 * 8, GENERAL_REGS,
186947f7 776 mips_fill_gregset, mips_store_gregset },
1570b33e 777 { PTRACE_GETFPREGS, PTRACE_SETFPREGS, 0, 33 * 8, FP_REGS,
186947f7
DJ
778 mips_fill_fpregset, mips_store_fpregset },
779#endif /* HAVE_PTRACE_GETREGS */
1570b33e 780 { 0, 0, 0, -1, -1, NULL, NULL }
186947f7
DJ
781};
782
3aee8918
PA
783static struct regsets_info mips_regsets_info =
784 {
785 mips_regsets, /* regsets */
786 0, /* num_regsets */
787 NULL, /* disabled_regsets */
788 };
789
790static struct usrregs_info mips_dsp_usrregs_info =
791 {
792 mips_dsp_num_regs,
793 mips_dsp_regmap,
794 };
795
796static struct usrregs_info mips_usrregs_info =
797 {
798 mips_num_regs,
799 mips_regmap,
800 };
801
802static struct regs_info dsp_regs_info =
803 {
804 mips_dsp_regset_bitmap,
805 &mips_dsp_usrregs_info,
806 &mips_regsets_info
807 };
808
809static struct regs_info regs_info =
810 {
811 NULL, /* regset_bitmap */
812 &mips_usrregs_info,
813 &mips_regsets_info
814 };
815
816static const struct regs_info *
817mips_regs_info (void)
818{
819 if (have_dsp)
820 return &dsp_regs_info;
821 else
822 return &regs_info;
823}
824
2ec06d2e 825struct linux_target_ops the_low_target = {
1faeff08 826 mips_arch_setup,
3aee8918 827 mips_regs_info,
2ec06d2e
DJ
828 mips_cannot_fetch_register,
829 mips_cannot_store_register,
c14dfd32 830 NULL, /* fetch_register */
0d62e5e8
DJ
831 mips_get_pc,
832 mips_set_pc,
f450004a 833 (const unsigned char *) &mips_breakpoint,
0d62e5e8
DJ
834 mips_breakpoint_len,
835 mips_reinsert_addr,
836 0,
837 mips_breakpoint_at,
802e8e6d 838 mips_supports_z_point_type,
7a60ad40
YQ
839 mips_insert_point,
840 mips_remove_point,
841 mips_stopped_by_watchpoint,
842 mips_stopped_data_address,
843 NULL,
844 NULL,
845 NULL, /* siginfo_fixup */
846 mips_linux_new_process,
847 mips_linux_new_thread,
848 mips_linux_prepare_to_resume
2ec06d2e 849};
3aee8918
PA
850
851void
852initialize_low_arch (void)
853{
854 /* Initialize the Linux target descriptions. */
855 init_registers_mips_linux ();
856 init_registers_mips_dsp_linux ();
857 init_registers_mips64_linux ();
858 init_registers_mips64_dsp_linux ();
859
860 initialize_regsets_info (&mips_regsets_info);
861}