1 /* Native-dependent code for Motorola 68000 BSD's.
3 Copyright (C) 2004-2018 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>
29 #include "m68k-tdep.h"
30 #include "inf-ptrace.h"
32 struct m68k_bsd_nat_target final : public inf_ptrace_target
34 void fetch_registers (struct regcache *, int) override;
35 void store_registers (struct regcache *, int) override;
38 static m68k_bsd_nat_target the_m68k_bsd_nat_target;
41 m68kbsd_gregset_supplies_p (int regnum)
43 return (regnum >= M68K_D0_REGNUM && regnum <= M68K_PC_REGNUM);
47 m68kbsd_fpregset_supplies_p (int regnum)
49 return (regnum >= M68K_FP0_REGNUM && regnum <= M68K_FPI_REGNUM);
52 /* Supply the general-purpose registers stored in GREGS to REGCACHE. */
55 m68kbsd_supply_gregset (struct regcache *regcache, const void *gregs)
57 const char *regs = gregs;
60 for (regnum = M68K_D0_REGNUM; regnum <= M68K_PC_REGNUM; regnum++)
61 regcache->raw_supply (regnum, regs + regnum * 4);
64 /* Supply the floating-point registers stored in FPREGS to REGCACHE. */
67 m68kbsd_supply_fpregset (struct regcache *regcache, const void *fpregs)
69 struct gdbarch *gdbarch = regcache->arch ();
70 const char *regs = fpregs;
73 for (regnum = M68K_FP0_REGNUM; regnum <= M68K_FPI_REGNUM; regnum++)
74 regcache->raw_supply (regnum,
75 regs + m68kbsd_fpreg_offset (gdbarch, regnum));
78 /* Collect the general-purpose registers from REGCACHE and store them
82 m68kbsd_collect_gregset (const struct regcache *regcache,
83 void *gregs, int regnum)
88 for (i = M68K_D0_REGNUM; i <= M68K_PC_REGNUM; i++)
90 if (regnum == -1 || regnum == i)
91 regcache_raw_collect (regcache, i, regs + i * 4);
95 /* Collect the floating-point registers from REGCACHE and store them
99 m68kbsd_collect_fpregset (struct regcache *regcache,
100 void *fpregs, int regnum)
102 struct gdbarch *gdbarch = regcache->arch ();
106 for (i = M68K_FP0_REGNUM; i <= M68K_FPI_REGNUM; i++)
108 if (regnum == -1 || regnum == i)
109 regcache_raw_collect (regcache, i,
110 regs + m68kbsd_fpreg_offset (gdbarch, i));
115 /* Fetch register REGNUM from the inferior. If REGNUM is -1, do this
116 for all registers (including the floating-point registers). */
119 m68k_bsd_nat_target::fetch_registers (struct regcache *regcache, int regnum)
121 pid_t pid = ptid_get_pid (regcache->ptid ());
123 if (regnum == -1 || m68kbsd_gregset_supplies_p (regnum))
127 if (ptrace (PT_GETREGS, pid, (PTRACE_TYPE_ARG3) ®s, 0) == -1)
128 perror_with_name (_("Couldn't get registers"));
130 m68kbsd_supply_gregset (regcache, ®s);
133 if (regnum == -1 || m68kbsd_fpregset_supplies_p (regnum))
137 if (ptrace (PT_GETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
138 perror_with_name (_("Couldn't get floating point status"));
140 m68kbsd_supply_fpregset (regcache, &fpregs);
144 /* Store register REGNUM back into the inferior. If REGNUM is -1, do
145 this for all registers (including the floating-point registers). */
148 m68k_bsd_nat_target::store_registers (struct regcache *regcache, int regnum)
150 pid_t pid = ptid_get_pid (regcache->ptid ());
152 if (regnum == -1 || m68kbsd_gregset_supplies_p (regnum))
156 if (ptrace (PT_GETREGS, pid, (PTRACE_TYPE_ARG3) ®s, 0) == -1)
157 perror_with_name (_("Couldn't get registers"));
159 m68kbsd_collect_gregset (regcache, ®s, regnum);
161 if (ptrace (PT_SETREGS, pid, (PTRACE_TYPE_ARG3) ®s, 0) == -1)
162 perror_with_name (_("Couldn't write registers"));
165 if (regnum == -1 || m68kbsd_fpregset_supplies_p (regnum))
169 if (ptrace (PT_GETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
170 perror_with_name (_("Couldn't get floating point status"));
172 m68kbsd_collect_fpregset (regcache, &fpregs, regnum);
174 if (ptrace (PT_SETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
175 perror_with_name (_("Couldn't write floating point status"));
180 /* Support for debugging kernel virtual memory images. */
182 #include <machine/pcb.h>
186 /* OpenBSD doesn't have these. */
188 #define PCB_REGS_FP 10
191 #define PCB_REGS_SP 11
195 m68kbsd_supply_pcb (struct regcache *regcache, struct pcb *pcb)
200 /* The following is true for NetBSD 1.6.2:
202 The pcb contains %d2...%d7, %a2...%a7 and %ps. This accounts for
203 all callee-saved registers. From this information we reconstruct
204 the register state as it would look when we just returned from
207 /* The stack pointer shouldn't be zero. */
208 if (pcb->pcb_regs[PCB_REGS_SP] == 0)
211 for (regnum = M68K_D2_REGNUM; regnum <= M68K_D7_REGNUM; regnum++)
212 regcache->raw_supply (regnum, &pcb->pcb_regs[i++]);
213 for (regnum = M68K_A2_REGNUM; regnum <= M68K_SP_REGNUM; regnum++)
214 regcache->raw_supply (regnum, &pcb->pcb_regs[i++]);
216 tmp = pcb->pcb_ps & 0xffff;
217 regcache->raw_supply (M68K_PS_REGNUM, &tmp);
219 read_memory (pcb->pcb_regs[PCB_REGS_FP] + 4, (char *) &tmp, sizeof tmp);
220 regcache->raw_supply (M68K_PC_REGNUM, &tmp);
226 _initialize_m68kbsd_nat (void)
228 add_inf_child_target (&the_m68k_bsd_nat_target);
230 /* Support debugging kernel virtual memory images. */
231 bsd_kvm_add_target (m68kbsd_supply_pcb);