1 /* SPARC-specific support for ELF
2 Copyright (C) 2005-2018 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 /* Is an undefined weak symbol resolved to 0 ?
667 Reference to an undefined weak symbol is resolved to 0 when
668 building an executable if it isn't dynamic and
669 1. Has non-GOT/non-PLT relocations in text section.
671 2. Has no GOT/PLT relocation. */
672 #define UNDEFINED_WEAK_RESOLVED_TO_ZERO(INFO, EH) \
673 ((EH)->elf.root.type == bfd_link_hash_undefweak \
674 && bfd_link_executable (INFO) \
675 && (_bfd_sparc_elf_hash_table (INFO)->interp == NULL \
676 || !(INFO)->dynamic_undefined_weak \
677 || (EH)->has_non_got_reloc \
678 || !(EH)->has_got_reloc))
680 /* SPARC ELF linker hash entry. */
682 struct _bfd_sparc_elf_link_hash_entry
684 struct elf_link_hash_entry elf;
686 /* Track dynamic relocs copied for this symbol. */
687 struct elf_dyn_relocs *dyn_relocs;
689 #define GOT_UNKNOWN 0
693 unsigned char tls_type;
695 /* Symbol has GOT or PLT relocations. */
696 unsigned int has_got_reloc : 1;
698 /* Symbol has non-GOT/non-PLT relocations in text sections. */
699 unsigned int has_non_got_reloc : 1;
703 #define _bfd_sparc_elf_hash_entry(ent) ((struct _bfd_sparc_elf_link_hash_entry *)(ent))
705 struct _bfd_sparc_elf_obj_tdata
707 struct elf_obj_tdata root;
709 /* tls_type for each local got entry. */
710 char *local_got_tls_type;
712 /* TRUE if TLS GD relocs has been seen for this object. */
713 bfd_boolean has_tlsgd;
716 #define _bfd_sparc_elf_tdata(abfd) \
717 ((struct _bfd_sparc_elf_obj_tdata *) (abfd)->tdata.any)
719 #define _bfd_sparc_elf_local_got_tls_type(abfd) \
720 (_bfd_sparc_elf_tdata (abfd)->local_got_tls_type)
722 #define is_sparc_elf(bfd) \
723 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
724 && elf_tdata (bfd) != NULL \
725 && elf_object_id (bfd) == SPARC_ELF_DATA)
728 _bfd_sparc_elf_mkobject (bfd *abfd)
730 return bfd_elf_allocate_object (abfd, sizeof (struct _bfd_sparc_elf_obj_tdata),
735 sparc_put_word_32 (bfd *abfd, bfd_vma val, void *ptr)
737 bfd_put_32 (abfd, val, ptr);
741 sparc_put_word_64 (bfd *abfd, bfd_vma val, void *ptr)
743 bfd_put_64 (abfd, val, ptr);
747 sparc_elf_append_rela (bfd *abfd, asection *s, Elf_Internal_Rela *rel)
749 const struct elf_backend_data *bed;
752 bed = get_elf_backend_data (abfd);
753 BFD_ASSERT (s->reloc_count * bed->s->sizeof_rela < s->size);
754 loc = s->contents + (s->reloc_count++ * bed->s->sizeof_rela);
755 bed->s->swap_reloca_out (abfd, rel, loc);
759 sparc_elf_r_info_64 (Elf_Internal_Rela *in_rel ATTRIBUTE_UNUSED,
760 bfd_vma rel_index ATTRIBUTE_UNUSED,
761 bfd_vma type ATTRIBUTE_UNUSED)
763 return ELF64_R_INFO (rel_index,
765 ELF64_R_TYPE_INFO (ELF64_R_TYPE_DATA (in_rel->r_info),
770 sparc_elf_r_info_32 (Elf_Internal_Rela *in_rel ATTRIBUTE_UNUSED,
771 bfd_vma rel_index, bfd_vma type)
773 return ELF32_R_INFO (rel_index, type);
777 sparc_elf_r_symndx_64 (bfd_vma r_info)
779 bfd_vma r_symndx = ELF32_R_SYM (r_info);
780 return (r_symndx >> 24);
784 sparc_elf_r_symndx_32 (bfd_vma r_info)
786 return ELF32_R_SYM (r_info);
791 #define PLT32_ENTRY_SIZE 12
792 #define PLT32_HEADER_SIZE (4 * PLT32_ENTRY_SIZE)
794 /* The first four entries in a 32-bit procedure linkage table are reserved,
795 and the initial contents are unimportant (we zero them out).
796 Subsequent entries look like this. See the SVR4 ABI SPARC
797 supplement to see how this works. */
799 /* sethi %hi(.-.plt0),%g1. We fill in the address later. */
800 #define PLT32_ENTRY_WORD0 0x03000000
801 /* b,a .plt0. We fill in the offset later. */
802 #define PLT32_ENTRY_WORD1 0x30800000
804 #define PLT32_ENTRY_WORD2 SPARC_NOP
807 sparc32_plt_entry_build (bfd *output_bfd, asection *splt, bfd_vma offset,
808 bfd_vma max ATTRIBUTE_UNUSED,
811 bfd_put_32 (output_bfd,
812 PLT32_ENTRY_WORD0 + offset,
813 splt->contents + offset);
814 bfd_put_32 (output_bfd,
816 + (((- (offset + 4)) >> 2) & 0x3fffff)),
817 splt->contents + offset + 4);
818 bfd_put_32 (output_bfd, (bfd_vma) PLT32_ENTRY_WORD2,
819 splt->contents + offset + 8);
823 return offset / PLT32_ENTRY_SIZE - 4;
826 /* Both the headers and the entries are icache aligned. */
827 #define PLT64_ENTRY_SIZE 32
828 #define PLT64_HEADER_SIZE (4 * PLT64_ENTRY_SIZE)
829 #define PLT64_LARGE_THRESHOLD 32768
832 sparc64_plt_entry_build (bfd *output_bfd, asection *splt, bfd_vma offset,
833 bfd_vma max, bfd_vma *r_offset)
835 unsigned char *entry = splt->contents + offset;
836 const unsigned int nop = SPARC_NOP;
839 if (offset < (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE))
841 unsigned int sethi, ba;
845 plt_index = (offset / PLT64_ENTRY_SIZE);
847 sethi = 0x03000000 | (plt_index * PLT64_ENTRY_SIZE);
849 | (((splt->contents + PLT64_ENTRY_SIZE) - (entry + 4)) / 4 & 0x7ffff);
851 bfd_put_32 (output_bfd, (bfd_vma) sethi, entry);
852 bfd_put_32 (output_bfd, (bfd_vma) ba, entry + 4);
853 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 8);
854 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 12);
855 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 16);
856 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 20);
857 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 24);
858 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 28);
864 int block, last_block, ofs, last_ofs, chunks_this_block;
865 const int insn_chunk_size = (6 * 4);
866 const int ptr_chunk_size = (1 * 8);
867 const int entries_per_block = 160;
868 const int block_size = entries_per_block * (insn_chunk_size
871 /* Entries 32768 and higher are grouped into blocks of 160.
872 The blocks are further subdivided into 160 sequences of
873 6 instructions and 160 pointers. If a block does not require
874 the full 160 entries, let's say it requires N, then there
875 will be N sequences of 6 instructions and N pointers. */
877 offset -= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE);
878 max -= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE);
880 block = offset / block_size;
881 last_block = max / block_size;
882 if (block != last_block)
884 chunks_this_block = 160;
888 last_ofs = max % block_size;
889 chunks_this_block = last_ofs / (insn_chunk_size + ptr_chunk_size);
892 ofs = offset % block_size;
894 plt_index = (PLT64_LARGE_THRESHOLD +
896 (ofs / insn_chunk_size));
899 + (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE)
900 + (block * block_size)
901 + (chunks_this_block * insn_chunk_size)
902 + (ofs / insn_chunk_size) * ptr_chunk_size;
904 *r_offset = (bfd_vma) (ptr - splt->contents);
906 ldx = 0xc25be000 | ((ptr - (entry+4)) & 0x1fff);
914 bfd_put_32 (output_bfd, (bfd_vma) 0x8a10000f, entry);
915 bfd_put_32 (output_bfd, (bfd_vma) 0x40000002, entry + 4);
916 bfd_put_32 (output_bfd, (bfd_vma) SPARC_NOP, entry + 8);
917 bfd_put_32 (output_bfd, (bfd_vma) ldx, entry + 12);
918 bfd_put_32 (output_bfd, (bfd_vma) 0x83c3c001, entry + 16);
919 bfd_put_32 (output_bfd, (bfd_vma) 0x9e100005, entry + 20);
921 bfd_put_64 (output_bfd, (bfd_vma) (splt->contents - (entry + 4)), ptr);
924 return plt_index - 4;
927 /* The format of the first PLT entry in a VxWorks executable. */
928 static const bfd_vma sparc_vxworks_exec_plt0_entry[] =
930 0x05000000, /* sethi %hi(_GLOBAL_OFFSET_TABLE_+8), %g2 */
931 0x8410a000, /* or %g2, %lo(_GLOBAL_OFFSET_TABLE_+8), %g2 */
932 0xc4008000, /* ld [ %g2 ], %g2 */
933 0x81c08000, /* jmp %g2 */
937 /* The format of subsequent PLT entries. */
938 static const bfd_vma sparc_vxworks_exec_plt_entry[] =
940 0x03000000, /* sethi %hi(_GLOBAL_OFFSET_TABLE_+f@got), %g1 */
941 0x82106000, /* or %g1, %lo(_GLOBAL_OFFSET_TABLE_+f@got), %g1 */
942 0xc2004000, /* ld [ %g1 ], %g1 */
943 0x81c04000, /* jmp %g1 */
944 0x01000000, /* nop */
945 0x03000000, /* sethi %hi(f@pltindex), %g1 */
946 0x10800000, /* b _PLT_resolve */
947 0x82106000 /* or %g1, %lo(f@pltindex), %g1 */
950 /* The format of the first PLT entry in a VxWorks shared object. */
951 static const bfd_vma sparc_vxworks_shared_plt0_entry[] =
953 0xc405e008, /* ld [ %l7 + 8 ], %g2 */
954 0x81c08000, /* jmp %g2 */
958 /* The format of subsequent PLT entries. */
959 static const bfd_vma sparc_vxworks_shared_plt_entry[] =
961 0x03000000, /* sethi %hi(f@got), %g1 */
962 0x82106000, /* or %g1, %lo(f@got), %g1 */
963 0xc205c001, /* ld [ %l7 + %g1 ], %g1 */
964 0x81c04000, /* jmp %g1 */
965 0x01000000, /* nop */
966 0x03000000, /* sethi %hi(f@pltindex), %g1 */
967 0x10800000, /* b _PLT_resolve */
968 0x82106000 /* or %g1, %lo(f@pltindex), %g1 */
971 #define SPARC_ELF_PUT_WORD(htab, bfd, val, ptr) \
972 htab->put_word(bfd, val, ptr)
974 #define SPARC_ELF_R_INFO(htab, in_rel, index, type) \
975 htab->r_info(in_rel, index, type)
977 #define SPARC_ELF_R_SYMNDX(htab, r_info) \
978 htab->r_symndx(r_info)
980 #define SPARC_ELF_WORD_BYTES(htab) \
983 #define SPARC_ELF_RELA_BYTES(htab) \
986 #define SPARC_ELF_DTPOFF_RELOC(htab) \
989 #define SPARC_ELF_DTPMOD_RELOC(htab) \
992 #define SPARC_ELF_TPOFF_RELOC(htab) \
995 #define SPARC_ELF_BUILD_PLT_ENTRY(htab, obfd, splt, off, max, r_off) \
996 htab->build_plt_entry (obfd, splt, off, max, r_off)
998 /* Create an entry in an SPARC ELF linker hash table. */
1000 static struct bfd_hash_entry *
1001 link_hash_newfunc (struct bfd_hash_entry *entry,
1002 struct bfd_hash_table *table, const char *string)
1004 /* Allocate the structure if it has not already been allocated by a
1008 entry = bfd_hash_allocate (table,
1009 sizeof (struct _bfd_sparc_elf_link_hash_entry));
1014 /* Call the allocation method of the superclass. */
1015 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
1018 struct _bfd_sparc_elf_link_hash_entry *eh;
1020 eh = (struct _bfd_sparc_elf_link_hash_entry *) entry;
1021 eh->dyn_relocs = NULL;
1022 eh->tls_type = GOT_UNKNOWN;
1023 eh->has_got_reloc = 0;
1024 eh->has_non_got_reloc = 0;
1030 /* The name of the dynamic interpreter. This is put in the .interp
1033 #define ELF32_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
1034 #define ELF64_DYNAMIC_INTERPRETER "/usr/lib/sparcv9/ld.so.1"
1036 /* Compute a hash of a local hash entry. We use elf_link_hash_entry
1037 for local symbol so that we can handle local STT_GNU_IFUNC symbols
1038 as global symbol. We reuse indx and dynstr_index for local symbol
1039 hash since they aren't used by global symbols in this backend. */
1042 elf_sparc_local_htab_hash (const void *ptr)
1044 struct elf_link_hash_entry *h
1045 = (struct elf_link_hash_entry *) ptr;
1046 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
1049 /* Compare local hash entries. */
1052 elf_sparc_local_htab_eq (const void *ptr1, const void *ptr2)
1054 struct elf_link_hash_entry *h1
1055 = (struct elf_link_hash_entry *) ptr1;
1056 struct elf_link_hash_entry *h2
1057 = (struct elf_link_hash_entry *) ptr2;
1059 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
1062 /* Find and/or create a hash entry for local symbol. */
1064 static struct elf_link_hash_entry *
1065 elf_sparc_get_local_sym_hash (struct _bfd_sparc_elf_link_hash_table *htab,
1066 bfd *abfd, const Elf_Internal_Rela *rel,
1069 struct _bfd_sparc_elf_link_hash_entry e, *ret;
1070 asection *sec = abfd->sections;
1071 unsigned long r_symndx;
1075 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
1076 h = ELF_LOCAL_SYMBOL_HASH (sec->id, r_symndx);
1078 e.elf.indx = sec->id;
1079 e.elf.dynstr_index = r_symndx;
1080 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
1081 create ? INSERT : NO_INSERT);
1088 ret = (struct _bfd_sparc_elf_link_hash_entry *) *slot;
1092 ret = (struct _bfd_sparc_elf_link_hash_entry *)
1093 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
1094 sizeof (struct _bfd_sparc_elf_link_hash_entry));
1097 memset (ret, 0, sizeof (*ret));
1098 ret->elf.indx = sec->id;
1099 ret->elf.dynstr_index = r_symndx;
1100 ret->elf.dynindx = -1;
1101 ret->elf.plt.offset = (bfd_vma) -1;
1102 ret->elf.got.offset = (bfd_vma) -1;
1108 /* Destroy a SPARC ELF linker hash table. */
1111 _bfd_sparc_elf_link_hash_table_free (bfd *obfd)
1113 struct _bfd_sparc_elf_link_hash_table *htab
1114 = (struct _bfd_sparc_elf_link_hash_table *) obfd->link.hash;
1116 if (htab->loc_hash_table)
1117 htab_delete (htab->loc_hash_table);
1118 if (htab->loc_hash_memory)
1119 objalloc_free ((struct objalloc *) htab->loc_hash_memory);
1120 _bfd_elf_link_hash_table_free (obfd);
1123 /* Create a SPARC ELF linker hash table. */
1125 struct bfd_link_hash_table *
1126 _bfd_sparc_elf_link_hash_table_create (bfd *abfd)
1128 struct _bfd_sparc_elf_link_hash_table *ret;
1129 bfd_size_type amt = sizeof (struct _bfd_sparc_elf_link_hash_table);
1131 ret = (struct _bfd_sparc_elf_link_hash_table *) bfd_zmalloc (amt);
1135 if (ABI_64_P (abfd))
1137 ret->put_word = sparc_put_word_64;
1138 ret->r_info = sparc_elf_r_info_64;
1139 ret->r_symndx = sparc_elf_r_symndx_64;
1140 ret->dtpoff_reloc = R_SPARC_TLS_DTPOFF64;
1141 ret->dtpmod_reloc = R_SPARC_TLS_DTPMOD64;
1142 ret->tpoff_reloc = R_SPARC_TLS_TPOFF64;
1143 ret->word_align_power = 3;
1144 ret->align_power_max = 4;
1145 ret->bytes_per_word = 8;
1146 ret->bytes_per_rela = sizeof (Elf64_External_Rela);
1147 ret->dynamic_interpreter = ELF64_DYNAMIC_INTERPRETER;
1148 ret->dynamic_interpreter_size = sizeof ELF64_DYNAMIC_INTERPRETER;
1150 ret->build_plt_entry = sparc64_plt_entry_build;
1151 ret->plt_header_size = PLT64_HEADER_SIZE;
1152 ret->plt_entry_size = PLT64_ENTRY_SIZE;
1156 ret->put_word = sparc_put_word_32;
1157 ret->r_info = sparc_elf_r_info_32;
1158 ret->r_symndx = sparc_elf_r_symndx_32;
1159 ret->dtpoff_reloc = R_SPARC_TLS_DTPOFF32;
1160 ret->dtpmod_reloc = R_SPARC_TLS_DTPMOD32;
1161 ret->tpoff_reloc = R_SPARC_TLS_TPOFF32;
1162 ret->word_align_power = 2;
1163 ret->align_power_max = 3;
1164 ret->bytes_per_word = 4;
1165 ret->bytes_per_rela = sizeof (Elf32_External_Rela);
1166 ret->dynamic_interpreter = ELF32_DYNAMIC_INTERPRETER;
1167 ret->dynamic_interpreter_size = sizeof ELF32_DYNAMIC_INTERPRETER;
1169 ret->build_plt_entry = sparc32_plt_entry_build;
1170 ret->plt_header_size = PLT32_HEADER_SIZE;
1171 ret->plt_entry_size = PLT32_ENTRY_SIZE;
1174 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd, link_hash_newfunc,
1175 sizeof (struct _bfd_sparc_elf_link_hash_entry),
1182 ret->loc_hash_table = htab_try_create (1024,
1183 elf_sparc_local_htab_hash,
1184 elf_sparc_local_htab_eq,
1186 ret->loc_hash_memory = objalloc_create ();
1187 if (!ret->loc_hash_table || !ret->loc_hash_memory)
1189 _bfd_sparc_elf_link_hash_table_free (abfd);
1192 ret->elf.root.hash_table_free = _bfd_sparc_elf_link_hash_table_free;
1194 return &ret->elf.root;
1197 /* Create .plt, .rela.plt, .got, .rela.got, .dynbss, and
1198 .rela.bss sections in DYNOBJ, and set up shortcuts to them in our
1202 _bfd_sparc_elf_create_dynamic_sections (bfd *dynobj,
1203 struct bfd_link_info *info)
1205 struct _bfd_sparc_elf_link_hash_table *htab;
1207 htab = _bfd_sparc_elf_hash_table (info);
1208 BFD_ASSERT (htab != NULL);
1210 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
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->elf.sdynbss
1234 || (!bfd_link_pic (info) && !htab->elf.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 elf_dyn_relocs **pp;
1288 struct 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 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 && dir->got.refcount <= 0)
1316 edir->tls_type = eind->tls_type;
1317 eind->tls_type = GOT_UNKNOWN;
1320 /* Copy has_got_reloc and has_non_got_reloc. */
1321 edir->has_got_reloc |= eind->has_got_reloc;
1322 edir->has_non_got_reloc |= eind->has_non_got_reloc;
1324 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
1328 sparc_elf_tls_transition (struct bfd_link_info *info, bfd *abfd,
1329 int r_type, int is_local)
1331 if (! ABI_64_P (abfd)
1332 && r_type == R_SPARC_TLS_GD_HI22
1333 && ! _bfd_sparc_elf_tdata (abfd)->has_tlsgd)
1334 return R_SPARC_REV32;
1336 if (!bfd_link_executable (info))
1341 case R_SPARC_TLS_GD_HI22:
1342 return is_local ? R_SPARC_TLS_LE_HIX22 : R_SPARC_TLS_IE_HI22;
1343 case R_SPARC_TLS_GD_LO10:
1344 return is_local ? R_SPARC_TLS_LE_LOX10 : R_SPARC_TLS_IE_LO10;
1345 case R_SPARC_TLS_LDM_HI22:
1346 return R_SPARC_TLS_LE_HIX22;
1347 case R_SPARC_TLS_LDM_LO10:
1348 return R_SPARC_TLS_LE_LOX10;
1349 case R_SPARC_TLS_IE_HI22:
1350 return is_local ? R_SPARC_TLS_LE_HIX22 : r_type;
1351 case R_SPARC_TLS_IE_LO10:
1352 return is_local ? R_SPARC_TLS_LE_LOX10 : r_type;
1358 /* Look through the relocs for a section during the first phase, and
1359 allocate space in the global offset table or procedure linkage
1363 _bfd_sparc_elf_check_relocs (bfd *abfd, struct bfd_link_info *info,
1364 asection *sec, const Elf_Internal_Rela *relocs)
1366 struct _bfd_sparc_elf_link_hash_table *htab;
1367 Elf_Internal_Shdr *symtab_hdr;
1368 struct elf_link_hash_entry **sym_hashes;
1369 const Elf_Internal_Rela *rel;
1370 const Elf_Internal_Rela *rel_end;
1373 bfd_boolean checked_tlsgd = FALSE;
1375 if (bfd_link_relocatable (info))
1378 htab = _bfd_sparc_elf_hash_table (info);
1379 BFD_ASSERT (htab != NULL);
1380 symtab_hdr = &elf_symtab_hdr (abfd);
1381 sym_hashes = elf_sym_hashes (abfd);
1385 if (ABI_64_P (abfd))
1386 num_relocs = NUM_SHDR_ENTRIES (_bfd_elf_single_rel_hdr (sec));
1388 num_relocs = sec->reloc_count;
1390 BFD_ASSERT (is_sparc_elf (abfd) || num_relocs == 0);
1392 if (htab->elf.dynobj == NULL)
1393 htab->elf.dynobj = abfd;
1394 if (!create_ifunc_sections (htab->elf.dynobj, info))
1397 rel_end = relocs + num_relocs;
1398 for (rel = relocs; rel < rel_end; rel++)
1400 unsigned int r_type;
1401 unsigned int r_symndx;
1402 struct elf_link_hash_entry *h;
1403 struct _bfd_sparc_elf_link_hash_entry *eh;
1404 Elf_Internal_Sym *isym;
1406 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
1407 r_type = SPARC_ELF_R_TYPE (rel->r_info);
1409 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1411 /* xgettext:c-format */
1412 _bfd_error_handler (_("%pB: bad symbol index: %d"), abfd, r_symndx);
1417 if (r_symndx < symtab_hdr->sh_info)
1419 /* A local symbol. */
1420 isym = bfd_sym_from_r_symndx (&htab->sym_cache, abfd, r_symndx);
1424 /* Check relocation against local STT_GNU_IFUNC symbol. */
1425 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1427 h = elf_sparc_get_local_sym_hash (htab, abfd, rel, TRUE);
1431 /* Fake a STT_GNU_IFUNC symbol. */
1432 h->type = STT_GNU_IFUNC;
1435 h->forced_local = 1;
1436 h->root.type = bfd_link_hash_defined;
1443 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1444 while (h->root.type == bfd_link_hash_indirect
1445 || h->root.type == bfd_link_hash_warning)
1446 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1449 if (h && h->type == STT_GNU_IFUNC && h->def_regular)
1452 h->plt.refcount += 1;
1455 /* Compatibility with old R_SPARC_REV32 reloc conflicting
1456 with R_SPARC_TLS_GD_HI22. */
1457 if (! ABI_64_P (abfd) && ! checked_tlsgd)
1460 case R_SPARC_TLS_GD_HI22:
1462 const Elf_Internal_Rela *relt;
1464 for (relt = rel + 1; relt < rel_end; relt++)
1465 if (ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_LO10
1466 || ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_ADD
1467 || ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_CALL)
1469 checked_tlsgd = TRUE;
1470 _bfd_sparc_elf_tdata (abfd)->has_tlsgd = relt < rel_end;
1473 case R_SPARC_TLS_GD_LO10:
1474 case R_SPARC_TLS_GD_ADD:
1475 case R_SPARC_TLS_GD_CALL:
1476 checked_tlsgd = TRUE;
1477 _bfd_sparc_elf_tdata (abfd)->has_tlsgd = TRUE;
1481 r_type = sparc_elf_tls_transition (info, abfd, r_type, h == NULL);
1482 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
1486 case R_SPARC_TLS_LDM_HI22:
1487 case R_SPARC_TLS_LDM_LO10:
1488 htab->tls_ldm_got.refcount += 1;
1490 eh->has_got_reloc = 1;
1493 case R_SPARC_TLS_LE_HIX22:
1494 case R_SPARC_TLS_LE_LOX10:
1495 if (!bfd_link_executable (info))
1499 case R_SPARC_TLS_IE_HI22:
1500 case R_SPARC_TLS_IE_LO10:
1501 if (!bfd_link_executable (info))
1502 info->flags |= DF_STATIC_TLS;
1508 case R_SPARC_GOTDATA_HIX22:
1509 case R_SPARC_GOTDATA_LOX10:
1510 case R_SPARC_GOTDATA_OP_HIX22:
1511 case R_SPARC_GOTDATA_OP_LOX10:
1512 case R_SPARC_TLS_GD_HI22:
1513 case R_SPARC_TLS_GD_LO10:
1514 /* This symbol requires a global offset table entry. */
1516 int tls_type, old_tls_type;
1520 case R_SPARC_TLS_GD_HI22:
1521 case R_SPARC_TLS_GD_LO10:
1522 tls_type = GOT_TLS_GD;
1524 case R_SPARC_TLS_IE_HI22:
1525 case R_SPARC_TLS_IE_LO10:
1526 tls_type = GOT_TLS_IE;
1529 tls_type = GOT_NORMAL;
1535 h->got.refcount += 1;
1536 old_tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
1540 bfd_signed_vma *local_got_refcounts;
1542 /* This is a global offset table entry for a local symbol. */
1543 local_got_refcounts = elf_local_got_refcounts (abfd);
1544 if (local_got_refcounts == NULL)
1548 size = symtab_hdr->sh_info;
1549 size *= (sizeof (bfd_signed_vma) + sizeof(char));
1550 local_got_refcounts = ((bfd_signed_vma *)
1551 bfd_zalloc (abfd, size));
1552 if (local_got_refcounts == NULL)
1554 elf_local_got_refcounts (abfd) = local_got_refcounts;
1555 _bfd_sparc_elf_local_got_tls_type (abfd)
1556 = (char *) (local_got_refcounts + symtab_hdr->sh_info);
1559 if (r_type != R_SPARC_GOTDATA_OP_HIX22
1560 && r_type != R_SPARC_GOTDATA_OP_LOX10)
1561 local_got_refcounts[r_symndx] += 1;
1563 old_tls_type = _bfd_sparc_elf_local_got_tls_type (abfd) [r_symndx];
1566 /* If a TLS symbol is accessed using IE at least once, there is no point
1567 in using the dynamic model for it. */
1568 if (old_tls_type != tls_type)
1570 if (old_tls_type == GOT_UNKNOWN)
1572 else if (old_tls_type == GOT_TLS_GD && tls_type == GOT_TLS_IE)
1574 else if (old_tls_type == GOT_TLS_IE && tls_type == GOT_TLS_GD)
1575 tls_type = old_tls_type;
1579 /* xgettext:c-format */
1580 (_("%pB: `%s' accessed both as normal and thread local symbol"),
1581 abfd, h ? h->root.root.string : "<local>");
1586 _bfd_sparc_elf_hash_entry (h)->tls_type = tls_type;
1588 _bfd_sparc_elf_local_got_tls_type (abfd) [r_symndx] = tls_type;
1593 && !_bfd_elf_create_got_section (htab->elf.dynobj, info))
1597 eh->has_got_reloc = 1;
1600 case R_SPARC_TLS_GD_CALL:
1601 case R_SPARC_TLS_LDM_CALL:
1602 if (bfd_link_executable (info))
1605 /* Essentially R_SPARC_WPLT30 relocs against __tls_get_addr. */
1606 h = (struct elf_link_hash_entry *)
1607 bfd_link_hash_lookup (info->hash, "__tls_get_addr", FALSE,
1609 BFD_ASSERT (h != NULL);
1612 case R_SPARC_WPLT30:
1615 case R_SPARC_HIPLT22:
1616 case R_SPARC_LOPLT10:
1617 case R_SPARC_PCPLT32:
1618 case R_SPARC_PCPLT22:
1619 case R_SPARC_PCPLT10:
1620 /* This symbol requires a procedure linkage table entry.
1621 We actually build the entry in adjust_dynamic_symbol,
1622 because this might be a case of linking PIC code without
1623 linking in any dynamic objects, in which case we don't
1624 need to generate a procedure linkage table after all. */
1628 if (! ABI_64_P (abfd))
1630 /* The Solaris native assembler will generate a WPLT30
1631 reloc for a local symbol if you assemble a call from
1632 one section to another when using -K pic. We treat
1634 if (r_type == R_SPARC_PLT32)
1638 /* PR 7027: We need similar behaviour for 64-bit binaries. */
1639 else if (r_type == R_SPARC_WPLT30)
1642 /* It does not make sense to have a procedure linkage
1643 table entry for a local symbol. */
1644 bfd_set_error (bfd_error_bad_value);
1650 if (r_type == R_SPARC_PLT32 || r_type == R_SPARC_PLT64)
1653 h->plt.refcount += 1;
1655 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
1656 eh->has_got_reloc = 1;
1661 case R_SPARC_PC_HH22:
1662 case R_SPARC_PC_HM10:
1663 case R_SPARC_PC_LM22:
1668 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
1673 case R_SPARC_DISP16:
1674 case R_SPARC_DISP32:
1675 case R_SPARC_DISP64:
1676 case R_SPARC_WDISP30:
1677 case R_SPARC_WDISP22:
1678 case R_SPARC_WDISP19:
1679 case R_SPARC_WDISP16:
1680 case R_SPARC_WDISP10:
1710 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
1711 eh->has_non_got_reloc = 1;
1714 if (h != NULL && !bfd_link_pic (info))
1716 /* We may need a .plt entry if the function this reloc
1717 refers to is in a shared lib. */
1718 h->plt.refcount += 1;
1721 /* If we are creating a shared library, and this is a reloc
1722 against a global symbol, or a non PC relative reloc
1723 against a local symbol, then we need to copy the reloc
1724 into the shared library. However, if we are linking with
1725 -Bsymbolic, we do not need to copy a reloc against a
1726 global symbol which is defined in an object we are
1727 including in the link (i.e., DEF_REGULAR is set). At
1728 this point we have not seen all the input files, so it is
1729 possible that DEF_REGULAR is not set now but will be set
1730 later (it is never cleared). In case of a weak definition,
1731 DEF_REGULAR may be cleared later by a strong definition in
1732 a shared library. We account for that possibility below by
1733 storing information in the relocs_copied field of the hash
1734 table entry. A similar situation occurs when creating
1735 shared libraries and symbol visibility changes render the
1738 If on the other hand, we are creating an executable, we
1739 may need to keep relocations for symbols satisfied by a
1740 dynamic library if we manage to avoid copy relocs for the
1742 if ((bfd_link_pic (info)
1743 && (sec->flags & SEC_ALLOC) != 0
1744 && (! _bfd_sparc_elf_howto_table[r_type].pc_relative
1746 && (! SYMBOLIC_BIND (info, h)
1747 || h->root.type == bfd_link_hash_defweak
1748 || !h->def_regular))))
1749 || (!bfd_link_pic (info)
1750 && (sec->flags & SEC_ALLOC) != 0
1752 && (h->root.type == bfd_link_hash_defweak
1753 || !h->def_regular))
1754 || (!bfd_link_pic (info)
1756 && h->type == STT_GNU_IFUNC))
1758 struct elf_dyn_relocs *p;
1759 struct elf_dyn_relocs **head;
1761 /* When creating a shared object, we must copy these
1762 relocs into the output file. We create a reloc
1763 section in dynobj and make room for the reloc. */
1766 sreloc = _bfd_elf_make_dynamic_reloc_section
1767 (sec, htab->elf.dynobj, htab->word_align_power,
1768 abfd, /*rela?*/ TRUE);
1774 /* If this is a global symbol, we count the number of
1775 relocations we need for this symbol. */
1777 head = &((struct _bfd_sparc_elf_link_hash_entry *) h)->dyn_relocs;
1780 /* Track dynamic relocs needed for local syms too.
1781 We really need local syms available to do this
1786 BFD_ASSERT (isym != NULL);
1787 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
1791 vpp = &elf_section_data (s)->local_dynrel;
1792 head = (struct elf_dyn_relocs **) vpp;
1796 if (p == NULL || p->sec != sec)
1798 bfd_size_type amt = sizeof *p;
1799 p = ((struct elf_dyn_relocs *)
1800 bfd_alloc (htab->elf.dynobj, amt));
1811 if (_bfd_sparc_elf_howto_table[r_type].pc_relative)
1817 case R_SPARC_GNU_VTINHERIT:
1818 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1822 case R_SPARC_GNU_VTENTRY:
1823 BFD_ASSERT (h != NULL);
1825 && !bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
1829 case R_SPARC_REGISTER:
1830 /* Nothing to do. */
1842 _bfd_sparc_elf_gc_mark_hook (asection *sec,
1843 struct bfd_link_info *info,
1844 Elf_Internal_Rela *rel,
1845 struct elf_link_hash_entry *h,
1846 Elf_Internal_Sym *sym)
1849 switch (SPARC_ELF_R_TYPE (rel->r_info))
1851 case R_SPARC_GNU_VTINHERIT:
1852 case R_SPARC_GNU_VTENTRY:
1856 if (!bfd_link_executable (info))
1858 switch (SPARC_ELF_R_TYPE (rel->r_info))
1860 case R_SPARC_TLS_GD_CALL:
1861 case R_SPARC_TLS_LDM_CALL:
1862 /* This reloc implicitly references __tls_get_addr. We know
1863 another reloc will reference the same symbol as the one
1864 on this reloc, so the real symbol and section will be
1865 gc marked when processing the other reloc. That lets
1866 us handle __tls_get_addr here. */
1867 h = elf_link_hash_lookup (elf_hash_table (info), "__tls_get_addr",
1868 FALSE, FALSE, TRUE);
1869 BFD_ASSERT (h != NULL);
1871 if (h->is_weakalias)
1872 weakdef (h)->mark = 1;
1877 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
1880 static Elf_Internal_Rela *
1881 sparc_elf_find_reloc_at_ofs (Elf_Internal_Rela *rel,
1882 Elf_Internal_Rela *relend,
1885 while (rel < relend)
1887 if (rel->r_offset == offset)
1894 /* Remove undefined weak symbol from the dynamic symbol table if it
1895 is resolved to 0. */
1898 _bfd_sparc_elf_fixup_symbol (struct bfd_link_info *info,
1899 struct elf_link_hash_entry *h)
1901 if (h->dynindx != -1
1902 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
1903 _bfd_sparc_elf_hash_entry (h)))
1906 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
1912 /* Find dynamic relocs for H that apply to read-only sections. */
1915 readonly_dynrelocs (struct elf_link_hash_entry *h)
1917 struct elf_dyn_relocs *p;
1919 for (p = _bfd_sparc_elf_hash_entry (h)->dyn_relocs; p != NULL; p = p->next)
1921 asection *s = p->sec->output_section;
1923 if (s != NULL && (s->flags & SEC_READONLY) != 0)
1929 /* Adjust a symbol defined by a dynamic object and referenced by a
1930 regular object. The current definition is in some section of the
1931 dynamic object, but we're not including those sections. We have to
1932 change the definition to something the rest of the link can
1936 _bfd_sparc_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
1937 struct elf_link_hash_entry *h)
1939 struct _bfd_sparc_elf_link_hash_table *htab;
1942 htab = _bfd_sparc_elf_hash_table (info);
1943 BFD_ASSERT (htab != NULL);
1945 /* Make sure we know what is going on here. */
1946 BFD_ASSERT (htab->elf.dynobj != NULL
1948 || h->type == STT_GNU_IFUNC
1952 && !h->def_regular)));
1954 /* If this is a function, put it in the procedure linkage table. We
1955 will fill in the contents of the procedure linkage table later
1956 (although we could actually do it here). The STT_NOTYPE
1957 condition is a hack specifically for the Oracle libraries
1958 delivered for Solaris; for some inexplicable reason, they define
1959 some of their functions as STT_NOTYPE when they really should be
1961 if (h->type == STT_FUNC
1962 || h->type == STT_GNU_IFUNC
1964 || (h->type == STT_NOTYPE
1965 && (h->root.type == bfd_link_hash_defined
1966 || h->root.type == bfd_link_hash_defweak)
1967 && (h->root.u.def.section->flags & SEC_CODE) != 0))
1969 if (h->plt.refcount <= 0
1970 || (h->type != STT_GNU_IFUNC
1971 && (SYMBOL_CALLS_LOCAL (info, h)
1972 || (h->root.type == bfd_link_hash_undefweak
1973 && ELF_ST_VISIBILITY (h->other) != STV_DEFAULT))))
1975 /* This case can occur if we saw a WPLT30 reloc in an input
1976 file, but the symbol was never referred to by a dynamic
1977 object, or if all references were garbage collected. In
1978 such a case, we don't actually need to build a procedure
1979 linkage table, and we can just do a WDISP30 reloc instead. */
1980 h->plt.offset = (bfd_vma) -1;
1987 h->plt.offset = (bfd_vma) -1;
1989 /* If this is a weak symbol, and there is a real definition, the
1990 processor independent code will have arranged for us to see the
1991 real definition first, and we can just use the same value. */
1992 if (h->is_weakalias)
1994 struct elf_link_hash_entry *def = weakdef (h);
1995 BFD_ASSERT (def->root.type == bfd_link_hash_defined);
1996 h->root.u.def.section = def->root.u.def.section;
1997 h->root.u.def.value = def->root.u.def.value;
2001 /* This is a reference to a symbol defined by a dynamic object which
2002 is not a function. */
2004 /* If we are creating a shared library, we must presume that the
2005 only references to the symbol are via the global offset table.
2006 For such cases we need not do anything here; the relocations will
2007 be handled correctly by relocate_section. */
2008 if (bfd_link_pic (info))
2011 /* If there are no references to this symbol that do not use the
2012 GOT, we don't need to generate a copy reloc. */
2013 if (!h->non_got_ref)
2016 /* If -z nocopyreloc was given, we won't generate them either. */
2017 if (info->nocopyreloc)
2023 /* If we don't find any dynamic relocs in read-only sections, then
2024 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
2025 if (!readonly_dynrelocs (h))
2031 /* We must allocate the symbol in our .dynbss section, which will
2032 become part of the .bss section of the executable. There will be
2033 an entry for this symbol in the .dynsym section. The dynamic
2034 object will contain position independent code, so all references
2035 from the dynamic object to this symbol will go through the global
2036 offset table. The dynamic linker will use the .dynsym entry to
2037 determine the address it must put in the global offset table, so
2038 both the dynamic object and the regular object will refer to the
2039 same memory location for the variable. */
2041 /* We must generate a R_SPARC_COPY reloc to tell the dynamic linker
2042 to copy the initial value out of the dynamic object and into the
2043 runtime process image. We need to remember the offset into the
2044 .rel.bss section we are going to use. */
2045 if ((h->root.u.def.section->flags & SEC_READONLY) != 0)
2047 s = htab->elf.sdynrelro;
2048 srel = htab->elf.sreldynrelro;
2052 s = htab->elf.sdynbss;
2053 srel = htab->elf.srelbss;
2055 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
2057 srel->size += SPARC_ELF_RELA_BYTES (htab);
2061 return _bfd_elf_adjust_dynamic_copy (info, h, s);
2064 /* Allocate space in .plt, .got and associated reloc sections for
2068 allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
2070 struct bfd_link_info *info;
2071 struct _bfd_sparc_elf_link_hash_table *htab;
2072 struct _bfd_sparc_elf_link_hash_entry *eh;
2073 struct elf_dyn_relocs *p;
2074 bfd_boolean resolved_to_zero;
2076 if (h->root.type == bfd_link_hash_indirect)
2079 info = (struct bfd_link_info *) inf;
2080 htab = _bfd_sparc_elf_hash_table (info);
2081 BFD_ASSERT (htab != NULL);
2083 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
2084 resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
2086 if ((htab->elf.dynamic_sections_created
2087 && h->plt.refcount > 0)
2088 || (h->type == STT_GNU_IFUNC
2092 /* Undefined weak syms won't yet be marked as dynamic. */
2093 if (h->root.type == bfd_link_hash_undefweak
2094 && !resolved_to_zero
2096 && !h->forced_local)
2098 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2102 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h)
2103 || (h->type == STT_GNU_IFUNC
2106 asection *s = htab->elf.splt;
2111 /* Allocate room for the header. */
2114 s->size = htab->plt_header_size;
2116 /* Allocate space for the .rela.plt.unloaded relocations. */
2117 if (htab->is_vxworks && !bfd_link_pic (info))
2118 htab->srelplt2->size = sizeof (Elf32_External_Rela) * 2;
2121 /* The procedure linkage table size is bounded by the magnitude
2122 of the offset we can describe in the entry. */
2123 if (s->size >= (SPARC_ELF_WORD_BYTES(htab) == 8 ?
2124 (((bfd_vma)1 << 31) << 1) : 0x400000))
2126 bfd_set_error (bfd_error_bad_value);
2130 if (SPARC_ELF_WORD_BYTES(htab) == 8
2131 && s->size >= PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE)
2133 bfd_vma off = s->size - PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE;
2136 off = (off % (160 * PLT64_ENTRY_SIZE)) / PLT64_ENTRY_SIZE;
2138 h->plt.offset = (s->size - (off * 8));
2141 h->plt.offset = s->size;
2143 /* If this symbol is not defined in a regular file, and we are
2144 not generating a shared library, then set the symbol to this
2145 location in the .plt. This is required to make function
2146 pointers compare as equal between the normal executable and
2147 the shared library. */
2148 if (! bfd_link_pic (info)
2151 h->root.u.def.section = s;
2152 h->root.u.def.value = h->plt.offset;
2155 /* Make room for this entry. */
2156 s->size += htab->plt_entry_size;
2158 /* There should be no PLT relocations against resolved undefined
2159 weak symbols in the executable. */
2160 if (!resolved_to_zero)
2162 /* We also need to make an entry in the .rela.plt section. */
2163 if (s == htab->elf.splt)
2164 htab->elf.srelplt->size += SPARC_ELF_RELA_BYTES (htab);
2166 htab->elf.irelplt->size += SPARC_ELF_RELA_BYTES (htab);
2169 if (htab->is_vxworks)
2171 /* Allocate space for the .got.plt entry. */
2172 htab->elf.sgotplt->size += 4;
2174 /* ...and for the .rela.plt.unloaded relocations. */
2175 if (!bfd_link_pic (info))
2176 htab->srelplt2->size += sizeof (Elf32_External_Rela) * 3;
2181 h->plt.offset = (bfd_vma) -1;
2187 h->plt.offset = (bfd_vma) -1;
2191 /* If R_SPARC_TLS_IE_{HI22,LO10} symbol is now local to the binary,
2192 make it a R_SPARC_TLS_LE_{HI22,LO10} requiring no TLS entry. */
2193 if (h->got.refcount > 0
2194 && bfd_link_executable (info)
2196 && _bfd_sparc_elf_hash_entry(h)->tls_type == GOT_TLS_IE)
2197 h->got.offset = (bfd_vma) -1;
2198 else if (h->got.refcount > 0)
2202 int tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
2204 /* Undefined weak syms won't yet be marked as dynamic. */
2205 if (h->root.type == bfd_link_hash_undefweak
2206 && !resolved_to_zero
2208 && !h->forced_local)
2210 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2215 h->got.offset = s->size;
2216 s->size += SPARC_ELF_WORD_BYTES (htab);
2217 /* R_SPARC_TLS_GD_HI{22,LO10} needs 2 consecutive GOT slots. */
2218 if (tls_type == GOT_TLS_GD)
2219 s->size += SPARC_ELF_WORD_BYTES (htab);
2220 dyn = htab->elf.dynamic_sections_created;
2221 /* R_SPARC_TLS_IE_{HI22,LO10} needs one dynamic relocation,
2222 R_SPARC_TLS_GD_{HI22,LO10} needs one if local and two if global. */
2223 if ((tls_type == GOT_TLS_GD && h->dynindx == -1)
2224 || tls_type == GOT_TLS_IE
2225 || h->type == STT_GNU_IFUNC)
2226 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
2227 else if (tls_type == GOT_TLS_GD)
2228 htab->elf.srelgot->size += 2 * SPARC_ELF_RELA_BYTES (htab);
2229 else if ((WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)
2230 /* Even if the symbol isn't dynamic, we may generate a
2231 reloc for the dynamic linker in PIC mode. */
2232 || (h->dynindx == -1
2234 && h->root.type != bfd_link_hash_undefweak
2235 && bfd_link_pic (info)))
2236 /* No dynamic relocations are needed against resolved
2237 undefined weak symbols in an executable. */
2238 && !(h->root.type == bfd_link_hash_undefweak
2239 && (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2240 || resolved_to_zero)))
2241 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
2244 h->got.offset = (bfd_vma) -1;
2246 if (eh->dyn_relocs == NULL)
2249 /* In the shared -Bsymbolic case, discard space allocated for
2250 dynamic pc-relative relocs against symbols which turn out to be
2251 defined in regular objects. For the normal shared case, discard
2252 space for pc-relative relocs that have become local due to symbol
2253 visibility changes. */
2255 if (bfd_link_pic (info))
2257 if (SYMBOL_CALLS_LOCAL (info, h))
2259 struct elf_dyn_relocs **pp;
2261 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2263 p->count -= p->pc_count;
2272 if (htab->is_vxworks)
2274 struct elf_dyn_relocs **pp;
2276 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; )
2278 if (strcmp (p->sec->output_section->name, ".tls_vars") == 0)
2285 /* Also discard relocs on undefined weak syms with non-default
2286 visibility or in PIE. */
2287 if (eh->dyn_relocs != NULL
2288 && h->root.type == bfd_link_hash_undefweak)
2290 /* An undefined weak symbol is never
2291 bound locally in a shared library. */
2293 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2294 || resolved_to_zero)
2298 /* Keep dynamic non-GOT/non-PLT relocation so that we
2299 can branch to 0 without PLT. */
2300 struct elf_dyn_relocs **pp;
2302 for (pp = &eh->dyn_relocs; (p = *pp) != NULL;)
2303 if (p->pc_count == 0)
2307 /* Remove other relocations. */
2308 p->count = p->pc_count;
2312 if (eh->dyn_relocs != NULL)
2314 /* Make sure undefined weak symbols are output
2315 as dynamic symbols in PIEs for dynamic non-GOT
2316 non-PLT reloations. */
2317 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2322 eh->dyn_relocs = NULL;
2325 /* Make sure undefined weak symbols are output as a dynamic
2327 else if (h->dynindx == -1
2328 && !h->forced_local)
2330 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2337 /* For the non-shared case, discard space for relocs against
2338 symbols which turn out to need copy relocs or are not
2341 if ((!h->non_got_ref
2342 || (h->root.type == bfd_link_hash_undefweak
2343 && !resolved_to_zero))
2346 || (htab->elf.dynamic_sections_created
2347 && (h->root.type == bfd_link_hash_undefweak
2348 || h->root.type == bfd_link_hash_undefined))))
2350 /* Undefined weak syms won't yet be marked as dynamic. */
2351 if (h->root.type == bfd_link_hash_undefweak
2352 && !resolved_to_zero
2354 && !h->forced_local)
2356 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2360 /* If that succeeded, we know we'll be keeping all the
2362 if (h->dynindx != -1)
2366 eh->dyn_relocs = NULL;
2371 /* Finally, allocate space. */
2372 for (p = eh->dyn_relocs; p != NULL; p = p->next)
2374 asection *sreloc = elf_section_data (p->sec)->sreloc;
2375 sreloc->size += p->count * SPARC_ELF_RELA_BYTES (htab);
2381 /* Allocate space in .plt, .got and associated reloc sections for
2382 local dynamic relocs. */
2385 allocate_local_dynrelocs (void **slot, void *inf)
2387 struct elf_link_hash_entry *h
2388 = (struct elf_link_hash_entry *) *slot;
2390 if (h->type != STT_GNU_IFUNC
2394 || h->root.type != bfd_link_hash_defined)
2397 return allocate_dynrelocs (h, inf);
2400 /* Set DF_TEXTREL if we find any dynamic relocs that apply to
2401 read-only sections. */
2404 maybe_set_textrel (struct elf_link_hash_entry *h, void *info_p)
2408 if (h->root.type == bfd_link_hash_indirect)
2411 sec = readonly_dynrelocs (h);
2414 struct bfd_link_info *info = (struct bfd_link_info *) info_p;
2416 info->flags |= DF_TEXTREL;
2417 info->callbacks->minfo
2418 (_("%pB: dynamic relocation against `%T' in read-only section `%pA'\n"),
2419 sec->owner, h->root.root.string, sec);
2421 /* Not an error, just cut short the traversal. */
2427 /* Return true if the dynamic symbol for a given section should be
2428 omitted when creating a shared library. */
2431 _bfd_sparc_elf_omit_section_dynsym (bfd *output_bfd,
2432 struct bfd_link_info *info,
2435 /* We keep the .got section symbol so that explicit relocations
2436 against the _GLOBAL_OFFSET_TABLE_ symbol emitted in PIC mode
2437 can be turned into relocations against the .got symbol. */
2438 if (strcmp (p->name, ".got") == 0)
2441 return _bfd_elf_omit_section_dynsym_default (output_bfd, info, p);
2444 /* Set the sizes of the dynamic sections. */
2447 _bfd_sparc_elf_size_dynamic_sections (bfd *output_bfd,
2448 struct bfd_link_info *info)
2450 struct _bfd_sparc_elf_link_hash_table *htab;
2455 htab = _bfd_sparc_elf_hash_table (info);
2456 BFD_ASSERT (htab != NULL);
2457 dynobj = htab->elf.dynobj;
2458 BFD_ASSERT (dynobj != NULL);
2460 if (elf_hash_table (info)->dynamic_sections_created)
2462 /* Set the contents of the .interp section to the interpreter. */
2463 if (bfd_link_executable (info) && !info->nointerp)
2465 s = bfd_get_linker_section (dynobj, ".interp");
2466 BFD_ASSERT (s != NULL);
2467 s->size = htab->dynamic_interpreter_size;
2468 s->contents = (unsigned char *) htab->dynamic_interpreter;
2473 /* Set up .got offsets for local syms, and space for local dynamic
2475 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
2477 bfd_signed_vma *local_got;
2478 bfd_signed_vma *end_local_got;
2479 char *local_tls_type;
2480 bfd_size_type locsymcount;
2481 Elf_Internal_Shdr *symtab_hdr;
2484 if (! is_sparc_elf (ibfd))
2487 for (s = ibfd->sections; s != NULL; s = s->next)
2489 struct elf_dyn_relocs *p;
2491 for (p = elf_section_data (s)->local_dynrel; p != NULL; p = p->next)
2493 if (!bfd_is_abs_section (p->sec)
2494 && bfd_is_abs_section (p->sec->output_section))
2496 /* Input section has been discarded, either because
2497 it is a copy of a linkonce section or due to
2498 linker script /DISCARD/, so we'll be discarding
2501 else if (htab->is_vxworks
2502 && strcmp (p->sec->output_section->name,
2505 /* Relocations in vxworks .tls_vars sections are
2506 handled specially by the loader. */
2508 else if (p->count != 0)
2510 srel = elf_section_data (p->sec)->sreloc;
2511 if (!htab->elf.dynamic_sections_created)
2512 srel = htab->elf.irelplt;
2513 srel->size += p->count * SPARC_ELF_RELA_BYTES (htab);
2514 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
2516 info->flags |= DF_TEXTREL;
2517 info->callbacks->minfo (_("%pB: dynamic relocation in read-only section `%pA'\n"),
2518 p->sec->owner, p->sec);
2524 local_got = elf_local_got_refcounts (ibfd);
2528 symtab_hdr = &elf_symtab_hdr (ibfd);
2529 locsymcount = symtab_hdr->sh_info;
2530 end_local_got = local_got + locsymcount;
2531 local_tls_type = _bfd_sparc_elf_local_got_tls_type (ibfd);
2533 srel = htab->elf.srelgot;
2534 for (; local_got < end_local_got; ++local_got, ++local_tls_type)
2538 *local_got = s->size;
2539 s->size += SPARC_ELF_WORD_BYTES (htab);
2540 if (*local_tls_type == GOT_TLS_GD)
2541 s->size += SPARC_ELF_WORD_BYTES (htab);
2542 if (bfd_link_pic (info)
2543 || *local_tls_type == GOT_TLS_GD
2544 || *local_tls_type == GOT_TLS_IE)
2545 srel->size += SPARC_ELF_RELA_BYTES (htab);
2548 *local_got = (bfd_vma) -1;
2552 if (htab->tls_ldm_got.refcount > 0)
2554 /* Allocate 2 got entries and 1 dynamic reloc for
2555 R_SPARC_TLS_LDM_{HI22,LO10} relocs. */
2556 htab->tls_ldm_got.offset = htab->elf.sgot->size;
2557 htab->elf.sgot->size += (2 * SPARC_ELF_WORD_BYTES (htab));
2558 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
2561 htab->tls_ldm_got.offset = -1;
2563 /* Allocate global sym .plt and .got entries, and space for global
2564 sym dynamic relocs. */
2565 elf_link_hash_traverse (&htab->elf, allocate_dynrelocs, info);
2567 /* Allocate .plt and .got entries, and space for local symbols. */
2568 htab_traverse (htab->loc_hash_table, allocate_local_dynrelocs, info);
2570 if (! ABI_64_P (output_bfd)
2571 && !htab->is_vxworks
2572 && elf_hash_table (info)->dynamic_sections_created)
2574 /* Make space for the trailing nop in .plt. */
2575 if (htab->elf.splt->size > 0)
2576 htab->elf.splt->size += 1 * SPARC_INSN_BYTES;
2578 /* If the .got section is more than 0x1000 bytes, we add
2579 0x1000 to the value of _GLOBAL_OFFSET_TABLE_, so that 13
2580 bit relocations have a greater chance of working.
2582 FIXME: Make this optimization work for 64-bit too. */
2583 if (htab->elf.sgot->size >= 0x1000
2584 && elf_hash_table (info)->hgot->root.u.def.value == 0)
2585 elf_hash_table (info)->hgot->root.u.def.value = 0x1000;
2588 /* The check_relocs and adjust_dynamic_symbol entry points have
2589 determined the sizes of the various dynamic sections. Allocate
2591 for (s = dynobj->sections; s != NULL; s = s->next)
2593 if ((s->flags & SEC_LINKER_CREATED) == 0)
2596 if (s == htab->elf.splt
2597 || s == htab->elf.sgot
2598 || s == htab->elf.sdynbss
2599 || s == htab->elf.sdynrelro
2600 || s == htab->elf.iplt
2601 || s == htab->elf.sgotplt)
2603 /* Strip this section if we don't need it; see the
2606 else if (CONST_STRNEQ (s->name, ".rela"))
2610 /* We use the reloc_count field as a counter if we need
2611 to copy relocs into the output file. */
2617 /* It's not one of our sections. */
2623 /* If we don't need this section, strip it from the
2624 output file. This is mostly to handle .rela.bss and
2625 .rela.plt. We must create both sections in
2626 create_dynamic_sections, because they must be created
2627 before the linker maps input sections to output
2628 sections. The linker does that before
2629 adjust_dynamic_symbol is called, and it is that
2630 function which decides whether anything needs to go
2631 into these sections. */
2632 s->flags |= SEC_EXCLUDE;
2636 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2639 /* Allocate memory for the section contents. Zero the memory
2640 for the benefit of .rela.plt, which has 4 unused entries
2641 at the beginning, and we don't want garbage. */
2642 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
2643 if (s->contents == NULL)
2647 if (elf_hash_table (info)->dynamic_sections_created)
2649 /* Add some entries to the .dynamic section. We fill in the
2650 values later, in _bfd_sparc_elf_finish_dynamic_sections, but we
2651 must add the entries now so that we get the correct size for
2652 the .dynamic section. The DT_DEBUG entry is filled in by the
2653 dynamic linker and used by the debugger. */
2654 #define add_dynamic_entry(TAG, VAL) \
2655 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
2657 if (bfd_link_executable (info))
2659 if (!add_dynamic_entry (DT_DEBUG, 0))
2663 if (htab->elf.srelplt->size != 0)
2665 if (!add_dynamic_entry (DT_PLTGOT, 0)
2666 || !add_dynamic_entry (DT_PLTRELSZ, 0)
2667 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
2668 || !add_dynamic_entry (DT_JMPREL, 0))
2672 if (!add_dynamic_entry (DT_RELA, 0)
2673 || !add_dynamic_entry (DT_RELASZ, 0)
2674 || !add_dynamic_entry (DT_RELAENT,
2675 SPARC_ELF_RELA_BYTES (htab)))
2678 /* If any dynamic relocs apply to a read-only section,
2679 then we need a DT_TEXTREL entry. */
2680 if ((info->flags & DF_TEXTREL) == 0)
2681 elf_link_hash_traverse (&htab->elf, maybe_set_textrel, info);
2683 if (info->flags & DF_TEXTREL)
2685 if (!add_dynamic_entry (DT_TEXTREL, 0))
2689 if (ABI_64_P (output_bfd))
2692 struct _bfd_sparc_elf_app_reg * app_regs;
2693 struct elf_strtab_hash *dynstr;
2694 struct elf_link_hash_table *eht = elf_hash_table (info);
2696 /* Add dynamic STT_REGISTER symbols and corresponding DT_SPARC_REGISTER
2697 entries if needed. */
2698 app_regs = _bfd_sparc_elf_hash_table (info)->app_regs;
2699 dynstr = eht->dynstr;
2701 for (reg = 0; reg < 4; reg++)
2702 if (app_regs [reg].name != NULL)
2704 struct elf_link_local_dynamic_entry *entry, *e;
2706 if (!add_dynamic_entry (DT_SPARC_REGISTER, 0))
2709 entry = (struct elf_link_local_dynamic_entry *)
2710 bfd_hash_allocate (&info->hash->table, sizeof (*entry));
2714 /* We cheat here a little bit: the symbol will not be local, so we
2715 put it at the end of the dynlocal linked list. We will fix it
2716 later on, as we have to fix other fields anyway. */
2717 entry->isym.st_value = reg < 2 ? reg + 2 : reg + 4;
2718 entry->isym.st_size = 0;
2719 if (*app_regs [reg].name != '\0')
2721 = _bfd_elf_strtab_add (dynstr, app_regs[reg].name, FALSE);
2723 entry->isym.st_name = 0;
2724 entry->isym.st_other = 0;
2725 entry->isym.st_info = ELF_ST_INFO (app_regs [reg].bind,
2727 entry->isym.st_shndx = app_regs [reg].shndx;
2728 entry->isym.st_target_internal = 0;
2730 entry->input_bfd = output_bfd;
2731 entry->input_indx = -1;
2733 if (eht->dynlocal == NULL)
2734 eht->dynlocal = entry;
2737 for (e = eht->dynlocal; e->next; e = e->next)
2744 if (htab->is_vxworks
2745 && !elf_vxworks_add_dynamic_entries (output_bfd, info))
2748 #undef add_dynamic_entry
2754 _bfd_sparc_elf_new_section_hook (bfd *abfd, asection *sec)
2756 if (!sec->used_by_bfd)
2758 struct _bfd_sparc_elf_section_data *sdata;
2759 bfd_size_type amt = sizeof (*sdata);
2761 sdata = bfd_zalloc (abfd, amt);
2764 sec->used_by_bfd = sdata;
2767 return _bfd_elf_new_section_hook (abfd, sec);
2771 _bfd_sparc_elf_relax_section (bfd *abfd ATTRIBUTE_UNUSED,
2772 struct bfd_section *section,
2773 struct bfd_link_info *link_info ATTRIBUTE_UNUSED,
2776 if (bfd_link_relocatable (link_info))
2777 (*link_info->callbacks->einfo)
2778 (_("%P%F: --relax and -r may not be used together\n"));
2781 sec_do_relax (section) = 1;
2785 /* Return the base VMA address which should be subtracted from real addresses
2786 when resolving @dtpoff relocation.
2787 This is PT_TLS segment p_vaddr. */
2790 dtpoff_base (struct bfd_link_info *info)
2792 /* If tls_sec is NULL, we should have signalled an error already. */
2793 if (elf_hash_table (info)->tls_sec == NULL)
2795 return elf_hash_table (info)->tls_sec->vma;
2798 /* Return the relocation value for @tpoff relocation
2799 if STT_TLS virtual address is ADDRESS. */
2802 tpoff (struct bfd_link_info *info, bfd_vma address)
2804 struct elf_link_hash_table *htab = elf_hash_table (info);
2805 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
2806 bfd_vma static_tls_size;
2808 /* If tls_sec is NULL, we should have signalled an error already. */
2809 if (htab->tls_sec == NULL)
2812 /* Consider special static TLS alignment requirements. */
2813 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
2814 return address - static_tls_size - htab->tls_sec->vma;
2817 /* Return the relocation value for a %gdop relocation. */
2820 gdopoff (struct bfd_link_info *info, bfd_vma address)
2822 struct elf_link_hash_table *htab = elf_hash_table (info);
2825 got_base = (htab->hgot->root.u.def.value
2826 + htab->hgot->root.u.def.section->output_offset
2827 + htab->hgot->root.u.def.section->output_section->vma);
2829 return address - got_base;
2832 /* Return whether H is local and its ADDRESS is within 4G of
2833 _GLOBAL_OFFSET_TABLE_ and thus the offset may be calculated by a
2834 sethi, xor sequence. */
2837 gdop_relative_offset_ok (struct bfd_link_info *info,
2838 struct elf_link_hash_entry *h,
2839 bfd_vma address ATTRIBUTE_UNUSED)
2841 if (!SYMBOL_REFERENCES_LOCAL (info, h))
2843 /* If H is undefined, ADDRESS will be zero. We can't allow a
2844 relative offset to "zero" when producing PIEs or shared libs.
2845 Note that to get here with an undefined symbol it must also be
2846 hidden or internal visibility. */
2847 if (bfd_link_pic (info)
2849 && (h->root.type == bfd_link_hash_undefweak
2850 || h->root.type == bfd_link_hash_undefined))
2853 return gdopoff (info, address) + ((bfd_vma) 1 << 32) < (bfd_vma) 2 << 32;
2859 /* Relocate a SPARC ELF section. */
2862 _bfd_sparc_elf_relocate_section (bfd *output_bfd,
2863 struct bfd_link_info *info,
2865 asection *input_section,
2867 Elf_Internal_Rela *relocs,
2868 Elf_Internal_Sym *local_syms,
2869 asection **local_sections)
2871 struct _bfd_sparc_elf_link_hash_table *htab;
2872 Elf_Internal_Shdr *symtab_hdr;
2873 struct elf_link_hash_entry **sym_hashes;
2874 bfd_vma *local_got_offsets;
2877 Elf_Internal_Rela *rel;
2878 Elf_Internal_Rela *relend;
2880 bfd_boolean is_vxworks_tls;
2882 htab = _bfd_sparc_elf_hash_table (info);
2883 BFD_ASSERT (htab != NULL);
2884 symtab_hdr = &elf_symtab_hdr (input_bfd);
2885 sym_hashes = elf_sym_hashes (input_bfd);
2886 local_got_offsets = elf_local_got_offsets (input_bfd);
2888 if (elf_hash_table (info)->hgot == NULL)
2891 got_base = elf_hash_table (info)->hgot->root.u.def.value;
2893 sreloc = elf_section_data (input_section)->sreloc;
2894 /* We have to handle relocations in vxworks .tls_vars sections
2895 specially, because the dynamic loader is 'weird'. */
2896 is_vxworks_tls = (htab->is_vxworks && bfd_link_pic (info)
2897 && !strcmp (input_section->output_section->name,
2901 if (ABI_64_P (output_bfd))
2902 num_relocs = NUM_SHDR_ENTRIES (_bfd_elf_single_rel_hdr (input_section));
2904 num_relocs = input_section->reloc_count;
2905 relend = relocs + num_relocs;
2906 for (; rel < relend; rel++)
2908 int r_type, tls_type;
2909 reloc_howto_type *howto;
2910 unsigned long r_symndx;
2911 struct elf_link_hash_entry *h;
2912 struct _bfd_sparc_elf_link_hash_entry *eh;
2913 Elf_Internal_Sym *sym;
2915 bfd_vma relocation, off;
2916 bfd_reloc_status_type r;
2917 bfd_boolean is_plt = FALSE;
2918 bfd_boolean unresolved_reloc;
2919 bfd_boolean resolved_to_zero;
2920 bfd_boolean relative_reloc;
2922 r_type = SPARC_ELF_R_TYPE (rel->r_info);
2923 if (r_type == R_SPARC_GNU_VTINHERIT
2924 || r_type == R_SPARC_GNU_VTENTRY)
2927 if (r_type < 0 || r_type >= (int) R_SPARC_max_std)
2929 bfd_set_error (bfd_error_bad_value);
2933 howto = _bfd_sparc_elf_howto_table + r_type;
2934 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
2938 unresolved_reloc = FALSE;
2939 if (r_symndx < symtab_hdr->sh_info)
2941 sym = local_syms + r_symndx;
2942 sec = local_sections[r_symndx];
2943 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
2945 if (!bfd_link_relocatable (info)
2946 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
2948 /* Relocate against local STT_GNU_IFUNC symbol. */
2949 h = elf_sparc_get_local_sym_hash (htab, input_bfd,
2954 /* Set STT_GNU_IFUNC symbol value. */
2955 h->root.u.def.value = sym->st_value;
2956 h->root.u.def.section = sec;
2961 bfd_boolean warned, ignored;
2963 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2964 r_symndx, symtab_hdr, sym_hashes,
2966 unresolved_reloc, warned, ignored);
2969 /* To avoid generating warning messages about truncated
2970 relocations, set the relocation's address to be the same as
2971 the start of this section. */
2972 if (input_section->output_section != NULL)
2973 relocation = input_section->output_section->vma;
2979 if (sec != NULL && discarded_section (sec))
2980 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
2981 rel, 1, relend, howto, 0, contents);
2983 if (bfd_link_relocatable (info))
2987 && h->type == STT_GNU_IFUNC
2993 if ((input_section->flags & SEC_ALLOC) == 0
2994 || h->plt.offset == (bfd_vma) -1)
2997 plt_sec = htab->elf.splt;
2999 plt_sec =htab->elf.iplt;
3003 case R_SPARC_GOTDATA_OP:
3006 case R_SPARC_GOTDATA_OP_HIX22:
3007 case R_SPARC_GOTDATA_OP_LOX10:
3008 r_type = (r_type == R_SPARC_GOTDATA_OP_HIX22
3011 howto = _bfd_sparc_elf_howto_table + r_type;
3017 if (htab->elf.sgot == NULL)
3019 off = h->got.offset;
3020 if (off == (bfd_vma) -1)
3022 relocation = htab->elf.sgot->output_offset + off - got_base;
3025 case R_SPARC_WPLT30:
3026 case R_SPARC_WDISP30:
3027 relocation = (plt_sec->output_section->vma
3028 + plt_sec->output_offset + h->plt.offset);
3033 if (bfd_link_pic (info) && h->non_got_ref)
3035 Elf_Internal_Rela outrel;
3038 offset = _bfd_elf_section_offset (output_bfd, info,
3041 if (offset == (bfd_vma) -1
3042 || offset == (bfd_vma) -2)
3045 outrel.r_offset = (input_section->output_section->vma
3046 + input_section->output_offset
3049 if (h->dynindx == -1
3051 || bfd_link_executable (info))
3053 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3054 0, R_SPARC_IRELATIVE);
3055 outrel.r_addend = relocation + rel->r_addend;
3059 if (h->dynindx == -1)
3061 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, h->dynindx, r_type);
3062 outrel.r_addend = rel->r_addend;
3065 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
3069 relocation = (plt_sec->output_section->vma
3070 + plt_sec->output_offset + h->plt.offset);
3075 /* We should only see such relocs in static links. */
3076 if (bfd_link_pic (info))
3078 relocation = (plt_sec->output_section->vma
3079 + plt_sec->output_offset + h->plt.offset);
3083 if (h->root.root.string)
3084 name = h->root.root.string;
3086 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
3089 /* xgettext:c-format */
3090 (_("%pB: relocation %s against STT_GNU_IFUNC "
3091 "symbol `%s' isn't handled by %s"), input_bfd,
3092 _bfd_sparc_elf_howto_table[r_type].name,
3093 name, __FUNCTION__);
3094 bfd_set_error (bfd_error_bad_value);
3099 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
3100 resolved_to_zero = eh && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
3104 case R_SPARC_GOTDATA_OP_HIX22:
3105 case R_SPARC_GOTDATA_OP_LOX10:
3106 if (gdop_relative_offset_ok (info, h, relocation))
3108 r_type = (r_type == R_SPARC_GOTDATA_OP_HIX22
3109 ? R_SPARC_GOTDATA_HIX22
3110 : R_SPARC_GOTDATA_LOX10);
3111 howto = _bfd_sparc_elf_howto_table + r_type;
3115 case R_SPARC_GOTDATA_OP:
3116 if (gdop_relative_offset_ok (info, h, relocation))
3118 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3120 /* {ld,ldx} [%rs1 + %rs2], %rd --> add %rs1, %rs2, %rd */
3121 relocation = 0x80000000 | (insn & 0x3e07c01f);
3122 bfd_put_32 (output_bfd, relocation, contents + rel->r_offset);
3124 /* If the symbol is global but not dynamic, an .rela.* slot has
3125 been allocated for it in the GOT so output R_SPARC_NONE here.
3126 See also the handling of other GOT relocations just below. */
3130 && h->root.type != bfd_link_hash_undefweak
3131 && (h->got.offset & 1) == 0
3132 && bfd_link_pic (info))
3134 asection *s = htab->elf.srelgot;
3135 Elf_Internal_Rela outrel;
3137 BFD_ASSERT (s != NULL);
3139 memset (&outrel, 0, sizeof outrel);
3140 sparc_elf_append_rela (output_bfd, s, &outrel);
3149 case R_SPARC_GOTDATA_HIX22:
3150 case R_SPARC_GOTDATA_LOX10:
3151 relocation = gdopoff (info, relocation);
3154 case R_SPARC_GOTDATA_OP_HIX22:
3155 case R_SPARC_GOTDATA_OP_LOX10:
3159 /* Relocation is to the entry for this symbol in the global
3161 if (htab->elf.sgot == NULL)
3164 relative_reloc = FALSE;
3169 off = h->got.offset;
3170 BFD_ASSERT (off != (bfd_vma) -1);
3171 dyn = elf_hash_table (info)->dynamic_sections_created;
3173 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
3174 bfd_link_pic (info),
3176 || (bfd_link_pic (info)
3177 && SYMBOL_REFERENCES_LOCAL (info, h)))
3179 /* This is actually a static link, or it is a
3180 -Bsymbolic link and the symbol is defined
3181 locally, or the symbol was forced to be local
3182 because of a version file. We must initialize
3183 this entry in the global offset table. Since the
3184 offset must always be a multiple of 8 for 64-bit
3185 and 4 for 32-bit, we use the least significant bit
3186 to record whether we have initialized it already.
3188 When doing a dynamic link, we create a .rela.got
3189 relocation entry to initialize the value. This
3190 is done in the finish_dynamic_symbol routine. */
3195 /* If this symbol isn't dynamic in PIC mode, treat it
3196 like a local symbol in PIC mode below. */
3197 if (h->dynindx == -1
3199 && h->root.type != bfd_link_hash_undefweak
3200 && bfd_link_pic (info))
3201 relative_reloc = TRUE;
3203 SPARC_ELF_PUT_WORD (htab, output_bfd, relocation,
3204 htab->elf.sgot->contents + off);
3209 unresolved_reloc = FALSE;
3213 BFD_ASSERT (local_got_offsets != NULL
3214 && local_got_offsets[r_symndx] != (bfd_vma) -1);
3216 off = local_got_offsets[r_symndx];
3218 /* The offset must always be a multiple of 8 on 64-bit and
3219 4 on 32-bit. We use the least significant bit to record
3220 whether we have already processed this entry. */
3225 /* For a local symbol in PIC mode, we need to generate a
3226 R_SPARC_RELATIVE reloc for the dynamic linker. */
3227 if (bfd_link_pic (info))
3228 relative_reloc = TRUE;
3230 SPARC_ELF_PUT_WORD (htab, output_bfd, relocation,
3231 htab->elf.sgot->contents + off);
3232 local_got_offsets[r_symndx] |= 1;
3238 asection *s = htab->elf.srelgot;
3239 Elf_Internal_Rela outrel;
3241 BFD_ASSERT (s != NULL);
3243 outrel.r_offset = (htab->elf.sgot->output_section->vma
3244 + htab->elf.sgot->output_offset
3246 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3247 0, R_SPARC_RELATIVE);
3248 outrel.r_addend = relocation;
3249 sparc_elf_append_rela (output_bfd, s, &outrel);
3250 /* Versions of glibc ld.so at least up to 2.26 wrongly
3251 add the section contents to the value calculated for
3252 a RELATIVE reloc. Zero the contents to work around
3255 SPARC_ELF_PUT_WORD (htab, output_bfd, relocation,
3256 htab->elf.sgot->contents + off);
3259 relocation = htab->elf.sgot->output_offset + off - got_base;
3264 if (h == NULL || h->plt.offset == (bfd_vma) -1)
3266 r_type = (r_type == R_SPARC_PLT32) ? R_SPARC_32 : R_SPARC_64;
3271 case R_SPARC_WPLT30:
3272 case R_SPARC_HIPLT22:
3273 case R_SPARC_LOPLT10:
3274 case R_SPARC_PCPLT32:
3275 case R_SPARC_PCPLT22:
3276 case R_SPARC_PCPLT10:
3278 /* Relocation is to the entry for this symbol in the
3279 procedure linkage table. */
3281 if (! ABI_64_P (output_bfd))
3283 /* The Solaris native assembler will generate a WPLT30 reloc
3284 for a local symbol if you assemble a call from one
3285 section to another when using -K pic. We treat it as
3290 /* PR 7027: We need similar behaviour for 64-bit binaries. */
3291 else if (r_type == R_SPARC_WPLT30 && h == NULL)
3295 BFD_ASSERT (h != NULL);
3298 if (h->plt.offset == (bfd_vma) -1 || htab->elf.splt == NULL)
3300 /* We didn't make a PLT entry for this symbol. This
3301 happens when statically linking PIC code, or when
3302 using -Bsymbolic. */
3306 relocation = (htab->elf.splt->output_section->vma
3307 + htab->elf.splt->output_offset
3309 unresolved_reloc = FALSE;
3310 if (r_type == R_SPARC_PLT32 || r_type == R_SPARC_PLT64)
3312 r_type = r_type == R_SPARC_PLT32 ? R_SPARC_32 : R_SPARC_64;
3320 case R_SPARC_PC_HH22:
3321 case R_SPARC_PC_HM10:
3322 case R_SPARC_PC_LM22:
3324 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
3328 case R_SPARC_DISP16:
3329 case R_SPARC_DISP32:
3330 case R_SPARC_DISP64:
3331 case R_SPARC_WDISP30:
3332 case R_SPARC_WDISP22:
3333 case R_SPARC_WDISP19:
3334 case R_SPARC_WDISP16:
3335 case R_SPARC_WDISP10:
3363 if ((input_section->flags & SEC_ALLOC) == 0 || is_vxworks_tls)
3366 /* Copy dynamic function pointer relocations. Don't generate
3367 dynamic relocations against resolved undefined weak symbols
3369 if ((bfd_link_pic (info)
3371 || !(h->root.type == bfd_link_hash_undefweak
3372 && (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
3373 || resolved_to_zero)))
3374 && (! howto->pc_relative
3375 || !SYMBOL_CALLS_LOCAL (info, h)))
3376 || (!bfd_link_pic (info)
3382 || (h->root.type == bfd_link_hash_undefweak
3383 && !resolved_to_zero)
3384 || h->root.type == bfd_link_hash_undefined)))
3386 Elf_Internal_Rela outrel;
3387 bfd_boolean skip, relocate = FALSE;
3389 /* When generating a shared object, these relocations
3390 are copied into the output file to be resolved at run
3393 BFD_ASSERT (sreloc != NULL);
3398 _bfd_elf_section_offset (output_bfd, info, input_section,
3400 if (outrel.r_offset == (bfd_vma) -1)
3402 else if (outrel.r_offset == (bfd_vma) -2)
3403 skip = TRUE, relocate = TRUE;
3404 outrel.r_offset += (input_section->output_section->vma
3405 + input_section->output_offset);
3407 /* Optimize unaligned reloc usage now that we know where
3408 it finally resides. */
3412 if (outrel.r_offset & 1)
3413 r_type = R_SPARC_UA16;
3416 if (!(outrel.r_offset & 1))
3417 r_type = R_SPARC_16;
3420 if (outrel.r_offset & 3)
3421 r_type = R_SPARC_UA32;
3424 if (!(outrel.r_offset & 3))
3425 r_type = R_SPARC_32;
3428 if (outrel.r_offset & 7)
3429 r_type = R_SPARC_UA64;
3432 if (!(outrel.r_offset & 7))
3433 r_type = R_SPARC_64;
3436 case R_SPARC_DISP16:
3437 case R_SPARC_DISP32:
3438 case R_SPARC_DISP64:
3439 /* If the symbol is not dynamic, we should not keep
3440 a dynamic relocation. But an .rela.* slot has been
3441 allocated for it, output R_SPARC_NONE.
3442 FIXME: Add code tracking needed dynamic relocs as
3444 if (h->dynindx == -1)
3445 skip = TRUE, relocate = TRUE;
3450 memset (&outrel, 0, sizeof outrel);
3451 /* h->dynindx may be -1 if the symbol was marked to
3455 && (_bfd_sparc_elf_howto_table[r_type].pc_relative
3456 || !bfd_link_pic (info)
3457 || !SYMBOLIC_BIND (info, h)
3458 || !h->def_regular))
3460 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, h->dynindx, r_type);
3461 outrel.r_addend = rel->r_addend;
3465 if ( (!ABI_64_P (output_bfd) && r_type == R_SPARC_32)
3466 || (ABI_64_P (output_bfd) && r_type == R_SPARC_64))
3468 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3469 0, R_SPARC_RELATIVE);
3470 outrel.r_addend = relocation + rel->r_addend;
3476 outrel.r_addend = relocation + rel->r_addend;
3479 sec = htab->elf.splt;
3481 if (bfd_is_abs_section (sec))
3483 else if (sec == NULL || sec->owner == NULL)
3485 bfd_set_error (bfd_error_bad_value);
3492 /* We are turning this relocation into one
3493 against a section symbol. It would be
3494 proper to subtract the symbol's value,
3495 osec->vma, from the emitted reloc addend,
3496 but ld.so expects buggy relocs. */
3497 osec = sec->output_section;
3498 indx = elf_section_data (osec)->dynindx;
3502 osec = htab->elf.text_index_section;
3503 indx = elf_section_data (osec)->dynindx;
3506 /* FIXME: we really should be able to link non-pic
3507 shared libraries. */
3512 (_("%pB: probably compiled without -fPIC?"),
3514 bfd_set_error (bfd_error_bad_value);
3519 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, indx,
3524 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
3526 /* This reloc will be computed at runtime, so there's no
3527 need to do anything now. */
3533 case R_SPARC_TLS_GD_HI22:
3534 case R_SPARC_TLS_GD_LO10:
3535 case R_SPARC_TLS_IE_HI22:
3536 case R_SPARC_TLS_IE_LO10:
3537 r_type = sparc_elf_tls_transition (info, input_bfd, r_type,
3538 h == NULL || h->dynindx == -1);
3539 if (r_type == R_SPARC_REV32)
3542 tls_type = _bfd_sparc_elf_hash_entry (h)->tls_type;
3543 else if (local_got_offsets)
3544 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
3546 tls_type = GOT_UNKNOWN;
3547 if (tls_type == GOT_TLS_IE)
3550 case R_SPARC_TLS_GD_HI22:
3551 r_type = R_SPARC_TLS_IE_HI22;
3553 case R_SPARC_TLS_GD_LO10:
3554 r_type = R_SPARC_TLS_IE_LO10;
3558 if (r_type == R_SPARC_TLS_LE_HIX22)
3560 relocation = tpoff (info, relocation);
3563 if (r_type == R_SPARC_TLS_LE_LOX10)
3565 /* Change add into xor. */
3566 relocation = tpoff (info, relocation);
3567 bfd_put_32 (output_bfd, (bfd_get_32 (input_bfd,
3568 contents + rel->r_offset)
3569 | 0x80182000), contents + rel->r_offset);
3575 off = h->got.offset;
3580 BFD_ASSERT (local_got_offsets != NULL);
3581 off = local_got_offsets[r_symndx];
3582 local_got_offsets[r_symndx] |= 1;
3586 if (htab->elf.sgot == NULL)
3593 Elf_Internal_Rela outrel;
3596 if (htab->elf.srelgot == NULL)
3599 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
3600 htab->elf.sgot->contents + off);
3601 outrel.r_offset = (htab->elf.sgot->output_section->vma
3602 + htab->elf.sgot->output_offset + off);
3603 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3604 if (r_type == R_SPARC_TLS_IE_HI22
3605 || r_type == R_SPARC_TLS_IE_LO10)
3606 dr_type = SPARC_ELF_TPOFF_RELOC (htab);
3608 dr_type = SPARC_ELF_DTPMOD_RELOC (htab);
3609 if (dr_type == SPARC_ELF_TPOFF_RELOC (htab) && indx == 0)
3610 outrel.r_addend = relocation - dtpoff_base (info);
3612 outrel.r_addend = 0;
3613 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, indx, dr_type);
3614 sparc_elf_append_rela (output_bfd, htab->elf.srelgot, &outrel);
3616 if (r_type == R_SPARC_TLS_GD_HI22
3617 || r_type == R_SPARC_TLS_GD_LO10)
3621 BFD_ASSERT (! unresolved_reloc);
3622 SPARC_ELF_PUT_WORD (htab, output_bfd,
3623 relocation - dtpoff_base (info),
3624 (htab->elf.sgot->contents + off
3625 + SPARC_ELF_WORD_BYTES (htab)));
3629 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
3630 (htab->elf.sgot->contents + off
3631 + SPARC_ELF_WORD_BYTES (htab)));
3632 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, indx,
3633 SPARC_ELF_DTPOFF_RELOC (htab));
3634 outrel.r_offset += SPARC_ELF_WORD_BYTES (htab);
3635 sparc_elf_append_rela (output_bfd, htab->elf.srelgot,
3639 else if (dr_type == SPARC_ELF_DTPMOD_RELOC (htab))
3641 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
3642 (htab->elf.sgot->contents + off
3643 + SPARC_ELF_WORD_BYTES (htab)));
3647 if (off >= (bfd_vma) -2)
3650 relocation = htab->elf.sgot->output_offset + off - got_base;
3651 unresolved_reloc = FALSE;
3652 howto = _bfd_sparc_elf_howto_table + r_type;
3655 case R_SPARC_TLS_LDM_HI22:
3656 case R_SPARC_TLS_LDM_LO10:
3658 if (bfd_link_executable (info))
3660 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3663 off = htab->tls_ldm_got.offset;
3664 htab->tls_ldm_got.offset |= 1;
3665 goto r_sparc_tlsldm;
3667 case R_SPARC_TLS_LDO_HIX22:
3668 case R_SPARC_TLS_LDO_LOX10:
3670 if (bfd_link_executable (info))
3672 if (r_type == R_SPARC_TLS_LDO_HIX22)
3673 r_type = R_SPARC_TLS_LE_HIX22;
3675 r_type = R_SPARC_TLS_LE_LOX10;
3679 relocation -= dtpoff_base (info);
3684 case R_SPARC_TLS_LE_HIX22:
3685 case R_SPARC_TLS_LE_LOX10:
3686 if (!bfd_link_executable (info))
3688 Elf_Internal_Rela outrel;
3690 = _bfd_elf_section_offset (output_bfd, info, input_section,
3692 if (offset == (bfd_vma) -1 || offset == (bfd_vma) -2)
3693 memset (&outrel, 0, sizeof outrel);
3696 outrel.r_offset = offset
3697 + input_section->output_section->vma
3698 + input_section->output_offset;
3699 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, r_type);
3701 = relocation - dtpoff_base (info) + rel->r_addend;
3704 BFD_ASSERT (sreloc != NULL);
3705 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
3708 relocation = tpoff (info, relocation);
3711 case R_SPARC_TLS_LDM_CALL:
3713 if (bfd_link_executable (info))
3716 bfd_put_32 (output_bfd, 0x90100000, contents + rel->r_offset);
3721 case R_SPARC_TLS_GD_CALL:
3723 tls_type = _bfd_sparc_elf_hash_entry (h)->tls_type;
3724 else if (local_got_offsets)
3725 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
3727 tls_type = GOT_UNKNOWN;
3728 /* GD -> IE or LE */
3729 if (bfd_link_executable (info)
3730 || (r_type == R_SPARC_TLS_GD_CALL && tls_type == GOT_TLS_IE))
3732 Elf_Internal_Rela *rel2;
3736 if (bfd_link_executable (info) && (h == NULL || h->dynindx == -1))
3738 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3743 if (rel + 1 < relend
3744 && SPARC_ELF_R_TYPE (rel[1].r_info) == R_SPARC_TLS_GD_ADD
3745 && rel[1].r_offset == rel->r_offset + 4
3746 && SPARC_ELF_R_SYMNDX (htab, rel[1].r_info) == r_symndx
3747 && (((insn = bfd_get_32 (input_bfd,
3748 contents + rel[1].r_offset))
3749 >> 25) & 0x1f) == 8)
3752 call __tls_get_addr, %tgd_call(foo)
3753 add %reg1, %reg2, %o0, %tgd_add(foo)
3754 and change it into IE:
3755 {ld,ldx} [%reg1 + %reg2], %o0, %tie_ldx(foo)
3756 add %g7, %o0, %o0, %tie_add(foo).
3757 add is 0x80000000 | (rd << 25) | (rs1 << 14) | rs2,
3758 ld is 0xc0000000 | (rd << 25) | (rs1 << 14) | rs2,
3759 ldx is 0xc0580000 | (rd << 25) | (rs1 << 14) | rs2. */
3760 bfd_put_32 (output_bfd, insn | (ABI_64_P (output_bfd) ? 0xc0580000 : 0xc0000000),
3761 contents + rel->r_offset);
3762 bfd_put_32 (output_bfd, 0x9001c008,
3763 contents + rel->r_offset + 4);
3768 /* We cannot just overwrite the delay slot instruction,
3769 as it might be what puts the %o0 argument to
3770 __tls_get_addr into place. So we have to transpose
3771 the delay slot with the add we patch in. */
3772 insn = bfd_get_32 (input_bfd, contents + rel->r_offset + 4);
3773 bfd_put_32 (output_bfd, insn,
3774 contents + rel->r_offset);
3775 bfd_put_32 (output_bfd, 0x9001c008,
3776 contents + rel->r_offset + 4);
3779 while ((rel2 = sparc_elf_find_reloc_at_ofs (rel2 + 1, relend,
3783 /* If the instruction we moved has a relocation attached to
3784 it, adjust the offset so that it will apply to the correct
3786 rel2->r_offset -= 4;
3791 h = (struct elf_link_hash_entry *)
3792 bfd_link_hash_lookup (info->hash, "__tls_get_addr", FALSE,
3794 BFD_ASSERT (h != NULL);
3795 r_type = R_SPARC_WPLT30;
3796 howto = _bfd_sparc_elf_howto_table + r_type;
3797 goto r_sparc_wplt30;
3799 case R_SPARC_TLS_GD_ADD:
3801 tls_type = _bfd_sparc_elf_hash_entry (h)->tls_type;
3802 else if (local_got_offsets)
3803 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
3805 tls_type = GOT_UNKNOWN;
3806 /* GD -> IE or LE */
3807 if (bfd_link_executable (info) || tls_type == GOT_TLS_IE)
3809 /* add %reg1, %reg2, %reg3, %tgd_add(foo)
3811 {ld,ldx} [%reg1 + %reg2], %reg3, %tie_ldx(foo)
3813 add %g7, %reg2, %reg3. */
3814 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3815 if (bfd_link_executable (info) && (h == NULL || h->dynindx == -1))
3816 relocation = (insn & ~0x7c000) | 0x1c000;
3818 relocation = insn | (ABI_64_P (output_bfd) ? 0xc0580000 : 0xc0000000);
3819 bfd_put_32 (output_bfd, relocation, contents + rel->r_offset);
3823 case R_SPARC_TLS_LDM_ADD:
3825 if (bfd_link_executable (info))
3826 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3829 case R_SPARC_TLS_LDO_ADD:
3831 if (bfd_link_executable (info))
3833 /* Change rs1 into %g7. */
3834 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3835 insn = (insn & ~0x7c000) | 0x1c000;
3836 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
3840 case R_SPARC_TLS_IE_LD:
3841 case R_SPARC_TLS_IE_LDX:
3843 if (bfd_link_executable (info) && (h == NULL || h->dynindx == -1))
3845 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3846 int rs2 = insn & 0x1f;
3847 int rd = (insn >> 25) & 0x1f;
3850 relocation = SPARC_NOP;
3852 relocation = 0x80100000 | (insn & 0x3e00001f);
3853 bfd_put_32 (output_bfd, relocation, contents + rel->r_offset);
3857 case R_SPARC_TLS_IE_ADD:
3858 /* Totally useless relocation. */
3861 case R_SPARC_TLS_DTPOFF32:
3862 case R_SPARC_TLS_DTPOFF64:
3863 relocation -= dtpoff_base (info);
3870 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3871 because such sections are not SEC_ALLOC and thus ld.so will
3872 not process them. */
3873 if (unresolved_reloc
3874 && !((input_section->flags & SEC_DEBUGGING) != 0
3876 && _bfd_elf_section_offset (output_bfd, info, input_section,
3877 rel->r_offset) != (bfd_vma) -1)
3879 /* xgettext:c-format */
3880 (_("%pB(%pA+%#Lx): unresolvable %s relocation against symbol `%s'"),
3885 h->root.root.string);
3887 r = bfd_reloc_continue;
3888 if (r_type == R_SPARC_OLO10)
3892 if (! ABI_64_P (output_bfd))
3895 relocation += rel->r_addend;
3896 relocation = (relocation & 0x3ff) + ELF64_R_TYPE_DATA (rel->r_info);
3898 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3899 x = (x & ~(bfd_vma) 0x1fff) | (relocation & 0x1fff);
3900 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3902 r = bfd_check_overflow (howto->complain_on_overflow,
3903 howto->bitsize, howto->rightshift,
3904 bfd_arch_bits_per_address (input_bfd),
3907 else if (r_type == R_SPARC_WDISP16)
3911 relocation += rel->r_addend;
3912 relocation -= (input_section->output_section->vma
3913 + input_section->output_offset);
3914 relocation -= rel->r_offset;
3916 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3917 x |= ((((relocation >> 2) & 0xc000) << 6)
3918 | ((relocation >> 2) & 0x3fff));
3919 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3921 r = bfd_check_overflow (howto->complain_on_overflow,
3922 howto->bitsize, howto->rightshift,
3923 bfd_arch_bits_per_address (input_bfd),
3926 else if (r_type == R_SPARC_WDISP10)
3930 relocation += rel->r_addend;
3931 relocation -= (input_section->output_section->vma
3932 + input_section->output_offset);
3933 relocation -= rel->r_offset;
3935 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3936 x |= ((((relocation >> 2) & 0x300) << 11)
3937 | (((relocation >> 2) & 0xff) << 5));
3938 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3940 r = bfd_check_overflow (howto->complain_on_overflow,
3941 howto->bitsize, howto->rightshift,
3942 bfd_arch_bits_per_address (input_bfd),
3945 else if (r_type == R_SPARC_REV32)
3949 relocation = relocation + rel->r_addend;
3951 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3953 bfd_putl32 (/*input_bfd,*/ x, contents + rel->r_offset);
3956 else if (r_type == R_SPARC_TLS_LDO_HIX22
3957 || r_type == R_SPARC_TLS_LE_HIX22)
3961 relocation += rel->r_addend;
3962 if (r_type == R_SPARC_TLS_LE_HIX22)
3963 relocation ^= MINUS_ONE;
3965 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3966 x = (x & ~(bfd_vma) 0x3fffff) | ((relocation >> 10) & 0x3fffff);
3967 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3970 else if (r_type == R_SPARC_TLS_LDO_LOX10
3971 || r_type == R_SPARC_TLS_LE_LOX10)
3975 relocation += rel->r_addend;
3976 relocation &= 0x3ff;
3977 if (r_type == R_SPARC_TLS_LE_LOX10)
3978 relocation |= 0x1c00;
3980 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3981 x = (x & ~(bfd_vma) 0x1fff) | relocation;
3982 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3986 else if (r_type == R_SPARC_HIX22
3987 || r_type == R_SPARC_GOTDATA_HIX22
3988 || r_type == R_SPARC_GOTDATA_OP_HIX22)
3992 relocation += rel->r_addend;
3993 if (r_type == R_SPARC_HIX22
3994 || (bfd_signed_vma) relocation < 0)
3995 relocation = relocation ^ MINUS_ONE;
3997 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3998 x = (x & ~(bfd_vma) 0x3fffff) | ((relocation >> 10) & 0x3fffff);
3999 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4001 r = bfd_check_overflow (howto->complain_on_overflow,
4002 howto->bitsize, howto->rightshift,
4003 bfd_arch_bits_per_address (input_bfd),
4006 else if (r_type == R_SPARC_LOX10
4007 || r_type == R_SPARC_GOTDATA_LOX10
4008 || r_type == R_SPARC_GOTDATA_OP_LOX10)
4012 relocation += rel->r_addend;
4013 if (r_type == R_SPARC_LOX10
4014 || (bfd_signed_vma) relocation < 0)
4015 relocation = (relocation & 0x3ff) | 0x1c00;
4017 relocation = (relocation & 0x3ff);
4019 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4020 x = (x & ~(bfd_vma) 0x1fff) | relocation;
4021 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4025 else if ((r_type == R_SPARC_WDISP30 || r_type == R_SPARC_WPLT30)
4026 && sec_do_relax (input_section)
4027 && rel->r_offset + 4 < input_section->size)
4031 #define XCC (2 << 20)
4032 #define COND(x) (((x)&0xf)<<25)
4033 #define CONDA COND(0x8)
4034 #define INSN_BPA (F2(0,1) | CONDA | BPRED | XCC)
4035 #define INSN_BA (F2(0,2) | CONDA)
4036 #define INSN_OR F3(2, 0x2, 0)
4037 #define INSN_NOP F2(0,4)
4041 /* If the instruction is a call with either:
4043 arithmetic instruction with rd == %o7
4044 where rs1 != %o7 and rs2 if it is register != %o7
4045 then we can optimize if the call destination is near
4046 by changing the call into a branch always. */
4047 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4048 y = bfd_get_32 (input_bfd, contents + rel->r_offset + 4);
4049 if ((x & OP(~0)) == OP(1) && (y & OP(~0)) == OP(2))
4051 if (((y & OP3(~0)) == OP3(0x3d) /* restore */
4052 || ((y & OP3(0x28)) == 0 /* arithmetic */
4053 && (y & RD(~0)) == RD(O7)))
4054 && (y & RS1(~0)) != RS1(O7)
4056 || (y & RS2(~0)) != RS2(O7)))
4060 reloc = relocation + rel->r_addend - rel->r_offset;
4061 reloc -= (input_section->output_section->vma
4062 + input_section->output_offset);
4064 /* Ensure the branch fits into simm22. */
4065 if ((reloc & 3) == 0
4066 && ((reloc & ~(bfd_vma)0x7fffff) == 0
4067 || ((reloc | 0x7fffff) == ~(bfd_vma)0)))
4071 /* Check whether it fits into simm19. */
4072 if (((reloc & 0x3c0000) == 0
4073 || (reloc & 0x3c0000) == 0x3c0000)
4074 && (ABI_64_P (output_bfd)
4075 || elf_elfheader (output_bfd)->e_flags & EF_SPARC_32PLUS))
4076 x = INSN_BPA | (reloc & 0x7ffff); /* ba,pt %xcc */
4078 x = INSN_BA | (reloc & 0x3fffff); /* ba */
4079 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4081 if (rel->r_offset >= 4
4082 && (y & (0xffffffff ^ RS1(~0)))
4083 == (INSN_OR | RD(O7) | RS2(G0)))
4088 z = bfd_get_32 (input_bfd,
4089 contents + rel->r_offset - 4);
4090 if ((z & (0xffffffff ^ RD(~0)))
4091 != (INSN_OR | RS1(O7) | RS2(G0)))
4099 If call foo was replaced with ba, replace
4100 or %rN, %g0, %o7 with nop. */
4102 reg = (y & RS1(~0)) >> 14;
4103 if (reg != ((z & RD(~0)) >> 25)
4104 || reg == G0 || reg == O7)
4107 bfd_put_32 (input_bfd, (bfd_vma) INSN_NOP,
4108 contents + rel->r_offset + 4);
4116 if (r == bfd_reloc_continue)
4119 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
4120 contents, rel->r_offset,
4121 relocation, rel->r_addend);
4123 if (r != bfd_reloc_ok)
4128 case bfd_reloc_outofrange:
4130 case bfd_reloc_overflow:
4134 /* The Solaris native linker silently disregards overflows.
4135 We don't, but this breaks stabs debugging info, whose
4136 relocations are only 32-bits wide. Ignore overflows in
4137 this case and also for discarded entries. */
4138 if ((r_type == R_SPARC_32
4139 || r_type == R_SPARC_UA32
4140 || r_type == R_SPARC_DISP32)
4141 && (((input_section->flags & SEC_DEBUGGING) != 0
4142 && strcmp (bfd_section_name (input_bfd,
4145 || _bfd_elf_section_offset (output_bfd, info,
4153 /* Assume this is a call protected by other code that
4154 detect the symbol is undefined. If this is the case,
4155 we can safely ignore the overflow. If not, the
4156 program is hosed anyway, and a little warning isn't
4158 if (h->root.type == bfd_link_hash_undefweak
4159 && howto->pc_relative)
4166 name = bfd_elf_string_from_elf_section (input_bfd,
4167 symtab_hdr->sh_link,
4172 name = bfd_section_name (input_bfd, sec);
4174 (*info->callbacks->reloc_overflow)
4175 (info, (h ? &h->root : NULL), name, howto->name,
4176 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
4186 /* Build a VxWorks PLT entry. PLT_INDEX is the index of the PLT entry
4187 and PLT_OFFSET is the byte offset from the start of .plt. GOT_OFFSET
4188 is the offset of the associated .got.plt entry from
4189 _GLOBAL_OFFSET_TABLE_. */
4192 sparc_vxworks_build_plt_entry (bfd *output_bfd, struct bfd_link_info *info,
4193 bfd_vma plt_offset, bfd_vma plt_index,
4197 const bfd_vma *plt_entry;
4198 struct _bfd_sparc_elf_link_hash_table *htab;
4200 Elf_Internal_Rela rela;
4202 htab = _bfd_sparc_elf_hash_table (info);
4203 BFD_ASSERT (htab != NULL);
4205 if (bfd_link_pic (info))
4207 plt_entry = sparc_vxworks_shared_plt_entry;
4212 plt_entry = sparc_vxworks_exec_plt_entry;
4213 got_base = (htab->elf.hgot->root.u.def.value
4214 + htab->elf.hgot->root.u.def.section->output_offset
4215 + htab->elf.hgot->root.u.def.section->output_section->vma);
4218 /* Fill in the entry in the procedure linkage table. */
4219 bfd_put_32 (output_bfd, plt_entry[0] + ((got_base + got_offset) >> 10),
4220 htab->elf.splt->contents + plt_offset);
4221 bfd_put_32 (output_bfd, plt_entry[1] + ((got_base + got_offset) & 0x3ff),
4222 htab->elf.splt->contents + plt_offset + 4);
4223 bfd_put_32 (output_bfd, plt_entry[2],
4224 htab->elf.splt->contents + plt_offset + 8);
4225 bfd_put_32 (output_bfd, plt_entry[3],
4226 htab->elf.splt->contents + plt_offset + 12);
4227 bfd_put_32 (output_bfd, plt_entry[4],
4228 htab->elf.splt->contents + plt_offset + 16);
4229 bfd_put_32 (output_bfd, plt_entry[5] + (plt_index >> 10),
4230 htab->elf.splt->contents + plt_offset + 20);
4231 /* PC-relative displacement for a branch to the start of
4233 bfd_put_32 (output_bfd, plt_entry[6] + (((-plt_offset - 24) >> 2)
4235 htab->elf.splt->contents + plt_offset + 24);
4236 bfd_put_32 (output_bfd, plt_entry[7] + (plt_index & 0x3ff),
4237 htab->elf.splt->contents + plt_offset + 28);
4239 /* Fill in the .got.plt entry, pointing initially at the
4240 second half of the PLT entry. */
4241 BFD_ASSERT (htab->elf.sgotplt != NULL);
4242 bfd_put_32 (output_bfd,
4243 htab->elf.splt->output_section->vma
4244 + htab->elf.splt->output_offset
4246 htab->elf.sgotplt->contents + got_offset);
4248 /* Add relocations to .rela.plt.unloaded. */
4249 if (!bfd_link_pic (info))
4251 loc = (htab->srelplt2->contents
4252 + (2 + 3 * plt_index) * sizeof (Elf32_External_Rela));
4254 /* Relocate the initial sethi. */
4255 rela.r_offset = (htab->elf.splt->output_section->vma
4256 + htab->elf.splt->output_offset
4258 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4259 rela.r_addend = got_offset;
4260 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4261 loc += sizeof (Elf32_External_Rela);
4263 /* Likewise the following or. */
4265 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4266 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4267 loc += sizeof (Elf32_External_Rela);
4269 /* Relocate the .got.plt entry. */
4270 rela.r_offset = (htab->elf.sgotplt->output_section->vma
4271 + htab->elf.sgotplt->output_offset
4273 rela.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_SPARC_32);
4274 rela.r_addend = plt_offset + 20;
4275 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4279 /* Finish up dynamic symbol handling. We set the contents of various
4280 dynamic sections here. */
4283 _bfd_sparc_elf_finish_dynamic_symbol (bfd *output_bfd,
4284 struct bfd_link_info *info,
4285 struct elf_link_hash_entry *h,
4286 Elf_Internal_Sym *sym)
4288 struct _bfd_sparc_elf_link_hash_table *htab;
4289 const struct elf_backend_data *bed;
4290 struct _bfd_sparc_elf_link_hash_entry *eh;
4291 bfd_boolean resolved_to_zero;
4293 htab = _bfd_sparc_elf_hash_table (info);
4294 BFD_ASSERT (htab != NULL);
4295 bed = get_elf_backend_data (output_bfd);
4297 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
4299 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
4300 resolved undefined weak symbols in executable so that their
4301 references have value 0 at run-time. */
4302 resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
4304 if (h->plt.offset != (bfd_vma) -1)
4308 Elf_Internal_Rela rela;
4310 bfd_vma r_offset, got_offset;
4313 /* When building a static executable, use .iplt and
4314 .rela.iplt sections for STT_GNU_IFUNC symbols. */
4315 if (htab->elf.splt != NULL)
4317 splt = htab->elf.splt;
4318 srela = htab->elf.srelplt;
4322 splt = htab->elf.iplt;
4323 srela = htab->elf.irelplt;
4326 if (splt == NULL || srela == NULL)
4329 /* Fill in the entry in the .rela.plt section. */
4330 if (htab->is_vxworks)
4332 /* Work out the index of this PLT entry. */
4333 rela_index = ((h->plt.offset - htab->plt_header_size)
4334 / htab->plt_entry_size);
4336 /* Calculate the offset of the associated .got.plt entry.
4337 The first three entries are reserved. */
4338 got_offset = (rela_index + 3) * 4;
4340 sparc_vxworks_build_plt_entry (output_bfd, info, h->plt.offset,
4341 rela_index, got_offset);
4344 /* On VxWorks, the relocation points to the .got.plt entry,
4345 not the .plt entry. */
4346 rela.r_offset = (htab->elf.sgotplt->output_section->vma
4347 + htab->elf.sgotplt->output_offset
4350 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4355 bfd_boolean ifunc = FALSE;
4357 /* Fill in the entry in the procedure linkage table. */
4358 rela_index = SPARC_ELF_BUILD_PLT_ENTRY (htab, output_bfd, splt,
4359 h->plt.offset, splt->size,
4364 || ((bfd_link_executable (info)
4365 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
4367 && h->type == STT_GNU_IFUNC))
4370 BFD_ASSERT (h == NULL
4371 || (h->type == STT_GNU_IFUNC
4373 && (h->root.type == bfd_link_hash_defined
4374 || h->root.type == bfd_link_hash_defweak)));
4377 rela.r_offset = r_offset
4378 + (splt->output_section->vma + splt->output_offset);
4379 if (ABI_64_P (output_bfd)
4380 && h->plt.offset >= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE))
4384 rela.r_addend = (h->root.u.def.section->output_section->vma
4385 + h->root.u.def.section->output_offset
4386 + h->root.u.def.value);
4387 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0,
4392 rela.r_addend = (-(h->plt.offset + 4)
4393 - splt->output_section->vma
4394 - splt->output_offset);
4395 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4403 rela.r_addend = (h->root.u.def.section->output_section->vma
4404 + h->root.u.def.section->output_offset
4405 + h->root.u.def.value);
4406 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0,
4412 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4418 /* Adjust for the first 4 reserved elements in the .plt section
4419 when setting the offset in the .rela.plt section.
4420 Sun forgot to read their own ABI and copied elf32-sparc behaviour,
4421 thus .plt[4] has corresponding .rela.plt[0] and so on. */
4423 loc = srela->contents;
4424 loc += rela_index * bed->s->sizeof_rela;
4425 bed->s->swap_reloca_out (output_bfd, &rela, loc);
4427 if (!resolved_to_zero && !h->def_regular)
4429 /* Mark the symbol as undefined, rather than as defined in
4430 the .plt section. Leave the value alone. */
4431 sym->st_shndx = SHN_UNDEF;
4432 /* If the symbol is weak, we do need to clear the value.
4433 Otherwise, the PLT entry would provide a definition for
4434 the symbol even if the symbol wasn't defined anywhere,
4435 and so the symbol would never be NULL. */
4436 if (!h->ref_regular_nonweak)
4441 /* Don't generate dynamic GOT relocation against resolved undefined weak
4442 symbols in an executable. */
4443 if (h->got.offset != (bfd_vma) -1
4444 && _bfd_sparc_elf_hash_entry(h)->tls_type != GOT_TLS_GD
4445 && _bfd_sparc_elf_hash_entry(h)->tls_type != GOT_TLS_IE
4446 && !(h->root.type == bfd_link_hash_undefweak
4447 && (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
4448 || resolved_to_zero)))
4452 Elf_Internal_Rela rela;
4454 /* This symbol has an entry in the GOT. Set it up. */
4456 sgot = htab->elf.sgot;
4457 srela = htab->elf.srelgot;
4458 BFD_ASSERT (sgot != NULL && srela != NULL);
4460 rela.r_offset = (sgot->output_section->vma
4461 + sgot->output_offset
4462 + (h->got.offset &~ (bfd_vma) 1));
4464 /* If this is a -Bsymbolic link, and the symbol is defined
4465 locally, we just want to emit a RELATIVE reloc. Likewise if
4466 the symbol was forced to be local because of a version file.
4467 The entry in the global offset table will already have been
4468 initialized in the relocate_section function. */
4469 if (! bfd_link_pic (info)
4470 && h->type == STT_GNU_IFUNC
4475 /* We load the GOT entry with the PLT entry. */
4476 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
4477 SPARC_ELF_PUT_WORD (htab, output_bfd,
4478 (plt->output_section->vma
4479 + plt->output_offset + h->plt.offset),
4480 htab->elf.sgot->contents
4481 + (h->got.offset & ~(bfd_vma) 1));
4485 if (bfd_link_pic (info) && SYMBOL_REFERENCES_LOCAL (info, h))
4487 asection *sec = h->root.u.def.section;
4488 if (h->type == STT_GNU_IFUNC)
4489 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, R_SPARC_IRELATIVE);
4491 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, R_SPARC_RELATIVE);
4492 rela.r_addend = (h->root.u.def.value
4493 + sec->output_section->vma
4494 + sec->output_offset);
4498 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx, R_SPARC_GLOB_DAT);
4502 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
4503 sgot->contents + (h->got.offset & ~(bfd_vma) 1));
4504 sparc_elf_append_rela (output_bfd, srela, &rela);
4510 Elf_Internal_Rela rela;
4512 /* This symbols needs a copy reloc. Set it up. */
4513 BFD_ASSERT (h->dynindx != -1);
4515 rela.r_offset = (h->root.u.def.value
4516 + h->root.u.def.section->output_section->vma
4517 + h->root.u.def.section->output_offset);
4518 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx, R_SPARC_COPY);
4520 if (h->root.u.def.section == htab->elf.sdynrelro)
4521 s = htab->elf.sreldynrelro;
4523 s = htab->elf.srelbss;
4524 sparc_elf_append_rela (output_bfd, s, &rela);
4527 /* Mark some specially defined symbols as absolute. On VxWorks,
4528 _GLOBAL_OFFSET_TABLE_ is not absolute: it is relative to the
4529 ".got" section. Likewise _PROCEDURE_LINKAGE_TABLE_ and ".plt". */
4531 && (h == htab->elf.hdynamic
4532 || (!htab->is_vxworks
4533 && (h == htab->elf.hgot || h == htab->elf.hplt))))
4534 sym->st_shndx = SHN_ABS;
4539 /* Finish up the dynamic sections. */
4542 sparc_finish_dyn (bfd *output_bfd, struct bfd_link_info *info,
4543 bfd *dynobj, asection *sdyn,
4544 asection *splt ATTRIBUTE_UNUSED)
4546 struct _bfd_sparc_elf_link_hash_table *htab;
4547 const struct elf_backend_data *bed;
4548 bfd_byte *dyncon, *dynconend;
4550 int stt_regidx = -1;
4551 bfd_boolean abi_64_p;
4553 htab = _bfd_sparc_elf_hash_table (info);
4554 BFD_ASSERT (htab != NULL);
4555 bed = get_elf_backend_data (output_bfd);
4556 dynsize = bed->s->sizeof_dyn;
4557 dynconend = sdyn->contents + sdyn->size;
4558 abi_64_p = ABI_64_P (output_bfd);
4559 for (dyncon = sdyn->contents; dyncon < dynconend; dyncon += dynsize)
4561 Elf_Internal_Dyn dyn;
4564 bed->s->swap_dyn_in (dynobj, dyncon, &dyn);
4566 if (htab->is_vxworks && dyn.d_tag == DT_PLTGOT)
4568 /* On VxWorks, DT_PLTGOT should point to the start of the GOT,
4569 not to the start of the PLT. */
4570 if (htab->elf.sgotplt)
4572 dyn.d_un.d_val = (htab->elf.sgotplt->output_section->vma
4573 + htab->elf.sgotplt->output_offset);
4574 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4577 else if (htab->is_vxworks
4578 && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn))
4579 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4580 else if (abi_64_p && dyn.d_tag == DT_SPARC_REGISTER)
4582 if (stt_regidx == -1)
4585 _bfd_elf_link_lookup_local_dynindx (info, output_bfd, -1);
4586 if (stt_regidx == -1)
4589 dyn.d_un.d_val = stt_regidx++;
4590 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4603 s = htab->elf.srelplt;
4607 s = htab->elf.srelplt;
4619 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
4621 dyn.d_un.d_val = s->size;
4623 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4629 /* Install the first PLT entry in a VxWorks executable and make sure that
4630 .rela.plt.unloaded relocations have the correct symbol indexes. */
4633 sparc_vxworks_finish_exec_plt (bfd *output_bfd, struct bfd_link_info *info)
4635 struct _bfd_sparc_elf_link_hash_table *htab;
4636 Elf_Internal_Rela rela;
4640 htab = _bfd_sparc_elf_hash_table (info);
4641 BFD_ASSERT (htab != NULL);
4643 /* Calculate the absolute value of _GLOBAL_OFFSET_TABLE_. */
4644 got_base = (htab->elf.hgot->root.u.def.section->output_section->vma
4645 + htab->elf.hgot->root.u.def.section->output_offset
4646 + htab->elf.hgot->root.u.def.value);
4648 /* Install the initial PLT entry. */
4649 bfd_put_32 (output_bfd,
4650 sparc_vxworks_exec_plt0_entry[0] + ((got_base + 8) >> 10),
4651 htab->elf.splt->contents);
4652 bfd_put_32 (output_bfd,
4653 sparc_vxworks_exec_plt0_entry[1] + ((got_base + 8) & 0x3ff),
4654 htab->elf.splt->contents + 4);
4655 bfd_put_32 (output_bfd,
4656 sparc_vxworks_exec_plt0_entry[2],
4657 htab->elf.splt->contents + 8);
4658 bfd_put_32 (output_bfd,
4659 sparc_vxworks_exec_plt0_entry[3],
4660 htab->elf.splt->contents + 12);
4661 bfd_put_32 (output_bfd,
4662 sparc_vxworks_exec_plt0_entry[4],
4663 htab->elf.splt->contents + 16);
4665 loc = htab->srelplt2->contents;
4667 /* Add an unloaded relocation for the initial entry's "sethi". */
4668 rela.r_offset = (htab->elf.splt->output_section->vma
4669 + htab->elf.splt->output_offset);
4670 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4672 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4673 loc += sizeof (Elf32_External_Rela);
4675 /* Likewise the following "or". */
4677 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4678 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4679 loc += sizeof (Elf32_External_Rela);
4681 /* Fix up the remaining .rela.plt.unloaded relocations. They may have
4682 the wrong symbol index for _G_O_T_ or _P_L_T_ depending on the order
4683 in which symbols were output. */
4684 while (loc < htab->srelplt2->contents + htab->srelplt2->size)
4686 Elf_Internal_Rela rel;
4688 /* The entry's initial "sethi" (against _G_O_T_). */
4689 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4690 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4691 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4692 loc += sizeof (Elf32_External_Rela);
4694 /* The following "or" (also against _G_O_T_). */
4695 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4696 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4697 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4698 loc += sizeof (Elf32_External_Rela);
4700 /* The .got.plt entry (against _P_L_T_). */
4701 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4702 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_SPARC_32);
4703 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4704 loc += sizeof (Elf32_External_Rela);
4708 /* Install the first PLT entry in a VxWorks shared object. */
4711 sparc_vxworks_finish_shared_plt (bfd *output_bfd, struct bfd_link_info *info)
4713 struct _bfd_sparc_elf_link_hash_table *htab;
4716 htab = _bfd_sparc_elf_hash_table (info);
4717 BFD_ASSERT (htab != NULL);
4719 for (i = 0; i < ARRAY_SIZE (sparc_vxworks_shared_plt0_entry); i++)
4720 bfd_put_32 (output_bfd, sparc_vxworks_shared_plt0_entry[i],
4721 htab->elf.splt->contents + i * 4);
4724 /* Finish up local dynamic symbol handling. We set the contents of
4725 various dynamic sections here. */
4728 finish_local_dynamic_symbol (void **slot, void *inf)
4730 struct elf_link_hash_entry *h
4731 = (struct elf_link_hash_entry *) *slot;
4732 struct bfd_link_info *info
4733 = (struct bfd_link_info *) inf;
4735 return _bfd_sparc_elf_finish_dynamic_symbol (info->output_bfd, info,
4739 /* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
4740 here since undefined weak symbol may not be dynamic and may not be
4741 called for _bfd_sparc_elf_finish_dynamic_symbol. */
4744 pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
4747 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
4748 struct bfd_link_info *info = (struct bfd_link_info *) inf;
4750 if (h->root.type != bfd_link_hash_undefweak
4751 || h->dynindx != -1)
4754 return _bfd_sparc_elf_finish_dynamic_symbol (info->output_bfd, info,
4759 _bfd_sparc_elf_finish_dynamic_sections (bfd *output_bfd, struct bfd_link_info *info)
4763 struct _bfd_sparc_elf_link_hash_table *htab;
4765 htab = _bfd_sparc_elf_hash_table (info);
4766 BFD_ASSERT (htab != NULL);
4767 dynobj = htab->elf.dynobj;
4769 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
4771 if (elf_hash_table (info)->dynamic_sections_created)
4775 splt = htab->elf.splt;
4776 BFD_ASSERT (splt != NULL && sdyn != NULL);
4778 if (!sparc_finish_dyn (output_bfd, info, dynobj, sdyn, splt))
4781 /* Initialize the contents of the .plt section. */
4784 if (htab->is_vxworks)
4786 if (bfd_link_pic (info))
4787 sparc_vxworks_finish_shared_plt (output_bfd, info);
4789 sparc_vxworks_finish_exec_plt (output_bfd, info);
4793 memset (splt->contents, 0, htab->plt_header_size);
4794 if (!ABI_64_P (output_bfd))
4795 bfd_put_32 (output_bfd, (bfd_vma) SPARC_NOP,
4796 splt->contents + splt->size - 4);
4800 if (elf_section_data (splt->output_section) != NULL)
4801 elf_section_data (splt->output_section)->this_hdr.sh_entsize
4802 = ((htab->is_vxworks || !ABI_64_P (output_bfd))
4803 ? 0 : htab->plt_entry_size);
4806 /* Set the first entry in the global offset table to the address of
4807 the dynamic section. */
4808 if (htab->elf.sgot && htab->elf.sgot->size > 0)
4810 bfd_vma val = (sdyn ?
4811 sdyn->output_section->vma + sdyn->output_offset :
4814 SPARC_ELF_PUT_WORD (htab, output_bfd, val, htab->elf.sgot->contents);
4818 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize =
4819 SPARC_ELF_WORD_BYTES (htab);
4821 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4822 htab_traverse (htab->loc_hash_table, finish_local_dynamic_symbol, info);
4824 /* Fill PLT entries for undefined weak symbols in PIE. */
4825 if (bfd_link_pie (info))
4826 bfd_hash_traverse (&info->hash->table,
4827 pie_finish_undefweak_symbol,
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);
4865 unsigned int m8_hwcaps2_mask = (ELF_SPARC_HWCAP2_SPARC6
4866 | ELF_SPARC_HWCAP2_ONADDSUB
4867 | ELF_SPARC_HWCAP2_ONMUL
4868 | ELF_SPARC_HWCAP2_ONDIV
4869 | ELF_SPARC_HWCAP2_DICTUNP
4870 | ELF_SPARC_HWCAP2_FPCMPSHL
4871 | ELF_SPARC_HWCAP2_RLE
4872 | ELF_SPARC_HWCAP2_SHA3);
4874 if (ABI_64_P (abfd))
4876 unsigned long mach = bfd_mach_sparc_v9;
4878 if (hwcaps2->i & m8_hwcaps2_mask)
4879 mach = bfd_mach_sparc_v9m8;
4880 else if (hwcaps2->i & v9m_hwcaps2_mask)
4881 mach = bfd_mach_sparc_v9m;
4882 else if (hwcaps->i & v9v_hwcaps_mask)
4883 mach = bfd_mach_sparc_v9v;
4884 else if (hwcaps->i & v9e_hwcaps_mask)
4885 mach = bfd_mach_sparc_v9e;
4886 else if (hwcaps->i & v9d_hwcaps_mask)
4887 mach = bfd_mach_sparc_v9d;
4888 else if (hwcaps->i & v9c_hwcaps_mask)
4889 mach = bfd_mach_sparc_v9c;
4890 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US3)
4891 mach = bfd_mach_sparc_v9b;
4892 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US1)
4893 mach = bfd_mach_sparc_v9a;
4894 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc, mach);
4898 if (elf_elfheader (abfd)->e_machine == EM_SPARC32PLUS)
4900 if (hwcaps2->i & m8_hwcaps2_mask)
4901 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4902 bfd_mach_sparc_v8plusm8);
4903 else if (hwcaps2->i & v9m_hwcaps2_mask)
4904 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4905 bfd_mach_sparc_v8plusm);
4906 else if (hwcaps->i & v9v_hwcaps_mask)
4907 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4908 bfd_mach_sparc_v8plusv);
4909 else if (hwcaps->i & v9e_hwcaps_mask)
4910 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4911 bfd_mach_sparc_v8pluse);
4912 else if (hwcaps->i & v9d_hwcaps_mask)
4913 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4914 bfd_mach_sparc_v8plusd);
4915 else if (hwcaps->i & v9c_hwcaps_mask)
4916 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4917 bfd_mach_sparc_v8plusc);
4918 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US3)
4919 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4920 bfd_mach_sparc_v8plusb);
4921 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US1)
4922 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4923 bfd_mach_sparc_v8plusa);
4924 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_32PLUS)
4925 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4926 bfd_mach_sparc_v8plus);
4930 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_LEDATA)
4931 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4932 bfd_mach_sparc_sparclite_le);
4934 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc, bfd_mach_sparc);
4938 /* Return address for Ith PLT stub in section PLT, for relocation REL
4939 or (bfd_vma) -1 if it should not be included. */
4942 _bfd_sparc_elf_plt_sym_val (bfd_vma i, const asection *plt, const arelent *rel)
4944 if (ABI_64_P (plt->owner))
4948 i += PLT64_HEADER_SIZE / PLT64_ENTRY_SIZE;
4949 if (i < PLT64_LARGE_THRESHOLD)
4950 return plt->vma + i * PLT64_ENTRY_SIZE;
4952 j = (i - PLT64_LARGE_THRESHOLD) % 160;
4954 return plt->vma + i * PLT64_ENTRY_SIZE + j * 4 * 6;
4957 return rel->address;
4960 /* Merge backend specific data from an object file to the output
4961 object file when linking. */
4964 _bfd_sparc_elf_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
4966 bfd *obfd = info->output_bfd;
4967 obj_attribute *in_attr, *in_attrs;
4968 obj_attribute *out_attr, *out_attrs;
4970 if (!elf_known_obj_attributes_proc (obfd)[0].i)
4972 /* This is the first object. Copy the attributes. */
4973 _bfd_elf_copy_obj_attributes (ibfd, obfd);
4975 /* Use the Tag_null value to indicate the attributes have been
4977 elf_known_obj_attributes_proc (obfd)[0].i = 1;
4982 in_attrs = elf_known_obj_attributes (ibfd)[OBJ_ATTR_GNU];
4983 out_attrs = elf_known_obj_attributes (obfd)[OBJ_ATTR_GNU];
4985 in_attr = &in_attrs[Tag_GNU_Sparc_HWCAPS];
4986 out_attr = &out_attrs[Tag_GNU_Sparc_HWCAPS];
4988 out_attr->i |= in_attr->i;
4991 in_attr = &in_attrs[Tag_GNU_Sparc_HWCAPS2];
4992 out_attr = &out_attrs[Tag_GNU_Sparc_HWCAPS2];
4994 out_attr->i |= in_attr->i;
4997 /* Merge Tag_compatibility attributes and any common GNU ones. */
4998 _bfd_elf_merge_object_attributes (ibfd, info);