1 /* Target-dependent code for PowerPC systems running NetBSD.
2 Copyright 2002, 2003 Free Software Foundation, Inc.
3 Contributed by Wasabi Systems, 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., 59 Temple Place - Suite 330,
20 Boston, MA 02111-1307, USA. */
26 #include "breakpoint.h"
31 #include "ppcnbsd-tdep.h"
32 #include "nbsd-tdep.h"
34 #include "solib-svr4.h"
36 #define REG_FIXREG_OFFSET(x) ((x) * 4)
37 #define REG_LR_OFFSET (32 * 4)
38 #define REG_CR_OFFSET (33 * 4)
39 #define REG_XER_OFFSET (34 * 4)
40 #define REG_CTR_OFFSET (35 * 4)
41 #define REG_PC_OFFSET (36 * 4)
42 #define SIZEOF_STRUCT_REG (37 * 4)
44 #define FPREG_FPR_OFFSET(x) ((x) * 8)
45 #define FPREG_FPSCR_OFFSET (32 * 8)
46 #define SIZEOF_STRUCT_FPREG (33 * 8)
49 ppcnbsd_supply_reg (char *regs, int regno)
51 struct gdbarch_tdep *tdep = gdbarch_tdep (current_gdbarch);
54 for (i = 0; i <= 31; i++)
56 if (regno == i || regno == -1)
57 supply_register (i, regs + REG_FIXREG_OFFSET (i));
60 if (regno == tdep->ppc_lr_regnum || regno == -1)
61 supply_register (tdep->ppc_lr_regnum, regs + REG_LR_OFFSET);
63 if (regno == tdep->ppc_cr_regnum || regno == -1)
64 supply_register (tdep->ppc_cr_regnum, regs + REG_CR_OFFSET);
66 if (regno == tdep->ppc_xer_regnum || regno == -1)
67 supply_register (tdep->ppc_xer_regnum, regs + REG_XER_OFFSET);
69 if (regno == tdep->ppc_ctr_regnum || regno == -1)
70 supply_register (tdep->ppc_ctr_regnum, regs + REG_CTR_OFFSET);
72 if (regno == PC_REGNUM || regno == -1)
73 supply_register (PC_REGNUM, regs + REG_PC_OFFSET);
77 ppcnbsd_fill_reg (char *regs, int regno)
79 struct gdbarch_tdep *tdep = gdbarch_tdep (current_gdbarch);
82 for (i = 0; i <= 31; i++)
84 if (regno == i || regno == -1)
85 regcache_collect (i, regs + REG_FIXREG_OFFSET (i));
88 if (regno == tdep->ppc_lr_regnum || regno == -1)
89 regcache_collect (tdep->ppc_lr_regnum, regs + REG_LR_OFFSET);
91 if (regno == tdep->ppc_cr_regnum || regno == -1)
92 regcache_collect (tdep->ppc_cr_regnum, regs + REG_CR_OFFSET);
94 if (regno == tdep->ppc_xer_regnum || regno == -1)
95 regcache_collect (tdep->ppc_xer_regnum, regs + REG_XER_OFFSET);
97 if (regno == tdep->ppc_ctr_regnum || regno == -1)
98 regcache_collect (tdep->ppc_ctr_regnum, regs + REG_CTR_OFFSET);
100 if (regno == PC_REGNUM || regno == -1)
101 regcache_collect (PC_REGNUM, regs + REG_PC_OFFSET);
105 ppcnbsd_supply_fpreg (char *fpregs, int regno)
107 struct gdbarch_tdep *tdep = gdbarch_tdep (current_gdbarch);
110 for (i = FP0_REGNUM; i <= FP0_REGNUM + 31; i++)
112 if (regno == i || regno == -1)
113 supply_register (i, fpregs + FPREG_FPR_OFFSET (i - FP0_REGNUM));
116 if (regno == tdep->ppc_fpscr_regnum || regno == -1)
117 supply_register (tdep->ppc_fpscr_regnum, fpregs + FPREG_FPSCR_OFFSET);
121 ppcnbsd_fill_fpreg (char *fpregs, int regno)
123 struct gdbarch_tdep *tdep = gdbarch_tdep (current_gdbarch);
126 for (i = FP0_REGNUM; i <= FP0_REGNUM + 31; i++)
128 if (regno == i || regno == -1)
129 regcache_collect (i, fpregs + FPREG_FPR_OFFSET (i - FP0_REGNUM));
132 if (regno == tdep->ppc_fpscr_regnum || regno == -1)
133 regcache_collect (tdep->ppc_fpscr_regnum, fpregs + FPREG_FPSCR_OFFSET);
137 fetch_core_registers (char *core_reg_sect, unsigned core_reg_size, int which,
142 /* We get everything from one section. */
146 regs = core_reg_sect;
147 fpregs = core_reg_sect + SIZEOF_STRUCT_REG;
149 /* Integer registers. */
150 ppcnbsd_supply_reg (regs, -1);
152 /* Floating point registers. */
153 ppcnbsd_supply_fpreg (fpregs, -1);
157 fetch_elfcore_registers (char *core_reg_sect, unsigned core_reg_size, int which,
162 case 0: /* Integer registers. */
163 if (core_reg_size != SIZEOF_STRUCT_REG)
164 warning ("Wrong size register set in core file.");
166 ppcnbsd_supply_reg (core_reg_sect, -1);
169 case 2: /* Floating point registers. */
170 if (core_reg_size != SIZEOF_STRUCT_FPREG)
171 warning ("Wrong size FP register set in core file.");
173 ppcnbsd_supply_fpreg (core_reg_sect, -1);
177 /* Don't know what kind of register request this is; just ignore it. */
182 static struct core_fns ppcnbsd_core_fns =
184 bfd_target_unknown_flavour, /* core_flavour */
185 default_check_format, /* check_format */
186 default_core_sniffer, /* core_sniffer */
187 fetch_core_registers, /* core_read_registers */
191 static struct core_fns ppcnbsd_elfcore_fns =
193 bfd_target_elf_flavour, /* core_flavour */
194 default_check_format, /* check_format */
195 default_core_sniffer, /* core_sniffer */
196 fetch_elfcore_registers, /* core_read_registers */
201 ppcnbsd_pc_in_sigtramp (CORE_ADDR pc, char *func_name)
203 /* FIXME: Need to add support for kernel-provided signal trampolines. */
204 return (nbsd_pc_in_sigtramp (pc, func_name));
208 ppcnbsd_init_abi (struct gdbarch_info info,
209 struct gdbarch *gdbarch)
212 set_gdbarch_frame_chain_valid (gdbarch, generic_func_frame_chain_valid);
214 set_gdbarch_pc_in_sigtramp (gdbarch, ppcnbsd_pc_in_sigtramp);
216 set_solib_svr4_fetch_link_map_offsets (gdbarch,
217 nbsd_ilp32_solib_svr4_fetch_link_map_offsets);
221 _initialize_ppcnbsd_tdep (void)
223 gdbarch_register_osabi (bfd_arch_powerpc, 0, GDB_OSABI_NETBSD_ELF,
226 add_core_fns (&ppcnbsd_core_fns);
227 add_core_fns (&ppcnbsd_elfcore_fns);