1 /* Native-dependent code for Motorola 68000 BSD's.
3 Copyright (C) 2004 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 2 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, write to the Free Software
19 Foundation, Inc., 51 Franklin Street, Fifth Floor,
20 Boston, MA 02110-1301, USA. */
27 #include "gdb_assert.h"
28 #include <sys/types.h>
29 #include <sys/ptrace.h>
30 #include <machine/reg.h>
32 #include "m68k-tdep.h"
33 #include "inf-ptrace.h"
36 m68kbsd_gregset_supplies_p (int regnum)
38 return (regnum >= M68K_D0_REGNUM && regnum <= M68K_PC_REGNUM);
42 m68kbsd_fpregset_supplies_p (int regnum)
44 return (regnum >= M68K_FP0_REGNUM && regnum <= M68K_FPI_REGNUM);
47 /* Supply the general-purpose registers stored in GREGS to REGCACHE. */
50 m68kbsd_supply_gregset (struct regcache *regcache, const void *gregs)
52 const char *regs = gregs;
55 for (regnum = M68K_D0_REGNUM; regnum <= M68K_PC_REGNUM; regnum++)
56 regcache_raw_supply (regcache, regnum, regs + regnum * 4);
59 /* Supply the floating-point registers stored in FPREGS to REGCACHE. */
62 m68kbsd_supply_fpregset (struct regcache *regcache, const void *fpregs)
64 const char *regs = fpregs;
67 for (regnum = M68K_FP0_REGNUM; regnum <= M68K_FPI_REGNUM; regnum++)
68 regcache_raw_supply (regcache, regnum,
69 regs + m68kbsd_fpreg_offset (regnum));
72 /* Collect the general-purpose registers from REGCACHE and store them
76 m68kbsd_collect_gregset (const struct regcache *regcache,
77 void *gregs, int regnum)
82 for (i = M68K_D0_REGNUM; i <= M68K_PC_REGNUM; i++)
84 if (regnum == -1 || regnum == i)
85 regcache_raw_collect (regcache, i, regs + i * 4);
89 /* Collect the floating-point registers from REGCACHE and store them
93 m68kbsd_collect_fpregset (struct regcache *regcache,
94 void *fpregs, int regnum)
99 for (i = M68K_FP0_REGNUM; i <= M68K_FPI_REGNUM; i++)
101 if (regnum == -1 || regnum == i)
102 regcache_raw_collect (regcache, i, regs + m68kbsd_fpreg_offset (i));
107 /* Fetch register REGNUM from the inferior. If REGNUM is -1, do this
108 for all registers (including the floating-point registers). */
111 m68kbsd_fetch_inferior_registers (int regnum)
113 if (regnum == -1 || m68kbsd_gregset_supplies_p (regnum))
117 if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
118 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
119 perror_with_name (_("Couldn't get registers"));
121 m68kbsd_supply_gregset (current_regcache, ®s);
124 if (regnum == -1 || m68kbsd_fpregset_supplies_p (regnum))
128 if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
129 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
130 perror_with_name (_("Couldn't get floating point status"));
132 m68kbsd_supply_fpregset (current_regcache, &fpregs);
136 /* Store register REGNUM back into the inferior. If REGNUM is -1, do
137 this for all registers (including the floating-point registers). */
140 m68kbsd_store_inferior_registers (int regnum)
142 if (regnum == -1 || m68kbsd_gregset_supplies_p (regnum))
146 if (ptrace (PT_GETREGS, PIDGET (inferior_ptid),
147 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
148 perror_with_name (_("Couldn't get registers"));
150 m68kbsd_collect_gregset (current_regcache, ®s, regnum);
152 if (ptrace (PT_SETREGS, PIDGET (inferior_ptid),
153 (PTRACE_TYPE_ARG3) ®s, 0) == -1)
154 perror_with_name (_("Couldn't write registers"));
157 if (regnum == -1 || m68kbsd_fpregset_supplies_p (regnum))
161 if (ptrace (PT_GETFPREGS, PIDGET (inferior_ptid),
162 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
163 perror_with_name (_("Couldn't get floating point status"));
165 m68kbsd_collect_fpregset (current_regcache, &fpregs, regnum);
167 if (ptrace (PT_SETFPREGS, PIDGET (inferior_ptid),
168 (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
169 perror_with_name (_("Couldn't write floating point status"));
174 /* Support for debugging kernel virtual memory images. */
176 #include <sys/types.h>
177 #include <machine/pcb.h>
181 /* OpenBSD doesn't have these. */
183 #define PCB_REGS_FP 10
186 #define PCB_REGS_SP 11
190 m68kbsd_supply_pcb (struct regcache *regcache, struct pcb *pcb)
195 /* The following is true for NetBSD 1.6.2:
197 The pcb contains %d2...%d7, %a2...%a7 and %ps. This accounts for
198 all callee-saved registers. From this information we reconstruct
199 the register state as it would look when we just returned from
202 /* The stack pointer shouldn't be zero. */
203 if (pcb->pcb_regs[PCB_REGS_SP] == 0)
206 for (regnum = M68K_D2_REGNUM; regnum <= M68K_D7_REGNUM; regnum++)
207 regcache_raw_supply (regcache, regnum, &pcb->pcb_regs[i++]);
208 for (regnum = M68K_A2_REGNUM; regnum <= M68K_SP_REGNUM; regnum++)
209 regcache_raw_supply (regcache, regnum, &pcb->pcb_regs[i++]);
211 tmp = pcb->pcb_ps & 0xffff;
212 regcache_raw_supply (regcache, M68K_PS_REGNUM, &tmp);
214 read_memory (pcb->pcb_regs[PCB_REGS_FP] + 4, (char *) &tmp, sizeof tmp);
215 regcache_raw_supply (regcache, M68K_PC_REGNUM, &tmp);
221 /* Provide a prototype to silence -Wmissing-prototypes. */
222 void _initialize_m68kbsd_nat (void);
225 _initialize_m68kbsd_nat (void)
227 struct target_ops *t;
229 t = inf_ptrace_target ();
230 t->to_fetch_registers = m68kbsd_fetch_inferior_registers;
231 t->to_store_registers = m68kbsd_store_inferior_registers;
234 /* Support debugging kernel virtual memory images. */
235 bsd_kvm_add_target (m68kbsd_supply_pcb);