xref: /openbsd/gnu/usr.bin/binutils/gdb/shnbsd-tdep.c (revision e5dd7070)
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   gdbarch_register_osabi (bfd_arch_sh, 0, GDB_OSABI_OPENBSD_ELF,
188 			  shnbsd_init_abi);
189 }
190