[deliverable/binutils-gdb.git] / gdb / hppanbsd-tdep.c

/* Target-dependent code for NetBSD/hppa

   Copyright (C) 2008-2015 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 "regcache.h"
#include "regset.h"

#include "trad-frame.h"
#include "tramp-frame.h"

#include "hppa-tdep.h"
#include "hppabsd-tdep.h"

/* From <machine/mcontext.h>.  */
static int hppanbsd_mc_reg_offset[] =
{
  /* r0 ... r31 */
      -1,   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,
  16 * 4,  17 * 4,  18 * 4,  19 * 4,
  20 * 4,  21 * 4,  22 * 4,  23 * 4,
  24 * 4,  25 * 4,  26 * 4,  27 * 4,
  28 * 4,  29 * 4,  30 * 4,  31 * 4,

  32 * 4,	/* HPPA_SAR_REGNUM */
  35 * 4,	/* HPPA_PCOQ_HEAD_REGNUM */
  33 * 4,	/* HPPA_PCSQ_HEAD_REGNUM */
  36 * 4,	/* HPPA_PCOQ_TAIL_REGNUM */
  34 * 4,	/* HPPA_PCSQ_TAIL_REGNUM */
  -1,		/* HPPA_EIEM_REGNUM */
  -1,		/* HPPA_IIR_REGNUM */
  -1,		/* HPPA_ISR_REGNUM */
  -1,		/* HPPA_IOR_REGNUM */
  0 * 4,	/* HPPA_IPSW_REGNUM */
  -1,		/* spare? */
  41 * 4,	/* HPPA_SR4_REGNUM */
  37 * 4,	/* sr0 */
  38 * 4,	/* sr1 */
  39 * 4,	/* sr2 */
  40 * 4,	/* sr3 */

  /* more tbd */
};

static void hppanbsd_sigtramp_cache_init (const struct tramp_frame *,
                                         struct frame_info *,
                                         struct trad_frame_cache *,
                                         CORE_ADDR);

static const struct tramp_frame hppanbsd_sigtramp_si4 =
{
  SIGTRAMP_FRAME,
  4,
  {
    { 0xc7d7c012, -1 },	/*	bb,>=,n %arg3, 30, 1f		*/
    { 0xd6e01c1e, -1 },	/*	 depwi 0,31,2,%arg3		*/
    { 0x0ee81093, -1 },	/*	ldw 4(%arg3), %r19		*/
    { 0x0ee01097, -1 },	/*	ldw 0(%arg3), %arg3		*/
			/* 1: 					*/
    { 0xe8404000, -1 },	/* 	blr %r0, %rp			*/
    { 0xeae0c002, -1 },	/*	bv,n %r0(%arg3)			*/
    { 0x08000240, -1 },	/*	 nop				*/

    { 0x0803025a, -1 },	/*	copy %r3, %arg0			*/
    { 0x20200801, -1 },	/*	ldil -40000000, %r1		*/
    { 0xe420e008, -1 },	/*	be,l 4(%sr7, %r1), %sr0, %r31	*/
    { 0x34160268, -1 },	/*	 ldi 134, %t1 ; SYS_setcontext	*/

    { 0x081c025a, -1 },	/*	copy ret0, %arg0		*/
    { 0x20200801, -1 },	/*	ldil -40000000, %r1		*/
    { 0xe420e008, -1 },	/*	be,l 4(%sr7, %r1), %sr0, %r31	*/
    { 0x34160002, -1 },	/*	 ldi 1, %t1 ; SYS_exit		*/
    { TRAMP_SENTINEL_INSN, -1 }
  },
  hppanbsd_sigtramp_cache_init
};


static void
hppanbsd_sigtramp_cache_init (const struct tramp_frame *self,
                             struct frame_info *this_frame,
                             struct trad_frame_cache *this_cache,
                             CORE_ADDR func)
{
  struct gdbarch *gdbarch = get_frame_arch (this_frame);
  struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
  CORE_ADDR sp = get_frame_register_unsigned (this_frame, HPPA_SP_REGNUM);
  CORE_ADDR base;
  int *reg_offset;
  int num_regs;
  int i;

  reg_offset = hppanbsd_mc_reg_offset;
  num_regs = ARRAY_SIZE (hppanbsd_mc_reg_offset);

  /* frame pointer */
  base = sp - 0x280;
  /* offsetof(struct sigframe_siginfo, sf_uc) = 128 */
  base += 128;
  /* offsetof(ucontext_t, uc_mcontext) == 40 */
  base += 40;

  for (i = 0; i < num_regs; i++)
    if (reg_offset[i] != -1)
      trad_frame_set_reg_addr (this_cache, i, base + reg_offset[i]);

  /* Construct the frame ID using the function start.  */
  trad_frame_set_id (this_cache, frame_id_build (sp, func));
}

