2012-07-20 Jeff Kenton <jkenton@tilera.com>
[external/binutils.git] / gdb / tilegx-linux-tdep.c
1 /* Target-dependent code for GNU/Linux on Tilera TILE-Gx processors.
2
3    Copyright 2012 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 "linux-tdep.h"
23 #include "glibc-tdep.h"
24 #include "solib-svr4.h"
25 #include "symtab.h"
26 #include "regcache.h"
27 #include "regset.h"
28 #include "tramp-frame.h"
29 #include "trad-frame.h"
30 #include "tilegx-tdep.h"
31
32 /* Signal trampoline support.  */
33
34 static void
35 tilegx_linux_sigframe_init (const struct tramp_frame *self,
36                             struct frame_info *this_frame,
37                             struct trad_frame_cache *this_cache,
38                             CORE_ADDR func)
39 {
40   CORE_ADDR pc = get_frame_register_unsigned (this_frame, 64);
41   CORE_ADDR sp = get_frame_register_unsigned (this_frame, 54);
42
43   /* Base address of register save area.  */
44   CORE_ADDR base = sp
45                    + 16    /* Skip ABI_SAVE_AREA.  */
46                    + 128   /* Skip SIGINFO.  */
47                    + 40;   /* Skip UCONTEXT.  */
48
49   /* Address of saved LR register (R56) which holds previous PC.  */
50   CORE_ADDR prev_pc = base + 56 * 8;
51
52   int i;
53
54   for (i = 0; i < 56; i++)
55     trad_frame_set_reg_addr (this_cache, i, base + i * 8);
56
57   trad_frame_set_reg_value (this_cache, 64,
58                             get_frame_memory_unsigned (this_frame, prev_pc, 8));
59
60   /* Save a frame ID.  */
61   trad_frame_set_id (this_cache, frame_id_build (base, func));
62 }
63
64 static const struct tramp_frame tilegx_linux_rt_sigframe =
65 {
66   SIGTRAMP_FRAME,
67   8,
68   {
69     { 0x00045fe551483000ULL, -1 }, /* { moveli r10, 139 } */
70     { 0x286b180051485000ULL, -1 }, /* { swint1 } */
71     { TRAMP_SENTINEL_INSN, -1 }
72   },
73   tilegx_linux_sigframe_init
74 };
75
76 /* Supply raw registers from REGCACHE to REGS.  */
77
78 static void
79 tilegx_linux_supply_regset (const struct regset *regset,
80                             struct regcache *regcache,
81                             int regnum, const void *regs, size_t len)
82 {
83   struct gdbarch *arch = get_regcache_arch (regcache);
84   const char *ptr = regs;
85   int i;
86
87   /* This logic must match that of struct pt_regs in "ptrace.h".  */
88   for (i = 0; i < TILEGX_NUM_EASY_REGS + 1; i++, ptr += tilegx_reg_size)
89     {
90       int gri = (i < TILEGX_NUM_EASY_REGS) ? i : TILEGX_PC_REGNUM;
91
92       if (regnum == gri || regnum == -1)
93         regcache_raw_supply (regcache, gri, ptr);
94     }
95 }
96
97 /* TILE-Gx Linux kernel register set.  */
98 static struct regset tilegx_linux_regset =
99 {
100   NULL,
101   tilegx_linux_supply_regset
102 };
103
104 static const struct regset *
105 tilegx_regset_from_core_section (struct gdbarch *gdbarch,
106                                  const char *sect_name,
107                                  size_t sect_size)
108 {
109   if (strcmp (sect_name, ".reg") == 0)
110     return &tilegx_linux_regset;
111
112   return NULL;
113 }
114
115 /* OS specific initialization of gdbarch.  */
116
117 static void
118 tilegx_linux_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch)
119 {
120   int arch_size = gdbarch_addr_bit (gdbarch);
121
122   linux_init_abi (info, gdbarch);
123
124   tramp_frame_prepend_unwinder (gdbarch, &tilegx_linux_rt_sigframe);
125
126   set_gdbarch_regset_from_core_section (gdbarch,
127                                         tilegx_regset_from_core_section);
128
129   /* GNU/Linux uses SVR4-style shared libraries.  */
130   if (arch_size == 32)
131     set_solib_svr4_fetch_link_map_offsets (gdbarch,
132                                            svr4_ilp32_fetch_link_map_offsets);
133   else
134     set_solib_svr4_fetch_link_map_offsets (gdbarch,
135                                            svr4_lp64_fetch_link_map_offsets);
136
137   /* Enable TLS support.  */
138   set_gdbarch_fetch_tls_load_module_address (gdbarch,
139                                              svr4_fetch_objfile_link_map);
140
141   /* Shared library handling.  */
142   set_gdbarch_skip_trampoline_code (gdbarch, find_solib_trampoline_target);
143   set_gdbarch_skip_solib_resolver (gdbarch, glibc_skip_solib_resolver);
144
145   set_gdbarch_get_siginfo_type (gdbarch, linux_get_siginfo_type);
146 }
147
148 /* Provide a prototype to silence -Wmissing-prototypes.  */
149 extern initialize_file_ftype _initialize_tilegx_linux_tdep;
150
151 void
152 _initialize_tilegx_linux_tdep (void)
153 {
154   gdbarch_register_osabi (bfd_arch_tilegx, bfd_mach_tilegx, GDB_OSABI_LINUX,
155                           tilegx_linux_init_abi);
156 }