Accept and ignore the R_BPF_64_NODLYD32 relocation.
[binutils-gdb.git] / gdb / ppc-netbsd-tdep.c
blob0206b3e312c0f8b0a4d7379e4e6066b910c3c042
1 /* Target-dependent code for NetBSD/powerpc.
3 Copyright (C) 2002-2023 Free Software Foundation, Inc.
5 Contributed by Wasabi Systems, Inc.
7 This file is part of GDB.
9 This program is free software; you can redistribute it and/or modify
10 it under the terms of the GNU General Public License as published by
11 the Free Software Foundation; either version 3 of the License, or
12 (at your option) any later version.
14 This program is distributed in the hope that it will be useful,
15 but WITHOUT ANY WARRANTY; without even the implied warranty of
16 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
19 You should have received a copy of the GNU General Public License
20 along with this program. If not, see <http://www.gnu.org/licenses/>. */
22 #include "defs.h"
23 #include "gdbtypes.h"
24 #include "osabi.h"
25 #include "regcache.h"
26 #include "regset.h"
27 #include "trad-frame.h"
28 #include "tramp-frame.h"
30 #include "ppc-tdep.h"
31 #include "netbsd-tdep.h"
32 #include "ppc-tdep.h"
33 #include "solib-svr4.h"
35 /* Register offsets from <machine/reg.h>. */
36 static ppc_reg_offsets ppcnbsd_reg_offsets;
39 /* Core file support. */
41 /* NetBSD/powerpc register sets. */
43 const struct regset ppcnbsd_gregset =
45 &ppcnbsd_reg_offsets,
46 ppc_supply_gregset
49 const struct regset ppcnbsd_fpregset =
51 &ppcnbsd_reg_offsets,
52 ppc_supply_fpregset
55 /* Iterate over core file register note sections. */
57 static void
58 ppcnbsd_iterate_over_regset_sections (struct gdbarch *gdbarch,
59 iterate_over_regset_sections_cb *cb,
60 void *cb_data,
61 const struct regcache *regcache)
63 cb (".reg", 148, 148, &ppcnbsd_gregset, NULL, cb_data);
64 cb (".reg2", 264, 264, &ppcnbsd_fpregset, NULL, cb_data);
68 /* NetBSD is confused. It appears that 1.5 was using the correct SVR4
69 convention but, 1.6 switched to the below broken convention. For
70 the moment use the broken convention. Ulgh! */
72 static enum return_value_convention
73 ppcnbsd_return_value (struct gdbarch *gdbarch, struct value *function,
74 struct type *valtype, struct regcache *regcache,
75 gdb_byte *readbuf, const gdb_byte *writebuf)
77 #if 0
78 if ((valtype->code () == TYPE_CODE_STRUCT
79 || valtype->code () == TYPE_CODE_UNION)
80 && !((valtype->length () == 16 || valtype->length () == 8)
81 && valtype->is_vector ())
82 && !(valtype->length () == 1
83 || valtype->length () == 2
84 || valtype->length () == 4
85 || valtype->length () == 8))
86 return RETURN_VALUE_STRUCT_CONVENTION;
87 else
88 #endif
89 return ppc_sysv_abi_broken_return_value (gdbarch, function, valtype,
90 regcache, readbuf, writebuf);
94 /* Signal trampolines. */
96 extern const struct tramp_frame ppcnbsd2_sigtramp;
98 static void
99 ppcnbsd_sigtramp_cache_init (const struct tramp_frame *self,
100 frame_info_ptr this_frame,
101 struct trad_frame_cache *this_cache,
102 CORE_ADDR func)
104 struct gdbarch *gdbarch = get_frame_arch (this_frame);
105 ppc_gdbarch_tdep *tdep = gdbarch_tdep<ppc_gdbarch_tdep> (gdbarch);
106 CORE_ADDR addr, base;
107 int i;
109 base = get_frame_register_unsigned (this_frame,
110 gdbarch_sp_regnum (gdbarch));
111 if (self == &ppcnbsd2_sigtramp)
112 addr = base + 0x10 + 2 * tdep->wordsize;
113 else
114 addr = base + 0x18 + 2 * tdep->wordsize;
115 for (i = 0; i < ppc_num_gprs; i++, addr += tdep->wordsize)
117 int regnum = i + tdep->ppc_gp0_regnum;
118 trad_frame_set_reg_addr (this_cache, regnum, addr);
120 trad_frame_set_reg_addr (this_cache, tdep->ppc_lr_regnum, addr);
121 addr += tdep->wordsize;
122 trad_frame_set_reg_addr (this_cache, tdep->ppc_cr_regnum, addr);
123 addr += tdep->wordsize;
124 trad_frame_set_reg_addr (this_cache, tdep->ppc_xer_regnum, addr);
125 addr += tdep->wordsize;
126 trad_frame_set_reg_addr (this_cache, tdep->ppc_ctr_regnum, addr);
127 addr += tdep->wordsize;
128 trad_frame_set_reg_addr (this_cache, gdbarch_pc_regnum (gdbarch),
129 addr); /* SRR0? */
130 addr += tdep->wordsize;
132 /* Construct the frame ID using the function start. */
133 trad_frame_set_id (this_cache, frame_id_build (base, func));
136 static const struct tramp_frame ppcnbsd_sigtramp =
138 SIGTRAMP_FRAME,
141 { 0x3821fff0, ULONGEST_MAX }, /* add r1,r1,-16 */
142 { 0x4e800021, ULONGEST_MAX }, /* blrl */
143 { 0x38610018, ULONGEST_MAX }, /* addi r3,r1,24 */
144 { 0x38000127, ULONGEST_MAX }, /* li r0,295 */
145 { 0x44000002, ULONGEST_MAX }, /* sc */
146 { 0x38000001, ULONGEST_MAX }, /* li r0,1 */
147 { 0x44000002, ULONGEST_MAX }, /* sc */
148 { TRAMP_SENTINEL_INSN, ULONGEST_MAX }
150 ppcnbsd_sigtramp_cache_init
153 /* NetBSD 2.0 introduced a slightly different signal trampoline. */
155 const struct tramp_frame ppcnbsd2_sigtramp =
157 SIGTRAMP_FRAME,
160 { 0x3821fff0, ULONGEST_MAX }, /* add r1,r1,-16 */
161 { 0x4e800021, ULONGEST_MAX }, /* blrl */
162 { 0x38610010, ULONGEST_MAX }, /* addi r3,r1,16 */
163 { 0x38000127, ULONGEST_MAX }, /* li r0,295 */
164 { 0x44000002, ULONGEST_MAX }, /* sc */
165 { 0x38000001, ULONGEST_MAX }, /* li r0,1 */
166 { 0x44000002, ULONGEST_MAX }, /* sc */
167 { TRAMP_SENTINEL_INSN, ULONGEST_MAX }
169 ppcnbsd_sigtramp_cache_init
173 static void
174 ppcnbsd_init_abi (struct gdbarch_info info,
175 struct gdbarch *gdbarch)
177 nbsd_init_abi (info, gdbarch);
179 /* For NetBSD, this is an on again, off again thing. Some systems
180 do use the broken struct convention, and some don't. */
181 set_gdbarch_return_value (gdbarch, ppcnbsd_return_value);
183 /* NetBSD uses SVR4-style shared libraries. */
184 set_solib_svr4_fetch_link_map_offsets
185 (gdbarch, svr4_ilp32_fetch_link_map_offsets);
187 set_gdbarch_iterate_over_regset_sections
188 (gdbarch, ppcnbsd_iterate_over_regset_sections);
190 tramp_frame_prepend_unwinder (gdbarch, &ppcnbsd_sigtramp);
191 tramp_frame_prepend_unwinder (gdbarch, &ppcnbsd2_sigtramp);
194 void _initialize_ppcnbsd_tdep ();
195 void
196 _initialize_ppcnbsd_tdep ()
198 gdbarch_register_osabi (bfd_arch_powerpc, 0, GDB_OSABI_NETBSD,
199 ppcnbsd_init_abi);
201 /* Avoid initializing the register offsets again if they were
202 already initialized by ppc-netbsd-nat.c. */
203 if (ppcnbsd_reg_offsets.pc_offset == 0)
205 /* General-purpose registers. */
206 ppcnbsd_reg_offsets.r0_offset = 0;
207 ppcnbsd_reg_offsets.gpr_size = 4;
208 ppcnbsd_reg_offsets.xr_size = 4;
209 ppcnbsd_reg_offsets.lr_offset = 128;
210 ppcnbsd_reg_offsets.cr_offset = 132;
211 ppcnbsd_reg_offsets.xer_offset = 136;
212 ppcnbsd_reg_offsets.ctr_offset = 140;
213 ppcnbsd_reg_offsets.pc_offset = 144;
214 ppcnbsd_reg_offsets.ps_offset = -1;
215 ppcnbsd_reg_offsets.mq_offset = -1;
217 /* Floating-point registers. */
218 ppcnbsd_reg_offsets.f0_offset = 0;
219 ppcnbsd_reg_offsets.fpscr_offset = 256;
220 ppcnbsd_reg_offsets.fpscr_size = 4;