/* Core file support.  */

/* Sizeof `struct reg' in <machine/reg.h>.  */
#define HPPANBSD_SIZEOF_GREGS	(44 * 4)

static int hppanbsd_reg_offset[] =
{
  /* r0 ... r31 */
      -1,   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,
  16 * 4,  17 * 4,  18 * 4,  19 * 4,
  20 * 4,  21 * 4,  22 * 4,  23 * 4,
  24 * 4,  25 * 4,  26 * 4,  27 * 4,
  28 * 4,  29 * 4,  30 * 4,  31 * 4,

  32 * 4,	/* HPPA_SAR_REGNUM */
  35 * 4,	/* HPPA_PCOQ_HEAD_REGNUM */
  33 * 4,	/* HPPA_PCSQ_HEAD_REGNUM */
  36 * 4,	/* HPPA_PCOQ_TAIL_REGNUM */
  34 * 4,	/* HPPA_PCSQ_TAIL_REGNUM */
  -1,		/* HPPA_EIEM_REGNUM */
  -1,		/* HPPA_IIR_REGNUM */
  -1,		/* HPPA_ISR_REGNUM */
  -1,		/* HPPA_IOR_REGNUM */
  0 * 4,	/* HPPA_IPSW_REGNUM */
};

/* 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
hppanbsd_supply_gregset (const struct regset *regset,
			 struct regcache *regcache,
			 int regnum, const void *gregs, size_t len)
{
  const gdb_byte *regs = gregs;
  int i;

  gdb_assert (len >= HPPANBSD_SIZEOF_GREGS);

  for (i = 0; i < ARRAY_SIZE (hppanbsd_reg_offset); i++)
    if (hppanbsd_reg_offset[i] != -1)
      if (regnum == -1 || regnum == i)
	regcache_raw_supply (regcache, i, regs + hppanbsd_reg_offset[i]);
}

/* NetBSD/hppa register set.  */

static const struct regset hppanbsd_gregset =
{
  NULL,
  hppanbsd_supply_gregset
};

/* Iterate over supported core file register note sections. */

static void
hppanbsd_iterate_over_regset_sections (struct gdbarch *gdbarch,
				       iterate_over_regset_sections_cb *cb,
				       void *cb_data,
				       const struct regcache *regcache)
{
  cb (".reg", HPPANBSD_SIZEOF_GREGS, &hppanbsd_gregset, NULL, cb_data);
}
\f
static void
hppanbsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
{
  /* Obviously NetBSD is BSD-based.  */
  hppabsd_init_abi (info, gdbarch);

  /* Core file support.  */
  set_gdbarch_iterate_over_regset_sections
    (gdbarch, hppanbsd_iterate_over_regset_sections);

  tramp_frame_prepend_unwinder (gdbarch, &hppanbsd_sigtramp_si4);
}
\f

/* Provide a prototype to silence -Wmissing-prototypes.  */
extern initialize_file_ftype _initialize_hppanbsd_tdep;

