1 /* SPARC-specific support for ELF
2 Copyright (C) 2005-2016 Free Software Foundation, Inc.
4 This file is part of BFD, the Binary File Descriptor library.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 3 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
19 MA 02110-1301, USA. */
22 /* This file handles functionality common to the different SPARC ABI's. */
28 #include "libiberty.h"
30 #include "elf/sparc.h"
31 #include "opcode/sparc.h"
32 #include "elfxx-sparc.h"
33 #include "elf-vxworks.h"
37 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
38 #define MINUS_ONE (~ (bfd_vma) 0)
40 #define ABI_64_P(abfd) \
41 (get_elf_backend_data (abfd)->s->elfclass == ELFCLASS64)
43 /* The relocation "howto" table. */
45 /* Utility for performing the standard initial work of an instruction
47 *PRELOCATION will contain the relocated item.
48 *PINSN will contain the instruction from the input stream.
49 If the result is `bfd_reloc_other' the caller can continue with
50 performing the relocation. Otherwise it must stop and return the
51 value to its caller. */
53 static bfd_reloc_status_type
54 init_insn_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
55 void * data, asection *input_section, bfd *output_bfd,
56 bfd_vma *prelocation, bfd_vma *pinsn)
59 reloc_howto_type *howto = reloc_entry->howto;
61 if (output_bfd != (bfd *) NULL
62 && (symbol->flags & BSF_SECTION_SYM) == 0
63 && (! howto->partial_inplace
64 || reloc_entry->addend == 0))
66 reloc_entry->address += input_section->output_offset;
70 /* This works because partial_inplace is FALSE. */
71 if (output_bfd != NULL)
72 return bfd_reloc_continue;
74 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
75 return bfd_reloc_outofrange;
77 relocation = (symbol->value
78 + symbol->section->output_section->vma
79 + symbol->section->output_offset);
80 relocation += reloc_entry->addend;
81 if (howto->pc_relative)
83 relocation -= (input_section->output_section->vma
84 + input_section->output_offset);
85 relocation -= reloc_entry->address;
88 *prelocation = relocation;
89 *pinsn = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
90 return bfd_reloc_other;
93 /* For unsupported relocs. */
95 static bfd_reloc_status_type
96 sparc_elf_notsup_reloc (bfd *abfd ATTRIBUTE_UNUSED,
97 arelent *reloc_entry ATTRIBUTE_UNUSED,
98 asymbol *symbol ATTRIBUTE_UNUSED,
99 void * data ATTRIBUTE_UNUSED,
100 asection *input_section ATTRIBUTE_UNUSED,
101 bfd *output_bfd ATTRIBUTE_UNUSED,
102 char **error_message ATTRIBUTE_UNUSED)
104 return bfd_reloc_notsupported;
107 /* Handle the WDISP16 reloc. */
109 static bfd_reloc_status_type
110 sparc_elf_wdisp16_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
111 void * data, asection *input_section, bfd *output_bfd,
112 char **error_message ATTRIBUTE_UNUSED)
116 bfd_reloc_status_type status;
118 status = init_insn_reloc (abfd, reloc_entry, symbol, data,
119 input_section, output_bfd, &relocation, &insn);
120 if (status != bfd_reloc_other)
123 insn &= ~ (bfd_vma) 0x303fff;
124 insn |= (((relocation >> 2) & 0xc000) << 6) | ((relocation >> 2) & 0x3fff);
125 bfd_put_32 (abfd, insn, (bfd_byte *) data + reloc_entry->address);
127 if ((bfd_signed_vma) relocation < - 0x40000
128 || (bfd_signed_vma) relocation > 0x3ffff)
129 return bfd_reloc_overflow;
134 /* Handle the WDISP10 reloc. */
136 static bfd_reloc_status_type
137 sparc_elf_wdisp10_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
138 void * data, asection *input_section, bfd *output_bfd,
139 char **error_message ATTRIBUTE_UNUSED)
143 bfd_reloc_status_type status;
145 status = init_insn_reloc (abfd, reloc_entry, symbol, data,
146 input_section, output_bfd, &relocation, &insn);
147 if (status != bfd_reloc_other)
150 insn &= ~ (bfd_vma) 0x181fe0;
151 insn |= (((relocation >> 2) & 0x300) << 11)
152 | (((relocation >> 2) & 0xff) << 5);
153 bfd_put_32 (abfd, insn, (bfd_byte *) data + reloc_entry->address);
155 if ((bfd_signed_vma) relocation < - 0x1000
156 || (bfd_signed_vma) relocation > 0xfff)
157 return bfd_reloc_overflow;
162 /* Handle the HIX22 reloc. */
164 static bfd_reloc_status_type
165 sparc_elf_hix22_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
166 void * data, asection *input_section, bfd *output_bfd,
167 char **error_message ATTRIBUTE_UNUSED)
171 bfd_reloc_status_type status;
173 status = init_insn_reloc (abfd, reloc_entry, symbol, data,
174 input_section, output_bfd, &relocation, &insn);
175 if (status != bfd_reloc_other)
178 relocation ^= MINUS_ONE;
179 insn = (insn &~ (bfd_vma) 0x3fffff) | ((relocation >> 10) & 0x3fffff);
180 bfd_put_32 (abfd, insn, (bfd_byte *) data + reloc_entry->address);
182 if ((relocation & ~ (bfd_vma) 0xffffffff) != 0)
183 return bfd_reloc_overflow;
188 /* Handle the LOX10 reloc. */
190 static bfd_reloc_status_type
191 sparc_elf_lox10_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
192 void * data, asection *input_section, bfd *output_bfd,
193 char **error_message ATTRIBUTE_UNUSED)
197 bfd_reloc_status_type status;
199 status = init_insn_reloc (abfd, reloc_entry, symbol, data,
200 input_section, output_bfd, &relocation, &insn);
201 if (status != bfd_reloc_other)
204 insn = (insn &~ (bfd_vma) 0x1fff) | 0x1c00 | (relocation & 0x3ff);
205 bfd_put_32 (abfd, insn, (bfd_byte *) data + reloc_entry->address);
210 static reloc_howto_type _bfd_sparc_elf_howto_table[] =
212 HOWTO(R_SPARC_NONE, 0,3, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_NONE", FALSE,0,0x00000000,TRUE),
213 HOWTO(R_SPARC_8, 0,0, 8,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_8", FALSE,0,0x000000ff,TRUE),
214 HOWTO(R_SPARC_16, 0,1,16,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_16", FALSE,0,0x0000ffff,TRUE),
215 HOWTO(R_SPARC_32, 0,2,32,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_32", FALSE,0,0xffffffff,TRUE),
216 HOWTO(R_SPARC_DISP8, 0,0, 8,TRUE, 0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_DISP8", FALSE,0,0x000000ff,TRUE),
217 HOWTO(R_SPARC_DISP16, 0,1,16,TRUE, 0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_DISP16", FALSE,0,0x0000ffff,TRUE),
218 HOWTO(R_SPARC_DISP32, 0,2,32,TRUE, 0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_DISP32", FALSE,0,0xffffffff,TRUE),
219 HOWTO(R_SPARC_WDISP30, 2,2,30,TRUE, 0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_WDISP30", FALSE,0,0x3fffffff,TRUE),
220 HOWTO(R_SPARC_WDISP22, 2,2,22,TRUE, 0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_WDISP22", FALSE,0,0x003fffff,TRUE),
221 HOWTO(R_SPARC_HI22, 10,2,22,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_HI22", FALSE,0,0x003fffff,TRUE),
222 HOWTO(R_SPARC_22, 0,2,22,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_22", FALSE,0,0x003fffff,TRUE),
223 HOWTO(R_SPARC_13, 0,2,13,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_13", FALSE,0,0x00001fff,TRUE),
224 HOWTO(R_SPARC_LO10, 0,2,10,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_LO10", FALSE,0,0x000003ff,TRUE),
225 HOWTO(R_SPARC_GOT10, 0,2,10,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_GOT10", FALSE,0,0x000003ff,TRUE),
226 HOWTO(R_SPARC_GOT13, 0,2,13,FALSE,0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_GOT13", FALSE,0,0x00001fff,TRUE),
227 HOWTO(R_SPARC_GOT22, 10,2,22,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_GOT22", FALSE,0,0x003fffff,TRUE),
228 HOWTO(R_SPARC_PC10, 0,2,10,TRUE, 0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_PC10", FALSE,0,0x000003ff,TRUE),
229 HOWTO(R_SPARC_PC22, 10,2,22,TRUE, 0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_PC22", FALSE,0,0x003fffff,TRUE),
230 HOWTO(R_SPARC_WPLT30, 2,2,30,TRUE, 0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_WPLT30", FALSE,0,0x3fffffff,TRUE),
231 HOWTO(R_SPARC_COPY, 0,0,00,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_COPY", FALSE,0,0x00000000,TRUE),
232 HOWTO(R_SPARC_GLOB_DAT, 0,0,00,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_GLOB_DAT",FALSE,0,0x00000000,TRUE),
233 HOWTO(R_SPARC_JMP_SLOT, 0,0,00,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_JMP_SLOT",FALSE,0,0x00000000,TRUE),
234 HOWTO(R_SPARC_RELATIVE, 0,0,00,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_RELATIVE",FALSE,0,0x00000000,TRUE),
235 HOWTO(R_SPARC_UA32, 0,2,32,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_UA32", FALSE,0,0xffffffff,TRUE),
236 HOWTO(R_SPARC_PLT32, 0,2,32,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_PLT32", FALSE,0,0xffffffff,TRUE),
237 HOWTO(R_SPARC_HIPLT22, 0,0,00,FALSE,0,complain_overflow_dont, sparc_elf_notsup_reloc, "R_SPARC_HIPLT22", FALSE,0,0x00000000,TRUE),
238 HOWTO(R_SPARC_LOPLT10, 0,0,00,FALSE,0,complain_overflow_dont, sparc_elf_notsup_reloc, "R_SPARC_LOPLT10", FALSE,0,0x00000000,TRUE),
239 HOWTO(R_SPARC_PCPLT32, 0,0,00,FALSE,0,complain_overflow_dont, sparc_elf_notsup_reloc, "R_SPARC_PCPLT32", FALSE,0,0x00000000,TRUE),
240 HOWTO(R_SPARC_PCPLT22, 0,0,00,FALSE,0,complain_overflow_dont, sparc_elf_notsup_reloc, "R_SPARC_PCPLT22", FALSE,0,0x00000000,TRUE),
241 HOWTO(R_SPARC_PCPLT10, 0,0,00,FALSE,0,complain_overflow_dont, sparc_elf_notsup_reloc, "R_SPARC_PCPLT10", FALSE,0,0x00000000,TRUE),
242 HOWTO(R_SPARC_10, 0,2,10,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_10", FALSE,0,0x000003ff,TRUE),
243 HOWTO(R_SPARC_11, 0,2,11,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_11", FALSE,0,0x000007ff,TRUE),
244 HOWTO(R_SPARC_64, 0,4,64,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_64", FALSE,0,MINUS_ONE, TRUE),
245 HOWTO(R_SPARC_OLO10, 0,2,13,FALSE,0,complain_overflow_signed, sparc_elf_notsup_reloc, "R_SPARC_OLO10", FALSE,0,0x00001fff,TRUE),
246 HOWTO(R_SPARC_HH22, 42,2,22,FALSE,0,complain_overflow_unsigned,bfd_elf_generic_reloc, "R_SPARC_HH22", FALSE,0,0x003fffff,TRUE),
247 HOWTO(R_SPARC_HM10, 32,2,10,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_HM10", FALSE,0,0x000003ff,TRUE),
248 HOWTO(R_SPARC_LM22, 10,2,22,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_LM22", FALSE,0,0x003fffff,TRUE),
249 HOWTO(R_SPARC_PC_HH22, 42,2,22,TRUE, 0,complain_overflow_unsigned,bfd_elf_generic_reloc, "R_SPARC_PC_HH22", FALSE,0,0x003fffff,TRUE),
250 HOWTO(R_SPARC_PC_HM10, 32,2,10,TRUE, 0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_PC_HM10", FALSE,0,0x000003ff,TRUE),
251 HOWTO(R_SPARC_PC_LM22, 10,2,22,TRUE, 0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_PC_LM22", FALSE,0,0x003fffff,TRUE),
252 HOWTO(R_SPARC_WDISP16, 2,2,16,TRUE, 0,complain_overflow_signed, sparc_elf_wdisp16_reloc,"R_SPARC_WDISP16", FALSE,0,0x00000000,TRUE),
253 HOWTO(R_SPARC_WDISP19, 2,2,19,TRUE, 0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_WDISP19", FALSE,0,0x0007ffff,TRUE),
254 HOWTO(R_SPARC_UNUSED_42, 0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_UNUSED_42",FALSE,0,0x00000000,TRUE),
255 HOWTO(R_SPARC_7, 0,2, 7,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_7", FALSE,0,0x0000007f,TRUE),
256 HOWTO(R_SPARC_5, 0,2, 5,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_5", FALSE,0,0x0000001f,TRUE),
257 HOWTO(R_SPARC_6, 0,2, 6,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_6", FALSE,0,0x0000003f,TRUE),
258 HOWTO(R_SPARC_DISP64, 0,4,64,TRUE, 0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_DISP64", FALSE,0,MINUS_ONE, TRUE),
259 HOWTO(R_SPARC_PLT64, 0,4,64,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_PLT64", FALSE,0,MINUS_ONE, TRUE),
260 HOWTO(R_SPARC_HIX22, 0,4, 0,FALSE,0,complain_overflow_bitfield,sparc_elf_hix22_reloc, "R_SPARC_HIX22", FALSE,0,MINUS_ONE, FALSE),
261 HOWTO(R_SPARC_LOX10, 0,4, 0,FALSE,0,complain_overflow_dont, sparc_elf_lox10_reloc, "R_SPARC_LOX10", FALSE,0,MINUS_ONE, FALSE),
262 HOWTO(R_SPARC_H44, 22,2,22,FALSE,0,complain_overflow_unsigned,bfd_elf_generic_reloc, "R_SPARC_H44", FALSE,0,0x003fffff,FALSE),
263 HOWTO(R_SPARC_M44, 12,2,10,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_M44", FALSE,0,0x000003ff,FALSE),
264 HOWTO(R_SPARC_L44, 0,2,13,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_L44", FALSE,0,0x00000fff,FALSE),
265 HOWTO(R_SPARC_REGISTER, 0,4, 0,FALSE,0,complain_overflow_bitfield,sparc_elf_notsup_reloc, "R_SPARC_REGISTER",FALSE,0,MINUS_ONE, FALSE),
266 HOWTO(R_SPARC_UA64, 0,4,64,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_UA64", FALSE,0,MINUS_ONE, TRUE),
267 HOWTO(R_SPARC_UA16, 0,1,16,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_UA16", FALSE,0,0x0000ffff,TRUE),
268 HOWTO(R_SPARC_TLS_GD_HI22,10,2,22,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_GD_HI22",FALSE,0,0x003fffff,TRUE),
269 HOWTO(R_SPARC_TLS_GD_LO10,0,2,10,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_GD_LO10",FALSE,0,0x000003ff,TRUE),
270 HOWTO(R_SPARC_TLS_GD_ADD,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_GD_ADD",FALSE,0,0x00000000,TRUE),
271 HOWTO(R_SPARC_TLS_GD_CALL,2,2,30,TRUE,0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_TLS_GD_CALL",FALSE,0,0x3fffffff,TRUE),
272 HOWTO(R_SPARC_TLS_LDM_HI22,10,2,22,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_LDM_HI22",FALSE,0,0x003fffff,TRUE),
273 HOWTO(R_SPARC_TLS_LDM_LO10,0,2,10,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_LDM_LO10",FALSE,0,0x000003ff,TRUE),
274 HOWTO(R_SPARC_TLS_LDM_ADD,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_LDM_ADD",FALSE,0,0x00000000,TRUE),
275 HOWTO(R_SPARC_TLS_LDM_CALL,2,2,30,TRUE,0,complain_overflow_signed, bfd_elf_generic_reloc, "R_SPARC_TLS_LDM_CALL",FALSE,0,0x3fffffff,TRUE),
276 HOWTO(R_SPARC_TLS_LDO_HIX22,0,2,0,FALSE,0,complain_overflow_bitfield,sparc_elf_hix22_reloc,"R_SPARC_TLS_LDO_HIX22",FALSE,0,0x003fffff, FALSE),
277 HOWTO(R_SPARC_TLS_LDO_LOX10,0,2,0,FALSE,0,complain_overflow_dont, sparc_elf_lox10_reloc, "R_SPARC_TLS_LDO_LOX10",FALSE,0,0x000003ff, FALSE),
278 HOWTO(R_SPARC_TLS_LDO_ADD,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_LDO_ADD",FALSE,0,0x00000000,TRUE),
279 HOWTO(R_SPARC_TLS_IE_HI22,10,2,22,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_IE_HI22",FALSE,0,0x003fffff,TRUE),
280 HOWTO(R_SPARC_TLS_IE_LO10,0,2,10,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_IE_LO10",FALSE,0,0x000003ff,TRUE),
281 HOWTO(R_SPARC_TLS_IE_LD,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_IE_LD",FALSE,0,0x00000000,TRUE),
282 HOWTO(R_SPARC_TLS_IE_LDX,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_IE_LDX",FALSE,0,0x00000000,TRUE),
283 HOWTO(R_SPARC_TLS_IE_ADD,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_IE_ADD",FALSE,0,0x00000000,TRUE),
284 HOWTO(R_SPARC_TLS_LE_HIX22,0,2,0,FALSE,0,complain_overflow_bitfield,sparc_elf_hix22_reloc, "R_SPARC_TLS_LE_HIX22",FALSE,0,0x003fffff, FALSE),
285 HOWTO(R_SPARC_TLS_LE_LOX10,0,2,0,FALSE,0,complain_overflow_dont, sparc_elf_lox10_reloc, "R_SPARC_TLS_LE_LOX10",FALSE,0,0x000003ff, FALSE),
286 HOWTO(R_SPARC_TLS_DTPMOD32,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_DTPMOD32",FALSE,0,0x00000000,TRUE),
287 HOWTO(R_SPARC_TLS_DTPMOD64,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_DTPMOD64",FALSE,0,0x00000000,TRUE),
288 HOWTO(R_SPARC_TLS_DTPOFF32,0,2,32,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc,"R_SPARC_TLS_DTPOFF32",FALSE,0,0xffffffff,TRUE),
289 HOWTO(R_SPARC_TLS_DTPOFF64,0,4,64,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc,"R_SPARC_TLS_DTPOFF64",FALSE,0,MINUS_ONE,TRUE),
290 HOWTO(R_SPARC_TLS_TPOFF32,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_TPOFF32",FALSE,0,0x00000000,TRUE),
291 HOWTO(R_SPARC_TLS_TPOFF64,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_TLS_TPOFF64",FALSE,0,0x00000000,TRUE),
292 HOWTO(R_SPARC_GOTDATA_HIX22,0,2,0,FALSE,0,complain_overflow_bitfield,sparc_elf_hix22_reloc,"R_SPARC_GOTDATA_HIX22",FALSE,0,0x003fffff, FALSE),
293 HOWTO(R_SPARC_GOTDATA_LOX10,0,2,0,FALSE,0,complain_overflow_dont, sparc_elf_lox10_reloc, "R_SPARC_GOTDATA_LOX10",FALSE,0,0x000003ff, FALSE),
294 HOWTO(R_SPARC_GOTDATA_OP_HIX22,0,2,0,FALSE,0,complain_overflow_bitfield,sparc_elf_hix22_reloc,"R_SPARC_GOTDATA_OP_HIX22",FALSE,0,0x003fffff, FALSE),
295 HOWTO(R_SPARC_GOTDATA_OP_LOX10,0,2,0,FALSE,0,complain_overflow_dont, sparc_elf_lox10_reloc, "R_SPARC_GOTDATA_OP_LOX10",FALSE,0,0x000003ff, FALSE),
296 HOWTO(R_SPARC_GOTDATA_OP,0,0, 0,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_GOTDATA_OP",FALSE,0,0x00000000,TRUE),
297 HOWTO(R_SPARC_H34,12,2,22,FALSE,0,complain_overflow_unsigned,bfd_elf_generic_reloc,"R_SPARC_H34",FALSE,0,0x003fffff,FALSE),
298 HOWTO(R_SPARC_SIZE32,0,2,32,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc,"R_SPARC_SIZE32",FALSE,0,0xffffffff,TRUE),
299 HOWTO(R_SPARC_SIZE64,0,4,64,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc,"R_SPARC_SIZE64",FALSE,0,MINUS_ONE, TRUE),
300 HOWTO(R_SPARC_WDISP10,2,2,10,TRUE, 0,complain_overflow_signed,sparc_elf_wdisp10_reloc,"R_SPARC_WDISP10",FALSE,0,0x00000000,TRUE),
302 static reloc_howto_type sparc_jmp_irel_howto =
303 HOWTO(R_SPARC_JMP_IREL, 0,0,00,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_JMP_IREL",FALSE,0,0x00000000,TRUE);
304 static reloc_howto_type sparc_irelative_howto =
305 HOWTO(R_SPARC_IRELATIVE, 0,0,00,FALSE,0,complain_overflow_dont, bfd_elf_generic_reloc, "R_SPARC_IRELATIVE",FALSE,0,0x00000000,TRUE);
306 static reloc_howto_type sparc_vtinherit_howto =
307 HOWTO (R_SPARC_GNU_VTINHERIT, 0,2,0,FALSE,0,complain_overflow_dont, NULL, "R_SPARC_GNU_VTINHERIT", FALSE,0, 0, FALSE);
308 static reloc_howto_type sparc_vtentry_howto =
309 HOWTO (R_SPARC_GNU_VTENTRY, 0,2,0,FALSE,0,complain_overflow_dont, _bfd_elf_rel_vtable_reloc_fn,"R_SPARC_GNU_VTENTRY", FALSE,0,0, FALSE);
310 static reloc_howto_type sparc_rev32_howto =
311 HOWTO(R_SPARC_REV32, 0,2,32,FALSE,0,complain_overflow_bitfield,bfd_elf_generic_reloc, "R_SPARC_REV32", FALSE,0,0xffffffff,TRUE);
314 _bfd_sparc_elf_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
315 bfd_reloc_code_real_type code)
317 /* We explicitly handle each relocation type in the switch
318 instead of using a lookup table for efficiency. */
322 return &_bfd_sparc_elf_howto_table[R_SPARC_NONE];
325 return &_bfd_sparc_elf_howto_table[R_SPARC_8];
328 return &_bfd_sparc_elf_howto_table[R_SPARC_16];
331 return &_bfd_sparc_elf_howto_table[R_SPARC_32];
333 case BFD_RELOC_8_PCREL:
334 return &_bfd_sparc_elf_howto_table[R_SPARC_DISP8];
336 case BFD_RELOC_16_PCREL:
337 return &_bfd_sparc_elf_howto_table[R_SPARC_DISP16];
339 case BFD_RELOC_32_PCREL:
340 return &_bfd_sparc_elf_howto_table[R_SPARC_DISP32];
342 case BFD_RELOC_32_PCREL_S2:
343 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP30];
345 case BFD_RELOC_SPARC_WDISP22:
346 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP22];
349 return &_bfd_sparc_elf_howto_table[R_SPARC_HI22];
351 case BFD_RELOC_SPARC22:
352 return &_bfd_sparc_elf_howto_table[R_SPARC_22];
354 case BFD_RELOC_SPARC13:
355 return &_bfd_sparc_elf_howto_table[R_SPARC_13];
358 return &_bfd_sparc_elf_howto_table[R_SPARC_LO10];
360 case BFD_RELOC_SPARC_GOT10:
361 return &_bfd_sparc_elf_howto_table[R_SPARC_GOT10];
363 case BFD_RELOC_SPARC_GOT13:
364 return &_bfd_sparc_elf_howto_table[R_SPARC_GOT13];
366 case BFD_RELOC_SPARC_GOT22:
367 return &_bfd_sparc_elf_howto_table[R_SPARC_GOT22];
369 case BFD_RELOC_SPARC_PC10:
370 return &_bfd_sparc_elf_howto_table[R_SPARC_PC10];
372 case BFD_RELOC_SPARC_PC22:
373 return &_bfd_sparc_elf_howto_table[R_SPARC_PC22];
375 case BFD_RELOC_SPARC_WPLT30:
376 return &_bfd_sparc_elf_howto_table[R_SPARC_WPLT30];
378 case BFD_RELOC_SPARC_COPY:
379 return &_bfd_sparc_elf_howto_table[R_SPARC_COPY];
381 case BFD_RELOC_SPARC_GLOB_DAT:
382 return &_bfd_sparc_elf_howto_table[R_SPARC_GLOB_DAT];
384 case BFD_RELOC_SPARC_JMP_SLOT:
385 return &_bfd_sparc_elf_howto_table[R_SPARC_JMP_SLOT];
387 case BFD_RELOC_SPARC_RELATIVE:
388 return &_bfd_sparc_elf_howto_table[R_SPARC_RELATIVE];
390 case BFD_RELOC_SPARC_UA32:
391 return &_bfd_sparc_elf_howto_table[R_SPARC_UA32];
393 case BFD_RELOC_SPARC_PLT32:
394 return &_bfd_sparc_elf_howto_table[R_SPARC_PLT32];
396 case BFD_RELOC_SPARC_10:
397 return &_bfd_sparc_elf_howto_table[R_SPARC_10];
399 case BFD_RELOC_SPARC_11:
400 return &_bfd_sparc_elf_howto_table[R_SPARC_11];
402 case BFD_RELOC_SPARC_64:
403 return &_bfd_sparc_elf_howto_table[R_SPARC_64];
405 case BFD_RELOC_SPARC_OLO10:
406 return &_bfd_sparc_elf_howto_table[R_SPARC_OLO10];
408 case BFD_RELOC_SPARC_HH22:
409 return &_bfd_sparc_elf_howto_table[R_SPARC_HH22];
411 case BFD_RELOC_SPARC_HM10:
412 return &_bfd_sparc_elf_howto_table[R_SPARC_HM10];
414 case BFD_RELOC_SPARC_LM22:
415 return &_bfd_sparc_elf_howto_table[R_SPARC_LM22];
417 case BFD_RELOC_SPARC_PC_HH22:
418 return &_bfd_sparc_elf_howto_table[R_SPARC_PC_HH22];
420 case BFD_RELOC_SPARC_PC_HM10:
421 return &_bfd_sparc_elf_howto_table[R_SPARC_PC_HM10];
423 case BFD_RELOC_SPARC_PC_LM22:
424 return &_bfd_sparc_elf_howto_table[R_SPARC_PC_LM22];
426 case BFD_RELOC_SPARC_WDISP16:
427 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP16];
429 case BFD_RELOC_SPARC_WDISP19:
430 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP19];
432 case BFD_RELOC_SPARC_7:
433 return &_bfd_sparc_elf_howto_table[R_SPARC_7];
435 case BFD_RELOC_SPARC_5:
436 return &_bfd_sparc_elf_howto_table[R_SPARC_5];
438 case BFD_RELOC_SPARC_6:
439 return &_bfd_sparc_elf_howto_table[R_SPARC_6];
441 case BFD_RELOC_SPARC_DISP64:
442 return &_bfd_sparc_elf_howto_table[R_SPARC_DISP64];
444 case BFD_RELOC_SPARC_PLT64:
445 return &_bfd_sparc_elf_howto_table[R_SPARC_PLT64];
447 case BFD_RELOC_SPARC_HIX22:
448 return &_bfd_sparc_elf_howto_table[R_SPARC_HIX22];
450 case BFD_RELOC_SPARC_LOX10:
451 return &_bfd_sparc_elf_howto_table[R_SPARC_LOX10];
453 case BFD_RELOC_SPARC_H44:
454 return &_bfd_sparc_elf_howto_table[R_SPARC_H44];
456 case BFD_RELOC_SPARC_M44:
457 return &_bfd_sparc_elf_howto_table[R_SPARC_M44];
459 case BFD_RELOC_SPARC_L44:
460 return &_bfd_sparc_elf_howto_table[R_SPARC_L44];
462 case BFD_RELOC_SPARC_REGISTER:
463 return &_bfd_sparc_elf_howto_table[R_SPARC_REGISTER];
465 case BFD_RELOC_SPARC_UA64:
466 return &_bfd_sparc_elf_howto_table[R_SPARC_UA64];
468 case BFD_RELOC_SPARC_UA16:
469 return &_bfd_sparc_elf_howto_table[R_SPARC_UA16];
471 case BFD_RELOC_SPARC_TLS_GD_HI22:
472 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_GD_HI22];
474 case BFD_RELOC_SPARC_TLS_GD_LO10:
475 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_GD_LO10];
477 case BFD_RELOC_SPARC_TLS_GD_ADD:
478 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_GD_ADD];
480 case BFD_RELOC_SPARC_TLS_GD_CALL:
481 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_GD_CALL];
483 case BFD_RELOC_SPARC_TLS_LDM_HI22:
484 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDM_HI22];
486 case BFD_RELOC_SPARC_TLS_LDM_LO10:
487 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDM_LO10];
489 case BFD_RELOC_SPARC_TLS_LDM_ADD:
490 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDM_ADD];
492 case BFD_RELOC_SPARC_TLS_LDM_CALL:
493 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDM_CALL];
495 case BFD_RELOC_SPARC_TLS_LDO_HIX22:
496 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDO_HIX22];
498 case BFD_RELOC_SPARC_TLS_LDO_LOX10:
499 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDO_LOX10];
501 case BFD_RELOC_SPARC_TLS_LDO_ADD:
502 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDO_ADD];
504 case BFD_RELOC_SPARC_TLS_IE_HI22:
505 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_HI22];
507 case BFD_RELOC_SPARC_TLS_IE_LO10:
508 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_LO10];
510 case BFD_RELOC_SPARC_TLS_IE_LD:
511 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_LD];
513 case BFD_RELOC_SPARC_TLS_IE_LDX:
514 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_LDX];
516 case BFD_RELOC_SPARC_TLS_IE_ADD:
517 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_ADD];
519 case BFD_RELOC_SPARC_TLS_LE_HIX22:
520 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LE_HIX22];
522 case BFD_RELOC_SPARC_TLS_LE_LOX10:
523 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LE_LOX10];
525 case BFD_RELOC_SPARC_TLS_DTPMOD32:
526 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_DTPMOD32];
528 case BFD_RELOC_SPARC_TLS_DTPMOD64:
529 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_DTPMOD64];
531 case BFD_RELOC_SPARC_TLS_DTPOFF32:
532 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_DTPOFF32];
534 case BFD_RELOC_SPARC_TLS_DTPOFF64:
535 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_DTPOFF64];
537 case BFD_RELOC_SPARC_TLS_TPOFF32:
538 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_TPOFF32];
540 case BFD_RELOC_SPARC_TLS_TPOFF64:
541 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_TPOFF64];
543 case BFD_RELOC_SPARC_GOTDATA_HIX22:
544 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_HIX22];
546 case BFD_RELOC_SPARC_GOTDATA_LOX10:
547 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_LOX10];
549 case BFD_RELOC_SPARC_GOTDATA_OP_HIX22:
550 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_OP_HIX22];
552 case BFD_RELOC_SPARC_GOTDATA_OP_LOX10:
553 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_OP_LOX10];
555 case BFD_RELOC_SPARC_GOTDATA_OP:
556 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_OP];
558 case BFD_RELOC_SPARC_H34:
559 return &_bfd_sparc_elf_howto_table[R_SPARC_H34];
561 case BFD_RELOC_SPARC_SIZE32:
562 return &_bfd_sparc_elf_howto_table[R_SPARC_SIZE32];
564 case BFD_RELOC_SPARC_SIZE64:
565 return &_bfd_sparc_elf_howto_table[R_SPARC_SIZE64];
567 case BFD_RELOC_SPARC_WDISP10:
568 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP10];
570 case BFD_RELOC_SPARC_JMP_IREL:
571 return &sparc_jmp_irel_howto;
573 case BFD_RELOC_SPARC_IRELATIVE:
574 return &sparc_irelative_howto;
576 case BFD_RELOC_VTABLE_INHERIT:
577 return &sparc_vtinherit_howto;
579 case BFD_RELOC_VTABLE_ENTRY:
580 return &sparc_vtentry_howto;
582 case BFD_RELOC_SPARC_REV32:
583 return &sparc_rev32_howto;
588 bfd_set_error (bfd_error_bad_value);
593 _bfd_sparc_elf_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
599 i < (sizeof (_bfd_sparc_elf_howto_table)
600 / sizeof (_bfd_sparc_elf_howto_table[0]));
602 if (_bfd_sparc_elf_howto_table[i].name != NULL
603 && strcasecmp (_bfd_sparc_elf_howto_table[i].name, r_name) == 0)
604 return &_bfd_sparc_elf_howto_table[i];
606 if (strcasecmp (sparc_vtinherit_howto.name, r_name) == 0)
607 return &sparc_vtinherit_howto;
608 if (strcasecmp (sparc_vtentry_howto.name, r_name) == 0)
609 return &sparc_vtentry_howto;
610 if (strcasecmp (sparc_rev32_howto.name, r_name) == 0)
611 return &sparc_rev32_howto;
617 _bfd_sparc_elf_info_to_howto_ptr (unsigned int r_type)
621 case R_SPARC_JMP_IREL:
622 return &sparc_jmp_irel_howto;
624 case R_SPARC_IRELATIVE:
625 return &sparc_irelative_howto;
627 case R_SPARC_GNU_VTINHERIT:
628 return &sparc_vtinherit_howto;
630 case R_SPARC_GNU_VTENTRY:
631 return &sparc_vtentry_howto;
634 return &sparc_rev32_howto;
637 if (r_type >= (unsigned int) R_SPARC_max_std)
639 _bfd_error_handler (_("invalid relocation type %d"), (int) r_type);
640 r_type = R_SPARC_NONE;
642 return &_bfd_sparc_elf_howto_table[r_type];
646 /* Both 32-bit and 64-bit sparc encode this in an identical manner,
647 so just take advantage of that. */
648 #define SPARC_ELF_R_TYPE(r_info) \
652 _bfd_sparc_elf_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *cache_ptr,
653 Elf_Internal_Rela *dst)
655 unsigned int r_type = SPARC_ELF_R_TYPE (dst->r_info);
657 cache_ptr->howto = _bfd_sparc_elf_info_to_howto_ptr (r_type);
661 /* The nop opcode we use. */
662 #define SPARC_NOP 0x01000000
664 #define SPARC_INSN_BYTES 4
666 /* The SPARC linker needs to keep track of the number of relocs that it
667 decides to copy as dynamic relocs in check_relocs for each symbol.
668 This is so that it can later discard them if they are found to be
669 unnecessary. We store the information in a field extending the
670 regular ELF linker hash table. */
672 struct _bfd_sparc_elf_dyn_relocs
674 struct _bfd_sparc_elf_dyn_relocs *next;
676 /* The input section of the reloc. */
679 /* Total number of relocs copied for the input section. */
682 /* Number of pc-relative relocs copied for the input section. */
683 bfd_size_type pc_count;
686 /* SPARC ELF linker hash entry. */
688 struct _bfd_sparc_elf_link_hash_entry
690 struct elf_link_hash_entry elf;
692 /* Track dynamic relocs copied for this symbol. */
693 struct _bfd_sparc_elf_dyn_relocs *dyn_relocs;
695 #define GOT_UNKNOWN 0
699 unsigned char tls_type;
702 #define _bfd_sparc_elf_hash_entry(ent) ((struct _bfd_sparc_elf_link_hash_entry *)(ent))
704 struct _bfd_sparc_elf_obj_tdata
706 struct elf_obj_tdata root;
708 /* tls_type for each local got entry. */
709 char *local_got_tls_type;
711 /* TRUE if TLS GD relocs has been seen for this object. */
712 bfd_boolean has_tlsgd;
715 #define _bfd_sparc_elf_tdata(abfd) \
716 ((struct _bfd_sparc_elf_obj_tdata *) (abfd)->tdata.any)
718 #define _bfd_sparc_elf_local_got_tls_type(abfd) \
719 (_bfd_sparc_elf_tdata (abfd)->local_got_tls_type)
721 #define is_sparc_elf(bfd) \
722 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
723 && elf_tdata (bfd) != NULL \
724 && elf_object_id (bfd) == SPARC_ELF_DATA)
727 _bfd_sparc_elf_mkobject (bfd *abfd)
729 return bfd_elf_allocate_object (abfd, sizeof (struct _bfd_sparc_elf_obj_tdata),
734 sparc_put_word_32 (bfd *abfd, bfd_vma val, void *ptr)
736 bfd_put_32 (abfd, val, ptr);
740 sparc_put_word_64 (bfd *abfd, bfd_vma val, void *ptr)
742 bfd_put_64 (abfd, val, ptr);
746 sparc_elf_append_rela (bfd *abfd, asection *s, Elf_Internal_Rela *rel)
748 const struct elf_backend_data *bed;
751 bed = get_elf_backend_data (abfd);
752 loc = s->contents + (s->reloc_count++ * bed->s->sizeof_rela);
753 bed->s->swap_reloca_out (abfd, rel, loc);
757 sparc_elf_r_info_64 (Elf_Internal_Rela *in_rel ATTRIBUTE_UNUSED,
758 bfd_vma rel_index ATTRIBUTE_UNUSED,
759 bfd_vma type ATTRIBUTE_UNUSED)
761 return ELF64_R_INFO (rel_index,
763 ELF64_R_TYPE_INFO (ELF64_R_TYPE_DATA (in_rel->r_info),
768 sparc_elf_r_info_32 (Elf_Internal_Rela *in_rel ATTRIBUTE_UNUSED,
769 bfd_vma rel_index, bfd_vma type)
771 return ELF32_R_INFO (rel_index, type);
775 sparc_elf_r_symndx_64 (bfd_vma r_info)
777 bfd_vma r_symndx = ELF32_R_SYM (r_info);
778 return (r_symndx >> 24);
782 sparc_elf_r_symndx_32 (bfd_vma r_info)
784 return ELF32_R_SYM (r_info);
789 #define PLT32_ENTRY_SIZE 12
790 #define PLT32_HEADER_SIZE (4 * PLT32_ENTRY_SIZE)
792 /* The first four entries in a 32-bit procedure linkage table are reserved,
793 and the initial contents are unimportant (we zero them out).
794 Subsequent entries look like this. See the SVR4 ABI SPARC
795 supplement to see how this works. */
797 /* sethi %hi(.-.plt0),%g1. We fill in the address later. */
798 #define PLT32_ENTRY_WORD0 0x03000000
799 /* b,a .plt0. We fill in the offset later. */
800 #define PLT32_ENTRY_WORD1 0x30800000
802 #define PLT32_ENTRY_WORD2 SPARC_NOP
805 sparc32_plt_entry_build (bfd *output_bfd, asection *splt, bfd_vma offset,
806 bfd_vma max ATTRIBUTE_UNUSED,
809 bfd_put_32 (output_bfd,
810 PLT32_ENTRY_WORD0 + offset,
811 splt->contents + offset);
812 bfd_put_32 (output_bfd,
814 + (((- (offset + 4)) >> 2) & 0x3fffff)),
815 splt->contents + offset + 4);
816 bfd_put_32 (output_bfd, (bfd_vma) PLT32_ENTRY_WORD2,
817 splt->contents + offset + 8);
821 return offset / PLT32_ENTRY_SIZE - 4;
824 /* Both the headers and the entries are icache aligned. */
825 #define PLT64_ENTRY_SIZE 32
826 #define PLT64_HEADER_SIZE (4 * PLT64_ENTRY_SIZE)
827 #define PLT64_LARGE_THRESHOLD 32768
830 sparc64_plt_entry_build (bfd *output_bfd, asection *splt, bfd_vma offset,
831 bfd_vma max, bfd_vma *r_offset)
833 unsigned char *entry = splt->contents + offset;
834 const unsigned int nop = SPARC_NOP;
837 if (offset < (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE))
839 unsigned int sethi, ba;
843 plt_index = (offset / PLT64_ENTRY_SIZE);
845 sethi = 0x03000000 | (plt_index * PLT64_ENTRY_SIZE);
847 | (((splt->contents + PLT64_ENTRY_SIZE) - (entry + 4)) / 4 & 0x7ffff);
849 bfd_put_32 (output_bfd, (bfd_vma) sethi, entry);
850 bfd_put_32 (output_bfd, (bfd_vma) ba, entry + 4);
851 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 8);
852 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 12);
853 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 16);
854 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 20);
855 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 24);
856 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 28);
862 int block, last_block, ofs, last_ofs, chunks_this_block;
863 const int insn_chunk_size = (6 * 4);
864 const int ptr_chunk_size = (1 * 8);
865 const int entries_per_block = 160;
866 const int block_size = entries_per_block * (insn_chunk_size
869 /* Entries 32768 and higher are grouped into blocks of 160.
870 The blocks are further subdivided into 160 sequences of
871 6 instructions and 160 pointers. If a block does not require
872 the full 160 entries, let's say it requires N, then there
873 will be N sequences of 6 instructions and N pointers. */
875 offset -= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE);
876 max -= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE);
878 block = offset / block_size;
879 last_block = max / block_size;
880 if (block != last_block)
882 chunks_this_block = 160;
886 last_ofs = max % block_size;
887 chunks_this_block = last_ofs / (insn_chunk_size + ptr_chunk_size);
890 ofs = offset % block_size;
892 plt_index = (PLT64_LARGE_THRESHOLD +
894 (ofs / insn_chunk_size));
897 + (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE)
898 + (block * block_size)
899 + (chunks_this_block * insn_chunk_size)
900 + (ofs / insn_chunk_size) * ptr_chunk_size;
902 *r_offset = (bfd_vma) (ptr - splt->contents);
904 ldx = 0xc25be000 | ((ptr - (entry+4)) & 0x1fff);
912 bfd_put_32 (output_bfd, (bfd_vma) 0x8a10000f, entry);
913 bfd_put_32 (output_bfd, (bfd_vma) 0x40000002, entry + 4);
914 bfd_put_32 (output_bfd, (bfd_vma) SPARC_NOP, entry + 8);
915 bfd_put_32 (output_bfd, (bfd_vma) ldx, entry + 12);
916 bfd_put_32 (output_bfd, (bfd_vma) 0x83c3c001, entry + 16);
917 bfd_put_32 (output_bfd, (bfd_vma) 0x9e100005, entry + 20);
919 bfd_put_64 (output_bfd, (bfd_vma) (splt->contents - (entry + 4)), ptr);
922 return plt_index - 4;
925 /* The format of the first PLT entry in a VxWorks executable. */
926 static const bfd_vma sparc_vxworks_exec_plt0_entry[] =
928 0x05000000, /* sethi %hi(_GLOBAL_OFFSET_TABLE_+8), %g2 */
929 0x8410a000, /* or %g2, %lo(_GLOBAL_OFFSET_TABLE_+8), %g2 */
930 0xc4008000, /* ld [ %g2 ], %g2 */
931 0x81c08000, /* jmp %g2 */
935 /* The format of subsequent PLT entries. */
936 static const bfd_vma sparc_vxworks_exec_plt_entry[] =
938 0x03000000, /* sethi %hi(_GLOBAL_OFFSET_TABLE_+f@got), %g1 */
939 0x82106000, /* or %g1, %lo(_GLOBAL_OFFSET_TABLE_+f@got), %g1 */
940 0xc2004000, /* ld [ %g1 ], %g1 */
941 0x81c04000, /* jmp %g1 */
942 0x01000000, /* nop */
943 0x03000000, /* sethi %hi(f@pltindex), %g1 */
944 0x10800000, /* b _PLT_resolve */
945 0x82106000 /* or %g1, %lo(f@pltindex), %g1 */
948 /* The format of the first PLT entry in a VxWorks shared object. */
949 static const bfd_vma sparc_vxworks_shared_plt0_entry[] =
951 0xc405e008, /* ld [ %l7 + 8 ], %g2 */
952 0x81c08000, /* jmp %g2 */
956 /* The format of subsequent PLT entries. */
957 static const bfd_vma sparc_vxworks_shared_plt_entry[] =
959 0x03000000, /* sethi %hi(f@got), %g1 */
960 0x82106000, /* or %g1, %lo(f@got), %g1 */
961 0xc205c001, /* ld [ %l7 + %g1 ], %g1 */
962 0x81c04000, /* jmp %g1 */
963 0x01000000, /* nop */
964 0x03000000, /* sethi %hi(f@pltindex), %g1 */
965 0x10800000, /* b _PLT_resolve */
966 0x82106000 /* or %g1, %lo(f@pltindex), %g1 */
969 #define SPARC_ELF_PUT_WORD(htab, bfd, val, ptr) \
970 htab->put_word(bfd, val, ptr)
972 #define SPARC_ELF_R_INFO(htab, in_rel, index, type) \
973 htab->r_info(in_rel, index, type)
975 #define SPARC_ELF_R_SYMNDX(htab, r_info) \
976 htab->r_symndx(r_info)
978 #define SPARC_ELF_WORD_BYTES(htab) \
981 #define SPARC_ELF_RELA_BYTES(htab) \
984 #define SPARC_ELF_DTPOFF_RELOC(htab) \
987 #define SPARC_ELF_DTPMOD_RELOC(htab) \
990 #define SPARC_ELF_TPOFF_RELOC(htab) \
993 #define SPARC_ELF_BUILD_PLT_ENTRY(htab, obfd, splt, off, max, r_off) \
994 htab->build_plt_entry (obfd, splt, off, max, r_off)
996 /* Create an entry in an SPARC ELF linker hash table. */
998 static struct bfd_hash_entry *
999 link_hash_newfunc (struct bfd_hash_entry *entry,
1000 struct bfd_hash_table *table, const char *string)
1002 /* Allocate the structure if it has not already been allocated by a
1006 entry = bfd_hash_allocate (table,
1007 sizeof (struct _bfd_sparc_elf_link_hash_entry));
1012 /* Call the allocation method of the superclass. */
1013 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
1016 struct _bfd_sparc_elf_link_hash_entry *eh;
1018 eh = (struct _bfd_sparc_elf_link_hash_entry *) entry;
1019 eh->dyn_relocs = NULL;
1020 eh->tls_type = GOT_UNKNOWN;
1026 /* The name of the dynamic interpreter. This is put in the .interp
1029 #define ELF32_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
1030 #define ELF64_DYNAMIC_INTERPRETER "/usr/lib/sparcv9/ld.so.1"
1032 /* Compute a hash of a local hash entry. We use elf_link_hash_entry
1033 for local symbol so that we can handle local STT_GNU_IFUNC symbols
1034 as global symbol. We reuse indx and dynstr_index for local symbol
1035 hash since they aren't used by global symbols in this backend. */
1038 elf_sparc_local_htab_hash (const void *ptr)
1040 struct elf_link_hash_entry *h
1041 = (struct elf_link_hash_entry *) ptr;
1042 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
1045 /* Compare local hash entries. */
1048 elf_sparc_local_htab_eq (const void *ptr1, const void *ptr2)
1050 struct elf_link_hash_entry *h1
1051 = (struct elf_link_hash_entry *) ptr1;
1052 struct elf_link_hash_entry *h2
1053 = (struct elf_link_hash_entry *) ptr2;
1055 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
1058 /* Find and/or create a hash entry for local symbol. */
1060 static struct elf_link_hash_entry *
1061 elf_sparc_get_local_sym_hash (struct _bfd_sparc_elf_link_hash_table *htab,
1062 bfd *abfd, const Elf_Internal_Rela *rel,
1065 struct _bfd_sparc_elf_link_hash_entry e, *ret;
1066 asection *sec = abfd->sections;
1067 unsigned long r_symndx;
1071 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
1072 h = ELF_LOCAL_SYMBOL_HASH (sec->id, r_symndx);
1074 e.elf.indx = sec->id;
1075 e.elf.dynstr_index = r_symndx;
1076 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
1077 create ? INSERT : NO_INSERT);
1084 ret = (struct _bfd_sparc_elf_link_hash_entry *) *slot;
1088 ret = (struct _bfd_sparc_elf_link_hash_entry *)
1089 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
1090 sizeof (struct _bfd_sparc_elf_link_hash_entry));
1093 memset (ret, 0, sizeof (*ret));
1094 ret->elf.indx = sec->id;
1095 ret->elf.dynstr_index = r_symndx;
1096 ret->elf.dynindx = -1;
1097 ret->elf.plt.offset = (bfd_vma) -1;
1098 ret->elf.got.offset = (bfd_vma) -1;
1104 /* Destroy a SPARC ELF linker hash table. */
1107 _bfd_sparc_elf_link_hash_table_free (bfd *obfd)
1109 struct _bfd_sparc_elf_link_hash_table *htab
1110 = (struct _bfd_sparc_elf_link_hash_table *) obfd->link.hash;
1112 if (htab->loc_hash_table)
1113 htab_delete (htab->loc_hash_table);
1114 if (htab->loc_hash_memory)
1115 objalloc_free ((struct objalloc *) htab->loc_hash_memory);
1116 _bfd_elf_link_hash_table_free (obfd);
1119 /* Create a SPARC ELF linker hash table. */
1121 struct bfd_link_hash_table *
1122 _bfd_sparc_elf_link_hash_table_create (bfd *abfd)
1124 struct _bfd_sparc_elf_link_hash_table *ret;
1125 bfd_size_type amt = sizeof (struct _bfd_sparc_elf_link_hash_table);
1127 ret = (struct _bfd_sparc_elf_link_hash_table *) bfd_zmalloc (amt);
1131 if (ABI_64_P (abfd))
1133 ret->put_word = sparc_put_word_64;
1134 ret->r_info = sparc_elf_r_info_64;
1135 ret->r_symndx = sparc_elf_r_symndx_64;
1136 ret->dtpoff_reloc = R_SPARC_TLS_DTPOFF64;
1137 ret->dtpmod_reloc = R_SPARC_TLS_DTPMOD64;
1138 ret->tpoff_reloc = R_SPARC_TLS_TPOFF64;
1139 ret->word_align_power = 3;
1140 ret->align_power_max = 4;
1141 ret->bytes_per_word = 8;
1142 ret->bytes_per_rela = sizeof (Elf64_External_Rela);
1143 ret->dynamic_interpreter = ELF64_DYNAMIC_INTERPRETER;
1144 ret->dynamic_interpreter_size = sizeof ELF64_DYNAMIC_INTERPRETER;
1146 ret->build_plt_entry = sparc64_plt_entry_build;
1147 ret->plt_header_size = PLT64_HEADER_SIZE;
1148 ret->plt_entry_size = PLT64_ENTRY_SIZE;
1152 ret->put_word = sparc_put_word_32;
1153 ret->r_info = sparc_elf_r_info_32;
1154 ret->r_symndx = sparc_elf_r_symndx_32;
1155 ret->dtpoff_reloc = R_SPARC_TLS_DTPOFF32;
1156 ret->dtpmod_reloc = R_SPARC_TLS_DTPMOD32;
1157 ret->tpoff_reloc = R_SPARC_TLS_TPOFF32;
1158 ret->word_align_power = 2;
1159 ret->align_power_max = 3;
1160 ret->bytes_per_word = 4;
1161 ret->bytes_per_rela = sizeof (Elf32_External_Rela);
1162 ret->dynamic_interpreter = ELF32_DYNAMIC_INTERPRETER;
1163 ret->dynamic_interpreter_size = sizeof ELF32_DYNAMIC_INTERPRETER;
1165 ret->build_plt_entry = sparc32_plt_entry_build;
1166 ret->plt_header_size = PLT32_HEADER_SIZE;
1167 ret->plt_entry_size = PLT32_ENTRY_SIZE;
1170 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd, link_hash_newfunc,
1171 sizeof (struct _bfd_sparc_elf_link_hash_entry),
1178 ret->loc_hash_table = htab_try_create (1024,
1179 elf_sparc_local_htab_hash,
1180 elf_sparc_local_htab_eq,
1182 ret->loc_hash_memory = objalloc_create ();
1183 if (!ret->loc_hash_table || !ret->loc_hash_memory)
1185 _bfd_sparc_elf_link_hash_table_free (abfd);
1188 ret->elf.root.hash_table_free = _bfd_sparc_elf_link_hash_table_free;
1190 return &ret->elf.root;
1193 /* Create .plt, .rela.plt, .got, .rela.got, .dynbss, and
1194 .rela.bss sections in DYNOBJ, and set up shortcuts to them in our
1198 _bfd_sparc_elf_create_dynamic_sections (bfd *dynobj,
1199 struct bfd_link_info *info)
1201 struct _bfd_sparc_elf_link_hash_table *htab;
1203 htab = _bfd_sparc_elf_hash_table (info);
1204 BFD_ASSERT (htab != NULL);
1206 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
1209 htab->sdynbss = bfd_get_linker_section (dynobj, ".dynbss");
1210 if (!bfd_link_pic (info))
1211 htab->srelbss = bfd_get_linker_section (dynobj, ".rela.bss");
1213 if (htab->is_vxworks)
1215 if (!elf_vxworks_create_dynamic_sections (dynobj, info, &htab->srelplt2))
1217 if (bfd_link_pic (info))
1219 htab->plt_header_size
1220 = 4 * ARRAY_SIZE (sparc_vxworks_shared_plt0_entry);
1221 htab->plt_entry_size
1222 = 4 * ARRAY_SIZE (sparc_vxworks_shared_plt_entry);
1226 htab->plt_header_size
1227 = 4 * ARRAY_SIZE (sparc_vxworks_exec_plt0_entry);
1228 htab->plt_entry_size
1229 = 4 * ARRAY_SIZE (sparc_vxworks_exec_plt_entry);
1233 if (!htab->elf.splt || !htab->elf.srelplt || !htab->sdynbss
1234 || (!bfd_link_pic (info) && !htab->srelbss))
1241 create_ifunc_sections (bfd *abfd, struct bfd_link_info *info)
1243 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
1244 struct elf_link_hash_table *htab = elf_hash_table (info);
1245 flagword flags, pltflags;
1248 if (htab->irelifunc != NULL || htab->iplt != NULL)
1251 flags = bed->dynamic_sec_flags;
1252 pltflags = flags | SEC_ALLOC | SEC_CODE | SEC_LOAD;
1254 s = bfd_make_section_with_flags (abfd, ".iplt", pltflags);
1256 || ! bfd_set_section_alignment (abfd, s, bed->plt_alignment))
1260 s = bfd_make_section_with_flags (abfd, ".rela.iplt",
1261 flags | SEC_READONLY);
1263 || ! bfd_set_section_alignment (abfd, s,
1264 bed->s->log_file_align))
1271 /* Copy the extra info we tack onto an elf_link_hash_entry. */
1274 _bfd_sparc_elf_copy_indirect_symbol (struct bfd_link_info *info,
1275 struct elf_link_hash_entry *dir,
1276 struct elf_link_hash_entry *ind)
1278 struct _bfd_sparc_elf_link_hash_entry *edir, *eind;
1280 edir = (struct _bfd_sparc_elf_link_hash_entry *) dir;
1281 eind = (struct _bfd_sparc_elf_link_hash_entry *) ind;
1283 if (eind->dyn_relocs != NULL)
1285 if (edir->dyn_relocs != NULL)
1287 struct _bfd_sparc_elf_dyn_relocs **pp;
1288 struct _bfd_sparc_elf_dyn_relocs *p;
1290 /* Add reloc counts against the indirect sym to the direct sym
1291 list. Merge any entries against the same section. */
1292 for (pp = &eind->dyn_relocs; (p = *pp) != NULL; )
1294 struct _bfd_sparc_elf_dyn_relocs *q;
1296 for (q = edir->dyn_relocs; q != NULL; q = q->next)
1297 if (q->sec == p->sec)
1299 q->pc_count += p->pc_count;
1300 q->count += p->count;
1307 *pp = edir->dyn_relocs;
1310 edir->dyn_relocs = eind->dyn_relocs;
1311 eind->dyn_relocs = NULL;
1314 if (ind->root.type == bfd_link_hash_indirect
1315 && dir->got.refcount <= 0)
1317 edir->tls_type = eind->tls_type;
1318 eind->tls_type = GOT_UNKNOWN;
1320 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
1324 sparc_elf_tls_transition (struct bfd_link_info *info, bfd *abfd,
1325 int r_type, int is_local)
1327 if (! ABI_64_P (abfd)
1328 && r_type == R_SPARC_TLS_GD_HI22
1329 && ! _bfd_sparc_elf_tdata (abfd)->has_tlsgd)
1330 r_type = R_SPARC_REV32;
1332 if (bfd_link_pic (info))
1337 case R_SPARC_TLS_GD_HI22:
1339 return R_SPARC_TLS_LE_HIX22;
1340 return R_SPARC_TLS_IE_HI22;
1341 case R_SPARC_TLS_GD_LO10:
1343 return R_SPARC_TLS_LE_LOX10;
1344 return R_SPARC_TLS_IE_LO10;
1345 case R_SPARC_TLS_IE_HI22:
1347 return R_SPARC_TLS_LE_HIX22;
1349 case R_SPARC_TLS_IE_LO10:
1351 return R_SPARC_TLS_LE_LOX10;
1353 case R_SPARC_TLS_LDM_HI22:
1354 return R_SPARC_TLS_LE_HIX22;
1355 case R_SPARC_TLS_LDM_LO10:
1356 return R_SPARC_TLS_LE_LOX10;
1362 /* Look through the relocs for a section during the first phase, and
1363 allocate space in the global offset table or procedure linkage
1367 _bfd_sparc_elf_check_relocs (bfd *abfd, struct bfd_link_info *info,
1368 asection *sec, const Elf_Internal_Rela *relocs)
1370 struct _bfd_sparc_elf_link_hash_table *htab;
1371 Elf_Internal_Shdr *symtab_hdr;
1372 struct elf_link_hash_entry **sym_hashes;
1373 const Elf_Internal_Rela *rel;
1374 const Elf_Internal_Rela *rel_end;
1377 bfd_boolean checked_tlsgd = FALSE;
1379 if (bfd_link_relocatable (info))
1382 htab = _bfd_sparc_elf_hash_table (info);
1383 BFD_ASSERT (htab != NULL);
1384 symtab_hdr = &elf_symtab_hdr (abfd);
1385 sym_hashes = elf_sym_hashes (abfd);
1389 if (ABI_64_P (abfd))
1390 num_relocs = NUM_SHDR_ENTRIES (_bfd_elf_single_rel_hdr (sec));
1392 num_relocs = sec->reloc_count;
1394 BFD_ASSERT (is_sparc_elf (abfd) || num_relocs == 0);
1396 if (htab->elf.dynobj == NULL)
1397 htab->elf.dynobj = abfd;
1398 if (!create_ifunc_sections (htab->elf.dynobj, info))
1401 rel_end = relocs + num_relocs;
1402 for (rel = relocs; rel < rel_end; rel++)
1404 unsigned int r_type;
1405 unsigned long r_symndx;
1406 struct elf_link_hash_entry *h;
1407 Elf_Internal_Sym *isym;
1409 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
1410 r_type = SPARC_ELF_R_TYPE (rel->r_info);
1412 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1414 /* xgettext:c-format */
1415 _bfd_error_handler (_("%B: bad symbol index: %d"), abfd, r_symndx);
1420 if (r_symndx < symtab_hdr->sh_info)
1422 /* A local symbol. */
1423 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
1428 /* Check relocation against local STT_GNU_IFUNC symbol. */
1429 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1431 h = elf_sparc_get_local_sym_hash (htab, abfd, rel,
1436 /* Fake a STT_GNU_IFUNC symbol. */
1437 h->type = STT_GNU_IFUNC;
1440 h->forced_local = 1;
1441 h->root.type = bfd_link_hash_defined;
1448 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1449 while (h->root.type == bfd_link_hash_indirect
1450 || h->root.type == bfd_link_hash_warning)
1451 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1453 /* PR15323, ref flags aren't set for references in the same
1455 h->root.non_ir_ref = 1;
1458 if (h && h->type == STT_GNU_IFUNC)
1463 h->plt.refcount += 1;
1467 /* Compatibility with old R_SPARC_REV32 reloc conflicting
1468 with R_SPARC_TLS_GD_HI22. */
1469 if (! ABI_64_P (abfd) && ! checked_tlsgd)
1472 case R_SPARC_TLS_GD_HI22:
1474 const Elf_Internal_Rela *relt;
1476 for (relt = rel + 1; relt < rel_end; relt++)
1477 if (ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_LO10
1478 || ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_ADD
1479 || ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_CALL)
1481 checked_tlsgd = TRUE;
1482 _bfd_sparc_elf_tdata (abfd)->has_tlsgd = relt < rel_end;
1485 case R_SPARC_TLS_GD_LO10:
1486 case R_SPARC_TLS_GD_ADD:
1487 case R_SPARC_TLS_GD_CALL:
1488 checked_tlsgd = TRUE;
1489 _bfd_sparc_elf_tdata (abfd)->has_tlsgd = TRUE;
1493 r_type = sparc_elf_tls_transition (info, abfd, r_type, h == NULL);
1496 case R_SPARC_TLS_LDM_HI22:
1497 case R_SPARC_TLS_LDM_LO10:
1498 htab->tls_ldm_got.refcount += 1;
1501 case R_SPARC_TLS_LE_HIX22:
1502 case R_SPARC_TLS_LE_LOX10:
1503 if (bfd_link_pic (info))
1507 case R_SPARC_TLS_IE_HI22:
1508 case R_SPARC_TLS_IE_LO10:
1509 if (bfd_link_pic (info))
1510 info->flags |= DF_STATIC_TLS;
1516 case R_SPARC_GOTDATA_HIX22:
1517 case R_SPARC_GOTDATA_LOX10:
1518 case R_SPARC_GOTDATA_OP_HIX22:
1519 case R_SPARC_GOTDATA_OP_LOX10:
1520 case R_SPARC_TLS_GD_HI22:
1521 case R_SPARC_TLS_GD_LO10:
1522 /* This symbol requires a global offset table entry. */
1524 int tls_type, old_tls_type;
1532 case R_SPARC_GOTDATA_OP_HIX22:
1533 case R_SPARC_GOTDATA_OP_LOX10:
1534 tls_type = GOT_NORMAL;
1536 case R_SPARC_TLS_GD_HI22:
1537 case R_SPARC_TLS_GD_LO10:
1538 tls_type = GOT_TLS_GD;
1540 case R_SPARC_TLS_IE_HI22:
1541 case R_SPARC_TLS_IE_LO10:
1542 tls_type = GOT_TLS_IE;
1548 h->got.refcount += 1;
1549 old_tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
1553 bfd_signed_vma *local_got_refcounts;
1555 /* This is a global offset table entry for a local symbol. */
1556 local_got_refcounts = elf_local_got_refcounts (abfd);
1557 if (local_got_refcounts == NULL)
1561 size = symtab_hdr->sh_info;
1562 size *= (sizeof (bfd_signed_vma) + sizeof(char));
1563 local_got_refcounts = ((bfd_signed_vma *)
1564 bfd_zalloc (abfd, size));
1565 if (local_got_refcounts == NULL)
1567 elf_local_got_refcounts (abfd) = local_got_refcounts;
1568 _bfd_sparc_elf_local_got_tls_type (abfd)
1569 = (char *) (local_got_refcounts + symtab_hdr->sh_info);
1573 case R_SPARC_GOTDATA_OP_HIX22:
1574 case R_SPARC_GOTDATA_OP_LOX10:
1578 local_got_refcounts[r_symndx] += 1;
1581 old_tls_type = _bfd_sparc_elf_local_got_tls_type (abfd) [r_symndx];
1584 /* If a TLS symbol is accessed using IE at least once,
1585 there is no point to use dynamic model for it. */
1586 if (old_tls_type != tls_type && old_tls_type != GOT_UNKNOWN
1587 && (old_tls_type != GOT_TLS_GD
1588 || tls_type != GOT_TLS_IE))
1590 if (old_tls_type == GOT_TLS_IE && tls_type == GOT_TLS_GD)
1591 tls_type = old_tls_type;
1595 /* xgettext:c-format */
1596 (_("%B: `%s' accessed both as normal and thread local symbol"),
1597 abfd, h ? h->root.root.string : "<local>");
1602 if (old_tls_type != tls_type)
1605 _bfd_sparc_elf_hash_entry (h)->tls_type = tls_type;
1607 _bfd_sparc_elf_local_got_tls_type (abfd) [r_symndx] = tls_type;
1611 if (htab->elf.sgot == NULL)
1613 if (!_bfd_elf_create_got_section (htab->elf.dynobj, info))
1618 case R_SPARC_TLS_GD_CALL:
1619 case R_SPARC_TLS_LDM_CALL:
1620 if (bfd_link_pic (info))
1622 /* These are basically R_SPARC_TLS_WPLT30 relocs against
1624 struct bfd_link_hash_entry *bh = NULL;
1625 if (! _bfd_generic_link_add_one_symbol (info, abfd,
1626 "__tls_get_addr", 0,
1627 bfd_und_section_ptr, 0,
1631 h = (struct elf_link_hash_entry *) bh;
1638 case R_SPARC_WPLT30:
1639 case R_SPARC_HIPLT22:
1640 case R_SPARC_LOPLT10:
1641 case R_SPARC_PCPLT32:
1642 case R_SPARC_PCPLT22:
1643 case R_SPARC_PCPLT10:
1645 /* This symbol requires a procedure linkage table entry. We
1646 actually build the entry in adjust_dynamic_symbol,
1647 because this might be a case of linking PIC code without
1648 linking in any dynamic objects, in which case we don't
1649 need to generate a procedure linkage table after all. */
1653 if (! ABI_64_P (abfd))
1655 /* The Solaris native assembler will generate a WPLT30
1656 reloc for a local symbol if you assemble a call from
1657 one section to another when using -K pic. We treat
1659 if (ELF32_R_TYPE (rel->r_info) == R_SPARC_PLT32)
1663 /* PR 7027: We need similar behaviour for 64-bit binaries. */
1664 else if (r_type == R_SPARC_WPLT30)
1667 /* It does not make sense to have a procedure linkage
1668 table entry for a local symbol. */
1669 bfd_set_error (bfd_error_bad_value);
1678 this_r_type = SPARC_ELF_R_TYPE (rel->r_info);
1679 if (this_r_type == R_SPARC_PLT32
1680 || this_r_type == R_SPARC_PLT64)
1683 h->plt.refcount += 1;
1688 case R_SPARC_PC_HH22:
1689 case R_SPARC_PC_HM10:
1690 case R_SPARC_PC_LM22:
1695 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
1700 case R_SPARC_DISP16:
1701 case R_SPARC_DISP32:
1702 case R_SPARC_DISP64:
1703 case R_SPARC_WDISP30:
1704 case R_SPARC_WDISP22:
1705 case R_SPARC_WDISP19:
1706 case R_SPARC_WDISP16:
1707 case R_SPARC_WDISP10:
1738 if (h != NULL && !bfd_link_pic (info))
1740 /* We may need a .plt entry if the function this reloc
1741 refers to is in a shared lib. */
1742 h->plt.refcount += 1;
1745 /* If we are creating a shared library, and this is a reloc
1746 against a global symbol, or a non PC relative reloc
1747 against a local symbol, then we need to copy the reloc
1748 into the shared library. However, if we are linking with
1749 -Bsymbolic, we do not need to copy a reloc against a
1750 global symbol which is defined in an object we are
1751 including in the link (i.e., DEF_REGULAR is set). At
1752 this point we have not seen all the input files, so it is
1753 possible that DEF_REGULAR is not set now but will be set
1754 later (it is never cleared). In case of a weak definition,
1755 DEF_REGULAR may be cleared later by a strong definition in
1756 a shared library. We account for that possibility below by
1757 storing information in the relocs_copied field of the hash
1758 table entry. A similar situation occurs when creating
1759 shared libraries and symbol visibility changes render the
1762 If on the other hand, we are creating an executable, we
1763 may need to keep relocations for symbols satisfied by a
1764 dynamic library if we manage to avoid copy relocs for the
1766 if ((bfd_link_pic (info)
1767 && (sec->flags & SEC_ALLOC) != 0
1768 && (! _bfd_sparc_elf_howto_table[r_type].pc_relative
1770 && (! SYMBOLIC_BIND (info, h)
1771 || h->root.type == bfd_link_hash_defweak
1772 || !h->def_regular))))
1773 || (!bfd_link_pic (info)
1774 && (sec->flags & SEC_ALLOC) != 0
1776 && (h->root.type == bfd_link_hash_defweak
1777 || !h->def_regular))
1778 || (!bfd_link_pic (info)
1780 && h->type == STT_GNU_IFUNC))
1782 struct _bfd_sparc_elf_dyn_relocs *p;
1783 struct _bfd_sparc_elf_dyn_relocs **head;
1785 /* When creating a shared object, we must copy these
1786 relocs into the output file. We create a reloc
1787 section in dynobj and make room for the reloc. */
1790 sreloc = _bfd_elf_make_dynamic_reloc_section
1791 (sec, htab->elf.dynobj, htab->word_align_power,
1792 abfd, /*rela?*/ TRUE);
1798 /* If this is a global symbol, we count the number of
1799 relocations we need for this symbol. */
1801 head = &((struct _bfd_sparc_elf_link_hash_entry *) h)->dyn_relocs;
1804 /* Track dynamic relocs needed for local syms too.
1805 We really need local syms available to do this
1810 BFD_ASSERT (isym != NULL);
1811 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
1815 vpp = &elf_section_data (s)->local_dynrel;
1816 head = (struct _bfd_sparc_elf_dyn_relocs **) vpp;
1820 if (p == NULL || p->sec != sec)
1822 bfd_size_type amt = sizeof *p;
1823 p = ((struct _bfd_sparc_elf_dyn_relocs *)
1824 bfd_alloc (htab->elf.dynobj, amt));
1835 if (_bfd_sparc_elf_howto_table[r_type].pc_relative)
1841 case R_SPARC_GNU_VTINHERIT:
1842 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1846 case R_SPARC_GNU_VTENTRY:
1847 BFD_ASSERT (h != NULL);
1849 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
1853 case R_SPARC_REGISTER:
1854 /* Nothing to do. */
1866 _bfd_sparc_elf_gc_mark_hook (asection *sec,
1867 struct bfd_link_info *info,
1868 Elf_Internal_Rela *rel,
1869 struct elf_link_hash_entry *h,
1870 Elf_Internal_Sym *sym)
1873 switch (SPARC_ELF_R_TYPE (rel->r_info))
1875 case R_SPARC_GNU_VTINHERIT:
1876 case R_SPARC_GNU_VTENTRY:
1880 /* FIXME: The test here, in check_relocs and in relocate_section
1881 dealing with TLS optimization, ought to be !bfd_link_executable (info). */
1882 if (bfd_link_pic (info))
1884 switch (SPARC_ELF_R_TYPE (rel->r_info))
1886 case R_SPARC_TLS_GD_CALL:
1887 case R_SPARC_TLS_LDM_CALL:
1888 /* This reloc implicitly references __tls_get_addr. We know
1889 another reloc will reference the same symbol as the one
1890 on this reloc, so the real symbol and section will be
1891 gc marked when processing the other reloc. That lets
1892 us handle __tls_get_addr here. */
1893 h = elf_link_hash_lookup (elf_hash_table (info), "__tls_get_addr",
1894 FALSE, FALSE, TRUE);
1895 BFD_ASSERT (h != NULL);
1897 if (h->u.weakdef != NULL)
1898 h->u.weakdef->mark = 1;
1903 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
1906 static Elf_Internal_Rela *
1907 sparc_elf_find_reloc_at_ofs (Elf_Internal_Rela *rel,
1908 Elf_Internal_Rela *relend,
1911 while (rel < relend)
1913 if (rel->r_offset == offset)
1920 /* Update the got entry reference counts for the section being removed. */
1922 _bfd_sparc_elf_gc_sweep_hook (bfd *abfd, struct bfd_link_info *info,
1923 asection *sec, const Elf_Internal_Rela *relocs)
1925 struct _bfd_sparc_elf_link_hash_table *htab;
1926 Elf_Internal_Shdr *symtab_hdr;
1927 struct elf_link_hash_entry **sym_hashes;
1928 bfd_signed_vma *local_got_refcounts;
1929 const Elf_Internal_Rela *rel, *relend;
1931 if (bfd_link_relocatable (info))
1934 BFD_ASSERT (is_sparc_elf (abfd) || sec->reloc_count == 0);
1936 elf_section_data (sec)->local_dynrel = NULL;
1938 htab = _bfd_sparc_elf_hash_table (info);
1939 BFD_ASSERT (htab != NULL);
1940 symtab_hdr = &elf_symtab_hdr (abfd);
1941 sym_hashes = elf_sym_hashes (abfd);
1942 local_got_refcounts = elf_local_got_refcounts (abfd);
1944 relend = relocs + sec->reloc_count;
1945 for (rel = relocs; rel < relend; rel++)
1947 unsigned long r_symndx;
1948 unsigned int r_type;
1949 struct elf_link_hash_entry *h = NULL;
1951 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
1952 if (r_symndx >= symtab_hdr->sh_info)
1954 struct _bfd_sparc_elf_link_hash_entry *eh;
1955 struct _bfd_sparc_elf_dyn_relocs **pp;
1956 struct _bfd_sparc_elf_dyn_relocs *p;
1958 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1959 while (h->root.type == bfd_link_hash_indirect
1960 || h->root.type == bfd_link_hash_warning)
1961 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1962 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
1963 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
1966 /* Everything must go for SEC. */
1972 r_type = SPARC_ELF_R_TYPE (rel->r_info);
1973 r_type = sparc_elf_tls_transition (info, abfd, r_type, h == NULL);
1976 case R_SPARC_TLS_LDM_HI22:
1977 case R_SPARC_TLS_LDM_LO10:
1978 if (_bfd_sparc_elf_hash_table (info)->tls_ldm_got.refcount > 0)
1979 _bfd_sparc_elf_hash_table (info)->tls_ldm_got.refcount -= 1;
1982 case R_SPARC_TLS_GD_HI22:
1983 case R_SPARC_TLS_GD_LO10:
1984 case R_SPARC_TLS_IE_HI22:
1985 case R_SPARC_TLS_IE_LO10:
1989 case R_SPARC_GOTDATA_HIX22:
1990 case R_SPARC_GOTDATA_LOX10:
1991 case R_SPARC_GOTDATA_OP_HIX22:
1992 case R_SPARC_GOTDATA_OP_LOX10:
1995 if (h->got.refcount > 0)
2002 case R_SPARC_GOTDATA_OP_HIX22:
2003 case R_SPARC_GOTDATA_OP_LOX10:
2007 if (local_got_refcounts[r_symndx] > 0)
2008 local_got_refcounts[r_symndx]--;
2016 case R_SPARC_PC_HH22:
2017 case R_SPARC_PC_HM10:
2018 case R_SPARC_PC_LM22:
2020 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
2025 case R_SPARC_DISP16:
2026 case R_SPARC_DISP32:
2027 case R_SPARC_DISP64:
2028 case R_SPARC_WDISP30:
2029 case R_SPARC_WDISP22:
2030 case R_SPARC_WDISP19:
2031 case R_SPARC_WDISP16:
2032 case R_SPARC_WDISP10:
2060 if (bfd_link_pic (info))
2064 case R_SPARC_WPLT30:
2067 if (h->plt.refcount > 0)
2080 /* Adjust a symbol defined by a dynamic object and referenced by a
2081 regular object. The current definition is in some section of the
2082 dynamic object, but we're not including those sections. We have to
2083 change the definition to something the rest of the link can
2087 _bfd_sparc_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
2088 struct elf_link_hash_entry *h)
2090 struct _bfd_sparc_elf_link_hash_table *htab;
2091 struct _bfd_sparc_elf_link_hash_entry * eh;
2092 struct _bfd_sparc_elf_dyn_relocs *p;
2095 htab = _bfd_sparc_elf_hash_table (info);
2096 BFD_ASSERT (htab != NULL);
2098 /* Make sure we know what is going on here. */
2099 BFD_ASSERT (htab->elf.dynobj != NULL
2101 || h->type == STT_GNU_IFUNC
2102 || h->u.weakdef != NULL
2105 && !h->def_regular)));
2107 /* If this is a function, put it in the procedure linkage table. We
2108 will fill in the contents of the procedure linkage table later
2109 (although we could actually do it here). The STT_NOTYPE
2110 condition is a hack specifically for the Oracle libraries
2111 delivered for Solaris; for some inexplicable reason, they define
2112 some of their functions as STT_NOTYPE when they really should be
2114 if (h->type == STT_FUNC
2115 || h->type == STT_GNU_IFUNC
2117 || (h->type == STT_NOTYPE
2118 && (h->root.type == bfd_link_hash_defined
2119 || h->root.type == bfd_link_hash_defweak)
2120 && (h->root.u.def.section->flags & SEC_CODE) != 0))
2122 if (h->plt.refcount <= 0
2123 || (h->type != STT_GNU_IFUNC
2124 && (SYMBOL_CALLS_LOCAL (info, h)
2125 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2126 && h->root.type == bfd_link_hash_undefweak))))
2128 /* This case can occur if we saw a WPLT30 reloc in an input
2129 file, but the symbol was never referred to by a dynamic
2130 object, or if all references were garbage collected. In
2131 such a case, we don't actually need to build a procedure
2132 linkage table, and we can just do a WDISP30 reloc instead. */
2133 h->plt.offset = (bfd_vma) -1;
2140 h->plt.offset = (bfd_vma) -1;
2142 /* If this is a weak symbol, and there is a real definition, the
2143 processor independent code will have arranged for us to see the
2144 real definition first, and we can just use the same value. */
2145 if (h->u.weakdef != NULL)
2147 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
2148 || h->u.weakdef->root.type == bfd_link_hash_defweak);
2149 h->root.u.def.section = h->u.weakdef->root.u.def.section;
2150 h->root.u.def.value = h->u.weakdef->root.u.def.value;
2154 /* This is a reference to a symbol defined by a dynamic object which
2155 is not a function. */
2157 /* If we are creating a shared library, we must presume that the
2158 only references to the symbol are via the global offset table.
2159 For such cases we need not do anything here; the relocations will
2160 be handled correctly by relocate_section. */
2161 if (bfd_link_pic (info))
2164 /* If there are no references to this symbol that do not use the
2165 GOT, we don't need to generate a copy reloc. */
2166 if (!h->non_got_ref)
2169 /* If -z nocopyreloc was given, we won't generate them either. */
2170 if (info->nocopyreloc)
2176 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
2177 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2179 s = p->sec->output_section;
2180 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2184 /* If we didn't find any dynamic relocs in read-only sections, then
2185 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
2192 /* We must allocate the symbol in our .dynbss section, which will
2193 become part of the .bss section of the executable. There will be
2194 an entry for this symbol in the .dynsym section. The dynamic
2195 object will contain position independent code, so all references
2196 from the dynamic object to this symbol will go through the global
2197 offset table. The dynamic linker will use the .dynsym entry to
2198 determine the address it must put in the global offset table, so
2199 both the dynamic object and the regular object will refer to the
2200 same memory location for the variable. */
2202 /* We must generate a R_SPARC_COPY reloc to tell the dynamic linker
2203 to copy the initial value out of the dynamic object and into the
2204 runtime process image. We need to remember the offset into the
2205 .rel.bss section we are going to use. */
2206 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
2208 htab->srelbss->size += SPARC_ELF_RELA_BYTES (htab);
2214 return _bfd_elf_adjust_dynamic_copy (info, h, s);
2217 /* Allocate space in .plt, .got and associated reloc sections for
2221 allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
2223 struct bfd_link_info *info;
2224 struct _bfd_sparc_elf_link_hash_table *htab;
2225 struct _bfd_sparc_elf_link_hash_entry *eh;
2226 struct _bfd_sparc_elf_dyn_relocs *p;
2228 if (h->root.type == bfd_link_hash_indirect)
2231 info = (struct bfd_link_info *) inf;
2232 htab = _bfd_sparc_elf_hash_table (info);
2233 BFD_ASSERT (htab != NULL);
2235 if ((htab->elf.dynamic_sections_created
2236 && h->plt.refcount > 0)
2237 || (h->type == STT_GNU_IFUNC
2241 /* Make sure this symbol is output as a dynamic symbol.
2242 Undefined weak syms won't yet be marked as dynamic. */
2243 if (h->dynindx == -1
2244 && !h->forced_local)
2246 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2250 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h)
2251 || (h->type == STT_GNU_IFUNC
2254 asection *s = htab->elf.splt;
2259 /* Allocate room for the header. */
2262 s->size = htab->plt_header_size;
2264 /* Allocate space for the .rela.plt.unloaded relocations. */
2265 if (htab->is_vxworks && !bfd_link_pic (info))
2266 htab->srelplt2->size = sizeof (Elf32_External_Rela) * 2;
2269 /* The procedure linkage table size is bounded by the magnitude
2270 of the offset we can describe in the entry. */
2271 if (s->size >= (SPARC_ELF_WORD_BYTES(htab) == 8 ?
2272 (((bfd_vma)1 << 31) << 1) : 0x400000))
2274 bfd_set_error (bfd_error_bad_value);
2278 if (SPARC_ELF_WORD_BYTES(htab) == 8
2279 && s->size >= PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE)
2281 bfd_vma off = s->size - PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE;
2284 off = (off % (160 * PLT64_ENTRY_SIZE)) / PLT64_ENTRY_SIZE;
2286 h->plt.offset = (s->size - (off * 8));
2289 h->plt.offset = s->size;
2291 /* If this symbol is not defined in a regular file, and we are
2292 not generating a shared library, then set the symbol to this
2293 location in the .plt. This is required to make function
2294 pointers compare as equal between the normal executable and
2295 the shared library. */
2296 if (! bfd_link_pic (info)
2299 h->root.u.def.section = s;
2300 h->root.u.def.value = h->plt.offset;
2303 /* Make room for this entry. */
2304 s->size += htab->plt_entry_size;
2306 /* We also need to make an entry in the .rela.plt section. */
2307 if (s == htab->elf.splt)
2308 htab->elf.srelplt->size += SPARC_ELF_RELA_BYTES (htab);
2310 htab->elf.irelplt->size += SPARC_ELF_RELA_BYTES (htab);
2312 if (htab->is_vxworks)
2314 /* Allocate space for the .got.plt entry. */
2315 htab->elf.sgotplt->size += 4;
2317 /* ...and for the .rela.plt.unloaded relocations. */
2318 if (!bfd_link_pic (info))
2319 htab->srelplt2->size += sizeof (Elf32_External_Rela) * 3;
2324 h->plt.offset = (bfd_vma) -1;
2330 h->plt.offset = (bfd_vma) -1;
2334 /* If R_SPARC_TLS_IE_{HI22,LO10} symbol is now local to the binary,
2335 make it a R_SPARC_TLS_LE_{HI22,LO10} requiring no TLS entry. */
2336 if (h->got.refcount > 0
2337 && !bfd_link_pic (info)
2339 && _bfd_sparc_elf_hash_entry(h)->tls_type == GOT_TLS_IE)
2340 h->got.offset = (bfd_vma) -1;
2341 else if (h->got.refcount > 0)
2345 int tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
2347 /* Make sure this symbol is output as a dynamic symbol.
2348 Undefined weak syms won't yet be marked as dynamic. */
2349 if (h->dynindx == -1
2350 && !h->forced_local)
2352 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2357 h->got.offset = s->size;
2358 s->size += SPARC_ELF_WORD_BYTES (htab);
2359 /* R_SPARC_TLS_GD_HI{22,LO10} needs 2 consecutive GOT slots. */
2360 if (tls_type == GOT_TLS_GD)
2361 s->size += SPARC_ELF_WORD_BYTES (htab);
2362 dyn = htab->elf.dynamic_sections_created;
2363 /* R_SPARC_TLS_IE_{HI22,LO10} needs one dynamic relocation,
2364 R_SPARC_TLS_GD_{HI22,LO10} needs one if local symbol and two if
2366 if ((tls_type == GOT_TLS_GD && h->dynindx == -1)
2367 || tls_type == GOT_TLS_IE
2368 || h->type == STT_GNU_IFUNC)
2369 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
2370 else if (tls_type == GOT_TLS_GD)
2371 htab->elf.srelgot->size += 2 * SPARC_ELF_RELA_BYTES (htab);
2372 else if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
2373 bfd_link_pic (info),
2375 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
2378 h->got.offset = (bfd_vma) -1;
2380 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
2381 if (eh->dyn_relocs == NULL)
2384 /* In the shared -Bsymbolic case, discard space allocated for
2385 dynamic pc-relative relocs against symbols which turn out to be
2386 defined in regular objects. For the normal shared case, discard
2387 space for pc-relative relocs that have become local due to symbol
2388 visibility changes. */
2390 if (bfd_link_pic (info))
2392 if (SYMBOL_CALLS_LOCAL (info, h))
2394 struct _bfd_sparc_elf_dyn_relocs **pp;
2396 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2398 p->count -= p->pc_count;
2407 if (htab->is_vxworks)
2409 struct _bfd_sparc_elf_dyn_relocs **pp;
2411 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2413 if (strcmp (p->sec->output_section->name, ".tls_vars") == 0)
2420 /* Also discard relocs on undefined weak syms with non-default
2422 if (eh->dyn_relocs != NULL
2423 && h->root.type == bfd_link_hash_undefweak)
2425 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
2426 eh->dyn_relocs = NULL;
2428 /* Make sure undefined weak symbols are output as a dynamic
2430 else if (h->dynindx == -1
2431 && !h->forced_local)
2433 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2440 /* For the non-shared case, discard space for relocs against
2441 symbols which turn out to need copy relocs or are not
2447 || (htab->elf.dynamic_sections_created
2448 && (h->root.type == bfd_link_hash_undefweak
2449 || h->root.type == bfd_link_hash_undefined))))
2451 /* Make sure this symbol is output as a dynamic symbol.
2452 Undefined weak syms won't yet be marked as dynamic. */
2453 if (h->dynindx == -1
2454 && !h->forced_local)
2456 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2460 /* If that succeeded, we know we'll be keeping all the
2462 if (h->dynindx != -1)
2466 eh->dyn_relocs = NULL;
2471 /* Finally, allocate space. */
2472 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2474 asection *sreloc = elf_section_data (p->sec)->sreloc;
2475 sreloc->size += p->count * SPARC_ELF_RELA_BYTES (htab);
2481 /* Allocate space in .plt, .got and associated reloc sections for
2482 local dynamic relocs. */
2485 allocate_local_dynrelocs (void **slot, void *inf)
2487 struct elf_link_hash_entry *h
2488 = (struct elf_link_hash_entry *) *slot;
2490 if (h->type != STT_GNU_IFUNC
2494 || h->root.type != bfd_link_hash_defined)
2497 return allocate_dynrelocs (h, inf);
2500 /* Find any dynamic relocs that apply to read-only sections. */
2503 readonly_dynrelocs (struct elf_link_hash_entry *h, void * inf)
2505 struct _bfd_sparc_elf_link_hash_entry *eh;
2506 struct _bfd_sparc_elf_dyn_relocs *p;
2508 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
2509 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2511 asection *s = p->sec->output_section;
2513 if (s != NULL && (s->flags & SEC_READONLY) != 0)
2515 struct bfd_link_info *info = (struct bfd_link_info *) inf;
2517 info->flags |= DF_TEXTREL;
2519 /* Not an error, just cut short the traversal. */
2526 /* Return true if the dynamic symbol for a given section should be
2527 omitted when creating a shared library. */
2530 _bfd_sparc_elf_omit_section_dynsym (bfd *output_bfd,
2531 struct bfd_link_info *info,
2534 /* We keep the .got section symbol so that explicit relocations
2535 against the _GLOBAL_OFFSET_TABLE_ symbol emitted in PIC mode
2536 can be turned into relocations against the .got symbol. */
2537 if (strcmp (p->name, ".got") == 0)
2540 return _bfd_elf_link_omit_section_dynsym (output_bfd, info, p);
2543 /* Set the sizes of the dynamic sections. */
2546 _bfd_sparc_elf_size_dynamic_sections (bfd *output_bfd,
2547 struct bfd_link_info *info)
2549 struct _bfd_sparc_elf_link_hash_table *htab;
2554 htab = _bfd_sparc_elf_hash_table (info);
2555 BFD_ASSERT (htab != NULL);
2556 dynobj = htab->elf.dynobj;
2557 BFD_ASSERT (dynobj != NULL);
2559 if (elf_hash_table (info)->dynamic_sections_created)
2561 /* Set the contents of the .interp section to the interpreter. */
2562 if (bfd_link_executable (info) && !info->nointerp)
2564 s = bfd_get_linker_section (dynobj, ".interp");
2565 BFD_ASSERT (s != NULL);
2566 s->size = htab->dynamic_interpreter_size;
2567 s->contents = (unsigned char *) htab->dynamic_interpreter;
2571 /* Set up .got offsets for local syms, and space for local dynamic
2573 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2575 bfd_signed_vma *local_got;
2576 bfd_signed_vma *end_local_got;
2577 char *local_tls_type;
2578 bfd_size_type locsymcount;
2579 Elf_Internal_Shdr *symtab_hdr;
2582 if (! is_sparc_elf (ibfd))
2585 for (s = ibfd->sections; s != NULL; s = s->next)
2587 struct _bfd_sparc_elf_dyn_relocs *p;
2589 for (p = elf_section_data (s)->local_dynrel; p != NULL; p = p->next)
2591 if (!bfd_is_abs_section (p->sec)
2592 && bfd_is_abs_section (p->sec->output_section))
2594 /* Input section has been discarded, either because
2595 it is a copy of a linkonce section or due to
2596 linker script /DISCARD/, so we'll be discarding
2599 else if (htab->is_vxworks
2600 && strcmp (p->sec->output_section->name,
2603 /* Relocations in vxworks .tls_vars sections are
2604 handled specially by the loader. */
2606 else if (p->count != 0)
2608 srel = elf_section_data (p->sec)->sreloc;
2609 if (!htab->elf.dynamic_sections_created)
2610 srel = htab->elf.irelplt;
2611 srel->size += p->count * SPARC_ELF_RELA_BYTES (htab);
2612 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2613 info->flags |= DF_TEXTREL;
2618 local_got = elf_local_got_refcounts (ibfd);
2622 symtab_hdr = &elf_symtab_hdr (ibfd);
2623 locsymcount = symtab_hdr->sh_info;
2624 end_local_got = local_got + locsymcount;
2625 local_tls_type = _bfd_sparc_elf_local_got_tls_type (ibfd);
2627 srel = htab->elf.srelgot;
2628 for (; local_got < end_local_got; ++local_got, ++local_tls_type)
2632 *local_got = s->size;
2633 s->size += SPARC_ELF_WORD_BYTES (htab);
2634 if (*local_tls_type == GOT_TLS_GD)
2635 s->size += SPARC_ELF_WORD_BYTES (htab);
2636 if (bfd_link_pic (info)
2637 || *local_tls_type == GOT_TLS_GD
2638 || *local_tls_type == GOT_TLS_IE)
2639 srel->size += SPARC_ELF_RELA_BYTES (htab);
2642 *local_got = (bfd_vma) -1;
2646 if (htab->tls_ldm_got.refcount > 0)
2648 /* Allocate 2 got entries and 1 dynamic reloc for
2649 R_SPARC_TLS_LDM_{HI22,LO10} relocs. */
2650 htab->tls_ldm_got.offset = htab->elf.sgot->size;
2651 htab->elf.sgot->size += (2 * SPARC_ELF_WORD_BYTES (htab));
2652 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
2655 htab->tls_ldm_got.offset = -1;
2657 /* Allocate global sym .plt and .got entries, and space for global
2658 sym dynamic relocs. */
2659 elf_link_hash_traverse (&htab->elf, allocate_dynrelocs, info);
2661 /* Allocate .plt and .got entries, and space for local symbols. */
2662 htab_traverse (htab->loc_hash_table, allocate_local_dynrelocs, info);
2664 if (!htab->is_vxworks
2665 && elf_hash_table (info)->dynamic_sections_created)
2667 if (! ABI_64_P (output_bfd))
2669 /* Make space for the trailing nop in .plt. */
2670 if (htab->elf.splt->size > 0)
2671 htab->elf.splt->size += 1 * SPARC_INSN_BYTES;
2674 /* If the .got section is more than 0x1000 bytes, we add
2675 0x1000 to the value of _GLOBAL_OFFSET_TABLE_, so that 13
2676 bit relocations have a greater chance of working. */
2677 if (htab->elf.sgot->size >= 0x1000
2678 && elf_hash_table (info)->hgot->root.u.def.value == 0)
2679 elf_hash_table (info)->hgot->root.u.def.value = 0x1000;
2682 /* The check_relocs and adjust_dynamic_symbol entry points have
2683 determined the sizes of the various dynamic sections. Allocate
2685 for (s = dynobj->sections; s != NULL; s = s->next)
2687 if ((s->flags & SEC_LINKER_CREATED) == 0)
2690 if (s == htab->elf.splt
2691 || s == htab->elf.sgot
2692 || s == htab->sdynbss
2693 || s == htab->elf.iplt
2694 || s == htab->elf.sgotplt)
2696 /* Strip this section if we don't need it; see the
2699 else if (CONST_STRNEQ (s->name, ".rela"))
2703 /* We use the reloc_count field as a counter if we need
2704 to copy relocs into the output file. */
2710 /* It's not one of our sections. */
2716 /* If we don't need this section, strip it from the
2717 output file. This is mostly to handle .rela.bss and
2718 .rela.plt. We must create both sections in
2719 create_dynamic_sections, because they must be created
2720 before the linker maps input sections to output
2721 sections. The linker does that before
2722 adjust_dynamic_symbol is called, and it is that
2723 function which decides whether anything needs to go
2724 into these sections. */
2725 s->flags |= SEC_EXCLUDE;
2729 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2732 /* Allocate memory for the section contents. Zero the memory
2733 for the benefit of .rela.plt, which has 4 unused entries
2734 at the beginning, and we don't want garbage. */
2735 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
2736 if (s->contents == NULL)
2740 if (elf_hash_table (info)->dynamic_sections_created)
2742 /* Add some entries to the .dynamic section. We fill in the
2743 values later, in _bfd_sparc_elf_finish_dynamic_sections, but we
2744 must add the entries now so that we get the correct size for
2745 the .dynamic section. The DT_DEBUG entry is filled in by the
2746 dynamic linker and used by the debugger. */
2747 #define add_dynamic_entry(TAG, VAL) \
2748 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
2750 if (bfd_link_executable (info))
2752 if (!add_dynamic_entry (DT_DEBUG, 0))
2756 if (htab->elf.srelplt->size != 0)
2758 if (!add_dynamic_entry (DT_PLTGOT, 0)
2759 || !add_dynamic_entry (DT_PLTRELSZ, 0)
2760 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
2761 || !add_dynamic_entry (DT_JMPREL, 0))
2765 if (!add_dynamic_entry (DT_RELA, 0)
2766 || !add_dynamic_entry (DT_RELASZ, 0)
2767 || !add_dynamic_entry (DT_RELAENT,
2768 SPARC_ELF_RELA_BYTES (htab)))
2771 /* If any dynamic relocs apply to a read-only section,
2772 then we need a DT_TEXTREL entry. */
2773 if ((info->flags & DF_TEXTREL) == 0)
2774 elf_link_hash_traverse (&htab->elf, readonly_dynrelocs, info);
2776 if (info->flags & DF_TEXTREL)
2778 if (!add_dynamic_entry (DT_TEXTREL, 0))
2782 if (ABI_64_P (output_bfd))
2785 struct _bfd_sparc_elf_app_reg * app_regs;
2786 struct elf_strtab_hash *dynstr;
2787 struct elf_link_hash_table *eht = elf_hash_table (info);
2789 /* Add dynamic STT_REGISTER symbols and corresponding DT_SPARC_REGISTER
2790 entries if needed. */
2791 app_regs = _bfd_sparc_elf_hash_table (info)->app_regs;
2792 dynstr = eht->dynstr;
2794 for (reg = 0; reg < 4; reg++)
2795 if (app_regs [reg].name != NULL)
2797 struct elf_link_local_dynamic_entry *entry, *e;
2799 if (!add_dynamic_entry (DT_SPARC_REGISTER, 0))
2802 entry = (struct elf_link_local_dynamic_entry *)
2803 bfd_hash_allocate (&info->hash->table, sizeof (*entry));
2807 /* We cheat here a little bit: the symbol will not be local, so we
2808 put it at the end of the dynlocal linked list. We will fix it
2809 later on, as we have to fix other fields anyway. */
2810 entry->isym.st_value = reg < 2 ? reg + 2 : reg + 4;
2811 entry->isym.st_size = 0;
2812 if (*app_regs [reg].name != '\0')
2814 = _bfd_elf_strtab_add (dynstr, app_regs[reg].name, FALSE);
2816 entry->isym.st_name = 0;
2817 entry->isym.st_other = 0;
2818 entry->isym.st_info = ELF_ST_INFO (app_regs [reg].bind,
2820 entry->isym.st_shndx = app_regs [reg].shndx;
2821 entry->isym.st_target_internal = 0;
2823 entry->input_bfd = output_bfd;
2824 entry->input_indx = -1;
2826 if (eht->dynlocal == NULL)
2827 eht->dynlocal = entry;
2830 for (e = eht->dynlocal; e->next; e = e->next)
2837 if (htab->is_vxworks
2838 && !elf_vxworks_add_dynamic_entries (output_bfd, info))
2841 #undef add_dynamic_entry
2847 _bfd_sparc_elf_new_section_hook (bfd *abfd, asection *sec)
2849 if (!sec->used_by_bfd)
2851 struct _bfd_sparc_elf_section_data *sdata;
2852 bfd_size_type amt = sizeof (*sdata);
2854 sdata = bfd_zalloc (abfd, amt);
2857 sec->used_by_bfd = sdata;
2860 return _bfd_elf_new_section_hook (abfd, sec);
2864 _bfd_sparc_elf_relax_section (bfd *abfd ATTRIBUTE_UNUSED,
2865 struct bfd_section *section,
2866 struct bfd_link_info *link_info ATTRIBUTE_UNUSED,
2869 if (bfd_link_relocatable (link_info))
2870 (*link_info->callbacks->einfo)
2871 (_("%P%F: --relax and -r may not be used together\n"));
2874 sec_do_relax (section) = 1;
2878 /* Return the base VMA address which should be subtracted from real addresses
2879 when resolving @dtpoff relocation.
2880 This is PT_TLS segment p_vaddr. */
2883 dtpoff_base (struct bfd_link_info *info)
2885 /* If tls_sec is NULL, we should have signalled an error already. */
2886 if (elf_hash_table (info)->tls_sec == NULL)
2888 return elf_hash_table (info)->tls_sec->vma;
2891 /* Return the relocation value for @tpoff relocation
2892 if STT_TLS virtual address is ADDRESS. */
2895 tpoff (struct bfd_link_info *info, bfd_vma address)
2897 struct elf_link_hash_table *htab = elf_hash_table (info);
2898 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
2899 bfd_vma static_tls_size;
2901 /* If tls_sec is NULL, we should have signalled an error already. */
2902 if (htab->tls_sec == NULL)
2905 /* Consider special static TLS alignment requirements. */
2906 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
2907 return address - static_tls_size - htab->tls_sec->vma;
2910 /* Return the relocation value for a %gdop relocation. */
2913 gdopoff (struct bfd_link_info *info, bfd_vma address)
2915 struct elf_link_hash_table *htab = elf_hash_table (info);
2918 got_base = (htab->hgot->root.u.def.value
2919 + htab->hgot->root.u.def.section->output_offset
2920 + htab->hgot->root.u.def.section->output_section->vma);
2922 return address - got_base;
2925 /* Relocate a SPARC ELF section. */
2928 _bfd_sparc_elf_relocate_section (bfd *output_bfd,
2929 struct bfd_link_info *info,
2931 asection *input_section,
2933 Elf_Internal_Rela *relocs,
2934 Elf_Internal_Sym *local_syms,
2935 asection **local_sections)
2937 struct _bfd_sparc_elf_link_hash_table *htab;
2938 Elf_Internal_Shdr *symtab_hdr;
2939 struct elf_link_hash_entry **sym_hashes;
2940 bfd_vma *local_got_offsets;
2943 Elf_Internal_Rela *rel;
2944 Elf_Internal_Rela *relend;
2946 bfd_boolean is_vxworks_tls;
2948 htab = _bfd_sparc_elf_hash_table (info);
2949 BFD_ASSERT (htab != NULL);
2950 symtab_hdr = &elf_symtab_hdr (input_bfd);
2951 sym_hashes = elf_sym_hashes (input_bfd);
2952 local_got_offsets = elf_local_got_offsets (input_bfd);
2954 if (elf_hash_table (info)->hgot == NULL)
2957 got_base = elf_hash_table (info)->hgot->root.u.def.value;
2959 sreloc = elf_section_data (input_section)->sreloc;
2960 /* We have to handle relocations in vxworks .tls_vars sections
2961 specially, because the dynamic loader is 'weird'. */
2962 is_vxworks_tls = (htab->is_vxworks && bfd_link_pic (info)
2963 && !strcmp (input_section->output_section->name,
2967 if (ABI_64_P (output_bfd))
2968 num_relocs = NUM_SHDR_ENTRIES (_bfd_elf_single_rel_hdr (input_section));
2970 num_relocs = input_section->reloc_count;
2971 relend = relocs + num_relocs;
2972 for (; rel < relend; rel++)
2974 int r_type, tls_type;
2975 reloc_howto_type *howto;
2976 unsigned long r_symndx;
2977 struct elf_link_hash_entry *h;
2978 Elf_Internal_Sym *sym;
2980 bfd_vma relocation, off;
2981 bfd_reloc_status_type r;
2982 bfd_boolean is_plt = FALSE;
2983 bfd_boolean unresolved_reloc;
2985 r_type = SPARC_ELF_R_TYPE (rel->r_info);
2986 if (r_type == R_SPARC_GNU_VTINHERIT
2987 || r_type == R_SPARC_GNU_VTENTRY)
2990 if (r_type < 0 || r_type >= (int) R_SPARC_max_std)
2992 bfd_set_error (bfd_error_bad_value);
2995 howto = _bfd_sparc_elf_howto_table + r_type;
2997 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
3001 unresolved_reloc = FALSE;
3002 if (r_symndx < symtab_hdr->sh_info)
3004 sym = local_syms + r_symndx;
3005 sec = local_sections[r_symndx];
3006 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
3008 if (!bfd_link_relocatable (info)
3009 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
3011 /* Relocate against local STT_GNU_IFUNC symbol. */
3012 h = elf_sparc_get_local_sym_hash (htab, input_bfd,
3017 /* Set STT_GNU_IFUNC symbol value. */
3018 h->root.u.def.value = sym->st_value;
3019 h->root.u.def.section = sec;
3024 bfd_boolean warned, ignored;
3026 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
3027 r_symndx, symtab_hdr, sym_hashes,
3029 unresolved_reloc, warned, ignored);
3032 /* To avoid generating warning messages about truncated
3033 relocations, set the relocation's address to be the same as
3034 the start of this section. */
3035 if (input_section->output_section != NULL)
3036 relocation = input_section->output_section->vma;
3042 if (sec != NULL && discarded_section (sec))
3043 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
3044 rel, 1, relend, howto, 0, contents);
3046 if (bfd_link_relocatable (info))
3050 && h->type == STT_GNU_IFUNC
3056 if ((input_section->flags & SEC_ALLOC) == 0
3057 || h->plt.offset == (bfd_vma) -1)
3060 plt_sec = htab->elf.splt;
3062 plt_sec =htab->elf.iplt;
3066 case R_SPARC_GOTDATA_OP:
3069 case R_SPARC_GOTDATA_OP_HIX22:
3070 case R_SPARC_GOTDATA_OP_LOX10:
3071 r_type = (r_type == R_SPARC_GOTDATA_OP_HIX22
3074 howto = _bfd_sparc_elf_howto_table + r_type;
3080 if (htab->elf.sgot == NULL)
3082 off = h->got.offset;
3083 if (off == (bfd_vma) -1)
3085 relocation = htab->elf.sgot->output_offset + off - got_base;
3088 case R_SPARC_WPLT30:
3089 case R_SPARC_WDISP30:
3090 relocation = (plt_sec->output_section->vma
3091 + plt_sec->output_offset + h->plt.offset);
3096 if (bfd_link_pic (info) && h->non_got_ref)
3098 Elf_Internal_Rela outrel;
3101 offset = _bfd_elf_section_offset (output_bfd, info,
3104 if (offset == (bfd_vma) -1
3105 || offset == (bfd_vma) -2)
3108 outrel.r_offset = (input_section->output_section->vma
3109 + input_section->output_offset
3112 if (h->dynindx == -1
3114 || bfd_link_executable (info))
3116 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3117 0, R_SPARC_IRELATIVE);
3118 outrel.r_addend = relocation + rel->r_addend;
3122 if (h->dynindx == -1)
3124 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, h->dynindx, r_type);
3125 outrel.r_addend = rel->r_addend;
3128 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
3132 relocation = (plt_sec->output_section->vma
3133 + plt_sec->output_offset + h->plt.offset);
3138 /* We should only see such relocs in static links. */
3139 if (bfd_link_pic (info))
3141 relocation = (plt_sec->output_section->vma
3142 + plt_sec->output_offset + h->plt.offset);
3146 if (h->root.root.string)
3147 name = h->root.root.string;
3149 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
3152 /* xgettext:c-format */
3153 (_("%B: relocation %s against STT_GNU_IFUNC "
3154 "symbol `%s' isn't handled by %s"), input_bfd,
3155 _bfd_sparc_elf_howto_table[r_type].name,
3156 name, __FUNCTION__);
3157 bfd_set_error (bfd_error_bad_value);
3164 case R_SPARC_GOTDATA_OP_HIX22:
3165 case R_SPARC_GOTDATA_OP_LOX10:
3166 if (SYMBOL_REFERENCES_LOCAL (info, h))
3168 r_type = (r_type == R_SPARC_GOTDATA_OP_HIX22
3169 ? R_SPARC_GOTDATA_HIX22
3170 : R_SPARC_GOTDATA_LOX10);
3171 howto = _bfd_sparc_elf_howto_table + r_type;
3175 case R_SPARC_GOTDATA_OP:
3176 if (SYMBOL_REFERENCES_LOCAL (info, h))
3178 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3180 /* {ld,ldx} [%rs1 + %rs2], %rd --> add %rs1, %rs2, %rd */
3181 relocation = 0x80000000 | (insn & 0x3e07c01f);
3182 bfd_put_32 (output_bfd, relocation, contents + rel->r_offset);
3189 case R_SPARC_GOTDATA_HIX22:
3190 case R_SPARC_GOTDATA_LOX10:
3191 relocation = gdopoff (info, relocation);
3194 case R_SPARC_GOTDATA_OP_HIX22:
3195 case R_SPARC_GOTDATA_OP_LOX10:
3199 /* Relocation is to the entry for this symbol in the global
3201 if (htab->elf.sgot == NULL)
3208 off = h->got.offset;
3209 BFD_ASSERT (off != (bfd_vma) -1);
3210 dyn = elf_hash_table (info)->dynamic_sections_created;
3212 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
3213 bfd_link_pic (info),
3215 || (bfd_link_pic (info)
3216 && SYMBOL_REFERENCES_LOCAL (info, h)))
3218 /* This is actually a static link, or it is a
3219 -Bsymbolic link and the symbol is defined
3220 locally, or the symbol was forced to be local
3221 because of a version file. We must initialize
3222 this entry in the global offset table. Since the
3223 offset must always be a multiple of 8 for 64-bit
3224 and 4 for 32-bit, we use the least significant bit
3225 to record whether we have initialized it already.
3227 When doing a dynamic link, we create a .rela.got
3228 relocation entry to initialize the value. This
3229 is done in the finish_dynamic_symbol routine. */
3234 SPARC_ELF_PUT_WORD (htab, output_bfd, relocation,
3235 htab->elf.sgot->contents + off);
3240 unresolved_reloc = FALSE;
3244 BFD_ASSERT (local_got_offsets != NULL
3245 && local_got_offsets[r_symndx] != (bfd_vma) -1);
3247 off = local_got_offsets[r_symndx];
3249 /* The offset must always be a multiple of 8 on 64-bit and
3250 4 on 32-bit. We use the least significant bit to record
3251 whether we have already processed this entry. */
3257 if (bfd_link_pic (info))
3260 Elf_Internal_Rela outrel;
3262 /* We need to generate a R_SPARC_RELATIVE reloc
3263 for the dynamic linker. */
3264 s = htab->elf.srelgot;
3265 BFD_ASSERT (s != NULL);
3267 outrel.r_offset = (htab->elf.sgot->output_section->vma
3268 + htab->elf.sgot->output_offset
3270 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3271 0, R_SPARC_RELATIVE);
3272 outrel.r_addend = relocation;
3274 sparc_elf_append_rela (output_bfd, s, &outrel);
3277 SPARC_ELF_PUT_WORD (htab, output_bfd, relocation,
3278 htab->elf.sgot->contents + off);
3279 local_got_offsets[r_symndx] |= 1;
3282 relocation = htab->elf.sgot->output_offset + off - got_base;
3287 if (h == NULL || h->plt.offset == (bfd_vma) -1)
3289 r_type = (r_type == R_SPARC_PLT32) ? R_SPARC_32 : R_SPARC_64;
3294 case R_SPARC_WPLT30:
3295 case R_SPARC_HIPLT22:
3296 case R_SPARC_LOPLT10:
3297 case R_SPARC_PCPLT32:
3298 case R_SPARC_PCPLT22:
3299 case R_SPARC_PCPLT10:
3301 /* Relocation is to the entry for this symbol in the
3302 procedure linkage table. */
3304 if (! ABI_64_P (output_bfd))
3306 /* The Solaris native assembler will generate a WPLT30 reloc
3307 for a local symbol if you assemble a call from one
3308 section to another when using -K pic. We treat it as
3313 /* PR 7027: We need similar behaviour for 64-bit binaries. */
3314 else if (r_type == R_SPARC_WPLT30 && h == NULL)
3318 BFD_ASSERT (h != NULL);
3321 if (h->plt.offset == (bfd_vma) -1 || htab->elf.splt == NULL)
3323 /* We didn't make a PLT entry for this symbol. This
3324 happens when statically linking PIC code, or when
3325 using -Bsymbolic. */
3329 relocation = (htab->elf.splt->output_section->vma
3330 + htab->elf.splt->output_offset
3332 unresolved_reloc = FALSE;
3333 if (r_type == R_SPARC_PLT32 || r_type == R_SPARC_PLT64)
3335 r_type = r_type == R_SPARC_PLT32 ? R_SPARC_32 : R_SPARC_64;
3343 case R_SPARC_PC_HH22:
3344 case R_SPARC_PC_HM10:
3345 case R_SPARC_PC_LM22:
3347 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
3351 case R_SPARC_DISP16:
3352 case R_SPARC_DISP32:
3353 case R_SPARC_DISP64:
3354 case R_SPARC_WDISP30:
3355 case R_SPARC_WDISP22:
3356 case R_SPARC_WDISP19:
3357 case R_SPARC_WDISP16:
3358 case R_SPARC_WDISP10:
3386 if ((input_section->flags & SEC_ALLOC) == 0
3390 if ((bfd_link_pic (info)
3392 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3393 || h->root.type != bfd_link_hash_undefweak)
3394 && (! howto->pc_relative
3395 || !SYMBOL_CALLS_LOCAL (info, h)))
3396 || (!bfd_link_pic (info)
3402 || h->root.type == bfd_link_hash_undefweak
3403 || h->root.type == bfd_link_hash_undefined)))
3405 Elf_Internal_Rela outrel;
3406 bfd_boolean skip, relocate = FALSE;
3408 /* When generating a shared object, these relocations
3409 are copied into the output file to be resolved at run
3412 BFD_ASSERT (sreloc != NULL);
3417 _bfd_elf_section_offset (output_bfd, info, input_section,
3419 if (outrel.r_offset == (bfd_vma) -1)
3421 else if (outrel.r_offset == (bfd_vma) -2)
3422 skip = TRUE, relocate = TRUE;
3423 outrel.r_offset += (input_section->output_section->vma
3424 + input_section->output_offset);
3426 /* Optimize unaligned reloc usage now that we know where
3427 it finally resides. */
3431 if (outrel.r_offset & 1)
3432 r_type = R_SPARC_UA16;
3435 if (!(outrel.r_offset & 1))
3436 r_type = R_SPARC_16;
3439 if (outrel.r_offset & 3)
3440 r_type = R_SPARC_UA32;
3443 if (!(outrel.r_offset & 3))
3444 r_type = R_SPARC_32;
3447 if (outrel.r_offset & 7)
3448 r_type = R_SPARC_UA64;
3451 if (!(outrel.r_offset & 7))
3452 r_type = R_SPARC_64;
3455 case R_SPARC_DISP16:
3456 case R_SPARC_DISP32:
3457 case R_SPARC_DISP64:
3458 /* If the symbol is not dynamic, we should not keep
3459 a dynamic relocation. But an .rela.* slot has been
3460 allocated for it, output R_SPARC_NONE.
3461 FIXME: Add code tracking needed dynamic relocs as
3463 if (h->dynindx == -1)
3464 skip = TRUE, relocate = TRUE;
3469 memset (&outrel, 0, sizeof outrel);
3470 /* h->dynindx may be -1 if the symbol was marked to
3474 && (_bfd_sparc_elf_howto_table[r_type].pc_relative
3475 || !bfd_link_pic (info)
3476 || !SYMBOLIC_BIND (info, h)
3477 || !h->def_regular))
3479 BFD_ASSERT (h->dynindx != -1);
3480 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, h->dynindx, r_type);
3481 outrel.r_addend = rel->r_addend;
3485 if ( (!ABI_64_P (output_bfd) && r_type == R_SPARC_32)
3486 || (ABI_64_P (output_bfd) && r_type == R_SPARC_64))
3488 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3489 0, R_SPARC_RELATIVE);
3490 outrel.r_addend = relocation + rel->r_addend;
3496 outrel.r_addend = relocation + rel->r_addend;
3499 sec = htab->elf.splt;
3501 if (bfd_is_abs_section (sec))
3503 else if (sec == NULL || sec->owner == NULL)
3505 bfd_set_error (bfd_error_bad_value);
3512 /* We are turning this relocation into one
3513 against a section symbol. It would be
3514 proper to subtract the symbol's value,
3515 osec->vma, from the emitted reloc addend,
3516 but ld.so expects buggy relocs. */
3517 osec = sec->output_section;
3518 indx = elf_section_data (osec)->dynindx;
3522 osec = htab->elf.text_index_section;
3523 indx = elf_section_data (osec)->dynindx;
3526 /* FIXME: we really should be able to link non-pic
3527 shared libraries. */
3532 (_("%B: probably compiled without -fPIC?"),
3534 bfd_set_error (bfd_error_bad_value);
3539 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, indx,
3544 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
3546 /* This reloc will be computed at runtime, so there's no
3547 need to do anything now. */
3553 case R_SPARC_TLS_GD_HI22:
3554 if (! ABI_64_P (input_bfd)
3555 && ! _bfd_sparc_elf_tdata (input_bfd)->has_tlsgd)
3557 /* R_SPARC_REV32 used the same reloc number as
3558 R_SPARC_TLS_GD_HI22. */
3559 r_type = R_SPARC_REV32;
3564 case R_SPARC_TLS_GD_LO10:
3565 case R_SPARC_TLS_IE_HI22:
3566 case R_SPARC_TLS_IE_LO10:
3567 r_type = sparc_elf_tls_transition (info, input_bfd, r_type, h == NULL);
3568 tls_type = GOT_UNKNOWN;
3569 if (h == NULL && local_got_offsets)
3570 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
3573 tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
3574 if (!bfd_link_pic (info)
3576 && tls_type == GOT_TLS_IE)
3577 switch (SPARC_ELF_R_TYPE (rel->r_info))
3579 case R_SPARC_TLS_GD_HI22:
3580 case R_SPARC_TLS_IE_HI22:
3581 r_type = R_SPARC_TLS_LE_HIX22;
3584 r_type = R_SPARC_TLS_LE_LOX10;
3588 if (tls_type == GOT_TLS_IE)
3591 case R_SPARC_TLS_GD_HI22:
3592 r_type = R_SPARC_TLS_IE_HI22;
3594 case R_SPARC_TLS_GD_LO10:
3595 r_type = R_SPARC_TLS_IE_LO10;
3599 if (r_type == R_SPARC_TLS_LE_HIX22)
3601 relocation = tpoff (info, relocation);
3604 if (r_type == R_SPARC_TLS_LE_LOX10)
3606 /* Change add into xor. */
3607 relocation = tpoff (info, relocation);
3608 bfd_put_32 (output_bfd, (bfd_get_32 (input_bfd,
3609 contents + rel->r_offset)
3610 | 0x80182000), contents + rel->r_offset);
3616 off = h->got.offset;
3621 BFD_ASSERT (local_got_offsets != NULL);
3622 off = local_got_offsets[r_symndx];
3623 local_got_offsets[r_symndx] |= 1;
3627 if (htab->elf.sgot == NULL)
3634 Elf_Internal_Rela outrel;
3637 if (htab->elf.srelgot == NULL)
3640 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
3641 htab->elf.sgot->contents + off);
3642 outrel.r_offset = (htab->elf.sgot->output_section->vma
3643 + htab->elf.sgot->output_offset + off);
3644 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3645 if (r_type == R_SPARC_TLS_IE_HI22
3646 || r_type == R_SPARC_TLS_IE_LO10)
3647 dr_type = SPARC_ELF_TPOFF_RELOC (htab);
3649 dr_type = SPARC_ELF_DTPMOD_RELOC (htab);
3650 if (dr_type == SPARC_ELF_TPOFF_RELOC (htab) && indx == 0)
3651 outrel.r_addend = relocation - dtpoff_base (info);
3653 outrel.r_addend = 0;
3654 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, indx, dr_type);
3655 sparc_elf_append_rela (output_bfd, htab->elf.srelgot, &outrel);
3657 if (r_type == R_SPARC_TLS_GD_HI22
3658 || r_type == R_SPARC_TLS_GD_LO10)
3662 BFD_ASSERT (! unresolved_reloc);
3663 SPARC_ELF_PUT_WORD (htab, output_bfd,
3664 relocation - dtpoff_base (info),
3665 (htab->elf.sgot->contents + off
3666 + SPARC_ELF_WORD_BYTES (htab)));
3670 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
3671 (htab->elf.sgot->contents + off
3672 + SPARC_ELF_WORD_BYTES (htab)));
3673 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, indx,
3674 SPARC_ELF_DTPOFF_RELOC (htab));
3675 outrel.r_offset += SPARC_ELF_WORD_BYTES (htab);
3676 sparc_elf_append_rela (output_bfd, htab->elf.srelgot,
3680 else if (dr_type == SPARC_ELF_DTPMOD_RELOC (htab))
3682 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
3683 (htab->elf.sgot->contents + off
3684 + SPARC_ELF_WORD_BYTES (htab)));
3688 if (off >= (bfd_vma) -2)
3691 relocation = htab->elf.sgot->output_offset + off - got_base;
3692 unresolved_reloc = FALSE;
3693 howto = _bfd_sparc_elf_howto_table + r_type;
3696 case R_SPARC_TLS_LDM_HI22:
3697 case R_SPARC_TLS_LDM_LO10:
3698 if (! bfd_link_pic (info))
3700 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3703 off = htab->tls_ldm_got.offset;
3704 htab->tls_ldm_got.offset |= 1;
3705 goto r_sparc_tlsldm;
3707 case R_SPARC_TLS_LDO_HIX22:
3708 case R_SPARC_TLS_LDO_LOX10:
3709 if (bfd_link_pic (info))
3711 relocation -= dtpoff_base (info);
3715 r_type = (r_type == R_SPARC_TLS_LDO_HIX22
3716 ? R_SPARC_TLS_LE_HIX22 : R_SPARC_TLS_LE_LOX10);
3719 case R_SPARC_TLS_LE_HIX22:
3720 case R_SPARC_TLS_LE_LOX10:
3721 if (bfd_link_pic (info))
3723 Elf_Internal_Rela outrel;
3726 BFD_ASSERT (sreloc != NULL);
3729 _bfd_elf_section_offset (output_bfd, info, input_section,
3731 if (outrel.r_offset == (bfd_vma) -1)
3733 else if (outrel.r_offset == (bfd_vma) -2)
3735 outrel.r_offset += (input_section->output_section->vma
3736 + input_section->output_offset);
3738 memset (&outrel, 0, sizeof outrel);
3741 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, r_type);
3742 outrel.r_addend = relocation - dtpoff_base (info)
3746 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
3749 relocation = tpoff (info, relocation);
3752 case R_SPARC_TLS_LDM_CALL:
3753 if (! bfd_link_pic (info))
3756 bfd_put_32 (output_bfd, 0x90100000, contents + rel->r_offset);
3761 case R_SPARC_TLS_GD_CALL:
3762 tls_type = GOT_UNKNOWN;
3763 if (h == NULL && local_got_offsets)
3764 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
3766 tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
3767 if (! bfd_link_pic (info)
3768 || (r_type == R_SPARC_TLS_GD_CALL && tls_type == GOT_TLS_IE))
3770 Elf_Internal_Rela *rel2;
3773 if (!bfd_link_pic (info) && (h == NULL || h->dynindx == -1))
3776 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3781 if (rel + 1 < relend
3782 && SPARC_ELF_R_TYPE (rel[1].r_info) == R_SPARC_TLS_GD_ADD
3783 && rel[1].r_offset == rel->r_offset + 4
3784 && SPARC_ELF_R_SYMNDX (htab, rel[1].r_info) == r_symndx
3785 && (((insn = bfd_get_32 (input_bfd,
3786 contents + rel[1].r_offset))
3787 >> 25) & 0x1f) == 8)
3790 call __tls_get_addr, %tgd_call(foo)
3791 add %reg1, %reg2, %o0, %tgd_add(foo)
3792 and change it into IE:
3793 {ld,ldx} [%reg1 + %reg2], %o0, %tie_ldx(foo)
3794 add %g7, %o0, %o0, %tie_add(foo).
3795 add is 0x80000000 | (rd << 25) | (rs1 << 14) | rs2,
3796 ld is 0xc0000000 | (rd << 25) | (rs1 << 14) | rs2,
3797 ldx is 0xc0580000 | (rd << 25) | (rs1 << 14) | rs2. */
3798 bfd_put_32 (output_bfd, insn | (ABI_64_P (output_bfd) ? 0xc0580000 : 0xc0000000),
3799 contents + rel->r_offset);
3800 bfd_put_32 (output_bfd, 0x9001c008,
3801 contents + rel->r_offset + 4);
3806 /* We cannot just overwrite the delay slot instruction,
3807 as it might be what puts the %o0 argument to
3808 __tls_get_addr into place. So we have to transpose
3809 the delay slot with the add we patch in. */
3810 insn = bfd_get_32 (input_bfd, contents + rel->r_offset + 4);
3811 bfd_put_32 (output_bfd, insn,
3812 contents + rel->r_offset);
3813 bfd_put_32 (output_bfd, 0x9001c008,
3814 contents + rel->r_offset + 4);
3817 while ((rel2 = sparc_elf_find_reloc_at_ofs (rel2 + 1, relend,
3821 /* If the instruction we moved has a relocation attached to
3822 it, adjust the offset so that it will apply to the correct
3824 rel2->r_offset -= 4;
3829 h = (struct elf_link_hash_entry *)
3830 bfd_link_hash_lookup (info->hash, "__tls_get_addr", FALSE,
3832 BFD_ASSERT (h != NULL);
3833 r_type = R_SPARC_WPLT30;
3834 howto = _bfd_sparc_elf_howto_table + r_type;
3835 goto r_sparc_wplt30;
3837 case R_SPARC_TLS_GD_ADD:
3838 tls_type = GOT_UNKNOWN;
3839 if (h == NULL && local_got_offsets)
3840 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
3842 tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
3843 if (! bfd_link_pic (info) || tls_type == GOT_TLS_IE)
3845 /* add %reg1, %reg2, %reg3, %tgd_add(foo)
3847 {ld,ldx} [%reg1 + %reg2], %reg3, %tie_ldx(foo)
3849 add %g7, %reg2, %reg3. */
3850 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3851 if ((h != NULL && h->dynindx != -1) || bfd_link_pic (info))
3852 relocation = insn | (ABI_64_P (output_bfd) ? 0xc0580000 : 0xc0000000);
3854 relocation = (insn & ~0x7c000) | 0x1c000;
3855 bfd_put_32 (output_bfd, relocation, contents + rel->r_offset);
3859 case R_SPARC_TLS_LDM_ADD:
3860 if (! bfd_link_pic (info))
3861 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3864 case R_SPARC_TLS_LDO_ADD:
3865 if (! bfd_link_pic (info))
3867 /* Change rs1 into %g7. */
3868 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3869 insn = (insn & ~0x7c000) | 0x1c000;
3870 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
3874 case R_SPARC_TLS_IE_LD:
3875 case R_SPARC_TLS_IE_LDX:
3876 if (! bfd_link_pic (info) && (h == NULL || h->dynindx == -1))
3878 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3879 int rs2 = insn & 0x1f;
3880 int rd = (insn >> 25) & 0x1f;
3883 relocation = SPARC_NOP;
3885 relocation = 0x80100000 | (insn & 0x3e00001f);
3886 bfd_put_32 (output_bfd, relocation, contents + rel->r_offset);
3890 case R_SPARC_TLS_IE_ADD:
3891 /* Totally useless relocation. */
3894 case R_SPARC_TLS_DTPOFF32:
3895 case R_SPARC_TLS_DTPOFF64:
3896 relocation -= dtpoff_base (info);
3903 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3904 because such sections are not SEC_ALLOC and thus ld.so will
3905 not process them. */
3906 if (unresolved_reloc
3907 && !((input_section->flags & SEC_DEBUGGING) != 0
3909 && _bfd_elf_section_offset (output_bfd, info, input_section,
3910 rel->r_offset) != (bfd_vma) -1)
3912 /* xgettext:c-format */
3913 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
3916 (long) rel->r_offset,
3918 h->root.root.string);
3920 r = bfd_reloc_continue;
3921 if (r_type == R_SPARC_OLO10)
3925 if (! ABI_64_P (output_bfd))
3928 relocation += rel->r_addend;
3929 relocation = (relocation & 0x3ff) + ELF64_R_TYPE_DATA (rel->r_info);
3931 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3932 x = (x & ~(bfd_vma) 0x1fff) | (relocation & 0x1fff);
3933 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3935 r = bfd_check_overflow (howto->complain_on_overflow,
3936 howto->bitsize, howto->rightshift,
3937 bfd_arch_bits_per_address (input_bfd),
3940 else if (r_type == R_SPARC_WDISP16)
3944 relocation += rel->r_addend;
3945 relocation -= (input_section->output_section->vma
3946 + input_section->output_offset);
3947 relocation -= rel->r_offset;
3949 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3950 x |= ((((relocation >> 2) & 0xc000) << 6)
3951 | ((relocation >> 2) & 0x3fff));
3952 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3954 r = bfd_check_overflow (howto->complain_on_overflow,
3955 howto->bitsize, howto->rightshift,
3956 bfd_arch_bits_per_address (input_bfd),
3959 else if (r_type == R_SPARC_WDISP10)
3963 relocation += rel->r_addend;
3964 relocation -= (input_section->output_section->vma
3965 + input_section->output_offset);
3966 relocation -= rel->r_offset;
3968 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3969 x |= ((((relocation >> 2) & 0x300) << 11)
3970 | (((relocation >> 2) & 0xff) << 5));
3971 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3973 r = bfd_check_overflow (howto->complain_on_overflow,
3974 howto->bitsize, howto->rightshift,
3975 bfd_arch_bits_per_address (input_bfd),
3978 else if (r_type == R_SPARC_REV32)
3982 relocation = relocation + rel->r_addend;
3984 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3986 bfd_putl32 (/*input_bfd,*/ x, contents + rel->r_offset);
3989 else if (r_type == R_SPARC_TLS_LDO_HIX22
3990 || r_type == R_SPARC_TLS_LE_HIX22)
3994 relocation += rel->r_addend;
3995 if (r_type == R_SPARC_TLS_LE_HIX22)
3996 relocation ^= MINUS_ONE;
3998 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3999 x = (x & ~(bfd_vma) 0x3fffff) | ((relocation >> 10) & 0x3fffff);
4000 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4003 else if (r_type == R_SPARC_TLS_LDO_LOX10
4004 || r_type == R_SPARC_TLS_LE_LOX10)
4008 relocation += rel->r_addend;
4009 relocation &= 0x3ff;
4010 if (r_type == R_SPARC_TLS_LE_LOX10)
4011 relocation |= 0x1c00;
4013 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4014 x = (x & ~(bfd_vma) 0x1fff) | relocation;
4015 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4019 else if (r_type == R_SPARC_HIX22
4020 || r_type == R_SPARC_GOTDATA_HIX22
4021 || r_type == R_SPARC_GOTDATA_OP_HIX22)
4025 relocation += rel->r_addend;
4026 if (r_type == R_SPARC_HIX22
4027 || (bfd_signed_vma) relocation < 0)
4028 relocation = relocation ^ MINUS_ONE;
4030 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4031 x = (x & ~(bfd_vma) 0x3fffff) | ((relocation >> 10) & 0x3fffff);
4032 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4034 r = bfd_check_overflow (howto->complain_on_overflow,
4035 howto->bitsize, howto->rightshift,
4036 bfd_arch_bits_per_address (input_bfd),
4039 else if (r_type == R_SPARC_LOX10
4040 || r_type == R_SPARC_GOTDATA_LOX10
4041 || r_type == R_SPARC_GOTDATA_OP_LOX10)
4045 relocation += rel->r_addend;
4046 if (r_type == R_SPARC_LOX10
4047 || (bfd_signed_vma) relocation < 0)
4048 relocation = (relocation & 0x3ff) | 0x1c00;
4050 relocation = (relocation & 0x3ff);
4052 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4053 x = (x & ~(bfd_vma) 0x1fff) | relocation;
4054 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4058 else if ((r_type == R_SPARC_WDISP30 || r_type == R_SPARC_WPLT30)
4059 && sec_do_relax (input_section)
4060 && rel->r_offset + 4 < input_section->size)
4064 #define XCC (2 << 20)
4065 #define COND(x) (((x)&0xf)<<25)
4066 #define CONDA COND(0x8)
4067 #define INSN_BPA (F2(0,1) | CONDA | BPRED | XCC)
4068 #define INSN_BA (F2(0,2) | CONDA)
4069 #define INSN_OR F3(2, 0x2, 0)
4070 #define INSN_NOP F2(0,4)
4074 /* If the instruction is a call with either:
4076 arithmetic instruction with rd == %o7
4077 where rs1 != %o7 and rs2 if it is register != %o7
4078 then we can optimize if the call destination is near
4079 by changing the call into a branch always. */
4080 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4081 y = bfd_get_32 (input_bfd, contents + rel->r_offset + 4);
4082 if ((x & OP(~0)) == OP(1) && (y & OP(~0)) == OP(2))
4084 if (((y & OP3(~0)) == OP3(0x3d) /* restore */
4085 || ((y & OP3(0x28)) == 0 /* arithmetic */
4086 && (y & RD(~0)) == RD(O7)))
4087 && (y & RS1(~0)) != RS1(O7)
4089 || (y & RS2(~0)) != RS2(O7)))
4093 reloc = relocation + rel->r_addend - rel->r_offset;
4094 reloc -= (input_section->output_section->vma
4095 + input_section->output_offset);
4097 /* Ensure the branch fits into simm22. */
4098 if ((reloc & 3) == 0
4099 && ((reloc & ~(bfd_vma)0x7fffff) == 0
4100 || ((reloc | 0x7fffff) == ~(bfd_vma)0)))
4104 /* Check whether it fits into simm19. */
4105 if (((reloc & 0x3c0000) == 0
4106 || (reloc & 0x3c0000) == 0x3c0000)
4107 && (ABI_64_P (output_bfd)
4108 || elf_elfheader (output_bfd)->e_flags & EF_SPARC_32PLUS))
4109 x = INSN_BPA | (reloc & 0x7ffff); /* ba,pt %xcc */
4111 x = INSN_BA | (reloc & 0x3fffff); /* ba */
4112 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4114 if (rel->r_offset >= 4
4115 && (y & (0xffffffff ^ RS1(~0)))
4116 == (INSN_OR | RD(O7) | RS2(G0)))
4121 z = bfd_get_32 (input_bfd,
4122 contents + rel->r_offset - 4);
4123 if ((z & (0xffffffff ^ RD(~0)))
4124 != (INSN_OR | RS1(O7) | RS2(G0)))
4132 If call foo was replaced with ba, replace
4133 or %rN, %g0, %o7 with nop. */
4135 reg = (y & RS1(~0)) >> 14;
4136 if (reg != ((z & RD(~0)) >> 25)
4137 || reg == G0 || reg == O7)
4140 bfd_put_32 (input_bfd, (bfd_vma) INSN_NOP,
4141 contents + rel->r_offset + 4);
4149 if (r == bfd_reloc_continue)
4152 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
4153 contents, rel->r_offset,
4154 relocation, rel->r_addend);
4156 if (r != bfd_reloc_ok)
4161 case bfd_reloc_outofrange:
4163 case bfd_reloc_overflow:
4167 /* The Solaris native linker silently disregards overflows.
4168 We don't, but this breaks stabs debugging info, whose
4169 relocations are only 32-bits wide. Ignore overflows in
4170 this case and also for discarded entries. */
4171 if ((r_type == R_SPARC_32
4172 || r_type == R_SPARC_UA32
4173 || r_type == R_SPARC_DISP32)
4174 && (((input_section->flags & SEC_DEBUGGING) != 0
4175 && strcmp (bfd_section_name (input_bfd,
4178 || _bfd_elf_section_offset (output_bfd, info,
4186 /* Assume this is a call protected by other code that
4187 detect the symbol is undefined. If this is the case,
4188 we can safely ignore the overflow. If not, the
4189 program is hosed anyway, and a little warning isn't
4191 if (h->root.type == bfd_link_hash_undefweak
4192 && howto->pc_relative)
4199 name = bfd_elf_string_from_elf_section (input_bfd,
4200 symtab_hdr->sh_link,
4205 name = bfd_section_name (input_bfd, sec);
4207 (*info->callbacks->reloc_overflow)
4208 (info, (h ? &h->root : NULL), name, howto->name,
4209 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
4219 /* Build a VxWorks PLT entry. PLT_INDEX is the index of the PLT entry
4220 and PLT_OFFSET is the byte offset from the start of .plt. GOT_OFFSET
4221 is the offset of the associated .got.plt entry from
4222 _GLOBAL_OFFSET_TABLE_. */
4225 sparc_vxworks_build_plt_entry (bfd *output_bfd, struct bfd_link_info *info,
4226 bfd_vma plt_offset, bfd_vma plt_index,
4230 const bfd_vma *plt_entry;
4231 struct _bfd_sparc_elf_link_hash_table *htab;
4233 Elf_Internal_Rela rela;
4235 htab = _bfd_sparc_elf_hash_table (info);
4236 BFD_ASSERT (htab != NULL);
4238 if (bfd_link_pic (info))
4240 plt_entry = sparc_vxworks_shared_plt_entry;
4245 plt_entry = sparc_vxworks_exec_plt_entry;
4246 got_base = (htab->elf.hgot->root.u.def.value
4247 + htab->elf.hgot->root.u.def.section->output_offset
4248 + htab->elf.hgot->root.u.def.section->output_section->vma);
4251 /* Fill in the entry in the procedure linkage table. */
4252 bfd_put_32 (output_bfd, plt_entry[0] + ((got_base + got_offset) >> 10),
4253 htab->elf.splt->contents + plt_offset);
4254 bfd_put_32 (output_bfd, plt_entry[1] + ((got_base + got_offset) & 0x3ff),
4255 htab->elf.splt->contents + plt_offset + 4);
4256 bfd_put_32 (output_bfd, plt_entry[2],
4257 htab->elf.splt->contents + plt_offset + 8);
4258 bfd_put_32 (output_bfd, plt_entry[3],
4259 htab->elf.splt->contents + plt_offset + 12);
4260 bfd_put_32 (output_bfd, plt_entry[4],
4261 htab->elf.splt->contents + plt_offset + 16);
4262 bfd_put_32 (output_bfd, plt_entry[5] + (plt_index >> 10),
4263 htab->elf.splt->contents + plt_offset + 20);
4264 /* PC-relative displacement for a branch to the start of
4266 bfd_put_32 (output_bfd, plt_entry[6] + (((-plt_offset - 24) >> 2)
4268 htab->elf.splt->contents + plt_offset + 24);
4269 bfd_put_32 (output_bfd, plt_entry[7] + (plt_index & 0x3ff),
4270 htab->elf.splt->contents + plt_offset + 28);
4272 /* Fill in the .got.plt entry, pointing initially at the
4273 second half of the PLT entry. */
4274 BFD_ASSERT (htab->elf.sgotplt != NULL);
4275 bfd_put_32 (output_bfd,
4276 htab->elf.splt->output_section->vma
4277 + htab->elf.splt->output_offset
4279 htab->elf.sgotplt->contents + got_offset);
4281 /* Add relocations to .rela.plt.unloaded. */
4282 if (!bfd_link_pic (info))
4284 loc = (htab->srelplt2->contents
4285 + (2 + 3 * plt_index) * sizeof (Elf32_External_Rela));
4287 /* Relocate the initial sethi. */
4288 rela.r_offset = (htab->elf.splt->output_section->vma
4289 + htab->elf.splt->output_offset
4291 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4292 rela.r_addend = got_offset;
4293 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4294 loc += sizeof (Elf32_External_Rela);
4296 /* Likewise the following or. */
4298 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4299 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4300 loc += sizeof (Elf32_External_Rela);
4302 /* Relocate the .got.plt entry. */
4303 rela.r_offset = (htab->elf.sgotplt->output_section->vma
4304 + htab->elf.sgotplt->output_offset
4306 rela.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_SPARC_32);
4307 rela.r_addend = plt_offset + 20;
4308 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4312 /* Finish up dynamic symbol handling. We set the contents of various
4313 dynamic sections here. */
4316 _bfd_sparc_elf_finish_dynamic_symbol (bfd *output_bfd,
4317 struct bfd_link_info *info,
4318 struct elf_link_hash_entry *h,
4319 Elf_Internal_Sym *sym)
4321 struct _bfd_sparc_elf_link_hash_table *htab;
4322 const struct elf_backend_data *bed;
4324 htab = _bfd_sparc_elf_hash_table (info);
4325 BFD_ASSERT (htab != NULL);
4326 bed = get_elf_backend_data (output_bfd);
4328 if (h->plt.offset != (bfd_vma) -1)
4332 Elf_Internal_Rela rela;
4334 bfd_vma r_offset, got_offset;
4337 /* When building a static executable, use .iplt and
4338 .rela.iplt sections for STT_GNU_IFUNC symbols. */
4339 if (htab->elf.splt != NULL)
4341 splt = htab->elf.splt;
4342 srela = htab->elf.srelplt;
4346 splt = htab->elf.iplt;
4347 srela = htab->elf.irelplt;
4350 if (splt == NULL || srela == NULL)
4353 /* Fill in the entry in the .rela.plt section. */
4354 if (htab->is_vxworks)
4356 /* Work out the index of this PLT entry. */
4357 rela_index = ((h->plt.offset - htab->plt_header_size)
4358 / htab->plt_entry_size);
4360 /* Calculate the offset of the associated .got.plt entry.
4361 The first three entries are reserved. */
4362 got_offset = (rela_index + 3) * 4;
4364 sparc_vxworks_build_plt_entry (output_bfd, info, h->plt.offset,
4365 rela_index, got_offset);
4368 /* On VxWorks, the relocation points to the .got.plt entry,
4369 not the .plt entry. */
4370 rela.r_offset = (htab->elf.sgotplt->output_section->vma
4371 + htab->elf.sgotplt->output_offset
4374 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4379 bfd_boolean ifunc = FALSE;
4381 /* Fill in the entry in the procedure linkage table. */
4382 rela_index = SPARC_ELF_BUILD_PLT_ENTRY (htab, output_bfd, splt,
4383 h->plt.offset, splt->size,
4388 || ((bfd_link_executable (info)
4389 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
4391 && h->type == STT_GNU_IFUNC))
4394 BFD_ASSERT (h == NULL
4395 || (h->type == STT_GNU_IFUNC
4397 && (h->root.type == bfd_link_hash_defined
4398 || h->root.type == bfd_link_hash_defweak)));
4401 rela.r_offset = r_offset
4402 + (splt->output_section->vma + splt->output_offset);
4403 if (ABI_64_P (output_bfd)
4404 && h->plt.offset >= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE))
4408 rela.r_addend = (h->root.u.def.section->output_section->vma
4409 + h->root.u.def.section->output_offset
4410 + h->root.u.def.value);
4411 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0,
4416 rela.r_addend = (-(h->plt.offset + 4)
4417 - splt->output_section->vma
4418 - splt->output_offset);
4419 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4427 rela.r_addend = (h->root.u.def.section->output_section->vma
4428 + h->root.u.def.section->output_offset
4429 + h->root.u.def.value);
4430 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0,
4436 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4442 /* Adjust for the first 4 reserved elements in the .plt section
4443 when setting the offset in the .rela.plt section.
4444 Sun forgot to read their own ABI and copied elf32-sparc behaviour,
4445 thus .plt[4] has corresponding .rela.plt[0] and so on. */
4447 loc = srela->contents;
4448 loc += rela_index * bed->s->sizeof_rela;
4449 bed->s->swap_reloca_out (output_bfd, &rela, loc);
4451 if (!h->def_regular)
4453 /* Mark the symbol as undefined, rather than as defined in
4454 the .plt section. Leave the value alone. */
4455 sym->st_shndx = SHN_UNDEF;
4456 /* If the symbol is weak, we do need to clear the value.
4457 Otherwise, the PLT entry would provide a definition for
4458 the symbol even if the symbol wasn't defined anywhere,
4459 and so the symbol would never be NULL. */
4460 if (!h->ref_regular_nonweak)
4465 if (h->got.offset != (bfd_vma) -1
4466 && _bfd_sparc_elf_hash_entry(h)->tls_type != GOT_TLS_GD
4467 && _bfd_sparc_elf_hash_entry(h)->tls_type != GOT_TLS_IE)
4471 Elf_Internal_Rela rela;
4473 /* This symbol has an entry in the GOT. Set it up. */
4475 sgot = htab->elf.sgot;
4476 srela = htab->elf.srelgot;
4477 BFD_ASSERT (sgot != NULL && srela != NULL);
4479 rela.r_offset = (sgot->output_section->vma
4480 + sgot->output_offset
4481 + (h->got.offset &~ (bfd_vma) 1));
4483 /* If this is a -Bsymbolic link, and the symbol is defined
4484 locally, we just want to emit a RELATIVE reloc. Likewise if
4485 the symbol was forced to be local because of a version file.
4486 The entry in the global offset table will already have been
4487 initialized in the relocate_section function. */
4488 if (! bfd_link_pic (info)
4489 && h->type == STT_GNU_IFUNC
4494 /* We load the GOT entry with the PLT entry. */
4495 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
4496 SPARC_ELF_PUT_WORD (htab, output_bfd,
4497 (plt->output_section->vma
4498 + plt->output_offset + h->plt.offset),
4499 htab->elf.sgot->contents
4500 + (h->got.offset & ~(bfd_vma) 1));
4503 else if (bfd_link_pic (info)
4504 && SYMBOL_REFERENCES_LOCAL (info, h))
4506 asection *sec = h->root.u.def.section;
4507 if (h->type == STT_GNU_IFUNC)
4508 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, R_SPARC_IRELATIVE);
4510 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, R_SPARC_RELATIVE);
4511 rela.r_addend = (h->root.u.def.value
4512 + sec->output_section->vma
4513 + sec->output_offset);
4517 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx, R_SPARC_GLOB_DAT);
4521 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
4522 sgot->contents + (h->got.offset & ~(bfd_vma) 1));
4523 sparc_elf_append_rela (output_bfd, srela, &rela);
4529 Elf_Internal_Rela rela;
4531 /* This symbols needs a copy reloc. Set it up. */
4532 BFD_ASSERT (h->dynindx != -1);
4534 s = bfd_get_linker_section (h->root.u.def.section->owner,
4536 BFD_ASSERT (s != NULL);
4538 rela.r_offset = (h->root.u.def.value
4539 + h->root.u.def.section->output_section->vma
4540 + h->root.u.def.section->output_offset);
4541 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx, R_SPARC_COPY);
4543 sparc_elf_append_rela (output_bfd, s, &rela);
4546 /* Mark some specially defined symbols as absolute. On VxWorks,
4547 _GLOBAL_OFFSET_TABLE_ is not absolute: it is relative to the
4548 ".got" section. Likewise _PROCEDURE_LINKAGE_TABLE_ and ".plt". */
4550 && (h == htab->elf.hdynamic
4551 || (!htab->is_vxworks
4552 && (h == htab->elf.hgot || h == htab->elf.hplt))))
4553 sym->st_shndx = SHN_ABS;
4558 /* Finish up the dynamic sections. */
4561 sparc_finish_dyn (bfd *output_bfd, struct bfd_link_info *info,
4562 bfd *dynobj, asection *sdyn,
4563 asection *splt ATTRIBUTE_UNUSED)
4565 struct _bfd_sparc_elf_link_hash_table *htab;
4566 const struct elf_backend_data *bed;
4567 bfd_byte *dyncon, *dynconend;
4569 int stt_regidx = -1;
4570 bfd_boolean abi_64_p;
4572 htab = _bfd_sparc_elf_hash_table (info);
4573 BFD_ASSERT (htab != NULL);
4574 bed = get_elf_backend_data (output_bfd);
4575 dynsize = bed->s->sizeof_dyn;
4576 dynconend = sdyn->contents + sdyn->size;
4577 abi_64_p = ABI_64_P (output_bfd);
4578 for (dyncon = sdyn->contents; dyncon < dynconend; dyncon += dynsize)
4580 Elf_Internal_Dyn dyn;
4584 bed->s->swap_dyn_in (dynobj, dyncon, &dyn);
4586 if (htab->is_vxworks && dyn.d_tag == DT_RELASZ)
4588 /* On VxWorks, DT_RELASZ should not include the relocations
4590 if (htab->elf.srelplt)
4592 dyn.d_un.d_val -= htab->elf.srelplt->size;
4593 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4596 else if (htab->is_vxworks && dyn.d_tag == DT_PLTGOT)
4598 /* On VxWorks, DT_PLTGOT should point to the start of the GOT,
4599 not to the start of the PLT. */
4600 if (htab->elf.sgotplt)
4602 dyn.d_un.d_val = (htab->elf.sgotplt->output_section->vma
4603 + htab->elf.sgotplt->output_offset);
4604 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4607 else if (htab->is_vxworks
4608 && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn))
4609 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4610 else if (abi_64_p && dyn.d_tag == DT_SPARC_REGISTER)
4612 if (stt_regidx == -1)
4615 _bfd_elf_link_lookup_local_dynindx (info, output_bfd, -1);
4616 if (stt_regidx == -1)
4619 dyn.d_un.d_val = stt_regidx++;
4620 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4626 case DT_PLTGOT: name = ".plt"; size = FALSE; break;
4627 case DT_PLTRELSZ: name = ".rela.plt"; size = TRUE; break;
4628 case DT_JMPREL: name = ".rela.plt"; size = FALSE; break;
4629 default: name = NULL; size = FALSE; break;
4636 s = bfd_get_linker_section (dynobj, name);
4642 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
4644 dyn.d_un.d_val = s->size;
4646 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4653 /* Install the first PLT entry in a VxWorks executable and make sure that
4654 .rela.plt.unloaded relocations have the correct symbol indexes. */
4657 sparc_vxworks_finish_exec_plt (bfd *output_bfd, struct bfd_link_info *info)
4659 struct _bfd_sparc_elf_link_hash_table *htab;
4660 Elf_Internal_Rela rela;
4664 htab = _bfd_sparc_elf_hash_table (info);
4665 BFD_ASSERT (htab != NULL);
4667 /* Calculate the absolute value of _GLOBAL_OFFSET_TABLE_. */
4668 got_base = (htab->elf.hgot->root.u.def.section->output_section->vma
4669 + htab->elf.hgot->root.u.def.section->output_offset
4670 + htab->elf.hgot->root.u.def.value);
4672 /* Install the initial PLT entry. */
4673 bfd_put_32 (output_bfd,
4674 sparc_vxworks_exec_plt0_entry[0] + ((got_base + 8) >> 10),
4675 htab->elf.splt->contents);
4676 bfd_put_32 (output_bfd,
4677 sparc_vxworks_exec_plt0_entry[1] + ((got_base + 8) & 0x3ff),
4678 htab->elf.splt->contents + 4);
4679 bfd_put_32 (output_bfd,
4680 sparc_vxworks_exec_plt0_entry[2],
4681 htab->elf.splt->contents + 8);
4682 bfd_put_32 (output_bfd,
4683 sparc_vxworks_exec_plt0_entry[3],
4684 htab->elf.splt->contents + 12);
4685 bfd_put_32 (output_bfd,
4686 sparc_vxworks_exec_plt0_entry[4],
4687 htab->elf.splt->contents + 16);
4689 loc = htab->srelplt2->contents;
4691 /* Add an unloaded relocation for the initial entry's "sethi". */
4692 rela.r_offset = (htab->elf.splt->output_section->vma
4693 + htab->elf.splt->output_offset);
4694 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4696 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4697 loc += sizeof (Elf32_External_Rela);
4699 /* Likewise the following "or". */
4701 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4702 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4703 loc += sizeof (Elf32_External_Rela);
4705 /* Fix up the remaining .rela.plt.unloaded relocations. They may have
4706 the wrong symbol index for _G_O_T_ or _P_L_T_ depending on the order
4707 in which symbols were output. */
4708 while (loc < htab->srelplt2->contents + htab->srelplt2->size)
4710 Elf_Internal_Rela rel;
4712 /* The entry's initial "sethi" (against _G_O_T_). */
4713 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4714 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4715 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4716 loc += sizeof (Elf32_External_Rela);
4718 /* The following "or" (also against _G_O_T_). */
4719 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4720 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4721 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4722 loc += sizeof (Elf32_External_Rela);
4724 /* The .got.plt entry (against _P_L_T_). */
4725 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4726 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_SPARC_32);
4727 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4728 loc += sizeof (Elf32_External_Rela);
4732 /* Install the first PLT entry in a VxWorks shared object. */
4735 sparc_vxworks_finish_shared_plt (bfd *output_bfd, struct bfd_link_info *info)
4737 struct _bfd_sparc_elf_link_hash_table *htab;
4740 htab = _bfd_sparc_elf_hash_table (info);
4741 BFD_ASSERT (htab != NULL);
4743 for (i = 0; i < ARRAY_SIZE (sparc_vxworks_shared_plt0_entry); i++)
4744 bfd_put_32 (output_bfd, sparc_vxworks_shared_plt0_entry[i],
4745 htab->elf.splt->contents + i * 4);
4748 /* Finish up local dynamic symbol handling. We set the contents of
4749 various dynamic sections here. */
4752 finish_local_dynamic_symbol (void **slot, void *inf)
4754 struct elf_link_hash_entry *h
4755 = (struct elf_link_hash_entry *) *slot;
4756 struct bfd_link_info *info
4757 = (struct bfd_link_info *) inf;
4759 return _bfd_sparc_elf_finish_dynamic_symbol (info->output_bfd, info,
4764 _bfd_sparc_elf_finish_dynamic_sections (bfd *output_bfd, struct bfd_link_info *info)
4768 struct _bfd_sparc_elf_link_hash_table *htab;
4770 htab = _bfd_sparc_elf_hash_table (info);
4771 BFD_ASSERT (htab != NULL);
4772 dynobj = htab->elf.dynobj;
4774 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
4776 if (elf_hash_table (info)->dynamic_sections_created)
4780 splt = htab->elf.splt;
4781 BFD_ASSERT (splt != NULL && sdyn != NULL);
4783 if (!sparc_finish_dyn (output_bfd, info, dynobj, sdyn, splt))
4786 /* Initialize the contents of the .plt section. */
4789 if (htab->is_vxworks)
4791 if (bfd_link_pic (info))
4792 sparc_vxworks_finish_shared_plt (output_bfd, info);
4794 sparc_vxworks_finish_exec_plt (output_bfd, info);
4798 memset (splt->contents, 0, htab->plt_header_size);
4799 if (!ABI_64_P (output_bfd))
4800 bfd_put_32 (output_bfd, (bfd_vma) SPARC_NOP,
4801 splt->contents + splt->size - 4);
4805 if (elf_section_data (splt->output_section) != NULL)
4806 elf_section_data (splt->output_section)->this_hdr.sh_entsize
4807 = ((htab->is_vxworks || !ABI_64_P (output_bfd))
4808 ? 0 : htab->plt_entry_size);
4811 /* Set the first entry in the global offset table to the address of
4812 the dynamic section. */
4813 if (htab->elf.sgot && htab->elf.sgot->size > 0)
4815 bfd_vma val = (sdyn ?
4816 sdyn->output_section->vma + sdyn->output_offset :
4819 SPARC_ELF_PUT_WORD (htab, output_bfd, val, htab->elf.sgot->contents);
4823 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize =
4824 SPARC_ELF_WORD_BYTES (htab);
4826 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4827 htab_traverse (htab->loc_hash_table, finish_local_dynamic_symbol, info);
4833 /* Set the right machine number for a SPARC ELF file. */
4836 _bfd_sparc_elf_object_p (bfd *abfd)
4838 obj_attribute *attrs = elf_known_obj_attributes (abfd)[OBJ_ATTR_GNU];
4839 obj_attribute *hwcaps = &attrs[Tag_GNU_Sparc_HWCAPS];
4840 obj_attribute *hwcaps2 = &attrs[Tag_GNU_Sparc_HWCAPS2];
4842 unsigned int v9c_hwcaps_mask = ELF_SPARC_HWCAP_ASI_BLK_INIT;
4843 unsigned int v9d_hwcaps_mask = (ELF_SPARC_HWCAP_FMAF
4844 | ELF_SPARC_HWCAP_VIS3
4845 | ELF_SPARC_HWCAP_HPC);
4846 unsigned int v9e_hwcaps_mask = (ELF_SPARC_HWCAP_AES
4847 | ELF_SPARC_HWCAP_DES
4848 | ELF_SPARC_HWCAP_KASUMI
4849 | ELF_SPARC_HWCAP_CAMELLIA
4850 | ELF_SPARC_HWCAP_MD5
4851 | ELF_SPARC_HWCAP_SHA1
4852 | ELF_SPARC_HWCAP_SHA256
4853 | ELF_SPARC_HWCAP_SHA512
4854 | ELF_SPARC_HWCAP_MPMUL
4855 | ELF_SPARC_HWCAP_MONT
4856 | ELF_SPARC_HWCAP_CRC32C
4857 | ELF_SPARC_HWCAP_CBCOND
4858 | ELF_SPARC_HWCAP_PAUSE);
4859 unsigned int v9v_hwcaps_mask = (ELF_SPARC_HWCAP_FJFMAU
4860 | ELF_SPARC_HWCAP_IMA);
4861 unsigned int v9m_hwcaps2_mask = (ELF_SPARC_HWCAP2_SPARC5
4862 | ELF_SPARC_HWCAP2_MWAIT
4863 | ELF_SPARC_HWCAP2_XMPMUL
4864 | ELF_SPARC_HWCAP2_XMONT);
4866 if (ABI_64_P (abfd))
4868 unsigned long mach = bfd_mach_sparc_v9;
4870 if (hwcaps2->i & v9m_hwcaps2_mask)
4871 mach = bfd_mach_sparc_v9m;
4872 else if (hwcaps->i & v9v_hwcaps_mask)
4873 mach = bfd_mach_sparc_v9v;
4874 else if (hwcaps->i & v9e_hwcaps_mask)
4875 mach = bfd_mach_sparc_v9e;
4876 else if (hwcaps->i & v9d_hwcaps_mask)
4877 mach = bfd_mach_sparc_v9d;
4878 else if (hwcaps->i & v9c_hwcaps_mask)
4879 mach = bfd_mach_sparc_v9c;
4880 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US3)
4881 mach = bfd_mach_sparc_v9b;
4882 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US1)
4883 mach = bfd_mach_sparc_v9a;
4884 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc, mach);
4888 if (elf_elfheader (abfd)->e_machine == EM_SPARC32PLUS)
4890 if (hwcaps2->i & v9m_hwcaps2_mask)
4891 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4892 bfd_mach_sparc_v8plusm);
4893 else if (hwcaps->i & v9v_hwcaps_mask)
4894 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4895 bfd_mach_sparc_v8plusv);
4896 else if (hwcaps->i & v9e_hwcaps_mask)
4897 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4898 bfd_mach_sparc_v8pluse);
4899 else if (hwcaps->i & v9d_hwcaps_mask)
4900 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4901 bfd_mach_sparc_v8plusd);
4902 else if (hwcaps->i & v9c_hwcaps_mask)
4903 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4904 bfd_mach_sparc_v8plusc);
4905 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US3)
4906 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4907 bfd_mach_sparc_v8plusb);
4908 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US1)
4909 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4910 bfd_mach_sparc_v8plusa);
4911 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_32PLUS)
4912 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4913 bfd_mach_sparc_v8plus);
4917 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_LEDATA)
4918 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4919 bfd_mach_sparc_sparclite_le);
4921 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc, bfd_mach_sparc);
4925 /* Return address for Ith PLT stub in section PLT, for relocation REL
4926 or (bfd_vma) -1 if it should not be included. */
4929 _bfd_sparc_elf_plt_sym_val (bfd_vma i, const asection *plt, const arelent *rel)
4931 if (ABI_64_P (plt->owner))
4935 i += PLT64_HEADER_SIZE / PLT64_ENTRY_SIZE;
4936 if (i < PLT64_LARGE_THRESHOLD)
4937 return plt->vma + i * PLT64_ENTRY_SIZE;
4939 j = (i - PLT64_LARGE_THRESHOLD) % 160;
4941 return plt->vma + i * PLT64_ENTRY_SIZE + j * 4 * 6;
4944 return rel->address;
4947 /* Merge backend specific data from an object file to the output
4948 object file when linking. */
4951 _bfd_sparc_elf_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
4953 bfd *obfd = info->output_bfd;
4954 obj_attribute *in_attr, *in_attrs;
4955 obj_attribute *out_attr, *out_attrs;
4957 if (!elf_known_obj_attributes_proc (obfd)[0].i)
4959 /* This is the first object. Copy the attributes. */
4960 _bfd_elf_copy_obj_attributes (ibfd, obfd);
4962 /* Use the Tag_null value to indicate the attributes have been
4964 elf_known_obj_attributes_proc (obfd)[0].i = 1;
4969 in_attrs = elf_known_obj_attributes (ibfd)[OBJ_ATTR_GNU];
4970 out_attrs = elf_known_obj_attributes (obfd)[OBJ_ATTR_GNU];
4972 in_attr = &in_attrs[Tag_GNU_Sparc_HWCAPS];
4973 out_attr = &out_attrs[Tag_GNU_Sparc_HWCAPS];
4975 out_attr->i |= in_attr->i;
4978 in_attr = &in_attrs[Tag_GNU_Sparc_HWCAPS2];
4979 out_attr = &out_attrs[Tag_GNU_Sparc_HWCAPS2];
4981 out_attr->i |= in_attr->i;
4984 /* Merge Tag_compatibility attributes and any common GNU ones. */
4985 _bfd_elf_merge_object_attributes (ibfd, info);