--- /dev/null
+/* Target-dependent code for FreeBSD/mips.
+
+ Copyright (C) 2017 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 "osabi.h"
+#include "regset.h"
+#include "trad-frame.h"
+#include "tramp-frame.h"
+
+#include "fbsd-tdep.h"
+#include "mips-tdep.h"
+#include "mips-fbsd-tdep.h"
+
+#include "solib-svr4.h"
+
+/* Shorthand for some register numbers used below. */
+#define MIPS_PC_REGNUM MIPS_EMBED_PC_REGNUM
+#define MIPS_FP0_REGNUM MIPS_EMBED_FP0_REGNUM
+#define MIPS_FSR_REGNUM MIPS_EMBED_FP0_REGNUM + 32
+
+/* Core file support. */
+
+/* Number of registers in `struct reg' from <machine/reg.h>. The
+ first 38 follow the standard MIPS layout. The 39th holds
+ IC_INT_REG on RM7K and RM9K processors. The 40th is a dummy for
+ padding. */
+#define MIPS_FBSD_NUM_GREGS 40
+
+/* Number of registers in `struct fpreg' from <machine/reg.h>. The
+ first 32 hold floating point registers. 33 holds the FSR. The
+ 34th is a dummy for padding. */
+#define MIPS_FBSD_NUM_FPREGS 34
+
+/* Supply a single register. If the source register size matches the
+ size the regcache expects, this can use regcache_raw_supply(). If
+ they are different, this copies the source register into a buffer
+ that can be passed to regcache_raw_supply(). */
+
+static void
+mips_fbsd_supply_reg (struct regcache *regcache, int regnum, const void *addr,
+ size_t len)
+{
+ struct gdbarch *gdbarch = get_regcache_arch (regcache);
+
+ if (register_size (gdbarch, regnum) == len)
+ regcache_raw_supply (regcache, regnum, addr);
+ else
+ {
+ enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
+ gdb_byte buf[MAX_REGISTER_SIZE];
+ LONGEST val;
+
+ val = extract_signed_integer ((const gdb_byte *) addr, len, byte_order);
+ store_signed_integer (buf, register_size (gdbarch, regnum), byte_order,
+ val);
+ regcache_raw_supply (regcache, regnum, buf);
+ }
+}
+
+/* Collect a single register. If the destination register size
+ matches the size the regcache expects, this can use
+ regcache_raw_supply(). If they are different, this fetches the
+ register via regcache_raw_supply() into a buffer and then copies it
+ into the final destination. */
+
+static void
+mips_fbsd_collect_reg (const struct regcache *regcache, int regnum, void *addr,
+ size_t len)
+{
+ struct gdbarch *gdbarch = get_regcache_arch (regcache);
+
+ if (register_size (gdbarch, regnum) == len)
+ regcache_raw_collect (regcache, regnum, addr);
+ else
+ {
+ enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
+ gdb_byte buf[MAX_REGISTER_SIZE];
+ LONGEST val;
+
+ regcache_raw_collect (regcache, regnum, buf);
+ val = extract_signed_integer (buf, register_size (gdbarch, regnum),
+ byte_order);
+ store_signed_integer ((gdb_byte *) addr, len, byte_order, val);
+ }
+}
+
+/* Supply the floating-point registers stored in FPREGS to REGCACHE.
+ Each floating-point register in FPREGS is REGSIZE bytes in
+ length. */
+
+void
+mips_fbsd_supply_fpregs (struct regcache *regcache, int regnum,
+ const void *fpregs, size_t regsize)
+{
+ const gdb_byte *regs = (const gdb_byte *) fpregs;
+ int i;
+
+ for (i = MIPS_FP0_REGNUM; i <= MIPS_FSR_REGNUM; i++)
+ if (regnum == i || regnum == -1)
+ mips_fbsd_supply_reg (regcache, i,
+ regs + (i - MIPS_FP0_REGNUM) * regsize, regsize);
+}
+
+/* Supply the general-purpose registers stored in GREGS to REGCACHE.
+ Each general-purpose register in GREGS is REGSIZE bytes in
+ length. */
+
+void
+mips_fbsd_supply_gregs (struct regcache *regcache, int regnum,
+ const void *gregs, size_t regsize)
+{
+ const gdb_byte *regs = (const gdb_byte *) gregs;
+ int i;
+
+ for (i = 0; i <= MIPS_PC_REGNUM; i++)
+ if (regnum == i || regnum == -1)
+ mips_fbsd_supply_reg (regcache, i, regs + i * regsize, regsize);
+}
+
+/* Collect the floating-point registers from REGCACHE and store them
+ in FPREGS. Each floating-point register in FPREGS is REGSIZE bytes
+ in length. */
+
+void
+mips_fbsd_collect_fpregs (const struct regcache *regcache, int regnum,
+ void *fpregs, size_t regsize)
+{
+ gdb_byte *regs = (gdb_byte *) fpregs;
+ int i;
+
+ for (i = MIPS_FP0_REGNUM; i <= MIPS_FSR_REGNUM; i++)
+ if (regnum == i || regnum == -1)
+ mips_fbsd_collect_reg (regcache, i,
+ regs + (i - MIPS_FP0_REGNUM) * regsize, regsize);
+}
+
+/* Collect the general-purpose registers from REGCACHE and store them
+ in GREGS. Each general-purpose register in GREGS is REGSIZE bytes
+ in length. */
+
+void
+mips_fbsd_collect_gregs (const struct regcache *regcache, int regnum,
+ void *gregs, size_t regsize)
+{
+ gdb_byte *regs = (gdb_byte *) gregs;
+ int i;
+
+ for (i = 0; i <= MIPS_PC_REGNUM; i++)
+ if (regnum == i || regnum == -1)
+ mips_fbsd_collect_reg (regcache, i, regs + i * regsize, regsize);
+}
+
+/* Supply register REGNUM from the buffer specified by FPREGS and LEN
+ in the floating-point register set REGSET to register cache
+ REGCACHE. If REGNUM is -1, do this for all registers in REGSET. */
+
+static void
+mips_fbsd_supply_fpregset (const struct regset *regset,
+ struct regcache *regcache,
+ int regnum, const void *fpregs, size_t len)
+{
+ size_t regsize = mips_abi_regsize (get_regcache_arch (regcache));
+
+ gdb_assert (len >= MIPS_FBSD_NUM_FPREGS * regsize);
+
+ mips_fbsd_supply_fpregs (regcache, regnum, fpregs, regsize);
+}
+
+/* Collect register REGNUM from the register cache REGCACHE and store
+ it in the buffer specified by FPREGS and LEN in the floating-point
+ register set REGSET. If REGNUM is -1, do this for all registers in
+ REGSET. */
+
+static void
+mips_fbsd_collect_fpregset (const struct regset *regset,
+ const struct regcache *regcache,
+ int regnum, void *fpregs, size_t len)
+{
+ size_t regsize = mips_abi_regsize (get_regcache_arch (regcache));
+
+ gdb_assert (len >= MIPS_FBSD_NUM_FPREGS * regsize);
+
+ mips_fbsd_collect_fpregs (regcache, regnum, fpregs, regsize);
+}
+
+/* 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
+mips_fbsd_supply_gregset (const struct regset *regset,
+ struct regcache *regcache, int regnum,
+ const void *gregs, size_t len)
+{
+ size_t regsize = mips_abi_regsize (get_regcache_arch (regcache));
+
+ gdb_assert (len >= MIPS_FBSD_NUM_GREGS * regsize);
+
+ mips_fbsd_supply_gregs (regcache, regnum, gregs, regsize);
+}
+
+/* Collect register REGNUM from the register cache REGCACHE and store
+ it in the buffer specified by GREGS and LEN in the general-purpose
+ register set REGSET. If REGNUM is -1, do this for all registers in
+ REGSET. */
+
+static void
+mips_fbsd_collect_gregset (const struct regset *regset,
+ const struct regcache *regcache,
+ int regnum, void *gregs, size_t len)
+{
+ size_t regsize = mips_abi_regsize (get_regcache_arch (regcache));
+
+ gdb_assert (len >= MIPS_FBSD_NUM_GREGS * regsize);
+
+ mips_fbsd_collect_gregs (regcache, regnum, gregs, regsize);
+}
+
+/* FreeBSD/mips register sets. */
+
+static const struct regset mips_fbsd_gregset =
+{
+ NULL,
+ mips_fbsd_supply_gregset,
+ mips_fbsd_collect_gregset,
+};
+
+static const struct regset mips_fbsd_fpregset =
+{
+ NULL,
+ mips_fbsd_supply_fpregset,
+ mips_fbsd_collect_fpregset,
+};
+
+/* Iterate over core file register note sections. */
+
+static void
+mips_fbsd_iterate_over_regset_sections (struct gdbarch *gdbarch,
+ iterate_over_regset_sections_cb *cb,
+ void *cb_data,
+ const struct regcache *regcache)
+{
+ size_t regsize = mips_abi_regsize (gdbarch);
+
+ cb (".reg", MIPS_FBSD_NUM_GREGS * regsize, &mips_fbsd_gregset,
+ NULL, cb_data);
+ cb (".reg2", MIPS_FBSD_NUM_FPREGS * regsize, &mips_fbsd_fpregset,
+ NULL, cb_data);
+}
+
+/* Signal trampoline support. */
+
+#define FBSD_SYS_sigreturn 417
+
+#define MIPS_INST_LI_V0_SIGRETURN 0x24020000 + FBSD_SYS_sigreturn
+#define MIPS_INST_SYSCALL 0x0000000c
+#define MIPS_INST_BREAK 0x0000000d
+
+#define O32_SIGFRAME_UCONTEXT_OFFSET (16)
+#define O32_SIGSET_T_SIZE (16)
+
+#define O32_UCONTEXT_ONSTACK (O32_SIGSET_T_SIZE)
+#define O32_UCONTEXT_PC (O32_UCONTEXT_ONSTACK + 4)
+#define O32_UCONTEXT_REGS (O32_UCONTEXT_PC + 4)
+#define O32_UCONTEXT_SR (O32_UCONTEXT_REGS + 4 * 32)
+#define O32_UCONTEXT_LO (O32_UCONTEXT_SR + 4)
+#define O32_UCONTEXT_HI (O32_UCONTEXT_LO + 4)
+#define O32_UCONTEXT_FPUSED (O32_UCONTEXT_HI + 4)
+#define O32_UCONTEXT_FPREGS (O32_UCONTEXT_FPUSED + 4)
+
+#define O32_UCONTEXT_REG_SIZE 4
+
+static void
+mips_fbsd_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);
+ enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
+ CORE_ADDR sp, ucontext_addr, addr;
+ int regnum;
+ gdb_byte buf[4];
+
+ /* We find the appropriate instance of `ucontext_t' at a
+ fixed offset in the signal frame. */
+ sp = get_frame_register_signed (this_frame,
+ MIPS_SP_REGNUM + gdbarch_num_regs (gdbarch));
+ ucontext_addr = sp + O32_SIGFRAME_UCONTEXT_OFFSET;
+
+ /* PC. */
+ regnum = mips_regnum (gdbarch)->pc;
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ ucontext_addr + O32_UCONTEXT_PC);
+
+ /* GPRs. */
+ for (regnum = MIPS_ZERO_REGNUM, addr = ucontext_addr + O32_UCONTEXT_REGS;
+ regnum <= MIPS_RA_REGNUM; regnum++, addr += O32_UCONTEXT_REG_SIZE)
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ addr);
+
+ regnum = MIPS_PS_REGNUM;
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ ucontext_addr + O32_UCONTEXT_SR);
+
+ /* HI and LO. */
+ regnum = mips_regnum (gdbarch)->lo;
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ ucontext_addr + O32_UCONTEXT_LO);
+ regnum = mips_regnum (gdbarch)->hi;
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ ucontext_addr + O32_UCONTEXT_HI);
+
+ if (target_read_memory (ucontext_addr + O32_UCONTEXT_FPUSED, buf, 4) == 0 &&
+ extract_unsigned_integer (buf, 4, byte_order) != 0)
+ {
+ for (regnum = 0, addr = ucontext_addr + O32_UCONTEXT_FPREGS;
+ regnum < 32; regnum++, addr += O32_UCONTEXT_REG_SIZE)
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_fp0_regnum (gdbarch),
+ addr);
+ trad_frame_set_reg_addr (cache, mips_regnum (gdbarch)->fp_control_status,
+ addr);
+ }
+
+ trad_frame_set_id (cache, frame_id_build (sp, func));
+}
+
+#define MIPS_INST_ADDIU_A0_SP_O32 (0x27a40000 \
+ + O32_SIGFRAME_UCONTEXT_OFFSET)
+
+static const struct tramp_frame mips_fbsd_sigframe =
+{
+ SIGTRAMP_FRAME,
+ MIPS_INSN32_SIZE,
+ {
+ { MIPS_INST_ADDIU_A0_SP_O32, -1 }, /* addiu a0, sp, SIGF_UC */
+ { MIPS_INST_LI_V0_SIGRETURN, -1 }, /* li v0, SYS_sigreturn */
+ { MIPS_INST_SYSCALL, -1 }, /* syscall */
+ { MIPS_INST_BREAK, -1 }, /* break */
+ { TRAMP_SENTINEL_INSN, -1 }
+ },
+ mips_fbsd_sigframe_init
+};
+
+#define N64_SIGFRAME_UCONTEXT_OFFSET (32)
+#define N64_SIGSET_T_SIZE (16)
+
+#define N64_UCONTEXT_ONSTACK (N64_SIGSET_T_SIZE)
+#define N64_UCONTEXT_PC (N64_UCONTEXT_ONSTACK + 8)
+#define N64_UCONTEXT_REGS (N64_UCONTEXT_PC + 8)
+#define N64_UCONTEXT_SR (N64_UCONTEXT_REGS + 8 * 32)
+#define N64_UCONTEXT_LO (N64_UCONTEXT_SR + 8)
+#define N64_UCONTEXT_HI (N64_UCONTEXT_LO + 8)
+#define N64_UCONTEXT_FPUSED (N64_UCONTEXT_HI + 8)
+#define N64_UCONTEXT_FPREGS (N64_UCONTEXT_FPUSED + 8)
+
+#define N64_UCONTEXT_REG_SIZE 8
+
+static void
+mips64_fbsd_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);
+ enum bfd_endian byte_order = gdbarch_byte_order (gdbarch);
+ CORE_ADDR sp, ucontext_addr, addr;
+ int regnum;
+ gdb_byte buf[4];
+
+ /* We find the appropriate instance of `ucontext_t' at a
+ fixed offset in the signal frame. */
+ sp = get_frame_register_signed (this_frame,
+ MIPS_SP_REGNUM + gdbarch_num_regs (gdbarch));
+ ucontext_addr = sp + N64_SIGFRAME_UCONTEXT_OFFSET;
+
+ /* PC. */
+ regnum = mips_regnum (gdbarch)->pc;
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ ucontext_addr + N64_UCONTEXT_PC);
+
+ /* GPRs. */
+ for (regnum = MIPS_ZERO_REGNUM, addr = ucontext_addr + N64_UCONTEXT_REGS;
+ regnum <= MIPS_RA_REGNUM; regnum++, addr += N64_UCONTEXT_REG_SIZE)
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ addr);
+
+ regnum = MIPS_PS_REGNUM;
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ ucontext_addr + N64_UCONTEXT_SR);
+
+ /* HI and LO. */
+ regnum = mips_regnum (gdbarch)->lo;
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ ucontext_addr + N64_UCONTEXT_LO);
+ regnum = mips_regnum (gdbarch)->hi;
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_num_regs (gdbarch),
+ ucontext_addr + N64_UCONTEXT_HI);
+
+ if (target_read_memory (ucontext_addr + N64_UCONTEXT_FPUSED, buf, 4) == 0 &&
+ extract_unsigned_integer (buf, 4, byte_order) != 0)
+ {
+ for (regnum = 0, addr = ucontext_addr + N64_UCONTEXT_FPREGS;
+ regnum < 32; regnum++, addr += N64_UCONTEXT_REG_SIZE)
+ trad_frame_set_reg_addr (cache,
+ regnum + gdbarch_fp0_regnum (gdbarch),
+ addr);
+ trad_frame_set_reg_addr (cache, mips_regnum (gdbarch)->fp_control_status,
+ addr);
+ }
+
+ trad_frame_set_id (cache, frame_id_build (sp, func));
+}
+
+#define MIPS_INST_DADDIU_A0_SP_N64 (0x67a40000 \
+ + N64_SIGFRAME_UCONTEXT_OFFSET)
+
+static const struct tramp_frame mips64_fbsd_sigframe =
+{
+ SIGTRAMP_FRAME,
+ MIPS_INSN32_SIZE,
+ {
+ { MIPS_INST_DADDIU_A0_SP_N64, -1 }, /* daddiu a0, sp, SIGF_UC */
+ { MIPS_INST_LI_V0_SIGRETURN, -1 }, /* li v0, SYS_sigreturn */
+ { MIPS_INST_SYSCALL, -1 }, /* syscall */
+ { MIPS_INST_BREAK, -1 }, /* break */
+ { TRAMP_SENTINEL_INSN, -1 }
+ },
+ mips64_fbsd_sigframe_init
+};
+
+/* Shared library support. */
+
+/* FreeBSD/mips uses a slightly different `struct link_map' than the
+ other FreeBSD platforms as it includes an additional `l_off'
+ member. */
+
+static struct link_map_offsets *
+mips_fbsd_ilp32_fetch_link_map_offsets (void)
+{
+ static struct link_map_offsets lmo;
+ static struct link_map_offsets *lmp = NULL;
+
+ if (lmp == NULL)
+ {
+ lmp = &lmo;
+
+ lmo.r_version_offset = 0;
+ lmo.r_version_size = 4;
+ lmo.r_map_offset = 4;
+ lmo.r_brk_offset = 8;
+ lmo.r_ldsomap_offset = -1;
+
+ lmo.link_map_size = 24;
+ lmo.l_addr_offset = 0;
+ lmo.l_name_offset = 8;
+ lmo.l_ld_offset = 12;
+ lmo.l_next_offset = 16;
+ lmo.l_prev_offset = 20;
+ }
+
+ return lmp;
+}
+
+static struct link_map_offsets *
+mips_fbsd_lp64_fetch_link_map_offsets (void)
+{
+ static struct link_map_offsets lmo;
+ static struct link_map_offsets *lmp = NULL;
+
+ if (lmp == NULL)
+ {
+ lmp = &lmo;
+
+ lmo.r_version_offset = 0;
+ lmo.r_version_size = 4;
+ lmo.r_map_offset = 8;
+ lmo.r_brk_offset = 16;
+ lmo.r_ldsomap_offset = -1;
+
+ lmo.link_map_size = 48;
+ lmo.l_addr_offset = 0;
+ lmo.l_name_offset = 16;
+ lmo.l_ld_offset = 24;
+ lmo.l_next_offset = 32;
+ lmo.l_prev_offset = 40;
+ }
+
+ return lmp;
+}
+
+static void
+mips_fbsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
+{
+ enum mips_abi abi = mips_abi (gdbarch);
+
+ /* Generic FreeBSD support. */
+ fbsd_init_abi (info, gdbarch);
+
+ set_gdbarch_software_single_step (gdbarch, mips_software_single_step);
+
+ switch (abi)
+ {
+ case MIPS_ABI_O32:
+ tramp_frame_prepend_unwinder (gdbarch, &mips_fbsd_sigframe);
+ break;
+ case MIPS_ABI_N32:
+ break;
+ case MIPS_ABI_N64:
+ tramp_frame_prepend_unwinder (gdbarch, &mips64_fbsd_sigframe);
+ break;
+ }
+
+ set_gdbarch_iterate_over_regset_sections
+ (gdbarch, mips_fbsd_iterate_over_regset_sections);
+
+ /* FreeBSD/mips has SVR4-style shared libraries. */
+ set_solib_svr4_fetch_link_map_offsets
+ (gdbarch, (gdbarch_ptr_bit (gdbarch) == 32 ?
+ mips_fbsd_ilp32_fetch_link_map_offsets :
+ mips_fbsd_lp64_fetch_link_map_offsets));
+}
+\f
+
+/* Provide a prototype to silence -Wmissing-prototypes. */
+void _initialize_mips_fbsd_tdep (void);
+
+void
+_initialize_mips_fbsd_tdep (void)
+{
+ gdbarch_register_osabi (bfd_arch_mips, 0, GDB_OSABI_FREEBSD_ELF,
+ mips_fbsd_init_abi);
+}
projects / binutils-gdb.git / commitdiff