void
_initialize_hppanbsd_tdep (void)
{
  gdbarch_register_osabi (bfd_arch_hppa, 0, GDB_OSABI_NETBSD_ELF,
			  hppanbsd_init_abi);
}
Commit	Line	Data
	1	/* Target-dependent code for NetBSD/hppa
	2
	3	Copyright (C) 2008-2015 Free Software Foundation, Inc.
	4
	5	This file is part of GDB.
	6
	7	This program is free software; you can redistribute it and/or modify
	8	it under the terms of the GNU General Public License as published by
	9	the Free Software Foundation; either version 3 of the License, or
	10	(at your option) any later version.
	11
	12	This program is distributed in the hope that it will be useful,
	13	but WITHOUT ANY WARRANTY; without even the implied warranty of
	14	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
	15	GNU General Public License for more details.
	16
	17	You should have received a copy of the GNU General Public License
	18	along with this program. If not, see <http://www.gnu.org/licenses/>. */
	19
	20	#include "defs.h"
	21	#include "osabi.h"
	22	#include "regcache.h"
	23	#include "regset.h"
	24
	25	#include "trad-frame.h"
	26	#include "tramp-frame.h"
	27
	28	#include "hppa-tdep.h"
	29	#include "hppabsd-tdep.h"
	30
	31	/* From <machine/mcontext.h>. */
	32	static int hppanbsd_mc_reg_offset[] =
	33	{
	34	/* r0 ... r31 */
	35	-1, 1 * 4, 2 * 4, 3 * 4,
	36	4 * 4, 5 * 4, 6 * 4, 7 * 4,
	37	8 * 4, 9 * 4, 10 * 4, 11 * 4,
	38	12 * 4, 13 * 4, 14 * 4, 15 * 4,
	39	16 * 4, 17 * 4, 18 * 4, 19 * 4,
	40	20 * 4, 21 * 4, 22 * 4, 23 * 4,
	41	24 * 4, 25 * 4, 26 * 4, 27 * 4,
	42	28 * 4, 29 * 4, 30 * 4, 31 * 4,
	43
	44	32 * 4, /* HPPA_SAR_REGNUM */
	45	35 * 4, /* HPPA_PCOQ_HEAD_REGNUM */
	46	33 * 4, /* HPPA_PCSQ_HEAD_REGNUM */
	47	36 * 4, /* HPPA_PCOQ_TAIL_REGNUM */
	48	34 * 4, /* HPPA_PCSQ_TAIL_REGNUM */
	49	-1, /* HPPA_EIEM_REGNUM */
	50	-1, /* HPPA_IIR_REGNUM */
	51	-1, /* HPPA_ISR_REGNUM */
	52	-1, /* HPPA_IOR_REGNUM */
	53	0 * 4, /* HPPA_IPSW_REGNUM */
	54	-1, /* spare? */
	55	41 * 4, /* HPPA_SR4_REGNUM */
	56	37 * 4, /* sr0 */
	57	38 * 4, /* sr1 */
	58	39 * 4, /* sr2 */
	59	40 * 4, /* sr3 */
	60
	61	/* more tbd */
	62	};
	63
	64	static void hppanbsd_sigtramp_cache_init (const struct tramp_frame *,
	65	struct frame_info *,
	66	struct trad_frame_cache *,
	67	CORE_ADDR);
	68
	69	static const struct tramp_frame hppanbsd_sigtramp_si4 =
	70	{
	71	SIGTRAMP_FRAME,
	72	4,
	73	{
	74	{ 0xc7d7c012, -1 }, /* bb,>=,n %arg3, 30, 1f */
	75	{ 0xd6e01c1e, -1 }, /* depwi 0,31,2,%arg3 */
	76	{ 0x0ee81093, -1 }, /* ldw 4(%arg3), %r19 */
	77	{ 0x0ee01097, -1 }, /* ldw 0(%arg3), %arg3 */
	78	/* 1: */
	79	{ 0xe8404000, -1 }, /* blr %r0, %rp */
	80	{ 0xeae0c002, -1 }, /* bv,n %r0(%arg3) */
	81	{ 0x08000240, -1 }, /* nop */
	82
	83	{ 0x0803025a, -1 }, /* copy %r3, %arg0 */
	84	{ 0x20200801, -1 }, /* ldil -40000000, %r1 */
	85	{ 0xe420e008, -1 }, /* be,l 4(%sr7, %r1), %sr0, %r31 */
	86	{ 0x34160268, -1 }, /* ldi 134, %t1 ; SYS_setcontext */
	87
	88	{ 0x081c025a, -1 }, /* copy ret0, %arg0 */
	89	{ 0x20200801, -1 }, /* ldil -40000000, %r1 */
	90	{ 0xe420e008, -1 }, /* be,l 4(%sr7, %r1), %sr0, %r31 */
	91	{ 0x34160002, -1 }, /* ldi 1, %t1 ; SYS_exit */
	92	{ TRAMP_SENTINEL_INSN, -1 }
	93	},
	94	hppanbsd_sigtramp_cache_init
	95	};
	96
	97
	98	static void
	99	hppanbsd_sigtramp_cache_init (const struct tramp_frame *self,
	100	struct frame_info *this_frame,
	101	struct trad_frame_cache *this_cache,
	102	CORE_ADDR func)
	103	{
	104	struct gdbarch *gdbarch = get_frame_arch (this_frame);
	105	struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
	106	CORE_ADDR sp = get_frame_register_unsigned (this_frame, HPPA_SP_REGNUM);
	107	CORE_ADDR base;
	108	int *reg_offset;
	109	int num_regs;
	110	int i;
	111
	112	reg_offset = hppanbsd_mc_reg_offset;
	113	num_regs = ARRAY_SIZE (hppanbsd_mc_reg_offset);
	114
	115	/* frame pointer */
	116	base = sp - 0x280;
	117	/* offsetof(struct sigframe_siginfo, sf_uc) = 128 */
	118	base += 128;
	119	/* offsetof(ucontext_t, uc_mcontext) == 40 */
	120	base += 40;
	121
	122	for (i = 0; i < num_regs; i++)
	123	if (reg_offset[i] != -1)
	124	trad_frame_set_reg_addr (this_cache, i, base + reg_offset[i]);
	125
	126	/* Construct the frame ID using the function start. */
	127	trad_frame_set_id (this_cache, frame_id_build (sp, func));
	128	}
	129
	130	/* Core file support. */
	131
	132	/* Sizeof `struct reg' in <machine/reg.h>. */
	133	#define HPPANBSD_SIZEOF_GREGS (44 * 4)
	134
	135	static int hppanbsd_reg_offset[] =
	136	{
	137	/* r0 ... r31 */
	138	-1, 1 * 4, 2 * 4, 3 * 4,
	139	4 * 4, 5 * 4, 6 * 4, 7 * 4,
	140	8 * 4, 9 * 4, 10 * 4, 11 * 4,
	141	12 * 4, 13 * 4, 14 * 4, 15 * 4,
	142	16 * 4, 17 * 4, 18 * 4, 19 * 4,
	143	20 * 4, 21 * 4, 22 * 4, 23 * 4,
	144	24 * 4, 25 * 4, 26 * 4, 27 * 4,
	145	28 * 4, 29 * 4, 30 * 4, 31 * 4,
	146
	147	32 * 4, /* HPPA_SAR_REGNUM */
	148	35 * 4, /* HPPA_PCOQ_HEAD_REGNUM */
	149	33 * 4, /* HPPA_PCSQ_HEAD_REGNUM */
	150	36 * 4, /* HPPA_PCOQ_TAIL_REGNUM */
	151	34 * 4, /* HPPA_PCSQ_TAIL_REGNUM */
	152	-1, /* HPPA_EIEM_REGNUM */
	153	-1, /* HPPA_IIR_REGNUM */
	154	-1, /* HPPA_ISR_REGNUM */
	155	-1, /* HPPA_IOR_REGNUM */
	156	0 * 4, /* HPPA_IPSW_REGNUM */
	157	};
	158
	159	/* Supply register REGNUM from the buffer specified by GREGS and LEN
	160	in the general-purpose register set REGSET to register cache
	161	REGCACHE. If REGNUM is -1, do this for all registers in REGSET. */
	162
	163	static void
	164	hppanbsd_supply_gregset (const struct regset *regset,
	165	struct regcache *regcache,
	166	int regnum, const void *gregs, size_t len)
	167	{
	168	const gdb_byte *regs = gregs;
	169	int i;
	170
	171	gdb_assert (len >= HPPANBSD_SIZEOF_GREGS);
	172
	173	for (i = 0; i < ARRAY_SIZE (hppanbsd_reg_offset); i++)
	174	if (hppanbsd_reg_offset[i] != -1)
	175	if (regnum == -1 \|\| regnum == i)
	176	regcache_raw_supply (regcache, i, regs + hppanbsd_reg_offset[i]);
	177	}
	178
	179	/* NetBSD/hppa register set. */
	180
	181	static const struct regset hppanbsd_gregset =
	182	{
	183	NULL,
	184	hppanbsd_supply_gregset
	185	};
	186
	187	/* Iterate over supported core file register note sections. */
	188
	189	static void
	190	hppanbsd_iterate_over_regset_sections (struct gdbarch *gdbarch,
	191	iterate_over_regset_sections_cb *cb,
	192	void *cb_data,
	193	const struct regcache *regcache)
	194	{
	195	cb (".reg", HPPANBSD_SIZEOF_GREGS, &hppanbsd_gregset, NULL, cb_data);
	196	}
	197	\f
	198	static void
	199	hppanbsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
	200	{
	201	/* Obviously NetBSD is BSD-based. */
	202	hppabsd_init_abi (info, gdbarch);
	203
	204	/* Core file support. */
	205	set_gdbarch_iterate_over_regset_sections
	206	(gdbarch, hppanbsd_iterate_over_regset_sections);
	207
	208	tramp_frame_prepend_unwinder (gdbarch, &hppanbsd_sigtramp_si4);
	209	}
	210	\f
	211
	212	/* Provide a prototype to silence -Wmissing-prototypes. */
	213	extern initialize_file_ftype _initialize_hppanbsd_tdep;
	214
	215	void
	216	_initialize_hppanbsd_tdep (void)
	217	{
	218	gdbarch_register_osabi (bfd_arch_hppa, 0, GDB_OSABI_NETBSD_ELF,
	219	hppanbsd_init_abi);
	220	}