GDB (xrefs)
Loading...
Searching...
No Matches
ppc-obsd-nat.c
Go to the documentation of this file.
1/* Native-dependent code for OpenBSD/powerpc.
2
3 Copyright (C) 2004-2023 Free Software Foundation, Inc.
4
5 This file is part of GDB.
6
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.
11
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.
16
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/>. */
19
20#include "defs.h"
21#include "gdbcore.h"
22#include "inferior.h"
23#include "regcache.h"
24
25#include <sys/types.h>
26#include <sys/ptrace.h>
27#include <sys/signal.h>
28#include <machine/frame.h>
29#include <machine/pcb.h>
30#include <machine/reg.h>
31
32#include "ppc-tdep.h"
33#include "ppc-obsd-tdep.h"
34#include "inf-ptrace.h"
35#include "obsd-nat.h"
36#include "bsd-kvm.h"
37
39{
40 void fetch_registers (struct regcache *, int) override;
41 void store_registers (struct regcache *, int) override;
42};
43
45
46/* OpenBSD/powerpc didn't have PT_GETFPREGS/PT_SETFPREGS until release
47 4.0. On older releases the floating-point registers are handled by
48 PT_GETREGS/PT_SETREGS, but fpscr wasn't available.. */
49
50#ifdef PT_GETFPREGS
51
52/* Returns true if PT_GETFPREGS fetches this register. */
53
54static int
56{
57 ppc_gdbarch_tdep *tdep = gdbarch_tdep<ppc_gdbarch_tdep> (gdbarch);
58
59 /* FIXME: jimb/2004-05-05: Some PPC variants don't have floating
60 point registers. Traditionally, GDB's register set has still
61 listed the floating point registers for such machines, so this
62 code is harmless. However, the new E500 port actually omits the
63 floating point registers entirely from the register set --- they
64 don't even have register numbers assigned to them.
65
66 It's not clear to me how best to update this code, so this assert
67 will alert the first person to encounter the NetBSD/E500
68 combination to the problem. */
70
71 return ((regnum >= tdep->ppc_fp0_regnum
72 && regnum < tdep->ppc_fp0_regnum + ppc_num_fprs)
73 || regnum == tdep->ppc_fpscr_regnum);
74}
75
76#endif /* PT_GETFPREGS */
77
78/* Fetch register REGNUM from the inferior. If REGNUM is -1, do this
79 for all registers. */
80
81void
83{
84 struct reg regs;
85 pid_t pid = regcache->ptid ().pid ();
86
87 if (ptrace (PT_GETREGS, pid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
88 perror_with_name (_("Couldn't get registers"));
89
91 &regs, sizeof regs);
92#ifndef PT_GETFPREGS
94 &regs, sizeof regs);
95#endif
96
97#ifdef PT_GETFPREGS
98 if (regnum == -1
100 {
101 struct fpreg fpregs;
102
103 if (ptrace (PT_GETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
104 perror_with_name (_("Couldn't get floating point status"));
105
107 &fpregs, sizeof fpregs);
108 }
109#endif
110}
111
112/* Store register REGNUM back into the inferior. If REGNUM is -1, do
113 this for all registers. */
114
115void
117{
118 struct reg regs;
119 pid_t pid = regcache->ptid ().pid ();
120
121 if (ptrace (PT_GETREGS, pid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
122 perror_with_name (_("Couldn't get registers"));
123
125 regnum, &regs, sizeof regs);
126#ifndef PT_GETFPREGS
128 regnum, &regs, sizeof regs);
129#endif
130
131 if (ptrace (PT_SETREGS, pid, (PTRACE_TYPE_ARG3) &regs, 0) == -1)
132 perror_with_name (_("Couldn't write registers"));
133
134#ifdef PT_GETFPREGS
135 if (regnum == -1
137 {
138 struct fpreg fpregs;
139
140 if (ptrace (PT_GETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
141 perror_with_name (_("Couldn't get floating point status"));
142
144 regnum, &fpregs, sizeof fpregs);
145
146 if (ptrace (PT_SETFPREGS, pid, (PTRACE_TYPE_ARG3) &fpregs, 0) == -1)
147 perror_with_name (_("Couldn't write floating point status"));
148 }
149#endif
150}
151
152
153static int
154ppcobsd_supply_pcb (struct regcache *regcache, struct pcb *pcb)
155{
156 struct gdbarch *gdbarch = regcache->arch ();
157 ppc_gdbarch_tdep *tdep = gdbarch_tdep<ppc_gdbarch_tdep> (gdbarch);
158 struct switchframe sf;
159 struct callframe cf;
160 int i, regnum;
161
162 /* The following is true for OpenBSD 3.7:
163
164 The pcb contains %r1 (the stack pointer) at the point of the
165 context switch in cpu_switch(). At that point we have a stack
166 frame as described by `struct switchframe', and below that a call
167 frame as described by `struct callframe'. From this information
168 we reconstruct the register state as it would look when we are in
169 cpu_switch(). */
170
171 /* The stack pointer shouldn't be zero. */
172 if (pcb->pcb_sp == 0)
173 return 0;
174
175 read_memory (pcb->pcb_sp, (gdb_byte *)&sf, sizeof sf);
177 regcache->raw_supply (tdep->ppc_cr_regnum, &sf.cr);
178 regcache->raw_supply (tdep->ppc_gp0_regnum + 2, &sf.fixreg2);
179 for (i = 0, regnum = tdep->ppc_gp0_regnum + 13; i < 19; i++, regnum++)
180 regcache->raw_supply (regnum, &sf.fixreg[i]);
181
182 read_memory (sf.sp, (gdb_byte *)&cf, sizeof cf);
184 regcache->raw_supply (tdep->ppc_gp0_regnum + 30, &cf.r30);
185 regcache->raw_supply (tdep->ppc_gp0_regnum + 31, &cf.r31);
186
187 return 1;
188}
189
191void
193{
195
196 /* General-purpose registers. */
197 ppcobsd_reg_offsets.r0_offset = offsetof (struct reg, gpr);
200 ppcobsd_reg_offsets.pc_offset = offsetof (struct reg, pc);
201 ppcobsd_reg_offsets.ps_offset = offsetof (struct reg, ps);
202 ppcobsd_reg_offsets.cr_offset = offsetof (struct reg, cnd);
203 ppcobsd_reg_offsets.lr_offset = offsetof (struct reg, lr);
204 ppcobsd_reg_offsets.ctr_offset = offsetof (struct reg, cnt);
205 ppcobsd_reg_offsets.xer_offset = offsetof (struct reg, xer);
206 ppcobsd_reg_offsets.mq_offset = offsetof (struct reg, mq);
207
208 /* Floating-point registers. */
209 ppcobsd_reg_offsets.f0_offset = offsetof (struct reg, fpr);
211#ifdef PT_GETFPREGS
212 ppcobsd_fpreg_offsets.f0_offset = offsetof (struct fpreg, fpr);
213 ppcobsd_fpreg_offsets.fpscr_offset = offsetof (struct fpreg, fpscr);
215#endif
216
217 /* Support debugging kernel virtual memory images. */
219}
int regnum
void bsd_kvm_add_target(int(*supply_pcb)(struct regcache *, struct pcb *))
Definition bsd-kvm.c:380
gdbarch * arch() const
Definition regcache.c:231
void raw_supply(int regnum, const void *buf) override
Definition regcache.c:1062
ptid_t ptid() const
Definition regcache.h:408
void read_memory(CORE_ADDR memaddr, gdb_byte *myaddr, ssize_t len)
Definition corefile.c:238
#define ptrace(request, pid, addr, data)
Definition gdb_ptrace.h:141
int gdbarch_pc_regnum(struct gdbarch *gdbarch)
Definition gdbarch.c:2054
int gdbarch_sp_regnum(struct gdbarch *gdbarch)
Definition gdbarch.c:2037
mach_port_t mach_port_t name mach_port_t mach_port_t name kern_return_t int int rusage_t pid_t pid
Definition gnu-nat.c:1791
void add_inf_child_target(inf_child_target *target)
Definition inf-child.c:418
#define PTRACE_TYPE_ARG3
static int getfpregs_supplies(int regno)
static ppc_obsd_nat_target the_ppc_obsd_nat_target
void _initialize_ppcobsd_nat()
static int ppcobsd_supply_pcb(struct regcache *regcache, struct pcb *pcb)
const struct regset ppcobsd_fpregset
struct ppc_reg_offsets ppcobsd_fpreg_offsets
const struct regset ppcobsd_gregset
struct ppc_reg_offsets ppcobsd_reg_offsets
void ppc_collect_gregset(const struct regset *regset, const struct regcache *regcache, int regnum, void *gregs, size_t len)
void ppc_supply_fpregset(const struct regset *regset, struct regcache *regcache, int regnum, const void *fpregs, size_t len)
int ppc_floating_point_unit_p(struct gdbarch *gdbarch)
void ppc_supply_gregset(const struct regset *regset, struct regcache *regcache, int regnum, const void *gregs, size_t len)
@ ppc_num_fprs
Definition ppc-tdep.h:319
void ppc_collect_fpregset(const struct regset *regset, const struct regcache *regcache, int regnum, void *fpregs, size_t len)
void fetch_registers(struct regcache *, int) override
void store_registers(struct regcache *, int) override