Commit | Line | Data |
---|---|---|
492d52cc | 1 | /* BFD back-end for Sparc COFF files. |
dfc1c006 | 2 | Copyright 1990, 1991, 1992, 1993, 1994 Free Software Foundation, Inc. |
492d52cc ILT |
3 | Written by Cygnus Support. |
4 | ||
5 | This file is part of BFD, the Binary File Descriptor library. | |
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., 675 Mass Ave, Cambridge, MA 02139, USA. */ | |
20 | ||
21 | #include "bfd.h" | |
22 | #include "sysdep.h" | |
23 | #include "libbfd.h" | |
24 | #include "obstack.h" | |
25 | #include "coff/sparc.h" | |
26 | #include "coff/internal.h" | |
27 | #include "libcoff.h" | |
28 | ||
f1d42c04 ILT |
29 | #define BADMAG(x) ((x).f_magic != SPARCMAGIC && (x).f_magic != LYNXCOFFMAGIC) |
30 | ||
31 | /* The page size is a guess based on ELF. */ | |
32 | #define COFF_PAGE_SIZE 0x10000 | |
492d52cc ILT |
33 | |
34 | enum reloc_type | |
35 | { | |
36 | R_SPARC_NONE = 0, | |
37 | R_SPARC_8, R_SPARC_16, R_SPARC_32, | |
38 | R_SPARC_DISP8, R_SPARC_DISP16, R_SPARC_DISP32, | |
39 | R_SPARC_WDISP30, R_SPARC_WDISP22, | |
40 | R_SPARC_HI22, R_SPARC_22, | |
41 | R_SPARC_13, R_SPARC_LO10, | |
42 | R_SPARC_GOT10, R_SPARC_GOT13, R_SPARC_GOT22, | |
43 | R_SPARC_PC10, R_SPARC_PC22, | |
44 | R_SPARC_WPLT30, | |
45 | R_SPARC_COPY, | |
46 | R_SPARC_GLOB_DAT, R_SPARC_JMP_SLOT, | |
47 | R_SPARC_RELATIVE, | |
48 | R_SPARC_UA32, | |
49 | R_SPARC_max | |
50 | }; | |
51 | ||
52 | #if 0 | |
53 | static CONST char *CONST reloc_type_names[] = | |
54 | { | |
55 | "R_SPARC_NONE", | |
56 | "R_SPARC_8", "R_SPARC_16", "R_SPARC_32", | |
57 | "R_SPARC_DISP8", "R_SPARC_DISP16", "R_SPARC_DISP32", | |
58 | "R_SPARC_WDISP30", "R_SPARC_WDISP22", | |
59 | "R_SPARC_HI22", "R_SPARC_22", | |
60 | "R_SPARC_13", "R_SPARC_LO10", | |
61 | "R_SPARC_GOT10", "R_SPARC_GOT13", "R_SPARC_GOT22", | |
62 | "R_SPARC_PC10", "R_SPARC_PC22", | |
63 | "R_SPARC_WPLT30", | |
64 | "R_SPARC_COPY", | |
65 | "R_SPARC_GLOB_DAT", "R_SPARC_JMP_SLOT", | |
66 | "R_SPARC_RELATIVE", | |
67 | "R_SPARC_UA32", | |
68 | }; | |
69 | #endif | |
70 | ||
71 | /* This is stolen pretty directly from elf.c. */ | |
72 | static bfd_reloc_status_type | |
73 | bfd_coff_generic_reloc PARAMS ((bfd *, arelent *, asymbol *, PTR, | |
74 | asection *, bfd *, char **)); | |
75 | ||
76 | static bfd_reloc_status_type | |
77 | bfd_coff_generic_reloc (abfd, reloc_entry, symbol, data, input_section, | |
78 | output_bfd, error_message) | |
79 | bfd *abfd; | |
80 | arelent *reloc_entry; | |
81 | asymbol *symbol; | |
82 | PTR data; | |
83 | asection *input_section; | |
84 | bfd *output_bfd; | |
85 | char **error_message; | |
86 | { | |
87 | if (output_bfd != (bfd *) NULL | |
88 | && (symbol->flags & BSF_SECTION_SYM) == 0 | |
89 | && reloc_entry->addend == 0) | |
90 | { | |
91 | reloc_entry->address += input_section->output_offset; | |
92 | return bfd_reloc_ok; | |
93 | } | |
94 | ||
95 | return bfd_reloc_continue; | |
96 | } | |
97 | ||
98 | static reloc_howto_type coff_sparc_howto_table[] = | |
99 | { | |
100 | HOWTO(R_SPARC_NONE, 0,0, 0,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_NONE", false,0,0x00000000,true), | |
101 | HOWTO(R_SPARC_8, 0,0, 8,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_8", false,0,0x000000ff,true), | |
102 | HOWTO(R_SPARC_16, 0,1,16,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_16", false,0,0x0000ffff,true), | |
103 | HOWTO(R_SPARC_32, 0,2,32,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_32", false,0,0xffffffff,true), | |
104 | HOWTO(R_SPARC_DISP8, 0,0, 8,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP8", false,0,0x000000ff,true), | |
105 | HOWTO(R_SPARC_DISP16, 0,1,16,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP16", false,0,0x0000ffff,true), | |
106 | HOWTO(R_SPARC_DISP32, 0,2,32,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP32", false,0,0x00ffffff,true), | |
107 | HOWTO(R_SPARC_WDISP30, 2,2,30,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_WDISP30", false,0,0x3fffffff,true), | |
108 | HOWTO(R_SPARC_WDISP22, 2,2,22,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_WDISP22", false,0,0x003fffff,true), | |
109 | HOWTO(R_SPARC_HI22, 10,2,22,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_HI22", false,0,0x003fffff,true), | |
110 | HOWTO(R_SPARC_22, 0,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_22", false,0,0x003fffff,true), | |
111 | HOWTO(R_SPARC_13, 0,2,13,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_13", false,0,0x00001fff,true), | |
112 | HOWTO(R_SPARC_LO10, 0,2,10,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_LO10", false,0,0x000003ff,true), | |
113 | HOWTO(R_SPARC_GOT10, 0,2,10,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT10", false,0,0x000003ff,true), | |
114 | HOWTO(R_SPARC_GOT13, 0,2,13,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT13", false,0,0x00001fff,true), | |
115 | HOWTO(R_SPARC_GOT22, 10,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT22", false,0,0x003fffff,true), | |
116 | HOWTO(R_SPARC_PC10, 0,2,10,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC10", false,0,0x000003ff,true), | |
117 | HOWTO(R_SPARC_PC22, 0,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC22", false,0,0x003fffff,true), | |
118 | HOWTO(R_SPARC_WPLT30, 0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_WPLT30", false,0,0x00000000,true), | |
119 | HOWTO(R_SPARC_COPY, 0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_COPY", false,0,0x00000000,true), | |
120 | HOWTO(R_SPARC_GLOB_DAT,0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_GLOB_DAT",false,0,0x00000000,true), | |
121 | HOWTO(R_SPARC_JMP_SLOT,0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_JMP_SLOT",false,0,0x00000000,true), | |
122 | HOWTO(R_SPARC_RELATIVE,0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_RELATIVE",false,0,0x00000000,true), | |
123 | HOWTO(R_SPARC_UA32, 0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_UA32", false,0,0x00000000,true), | |
124 | }; | |
125 | ||
126 | struct coff_reloc_map { | |
127 | unsigned char bfd_reloc_val; | |
128 | unsigned char coff_reloc_val; | |
129 | }; | |
130 | ||
131 | static CONST struct coff_reloc_map sparc_reloc_map[] = | |
132 | { | |
133 | { BFD_RELOC_NONE, R_SPARC_NONE, }, | |
134 | { BFD_RELOC_16, R_SPARC_16, }, | |
135 | { BFD_RELOC_8, R_SPARC_8 }, | |
136 | { BFD_RELOC_8_PCREL, R_SPARC_DISP8 }, | |
137 | { BFD_RELOC_CTOR, R_SPARC_32 }, /* @@ Assumes 32 bits. */ | |
138 | { BFD_RELOC_32, R_SPARC_32 }, | |
139 | { BFD_RELOC_32_PCREL, R_SPARC_DISP32 }, | |
140 | { BFD_RELOC_HI22, R_SPARC_HI22 }, | |
141 | { BFD_RELOC_LO10, R_SPARC_LO10, }, | |
142 | { BFD_RELOC_32_PCREL_S2, R_SPARC_WDISP30 }, | |
143 | { BFD_RELOC_SPARC22, R_SPARC_22 }, | |
144 | { BFD_RELOC_SPARC13, R_SPARC_13 }, | |
145 | { BFD_RELOC_SPARC_GOT10, R_SPARC_GOT10 }, | |
146 | { BFD_RELOC_SPARC_GOT13, R_SPARC_GOT13 }, | |
147 | { BFD_RELOC_SPARC_GOT22, R_SPARC_GOT22 }, | |
148 | { BFD_RELOC_SPARC_PC10, R_SPARC_PC10 }, | |
149 | { BFD_RELOC_SPARC_PC22, R_SPARC_PC22 }, | |
150 | { BFD_RELOC_SPARC_WPLT30, R_SPARC_WPLT30 }, | |
151 | { BFD_RELOC_SPARC_COPY, R_SPARC_COPY }, | |
152 | { BFD_RELOC_SPARC_GLOB_DAT, R_SPARC_GLOB_DAT }, | |
153 | { BFD_RELOC_SPARC_JMP_SLOT, R_SPARC_JMP_SLOT }, | |
154 | { BFD_RELOC_SPARC_RELATIVE, R_SPARC_RELATIVE }, | |
155 | { BFD_RELOC_SPARC_WDISP22, R_SPARC_WDISP22 }, | |
156 | /* { BFD_RELOC_SPARC_UA32, R_SPARC_UA32 }, not used?? */ | |
157 | }; | |
158 | ||
159 | static CONST struct reloc_howto_struct * | |
160 | coff_sparc_reloc_type_lookup (abfd, code) | |
161 | bfd *abfd; | |
162 | bfd_reloc_code_real_type code; | |
163 | { | |
164 | int i; | |
165 | for (i = 0; i < sizeof (sparc_reloc_map) / sizeof (struct coff_reloc_map); i++) | |
166 | { | |
167 | if (sparc_reloc_map[i].bfd_reloc_val == code) | |
168 | return &coff_sparc_howto_table[(int) sparc_reloc_map[i].coff_reloc_val]; | |
169 | } | |
170 | return 0; | |
171 | } | |
172 | #define coff_bfd_reloc_type_lookup coff_sparc_reloc_type_lookup | |
173 | ||
174 | static void | |
175 | rtype2howto (cache_ptr, dst) | |
176 | arelent *cache_ptr; | |
177 | struct internal_reloc *dst; | |
178 | { | |
179 | BFD_ASSERT (dst->r_type < (unsigned int) R_SPARC_max); | |
180 | cache_ptr->howto = &coff_sparc_howto_table[dst->r_type]; | |
181 | } | |
182 | ||
183 | #define RTYPE2HOWTO(internal, relocentry) rtype2howto(internal,relocentry) | |
184 | ||
185 | #define SWAP_IN_RELOC_OFFSET bfd_h_get_32 | |
186 | #define SWAP_OUT_RELOC_OFFSET bfd_h_put_32 | |
187 | /* This is just like the standard one, except for the addition of the | |
188 | last line, the adjustment of the addend. */ | |
189 | #define CALC_ADDEND(abfd, ptr, reloc, cache_ptr) \ | |
190 | { \ | |
191 | coff_symbol_type *coffsym = (coff_symbol_type *) NULL; \ | |
192 | if (ptr && bfd_asymbol_bfd (ptr) != abfd) \ | |
193 | coffsym = (obj_symbols (abfd) \ | |
194 | + (cache_ptr->sym_ptr_ptr - symbols)); \ | |
195 | else if (ptr) \ | |
196 | coffsym = coff_symbol_from (abfd, ptr); \ | |
197 | if (coffsym != (coff_symbol_type *) NULL \ | |
198 | && coffsym->native->u.syment.n_scnum == 0) \ | |
199 | cache_ptr->addend = 0; \ | |
200 | else if (ptr && bfd_asymbol_bfd (ptr) == abfd \ | |
201 | && ptr->section != (asection *) NULL) \ | |
202 | cache_ptr->addend = - (ptr->section->vma + ptr->value); \ | |
203 | else \ | |
204 | cache_ptr->addend = 0; \ | |
205 | cache_ptr->addend += reloc.r_offset; \ | |
206 | } | |
207 | ||
f1d42c04 ILT |
208 | /* Clear the r_spare field in relocs. */ |
209 | #define SWAP_OUT_RELOC_EXTRA(abfd,src,dst) \ | |
210 | do { \ | |
211 | dst->r_spare[0] = 0; \ | |
212 | dst->r_spare[1] = 0; \ | |
213 | } while (0) | |
214 | ||
492d52cc ILT |
215 | #define __A_MAGIC_SET__ |
216 | ||
f1d42c04 ILT |
217 | /* Enable Sparc-specific hacks in coffcode.h. */ |
218 | ||
219 | #define COFF_SPARC | |
220 | ||
492d52cc ILT |
221 | #include "coffcode.h" |
222 | ||
223 | bfd_target | |
224 | #ifdef TARGET_SYM | |
225 | TARGET_SYM = | |
226 | #else | |
227 | sparccoff_vec = | |
228 | #endif | |
229 | { | |
230 | #ifdef TARGET_NAME | |
231 | TARGET_NAME, | |
232 | #else | |
233 | "coff-sparc", /* name */ | |
234 | #endif | |
235 | bfd_target_coff_flavour, | |
236 | true, /* data byte order is big */ | |
237 | true, /* header byte order is big */ | |
238 | ||
239 | (HAS_RELOC | EXEC_P | /* object flags */ | |
240 | HAS_LINENO | HAS_DEBUG | | |
f1d42c04 | 241 | HAS_SYMS | HAS_LOCALS | DYNAMIC | WP_TEXT | D_PAGED), |
492d52cc ILT |
242 | |
243 | (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */ | |
244 | 0, /* leading underscore */ | |
245 | '/', /* ar_pad_char */ | |
246 | 15, /* ar_max_namelen */ | |
247 | ||
f1d42c04 | 248 | 2, /* minimum alignment power */ |
492d52cc ILT |
249 | bfd_getb64, bfd_getb_signed_64, bfd_putb64, |
250 | bfd_getb32, bfd_getb_signed_32, bfd_putb32, | |
251 | bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */ | |
252 | bfd_getb64, bfd_getb_signed_64, bfd_putb64, | |
253 | bfd_getb32, bfd_getb_signed_32, bfd_putb32, | |
254 | bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */ | |
255 | ||
256 | /* Note that we allow an object file to be treated as a core file as well. */ | |
257 | {_bfd_dummy_target, coff_object_p, /* bfd_check_format */ | |
258 | bfd_generic_archive_p, coff_object_p}, | |
259 | {bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format */ | |
260 | bfd_false}, | |
261 | {bfd_false, coff_write_object_contents, /* bfd_write_contents */ | |
262 | _bfd_write_archive_contents, bfd_false}, | |
263 | ||
6812b607 ILT |
264 | BFD_JUMP_TABLE_GENERIC (coff), |
265 | BFD_JUMP_TABLE_COPY (coff), | |
266 | BFD_JUMP_TABLE_CORE (_bfd_nocore), | |
267 | BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff), | |
268 | BFD_JUMP_TABLE_SYMBOLS (coff), | |
269 | BFD_JUMP_TABLE_RELOCS (coff), | |
270 | BFD_JUMP_TABLE_WRITE (coff), | |
271 | BFD_JUMP_TABLE_LINK (coff), | |
dfc1c006 | 272 | BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic), |
6812b607 | 273 | |
492d52cc ILT |
274 | COFF_SWAP_TABLE, |
275 | }; |