old-cross-binutils/gdb/mips64obsd-tdep.c

172 lines
4.8 KiB
C
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

/* Target-dependent code for OpenBSD/mips64.
Copyright (C) 2004-2014 Free Software Foundation, Inc.
This file is part of GDB.
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 3 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program. If not, see <http://www.gnu.org/licenses/>. */
#include "defs.h"
#include "gdbtypes.h"
#include "osabi.h"
#include "regcache.h"
#include "regset.h"
#include "trad-frame.h"
#include "tramp-frame.h"
#include "gdb_assert.h"
#include <string.h>
#include "mips-tdep.h"
#include "solib-svr4.h"
/* The MIPS64 Floating-Point Quad-Precision format is similar to
big-endian IA-64 Quad-Precision format. */
#define floatformats_mips64_quad floatformats_ia64_quad
#define MIPS64OBSD_NUM_REGS 73
/* Core file support. */
/* Supply register REGNUM from the buffer specified by GREGS and LEN
in the general-purpose register set REGSET to register cache
REGCACHE. If REGNUM is -1, do this for all registers in REGSET. */
static void
mips64obsd_supply_gregset (const struct regset *regset,
struct regcache *regcache, int regnum,
const void *gregs, size_t len)
{
const char *regs = gregs;
int i;
for (i = 0; i < MIPS64OBSD_NUM_REGS; i++)
{
if (regnum == i || regnum == -1)
regcache_raw_supply (regcache, i, regs + i * 8);
}
}
/* OpenBSD/mips64 register set. */
static struct regset mips64obsd_gregset =
{
NULL,
mips64obsd_supply_gregset
};
/* Return the appropriate register set for the core section identified
by SECT_NAME and SECT_SIZE. */
static const struct regset *
mips64obsd_regset_from_core_section (struct gdbarch *gdbarch,
const char *sect_name, size_t sect_size)
{
if (strcmp (sect_name, ".reg") == 0 && sect_size >= MIPS64OBSD_NUM_REGS * 8)
return &mips64obsd_gregset;
return NULL;
}
/* Signal trampolines. */
static void
mips64obsd_sigframe_init (const struct tramp_frame *self,
struct frame_info *this_frame,
struct trad_frame_cache *cache,
CORE_ADDR func)
{
struct gdbarch *gdbarch = get_frame_arch (this_frame);
CORE_ADDR sp, sigcontext_addr, addr;
int regnum;
/* We find the appropriate instance of `struct sigcontext' at a
fixed offset in the signal frame. */
sp = get_frame_register_signed (this_frame,
MIPS_SP_REGNUM + gdbarch_num_regs (gdbarch));
sigcontext_addr = sp + 32;
/* PC. */
regnum = mips_regnum (gdbarch)->pc;
trad_frame_set_reg_addr (cache,
regnum + gdbarch_num_regs (gdbarch),
sigcontext_addr + 16);
/* GPRs. */
for (regnum = MIPS_AT_REGNUM, addr = sigcontext_addr + 32;
regnum <= MIPS_RA_REGNUM; regnum++, addr += 8)
trad_frame_set_reg_addr (cache,
regnum + gdbarch_num_regs (gdbarch),
addr);
/* HI and LO. */
regnum = mips_regnum (gdbarch)->lo;
trad_frame_set_reg_addr (cache,
regnum + gdbarch_num_regs (gdbarch),
sigcontext_addr + 280);
regnum = mips_regnum (gdbarch)->hi;
trad_frame_set_reg_addr (cache,
regnum + gdbarch_num_regs (gdbarch),
sigcontext_addr + 288);
/* TODO: Handle the floating-point registers. */
trad_frame_set_id (cache, frame_id_build (sp, func));
}
static const struct tramp_frame mips64obsd_sigframe =
{
SIGTRAMP_FRAME,
MIPS_INSN32_SIZE,
{
{ 0x67a40020, -1 }, /* daddiu a0,sp,32 */
{ 0x24020067, -1 }, /* li v0,103 */
{ 0x0000000c, -1 }, /* syscall */
{ 0x0000000d, -1 }, /* break */
{ TRAMP_SENTINEL_INSN, -1 }
},
mips64obsd_sigframe_init
};
static void
mips64obsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
{
/* OpenBSD/mips64 only supports the n64 ABI, but the braindamaged
way GDB works, forces us to pretend we can handle them all. */
set_gdbarch_regset_from_core_section
(gdbarch, mips64obsd_regset_from_core_section);
tramp_frame_prepend_unwinder (gdbarch, &mips64obsd_sigframe);
set_gdbarch_long_double_bit (gdbarch, 128);
set_gdbarch_long_double_format (gdbarch, floatformats_mips64_quad);
/* OpenBSD/mips64 has SVR4-style shared libraries. */
set_solib_svr4_fetch_link_map_offsets
(gdbarch, svr4_lp64_fetch_link_map_offsets);
}
/* Provide a prototype to silence -Wmissing-prototypes. */
void _initialize_mips64obsd_tdep (void);
void
_initialize_mips64obsd_tdep (void)
{
gdbarch_register_osabi (bfd_arch_mips, 0, GDB_OSABI_OPENBSD_ELF,
mips64obsd_init_abi);
}