1 /* Target-dependent code for QNX Neutrino x86.
3 Copyright (C) 2003, 2004, 2007 Free Software Foundation, Inc.
5 Contributed by QNX Software Systems Ltd.
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/>. */
28 #include "gdb_assert.h"
29 #include "gdb_string.h"
31 #include "i386-tdep.h"
32 #include "i387-tdep.h"
34 #include "solib-svr4.h"
36 /* Target vector for QNX NTO x86. */
37 static struct nto_target_ops i386_nto_target;
40 #define X86_CPU_FXSR (1L << 12)
43 /* Why 13? Look in our /usr/include/x86/context.h header at the
44 x86_cpu_registers structure and you'll see an 'exx' junk register
45 that is just filler. Don't ask me, ask the kernel guys. */
48 /* Mapping between the general-purpose registers in `struct xxx'
49 format and GDB's register cache layout. */
51 /* From <x86/context.h>. */
52 static int i386nto_gregset_reg_offset[] =
69 /* Given a GDB register number REGNUM, return the offset into
70 Neutrino's register structure or -1 if the register is unknown. */
73 nto_reg_offset (int regnum)
75 if (regnum >= 0 && regnum < ARRAY_SIZE (i386nto_gregset_reg_offset))
76 return i386nto_gregset_reg_offset[regnum];
82 i386nto_supply_gregset (struct regcache *regcache, char *gpregs)
84 struct gdbarch *gdbarch = get_regcache_arch (regcache);
85 struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
87 if(tdep->gregset == NULL)
88 tdep->gregset = regset_alloc (gdbarch, i386_supply_gregset,
89 i386_collect_gregset);
91 gdb_assert (tdep->gregset_reg_offset == i386nto_gregset_reg_offset);
92 tdep->gregset->supply_regset (tdep->gregset, regcache, -1,
93 gpregs, NUM_GPREGS * 4);
97 i386nto_supply_fpregset (struct regcache *regcache, char *fpregs)
99 if (nto_cpuinfo_valid && nto_cpuinfo_flags | X86_CPU_FXSR)
100 i387_supply_fxsave (regcache, -1, fpregs);
102 i387_supply_fsave (regcache, -1, fpregs);
106 i386nto_supply_regset (struct regcache *regcache, int regset, char *data)
110 case NTO_REG_GENERAL:
111 i386nto_supply_gregset (regcache, data);
114 i386nto_supply_fpregset (regcache, data);
120 i386nto_regset_id (int regno)
124 else if (regno < I386_NUM_GREGS)
125 return NTO_REG_GENERAL;
126 else if (regno < I386_NUM_GREGS + I386_NUM_FREGS)
127 return NTO_REG_FLOAT;
129 return -1; /* Error. */
133 i386nto_register_area (int regno, int regset, unsigned *off)
138 if (regset == NTO_REG_GENERAL)
141 return NUM_GPREGS * 4;
143 *off = nto_reg_offset (regno);
148 else if (regset == NTO_REG_FLOAT)
150 unsigned off_adjust, regsize, regset_size;
152 if (nto_cpuinfo_valid && nto_cpuinfo_flags | X86_CPU_FXSR)
168 *off = (regno - gdbarch_fp0_regnum (current_gdbarch))
169 * regsize + off_adjust;
171 /* Why 10 instead of regsize? GDB only stores 10 bytes per FP
172 register so if we're sending a register back to the target,
173 we only want pdebug to write 10 bytes so as not to clobber
174 the reserved 6 bytes in the fxsave structure. */
180 i386nto_regset_fill (const struct regcache *regcache, int regset, char *data)
182 if (regset == NTO_REG_GENERAL)
186 for (regno = 0; regno < NUM_GPREGS; regno++)
188 int offset = nto_reg_offset (regno);
190 regcache_raw_collect (regcache, regno, data + offset);
193 else if (regset == NTO_REG_FLOAT)
195 if (nto_cpuinfo_valid && nto_cpuinfo_flags | X86_CPU_FXSR)
196 i387_collect_fxsave (regcache, -1, data);
198 i387_collect_fsave (regcache, -1, data);
206 /* Return whether the frame preceding NEXT_FRAME corresponds to a QNX
207 Neutrino sigtramp routine. */
210 i386nto_sigtramp_p (struct frame_info *next_frame)
212 CORE_ADDR pc = frame_pc_unwind (next_frame);
215 find_pc_partial_function (pc, &name, NULL, NULL);
216 return name && strcmp ("__signalstub", name) == 0;
219 #define I386_NTO_SIGCONTEXT_OFFSET 136
221 /* Assuming NEXT_FRAME is a frame following a QNX Neutrino sigtramp
222 routine, return the address of the associated sigcontext structure. */
225 i386nto_sigcontext_addr (struct frame_info *next_frame)
230 frame_unwind_register (next_frame, I386_ESP_REGNUM, buf);
231 sp = extract_unsigned_integer (buf, 4);
233 return sp + I386_NTO_SIGCONTEXT_OFFSET;
237 init_i386nto_ops (void)
239 i386_nto_target.regset_id = i386nto_regset_id;
240 i386_nto_target.supply_gregset = i386nto_supply_gregset;
241 i386_nto_target.supply_fpregset = i386nto_supply_fpregset;
242 i386_nto_target.supply_altregset = nto_dummy_supply_regset;
243 i386_nto_target.supply_regset = i386nto_supply_regset;
244 i386_nto_target.register_area = i386nto_register_area;
245 i386_nto_target.regset_fill = i386nto_regset_fill;
246 i386_nto_target.fetch_link_map_offsets =
247 svr4_ilp32_fetch_link_map_offsets;
251 i386nto_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
253 struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
255 /* Deal with our strange signals. */
256 nto_initialize_signals ();
259 i386_elf_init_abi (info, gdbarch);
261 /* Neutrino rewinds to look more normal. Need to override the i386
262 default which is [unfortunately] to decrement the PC. */
263 set_gdbarch_decr_pc_after_break (gdbarch, 0);
265 tdep->gregset_reg_offset = i386nto_gregset_reg_offset;
266 tdep->gregset_num_regs = ARRAY_SIZE (i386nto_gregset_reg_offset);
267 tdep->sizeof_gregset = NUM_GPREGS * 4;
269 tdep->sigtramp_p = i386nto_sigtramp_p;
270 tdep->sigcontext_addr = i386nto_sigcontext_addr;
271 tdep->sc_pc_offset = 56;
272 tdep->sc_sp_offset = 68;
274 /* Setjmp()'s return PC saved in EDX (5). */
275 tdep->jb_pc_offset = 20; /* 5x32 bit ints in. */
277 set_solib_svr4_fetch_link_map_offsets
278 (gdbarch, svr4_ilp32_fetch_link_map_offsets);
280 /* Our loader handles solib relocations slightly differently than svr4. */
281 TARGET_SO_RELOCATE_SECTION_ADDRESSES = nto_relocate_section_addresses;
283 /* Supply a nice function to find our solibs. */
284 TARGET_SO_FIND_AND_OPEN_SOLIB = nto_find_and_open_solib;
286 /* Our linker code is in libc. */
287 TARGET_SO_IN_DYNSYM_RESOLVE_CODE = nto_in_dynsym_resolve_code;
289 nto_set_target (&i386_nto_target);
293 _initialize_i386nto_tdep (void)
296 gdbarch_register_osabi (bfd_arch_i386, 0, GDB_OSABI_QNXNTO,
298 gdbarch_register_osabi_sniffer (bfd_arch_i386, bfd_target_elf_flavour,
299 nto_elf_osabi_sniffer);