i386-macosx-nat-exec.c [plain text]
#include "defs.h"
#include "frame.h"
#include "inferior.h"
#include "target.h"
#include "symfile.h"
#include "symtab.h"
#include "objfiles.h"
#include "gdbcmd.h"
#include "regcache.h"
#include "gdb_assert.h"
#include "i386-tdep.h"
#include "i387-tdep.h"
#include "gdbarch.h"
#include "arch-utils.h"
#include "i386-macosx-tdep.h"
#include "macosx-nat-mutils.h"
#include "macosx-nat-inferior.h"
extern macosx_inferior_status *macosx_status;
static void
validate_inferior_registers (int regno)
{
int i;
if (regno == -1)
{
for (i = 0; i < NUM_REGS; i++)
{
if (!register_cached (i))
fetch_inferior_registers (i);
}
}
else if (!register_cached (regno))
{
fetch_inferior_registers (regno);
}
}
static int
i386_sse_regnum_p (struct gdbarch *gdbarch, int regnum)
{
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
#define I387_ST0_REGNUM tdep->st0_regnum
#define I387_NUM_XMM_REGS tdep->num_xmm_regs
if (I387_NUM_XMM_REGS == 0)
return 0;
return (I387_XMM0_REGNUM <= regnum && regnum < I387_MXCSR_REGNUM);
#undef I387_ST0_REGNUM
#undef I387_NUM_XMM_REGS
}
static int
i386_mxcsr_regnum_p (struct gdbarch *gdbarch, int regnum)
{
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
#define I387_ST0_REGNUM tdep->st0_regnum
#define I387_NUM_XMM_REGS tdep->num_xmm_regs
if (I387_NUM_XMM_REGS == 0)
return 0;
return (regnum == I387_MXCSR_REGNUM);
#undef I387_ST0_REGNUM
#undef I387_NUM_XMM_REGS
}
void
fetch_inferior_registers (int regno)
{
int current_pid;
thread_t current_thread;
int fetched = 0;
current_pid = ptid_get_pid (inferior_ptid);
current_thread = ptid_get_tid (inferior_ptid);
#ifdef x86_THREAD_STATE64
if (TARGET_OSABI == GDB_OSABI_UNKNOWN)
{
gdb_x86_thread_state_t gp_regs;
struct gdbarch_info info;
unsigned int gp_count = GDB_x86_THREAD_STATE_COUNT;
kern_return_t ret = thread_get_state
(current_thread, GDB_x86_THREAD_STATE, (thread_state_t) & gp_regs,
&gp_count);
if (ret != KERN_SUCCESS)
goto retry_using_old_call;
MACH_CHECK_ERROR (ret);
gdbarch_info_init (&info);
gdbarch_info_fill (current_gdbarch, &info);
info.byte_order = gdbarch_byte_order (current_gdbarch);
if (gp_regs.tsh.flavor == GDB_x86_THREAD_STATE64)
{
info.osabi = GDB_OSABI_DARWIN64;
info.bfd_arch_info = bfd_lookup_arch (bfd_arch_i386, bfd_mach_x86_64);
}
else
{
info.osabi = GDB_OSABI_DARWIN;
info.bfd_arch_info = bfd_lookup_arch (bfd_arch_i386,
bfd_mach_i386_i386);
}
gdbarch_update_p (info);
}
#endif
if (TARGET_OSABI == GDB_OSABI_DARWIN64)
{
if ((regno == -1) || IS_GP_REGNUM_64 (regno))
{
gdb_x86_thread_state_t gp_regs;
unsigned int gp_count = GDB_x86_THREAD_STATE_COUNT;
kern_return_t ret = thread_get_state
(current_thread, GDB_x86_THREAD_STATE, (thread_state_t) & gp_regs,
&gp_count);
MACH_CHECK_ERROR (ret);
x86_64_macosx_fetch_gp_registers (&gp_regs.uts.ts64);
fetched++;
}
if ((regno == -1)
|| IS_FP_REGNUM_64 (regno)
|| IS_VP_REGNUM_64 (regno))
{
gdb_x86_float_state_t fp_regs;
unsigned int fp_count = GDB_x86_FLOAT_STATE_COUNT;
kern_return_t ret = thread_get_state
(current_thread, GDB_x86_FLOAT_STATE, (thread_state_t) & fp_regs,
&fp_count);
MACH_CHECK_ERROR (ret);
x86_64_macosx_fetch_fp_registers (&fp_regs.ufs.fs64);
fetched++;
}
}
else
{
retry_using_old_call:
if ((regno == -1) || IS_GP_REGNUM (regno))
{
gdb_i386_thread_state_t gp_regs;
unsigned int gp_count = GDB_i386_THREAD_STATE_COUNT;
kern_return_t ret = thread_get_state
(current_thread, GDB_i386_THREAD_STATE, (thread_state_t) & gp_regs,
&gp_count);
MACH_CHECK_ERROR (ret);
i386_macosx_fetch_gp_registers (&gp_regs);
fetched++;
}
if ((regno == -1)
|| IS_FP_REGNUM (regno)
|| i386_sse_regnum_p (current_gdbarch, regno)
|| i386_mxcsr_regnum_p (current_gdbarch, regno))
{
gdb_i386_float_state_t fp_regs;
unsigned int fp_count = GDB_i386_FLOAT_STATE_COUNT;
kern_return_t ret = thread_get_state
(current_thread, GDB_i386_FLOAT_STATE, (thread_state_t) & fp_regs,
&fp_count);
MACH_CHECK_ERROR (ret);
i386_macosx_fetch_fp_registers (&fp_regs);
fetched++;
}
}
if (! fetched)
{
warning ("unknown register %d", regno);
regcache_raw_supply (current_regcache, regno, NULL);
}
}
void
store_inferior_registers (int regno)
{
int current_pid;
thread_t current_thread;
current_pid = ptid_get_pid (inferior_ptid);
current_thread = ptid_get_tid (inferior_ptid);
validate_inferior_registers (regno);
if (TARGET_OSABI == GDB_OSABI_DARWIN64)
{
if ((regno == -1) || IS_GP_REGNUM_64 (regno))
{
gdb_x86_thread_state_t gp_regs;
kern_return_t ret;
gp_regs.tsh.flavor = GDB_x86_THREAD_STATE64;
gp_regs.tsh.count = GDB_x86_THREAD_STATE64_COUNT;
x86_64_macosx_store_gp_registers (&gp_regs.uts.ts64);
ret = thread_set_state (current_thread, GDB_x86_THREAD_STATE,
(thread_state_t) & gp_regs,
GDB_x86_THREAD_STATE_COUNT);
MACH_CHECK_ERROR (ret);
}
if ((regno == -1)
|| IS_FP_REGNUM_64 (regno)
|| IS_VP_REGNUM_64 (regno))
{
gdb_x86_float_state_t fp_regs;
kern_return_t ret;
fp_regs.fsh.flavor = GDB_x86_FLOAT_STATE64;
fp_regs.fsh.count = GDB_x86_FLOAT_STATE64_COUNT;
if (x86_64_macosx_store_fp_registers (&fp_regs.ufs.fs64))
{
ret = thread_set_state (current_thread, GDB_x86_FLOAT_STATE,
(thread_state_t) & fp_regs,
GDB_x86_FLOAT_STATE_COUNT);
MACH_CHECK_ERROR (ret);
}
}
}
else
{
if ((regno == -1) || IS_GP_REGNUM (regno))
{
gdb_i386_thread_state_t gp_regs;
kern_return_t ret;
i386_macosx_store_gp_registers (&gp_regs);
ret = thread_set_state (current_thread, GDB_i386_THREAD_STATE,
(thread_state_t) & gp_regs,
GDB_i386_THREAD_STATE_COUNT);
MACH_CHECK_ERROR (ret);
}
if ((regno == -1)
|| IS_FP_REGNUM (regno)
|| i386_sse_regnum_p (current_gdbarch, regno)
|| i386_mxcsr_regnum_p (current_gdbarch, regno))
{
gdb_i386_float_state_t fp_regs;
kern_return_t ret;
if (i386_macosx_store_fp_registers (&fp_regs))
{
ret = thread_set_state (current_thread, GDB_i386_FLOAT_STATE,
(thread_state_t) & fp_regs,
GDB_i386_FLOAT_STATE_COUNT);
MACH_CHECK_ERROR (ret);
}
}
}
}