* configure.in (host==solaris): Pass only the first word of $CC
[deliverable/binutils-gdb.git] / bfd / coff-sparc.c
CommitLineData
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
5This file is part of BFD, the Binary File Descriptor library.
6
7This program is free software; you can redistribute it and/or modify
8it under the terms of the GNU General Public License as published by
9the Free Software Foundation; either version 2 of the License, or
10(at your option) any later version.
11
12This program is distributed in the hope that it will be useful,
13but WITHOUT ANY WARRANTY; without even the implied warranty of
14MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15GNU General Public License for more details.
16
17You should have received a copy of the GNU General Public License
18along with this program; if not, write to the Free Software
ae115e51 19Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
492d52cc
ILT
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
ae115e51
ILT
29#define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (3)
30
f1d42c04
ILT
31#define BADMAG(x) ((x).f_magic != SPARCMAGIC && (x).f_magic != LYNXCOFFMAGIC)
32
33/* The page size is a guess based on ELF. */
34#define COFF_PAGE_SIZE 0x10000
492d52cc
ILT
35
36enum reloc_type
37 {
38 R_SPARC_NONE = 0,
39 R_SPARC_8, R_SPARC_16, R_SPARC_32,
40 R_SPARC_DISP8, R_SPARC_DISP16, R_SPARC_DISP32,
41 R_SPARC_WDISP30, R_SPARC_WDISP22,
42 R_SPARC_HI22, R_SPARC_22,
43 R_SPARC_13, R_SPARC_LO10,
44 R_SPARC_GOT10, R_SPARC_GOT13, R_SPARC_GOT22,
45 R_SPARC_PC10, R_SPARC_PC22,
46 R_SPARC_WPLT30,
47 R_SPARC_COPY,
48 R_SPARC_GLOB_DAT, R_SPARC_JMP_SLOT,
49 R_SPARC_RELATIVE,
50 R_SPARC_UA32,
51 R_SPARC_max
52 };
53
54#if 0
55static CONST char *CONST reloc_type_names[] =
56{
57 "R_SPARC_NONE",
58 "R_SPARC_8", "R_SPARC_16", "R_SPARC_32",
59 "R_SPARC_DISP8", "R_SPARC_DISP16", "R_SPARC_DISP32",
60 "R_SPARC_WDISP30", "R_SPARC_WDISP22",
61 "R_SPARC_HI22", "R_SPARC_22",
62 "R_SPARC_13", "R_SPARC_LO10",
63 "R_SPARC_GOT10", "R_SPARC_GOT13", "R_SPARC_GOT22",
64 "R_SPARC_PC10", "R_SPARC_PC22",
65 "R_SPARC_WPLT30",
66 "R_SPARC_COPY",
67 "R_SPARC_GLOB_DAT", "R_SPARC_JMP_SLOT",
68 "R_SPARC_RELATIVE",
69 "R_SPARC_UA32",
70};
71#endif
72
73/* This is stolen pretty directly from elf.c. */
74static bfd_reloc_status_type
75bfd_coff_generic_reloc PARAMS ((bfd *, arelent *, asymbol *, PTR,
76 asection *, bfd *, char **));
77
78static bfd_reloc_status_type
79bfd_coff_generic_reloc (abfd, reloc_entry, symbol, data, input_section,
80 output_bfd, error_message)
81 bfd *abfd;
82 arelent *reloc_entry;
83 asymbol *symbol;
84 PTR data;
85 asection *input_section;
86 bfd *output_bfd;
87 char **error_message;
88{
89 if (output_bfd != (bfd *) NULL
90 && (symbol->flags & BSF_SECTION_SYM) == 0
91 && reloc_entry->addend == 0)
92 {
93 reloc_entry->address += input_section->output_offset;
94 return bfd_reloc_ok;
95 }
96
97 return bfd_reloc_continue;
98}
99
100static reloc_howto_type coff_sparc_howto_table[] =
101{
102 HOWTO(R_SPARC_NONE, 0,0, 0,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_NONE", false,0,0x00000000,true),
103 HOWTO(R_SPARC_8, 0,0, 8,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_8", false,0,0x000000ff,true),
104 HOWTO(R_SPARC_16, 0,1,16,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_16", false,0,0x0000ffff,true),
105 HOWTO(R_SPARC_32, 0,2,32,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_32", false,0,0xffffffff,true),
106 HOWTO(R_SPARC_DISP8, 0,0, 8,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP8", false,0,0x000000ff,true),
107 HOWTO(R_SPARC_DISP16, 0,1,16,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP16", false,0,0x0000ffff,true),
108 HOWTO(R_SPARC_DISP32, 0,2,32,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_DISP32", false,0,0x00ffffff,true),
109 HOWTO(R_SPARC_WDISP30, 2,2,30,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_WDISP30", false,0,0x3fffffff,true),
110 HOWTO(R_SPARC_WDISP22, 2,2,22,true, 0,complain_overflow_signed, bfd_coff_generic_reloc,"R_SPARC_WDISP22", false,0,0x003fffff,true),
111 HOWTO(R_SPARC_HI22, 10,2,22,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_HI22", false,0,0x003fffff,true),
112 HOWTO(R_SPARC_22, 0,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_22", false,0,0x003fffff,true),
113 HOWTO(R_SPARC_13, 0,2,13,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_13", false,0,0x00001fff,true),
114 HOWTO(R_SPARC_LO10, 0,2,10,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_LO10", false,0,0x000003ff,true),
115 HOWTO(R_SPARC_GOT10, 0,2,10,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT10", false,0,0x000003ff,true),
116 HOWTO(R_SPARC_GOT13, 0,2,13,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT13", false,0,0x00001fff,true),
117 HOWTO(R_SPARC_GOT22, 10,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT22", false,0,0x003fffff,true),
118 HOWTO(R_SPARC_PC10, 0,2,10,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC10", false,0,0x000003ff,true),
119 HOWTO(R_SPARC_PC22, 0,2,22,false,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC22", false,0,0x003fffff,true),
120 HOWTO(R_SPARC_WPLT30, 0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_WPLT30", false,0,0x00000000,true),
121 HOWTO(R_SPARC_COPY, 0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_COPY", false,0,0x00000000,true),
122 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),
123 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),
124 HOWTO(R_SPARC_RELATIVE,0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_RELATIVE",false,0,0x00000000,true),
125 HOWTO(R_SPARC_UA32, 0,0,00,false,0,complain_overflow_dont, bfd_coff_generic_reloc,"R_SPARC_UA32", false,0,0x00000000,true),
126};
127
128struct coff_reloc_map {
129 unsigned char bfd_reloc_val;
130 unsigned char coff_reloc_val;
131};
132
133static CONST struct coff_reloc_map sparc_reloc_map[] =
134{
135 { BFD_RELOC_NONE, R_SPARC_NONE, },
136 { BFD_RELOC_16, R_SPARC_16, },
137 { BFD_RELOC_8, R_SPARC_8 },
138 { BFD_RELOC_8_PCREL, R_SPARC_DISP8 },
139 { BFD_RELOC_CTOR, R_SPARC_32 }, /* @@ Assumes 32 bits. */
140 { BFD_RELOC_32, R_SPARC_32 },
141 { BFD_RELOC_32_PCREL, R_SPARC_DISP32 },
142 { BFD_RELOC_HI22, R_SPARC_HI22 },
143 { BFD_RELOC_LO10, R_SPARC_LO10, },
144 { BFD_RELOC_32_PCREL_S2, R_SPARC_WDISP30 },
145 { BFD_RELOC_SPARC22, R_SPARC_22 },
146 { BFD_RELOC_SPARC13, R_SPARC_13 },
147 { BFD_RELOC_SPARC_GOT10, R_SPARC_GOT10 },
148 { BFD_RELOC_SPARC_GOT13, R_SPARC_GOT13 },
149 { BFD_RELOC_SPARC_GOT22, R_SPARC_GOT22 },
150 { BFD_RELOC_SPARC_PC10, R_SPARC_PC10 },
151 { BFD_RELOC_SPARC_PC22, R_SPARC_PC22 },
152 { BFD_RELOC_SPARC_WPLT30, R_SPARC_WPLT30 },
153 { BFD_RELOC_SPARC_COPY, R_SPARC_COPY },
154 { BFD_RELOC_SPARC_GLOB_DAT, R_SPARC_GLOB_DAT },
155 { BFD_RELOC_SPARC_JMP_SLOT, R_SPARC_JMP_SLOT },
156 { BFD_RELOC_SPARC_RELATIVE, R_SPARC_RELATIVE },
157 { BFD_RELOC_SPARC_WDISP22, R_SPARC_WDISP22 },
158 /* { BFD_RELOC_SPARC_UA32, R_SPARC_UA32 }, not used?? */
159};
160
ae115e51 161static reloc_howto_type *
492d52cc
ILT
162coff_sparc_reloc_type_lookup (abfd, code)
163 bfd *abfd;
164 bfd_reloc_code_real_type code;
165{
ae115e51 166 unsigned int i;
492d52cc
ILT
167 for (i = 0; i < sizeof (sparc_reloc_map) / sizeof (struct coff_reloc_map); i++)
168 {
169 if (sparc_reloc_map[i].bfd_reloc_val == code)
170 return &coff_sparc_howto_table[(int) sparc_reloc_map[i].coff_reloc_val];
171 }
172 return 0;
173}
174#define coff_bfd_reloc_type_lookup coff_sparc_reloc_type_lookup
175
176static void
177rtype2howto (cache_ptr, dst)
178 arelent *cache_ptr;
179 struct internal_reloc *dst;
180{
181 BFD_ASSERT (dst->r_type < (unsigned int) R_SPARC_max);
182 cache_ptr->howto = &coff_sparc_howto_table[dst->r_type];
183}
184
185#define RTYPE2HOWTO(internal, relocentry) rtype2howto(internal,relocentry)
186
187#define SWAP_IN_RELOC_OFFSET bfd_h_get_32
188#define SWAP_OUT_RELOC_OFFSET bfd_h_put_32
ae115e51
ILT
189/* This is just like the standard one, except that we don't set up an
190 addend for relocs against global symbols (otherwise linking objects
191 created by -r fails), and we add in the reloc offset at the end. */
492d52cc
ILT
192#define CALC_ADDEND(abfd, ptr, reloc, cache_ptr) \
193 { \
194 coff_symbol_type *coffsym = (coff_symbol_type *) NULL; \
195 if (ptr && bfd_asymbol_bfd (ptr) != abfd) \
196 coffsym = (obj_symbols (abfd) \
197 + (cache_ptr->sym_ptr_ptr - symbols)); \
198 else if (ptr) \
199 coffsym = coff_symbol_from (abfd, ptr); \
200 if (coffsym != (coff_symbol_type *) NULL \
201 && coffsym->native->u.syment.n_scnum == 0) \
202 cache_ptr->addend = 0; \
203 else if (ptr && bfd_asymbol_bfd (ptr) == abfd \
ae115e51
ILT
204 && ptr->section != (asection *) NULL \
205 && (ptr->flags & BSF_GLOBAL) == 0) \
492d52cc
ILT
206 cache_ptr->addend = - (ptr->section->vma + ptr->value); \
207 else \
208 cache_ptr->addend = 0; \
209 cache_ptr->addend += reloc.r_offset; \
210 }
211
f1d42c04
ILT
212/* Clear the r_spare field in relocs. */
213#define SWAP_OUT_RELOC_EXTRA(abfd,src,dst) \
214 do { \
215 dst->r_spare[0] = 0; \
216 dst->r_spare[1] = 0; \
217 } while (0)
218
492d52cc
ILT
219#define __A_MAGIC_SET__
220
f1d42c04
ILT
221/* Enable Sparc-specific hacks in coffcode.h. */
222
223#define COFF_SPARC
224
492d52cc
ILT
225#include "coffcode.h"
226
ae115e51 227const bfd_target
492d52cc
ILT
228#ifdef TARGET_SYM
229 TARGET_SYM =
230#else
231 sparccoff_vec =
232#endif
233{
234#ifdef TARGET_NAME
235 TARGET_NAME,
236#else
237 "coff-sparc", /* name */
238#endif
239 bfd_target_coff_flavour,
240 true, /* data byte order is big */
241 true, /* header byte order is big */
242
243 (HAS_RELOC | EXEC_P | /* object flags */
244 HAS_LINENO | HAS_DEBUG |
ae115e51 245 HAS_SYMS | HAS_LOCALS | WP_TEXT | D_PAGED),
492d52cc
ILT
246
247 (SEC_HAS_CONTENTS | SEC_ALLOC | SEC_LOAD | SEC_RELOC), /* section flags */
ae115e51 248 '_', /* leading underscore */
492d52cc
ILT
249 '/', /* ar_pad_char */
250 15, /* ar_max_namelen */
251
f1d42c04 252 2, /* minimum alignment power */
492d52cc
ILT
253 bfd_getb64, bfd_getb_signed_64, bfd_putb64,
254 bfd_getb32, bfd_getb_signed_32, bfd_putb32,
255 bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* data */
256 bfd_getb64, bfd_getb_signed_64, bfd_putb64,
257 bfd_getb32, bfd_getb_signed_32, bfd_putb32,
258 bfd_getb16, bfd_getb_signed_16, bfd_putb16, /* hdrs */
259
260/* Note that we allow an object file to be treated as a core file as well. */
261 {_bfd_dummy_target, coff_object_p, /* bfd_check_format */
262 bfd_generic_archive_p, coff_object_p},
263 {bfd_false, coff_mkobject, _bfd_generic_mkarchive, /* bfd_set_format */
264 bfd_false},
265 {bfd_false, coff_write_object_contents, /* bfd_write_contents */
266 _bfd_write_archive_contents, bfd_false},
267
6812b607
ILT
268 BFD_JUMP_TABLE_GENERIC (coff),
269 BFD_JUMP_TABLE_COPY (coff),
270 BFD_JUMP_TABLE_CORE (_bfd_nocore),
271 BFD_JUMP_TABLE_ARCHIVE (_bfd_archive_coff),
272 BFD_JUMP_TABLE_SYMBOLS (coff),
273 BFD_JUMP_TABLE_RELOCS (coff),
274 BFD_JUMP_TABLE_WRITE (coff),
275 BFD_JUMP_TABLE_LINK (coff),
dfc1c006 276 BFD_JUMP_TABLE_DYNAMIC (_bfd_nodynamic),
6812b607 277
492d52cc
ILT
278 COFF_SWAP_TABLE,
279};
This page took 0.088744 seconds and 4 git commands to generate.