1 /* Target-dependent code for QNX Neutrino x86.
3 Copyright (C) 2003, 2004, 2007, 2008, 2009 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"
35 #include "solib-svr4.h"
37 /* Target vector for QNX NTO x86. */
38 static struct nto_target_ops i386_nto_target
;
41 #define X86_CPU_FXSR (1L << 12)
44 /* Why 13? Look in our /usr/include/x86/context.h header at the
45 x86_cpu_registers structure and you'll see an 'exx' junk register
46 that is just filler. Don't ask me, ask the kernel guys. */
49 /* Mapping between the general-purpose registers in `struct xxx'
50 format and GDB's register cache layout. */
52 /* From <x86/context.h>. */
53 static int i386nto_gregset_reg_offset
[] =
70 /* Given a GDB register number REGNUM, return the offset into
71 Neutrino's register structure or -1 if the register is unknown. */
74 nto_reg_offset (int regnum
)
76 if (regnum
>= 0 && regnum
< ARRAY_SIZE (i386nto_gregset_reg_offset
))
77 return i386nto_gregset_reg_offset
[regnum
];
83 i386nto_supply_gregset (struct regcache
*regcache
, char *gpregs
)
85 struct gdbarch
*gdbarch
= get_regcache_arch (regcache
);
86 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
88 if(tdep
->gregset
== NULL
)
89 tdep
->gregset
= regset_alloc (gdbarch
, i386_supply_gregset
,
90 i386_collect_gregset
);
92 gdb_assert (tdep
->gregset_reg_offset
== i386nto_gregset_reg_offset
);
93 tdep
->gregset
->supply_regset (tdep
->gregset
, regcache
, -1,
94 gpregs
, NUM_GPREGS
* 4);
98 i386nto_supply_fpregset (struct regcache
*regcache
, char *fpregs
)
100 if (nto_cpuinfo_valid
&& nto_cpuinfo_flags
| X86_CPU_FXSR
)
101 i387_supply_fxsave (regcache
, -1, fpregs
);
103 i387_supply_fsave (regcache
, -1, fpregs
);
107 i386nto_supply_regset (struct regcache
*regcache
, int regset
, char *data
)
111 case NTO_REG_GENERAL
:
112 i386nto_supply_gregset (regcache
, data
);
115 i386nto_supply_fpregset (regcache
, data
);
121 i386nto_regset_id (int regno
)
125 else if (regno
< I386_NUM_GREGS
)
126 return NTO_REG_GENERAL
;
127 else if (regno
< I386_NUM_GREGS
+ I386_NUM_FREGS
)
128 return NTO_REG_FLOAT
;
129 else if (regno
< I386_SSE_NUM_REGS
)
130 return NTO_REG_FLOAT
; /* We store xmm registers in fxsave_area. */
132 return -1; /* Error. */
136 i386nto_register_area (struct gdbarch
*gdbarch
,
137 int regno
, int regset
, unsigned *off
)
139 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
143 if (regset
== NTO_REG_GENERAL
)
146 return NUM_GPREGS
* 4;
148 *off
= nto_reg_offset (regno
);
153 else if (regset
== NTO_REG_FLOAT
)
155 unsigned off_adjust
, regsize
, regset_size
, regno_base
;
156 /* The following are flags indicating number in our fxsave_area. */
157 int first_four
= (regno
>= I387_FCTRL_REGNUM (tdep
)
158 && regno
<= I387_FISEG_REGNUM (tdep
));
159 int second_four
= (regno
> I387_FISEG_REGNUM (tdep
)
160 && regno
<= I387_FOP_REGNUM (tdep
));
161 int st_reg
= (regno
>= I387_ST0_REGNUM (tdep
)
162 && regno
< I387_ST0_REGNUM (tdep
) + 8);
163 int xmm_reg
= (regno
>= I387_XMM0_REGNUM (tdep
)
164 && regno
< I387_MXCSR_REGNUM (tdep
));
166 if (nto_cpuinfo_valid
&& nto_cpuinfo_flags
| X86_CPU_FXSR
)
171 /* fxsave_area structure. */
174 /* fpu_control_word, fpu_status_word, fpu_tag_word, fpu_operand
176 regsize
= 2; /* Two bytes each. */
178 regno_base
= I387_FCTRL_REGNUM (tdep
);
180 else if (second_four
)
182 /* fpu_ip, fpu_cs, fpu_op, fpu_ds registers. */
185 regno_base
= I387_FISEG_REGNUM (tdep
) + 1;
192 regno_base
= I387_ST0_REGNUM (tdep
);
199 regno_base
= I387_XMM0_REGNUM (tdep
);
201 else if (regno
== I387_MXCSR_REGNUM (tdep
))
205 regno_base
= I387_MXCSR_REGNUM (tdep
);
210 gdb_assert (regno
== -1);
213 regsize
= regset_size
;
219 /* fsave_area structure. */
220 if (first_four
|| second_four
)
222 /* fpu_control_word, ... , fpu_ds registers. */
225 regno_base
= I387_FCTRL_REGNUM (tdep
);
229 /* One of ST registers. */
232 regno_base
= I387_ST0_REGNUM (tdep
);
237 gdb_assert (regno
== -1);
240 regsize
= regset_size
;
245 *off
= off_adjust
+ (regno
- regno_base
) * regsize
;
254 i386nto_regset_fill (const struct regcache
*regcache
, int regset
, char *data
)
256 if (regset
== NTO_REG_GENERAL
)
260 for (regno
= 0; regno
< NUM_GPREGS
; regno
++)
262 int offset
= nto_reg_offset (regno
);
264 regcache_raw_collect (regcache
, regno
, data
+ offset
);
267 else if (regset
== NTO_REG_FLOAT
)
269 if (nto_cpuinfo_valid
&& nto_cpuinfo_flags
| X86_CPU_FXSR
)
270 i387_collect_fxsave (regcache
, -1, data
);
272 i387_collect_fsave (regcache
, -1, data
);
280 /* Return whether THIS_FRAME corresponds to a QNX Neutrino sigtramp
284 i386nto_sigtramp_p (struct frame_info
*this_frame
)
286 CORE_ADDR pc
= get_frame_pc (this_frame
);
289 find_pc_partial_function (pc
, &name
, NULL
, NULL
);
290 return name
&& strcmp ("__signalstub", name
) == 0;
293 #define I386_NTO_SIGCONTEXT_OFFSET 136
295 /* Assuming THIS_FRAME is a QNX Neutrino sigtramp routine, return the
296 address of the associated sigcontext structure. */
299 i386nto_sigcontext_addr (struct frame_info
*this_frame
)
304 get_frame_register (this_frame
, I386_ESP_REGNUM
, buf
);
305 sp
= extract_unsigned_integer (buf
, 4);
307 return sp
+ I386_NTO_SIGCONTEXT_OFFSET
;
311 init_i386nto_ops (void)
313 i386_nto_target
.regset_id
= i386nto_regset_id
;
314 i386_nto_target
.supply_gregset
= i386nto_supply_gregset
;
315 i386_nto_target
.supply_fpregset
= i386nto_supply_fpregset
;
316 i386_nto_target
.supply_altregset
= nto_dummy_supply_regset
;
317 i386_nto_target
.supply_regset
= i386nto_supply_regset
;
318 i386_nto_target
.register_area
= i386nto_register_area
;
319 i386_nto_target
.regset_fill
= i386nto_regset_fill
;
320 i386_nto_target
.fetch_link_map_offsets
=
321 svr4_ilp32_fetch_link_map_offsets
;
325 i386nto_init_abi (struct gdbarch_info info
, struct gdbarch
*gdbarch
)
327 struct gdbarch_tdep
*tdep
= gdbarch_tdep (gdbarch
);
328 static struct target_so_ops nto_svr4_so_ops
;
330 /* Deal with our strange signals. */
331 nto_initialize_signals ();
334 i386_elf_init_abi (info
, gdbarch
);
336 /* Neutrino rewinds to look more normal. Need to override the i386
337 default which is [unfortunately] to decrement the PC. */
338 set_gdbarch_decr_pc_after_break (gdbarch
, 0);
340 tdep
->gregset_reg_offset
= i386nto_gregset_reg_offset
;
341 tdep
->gregset_num_regs
= ARRAY_SIZE (i386nto_gregset_reg_offset
);
342 tdep
->sizeof_gregset
= NUM_GPREGS
* 4;
344 tdep
->sigtramp_p
= i386nto_sigtramp_p
;
345 tdep
->sigcontext_addr
= i386nto_sigcontext_addr
;
346 tdep
->sc_pc_offset
= 56;
347 tdep
->sc_sp_offset
= 68;
349 /* Setjmp()'s return PC saved in EDX (5). */
350 tdep
->jb_pc_offset
= 20; /* 5x32 bit ints in. */
352 set_solib_svr4_fetch_link_map_offsets
353 (gdbarch
, svr4_ilp32_fetch_link_map_offsets
);
355 /* Initialize this lazily, to avoid an initialization order
356 dependency on solib-svr4.c's _initialize routine. */
357 if (nto_svr4_so_ops
.in_dynsym_resolve_code
== NULL
)
359 nto_svr4_so_ops
= svr4_so_ops
;
361 /* Our loader handles solib relocations differently than svr4. */
362 nto_svr4_so_ops
.relocate_section_addresses
363 = nto_relocate_section_addresses
;
365 /* Supply a nice function to find our solibs. */
366 nto_svr4_so_ops
.find_and_open_solib
367 = nto_find_and_open_solib
;
369 /* Our linker code is in libc. */
370 nto_svr4_so_ops
.in_dynsym_resolve_code
371 = nto_in_dynsym_resolve_code
;
373 set_solib_ops (gdbarch
, &nto_svr4_so_ops
);
375 nto_set_target (&i386_nto_target
);
378 /* Provide a prototype to silence -Wmissing-prototypes. */
379 extern initialize_file_ftype _initialize_i386nto_tdep
;
382 _initialize_i386nto_tdep (void)
385 gdbarch_register_osabi (bfd_arch_i386
, 0, GDB_OSABI_QNXNTO
,
387 gdbarch_register_osabi_sniffer (bfd_arch_i386
, bfd_target_elf_flavour
,
388 nto_elf_osabi_sniffer
);