daily update
[platform/upstream/binutils.git] / bfd / coff-sparc.c
1 /* BFD back-end for Sparc COFF files.
2    Copyright 1990, 1991, 1992, 1993, 1994, 1995, 1996, 1999, 2000, 2001,
3    2002, 2003, 2005, 2007, 2008, 2012  Free Software Foundation, Inc.
4    Written by Cygnus Support.
5
6    This file is part of BFD, the Binary File Descriptor library.
7
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 3 of the License, or
11    (at your option) any later version.
12
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with this program; if not, write to the Free Software
20    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
21    MA 02110-1301, USA.  */
22
23 #include "sysdep.h"
24 #include "bfd.h"
25 #include "libbfd.h"
26 #include "coff/sparc.h"
27 #include "coff/internal.h"
28 #include "libcoff.h"
29
30 #define COFF_DEFAULT_SECTION_ALIGNMENT_POWER (3)
31
32 #define BADMAG(x) ((x).f_magic != SPARCMAGIC && (x).f_magic != LYNXCOFFMAGIC)
33
34 /* The page size is a guess based on ELF.  */
35 #define COFF_PAGE_SIZE 0x10000
36
37 enum reloc_type
38   {
39     R_SPARC_NONE = 0,
40     R_SPARC_8,          R_SPARC_16,             R_SPARC_32,
41     R_SPARC_DISP8,      R_SPARC_DISP16,         R_SPARC_DISP32,
42     R_SPARC_WDISP30,    R_SPARC_WDISP22,
43     R_SPARC_HI22,       R_SPARC_22,
44     R_SPARC_13,         R_SPARC_LO10,
45     R_SPARC_GOT10,      R_SPARC_GOT13,          R_SPARC_GOT22,
46     R_SPARC_PC10,       R_SPARC_PC22,
47     R_SPARC_WPLT30,
48     R_SPARC_COPY,
49     R_SPARC_GLOB_DAT,   R_SPARC_JMP_SLOT,
50     R_SPARC_RELATIVE,
51     R_SPARC_UA32,
52     R_SPARC_max
53   };
54
55 /* This is stolen pretty directly from elf.c.  */
56
57 static bfd_reloc_status_type
58 bfd_coff_generic_reloc (bfd *abfd ATTRIBUTE_UNUSED,
59                         arelent *reloc_entry,
60                         asymbol *symbol,
61                         void * data ATTRIBUTE_UNUSED,
62                         asection *input_section,
63                         bfd *output_bfd,
64                         char **error_message ATTRIBUTE_UNUSED)
65 {
66   if (output_bfd != (bfd *) NULL
67       && (symbol->flags & BSF_SECTION_SYM) == 0)
68     {
69       reloc_entry->address += input_section->output_offset;
70       return bfd_reloc_ok;
71     }
72
73   return bfd_reloc_continue;
74 }
75
76 static reloc_howto_type coff_sparc_howto_table[] =
77 {
78   HOWTO(R_SPARC_NONE,    0,0, 0,FALSE,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_NONE",    FALSE,0,0x00000000,TRUE),
79   HOWTO(R_SPARC_8,       0,0, 8,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_8",       FALSE,0,0x000000ff,TRUE),
80   HOWTO(R_SPARC_16,      0,1,16,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_16",      FALSE,0,0x0000ffff,TRUE),
81   HOWTO(R_SPARC_32,      0,2,32,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_32",      FALSE,0,0xffffffff,TRUE),
82   HOWTO(R_SPARC_DISP8,   0,0, 8,TRUE, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_DISP8",   FALSE,0,0x000000ff,TRUE),
83   HOWTO(R_SPARC_DISP16,  0,1,16,TRUE, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_DISP16",  FALSE,0,0x0000ffff,TRUE),
84   HOWTO(R_SPARC_DISP32,  0,2,32,TRUE, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_DISP32",  FALSE,0,0x00ffffff,TRUE),
85   HOWTO(R_SPARC_WDISP30, 2,2,30,TRUE, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_WDISP30", FALSE,0,0x3fffffff,TRUE),
86   HOWTO(R_SPARC_WDISP22, 2,2,22,TRUE, 0,complain_overflow_signed,  bfd_coff_generic_reloc,"R_SPARC_WDISP22", FALSE,0,0x003fffff,TRUE),
87   HOWTO(R_SPARC_HI22,   10,2,22,FALSE,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_HI22",    FALSE,0,0x003fffff,TRUE),
88   HOWTO(R_SPARC_22,      0,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_22",      FALSE,0,0x003fffff,TRUE),
89   HOWTO(R_SPARC_13,      0,2,13,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_13",      FALSE,0,0x00001fff,TRUE),
90   HOWTO(R_SPARC_LO10,    0,2,10,FALSE,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_LO10",    FALSE,0,0x000003ff,TRUE),
91   HOWTO(R_SPARC_GOT10,   0,2,10,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT10",   FALSE,0,0x000003ff,TRUE),
92   HOWTO(R_SPARC_GOT13,   0,2,13,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT13",   FALSE,0,0x00001fff,TRUE),
93   HOWTO(R_SPARC_GOT22,  10,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_GOT22",   FALSE,0,0x003fffff,TRUE),
94   HOWTO(R_SPARC_PC10,    0,2,10,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC10",    FALSE,0,0x000003ff,TRUE),
95   HOWTO(R_SPARC_PC22,    0,2,22,FALSE,0,complain_overflow_bitfield,bfd_coff_generic_reloc,"R_SPARC_PC22",    FALSE,0,0x003fffff,TRUE),
96   HOWTO(R_SPARC_WPLT30,  0,0,00,FALSE,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_WPLT30",  FALSE,0,0x00000000,TRUE),
97   HOWTO(R_SPARC_COPY,    0,0,00,FALSE,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_COPY",    FALSE,0,0x00000000,TRUE),
98   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),
99   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),
100   HOWTO(R_SPARC_RELATIVE,0,0,00,FALSE,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_RELATIVE",FALSE,0,0x00000000,TRUE),
101   HOWTO(R_SPARC_UA32,    0,0,00,FALSE,0,complain_overflow_dont,    bfd_coff_generic_reloc,"R_SPARC_UA32",    FALSE,0,0x00000000,TRUE),
102 };
103
104 struct coff_reloc_map
105 {
106   bfd_reloc_code_real_type bfd_reloc_val;
107   unsigned char coff_reloc_val;
108 };
109
110 static const struct coff_reloc_map sparc_reloc_map[] =
111 {
112   { BFD_RELOC_NONE, R_SPARC_NONE, },
113   { BFD_RELOC_16, R_SPARC_16, },
114   { BFD_RELOC_8, R_SPARC_8 },
115   { BFD_RELOC_8_PCREL, R_SPARC_DISP8 },
116   { BFD_RELOC_CTOR, R_SPARC_32 }, /* @@ Assumes 32 bits.  */
117   { BFD_RELOC_32, R_SPARC_32 },
118   { BFD_RELOC_32_PCREL, R_SPARC_DISP32 },
119   { BFD_RELOC_HI22, R_SPARC_HI22 },
120   { BFD_RELOC_LO10, R_SPARC_LO10, },
121   { BFD_RELOC_32_PCREL_S2, R_SPARC_WDISP30 },
122   { BFD_RELOC_SPARC22, R_SPARC_22 },
123   { BFD_RELOC_SPARC13, R_SPARC_13 },
124   { BFD_RELOC_SPARC_GOT10, R_SPARC_GOT10 },
125   { BFD_RELOC_SPARC_GOT13, R_SPARC_GOT13 },
126   { BFD_RELOC_SPARC_GOT22, R_SPARC_GOT22 },
127   { BFD_RELOC_SPARC_PC10, R_SPARC_PC10 },
128   { BFD_RELOC_SPARC_PC22, R_SPARC_PC22 },
129   { BFD_RELOC_SPARC_WPLT30, R_SPARC_WPLT30 },
130   { BFD_RELOC_SPARC_COPY, R_SPARC_COPY },
131   { BFD_RELOC_SPARC_GLOB_DAT, R_SPARC_GLOB_DAT },
132   { BFD_RELOC_SPARC_JMP_SLOT, R_SPARC_JMP_SLOT },
133   { BFD_RELOC_SPARC_RELATIVE, R_SPARC_RELATIVE },
134   { BFD_RELOC_SPARC_WDISP22, R_SPARC_WDISP22 },
135   /*  { BFD_RELOC_SPARC_UA32, R_SPARC_UA32 }, not used?? */
136 };
137
138 static reloc_howto_type *
139 coff_sparc_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
140                               bfd_reloc_code_real_type code)
141 {
142   unsigned int i;
143   for (i = 0; i < sizeof (sparc_reloc_map) / sizeof (struct coff_reloc_map); i++)
144     {
145       if (sparc_reloc_map[i].bfd_reloc_val == code)
146         return &coff_sparc_howto_table[(int) sparc_reloc_map[i].coff_reloc_val];
147     }
148   return 0;
149 }
150 #define coff_bfd_reloc_type_lookup      coff_sparc_reloc_type_lookup
151
152 static reloc_howto_type *
153 coff_sparc_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
154                               const char *r_name)
155 {
156   unsigned int i;
157
158   for (i = 0;
159        i < (sizeof (coff_sparc_howto_table)
160             / sizeof (coff_sparc_howto_table[0]));
161        i++)
162     if (coff_sparc_howto_table[i].name != NULL
163         && strcasecmp (coff_sparc_howto_table[i].name, r_name) == 0)
164       return &coff_sparc_howto_table[i];
165
166   return NULL;
167 }
168 #define coff_bfd_reloc_name_lookup coff_sparc_reloc_name_lookup
169
170 static void
171 rtype2howto (arelent *cache_ptr, struct internal_reloc *dst)
172 {
173   BFD_ASSERT (dst->r_type < (unsigned int) R_SPARC_max);
174   cache_ptr->howto = &coff_sparc_howto_table[dst->r_type];
175 }
176
177 #define RTYPE2HOWTO(internal, relocentry) rtype2howto(internal,relocentry)
178
179 #define SWAP_IN_RELOC_OFFSET    H_GET_32
180 #define SWAP_OUT_RELOC_OFFSET   H_PUT_32
181 #define CALC_ADDEND(abfd, ptr, reloc, cache_ptr) \
182   cache_ptr->addend = reloc.r_offset;
183
184 /* Clear the r_spare field in relocs.  */
185 #define SWAP_OUT_RELOC_EXTRA(abfd,src,dst) \
186   do { \
187        dst->r_spare[0] = 0; \
188        dst->r_spare[1] = 0; \
189      } while (0)
190
191 #define __A_MAGIC_SET__
192
193 /* Enable Sparc-specific hacks in coffcode.h.  */
194
195 #define COFF_SPARC
196
197 #define bfd_pe_print_pdata      NULL
198
199 #include "coffcode.h"
200
201 #ifndef TARGET_SYM
202 #define TARGET_SYM sparccoff_vec
203 #endif
204
205 #ifndef TARGET_NAME
206 #define TARGET_NAME "coff-sparc"
207 #endif
208
209 CREATE_BIG_COFF_TARGET_VEC (TARGET_SYM, TARGET_NAME, D_PAGED, 0, '_', NULL, COFF_SWAP_TABLE)