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