gnu/dist/gdb6/gdb/hppanbsd-tdep.c

   1 /* Target-dependent code for NetBSD/hppa
   2
   3    Copyright (C) 2007 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 2 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, write to the Free Software
  19    Foundation, Inc., 51 Franklin Street, Fifth Floor,
  20    Boston, MA 02110-1301, USA.  */
  21
  22 #include "defs.h"
  23 #include "arch-utils.h"
  24 #include "symtab.h"
  25 #include "objfiles.h"
  26 #include "osabi.h"
  27 #include "regcache.h"
  28 #include "regset.h"
  29 #include "target.h"
  30 #include "value.h"
  31 #include "trad-frame.h"
  32 #include "tramp-frame.h"
  33
  34 #include "gdb_assert.h"
  35 #include "gdb_string.h"
  36
  37 #include "elf/common.h"
  38
  39 #include "hppa-tdep.h"
  40 #include "solib-svr4.h"
  41
  42 /* From <machine/mcontext.h>.  */
  43 static int hppanbsd_mc_reg_offset[] =
  44 {
  45   /* r0 ... r31 */
  46       -1,   1 * 4,   2 * 4,   3 * 4,
  47    4 * 4,   5 * 4,   6 * 4,   7 * 4,
  48    8 * 4,   9 * 4,  10 * 4,  11 * 4,
  49   12 * 4,  13 * 4,  14 * 4,  15 * 4,
  50   16 * 4,  17 * 4,  18 * 4,  19 * 4,
  51   20 * 4,  21 * 4,  22 * 4,  23 * 4,
  52   24 * 4,  25 * 4,  26 * 4,  27 * 4,
  53   28 * 4,  29 * 4,  30 * 4,  31 * 4,
  54
  55   32 * 4,       /* HPPA_SAR_REGNUM */
  56   35 * 4,       /* HPPA_PCOQ_HEAD_REGNUM */
  57   33 * 4,       /* HPPA_PCSQ_HEAD_REGNUM */
  58   36 * 4,       /* HPPA_PCOQ_TAIL_REGNUM */
  59   34 * 4,       /* HPPA_PCSQ_TAIL_REGNUM */
  60   -1,           /* HPPA_EIEM_REGNUM */
  61   -1,           /* HPPA_IIR_REGNUM */
  62   -1,           /* HPPA_ISR_REGNUM */
  63   -1,           /* HPPA_IOR_REGNUM */
  64   0 * 4,        /* HPPA_IPSW_REGNUM */
  65   -1,           /* spare? */
  66   41 * 4,       /* HPPA_SR4_REGNUM */
  67   37 * 4,       /* sr0 */
  68   38 * 4,       /* sr1 */
  69   39 * 4,       /* sr2 */
  70   40 * 4,       /* sr3 */
  71
  72   /* more tbd */
  73 };
  74
  75 static void hppanbsd_sigtramp_cache_init (const struct tramp_frame *,
  76                                          struct frame_info *,
  77                                          struct trad_frame_cache *,
  78                                          CORE_ADDR);
  79
  80 static const struct tramp_frame hppanbsd_sigtramp_si4 =
  81 {
  82   SIGTRAMP_FRAME,
  83   4,
  84   {
  85     { 0xc7d7c012, -1 }, /*      bb,>=,n %arg3, 30, 1f           */
  86     { 0xd6e01c1e, -1 }, /*       depwi 0,31,2,%arg3             */
  87     { 0x0ee81093, -1 }, /*      ldw 4(%arg3), %r19              */
  88     { 0x0ee01097, -1 }, /*      ldw 0(%arg3), %arg3             */
  89                         /* 1:                                   */
  90     { 0xe8404000, -1 }, /*      blr %r0, %rp                    */
  91     { 0xeae0c002, -1 }, /*      bv,n %r0(%arg3)                 */
  92     { 0x08000240, -1 }, /*       nop                            */
  93
  94     { 0x0803025a, -1 }, /*      copy %r3, %arg0                 */
  95     { 0x20200801, -1 }, /*      ldil -40000000, %r1             */
  96     { 0xe420e008, -1 }, /*      be,l 4(%sr7, %r1), %sr0, %r31   */
  97     { 0x34160268, -1 }, /*       ldi 134, %t1 ; SYS_setcontext  */
  98
  99     { 0x081c025a, -1 }, /*      copy ret0, %arg0                */
 100     { 0x20200801, -1 }, /*      ldil -40000000, %r1             */
 101     { 0xe420e008, -1 }, /*      be,l 4(%sr7, %r1), %sr0, %r31   */
 102     { 0x34160002, -1 }, /*       ldi 1, %t1 ; SYS_exit          */
 103     { TRAMP_SENTINEL_INSN, -1 }
 104   },
 105   hppanbsd_sigtramp_cache_init
 106 };
 107
 108
 109 static void
 110 hppanbsd_sigtramp_cache_init (const struct tramp_frame *self,
 111                              struct frame_info *next_frame,
 112                              struct trad_frame_cache *this_cache,
 113                              CORE_ADDR func)
 114 {
 115   struct gdbarch *gdbarch = get_frame_arch (next_frame);
 116   struct gdbarch_tdep *tdep = gdbarch_tdep (gdbarch);
 117   CORE_ADDR sp = frame_unwind_register_unsigned (next_frame, HPPA_SP_REGNUM);
 118   CORE_ADDR base;
 119   int *reg_offset;
 120   int num_regs;
 121   int i;
 122
 123   reg_offset = hppanbsd_mc_reg_offset;
 124   num_regs = ARRAY_SIZE (hppanbsd_mc_reg_offset);
 125
 126   /* frame pointer */
 127   base = sp - 0x280;
 128   /* offsetof(struct sigframe_siginfo, sf_uc) = 128 */
 129   base += 128;
 130   /* offsetof(ucontext_t, uc_mcontext) == 40 */
 131   base += 40;
 132
 133   for (i = 0; i < num_regs; i++)
 134     if (reg_offset[i] != -1)
 135       trad_frame_set_reg_addr (this_cache, i, base + reg_offset[i]);
 136
 137   /* Construct the frame ID using the function start.  */
 138   trad_frame_set_id (this_cache, frame_id_build (sp, func));
 139 }
 140
 141 /* Core file support.  */
 142
 143 /* Sizeof `struct reg' in <machine/reg.h>.  */
 144 #define HPPANBSD_SIZEOF_GREGS   (44 * 4)
 145
 146 static int hppanbsd_reg_offset[] =
 147 {
 148   /* r0 ... r31 */
 149       -1,   1 * 4,   2 * 4,   3 * 4,
 150    4 * 4,   5 * 4,   6 * 4,   7 * 4,
 151    8 * 4,   9 * 4,  10 * 4,  11 * 4,
 152   12 * 4,  13 * 4,  14 * 4,  15 * 4,
 153   16 * 4,  17 * 4,  18 * 4,  19 * 4,
 154   20 * 4,  21 * 4,  22 * 4,  23 * 4,
 155   24 * 4,  25 * 4,  26 * 4,  27 * 4,
 156   28 * 4,  29 * 4,  30 * 4,  31 * 4,
 157
 158   32 * 4,       /* HPPA_SAR_REGNUM */
 159   35 * 4,       /* HPPA_PCOQ_HEAD_REGNUM */
 160   33 * 4,       /* HPPA_PCSQ_HEAD_REGNUM */
 161   36 * 4,       /* HPPA_PCOQ_TAIL_REGNUM */
 162   34 * 4,       /* HPPA_PCSQ_TAIL_REGNUM */
 163   -1,           /* HPPA_EIEM_REGNUM */
 164   -1,           /* HPPA_IIR_REGNUM */
 165   -1,           /* HPPA_ISR_REGNUM */
 166   -1,           /* HPPA_IOR_REGNUM */
 167   0 * 4,        /* HPPA_IPSW_REGNUM */
 168 };
 169
 170 /* Supply register REGNUM from the buffer specified by GREGS and LEN
 171    in the general-purpose register set REGSET to register cache
 172    REGCACHE.  If REGNUM is -1, do this for all registers in REGSET.  */
 173
 174 static void
 175 hppanbsd_supply_gregset (const struct regset *regset, struct regcache *regcache,
 176                      int regnum, const void *gregs, size_t len)
 177 {
 178   const gdb_byte *regs = gregs;
 179   size_t offset;
 180   int i;
 181
 182   gdb_assert (len >= HPPANBSD_SIZEOF_GREGS);
 183
 184   for (i = 0; i < ARRAY_SIZE (hppanbsd_reg_offset); i++)
 185     if (hppanbsd_reg_offset[i] != -1)
 186       if (regnum == -1 || regnum == i)
 187         regcache_raw_supply (regcache, i, regs + hppanbsd_reg_offset[i]);
 188 }
 189
 190 /* NetBSD/hppa register set.  */
 191
 192 static struct regset hppanbsd_gregset =
 193 {
 194   NULL,
 195   hppanbsd_supply_gregset
 196 };
 197
 198 /* Return the appropriate register set for the core section identified
 199    by SECT_NAME and SECT_SIZE.  */
 200
 201 static const struct regset *
 202 hppanbsd_regset_from_core_section (struct gdbarch *gdbarch,
 203                                   const char *sect_name, size_t sect_size)
 204 {
 205   if (strcmp (sect_name, ".reg") == 0 && sect_size >= HPPANBSD_SIZEOF_GREGS)
 206     return &hppanbsd_gregset;
 207
 208   return NULL;
 209 }
 210 \f
 211 void hppabsd_init_abi (struct gdbarch_info, struct gdbarch *);
 212
 213 static void
 214 hppanbsd_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
 215 {
 216   /* Obviously NetBSD is BSD-based.  */
 217   hppabsd_init_abi (info, gdbarch);
 218
 219   /* Core file support.  */
 220   set_gdbarch_regset_from_core_section
 221     (gdbarch, hppanbsd_regset_from_core_section);
 222
 223   tramp_frame_prepend_unwinder (gdbarch, &hppanbsd_sigtramp_si4);
 224 }
 225 \f
 226
 227 /* Provide a prototype to silence -Wmissing-prototypes.  */
 228 void _initialize_hppabsd_tdep (void);
 229
 230 void
 231 _initialize_hppanbsd_tdep (void)
 232 {
 233   gdbarch_register_osabi (bfd_arch_hppa, 0, GDB_OSABI_NETBSD_ELF,
 234                           hppanbsd_init_abi);
 235 }