1 /* Native-dependent code for FreeBSD/mips.
3 Copyright (C) 2017 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/>. */
25 #include <sys/types.h>
26 #include <sys/ptrace.h>
27 #include <machine/reg.h>
30 #include "mips-tdep.h"
31 #include "mips-fbsd-tdep.h"
32 #include "inf-ptrace.h"
34 /* Determine if PT_GETREGS fetches this register. */
37 getregs_supplies (struct gdbarch *gdbarch, int regnum)
39 return (regnum >= MIPS_ZERO_REGNUM
40 && regnum <= gdbarch_pc_regnum (gdbarch));
43 /* Fetch register REGNUM from the inferior. If REGNUM is -1, do this
47 mips_fbsd_fetch_inferior_registers (struct target_ops *ops,
48 struct regcache *regcache, int regnum)
50 struct gdbarch *gdbarch = get_regcache_arch (regcache);
51 if (regnum == -1 || getregs_supplies (gdbarch, regnum))
55 if (ptrace (PT_GETREGS, get_ptrace_pid (inferior_ptid),
56 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
57 perror_with_name (_("Couldn't get registers"));
59 mips_fbsd_supply_gregs (regcache, regnum, ®s, sizeof (register_t));
65 || regnum >= gdbarch_fp0_regnum (get_regcache_arch (regcache)))
69 if (ptrace (PT_GETFPREGS, get_ptrace_pid (inferior_ptid),
70 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
71 perror_with_name (_("Couldn't get floating point status"));
73 mips_fbsd_supply_fpregs (regcache, regnum, &fpregs,
74 sizeof (f_register_t));
78 /* Store register REGNUM back into the inferior. If REGNUM is -1, do
79 this for all registers. */
82 mips_fbsd_store_inferior_registers (struct target_ops *ops,
83 struct regcache *regcache, int regnum)
85 struct gdbarch *gdbarch = get_regcache_arch (regcache);
86 if (regnum == -1 || getregs_supplies (gdbarch, regnum))
90 if (ptrace (PT_GETREGS, get_ptrace_pid (inferior_ptid),
91 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
92 perror_with_name (_("Couldn't get registers"));
94 mips_fbsd_collect_gregs (regcache, regnum, (char *) ®s,
97 if (ptrace (PT_SETREGS, get_ptrace_pid (inferior_ptid),
98 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
99 perror_with_name (_("Couldn't write registers"));
106 || regnum >= gdbarch_fp0_regnum (get_regcache_arch (regcache)))
110 if (ptrace (PT_GETFPREGS, get_ptrace_pid (inferior_ptid),
111 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
112 perror_with_name (_("Couldn't get floating point status"));
114 mips_fbsd_collect_fpregs (regcache, regnum, (char *) &fpregs,
115 sizeof (f_register_t));
117 if (ptrace (PT_SETFPREGS, get_ptrace_pid (inferior_ptid),
118 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
119 perror_with_name (_("Couldn't write floating point status"));
124 /* Provide a prototype to silence -Wmissing-prototypes. */
125 void _initialize_mips_fbsd_nat (void);
128 _initialize_mips_fbsd_nat (void)
130 struct target_ops *t;
132 t = inf_ptrace_target ();
133 t->to_fetch_registers = mips_fbsd_fetch_inferior_registers;
134 t->to_store_registers = mips_fbsd_store_inferior_registers;
135 fbsd_nat_add_target (t);