#include "defs.h"
#include "arch-utils.h"
#include "frame.h"
#include "gdbcore.h"
#include "regcache.h"
#include "regset.h"
#include "symtab.h"
#include "objfiles.h"
#include "osabi.h"
#include "target.h"
#include "gdb_assert.h"
#include "gdb_string.h"
#include "i386-tdep.h"
#include "i387-tdep.h"
#include "solib-svr4.h"
#include "bsd-uthread.h"
static const int i386obsd_page_size = 4096;
static const int i386obsd_sigreturn_offset[] = {
0x0a,
0x14,
0x3a,
-1
};
static int
i386obsd_sigtramp_p (struct frame_info *next_frame)
{
CORE_ADDR pc = frame_pc_unwind (next_frame);
CORE_ADDR start_pc = (pc & ~(i386obsd_page_size - 1));
const gdb_byte sigreturn[] =
{
0xb8,
0x67, 0x00, 0x00, 0x00,
0xcd, 0x80
};
size_t buflen = sizeof sigreturn;
const int *offset;
gdb_byte *buf;
char *name;
find_pc_partial_function (pc, &name, NULL, NULL);
if (name != NULL)
return 0;
if (find_pc_section (pc) != NULL)
return 0;
buf = alloca (buflen);
for (offset = i386obsd_sigreturn_offset; *offset != -1; offset++)
{
if (!safe_frame_unwind_memory (next_frame, start_pc + *offset,
buf, buflen))
return 0;
if (memcmp (buf, sigreturn, buflen) == 0)
return 1;
}
return 0;
}
static int i386obsd_r_reg_offset[] =
{
0 * 4,
1 * 4,
2 * 4,
3 * 4,
4 * 4,
5 * 4,
6 * 4,
7 * 4,
8 * 4,
9 * 4,
10 * 4,
11 * 4,
12 * 4,
13 * 4,
14 * 4,
15 * 4
};
static void
i386obsd_aout_supply_regset (const struct regset *regset,
struct regcache *regcache, int regnum,
const void *regs, size_t len)
{
const struct gdbarch_tdep *tdep = gdbarch_tdep (regset->arch);
const gdb_byte *gregs = regs;
gdb_assert (len >= tdep->sizeof_gregset + I387_SIZEOF_FSAVE);
i386_supply_gregset (regset, regcache, regnum, regs, tdep->sizeof_gregset);
i387_supply_fsave (regcache, regnum, gregs + tdep->sizeof_gregset);
}
static const struct regset *
i386obsd_aout_regset_from_core_section (struct gdbarch *gdbarch,
const char *sect_name,
size_t sect_size)
{
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
if (strcmp (sect_name, ".reg") == 0
&& sect_size >= tdep->sizeof_gregset + I387_SIZEOF_FSAVE)
{
if (tdep->gregset == NULL)
tdep->gregset =
regset_alloc (gdbarch, i386obsd_aout_supply_regset, NULL);
return tdep->gregset;
}
return NULL;
}
CORE_ADDR i386obsd_sigtramp_start_addr = 0xbfbfdf20;
CORE_ADDR i386obsd_sigtramp_end_addr = 0xbfbfdff0;
int i386obsd_sc_reg_offset[I386_NUM_GREGS] =
{
10 * 4,
9 * 4,
8 * 4,
7 * 4,
14 * 4,
6 * 4,
5 * 4,
4 * 4,
11 * 4,
13 * 4,
12 * 4,
15 * 4,
3 * 4,
2 * 4,
1 * 4,
0 * 4
};
static int i386obsd_uthread_reg_offset[] =
{
11 * 4,
10 * 4,
9 * 4,
8 * 4,
-1,
6 * 4,
5 * 4,
4 * 4,
12 * 4,
-1,
13 * 4,
-1,
3 * 4,
2 * 4,
1 * 4,
0 * 4
};
#define I386OBSD_UTHREAD_ESP_OFFSET 176
static void
i386obsd_supply_uthread (struct regcache *regcache,
int regnum, CORE_ADDR addr)
{
CORE_ADDR sp_addr = addr + I386OBSD_UTHREAD_ESP_OFFSET;
CORE_ADDR sp = 0;
gdb_byte buf[4];
int i;
gdb_assert (regnum >= -1);
if (regnum == -1 || regnum == I386_ESP_REGNUM)
{
int offset;
sp = read_memory_unsigned_integer (sp_addr, 4);
offset = i386obsd_uthread_reg_offset[I386_EIP_REGNUM] + 4;
store_unsigned_integer (buf, 4, sp + offset);
regcache_raw_supply (regcache, I386_ESP_REGNUM, buf);
}
for (i = 0; i < ARRAY_SIZE (i386obsd_uthread_reg_offset); i++)
{
if (i386obsd_uthread_reg_offset[i] != -1
&& (regnum == -1 || regnum == i))
{
if (sp == 0)
sp = read_memory_unsigned_integer (sp_addr, 4);
read_memory (sp + i386obsd_uthread_reg_offset[i], buf, 4);
regcache_raw_supply (regcache, i, buf);
}
}
}
static void
i386obsd_collect_uthread (const struct regcache *regcache,
int regnum, CORE_ADDR addr)
{
CORE_ADDR sp_addr = addr + I386OBSD_UTHREAD_ESP_OFFSET;
CORE_ADDR sp = 0;
gdb_byte buf[4];
int i;
gdb_assert (regnum >= -1);
if (regnum == -1 || regnum == I386_ESP_REGNUM)
{
int offset;
offset = i386obsd_uthread_reg_offset[I386_EIP_REGNUM] + 4;
regcache_raw_collect (regcache, I386_ESP_REGNUM, buf);
sp = extract_unsigned_integer (buf, 4) - offset;
write_memory_unsigned_integer (sp_addr, 4, sp);
regnum = -1;
}
for (i = 0; i < ARRAY_SIZE (i386obsd_uthread_reg_offset); i++)
{
if (i386obsd_uthread_reg_offset[i] != -1
&& (regnum == -1 || regnum == i))
{
if (sp == 0)
sp = read_memory_unsigned_integer (sp_addr, 4);
regcache_raw_collect (regcache, i, buf);
write_memory (sp + i386obsd_uthread_reg_offset[i], buf, 4);
}
}
}
static void
i386obsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
{
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
i386bsd_init_abi (info, gdbarch);
tdep->gregset_reg_offset = i386obsd_r_reg_offset;
tdep->gregset_num_regs = ARRAY_SIZE (i386obsd_r_reg_offset);
tdep->sizeof_gregset = 16 * 4;
tdep->struct_return = reg_struct_return;
tdep->sigtramp_start = i386obsd_sigtramp_start_addr;
tdep->sigtramp_end = i386obsd_sigtramp_end_addr;
tdep->sigtramp_p = i386obsd_sigtramp_p;
tdep->sc_reg_offset = i386obsd_sc_reg_offset;
tdep->sc_num_regs = ARRAY_SIZE (i386obsd_sc_reg_offset);
bsd_uthread_set_supply_uthread (gdbarch, i386obsd_supply_uthread);
bsd_uthread_set_collect_uthread (gdbarch, i386obsd_collect_uthread);
}
static void
i386obsd_aout_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
{
i386obsd_init_abi (info, gdbarch);
set_gdbarch_regset_from_core_section
(gdbarch, i386obsd_aout_regset_from_core_section);
}
static void
i386obsd_elf_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
{
struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
i386obsd_init_abi (info, gdbarch);
i386_elf_init_abi (info, gdbarch);
set_solib_svr4_fetch_link_map_offsets
(gdbarch, svr4_ilp32_fetch_link_map_offsets);
}
void _initialize_i386obsd_tdep (void);
void
_initialize_i386obsd_tdep (void)
{
#define GDB_OSABI_OPENBSD_AOUT GDB_OSABI_NETBSD_AOUT
gdbarch_register_osabi (bfd_arch_i386, 0, GDB_OSABI_OPENBSD_AOUT,
i386obsd_aout_init_abi);
gdbarch_register_osabi (bfd_arch_i386, 0, GDB_OSABI_OPENBSD_ELF,
i386obsd_elf_init_abi);
}