2004-08-31 Robert Bowdidge <bowdidge@apple.com>
[external/binutils.git] / gdb / shnbsd-tdep.c
1 /* Target-dependent code for SuperH running NetBSD, for GDB.
2    Copyright 2002, 2003 Free Software Foundation, Inc.
3    Contributed by Wasabi Systems, 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., 59 Temple Place - Suite 330,
20    Boston, MA 02111-1307, USA.  */
21
22 #include "defs.h"
23 #include "gdbcore.h"
24 #include "regcache.h"
25 #include "value.h"
26 #include "osabi.h"
27
28 #include "solib-svr4.h"
29
30 #include "nbsd-tdep.h"
31 #include "sh-tdep.h"
32 #include "shnbsd-tdep.h"
33
34 /* Convert an r0-r15 register number into an offset into a ptrace
35    register structure.  */
36 static const int regmap[] =
37 {
38   (20 * 4),     /* r0 */
39   (19 * 4),     /* r1 */
40   (18 * 4),     /* r2 */ 
41   (17 * 4),     /* r3 */ 
42   (16 * 4),     /* r4 */
43   (15 * 4),     /* r5 */
44   (14 * 4),     /* r6 */
45   (13 * 4),     /* r7 */
46   (12 * 4),     /* r8 */ 
47   (11 * 4),     /* r9 */
48   (10 * 4),     /* r10 */
49   ( 9 * 4),     /* r11 */
50   ( 8 * 4),     /* r12 */
51   ( 7 * 4),     /* r13 */
52   ( 6 * 4),     /* r14 */
53   ( 5 * 4),     /* r15 */
54 };
55
56 #define SIZEOF_STRUCT_REG (21 * 4)
57
58 void
59 shnbsd_supply_reg (char *regs, int regno)
60 {
61   int i;
62
63   if (regno == PC_REGNUM || regno == -1)
64     regcache_raw_supply (current_regcache, PC_REGNUM, regs + (0 * 4));
65
66   if (regno == SR_REGNUM || regno == -1)
67     regcache_raw_supply (current_regcache, SR_REGNUM, regs + (1 * 4));
68
69   if (regno == PR_REGNUM || regno == -1)
70     regcache_raw_supply (current_regcache, PR_REGNUM, regs + (2 * 4));
71
72   if (regno == MACH_REGNUM || regno == -1)
73     regcache_raw_supply (current_regcache, MACH_REGNUM, regs + (3 * 4));
74
75   if (regno == MACL_REGNUM || regno == -1)
76     regcache_raw_supply (current_regcache, MACL_REGNUM, regs + (4 * 4));
77
78   if ((regno >= R0_REGNUM && regno <= (R0_REGNUM + 15)) || regno == -1)
79     {
80       for (i = R0_REGNUM; i <= (R0_REGNUM + 15); i++)
81         if (regno == i || regno == -1)
82           regcache_raw_supply (current_regcache, i,
83                                regs + regmap[i - R0_REGNUM]);
84     }
85 }
86
87 void
88 shnbsd_fill_reg (char *regs, int regno)
89 {
90   int i;
91
92   if (regno == PC_REGNUM || regno == -1)
93     regcache_raw_collect (current_regcache, PC_REGNUM, regs + (0 * 4));
94
95   if (regno == SR_REGNUM || regno == -1)
96     regcache_raw_collect (current_regcache, SR_REGNUM, regs + (1 * 4));
97
98   if (regno == PR_REGNUM || regno == -1)
99     regcache_raw_collect (current_regcache, PR_REGNUM, regs + (2 * 4));
100
101   if (regno == MACH_REGNUM || regno == -1)
102     regcache_raw_collect (current_regcache, MACH_REGNUM, regs + (3 * 4));
103
104   if (regno == MACL_REGNUM || regno == -1)
105     regcache_raw_collect (current_regcache, MACL_REGNUM, regs + (4 * 4));
106
107   if ((regno >= R0_REGNUM && regno <= (R0_REGNUM + 15)) || regno == -1)
108     {
109       for (i = R0_REGNUM; i <= (R0_REGNUM + 15); i++)
110         if (regno == i || regno == -1)
111           regcache_raw_collect (current_regcache, i,
112                                 regs + regmap[i - R0_REGNUM]);
113     }
114 }
115
116 static void
117 fetch_core_registers (char *core_reg_sect, unsigned core_reg_size,
118                       int which, CORE_ADDR ignore)
119 {
120   /* We get everything from the .reg section.  */
121   if (which != 0)
122     return;
123
124   if (core_reg_size < SIZEOF_STRUCT_REG)
125     {
126       warning ("Wrong size register set in core file.");
127       return;
128     }
129
130   /* Integer registers.  */
131   shnbsd_supply_reg (core_reg_sect, -1);
132 }
133
134 static void
135 fetch_elfcore_registers (char *core_reg_sect, unsigned core_reg_size,
136                          int which, CORE_ADDR ignore)
137 {
138   switch (which)
139     {
140     case 0:  /* Integer registers.  */
141       if (core_reg_size != SIZEOF_STRUCT_REG)
142         warning ("Wrong size register set in core file.");
143       else
144         shnbsd_supply_reg (core_reg_sect, -1);
145       break;
146
147     default:
148       /* Don't know what kind of register request this is; just ignore it.  */
149       break;
150     }
151 }
152
153 static struct core_fns shnbsd_core_fns =
154 {
155   bfd_target_unknown_flavour,           /* core_flavour */
156   default_check_format,                 /* check_format */
157   default_core_sniffer,                 /* core_sniffer */
158   fetch_core_registers,                 /* core_read_registers */
159   NULL                                  /* next */
160 };
161
162 static struct core_fns shnbsd_elfcore_fns =
163 {
164   bfd_target_elf_flavour,               /* core_flavour */
165   default_check_format,                 /* check_format */
166   default_core_sniffer,                 /* core_sniffer */
167   fetch_elfcore_registers,              /* core_read_registers */
168   NULL                                  /* next */
169 };
170
171 static void
172 shnbsd_init_abi (struct gdbarch_info info,
173                   struct gdbarch *gdbarch)
174 {
175   set_solib_svr4_fetch_link_map_offsets (gdbarch,
176                                 nbsd_ilp32_solib_svr4_fetch_link_map_offsets);
177 }
178
179 void
180 _initialize_shnbsd_tdep (void)
181 {
182   deprecated_add_core_fns (&shnbsd_core_fns);
183   deprecated_add_core_fns (&shnbsd_elfcore_fns);
184
185   gdbarch_register_osabi (bfd_arch_sh, 0, GDB_OSABI_NETBSD_ELF,
186                           shnbsd_init_abi);
187 }