projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
ELF: Consolidate readonly_dynrelocs
[deliverable/binutils-gdb.git] / bfd / elfxx-sparc.c
CommitLineData
22b75d0a 1/* SPARC-specific support for ELF
b3adc24a 2 Copyright (C) 2005-2020 Free Software Foundation, Inc.
22b75d0a
DM		 3
4 This file is part of BFD, the Binary File Descriptor library.
5
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
cd123cb7 8 the Free Software Foundation; either version 3 of the License, or
22b75d0a
DM		 9 (at your option) any later version.
10
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.
15
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
cd123cb7
NC		 18 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
19 MA 02110-1301, USA. */
20
22b75d0a
DM		 21
22/* This file handles functionality common to the different SPARC ABI's. */
23
22b75d0a 24#include "sysdep.h"
3db64b00 25#include "bfd.h"
22b75d0a
DM		 26#include "bfdlink.h"
27#include "libbfd.h"
910600e9 28#include "libiberty.h"
22b75d0a
DM		 29#include "elf-bfd.h"
30#include "elf/sparc.h"
31#include "opcode/sparc.h"
32#include "elfxx-sparc.h"
910600e9 33#include "elf-vxworks.h"
d0c9aeb3
DM		 34#include "objalloc.h"
35#include "hashtab.h"
22b75d0a
DM		 36
37/* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
38#define MINUS_ONE (~ (bfd_vma) 0)
39
40#define ABI_64_P(abfd) \
41 (get_elf_backend_data (abfd)->s->elfclass == ELFCLASS64)
42
43/* The relocation "howto" table. */
44
45/* Utility for performing the standard initial work of an instruction
46 relocation.
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. */
52
53static bfd_reloc_status_type
54init_insn_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
2c3fc389 55 void * data, asection *input_section, bfd *output_bfd,
22b75d0a
DM		 56 bfd_vma *prelocation, bfd_vma *pinsn)
57{
58 bfd_vma relocation;
59 reloc_howto_type *howto = reloc_entry->howto;
60
61 if (output_bfd != (bfd *) NULL
62 && (symbol->flags & BSF_SECTION_SYM) == 0
63 && (! howto->partial_inplace
64 || reloc_entry->addend == 0))
65 {
66 reloc_entry->address += input_section->output_offset;
67 return bfd_reloc_ok;
68 }
69
70 /* This works because partial_inplace is FALSE. */
71 if (output_bfd != NULL)
72 return bfd_reloc_continue;
73
74 if (reloc_entry->address > bfd_get_section_limit (abfd, input_section))
75 return bfd_reloc_outofrange;
76
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)
82 {
83 relocation -= (input_section->output_section->vma
84 + input_section->output_offset);
85 relocation -= reloc_entry->address;
86 }
87
88 *prelocation = relocation;
89 *pinsn = bfd_get_32 (abfd, (bfd_byte *) data + reloc_entry->address);
90 return bfd_reloc_other;
91}
92
93/* For unsupported relocs. */
94
95static bfd_reloc_status_type
96sparc_elf_notsup_reloc (bfd *abfd ATTRIBUTE_UNUSED,
97 arelent *reloc_entry ATTRIBUTE_UNUSED,
98 asymbol *symbol ATTRIBUTE_UNUSED,
2c3fc389 99 void * data ATTRIBUTE_UNUSED,
22b75d0a
DM		 100 asection *input_section ATTRIBUTE_UNUSED,
101 bfd *output_bfd ATTRIBUTE_UNUSED,
102 char **error_message ATTRIBUTE_UNUSED)
103{
104 return bfd_reloc_notsupported;
105}
106
107/* Handle the WDISP16 reloc. */
108
109static bfd_reloc_status_type
110sparc_elf_wdisp16_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
2c3fc389 111 void * data, asection *input_section, bfd *output_bfd,
22b75d0a
DM		 112 char **error_message ATTRIBUTE_UNUSED)
113{
114 bfd_vma relocation;
115 bfd_vma insn;
116 bfd_reloc_status_type status;
117
118 status = init_insn_reloc (abfd, reloc_entry, symbol, data,
119 input_section, output_bfd, &relocation, &insn);
120 if (status != bfd_reloc_other)
121 return status;
122
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);
126
127 if ((bfd_signed_vma) relocation < - 0x40000
128 || (bfd_signed_vma) relocation > 0x3ffff)
129 return bfd_reloc_overflow;
130 else
131 return bfd_reloc_ok;
132}
133
2615994e
DM		 134/* Handle the WDISP10 reloc. */
135
136static bfd_reloc_status_type
137sparc_elf_wdisp10_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
2c3fc389 138 void * data, asection *input_section, bfd *output_bfd,
2615994e
DM		 139 char **error_message ATTRIBUTE_UNUSED)
140{
141 bfd_vma relocation;
142 bfd_vma insn;
143 bfd_reloc_status_type status;
144
145 status = init_insn_reloc (abfd, reloc_entry, symbol, data,
146 input_section, output_bfd, &relocation, &insn);
147 if (status != bfd_reloc_other)
148 return status;
149
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);
154
155 if ((bfd_signed_vma) relocation < - 0x1000
156 || (bfd_signed_vma) relocation > 0xfff)
157 return bfd_reloc_overflow;
158 else
159 return bfd_reloc_ok;
160}
161
22b75d0a
DM		 162/* Handle the HIX22 reloc. */
163
164static bfd_reloc_status_type
165sparc_elf_hix22_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
2c3fc389 166 void * data, asection *input_section, bfd *output_bfd,
22b75d0a
DM		 167 char **error_message ATTRIBUTE_UNUSED)
168{
169 bfd_vma relocation;
170 bfd_vma insn;
171 bfd_reloc_status_type status;
172
173 status = init_insn_reloc (abfd, reloc_entry, symbol, data,
174 input_section, output_bfd, &relocation, &insn);
175 if (status != bfd_reloc_other)
176 return status;
177
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);
181
182 if ((relocation & ~ (bfd_vma) 0xffffffff) != 0)
183 return bfd_reloc_overflow;
184 else
185 return bfd_reloc_ok;
186}
187
188/* Handle the LOX10 reloc. */
189
190static bfd_reloc_status_type
191sparc_elf_lox10_reloc (bfd *abfd, arelent *reloc_entry, asymbol *symbol,
2c3fc389 192 void * data, asection *input_section, bfd *output_bfd,
22b75d0a
DM		 193 char **error_message ATTRIBUTE_UNUSED)
194{
195 bfd_vma relocation;
196 bfd_vma insn;
197 bfd_reloc_status_type status;
198
199 status = init_insn_reloc (abfd, reloc_entry, symbol, data,
200 input_section, output_bfd, &relocation, &insn);
201 if (status != bfd_reloc_other)
202 return status;
203
204 insn = (insn &~ (bfd_vma) 0x1fff) | 0x1c00 | (relocation & 0x3ff);
205 bfd_put_32 (abfd, insn, (bfd_byte *) data + reloc_entry->address);
206
207 return bfd_reloc_ok;
208}
209
210static reloc_howto_type _bfd_sparc_elf_howto_table[] =
211{
07d6d2b8
AM		 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),
22b75d0a
DM		 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),
07d6d2b8
AM		 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),
22b75d0a
DM		 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),
07d6d2b8
AM		 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),
22b75d0a
DM		 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),
07d6d2b8
AM		 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),
22b75d0a 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),
07d6d2b8
AM		 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),
22b75d0a
DM		 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),
739f7f82
DM		 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),
07d6d2b8 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),
739f7f82 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),
2615994e
DM		 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),
22b75d0a 301};
d0c9aeb3
DM		 302static 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);
304static 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);
22b75d0a
DM		 306static 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);
308static 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);
310static 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);
312
22b75d0a 313reloc_howto_type *
f3185997 314_bfd_sparc_elf_reloc_type_lookup (bfd *abfd,
22b75d0a
DM		 315 bfd_reloc_code_real_type code)
316{
679b7c76
DM		 317 /* We explicitly handle each relocation type in the switch
318 instead of using a lookup table for efficiency. */
22b75d0a
DM		 319 switch (code)
320 {
679b7c76
DM		 321 case BFD_RELOC_NONE:
322 return &_bfd_sparc_elf_howto_table[R_SPARC_NONE];
323
324 case BFD_RELOC_8:
325 return &_bfd_sparc_elf_howto_table[R_SPARC_8];
326
327 case BFD_RELOC_16:
328 return &_bfd_sparc_elf_howto_table[R_SPARC_16];
329
330 case BFD_RELOC_32:
331 return &_bfd_sparc_elf_howto_table[R_SPARC_32];
332
333 case BFD_RELOC_8_PCREL:
334 return &_bfd_sparc_elf_howto_table[R_SPARC_DISP8];
335
336 case BFD_RELOC_16_PCREL:
337 return &_bfd_sparc_elf_howto_table[R_SPARC_DISP16];
338
339 case BFD_RELOC_32_PCREL:
340 return &_bfd_sparc_elf_howto_table[R_SPARC_DISP32];
341
342 case BFD_RELOC_32_PCREL_S2:
343 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP30];
344
345 case BFD_RELOC_SPARC_WDISP22:
346 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP22];
347
348 case BFD_RELOC_HI22:
349 return &_bfd_sparc_elf_howto_table[R_SPARC_HI22];
350
351 case BFD_RELOC_SPARC22:
352 return &_bfd_sparc_elf_howto_table[R_SPARC_22];
353
354 case BFD_RELOC_SPARC13:
355 return &_bfd_sparc_elf_howto_table[R_SPARC_13];
356
357 case BFD_RELOC_LO10:
358 return &_bfd_sparc_elf_howto_table[R_SPARC_LO10];
359
360 case BFD_RELOC_SPARC_GOT10:
361 return &_bfd_sparc_elf_howto_table[R_SPARC_GOT10];
362
363 case BFD_RELOC_SPARC_GOT13:
364 return &_bfd_sparc_elf_howto_table[R_SPARC_GOT13];
365
366 case BFD_RELOC_SPARC_GOT22:
367 return &_bfd_sparc_elf_howto_table[R_SPARC_GOT22];
368
369 case BFD_RELOC_SPARC_PC10:
370 return &_bfd_sparc_elf_howto_table[R_SPARC_PC10];
371
372 case BFD_RELOC_SPARC_PC22:
373 return &_bfd_sparc_elf_howto_table[R_SPARC_PC22];
374
375 case BFD_RELOC_SPARC_WPLT30:
376 return &_bfd_sparc_elf_howto_table[R_SPARC_WPLT30];
377
378 case BFD_RELOC_SPARC_COPY:
379 return &_bfd_sparc_elf_howto_table[R_SPARC_COPY];
380
381 case BFD_RELOC_SPARC_GLOB_DAT:
382 return &_bfd_sparc_elf_howto_table[R_SPARC_GLOB_DAT];
383
384 case BFD_RELOC_SPARC_JMP_SLOT:
385 return &_bfd_sparc_elf_howto_table[R_SPARC_JMP_SLOT];
386
387 case BFD_RELOC_SPARC_RELATIVE:
388 return &_bfd_sparc_elf_howto_table[R_SPARC_RELATIVE];
389
390 case BFD_RELOC_SPARC_UA32:
391 return &_bfd_sparc_elf_howto_table[R_SPARC_UA32];
392
393 case BFD_RELOC_SPARC_PLT32:
394 return &_bfd_sparc_elf_howto_table[R_SPARC_PLT32];
395
396 case BFD_RELOC_SPARC_10:
397 return &_bfd_sparc_elf_howto_table[R_SPARC_10];
398
399 case BFD_RELOC_SPARC_11:
400 return &_bfd_sparc_elf_howto_table[R_SPARC_11];
401
402 case BFD_RELOC_SPARC_64:
403 return &_bfd_sparc_elf_howto_table[R_SPARC_64];
404
405 case BFD_RELOC_SPARC_OLO10:
406 return &_bfd_sparc_elf_howto_table[R_SPARC_OLO10];
407
408 case BFD_RELOC_SPARC_HH22:
409 return &_bfd_sparc_elf_howto_table[R_SPARC_HH22];
410
411 case BFD_RELOC_SPARC_HM10:
412 return &_bfd_sparc_elf_howto_table[R_SPARC_HM10];
413
414 case BFD_RELOC_SPARC_LM22:
415 return &_bfd_sparc_elf_howto_table[R_SPARC_LM22];
416
417 case BFD_RELOC_SPARC_PC_HH22:
418 return &_bfd_sparc_elf_howto_table[R_SPARC_PC_HH22];
419
420 case BFD_RELOC_SPARC_PC_HM10:
421 return &_bfd_sparc_elf_howto_table[R_SPARC_PC_HM10];
422
423 case BFD_RELOC_SPARC_PC_LM22:
424 return &_bfd_sparc_elf_howto_table[R_SPARC_PC_LM22];
425
426 case BFD_RELOC_SPARC_WDISP16:
427 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP16];
428
429 case BFD_RELOC_SPARC_WDISP19:
430 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP19];
431
432 case BFD_RELOC_SPARC_7:
433 return &_bfd_sparc_elf_howto_table[R_SPARC_7];
434
435 case BFD_RELOC_SPARC_5:
436 return &_bfd_sparc_elf_howto_table[R_SPARC_5];
437
438 case BFD_RELOC_SPARC_6:
439 return &_bfd_sparc_elf_howto_table[R_SPARC_6];
440
441 case BFD_RELOC_SPARC_DISP64:
442 return &_bfd_sparc_elf_howto_table[R_SPARC_DISP64];
443
444 case BFD_RELOC_SPARC_PLT64:
445 return &_bfd_sparc_elf_howto_table[R_SPARC_PLT64];
446
447 case BFD_RELOC_SPARC_HIX22:
448 return &_bfd_sparc_elf_howto_table[R_SPARC_HIX22];
449
450 case BFD_RELOC_SPARC_LOX10:
451 return &_bfd_sparc_elf_howto_table[R_SPARC_LOX10];
452
453 case BFD_RELOC_SPARC_H44:
454 return &_bfd_sparc_elf_howto_table[R_SPARC_H44];
455
456 case BFD_RELOC_SPARC_M44:
457 return &_bfd_sparc_elf_howto_table[R_SPARC_M44];
458
459 case BFD_RELOC_SPARC_L44:
460 return &_bfd_sparc_elf_howto_table[R_SPARC_L44];
461
462 case BFD_RELOC_SPARC_REGISTER:
463 return &_bfd_sparc_elf_howto_table[R_SPARC_REGISTER];
464
465 case BFD_RELOC_SPARC_UA64:
466 return &_bfd_sparc_elf_howto_table[R_SPARC_UA64];
467
468 case BFD_RELOC_SPARC_UA16:
469 return &_bfd_sparc_elf_howto_table[R_SPARC_UA16];
470
471 case BFD_RELOC_SPARC_TLS_GD_HI22:
472 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_GD_HI22];
473
474 case BFD_RELOC_SPARC_TLS_GD_LO10:
475 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_GD_LO10];
476
477 case BFD_RELOC_SPARC_TLS_GD_ADD:
478 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_GD_ADD];
479
480 case BFD_RELOC_SPARC_TLS_GD_CALL:
481 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_GD_CALL];
482
483 case BFD_RELOC_SPARC_TLS_LDM_HI22:
484 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDM_HI22];
485
486 case BFD_RELOC_SPARC_TLS_LDM_LO10:
487 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDM_LO10];
488
489 case BFD_RELOC_SPARC_TLS_LDM_ADD:
490 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDM_ADD];
491
492 case BFD_RELOC_SPARC_TLS_LDM_CALL:
493 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDM_CALL];
494
495 case BFD_RELOC_SPARC_TLS_LDO_HIX22:
496 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDO_HIX22];
497
498 case BFD_RELOC_SPARC_TLS_LDO_LOX10:
499 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDO_LOX10];
500
501 case BFD_RELOC_SPARC_TLS_LDO_ADD:
502 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LDO_ADD];
503
504 case BFD_RELOC_SPARC_TLS_IE_HI22:
505 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_HI22];
506
507 case BFD_RELOC_SPARC_TLS_IE_LO10:
508 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_LO10];
509
510 case BFD_RELOC_SPARC_TLS_IE_LD:
511 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_LD];
512
513 case BFD_RELOC_SPARC_TLS_IE_LDX:
514 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_LDX];
515
516 case BFD_RELOC_SPARC_TLS_IE_ADD:
517 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_IE_ADD];
518
519 case BFD_RELOC_SPARC_TLS_LE_HIX22:
520 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LE_HIX22];
521
522 case BFD_RELOC_SPARC_TLS_LE_LOX10:
523 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_LE_LOX10];
524
525 case BFD_RELOC_SPARC_TLS_DTPMOD32:
526 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_DTPMOD32];
527
528 case BFD_RELOC_SPARC_TLS_DTPMOD64:
529 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_DTPMOD64];
530
531 case BFD_RELOC_SPARC_TLS_DTPOFF32:
532 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_DTPOFF32];
533
534 case BFD_RELOC_SPARC_TLS_DTPOFF64:
535 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_DTPOFF64];
536
537 case BFD_RELOC_SPARC_TLS_TPOFF32:
538 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_TPOFF32];
539
540 case BFD_RELOC_SPARC_TLS_TPOFF64:
541 return &_bfd_sparc_elf_howto_table[R_SPARC_TLS_TPOFF64];
542
543 case BFD_RELOC_SPARC_GOTDATA_HIX22:
544 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_HIX22];
545
546 case BFD_RELOC_SPARC_GOTDATA_LOX10:
547 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_LOX10];
548
549 case BFD_RELOC_SPARC_GOTDATA_OP_HIX22:
550 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_OP_HIX22];
551
552 case BFD_RELOC_SPARC_GOTDATA_OP_LOX10:
553 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_OP_LOX10];
554
555 case BFD_RELOC_SPARC_GOTDATA_OP:
556 return &_bfd_sparc_elf_howto_table[R_SPARC_GOTDATA_OP];
557
2615994e
DM		 558 case BFD_RELOC_SPARC_H34:
559 return &_bfd_sparc_elf_howto_table[R_SPARC_H34];
560
561 case BFD_RELOC_SPARC_SIZE32:
562 return &_bfd_sparc_elf_howto_table[R_SPARC_SIZE32];
563
564 case BFD_RELOC_SPARC_SIZE64:
565 return &_bfd_sparc_elf_howto_table[R_SPARC_SIZE64];
566
567 case BFD_RELOC_SPARC_WDISP10:
568 return &_bfd_sparc_elf_howto_table[R_SPARC_WDISP10];
569
d0c9aeb3
DM		 570 case BFD_RELOC_SPARC_JMP_IREL:
571 return &sparc_jmp_irel_howto;
572
573 case BFD_RELOC_SPARC_IRELATIVE:
574 return &sparc_irelative_howto;
575
22b75d0a
DM		 576 case BFD_RELOC_VTABLE_INHERIT:
577 return &sparc_vtinherit_howto;
578
579 case BFD_RELOC_VTABLE_ENTRY:
580 return &sparc_vtentry_howto;
581
582 case BFD_RELOC_SPARC_REV32:
583 return &sparc_rev32_howto;
584
585 default:
679b7c76 586 break;
22b75d0a 587 }
f3185997 588 /* xgettext:c-format */
e8f5af78 589 _bfd_error_handler (_("%pB: unsupported relocation type %#x"), abfd, (int) code);
f3185997
NC		 590 bfd_set_error (bfd_error_bad_value);
591 return NULL;
22b75d0a
DM		 592}
593
157090f7
AM		 594reloc_howto_type *
595_bfd_sparc_elf_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
596 const char *r_name)
597{
598 unsigned int i;
599
f3185997 600 for (i = 0; i < ARRAY_SIZE (_bfd_sparc_elf_howto_table); i++)
157090f7
AM		 601 if (_bfd_sparc_elf_howto_table[i].name != NULL
602 && strcasecmp (_bfd_sparc_elf_howto_table[i].name, r_name) == 0)
603 return &_bfd_sparc_elf_howto_table[i];
604
605 if (strcasecmp (sparc_vtinherit_howto.name, r_name) == 0)
606 return &sparc_vtinherit_howto;
607 if (strcasecmp (sparc_vtentry_howto.name, r_name) == 0)
608 return &sparc_vtentry_howto;
609 if (strcasecmp (sparc_rev32_howto.name, r_name) == 0)
610 return &sparc_rev32_howto;
611
612 return NULL;
613}
614
22b75d0a 615reloc_howto_type *
f3185997
NC		 616_bfd_sparc_elf_info_to_howto_ptr (bfd *abfd ATTRIBUTE_UNUSED,
617 unsigned int r_type)
22b75d0a
DM		 618{
619 switch (r_type)
620 {
d0c9aeb3
DM		 621 case R_SPARC_JMP_IREL:
622 return &sparc_jmp_irel_howto;
623
624 case R_SPARC_IRELATIVE:
625 return &sparc_irelative_howto;
626
22b75d0a
DM		 627 case R_SPARC_GNU_VTINHERIT:
628 return &sparc_vtinherit_howto;
629
630 case R_SPARC_GNU_VTENTRY:
631 return &sparc_vtentry_howto;
632
633 case R_SPARC_REV32:
634 return &sparc_rev32_howto;
635
636 default:
d0fb9a8d
JJ		 637 if (r_type >= (unsigned int) R_SPARC_max_std)
638 {
0aa13fee
AM		 639 _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
640 abfd, r_type);
f3185997
NC		 641 bfd_set_error (bfd_error_bad_value);
642 return NULL;
d0fb9a8d 643 }
22b75d0a
DM		 644 return &_bfd_sparc_elf_howto_table[r_type];
645 }
646}
647
648/* Both 32-bit and 64-bit sparc encode this in an identical manner,
649 so just take advantage of that. */
650#define SPARC_ELF_R_TYPE(r_info) \
651 ((r_info) & 0xff)
652
f3185997 653bfd_boolean
0aa13fee 654_bfd_sparc_elf_info_to_howto (bfd *abfd, arelent *cache_ptr,
22b75d0a
DM		 655 Elf_Internal_Rela *dst)
656{
657 unsigned int r_type = SPARC_ELF_R_TYPE (dst->r_info);
658
f3185997
NC		 659 if ((cache_ptr->howto = _bfd_sparc_elf_info_to_howto_ptr (abfd, r_type)) == NULL)
660 {
f3185997
NC		 661 bfd_set_error (bfd_error_bad_value);
662 return FALSE;
663 }
664 return TRUE;
22b75d0a
DM		 665}
666\f
667
668/* The nop opcode we use. */
669#define SPARC_NOP 0x01000000
670
671#define SPARC_INSN_BYTES 4
672
bb1dd176
QZ		 673/* Is an undefined weak symbol resolved to 0 ?
674 Reference to an undefined weak symbol is resolved to 0 when
675 building an executable if it isn't dynamic and
676 1. Has non-GOT/non-PLT relocations in text section.
677 Or
678 2. Has no GOT/PLT relocation. */
07d6d2b8
AM		 679#define UNDEFINED_WEAK_RESOLVED_TO_ZERO(INFO, EH) \
680 ((EH)->elf.root.type == bfd_link_hash_undefweak \
681 && bfd_link_executable (INFO) \
682 && (_bfd_sparc_elf_hash_table (INFO)->interp == NULL \
a8735c82 683 || !(INFO)->dynamic_undefined_weak \
07d6d2b8 684 || (EH)->has_non_got_reloc \
a8735c82 685 || !(EH)->has_got_reloc))
bb1dd176 686
22b75d0a
DM		 687/* SPARC ELF linker hash entry. */
688
689struct _bfd_sparc_elf_link_hash_entry
690{
691 struct elf_link_hash_entry elf;
692
22b75d0a
DM		 693#define GOT_UNKNOWN 0
694#define GOT_NORMAL 1
695#define GOT_TLS_GD 2
696#define GOT_TLS_IE 3
697 unsigned char tls_type;
bb1dd176 698
f8745e1c 699 /* Symbol has GOT or PLT relocations. */
bb1dd176
QZ		 700 unsigned int has_got_reloc : 1;
701
f8745e1c
EB		 702 /* Symbol has old-style, non-relaxable GOT relocations. */
703 unsigned int has_old_style_got_reloc : 1;
704
bb1dd176
QZ		 705 /* Symbol has non-GOT/non-PLT relocations in text sections. */
706 unsigned int has_non_got_reloc : 1;
707
22b75d0a
DM		 708};
709
710#define _bfd_sparc_elf_hash_entry(ent) ((struct _bfd_sparc_elf_link_hash_entry *)(ent))
711
712struct _bfd_sparc_elf_obj_tdata
713{
714 struct elf_obj_tdata root;
715
716 /* tls_type for each local got entry. */
717 char *local_got_tls_type;
718
719 /* TRUE if TLS GD relocs has been seen for this object. */
720 bfd_boolean has_tlsgd;
721};
722
723#define _bfd_sparc_elf_tdata(abfd) \
724 ((struct _bfd_sparc_elf_obj_tdata *) (abfd)->tdata.any)
725
726#define _bfd_sparc_elf_local_got_tls_type(abfd) \
727 (_bfd_sparc_elf_tdata (abfd)->local_got_tls_type)
728
0ffa91dd
NC		 729#define is_sparc_elf(bfd) \
730 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
731 && elf_tdata (bfd) != NULL \
4dfe6ac6 732 && elf_object_id (bfd) == SPARC_ELF_DATA)
0ffa91dd 733
22b75d0a
DM		 734bfd_boolean
735_bfd_sparc_elf_mkobject (bfd *abfd)
736{
0ffa91dd 737 return bfd_elf_allocate_object (abfd, sizeof (struct _bfd_sparc_elf_obj_tdata),
4dfe6ac6 738 SPARC_ELF_DATA);
22b75d0a
DM		 739}
740
741static void
91d6fa6a 742sparc_put_word_32 (bfd *abfd, bfd_vma val, void *ptr)
22b75d0a 743{
91d6fa6a 744 bfd_put_32 (abfd, val, ptr);
22b75d0a
DM		 745}
746
747static void
91d6fa6a 748sparc_put_word_64 (bfd *abfd, bfd_vma val, void *ptr)
22b75d0a 749{
91d6fa6a 750 bfd_put_64 (abfd, val, ptr);
22b75d0a
DM		 751}
752
753static void
39817122 754sparc_elf_append_rela (bfd *abfd, asection *s, Elf_Internal_Rela *rel)
22b75d0a 755{
39817122
RS		 756 const struct elf_backend_data *bed;
757 bfd_byte *loc;
22b75d0a 758
39817122 759 bed = get_elf_backend_data (abfd);
a8735c82 760 BFD_ASSERT (s->reloc_count * bed->s->sizeof_rela < s->size);
39817122
RS		 761 loc = s->contents + (s->reloc_count++ * bed->s->sizeof_rela);
762 bed->s->swap_reloca_out (abfd, rel, loc);
22b75d0a
DM		 763}
764
765static bfd_vma
e459dc7b 766sparc_elf_r_info_64 (Elf_Internal_Rela *in_rel ATTRIBUTE_UNUSED,
91d6fa6a 767 bfd_vma rel_index ATTRIBUTE_UNUSED,
e459dc7b 768 bfd_vma type ATTRIBUTE_UNUSED)
22b75d0a 769{
91d6fa6a 770 return ELF64_R_INFO (rel_index,
22b75d0a
DM		 771 (in_rel ?
772 ELF64_R_TYPE_INFO (ELF64_R_TYPE_DATA (in_rel->r_info),
773 type) : type));
774}
775
776static bfd_vma
777sparc_elf_r_info_32 (Elf_Internal_Rela *in_rel ATTRIBUTE_UNUSED,
91d6fa6a 778 bfd_vma rel_index, bfd_vma type)
22b75d0a 779{
91d6fa6a 780 return ELF32_R_INFO (rel_index, type);
22b75d0a
DM		 781}
782
783static bfd_vma
784sparc_elf_r_symndx_64 (bfd_vma r_info)
785{
e8be8da4
DM		 786 bfd_vma r_symndx = ELF32_R_SYM (r_info);
787 return (r_symndx >> 24);
22b75d0a
DM		 788}
789
790static bfd_vma
791sparc_elf_r_symndx_32 (bfd_vma r_info)
792{
793 return ELF32_R_SYM (r_info);
794}
795
796/* PLT/GOT stuff */
797
798#define PLT32_ENTRY_SIZE 12
799#define PLT32_HEADER_SIZE (4 * PLT32_ENTRY_SIZE)
800
801/* The first four entries in a 32-bit procedure linkage table are reserved,
802 and the initial contents are unimportant (we zero them out).
803 Subsequent entries look like this. See the SVR4 ABI SPARC
804 supplement to see how this works. */
805
806/* sethi %hi(.-.plt0),%g1. We fill in the address later. */
807#define PLT32_ENTRY_WORD0 0x03000000
808/* b,a .plt0. We fill in the offset later. */
809#define PLT32_ENTRY_WORD1 0x30800000
810/* nop. */
811#define PLT32_ENTRY_WORD2 SPARC_NOP
812
813static int
814sparc32_plt_entry_build (bfd *output_bfd, asection *splt, bfd_vma offset,
815 bfd_vma max ATTRIBUTE_UNUSED,
816 bfd_vma *r_offset)
817{
818 bfd_put_32 (output_bfd,
819 PLT32_ENTRY_WORD0 + offset,
820 splt->contents + offset);
821 bfd_put_32 (output_bfd,
822 (PLT32_ENTRY_WORD1
823 + (((- (offset + 4)) >> 2) & 0x3fffff)),
824 splt->contents + offset + 4);
825 bfd_put_32 (output_bfd, (bfd_vma) PLT32_ENTRY_WORD2,
826 splt->contents + offset + 8);
827
828 *r_offset = offset;
829
830 return offset / PLT32_ENTRY_SIZE - 4;
831}
832
833/* Both the headers and the entries are icache aligned. */
834#define PLT64_ENTRY_SIZE 32
835#define PLT64_HEADER_SIZE (4 * PLT64_ENTRY_SIZE)
836#define PLT64_LARGE_THRESHOLD 32768
837
838static int
839sparc64_plt_entry_build (bfd *output_bfd, asection *splt, bfd_vma offset,
840 bfd_vma max, bfd_vma *r_offset)
841{
842 unsigned char *entry = splt->contents + offset;
843 const unsigned int nop = SPARC_NOP;
91d6fa6a 844 int plt_index;
22b75d0a
DM		 845
846 if (offset < (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE))
847 {
848 unsigned int sethi, ba;
849
850 *r_offset = offset;
851
91d6fa6a 852 plt_index = (offset / PLT64_ENTRY_SIZE);
22b75d0a 853
91d6fa6a 854 sethi = 0x03000000 | (plt_index * PLT64_ENTRY_SIZE);
22b75d0a
DM		 855 ba = 0x30680000
856 | (((splt->contents + PLT64_ENTRY_SIZE) - (entry + 4)) / 4 & 0x7ffff);
857
858 bfd_put_32 (output_bfd, (bfd_vma) sethi, entry);
859 bfd_put_32 (output_bfd, (bfd_vma) ba, entry + 4);
860 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 8);
861 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 12);
862 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 16);
863 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 20);
864 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 24);
865 bfd_put_32 (output_bfd, (bfd_vma) nop, entry + 28);
866 }
867 else
868 {
869 unsigned char *ptr;
870 unsigned int ldx;
871 int block, last_block, ofs, last_ofs, chunks_this_block;
872 const int insn_chunk_size = (6 * 4);
873 const int ptr_chunk_size = (1 * 8);
874 const int entries_per_block = 160;
875 const int block_size = entries_per_block * (insn_chunk_size
876 + ptr_chunk_size);
877
878 /* Entries 32768 and higher are grouped into blocks of 160.
879 The blocks are further subdivided into 160 sequences of
880 6 instructions and 160 pointers. If a block does not require
881 the full 160 entries, let's say it requires N, then there
882 will be N sequences of 6 instructions and N pointers. */
883
884 offset -= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE);
885 max -= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE);
886
887 block = offset / block_size;
888 last_block = max / block_size;
889 if (block != last_block)
890 {
891 chunks_this_block = 160;
892 }
893 else
894 {
895 last_ofs = max % block_size;
896 chunks_this_block = last_ofs / (insn_chunk_size + ptr_chunk_size);
897 }
898
899 ofs = offset % block_size;
900
91d6fa6a 901 plt_index = (PLT64_LARGE_THRESHOLD +
22b75d0a
DM		 902 (block * 160) +
903 (ofs / insn_chunk_size));
904
905 ptr = splt->contents
906 + (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE)
907 + (block * block_size)
908 + (chunks_this_block * insn_chunk_size)
909 + (ofs / insn_chunk_size) * ptr_chunk_size;
910
911 *r_offset = (bfd_vma) (ptr - splt->contents);
912
913 ldx = 0xc25be000 | ((ptr - (entry+4)) & 0x1fff);
914
915 /* mov %o7,%g5
916 call .+8
917 nop
918 ldx [%o7+P],%g1
919 jmpl %o7+%g1,%g1
920 mov %g5,%o7 */
921 bfd_put_32 (output_bfd, (bfd_vma) 0x8a10000f, entry);
922 bfd_put_32 (output_bfd, (bfd_vma) 0x40000002, entry + 4);
923 bfd_put_32 (output_bfd, (bfd_vma) SPARC_NOP, entry + 8);
07d6d2b8 924 bfd_put_32 (output_bfd, (bfd_vma) ldx, entry + 12);
22b75d0a
DM		 925 bfd_put_32 (output_bfd, (bfd_vma) 0x83c3c001, entry + 16);
926 bfd_put_32 (output_bfd, (bfd_vma) 0x9e100005, entry + 20);
927
928 bfd_put_64 (output_bfd, (bfd_vma) (splt->contents - (entry + 4)), ptr);
929 }
930
91d6fa6a 931 return plt_index - 4;
22b75d0a
DM		 932}
933
910600e9
RS		 934/* The format of the first PLT entry in a VxWorks executable. */
935static const bfd_vma sparc_vxworks_exec_plt0_entry[] =
936 {
937 0x05000000, /* sethi %hi(_GLOBAL_OFFSET_TABLE_+8), %g2 */
938 0x8410a000, /* or %g2, %lo(_GLOBAL_OFFSET_TABLE_+8), %g2 */
939 0xc4008000, /* ld [ %g2 ], %g2 */
940 0x81c08000, /* jmp %g2 */
941 0x01000000 /* nop */
942 };
943
944/* The format of subsequent PLT entries. */
945static const bfd_vma sparc_vxworks_exec_plt_entry[] =
946 {
947 0x03000000, /* sethi %hi(_GLOBAL_OFFSET_TABLE_+f@got), %g1 */
948 0x82106000, /* or %g1, %lo(_GLOBAL_OFFSET_TABLE_+f@got), %g1 */
949 0xc2004000, /* ld [ %g1 ], %g1 */
950 0x81c04000, /* jmp %g1 */
951 0x01000000, /* nop */
952 0x03000000, /* sethi %hi(f@pltindex), %g1 */
953 0x10800000, /* b _PLT_resolve */
954 0x82106000 /* or %g1, %lo(f@pltindex), %g1 */
955 };
956
957/* The format of the first PLT entry in a VxWorks shared object. */
958static const bfd_vma sparc_vxworks_shared_plt0_entry[] =
959 {
960 0xc405e008, /* ld [ %l7 + 8 ], %g2 */
961 0x81c08000, /* jmp %g2 */
962 0x01000000 /* nop */
963 };
964
965/* The format of subsequent PLT entries. */
966static const bfd_vma sparc_vxworks_shared_plt_entry[] =
967 {
968 0x03000000, /* sethi %hi(f@got), %g1 */
969 0x82106000, /* or %g1, %lo(f@got), %g1 */
970 0xc205c001, /* ld [ %l7 + %g1 ], %g1 */
971 0x81c04000, /* jmp %g1 */
972 0x01000000, /* nop */
973 0x03000000, /* sethi %hi(f@pltindex), %g1 */
974 0x10800000, /* b _PLT_resolve */
975 0x82106000 /* or %g1, %lo(f@pltindex), %g1 */
976 };
977
22b75d0a
DM		 978#define SPARC_ELF_PUT_WORD(htab, bfd, val, ptr) \
979 htab->put_word(bfd, val, ptr)
980
22b75d0a
DM		 981#define SPARC_ELF_R_INFO(htab, in_rel, index, type) \
982 htab->r_info(in_rel, index, type)
983
984#define SPARC_ELF_R_SYMNDX(htab, r_info) \
985 htab->r_symndx(r_info)
986
987#define SPARC_ELF_WORD_BYTES(htab) \
988 htab->bytes_per_word
989
990#define SPARC_ELF_RELA_BYTES(htab) \
991 htab->bytes_per_rela
992
993#define SPARC_ELF_DTPOFF_RELOC(htab) \
994 htab->dtpoff_reloc
995
996#define SPARC_ELF_DTPMOD_RELOC(htab) \
997 htab->dtpmod_reloc
998
999#define SPARC_ELF_TPOFF_RELOC(htab) \
1000 htab->tpoff_reloc
1001
1002#define SPARC_ELF_BUILD_PLT_ENTRY(htab, obfd, splt, off, max, r_off) \
1003 htab->build_plt_entry (obfd, splt, off, max, r_off)
1004
1005/* Create an entry in an SPARC ELF linker hash table. */
1006
1007static struct bfd_hash_entry *
1008link_hash_newfunc (struct bfd_hash_entry *entry,
1009 struct bfd_hash_table *table, const char *string)
1010{
1011 /* Allocate the structure if it has not already been allocated by a
1012 subclass. */
1013 if (entry == NULL)
1014 {
1015 entry = bfd_hash_allocate (table,
1016 sizeof (struct _bfd_sparc_elf_link_hash_entry));
1017 if (entry == NULL)
1018 return entry;
1019 }
1020
1021 /* Call the allocation method of the superclass. */
1022 entry = _bfd_elf_link_hash_newfunc (entry, table, string);
1023 if (entry != NULL)
1024 {
1025 struct _bfd_sparc_elf_link_hash_entry *eh;
1026
1027 eh = (struct _bfd_sparc_elf_link_hash_entry *) entry;
22b75d0a 1028 eh->tls_type = GOT_UNKNOWN;
bb1dd176
QZ		 1029 eh->has_got_reloc = 0;
1030 eh->has_non_got_reloc = 0;
22b75d0a
DM		 1031 }
1032
1033 return entry;
1034}
1035
1036/* The name of the dynamic interpreter. This is put in the .interp
1037 section. */
1038
1039#define ELF32_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
1040#define ELF64_DYNAMIC_INTERPRETER "/usr/lib/sparcv9/ld.so.1"
1041
d0c9aeb3
DM		 1042/* Compute a hash of a local hash entry. We use elf_link_hash_entry
1043 for local symbol so that we can handle local STT_GNU_IFUNC symbols
1044 as global symbol. We reuse indx and dynstr_index for local symbol
1045 hash since they aren't used by global symbols in this backend. */
1046
1047static hashval_t
1048elf_sparc_local_htab_hash (const void *ptr)
1049{
1050 struct elf_link_hash_entry *h
1051 = (struct elf_link_hash_entry *) ptr;
1052 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
1053}
1054
1055/* Compare local hash entries. */
1056
1057static int
1058elf_sparc_local_htab_eq (const void *ptr1, const void *ptr2)
1059{
1060 struct elf_link_hash_entry *h1
1061 = (struct elf_link_hash_entry *) ptr1;
1062 struct elf_link_hash_entry *h2
1063 = (struct elf_link_hash_entry *) ptr2;
1064
1065 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
1066}
1067
1068/* Find and/or create a hash entry for local symbol. */
1069
1070static struct elf_link_hash_entry *
1071elf_sparc_get_local_sym_hash (struct _bfd_sparc_elf_link_hash_table *htab,
1072 bfd *abfd, const Elf_Internal_Rela *rel,
1073 bfd_boolean create)
1074{
1075 struct _bfd_sparc_elf_link_hash_entry e, *ret;
1076 asection *sec = abfd->sections;
1077 unsigned long r_symndx;
1078 hashval_t h;
1079 void **slot;
1080
1081 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
1082 h = ELF_LOCAL_SYMBOL_HASH (sec->id, r_symndx);
1083
1084 e.elf.indx = sec->id;
1085 e.elf.dynstr_index = r_symndx;
1086 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
1087 create ? INSERT : NO_INSERT);
1088
1089 if (!slot)
1090 return NULL;
1091
1092 if (*slot)
1093 {
1094 ret = (struct _bfd_sparc_elf_link_hash_entry *) *slot;
1095 return &ret->elf;
1096 }
1097
1098 ret = (struct _bfd_sparc_elf_link_hash_entry *)
1099 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
1100 sizeof (struct _bfd_sparc_elf_link_hash_entry));
1101 if (ret)
1102 {
1103 memset (ret, 0, sizeof (*ret));
1104 ret->elf.indx = sec->id;
1105 ret->elf.dynstr_index = r_symndx;
1106 ret->elf.dynindx = -1;
1107 ret->elf.plt.offset = (bfd_vma) -1;
1108 ret->elf.got.offset = (bfd_vma) -1;
1109 *slot = ret;
1110 }
1111 return &ret->elf;
1112}
1113
68faa637
AM		 1114/* Destroy a SPARC ELF linker hash table. */
1115
d495ab0d
AM		 1116static void
1117_bfd_sparc_elf_link_hash_table_free (bfd *obfd)
68faa637
AM		 1118{
1119 struct _bfd_sparc_elf_link_hash_table *htab
d495ab0d 1120 = (struct _bfd_sparc_elf_link_hash_table *) obfd->link.hash;
68faa637
AM		 1121
1122 if (htab->loc_hash_table)
1123 htab_delete (htab->loc_hash_table);
1124 if (htab->loc_hash_memory)
1125 objalloc_free ((struct objalloc *) htab->loc_hash_memory);
d495ab0d 1126 _bfd_elf_link_hash_table_free (obfd);
68faa637
AM		 1127}
1128
22b75d0a
DM		 1129/* Create a SPARC ELF linker hash table. */
1130
1131struct bfd_link_hash_table *
1132_bfd_sparc_elf_link_hash_table_create (bfd *abfd)
1133{
1134 struct _bfd_sparc_elf_link_hash_table *ret;
986f0783 1135 size_t amt = sizeof (struct _bfd_sparc_elf_link_hash_table);
22b75d0a
DM		 1136
1137 ret = (struct _bfd_sparc_elf_link_hash_table *) bfd_zmalloc (amt);
1138 if (ret == NULL)
1139 return NULL;
1140
1141 if (ABI_64_P (abfd))
1142 {
1143 ret->put_word = sparc_put_word_64;
22b75d0a
DM		 1144 ret->r_info = sparc_elf_r_info_64;
1145 ret->r_symndx = sparc_elf_r_symndx_64;
22b75d0a
DM		 1146 ret->dtpoff_reloc = R_SPARC_TLS_DTPOFF64;
1147 ret->dtpmod_reloc = R_SPARC_TLS_DTPMOD64;
1148 ret->tpoff_reloc = R_SPARC_TLS_TPOFF64;
1149 ret->word_align_power = 3;
1150 ret->align_power_max = 4;
1151 ret->bytes_per_word = 8;
1152 ret->bytes_per_rela = sizeof (Elf64_External_Rela);
c2e70a82 1153 ret->dynamic_interpreter = ELF64_DYNAMIC_INTERPRETER;
22b75d0a 1154 ret->dynamic_interpreter_size = sizeof ELF64_DYNAMIC_INTERPRETER;
d0c9aeb3
DM		 1155
1156 ret->build_plt_entry = sparc64_plt_entry_build;
1157 ret->plt_header_size = PLT64_HEADER_SIZE;
1158 ret->plt_entry_size = PLT64_ENTRY_SIZE;
22b75d0a
DM		 1159 }
1160 else
1161 {
1162 ret->put_word = sparc_put_word_32;
22b75d0a
DM		 1163 ret->r_info = sparc_elf_r_info_32;
1164 ret->r_symndx = sparc_elf_r_symndx_32;
22b75d0a
DM		 1165 ret->dtpoff_reloc = R_SPARC_TLS_DTPOFF32;
1166 ret->dtpmod_reloc = R_SPARC_TLS_DTPMOD32;
1167 ret->tpoff_reloc = R_SPARC_TLS_TPOFF32;
1168 ret->word_align_power = 2;
1169 ret->align_power_max = 3;
1170 ret->bytes_per_word = 4;
1171 ret->bytes_per_rela = sizeof (Elf32_External_Rela);
c2e70a82 1172 ret->dynamic_interpreter = ELF32_DYNAMIC_INTERPRETER;
22b75d0a 1173 ret->dynamic_interpreter_size = sizeof ELF32_DYNAMIC_INTERPRETER;
d0c9aeb3
DM		 1174
1175 ret->build_plt_entry = sparc32_plt_entry_build;
1176 ret->plt_header_size = PLT32_HEADER_SIZE;
1177 ret->plt_entry_size = PLT32_ENTRY_SIZE;
22b75d0a
DM		 1178 }
1179
66eb6687 1180 if (!_bfd_elf_link_hash_table_init (&ret->elf, abfd, link_hash_newfunc,
4dfe6ac6
NC		 1181 sizeof (struct _bfd_sparc_elf_link_hash_entry),
1182 SPARC_ELF_DATA))
22b75d0a
DM		 1183 {
1184 free (ret);
1185 return NULL;
1186 }
1187
d0c9aeb3
DM		 1188 ret->loc_hash_table = htab_try_create (1024,
1189 elf_sparc_local_htab_hash,
1190 elf_sparc_local_htab_eq,
1191 NULL);
1192 ret->loc_hash_memory = objalloc_create ();
1193 if (!ret->loc_hash_table || !ret->loc_hash_memory)
1194 {
d495ab0d 1195 _bfd_sparc_elf_link_hash_table_free (abfd);
d0c9aeb3
DM		 1196 return NULL;
1197 }
d495ab0d 1198 ret->elf.root.hash_table_free = _bfd_sparc_elf_link_hash_table_free;
d0c9aeb3 1199
22b75d0a
DM		 1200 return &ret->elf.root;
1201}
1202
22b75d0a
DM		 1203/* Create .plt, .rela.plt, .got, .rela.got, .dynbss, and
1204 .rela.bss sections in DYNOBJ, and set up shortcuts to them in our
1205 hash table. */
1206
1207bfd_boolean
1208_bfd_sparc_elf_create_dynamic_sections (bfd *dynobj,
1209 struct bfd_link_info *info)
1210{
1211 struct _bfd_sparc_elf_link_hash_table *htab;
1212
1213 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6
NC		 1214 BFD_ASSERT (htab != NULL);
1215
22b75d0a
DM		 1216 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
1217 return FALSE;
1218
910600e9
RS		 1219 if (htab->is_vxworks)
1220 {
1221 if (!elf_vxworks_create_dynamic_sections (dynobj, info, &htab->srelplt2))
1222 return FALSE;
0e1862bb 1223 if (bfd_link_pic (info))
910600e9
RS		 1224 {
1225 htab->plt_header_size
1226 = 4 * ARRAY_SIZE (sparc_vxworks_shared_plt0_entry);
1227 htab->plt_entry_size
1228 = 4 * ARRAY_SIZE (sparc_vxworks_shared_plt_entry);
1229 }
1230 else
1231 {
1232 htab->plt_header_size
1233 = 4 * ARRAY_SIZE (sparc_vxworks_exec_plt0_entry);
1234 htab->plt_entry_size
1235 = 4 * ARRAY_SIZE (sparc_vxworks_exec_plt_entry);
1236 }
1237 }
910600e9 1238
9d19e4fd
AM		 1239 if (!htab->elf.splt || !htab->elf.srelplt || !htab->elf.sdynbss
1240 || (!bfd_link_pic (info) && !htab->elf.srelbss))
22b75d0a
DM		 1241 abort ();
1242
1243 return TRUE;
1244}
1245
d0c9aeb3
DM		 1246static bfd_boolean
1247create_ifunc_sections (bfd *abfd, struct bfd_link_info *info)
1248{
1249 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
1250 struct elf_link_hash_table *htab = elf_hash_table (info);
1251 flagword flags, pltflags;
1252 asection *s;
1253
1254 if (htab->irelifunc != NULL || htab->iplt != NULL)
1255 return TRUE;
1256
1257 flags = bed->dynamic_sec_flags;
1258 pltflags = flags | SEC_ALLOC | SEC_CODE | SEC_LOAD;
1259
1260 s = bfd_make_section_with_flags (abfd, ".iplt", pltflags);
1261 if (s == NULL
fd361982 1262 || !bfd_set_section_alignment (s, bed->plt_alignment))
d0c9aeb3
DM		 1263 return FALSE;
1264 htab->iplt = s;
1265
1266 s = bfd_make_section_with_flags (abfd, ".rela.iplt",
1267 flags | SEC_READONLY);
1268 if (s == NULL
fd361982 1269 || !bfd_set_section_alignment (s, bed->s->log_file_align))
d0c9aeb3
DM		 1270 return FALSE;
1271 htab->irelplt = s;
1272
1273 return TRUE;
1274}
1275
22b75d0a
DM		 1276/* Copy the extra info we tack onto an elf_link_hash_entry. */
1277
1278void
fcfa13d2 1279_bfd_sparc_elf_copy_indirect_symbol (struct bfd_link_info *info,
22b75d0a
DM		 1280 struct elf_link_hash_entry *dir,
1281 struct elf_link_hash_entry *ind)
1282{
1283 struct _bfd_sparc_elf_link_hash_entry *edir, *eind;
1284
1285 edir = (struct _bfd_sparc_elf_link_hash_entry *) dir;
1286 eind = (struct _bfd_sparc_elf_link_hash_entry *) ind;
1287
190eb1dd 1288 if (ind->dyn_relocs != NULL)
22b75d0a 1289 {
190eb1dd 1290 if (dir->dyn_relocs != NULL)
22b75d0a 1291 {
3bf083ed
AM		 1292 struct elf_dyn_relocs **pp;
1293 struct elf_dyn_relocs *p;
22b75d0a 1294
fcfa13d2 1295 /* Add reloc counts against the indirect sym to the direct sym
22b75d0a 1296 list. Merge any entries against the same section. */
190eb1dd 1297 for (pp = &ind->dyn_relocs; (p = *pp) != NULL; )
22b75d0a 1298 {
3bf083ed 1299 struct elf_dyn_relocs *q;
22b75d0a 1300
190eb1dd 1301 for (q = dir->dyn_relocs; q != NULL; q = q->next)
22b75d0a
DM		 1302 if (q->sec == p->sec)
1303 {
1304 q->pc_count += p->pc_count;
1305 q->count += p->count;
1306 *pp = p->next;
1307 break;
1308 }
1309 if (q == NULL)
1310 pp = &p->next;
1311 }
190eb1dd 1312 *pp = dir->dyn_relocs;
22b75d0a
DM		 1313 }
1314
190eb1dd
L		 1315 dir->dyn_relocs = ind->dyn_relocs;
1316 ind->dyn_relocs = NULL;
22b75d0a
DM		 1317 }
1318
a8735c82 1319 if (ind->root.type == bfd_link_hash_indirect && dir->got.refcount <= 0)
22b75d0a
DM		 1320 {
1321 edir->tls_type = eind->tls_type;
1322 eind->tls_type = GOT_UNKNOWN;
1323 }
bb1dd176
QZ		 1324
1325 /* Copy has_got_reloc and has_non_got_reloc. */
1326 edir->has_got_reloc |= eind->has_got_reloc;
1327 edir->has_non_got_reloc |= eind->has_non_got_reloc;
1328
fcfa13d2 1329 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
22b75d0a
DM		 1330}
1331
1332static int
1333sparc_elf_tls_transition (struct bfd_link_info *info, bfd *abfd,
1334 int r_type, int is_local)
1335{
1336 if (! ABI_64_P (abfd)
1337 && r_type == R_SPARC_TLS_GD_HI22
1338 && ! _bfd_sparc_elf_tdata (abfd)->has_tlsgd)
c20c30f6 1339 return R_SPARC_REV32;
22b75d0a 1340
c20c30f6 1341 if (!bfd_link_executable (info))
22b75d0a
DM		 1342 return r_type;
1343
1344 switch (r_type)
1345 {
1346 case R_SPARC_TLS_GD_HI22:
c20c30f6 1347 return is_local ? R_SPARC_TLS_LE_HIX22 : R_SPARC_TLS_IE_HI22;
22b75d0a 1348 case R_SPARC_TLS_GD_LO10:
c20c30f6 1349 return is_local ? R_SPARC_TLS_LE_LOX10 : R_SPARC_TLS_IE_LO10;
22b75d0a
DM		 1350 case R_SPARC_TLS_LDM_HI22:
1351 return R_SPARC_TLS_LE_HIX22;
1352 case R_SPARC_TLS_LDM_LO10:
1353 return R_SPARC_TLS_LE_LOX10;
c20c30f6
EB		 1354 case R_SPARC_TLS_IE_HI22:
1355 return is_local ? R_SPARC_TLS_LE_HIX22 : r_type;
1356 case R_SPARC_TLS_IE_LO10:
1357 return is_local ? R_SPARC_TLS_LE_LOX10 : r_type;
22b75d0a
DM		 1358 }
1359
1360 return r_type;
1361}
1362\f
1363/* Look through the relocs for a section during the first phase, and
1364 allocate space in the global offset table or procedure linkage
1365 table. */
1366
1367bfd_boolean
1368_bfd_sparc_elf_check_relocs (bfd *abfd, struct bfd_link_info *info,
1369 asection *sec, const Elf_Internal_Rela *relocs)
1370{
1371 struct _bfd_sparc_elf_link_hash_table *htab;
1372 Elf_Internal_Shdr *symtab_hdr;
1373 struct elf_link_hash_entry **sym_hashes;
22b75d0a
DM		 1374 const Elf_Internal_Rela *rel;
1375 const Elf_Internal_Rela *rel_end;
1376 asection *sreloc;
1377 int num_relocs;
1378 bfd_boolean checked_tlsgd = FALSE;
1379
0e1862bb 1380 if (bfd_link_relocatable (info))
22b75d0a
DM		 1381 return TRUE;
1382
1383 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 1384 BFD_ASSERT (htab != NULL);
0ffa91dd 1385 symtab_hdr = &elf_symtab_hdr (abfd);
22b75d0a 1386 sym_hashes = elf_sym_hashes (abfd);
22b75d0a
DM		 1387
1388 sreloc = NULL;
1389
1390 if (ABI_64_P (abfd))
d4730f92 1391 num_relocs = NUM_SHDR_ENTRIES (_bfd_elf_single_rel_hdr (sec));
22b75d0a
DM		 1392 else
1393 num_relocs = sec->reloc_count;
0ffa91dd
NC		 1394
1395 BFD_ASSERT (is_sparc_elf (abfd) || num_relocs == 0);
1396
d0c9aeb3
DM		 1397 if (htab->elf.dynobj == NULL)
1398 htab->elf.dynobj = abfd;
1399 if (!create_ifunc_sections (htab->elf.dynobj, info))
1400 return FALSE;
1401
22b75d0a
DM		 1402 rel_end = relocs + num_relocs;
1403 for (rel = relocs; rel < rel_end; rel++)
1404 {
1405 unsigned int r_type;
d42c267e 1406 unsigned int r_symndx;
22b75d0a 1407 struct elf_link_hash_entry *h;
bb1dd176 1408 struct _bfd_sparc_elf_link_hash_entry *eh;
d0c9aeb3 1409 Elf_Internal_Sym *isym;
22b75d0a
DM		 1410
1411 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
1412 r_type = SPARC_ELF_R_TYPE (rel->r_info);
1413
1414 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
1415 {
695344c0 1416 /* xgettext:c-format */
871b3ab2 1417 _bfd_error_handler (_("%pB: bad symbol index: %d"), abfd, r_symndx);
22b75d0a
DM		 1418 return FALSE;
1419 }
1420
d0c9aeb3 1421 isym = NULL;
22b75d0a 1422 if (r_symndx < symtab_hdr->sh_info)
d0c9aeb3
DM		 1423 {
1424 /* A local symbol. */
c20c30f6 1425 isym = bfd_sym_from_r_symndx (&htab->sym_cache, abfd, r_symndx);
d0c9aeb3
DM		 1426 if (isym == NULL)
1427 return FALSE;
1428
1429 /* Check relocation against local STT_GNU_IFUNC symbol. */
1430 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
1431 {
c20c30f6 1432 h = elf_sparc_get_local_sym_hash (htab, abfd, rel, TRUE);
d0c9aeb3
DM		 1433 if (h == NULL)
1434 return FALSE;
68ffbac6 1435
d0c9aeb3
DM		 1436 /* Fake a STT_GNU_IFUNC symbol. */
1437 h->type = STT_GNU_IFUNC;
1438 h->def_regular = 1;
1439 h->ref_regular = 1;
1440 h->forced_local = 1;
1441 h->root.type = bfd_link_hash_defined;
1442 }
1443 else
1444 h = NULL;
1445 }
22b75d0a 1446 else
973a3492
L		 1447 {
1448 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
1449 while (h->root.type == bfd_link_hash_indirect
1450 || h->root.type == bfd_link_hash_warning)
1451 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1452 }
22b75d0a 1453
c20c30f6 1454 if (h && h->type == STT_GNU_IFUNC && h->def_regular)
d0c9aeb3 1455 {
c20c30f6
EB		 1456 h->ref_regular = 1;
1457 h->plt.refcount += 1;
d0c9aeb3
DM		 1458 }
1459
22b75d0a
DM		 1460 /* Compatibility with old R_SPARC_REV32 reloc conflicting
1461 with R_SPARC_TLS_GD_HI22. */
1462 if (! ABI_64_P (abfd) && ! checked_tlsgd)
1463 switch (r_type)
1464 {
1465 case R_SPARC_TLS_GD_HI22:
1466 {
1467 const Elf_Internal_Rela *relt;
1468
1469 for (relt = rel + 1; relt < rel_end; relt++)
1470 if (ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_LO10
1471 || ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_ADD
1472 || ELF32_R_TYPE (relt->r_info) == R_SPARC_TLS_GD_CALL)
1473 break;
1474 checked_tlsgd = TRUE;
1475 _bfd_sparc_elf_tdata (abfd)->has_tlsgd = relt < rel_end;
1476 }
1477 break;
1478 case R_SPARC_TLS_GD_LO10:
1479 case R_SPARC_TLS_GD_ADD:
1480 case R_SPARC_TLS_GD_CALL:
1481 checked_tlsgd = TRUE;
1482 _bfd_sparc_elf_tdata (abfd)->has_tlsgd = TRUE;
1483 break;
1484 }
1485
1486 r_type = sparc_elf_tls_transition (info, abfd, r_type, h == NULL);
bb1dd176
QZ		 1487 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
1488
22b75d0a
DM		 1489 switch (r_type)
1490 {
1491 case R_SPARC_TLS_LDM_HI22:
1492 case R_SPARC_TLS_LDM_LO10:
1493 htab->tls_ldm_got.refcount += 1;
07d6d2b8
AM		 1494 if (eh != NULL)
1495 eh->has_got_reloc = 1;
22b75d0a
DM		 1496 break;
1497
1498 case R_SPARC_TLS_LE_HIX22:
1499 case R_SPARC_TLS_LE_LOX10:
c20c30f6 1500 if (!bfd_link_executable (info))
22b75d0a
DM		 1501 goto r_sparc_plt32;
1502 break;
1503
1504 case R_SPARC_TLS_IE_HI22:
1505 case R_SPARC_TLS_IE_LO10:
c20c30f6 1506 if (!bfd_link_executable (info))
22b75d0a
DM		 1507 info->flags |= DF_STATIC_TLS;
1508 /* Fall through */
1509
1510 case R_SPARC_GOT10:
1511 case R_SPARC_GOT13:
1512 case R_SPARC_GOT22:
739f7f82
DM		 1513 case R_SPARC_GOTDATA_HIX22:
1514 case R_SPARC_GOTDATA_LOX10:
1515 case R_SPARC_GOTDATA_OP_HIX22:
1516 case R_SPARC_GOTDATA_OP_LOX10:
22b75d0a
DM		 1517 case R_SPARC_TLS_GD_HI22:
1518 case R_SPARC_TLS_GD_LO10:
1519 /* This symbol requires a global offset table entry. */
1520 {
1521 int tls_type, old_tls_type;
1522
1523 switch (r_type)
1524 {
22b75d0a
DM		 1525 case R_SPARC_TLS_GD_HI22:
1526 case R_SPARC_TLS_GD_LO10:
1527 tls_type = GOT_TLS_GD;
1528 break;
1529 case R_SPARC_TLS_IE_HI22:
1530 case R_SPARC_TLS_IE_LO10:
1531 tls_type = GOT_TLS_IE;
1532 break;
c20c30f6
EB		 1533 default:
1534 tls_type = GOT_NORMAL;
1535 break;
22b75d0a
DM		 1536 }
1537
1538 if (h != NULL)
1539 {
1540 h->got.refcount += 1;
1541 old_tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
1542 }
1543 else
1544 {
1545 bfd_signed_vma *local_got_refcounts;
1546
1547 /* This is a global offset table entry for a local symbol. */
1548 local_got_refcounts = elf_local_got_refcounts (abfd);
1549 if (local_got_refcounts == NULL)
1550 {
1551 bfd_size_type size;
1552
1553 size = symtab_hdr->sh_info;
1554 size *= (sizeof (bfd_signed_vma) + sizeof(char));
1555 local_got_refcounts = ((bfd_signed_vma *)
1556 bfd_zalloc (abfd, size));
1557 if (local_got_refcounts == NULL)
1558 return FALSE;
1559 elf_local_got_refcounts (abfd) = local_got_refcounts;
1560 _bfd_sparc_elf_local_got_tls_type (abfd)
1561 = (char *) (local_got_refcounts + symtab_hdr->sh_info);
1562 }
00c50991 1563
c20c30f6
EB		 1564 if (r_type != R_SPARC_GOTDATA_OP_HIX22
1565 && r_type != R_SPARC_GOTDATA_OP_LOX10)
1566 local_got_refcounts[r_symndx] += 1;
1567
f8745e1c
EB		 1568 old_tls_type
1569 = _bfd_sparc_elf_local_got_tls_type (abfd) [r_symndx];
22b75d0a
DM		 1570 }
1571
f8745e1c
EB		 1572 /* If a TLS symbol is accessed using IE at least once, there is no
1573 point in using the dynamic model for it. */
c20c30f6 1574 if (old_tls_type != tls_type)
22b75d0a 1575 {
c20c30f6
EB		 1576 if (old_tls_type == GOT_UNKNOWN)
1577 ;
1578 else if (old_tls_type == GOT_TLS_GD && tls_type == GOT_TLS_IE)
1579 ;
1580 else if (old_tls_type == GOT_TLS_IE && tls_type == GOT_TLS_GD)
22b75d0a
DM		 1581 tls_type = old_tls_type;
1582 else
1583 {
4eca0228 1584 _bfd_error_handler
695344c0 1585 /* xgettext:c-format */
871b3ab2 1586 (_("%pB: `%s' accessed both as normal and thread local symbol"),
22b75d0a
DM		 1587 abfd, h ? h->root.root.string : "<local>");
1588 return FALSE;
1589 }
22b75d0a 1590
22b75d0a
DM		 1591 if (h != NULL)
1592 _bfd_sparc_elf_hash_entry (h)->tls_type = tls_type;
1593 else
1594 _bfd_sparc_elf_local_got_tls_type (abfd) [r_symndx] = tls_type;
1595 }
1596 }
1597
c20c30f6
EB		 1598 if (!htab->elf.sgot
1599 && !_bfd_elf_create_got_section (htab->elf.dynobj, info))
1600 return FALSE;
bb1dd176 1601
07d6d2b8 1602 if (eh != NULL)
f8745e1c
EB		 1603 {
1604 eh->has_got_reloc = 1;
1605 if (r_type == R_SPARC_GOT10
1606 || r_type == R_SPARC_GOT13
1607 || r_type == R_SPARC_GOT22)
1608 eh->has_old_style_got_reloc = 1;
1609 }
22b75d0a
DM		 1610 break;
1611
1612 case R_SPARC_TLS_GD_CALL:
1613 case R_SPARC_TLS_LDM_CALL:
c20c30f6 1614 if (bfd_link_executable (info))
22b75d0a 1615 break;
c20c30f6
EB		 1616
1617 /* Essentially R_SPARC_WPLT30 relocs against __tls_get_addr. */
1618 h = (struct elf_link_hash_entry *)
e513bd38 1619 bfd_link_hash_lookup (info->hash, "__tls_get_addr", FALSE,
c20c30f6 1620 FALSE, TRUE);
e513bd38 1621 BFD_ASSERT (h != NULL);
22b75d0a
DM		 1622 /* Fall through */
1623
22b75d0a 1624 case R_SPARC_WPLT30:
c20c30f6
EB		 1625 case R_SPARC_PLT32:
1626 case R_SPARC_PLT64:
22b75d0a
DM		 1627 case R_SPARC_HIPLT22:
1628 case R_SPARC_LOPLT10:
1629 case R_SPARC_PCPLT32:
1630 case R_SPARC_PCPLT22:
1631 case R_SPARC_PCPLT10:
c20c30f6
EB		 1632 /* This symbol requires a procedure linkage table entry.
1633 We actually build the entry in adjust_dynamic_symbol,
22b75d0a
DM		 1634 because this might be a case of linking PIC code without
1635 linking in any dynamic objects, in which case we don't
1636 need to generate a procedure linkage table after all. */
1637
1638 if (h == NULL)
1639 {
1640 if (! ABI_64_P (abfd))
1641 {
1642 /* The Solaris native assembler will generate a WPLT30
1643 reloc for a local symbol if you assemble a call from
1644 one section to another when using -K pic. We treat
1645 it as WDISP30. */
c20c30f6 1646 if (r_type == R_SPARC_PLT32)
22b75d0a
DM		 1647 goto r_sparc_plt32;
1648 break;
1649 }
af1fb11f
NC		 1650 /* PR 7027: We need similar behaviour for 64-bit binaries. */
1651 else if (r_type == R_SPARC_WPLT30)
1652 break;
22b75d0a
DM		 1653
1654 /* It does not make sense to have a procedure linkage
07d6d2b8 1655 table entry for a local symbol. */
22b75d0a
DM		 1656 bfd_set_error (bfd_error_bad_value);
1657 return FALSE;
1658 }
1659
1660 h->needs_plt = 1;
1661
c20c30f6
EB		 1662 if (r_type == R_SPARC_PLT32 || r_type == R_SPARC_PLT64)
1663 goto r_sparc_plt32;
22b75d0a 1664
22b75d0a 1665 h->plt.refcount += 1;
bb1dd176 1666
07d6d2b8
AM		 1667 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
1668 eh->has_got_reloc = 1;
22b75d0a
DM		 1669 break;
1670
1671 case R_SPARC_PC10:
1672 case R_SPARC_PC22:
1673 case R_SPARC_PC_HH22:
1674 case R_SPARC_PC_HM10:
1675 case R_SPARC_PC_LM22:
1676 if (h != NULL)
1677 h->non_got_ref = 1;
1678
1679 if (h != NULL
1680 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
1681 break;
1682 /* Fall through. */
1683
1684 case R_SPARC_DISP8:
1685 case R_SPARC_DISP16:
1686 case R_SPARC_DISP32:
1687 case R_SPARC_DISP64:
1688 case R_SPARC_WDISP30:
1689 case R_SPARC_WDISP22:
1690 case R_SPARC_WDISP19:
1691 case R_SPARC_WDISP16:
2615994e 1692 case R_SPARC_WDISP10:
22b75d0a
DM		 1693 case R_SPARC_8:
1694 case R_SPARC_16:
1695 case R_SPARC_32:
1696 case R_SPARC_HI22:
1697 case R_SPARC_22:
1698 case R_SPARC_13:
1699 case R_SPARC_LO10:
1700 case R_SPARC_UA16:
1701 case R_SPARC_UA32:
1702 case R_SPARC_10:
1703 case R_SPARC_11:
1704 case R_SPARC_64:
1705 case R_SPARC_OLO10:
1706 case R_SPARC_HH22:
1707 case R_SPARC_HM10:
1708 case R_SPARC_LM22:
1709 case R_SPARC_7:
1710 case R_SPARC_5:
1711 case R_SPARC_6:
1712 case R_SPARC_HIX22:
1713 case R_SPARC_LOX10:
1714 case R_SPARC_H44:
1715 case R_SPARC_M44:
1716 case R_SPARC_L44:
2615994e 1717 case R_SPARC_H34:
22b75d0a
DM		 1718 case R_SPARC_UA64:
1719 if (h != NULL)
1720 h->non_got_ref = 1;
1721
07d6d2b8
AM		 1722 if (eh != NULL && (sec->flags & SEC_CODE) != 0)
1723 eh->has_non_got_reloc = 1;
bb1dd176 1724
22b75d0a 1725 r_sparc_plt32:
0e1862bb 1726 if (h != NULL && !bfd_link_pic (info))
22b75d0a
DM		 1727 {
1728 /* We may need a .plt entry if the function this reloc
1729 refers to is in a shared lib. */
1730 h->plt.refcount += 1;
1731 }
1732
1733 /* If we are creating a shared library, and this is a reloc
1734 against a global symbol, or a non PC relative reloc
1735 against a local symbol, then we need to copy the reloc
1736 into the shared library. However, if we are linking with
1737 -Bsymbolic, we do not need to copy a reloc against a
1738 global symbol which is defined in an object we are
1739 including in the link (i.e., DEF_REGULAR is set). At
1740 this point we have not seen all the input files, so it is
1741 possible that DEF_REGULAR is not set now but will be set
1742 later (it is never cleared). In case of a weak definition,
1743 DEF_REGULAR may be cleared later by a strong definition in
1744 a shared library. We account for that possibility below by
1745 storing information in the relocs_copied field of the hash
1746 table entry. A similar situation occurs when creating
1747 shared libraries and symbol visibility changes render the
1748 symbol local.
1749
1750 If on the other hand, we are creating an executable, we
1751 may need to keep relocations for symbols satisfied by a
1752 dynamic library if we manage to avoid copy relocs for the
1753 symbol. */
0e1862bb 1754 if ((bfd_link_pic (info)
22b75d0a
DM		 1755 && (sec->flags & SEC_ALLOC) != 0
1756 && (! _bfd_sparc_elf_howto_table[r_type].pc_relative
1757 || (h != NULL
72fbc6e5 1758 && (! SYMBOLIC_BIND (info, h)
22b75d0a
DM		 1759 || h->root.type == bfd_link_hash_defweak
1760 || !h->def_regular))))
0e1862bb 1761 || (!bfd_link_pic (info)
22b75d0a
DM		 1762 && (sec->flags & SEC_ALLOC) != 0
1763 && h != NULL
1764 && (h->root.type == bfd_link_hash_defweak
d0c9aeb3 1765 || !h->def_regular))
0e1862bb 1766 || (!bfd_link_pic (info)
d0c9aeb3
DM		 1767 && h != NULL
1768 && h->type == STT_GNU_IFUNC))
22b75d0a 1769 {
3bf083ed
AM		 1770 struct elf_dyn_relocs *p;
1771 struct elf_dyn_relocs **head;
22b75d0a
DM		 1772
1773 /* When creating a shared object, we must copy these
1774 relocs into the output file. We create a reloc
1775 section in dynobj and make room for the reloc. */
1776 if (sreloc == NULL)
1777 {
83bac4b0
NC		 1778 sreloc = _bfd_elf_make_dynamic_reloc_section
1779 (sec, htab->elf.dynobj, htab->word_align_power,
1780 abfd, /*rela?*/ TRUE);
1781
22b75d0a 1782 if (sreloc == NULL)
83bac4b0 1783 return FALSE;
22b75d0a
DM		 1784 }
1785
1786 /* If this is a global symbol, we count the number of
1787 relocations we need for this symbol. */
1788 if (h != NULL)
190eb1dd 1789 head = &h->dyn_relocs;
22b75d0a
DM		 1790 else
1791 {
1792 /* Track dynamic relocs needed for local syms too.
1793 We really need local syms available to do this
1794 easily. Oh well. */
22b75d0a 1795 asection *s;
6edfbbad 1796 void *vpp;
22b75d0a 1797
d0c9aeb3 1798 BFD_ASSERT (isym != NULL);
87d72d41
AM		 1799 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
1800 if (s == NULL)
1801 s = sec;
1802
6edfbbad 1803 vpp = &elf_section_data (s)->local_dynrel;
3bf083ed 1804 head = (struct elf_dyn_relocs **) vpp;
22b75d0a
DM		 1805 }
1806
1807 p = *head;
1808 if (p == NULL || p->sec != sec)
1809 {
986f0783 1810 size_t amt = sizeof *p;
3bf083ed 1811 p = ((struct elf_dyn_relocs *)
22b75d0a
DM		 1812 bfd_alloc (htab->elf.dynobj, amt));
1813 if (p == NULL)
1814 return FALSE;
1815 p->next = *head;
1816 *head = p;
1817 p->sec = sec;
1818 p->count = 0;
1819 p->pc_count = 0;
1820 }
1821
1822 p->count += 1;
1823 if (_bfd_sparc_elf_howto_table[r_type].pc_relative)
1824 p->pc_count += 1;
1825 }
1826
1827 break;
1828
1829 case R_SPARC_GNU_VTINHERIT:
1830 if (!bfd_elf_gc_record_vtinherit (abfd, sec, h, rel->r_offset))
1831 return FALSE;
1832 break;
1833
1834 case R_SPARC_GNU_VTENTRY:
a0ea3a14 1835 if (!bfd_elf_gc_record_vtentry (abfd, sec, h, rel->r_addend))
22b75d0a
DM		 1836 return FALSE;
1837 break;
1838
1839 case R_SPARC_REGISTER:
1840 /* Nothing to do. */
1841 break;
1842
1843 default:
1844 break;
1845 }
1846 }
1847
1848 return TRUE;
1849}
1850\f
1851asection *
1852_bfd_sparc_elf_gc_mark_hook (asection *sec,
1853 struct bfd_link_info *info,
1854 Elf_Internal_Rela *rel,
1855 struct elf_link_hash_entry *h,
1856 Elf_Internal_Sym *sym)
1857{
1858 if (h != NULL)
07adf181 1859 switch (SPARC_ELF_R_TYPE (rel->r_info))
22b75d0a
DM		 1860 {
1861 case R_SPARC_GNU_VTINHERIT:
1862 case R_SPARC_GNU_VTENTRY:
07adf181 1863 return NULL;
22b75d0a 1864 }
22b75d0a 1865
c20c30f6 1866 if (!bfd_link_executable (info))
b45b6908
AM		 1867 {
1868 switch (SPARC_ELF_R_TYPE (rel->r_info))
1869 {
1870 case R_SPARC_TLS_GD_CALL:
1871 case R_SPARC_TLS_LDM_CALL:
1872 /* This reloc implicitly references __tls_get_addr. We know
1873 another reloc will reference the same symbol as the one
1874 on this reloc, so the real symbol and section will be
1875 gc marked when processing the other reloc. That lets
1876 us handle __tls_get_addr here. */
1877 h = elf_link_hash_lookup (elf_hash_table (info), "__tls_get_addr",
1878 FALSE, FALSE, TRUE);
1879 BFD_ASSERT (h != NULL);
1880 h->mark = 1;
60d67dc8
AM		 1881 if (h->is_weakalias)
1882 weakdef (h)->mark = 1;
b45b6908
AM		 1883 sym = NULL;
1884 }
1885 }
1886
07adf181 1887 return _bfd_elf_gc_mark_hook (sec, info, rel, h, sym);
22b75d0a
DM		 1888}
1889
abd242a9
DM		 1890static Elf_Internal_Rela *
1891sparc_elf_find_reloc_at_ofs (Elf_Internal_Rela *rel,
1892 Elf_Internal_Rela *relend,
1893 bfd_vma offset)
1894{
1895 while (rel < relend)
1896 {
1897 if (rel->r_offset == offset)
1898 return rel;
1899 rel++;
1900 }
1901 return NULL;
1902}
1903
bb1dd176
QZ		 1904/* Remove undefined weak symbol from the dynamic symbol table if it
1905 is resolved to 0. */
1906
1907bfd_boolean
1908_bfd_sparc_elf_fixup_symbol (struct bfd_link_info *info,
07d6d2b8 1909 struct elf_link_hash_entry *h)
bb1dd176
QZ		 1910{
1911 if (h->dynindx != -1
1912 && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info,
07d6d2b8 1913 _bfd_sparc_elf_hash_entry (h)))
bb1dd176
QZ		 1914 {
1915 h->dynindx = -1;
1916 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
07d6d2b8 1917 h->dynstr_index);
bb1dd176
QZ		 1918 }
1919 return TRUE;
1920}
1921
22b75d0a
DM		 1922/* Adjust a symbol defined by a dynamic object and referenced by a
1923 regular object. The current definition is in some section of the
1924 dynamic object, but we're not including those sections. We have to
1925 change the definition to something the rest of the link can
1926 understand. */
1927
1928bfd_boolean
1929_bfd_sparc_elf_adjust_dynamic_symbol (struct bfd_link_info *info,
1930 struct elf_link_hash_entry *h)
1931{
1932 struct _bfd_sparc_elf_link_hash_table *htab;
5474d94f 1933 asection *s, *srel;
22b75d0a
DM		 1934
1935 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 1936 BFD_ASSERT (htab != NULL);
22b75d0a
DM		 1937
1938 /* Make sure we know what is going on here. */
1939 BFD_ASSERT (htab->elf.dynobj != NULL
1940 && (h->needs_plt
d0c9aeb3 1941 || h->type == STT_GNU_IFUNC
60d67dc8 1942 || h->is_weakalias
22b75d0a
DM		 1943 || (h->def_dynamic
1944 && h->ref_regular
1945 && !h->def_regular)));
1946
1947 /* If this is a function, put it in the procedure linkage table. We
1948 will fill in the contents of the procedure linkage table later
1949 (although we could actually do it here). The STT_NOTYPE
1950 condition is a hack specifically for the Oracle libraries
1951 delivered for Solaris; for some inexplicable reason, they define
1952 some of their functions as STT_NOTYPE when they really should be
1953 STT_FUNC. */
1954 if (h->type == STT_FUNC
d0c9aeb3 1955 || h->type == STT_GNU_IFUNC
22b75d0a
DM		 1956 || h->needs_plt
1957 || (h->type == STT_NOTYPE
1958 && (h->root.type == bfd_link_hash_defined
1959 || h->root.type == bfd_link_hash_defweak)
1960 && (h->root.u.def.section->flags & SEC_CODE) != 0))
1961 {
1962 if (h->plt.refcount <= 0
d0c9aeb3
DM		 1963 || (h->type != STT_GNU_IFUNC
1964 && (SYMBOL_CALLS_LOCAL (info, h)
a8735c82
EB		 1965 || (h->root.type == bfd_link_hash_undefweak
1966 && ELF_ST_VISIBILITY (h->other) != STV_DEFAULT))))
22b75d0a
DM		 1967 {
1968 /* This case can occur if we saw a WPLT30 reloc in an input
1969 file, but the symbol was never referred to by a dynamic
1970 object, or if all references were garbage collected. In
1971 such a case, we don't actually need to build a procedure
1972 linkage table, and we can just do a WDISP30 reloc instead. */
1973 h->plt.offset = (bfd_vma) -1;
1974 h->needs_plt = 0;
1975 }
1976
1977 return TRUE;
1978 }
1979 else
1980 h->plt.offset = (bfd_vma) -1;
1981
1982 /* If this is a weak symbol, and there is a real definition, the
1983 processor independent code will have arranged for us to see the
1984 real definition first, and we can just use the same value. */
60d67dc8 1985 if (h->is_weakalias)
22b75d0a 1986 {
60d67dc8
AM		 1987 struct elf_link_hash_entry *def = weakdef (h);
1988 BFD_ASSERT (def->root.type == bfd_link_hash_defined);
1989 h->root.u.def.section = def->root.u.def.section;
1990 h->root.u.def.value = def->root.u.def.value;
22b75d0a
DM		 1991 return TRUE;
1992 }
1993
1994 /* This is a reference to a symbol defined by a dynamic object which
1995 is not a function. */
1996
1997 /* If we are creating a shared library, we must presume that the
1998 only references to the symbol are via the global offset table.
1999 For such cases we need not do anything here; the relocations will
2000 be handled correctly by relocate_section. */
0e1862bb 2001 if (bfd_link_pic (info))
22b75d0a
DM		 2002 return TRUE;
2003
2004 /* If there are no references to this symbol that do not use the
2005 GOT, we don't need to generate a copy reloc. */
2006 if (!h->non_got_ref)
2007 return TRUE;
2008
72fbc6e5
DM		 2009 /* If -z nocopyreloc was given, we won't generate them either. */
2010 if (info->nocopyreloc)
2011 {
2012 h->non_got_ref = 0;
2013 return TRUE;
2014 }
2015
3bf083ed 2016 /* If we don't find any dynamic relocs in read-only sections, then
22b75d0a 2017 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
5dbc8b37 2018 if (!_bfd_elf_readonly_dynrelocs (h))
22b75d0a
DM		 2019 {
2020 h->non_got_ref = 0;
2021 return TRUE;
2022 }
2023
2024 /* We must allocate the symbol in our .dynbss section, which will
2025 become part of the .bss section of the executable. There will be
2026 an entry for this symbol in the .dynsym section. The dynamic
2027 object will contain position independent code, so all references
2028 from the dynamic object to this symbol will go through the global
2029 offset table. The dynamic linker will use the .dynsym entry to
2030 determine the address it must put in the global offset table, so
2031 both the dynamic object and the regular object will refer to the
2032 same memory location for the variable. */
2033
2034 /* We must generate a R_SPARC_COPY reloc to tell the dynamic linker
2035 to copy the initial value out of the dynamic object and into the
2036 runtime process image. We need to remember the offset into the
2037 .rel.bss section we are going to use. */
5474d94f
AM		 2038 if ((h->root.u.def.section->flags & SEC_READONLY) != 0)
2039 {
2040 s = htab->elf.sdynrelro;
2041 srel = htab->elf.sreldynrelro;
2042 }
2043 else
2044 {
2045 s = htab->elf.sdynbss;
2046 srel = htab->elf.srelbss;
2047 }
1d7e9d18 2048 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
22b75d0a 2049 {
5474d94f 2050 srel->size += SPARC_ELF_RELA_BYTES (htab);
22b75d0a
DM		 2051 h->needs_copy = 1;
2052 }
2053
6cabe1ea 2054 return _bfd_elf_adjust_dynamic_copy (info, h, s);
22b75d0a
DM		 2055}
2056
2057/* Allocate space in .plt, .got and associated reloc sections for
2058 dynamic relocs. */
2059
2060static bfd_boolean
2c3fc389 2061allocate_dynrelocs (struct elf_link_hash_entry *h, void * inf)
22b75d0a
DM		 2062{
2063 struct bfd_link_info *info;
2064 struct _bfd_sparc_elf_link_hash_table *htab;
2065 struct _bfd_sparc_elf_link_hash_entry *eh;
3bf083ed 2066 struct elf_dyn_relocs *p;
bb1dd176 2067 bfd_boolean resolved_to_zero;
22b75d0a
DM		 2068
2069 if (h->root.type == bfd_link_hash_indirect)
2070 return TRUE;
2071
22b75d0a
DM		 2072 info = (struct bfd_link_info *) inf;
2073 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 2074 BFD_ASSERT (htab != NULL);
22b75d0a 2075
bb1dd176
QZ		 2076 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
2077 resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
2078
d0c9aeb3
DM		 2079 if ((htab->elf.dynamic_sections_created
2080 && h->plt.refcount > 0)
2081 || (h->type == STT_GNU_IFUNC
b48ca1d4
DM		 2082 && h->def_regular
2083 && h->ref_regular))
22b75d0a 2084 {
a8735c82
EB		 2085 /* Undefined weak syms won't yet be marked as dynamic. */
2086 if (h->root.type == bfd_link_hash_undefweak
07d6d2b8 2087 && !resolved_to_zero
a8735c82
EB		 2088 && h->dynindx == -1
2089 && !h->forced_local)
22b75d0a
DM		 2090 {
2091 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2092 return FALSE;
2093 }
2094
0e1862bb 2095 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, bfd_link_pic (info), h)
b48ca1d4
DM		 2096 || (h->type == STT_GNU_IFUNC
2097 && h->def_regular))
22b75d0a 2098 {
72fbc6e5 2099 asection *s = htab->elf.splt;
22b75d0a 2100
d0c9aeb3
DM		 2101 if (s == NULL)
2102 s = htab->elf.iplt;
2103
910600e9 2104 /* Allocate room for the header. */
22b75d0a 2105 if (s->size == 0)
910600e9
RS		 2106 {
2107 s->size = htab->plt_header_size;
2108
2109 /* Allocate space for the .rela.plt.unloaded relocations. */
0e1862bb 2110 if (htab->is_vxworks && !bfd_link_pic (info))
910600e9
RS		 2111 htab->srelplt2->size = sizeof (Elf32_External_Rela) * 2;
2112 }
22b75d0a
DM		 2113
2114 /* The procedure linkage table size is bounded by the magnitude
2115 of the offset we can describe in the entry. */
2116 if (s->size >= (SPARC_ELF_WORD_BYTES(htab) == 8 ?
e8be8da4 2117 (((bfd_vma)1 << 31) << 1) : 0x400000))
22b75d0a
DM		 2118 {
2119 bfd_set_error (bfd_error_bad_value);
2120 return FALSE;
2121 }
2122
2123 if (SPARC_ELF_WORD_BYTES(htab) == 8
2124 && s->size >= PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE)
2125 {
2126 bfd_vma off = s->size - PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE;
2127
2128
2129 off = (off % (160 * PLT64_ENTRY_SIZE)) / PLT64_ENTRY_SIZE;
2130
2131 h->plt.offset = (s->size - (off * 8));
2132 }
2133 else
2134 h->plt.offset = s->size;
2135
2136 /* If this symbol is not defined in a regular file, and we are
2137 not generating a shared library, then set the symbol to this
2138 location in the .plt. This is required to make function
2139 pointers compare as equal between the normal executable and
2140 the shared library. */
0e1862bb 2141 if (! bfd_link_pic (info)
22b75d0a
DM		 2142 && !h->def_regular)
2143 {
2144 h->root.u.def.section = s;
2145 h->root.u.def.value = h->plt.offset;
2146 }
2147
2148 /* Make room for this entry. */
910600e9 2149 s->size += htab->plt_entry_size;
22b75d0a 2150
07d6d2b8
AM		 2151 /* There should be no PLT relocations against resolved undefined
2152 weak symbols in the executable. */
2153 if (!resolved_to_zero)
2154 {
bb1dd176
QZ		 2155 /* We also need to make an entry in the .rela.plt section. */
2156 if (s == htab->elf.splt)
07d6d2b8 2157 htab->elf.srelplt->size += SPARC_ELF_RELA_BYTES (htab);
bb1dd176 2158 else
07d6d2b8
AM		 2159 htab->elf.irelplt->size += SPARC_ELF_RELA_BYTES (htab);
2160 }
910600e9
RS		 2161
2162 if (htab->is_vxworks)
2163 {
2164 /* Allocate space for the .got.plt entry. */
72fbc6e5 2165 htab->elf.sgotplt->size += 4;
910600e9
RS		 2166
2167 /* ...and for the .rela.plt.unloaded relocations. */
0e1862bb 2168 if (!bfd_link_pic (info))
910600e9
RS		 2169 htab->srelplt2->size += sizeof (Elf32_External_Rela) * 3;
2170 }
22b75d0a
DM		 2171 }
2172 else
2173 {
2174 h->plt.offset = (bfd_vma) -1;
2175 h->needs_plt = 0;
2176 }
2177 }
2178 else
2179 {
2180 h->plt.offset = (bfd_vma) -1;
2181 h->needs_plt = 0;
2182 }
2183
2184 /* If R_SPARC_TLS_IE_{HI22,LO10} symbol is now local to the binary,
2185 make it a R_SPARC_TLS_LE_{HI22,LO10} requiring no TLS entry. */
2186 if (h->got.refcount > 0
c20c30f6 2187 && bfd_link_executable (info)
22b75d0a
DM		 2188 && h->dynindx == -1
2189 && _bfd_sparc_elf_hash_entry(h)->tls_type == GOT_TLS_IE)
2190 h->got.offset = (bfd_vma) -1;
2191 else if (h->got.refcount > 0)
2192 {
2193 asection *s;
2194 bfd_boolean dyn;
2195 int tls_type = _bfd_sparc_elf_hash_entry(h)->tls_type;
2196
a8735c82
EB		 2197 /* Undefined weak syms won't yet be marked as dynamic. */
2198 if (h->root.type == bfd_link_hash_undefweak
07d6d2b8 2199 && !resolved_to_zero
a8735c82
EB		 2200 && h->dynindx == -1
2201 && !h->forced_local)
22b75d0a
DM		 2202 {
2203 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2204 return FALSE;
2205 }
2206
72fbc6e5 2207 s = htab->elf.sgot;
22b75d0a
DM		 2208 h->got.offset = s->size;
2209 s->size += SPARC_ELF_WORD_BYTES (htab);
2210 /* R_SPARC_TLS_GD_HI{22,LO10} needs 2 consecutive GOT slots. */
2211 if (tls_type == GOT_TLS_GD)
2212 s->size += SPARC_ELF_WORD_BYTES (htab);
2213 dyn = htab->elf.dynamic_sections_created;
2214 /* R_SPARC_TLS_IE_{HI22,LO10} needs one dynamic relocation,
a8735c82 2215 R_SPARC_TLS_GD_{HI22,LO10} needs one if local and two if global. */
22b75d0a 2216 if ((tls_type == GOT_TLS_GD && h->dynindx == -1)
d0c9aeb3
DM		 2217 || tls_type == GOT_TLS_IE
2218 || h->type == STT_GNU_IFUNC)
72fbc6e5 2219 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
22b75d0a 2220 else if (tls_type == GOT_TLS_GD)
72fbc6e5 2221 htab->elf.srelgot->size += 2 * SPARC_ELF_RELA_BYTES (htab);
a8735c82
EB		 2222 else if ((WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)
2223 /* Even if the symbol isn't dynamic, we may generate a
2224 reloc for the dynamic linker in PIC mode. */
2225 || (h->dynindx == -1
2226 && !h->forced_local
2227 && h->root.type != bfd_link_hash_undefweak
2228 && bfd_link_pic (info)))
2229 /* No dynamic relocations are needed against resolved
2230 undefined weak symbols in an executable. */
2231 && !(h->root.type == bfd_link_hash_undefweak
2232 && (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
2233 || resolved_to_zero)))
72fbc6e5 2234 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
22b75d0a
DM		 2235 }
2236 else
2237 h->got.offset = (bfd_vma) -1;
2238
190eb1dd 2239 if (h->dyn_relocs == NULL)
22b75d0a
DM		 2240 return TRUE;
2241
2242 /* In the shared -Bsymbolic case, discard space allocated for
2243 dynamic pc-relative relocs against symbols which turn out to be
2244 defined in regular objects. For the normal shared case, discard
2245 space for pc-relative relocs that have become local due to symbol
2246 visibility changes. */
2247
0e1862bb 2248 if (bfd_link_pic (info))
22b75d0a 2249 {
72fbc6e5 2250 if (SYMBOL_CALLS_LOCAL (info, h))
22b75d0a 2251 {
3bf083ed 2252 struct elf_dyn_relocs **pp;
22b75d0a 2253
190eb1dd 2254 for (pp = &h->dyn_relocs; (p = *pp) != NULL; )
22b75d0a
DM		 2255 {
2256 p->count -= p->pc_count;
2257 p->pc_count = 0;
2258 if (p->count == 0)
2259 *pp = p->next;
2260 else
2261 pp = &p->next;
2262 }
2263 }
22d606e9 2264
3348747a
NS		 2265 if (htab->is_vxworks)
2266 {
3bf083ed 2267 struct elf_dyn_relocs **pp;
3348747a 2268
190eb1dd 2269 for (pp = &h->dyn_relocs; (p = *pp) != NULL; )
3348747a
NS		 2270 {
2271 if (strcmp (p->sec->output_section->name, ".tls_vars") == 0)
2272 *pp = p->next;
2273 else
2274 pp = &p->next;
2275 }
2276 }
2277
22d606e9 2278 /* Also discard relocs on undefined weak syms with non-default
bb1dd176 2279 visibility or in PIE. */
190eb1dd 2280 if (h->dyn_relocs != NULL
22d606e9
AM		 2281 && h->root.type == bfd_link_hash_undefweak)
2282 {
07d6d2b8 2283 /* An undefined weak symbol is never
bb1dd176
QZ		 2284 bound locally in a shared library. */
2285
2286 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
07d6d2b8
AM		 2287 || resolved_to_zero)
2288 {
2289 if (h->non_got_ref)
2290 {
2291 /* Keep dynamic non-GOT/non-PLT relocation so that we
2292 can branch to 0 without PLT. */
2293 struct elf_dyn_relocs **pp;
2294
190eb1dd 2295 for (pp = &h->dyn_relocs; (p = *pp) != NULL;)
07d6d2b8
AM		 2296 if (p->pc_count == 0)
2297 *pp = p->next;
2298 else
2299 {
2300 /* Remove other relocations. */
2301 p->count = p->pc_count;
2302 pp = &p->next;
2303 }
2304
190eb1dd 2305 if (h->dyn_relocs != NULL)
07d6d2b8
AM		 2306 {
2307 /* Make sure undefined weak symbols are output
2308 as dynamic symbols in PIEs for dynamic non-GOT
2309 non-PLT reloations. */
2310 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2311 return FALSE;
2312 }
2313 }
2314 else
190eb1dd 2315 h->dyn_relocs = NULL;
07d6d2b8 2316 }
22d606e9
AM		 2317
2318 /* Make sure undefined weak symbols are output as a dynamic
2319 symbol in PIEs. */
2320 else if (h->dynindx == -1
2321 && !h->forced_local)
2322 {
2323 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2324 return FALSE;
2325 }
2326 }
22b75d0a
DM		 2327 }
2328 else
2329 {
2330 /* For the non-shared case, discard space for relocs against
2331 symbols which turn out to need copy relocs or are not
2332 dynamic. */
2333
bb1dd176 2334 if ((!h->non_got_ref
07d6d2b8
AM		 2335 || (h->root.type == bfd_link_hash_undefweak
2336 && !resolved_to_zero))
22b75d0a
DM		 2337 && ((h->def_dynamic
2338 && !h->def_regular)
2339 || (htab->elf.dynamic_sections_created
2340 && (h->root.type == bfd_link_hash_undefweak
2341 || h->root.type == bfd_link_hash_undefined))))
2342 {
a8735c82
EB		 2343 /* Undefined weak syms won't yet be marked as dynamic. */
2344 if (h->root.type == bfd_link_hash_undefweak
07d6d2b8 2345 && !resolved_to_zero
a8735c82
EB		 2346 && h->dynindx == -1
2347 && !h->forced_local)
22b75d0a
DM		 2348 {
2349 if (! bfd_elf_link_record_dynamic_symbol (info, h))
2350 return FALSE;
2351 }
2352
2353 /* If that succeeded, we know we'll be keeping all the
2354 relocs. */
2355 if (h->dynindx != -1)
2356 goto keep;
2357 }
2358
190eb1dd 2359 h->dyn_relocs = NULL;
22b75d0a
DM		 2360
2361 keep: ;
2362 }
2363
2364 /* Finally, allocate space. */
190eb1dd 2365 for (p = h->dyn_relocs; p != NULL; p = p->next)
22b75d0a
DM		 2366 {
2367 asection *sreloc = elf_section_data (p->sec)->sreloc;
2368 sreloc->size += p->count * SPARC_ELF_RELA_BYTES (htab);
2369 }
2370
2371 return TRUE;
2372}
2373
d0c9aeb3
DM		 2374/* Allocate space in .plt, .got and associated reloc sections for
2375 local dynamic relocs. */
2376
2377static bfd_boolean
2378allocate_local_dynrelocs (void **slot, void *inf)
2379{
2380 struct elf_link_hash_entry *h
2381 = (struct elf_link_hash_entry *) *slot;
2382
2383 if (h->type != STT_GNU_IFUNC
2384 || !h->def_regular
2385 || !h->ref_regular
2386 || !h->forced_local
2387 || h->root.type != bfd_link_hash_defined)
2388 abort ();
2389
2390 return allocate_dynrelocs (h, inf);
2391}
2392
63c1f59d
AM		 2393/* Set DF_TEXTREL if we find any dynamic relocs that apply to
2394 read-only sections. */
22b75d0a
DM		 2395
2396static bfd_boolean
63c1f59d 2397maybe_set_textrel (struct elf_link_hash_entry *h, void *info_p)
22b75d0a 2398{
63c1f59d 2399 asection *sec;
22b75d0a 2400
63c1f59d
AM		 2401 if (h->root.type == bfd_link_hash_indirect)
2402 return TRUE;
22b75d0a 2403
5dbc8b37 2404 sec = _bfd_elf_readonly_dynrelocs (h);
63c1f59d
AM		 2405 if (sec != NULL)
2406 {
2407 struct bfd_link_info *info = (struct bfd_link_info *) info_p;
22b75d0a 2408
63c1f59d
AM		 2409 info->flags |= DF_TEXTREL;
2410 info->callbacks->minfo
c1c8c1ef 2411 (_("%pB: dynamic relocation against `%pT' in read-only section `%pA'\n"),
63c1f59d 2412 sec->owner, h->root.root.string, sec);
f0f07ad1 2413
63c1f59d
AM		 2414 /* Not an error, just cut short the traversal. */
2415 return FALSE;
22b75d0a
DM		 2416 }
2417 return TRUE;
2418}
2419
2420/* Return true if the dynamic symbol for a given section should be
2421 omitted when creating a shared library. */
2422
2423bfd_boolean
2424_bfd_sparc_elf_omit_section_dynsym (bfd *output_bfd,
2425 struct bfd_link_info *info,
2426 asection *p)
2427{
2428 /* We keep the .got section symbol so that explicit relocations
2429 against the _GLOBAL_OFFSET_TABLE_ symbol emitted in PIC mode
2430 can be turned into relocations against the .got symbol. */
2431 if (strcmp (p->name, ".got") == 0)
2432 return FALSE;
2433
d00dd7dc 2434 return _bfd_elf_omit_section_dynsym_default (output_bfd, info, p);
22b75d0a
DM		 2435}
2436
2437/* Set the sizes of the dynamic sections. */
2438
2439bfd_boolean
2440_bfd_sparc_elf_size_dynamic_sections (bfd *output_bfd,
2441 struct bfd_link_info *info)
2442{
2443 struct _bfd_sparc_elf_link_hash_table *htab;
2444 bfd *dynobj;
2445 asection *s;
2446 bfd *ibfd;
2447
2448 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 2449 BFD_ASSERT (htab != NULL);
22b75d0a
DM		 2450 dynobj = htab->elf.dynobj;
2451 BFD_ASSERT (dynobj != NULL);
2452
2453 if (elf_hash_table (info)->dynamic_sections_created)
2454 {
2455 /* Set the contents of the .interp section to the interpreter. */
9b8b325a 2456 if (bfd_link_executable (info) && !info->nointerp)
07d6d2b8
AM		 2457 {
2458 s = bfd_get_linker_section (dynobj, ".interp");
2459 BFD_ASSERT (s != NULL);
2460 s->size = htab->dynamic_interpreter_size;
2461 s->contents = (unsigned char *) htab->dynamic_interpreter;
2462 htab->interp = s;
2463 }
22b75d0a
DM		 2464 }
2465
2466 /* Set up .got offsets for local syms, and space for local dynamic
2467 relocs. */
c72f2fb2 2468 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
22b75d0a
DM		 2469 {
2470 bfd_signed_vma *local_got;
2471 bfd_signed_vma *end_local_got;
2472 char *local_tls_type;
2473 bfd_size_type locsymcount;
2474 Elf_Internal_Shdr *symtab_hdr;
2475 asection *srel;
2476
0ffa91dd 2477 if (! is_sparc_elf (ibfd))
22b75d0a
DM		 2478 continue;
2479
2480 for (s = ibfd->sections; s != NULL; s = s->next)
2481 {
3bf083ed 2482 struct elf_dyn_relocs *p;
22b75d0a 2483
6edfbbad 2484 for (p = elf_section_data (s)->local_dynrel; p != NULL; p = p->next)
22b75d0a
DM		 2485 {
2486 if (!bfd_is_abs_section (p->sec)
2487 && bfd_is_abs_section (p->sec->output_section))
2488 {
2489 /* Input section has been discarded, either because
2490 it is a copy of a linkonce section or due to
2491 linker script /DISCARD/, so we'll be discarding
2492 the relocs too. */
2493 }
3348747a
NS		 2494 else if (htab->is_vxworks
2495 && strcmp (p->sec->output_section->name,
2496 ".tls_vars") == 0)
2497 {
2498 /* Relocations in vxworks .tls_vars sections are
2499 handled specially by the loader. */
2500 }
22b75d0a
DM		 2501 else if (p->count != 0)
2502 {
2503 srel = elf_section_data (p->sec)->sreloc;
d0c9aeb3
DM		 2504 if (!htab->elf.dynamic_sections_created)
2505 srel = htab->elf.irelplt;
22b75d0a
DM		 2506 srel->size += p->count * SPARC_ELF_RELA_BYTES (htab);
2507 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
f0f07ad1
L		 2508 {
2509 info->flags |= DF_TEXTREL;
871b3ab2 2510 info->callbacks->minfo (_("%pB: dynamic relocation in read-only section `%pA'\n"),
f0f07ad1
L		 2511 p->sec->owner, p->sec);
2512 }
22b75d0a
DM		 2513 }
2514 }
2515 }
2516
2517 local_got = elf_local_got_refcounts (ibfd);
2518 if (!local_got)
2519 continue;
2520
0ffa91dd 2521 symtab_hdr = &elf_symtab_hdr (ibfd);
22b75d0a
DM		 2522 locsymcount = symtab_hdr->sh_info;
2523 end_local_got = local_got + locsymcount;
2524 local_tls_type = _bfd_sparc_elf_local_got_tls_type (ibfd);
72fbc6e5
DM		 2525 s = htab->elf.sgot;
2526 srel = htab->elf.srelgot;
22b75d0a
DM		 2527 for (; local_got < end_local_got; ++local_got, ++local_tls_type)
2528 {
2529 if (*local_got > 0)
2530 {
2531 *local_got = s->size;
2532 s->size += SPARC_ELF_WORD_BYTES (htab);
2533 if (*local_tls_type == GOT_TLS_GD)
2534 s->size += SPARC_ELF_WORD_BYTES (htab);
0e1862bb 2535 if (bfd_link_pic (info)
22b75d0a
DM		 2536 || *local_tls_type == GOT_TLS_GD
2537 || *local_tls_type == GOT_TLS_IE)
2538 srel->size += SPARC_ELF_RELA_BYTES (htab);
2539 }
2540 else
2541 *local_got = (bfd_vma) -1;
2542 }
2543 }
2544
2545 if (htab->tls_ldm_got.refcount > 0)
2546 {
2547 /* Allocate 2 got entries and 1 dynamic reloc for
2548 R_SPARC_TLS_LDM_{HI22,LO10} relocs. */
72fbc6e5
DM		 2549 htab->tls_ldm_got.offset = htab->elf.sgot->size;
2550 htab->elf.sgot->size += (2 * SPARC_ELF_WORD_BYTES (htab));
2551 htab->elf.srelgot->size += SPARC_ELF_RELA_BYTES (htab);
22b75d0a
DM		 2552 }
2553 else
2554 htab->tls_ldm_got.offset = -1;
2555
2556 /* Allocate global sym .plt and .got entries, and space for global
2557 sym dynamic relocs. */
2c3fc389 2558 elf_link_hash_traverse (&htab->elf, allocate_dynrelocs, info);
22b75d0a 2559
d0c9aeb3
DM		 2560 /* Allocate .plt and .got entries, and space for local symbols. */
2561 htab_traverse (htab->loc_hash_table, allocate_local_dynrelocs, info);
2562
0fc9967d
JM		 2563 if (! ABI_64_P (output_bfd)
2564 && !htab->is_vxworks
22b75d0a
DM		 2565 && elf_hash_table (info)->dynamic_sections_created)
2566 {
0fc9967d
JM		 2567 /* Make space for the trailing nop in .plt. */
2568 if (htab->elf.splt->size > 0)
2569 htab->elf.splt->size += 1 * SPARC_INSN_BYTES;
22b75d0a
DM		 2570
2571 /* If the .got section is more than 0x1000 bytes, we add
2572 0x1000 to the value of _GLOBAL_OFFSET_TABLE_, so that 13
0fc9967d
JM		 2573 bit relocations have a greater chance of working.
2574
2575 FIXME: Make this optimization work for 64-bit too. */
72fbc6e5 2576 if (htab->elf.sgot->size >= 0x1000
22b75d0a
DM		 2577 && elf_hash_table (info)->hgot->root.u.def.value == 0)
2578 elf_hash_table (info)->hgot->root.u.def.value = 0x1000;
2579 }
2580
2581 /* The check_relocs and adjust_dynamic_symbol entry points have
2582 determined the sizes of the various dynamic sections. Allocate
2583 memory for them. */
2584 for (s = dynobj->sections; s != NULL; s = s->next)
2585 {
22b75d0a
DM		 2586 if ((s->flags & SEC_LINKER_CREATED) == 0)
2587 continue;
2588
72fbc6e5
DM		 2589 if (s == htab->elf.splt
2590 || s == htab->elf.sgot
9d19e4fd 2591 || s == htab->elf.sdynbss
5474d94f 2592 || s == htab->elf.sdynrelro
d0c9aeb3 2593 || s == htab->elf.iplt
72fbc6e5 2594 || s == htab->elf.sgotplt)
22b75d0a 2595 {
c456f082
AM		 2596 /* Strip this section if we don't need it; see the
2597 comment below. */
2598 }
0112cd26 2599 else if (CONST_STRNEQ (s->name, ".rela"))
c456f082
AM		 2600 {
2601 if (s->size != 0)
22b75d0a
DM		 2602 {
2603 /* We use the reloc_count field as a counter if we need
2604 to copy relocs into the output file. */
2605 s->reloc_count = 0;
2606 }
2607 }
c456f082 2608 else
22b75d0a 2609 {
c456f082 2610 /* It's not one of our sections. */
22b75d0a
DM		 2611 continue;
2612 }
2613
c456f082 2614 if (s->size == 0)
22b75d0a 2615 {
c456f082
AM		 2616 /* If we don't need this section, strip it from the
2617 output file. This is mostly to handle .rela.bss and
2618 .rela.plt. We must create both sections in
2619 create_dynamic_sections, because they must be created
2620 before the linker maps input sections to output
2621 sections. The linker does that before
2622 adjust_dynamic_symbol is called, and it is that
2623 function which decides whether anything needs to go
2624 into these sections. */
8423293d 2625 s->flags |= SEC_EXCLUDE;
22b75d0a
DM		 2626 continue;
2627 }
2628
c456f082
AM		 2629 if ((s->flags & SEC_HAS_CONTENTS) == 0)
2630 continue;
2631
22b75d0a
DM		 2632 /* Allocate memory for the section contents. Zero the memory
2633 for the benefit of .rela.plt, which has 4 unused entries
2634 at the beginning, and we don't want garbage. */
2635 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
c456f082 2636 if (s->contents == NULL)
22b75d0a
DM		 2637 return FALSE;
2638 }
2639
2640 if (elf_hash_table (info)->dynamic_sections_created)
2641 {
2642 /* Add some entries to the .dynamic section. We fill in the
2643 values later, in _bfd_sparc_elf_finish_dynamic_sections, but we
2644 must add the entries now so that we get the correct size for
2645 the .dynamic section. The DT_DEBUG entry is filled in by the
2646 dynamic linker and used by the debugger. */
2647#define add_dynamic_entry(TAG, VAL) \
2648 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
2649
0e1862bb 2650 if (bfd_link_executable (info))
22b75d0a
DM		 2651 {
2652 if (!add_dynamic_entry (DT_DEBUG, 0))
2653 return FALSE;
2654 }
2655
72fbc6e5 2656 if (htab->elf.srelplt->size != 0)
22b75d0a
DM		 2657 {
2658 if (!add_dynamic_entry (DT_PLTGOT, 0)
2659 || !add_dynamic_entry (DT_PLTRELSZ, 0)
2660 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
2661 || !add_dynamic_entry (DT_JMPREL, 0))
2662 return FALSE;
2663 }
2664
2665 if (!add_dynamic_entry (DT_RELA, 0)
2666 || !add_dynamic_entry (DT_RELASZ, 0)
2667 || !add_dynamic_entry (DT_RELAENT,
2668 SPARC_ELF_RELA_BYTES (htab)))
2669 return FALSE;
2670
2671 /* If any dynamic relocs apply to a read-only section,
2672 then we need a DT_TEXTREL entry. */
2673 if ((info->flags & DF_TEXTREL) == 0)
63c1f59d 2674 elf_link_hash_traverse (&htab->elf, maybe_set_textrel, info);
22b75d0a
DM		 2675
2676 if (info->flags & DF_TEXTREL)
2677 {
2678 if (!add_dynamic_entry (DT_TEXTREL, 0))
2679 return FALSE;
2680 }
2681
2682 if (ABI_64_P (output_bfd))
2683 {
2684 int reg;
2685 struct _bfd_sparc_elf_app_reg * app_regs;
2686 struct elf_strtab_hash *dynstr;
2687 struct elf_link_hash_table *eht = elf_hash_table (info);
2688
2689 /* Add dynamic STT_REGISTER symbols and corresponding DT_SPARC_REGISTER
2690 entries if needed. */
2691 app_regs = _bfd_sparc_elf_hash_table (info)->app_regs;
2692 dynstr = eht->dynstr;
2693
2694 for (reg = 0; reg < 4; reg++)
2695 if (app_regs [reg].name != NULL)
2696 {
2697 struct elf_link_local_dynamic_entry *entry, *e;
2698
2699 if (!add_dynamic_entry (DT_SPARC_REGISTER, 0))
2700 return FALSE;
2701
2702 entry = (struct elf_link_local_dynamic_entry *)
2703 bfd_hash_allocate (&info->hash->table, sizeof (*entry));
2704 if (entry == NULL)
2705 return FALSE;
2706
2707 /* We cheat here a little bit: the symbol will not be local, so we
2708 put it at the end of the dynlocal linked list. We will fix it
2709 later on, as we have to fix other fields anyway. */
2710 entry->isym.st_value = reg < 2 ? reg + 2 : reg + 4;
2711 entry->isym.st_size = 0;
2712 if (*app_regs [reg].name != '\0')
2713 entry->isym.st_name
2714 = _bfd_elf_strtab_add (dynstr, app_regs[reg].name, FALSE);
2715 else
2716 entry->isym.st_name = 0;
2717 entry->isym.st_other = 0;
2718 entry->isym.st_info = ELF_ST_INFO (app_regs [reg].bind,
2719 STT_REGISTER);
2720 entry->isym.st_shndx = app_regs [reg].shndx;
35fc36a8 2721 entry->isym.st_target_internal = 0;
22b75d0a
DM		 2722 entry->next = NULL;
2723 entry->input_bfd = output_bfd;
2724 entry->input_indx = -1;
2725
2726 if (eht->dynlocal == NULL)
2727 eht->dynlocal = entry;
2728 else
2729 {
2730 for (e = eht->dynlocal; e->next; e = e->next)
2731 ;
2732 e->next = entry;
2733 }
2734 eht->dynsymcount++;
2735 }
2736 }
7a2b07ff
NS		 2737 if (htab->is_vxworks
2738 && !elf_vxworks_add_dynamic_entries (output_bfd, info))
2739 return FALSE;
22b75d0a
DM		 2740 }
2741#undef add_dynamic_entry
2742
2743 return TRUE;
2744}
2745\f
2746bfd_boolean
2747_bfd_sparc_elf_new_section_hook (bfd *abfd, asection *sec)
2748{
f592407e
AM		 2749 if (!sec->used_by_bfd)
2750 {
2751 struct _bfd_sparc_elf_section_data *sdata;
986f0783 2752 size_t amt = sizeof (*sdata);
22b75d0a 2753
f592407e
AM		 2754 sdata = bfd_zalloc (abfd, amt);
2755 if (sdata == NULL)
2756 return FALSE;
2757 sec->used_by_bfd = sdata;
2758 }
22b75d0a
DM		 2759
2760 return _bfd_elf_new_section_hook (abfd, sec);
2761}
2762
2763bfd_boolean
2764_bfd_sparc_elf_relax_section (bfd *abfd ATTRIBUTE_UNUSED,
2765 struct bfd_section *section,
2766 struct bfd_link_info *link_info ATTRIBUTE_UNUSED,
2767 bfd_boolean *again)
2768{
0e1862bb 2769 if (bfd_link_relocatable (link_info))
c8a1f254
NS		 2770 (*link_info->callbacks->einfo)
2771 (_("%P%F: --relax and -r may not be used together\n"));
2772
22b75d0a
DM		 2773 *again = FALSE;
2774 sec_do_relax (section) = 1;
2775 return TRUE;
2776}
2777\f
2778/* Return the base VMA address which should be subtracted from real addresses
2779 when resolving @dtpoff relocation.
2780 This is PT_TLS segment p_vaddr. */
2781
2782static bfd_vma
2783dtpoff_base (struct bfd_link_info *info)
2784{
2785 /* If tls_sec is NULL, we should have signalled an error already. */
2786 if (elf_hash_table (info)->tls_sec == NULL)
2787 return 0;
2788 return elf_hash_table (info)->tls_sec->vma;
2789}
2790
2791/* Return the relocation value for @tpoff relocation
2792 if STT_TLS virtual address is ADDRESS. */
2793
2794static bfd_vma
2795tpoff (struct bfd_link_info *info, bfd_vma address)
2796{
2797 struct elf_link_hash_table *htab = elf_hash_table (info);
1360ba76
RO		 2798 const struct elf_backend_data *bed = get_elf_backend_data (info->output_bfd);
2799 bfd_vma static_tls_size;
22b75d0a
DM		 2800
2801 /* If tls_sec is NULL, we should have signalled an error already. */
2802 if (htab->tls_sec == NULL)
2803 return 0;
1360ba76
RO		 2804
2805 /* Consider special static TLS alignment requirements. */
2806 static_tls_size = BFD_ALIGN (htab->tls_size, bed->static_tls_alignment);
2807 return address - static_tls_size - htab->tls_sec->vma;
22b75d0a
DM		 2808}
2809
00c50991
DM		 2810/* Return the relocation value for a %gdop relocation. */
2811
2812static bfd_vma
2813gdopoff (struct bfd_link_info *info, bfd_vma address)
2814{
2815 struct elf_link_hash_table *htab = elf_hash_table (info);
2816 bfd_vma got_base;
2817
2818 got_base = (htab->hgot->root.u.def.value
2819 + htab->hgot->root.u.def.section->output_offset
2820 + htab->hgot->root.u.def.section->output_section->vma);
2821
2822 return address - got_base;
2823}
2824
5b86074c
AM		 2825/* Return whether H is local and its ADDRESS is within 4G of
2826 _GLOBAL_OFFSET_TABLE_ and thus the offset may be calculated by a
2827 sethi, xor sequence. */
2828
2829static bfd_boolean
2830gdop_relative_offset_ok (struct bfd_link_info *info,
2831 struct elf_link_hash_entry *h,
2832 bfd_vma address ATTRIBUTE_UNUSED)
2833{
2834 if (!SYMBOL_REFERENCES_LOCAL (info, h))
2835 return FALSE;
2836 /* If H is undefined, ADDRESS will be zero. We can't allow a
2837 relative offset to "zero" when producing PIEs or shared libs.
2838 Note that to get here with an undefined symbol it must also be
2839 hidden or internal visibility. */
2840 if (bfd_link_pic (info)
2841 && h != NULL
2842 && (h->root.type == bfd_link_hash_undefweak
2843 || h->root.type == bfd_link_hash_undefined))
2844 return FALSE;
2845#ifdef BFD64
2846 return gdopoff (info, address) + ((bfd_vma) 1 << 32) < (bfd_vma) 2 << 32;
2847#else
2848 return TRUE;
2849#endif
2850}
2851
22b75d0a
DM		 2852/* Relocate a SPARC ELF section. */
2853
2854bfd_boolean
ab96bf03
AM		 2855_bfd_sparc_elf_relocate_section (bfd *output_bfd,
2856 struct bfd_link_info *info,
2857 bfd *input_bfd,
2858 asection *input_section,
2859 bfd_byte *contents,
2860 Elf_Internal_Rela *relocs,
2861 Elf_Internal_Sym *local_syms,
2862 asection **local_sections)
22b75d0a
DM		 2863{
2864 struct _bfd_sparc_elf_link_hash_table *htab;
2865 Elf_Internal_Shdr *symtab_hdr;
2866 struct elf_link_hash_entry **sym_hashes;
2867 bfd_vma *local_got_offsets;
2868 bfd_vma got_base;
2869 asection *sreloc;
2870 Elf_Internal_Rela *rel;
2871 Elf_Internal_Rela *relend;
2872 int num_relocs;
3348747a 2873 bfd_boolean is_vxworks_tls;
22b75d0a 2874
22b75d0a 2875 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 2876 BFD_ASSERT (htab != NULL);
0ffa91dd 2877 symtab_hdr = &elf_symtab_hdr (input_bfd);
22b75d0a
DM		 2878 sym_hashes = elf_sym_hashes (input_bfd);
2879 local_got_offsets = elf_local_got_offsets (input_bfd);
2880
2881 if (elf_hash_table (info)->hgot == NULL)
2882 got_base = 0;
2883 else
2884 got_base = elf_hash_table (info)->hgot->root.u.def.value;
2885
2886 sreloc = elf_section_data (input_section)->sreloc;
3348747a
NS		 2887 /* We have to handle relocations in vxworks .tls_vars sections
2888 specially, because the dynamic loader is 'weird'. */
0e1862bb 2889 is_vxworks_tls = (htab->is_vxworks && bfd_link_pic (info)
3348747a
NS		 2890 && !strcmp (input_section->output_section->name,
2891 ".tls_vars"));
22b75d0a
DM		 2892
2893 rel = relocs;
2894 if (ABI_64_P (output_bfd))
d4730f92 2895 num_relocs = NUM_SHDR_ENTRIES (_bfd_elf_single_rel_hdr (input_section));
22b75d0a
DM		 2896 else
2897 num_relocs = input_section->reloc_count;
2898 relend = relocs + num_relocs;
2899 for (; rel < relend; rel++)
2900 {
2901 int r_type, tls_type;
2902 reloc_howto_type *howto;
2903 unsigned long r_symndx;
2904 struct elf_link_hash_entry *h;
bb1dd176 2905 struct _bfd_sparc_elf_link_hash_entry *eh;
22b75d0a
DM		 2906 Elf_Internal_Sym *sym;
2907 asection *sec;
2908 bfd_vma relocation, off;
2909 bfd_reloc_status_type r;
2910 bfd_boolean is_plt = FALSE;
2911 bfd_boolean unresolved_reloc;
bb1dd176 2912 bfd_boolean resolved_to_zero;
ec1acaba 2913 bfd_boolean relative_reloc;
22b75d0a
DM		 2914
2915 r_type = SPARC_ELF_R_TYPE (rel->r_info);
2916 if (r_type == R_SPARC_GNU_VTINHERIT
2917 || r_type == R_SPARC_GNU_VTENTRY)
2918 continue;
2919
2920 if (r_type < 0 || r_type >= (int) R_SPARC_max_std)
2921 {
2922 bfd_set_error (bfd_error_bad_value);
2923 return FALSE;
2924 }
22b75d0a 2925
c20c30f6 2926 howto = _bfd_sparc_elf_howto_table + r_type;
22b75d0a
DM		 2927 r_symndx = SPARC_ELF_R_SYMNDX (htab, rel->r_info);
2928 h = NULL;
2929 sym = NULL;
2930 sec = NULL;
2931 unresolved_reloc = FALSE;
2932 if (r_symndx < symtab_hdr->sh_info)
2933 {
2934 sym = local_syms + r_symndx;
2935 sec = local_sections[r_symndx];
2936 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
d0c9aeb3 2937
0e1862bb 2938 if (!bfd_link_relocatable (info)
d0c9aeb3
DM		 2939 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
2940 {
2941 /* Relocate against local STT_GNU_IFUNC symbol. */
2942 h = elf_sparc_get_local_sym_hash (htab, input_bfd,
2943 rel, FALSE);
2944 if (h == NULL)
2945 abort ();
2946
68ffbac6 2947 /* Set STT_GNU_IFUNC symbol value. */
d0c9aeb3
DM		 2948 h->root.u.def.value = sym->st_value;
2949 h->root.u.def.section = sec;
2950 }
22b75d0a
DM		 2951 }
2952 else
2953 {
62d887d4 2954 bfd_boolean warned, ignored;
22b75d0a
DM		 2955
2956 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
2957 r_symndx, symtab_hdr, sym_hashes,
2958 h, sec, relocation,
62d887d4 2959 unresolved_reloc, warned, ignored);
22b75d0a
DM		 2960 if (warned)
2961 {
2962 /* To avoid generating warning messages about truncated
2963 relocations, set the relocation's address to be the same as
2964 the start of this section. */
2965 if (input_section->output_section != NULL)
2966 relocation = input_section->output_section->vma;
2967 else
2968 relocation = 0;
2969 }
2970 }
2971
dbaa2011 2972 if (sec != NULL && discarded_section (sec))
e4067dbb 2973 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
545fd46b 2974 rel, 1, relend, howto, 0, contents);
ab96bf03 2975
0e1862bb 2976 if (bfd_link_relocatable (info))
ab96bf03
AM		 2977 continue;
2978
d0c9aeb3
DM		 2979 if (h != NULL
2980 && h->type == STT_GNU_IFUNC
2981 && h->def_regular)
2982 {
2983 asection *plt_sec;
2984 const char *name;
2985
2986 if ((input_section->flags & SEC_ALLOC) == 0
2987 || h->plt.offset == (bfd_vma) -1)
f657f8c4
NC		 2988 {
2989 /* If this is a SHT_NOTE section without SHF_ALLOC, treat
2990 STT_GNU_IFUNC symbol as STT_FUNC. */
2991 if (elf_section_type (input_section) == SHT_NOTE)
2992 goto skip_ifunc;
2993 abort ();
2994 }
d0c9aeb3
DM		 2995
2996 plt_sec = htab->elf.splt;
2997 if (! plt_sec)
2998 plt_sec =htab->elf.iplt;
2999
3000 switch (r_type)
3001 {
00c50991
DM		 3002 case R_SPARC_GOTDATA_OP:
3003 continue;
3004
d0c9aeb3
DM		 3005 case R_SPARC_GOTDATA_OP_HIX22:
3006 case R_SPARC_GOTDATA_OP_LOX10:
00c50991
DM		 3007 r_type = (r_type == R_SPARC_GOTDATA_OP_HIX22
3008 ? R_SPARC_GOT22
3009 : R_SPARC_GOT10);
3010 howto = _bfd_sparc_elf_howto_table + r_type;
3011 /* Fall through. */
3012
d0c9aeb3
DM		 3013 case R_SPARC_GOT10:
3014 case R_SPARC_GOT13:
3015 case R_SPARC_GOT22:
3016 if (htab->elf.sgot == NULL)
3017 abort ();
3018 off = h->got.offset;
3019 if (off == (bfd_vma) -1)
3020 abort();
3021 relocation = htab->elf.sgot->output_offset + off - got_base;
3022 goto do_relocation;
3023
3024 case R_SPARC_WPLT30:
3025 case R_SPARC_WDISP30:
3026 relocation = (plt_sec->output_section->vma
3027 + plt_sec->output_offset + h->plt.offset);
3028 goto do_relocation;
3029
3030 case R_SPARC_32:
3031 case R_SPARC_64:
0e1862bb 3032 if (bfd_link_pic (info) && h->non_got_ref)
d0c9aeb3
DM		 3033 {
3034 Elf_Internal_Rela outrel;
3035 bfd_vma offset;
3036
3037 offset = _bfd_elf_section_offset (output_bfd, info,
3038 input_section,
3039 rel->r_offset);
3040 if (offset == (bfd_vma) -1
3041 || offset == (bfd_vma) -2)
3042 abort();
3043
3044 outrel.r_offset = (input_section->output_section->vma
3045 + input_section->output_offset
3046 + offset);
3047
3048 if (h->dynindx == -1
3049 || h->forced_local
0e1862bb 3050 || bfd_link_executable (info))
d0c9aeb3
DM		 3051 {
3052 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3053 0, R_SPARC_IRELATIVE);
3054 outrel.r_addend = relocation + rel->r_addend;
3055 }
3056 else
3057 {
3058 if (h->dynindx == -1)
3059 abort();
3060 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, h->dynindx, r_type);
3061 outrel.r_addend = rel->r_addend;
3062 }
3063
3064 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
3065 continue;
3066 }
3067
3068 relocation = (plt_sec->output_section->vma
3069 + plt_sec->output_offset + h->plt.offset);
3070 goto do_relocation;
3071
3072 case R_SPARC_HI22:
3073 case R_SPARC_LO10:
3074 /* We should only see such relocs in static links. */
0e1862bb 3075 if (bfd_link_pic (info))
d0c9aeb3
DM		 3076 abort();
3077 relocation = (plt_sec->output_section->vma
3078 + plt_sec->output_offset + h->plt.offset);
3079 goto do_relocation;
3080
3081 default:
3082 if (h->root.root.string)
3083 name = h->root.root.string;
3084 else
3085 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
3086 NULL);
4eca0228 3087 _bfd_error_handler
695344c0 3088 /* xgettext:c-format */
871b3ab2 3089 (_("%pB: relocation %s against STT_GNU_IFUNC "
d0c9aeb3
DM		 3090 "symbol `%s' isn't handled by %s"), input_bfd,
3091 _bfd_sparc_elf_howto_table[r_type].name,
3092 name, __FUNCTION__);
3093 bfd_set_error (bfd_error_bad_value);
3094 return FALSE;
3095 }
3096 }
3097
f657f8c4 3098 skip_ifunc:
bb1dd176 3099 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
c20c30f6 3100 resolved_to_zero = eh && UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
bb1dd176 3101
22b75d0a
DM		 3102 switch (r_type)
3103 {
739f7f82
DM		 3104 case R_SPARC_GOTDATA_OP_HIX22:
3105 case R_SPARC_GOTDATA_OP_LOX10:
5b86074c 3106 if (gdop_relative_offset_ok (info, h, relocation))
cc133f9f
JC		 3107 {
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;
3112 }
00c50991
DM		 3113 break;
3114
3115 case R_SPARC_GOTDATA_OP:
5b86074c 3116 if (gdop_relative_offset_ok (info, h, relocation))
00c50991
DM		 3117 {
3118 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3119
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);
a8735c82
EB		 3123
3124 /* If the symbol is global but not dynamic, an .rela.* slot has
f8745e1c
EB		 3125 been allocated for it in the GOT so output R_SPARC_NONE here,
3126 if it isn't also subject to another, old-style GOT relocation.
3127 See also the handling of these GOT relocations just below. */
a8735c82
EB		 3128 if (h != NULL
3129 && h->dynindx == -1
3130 && !h->forced_local
3131 && h->root.type != bfd_link_hash_undefweak
f8745e1c 3132 && !eh->has_old_style_got_reloc
a8735c82
EB		 3133 && (h->got.offset & 1) == 0
3134 && bfd_link_pic (info))
3135 {
3136 asection *s = htab->elf.srelgot;
3137 Elf_Internal_Rela outrel;
3138
3139 BFD_ASSERT (s != NULL);
3140
3141 memset (&outrel, 0, sizeof outrel);
3142 sparc_elf_append_rela (output_bfd, s, &outrel);
3143 h->got.offset |= 1;
3144 }
00c50991
DM		 3145 }
3146 continue;
3147 }
3148
3149 switch (r_type)
3150 {
3151 case R_SPARC_GOTDATA_HIX22:
3152 case R_SPARC_GOTDATA_LOX10:
3153 relocation = gdopoff (info, relocation);
3154 break;
739f7f82 3155
cc133f9f
JC		 3156 case R_SPARC_GOTDATA_OP_HIX22:
3157 case R_SPARC_GOTDATA_OP_LOX10:
22b75d0a
DM		 3158 case R_SPARC_GOT10:
3159 case R_SPARC_GOT13:
3160 case R_SPARC_GOT22:
3161 /* Relocation is to the entry for this symbol in the global
3162 offset table. */
72fbc6e5 3163 if (htab->elf.sgot == NULL)
22b75d0a
DM		 3164 abort ();
3165
ec1acaba 3166 relative_reloc = FALSE;
22b75d0a
DM		 3167 if (h != NULL)
3168 {
3169 bfd_boolean dyn;
3170
3171 off = h->got.offset;
3172 BFD_ASSERT (off != (bfd_vma) -1);
3173 dyn = elf_hash_table (info)->dynamic_sections_created;
3174
0e1862bb
L		 3175 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn,
3176 bfd_link_pic (info),
3177 h)
3178 || (bfd_link_pic (info)
72fbc6e5 3179 && SYMBOL_REFERENCES_LOCAL (info, h)))
22b75d0a
DM		 3180 {
3181 /* This is actually a static link, or it is a
3182 -Bsymbolic link and the symbol is defined
3183 locally, or the symbol was forced to be local
3184 because of a version file. We must initialize
3185 this entry in the global offset table. Since the
3186 offset must always be a multiple of 8 for 64-bit
3187 and 4 for 32-bit, we use the least significant bit
3188 to record whether we have initialized it already.
3189
3190 When doing a dynamic link, we create a .rela.got
3191 relocation entry to initialize the value. This
3192 is done in the finish_dynamic_symbol routine. */
3193 if ((off & 1) != 0)
3194 off &= ~1;
3195 else
3196 {
a8735c82
EB		 3197 /* If this symbol isn't dynamic in PIC mode, treat it
3198 like a local symbol in PIC mode below. */
ec1acaba
EB		 3199 if (h->dynindx == -1
3200 && !h->forced_local
3201 && h->root.type != bfd_link_hash_undefweak
3202 && bfd_link_pic (info))
a8735c82 3203 relative_reloc = TRUE;
a9d44aad
AM		 3204 else
3205 SPARC_ELF_PUT_WORD (htab, output_bfd, relocation,
3206 htab->elf.sgot->contents + off);
3207 h->got.offset |= 1;
22b75d0a
DM		 3208 }
3209 }
3210 else
3211 unresolved_reloc = FALSE;
3212 }
3213 else
3214 {
3215 BFD_ASSERT (local_got_offsets != NULL
3216 && local_got_offsets[r_symndx] != (bfd_vma) -1);
3217
3218 off = local_got_offsets[r_symndx];
3219
3220 /* The offset must always be a multiple of 8 on 64-bit and
3221 4 on 32-bit. We use the least significant bit to record
3222 whether we have already processed this entry. */
3223 if ((off & 1) != 0)
3224 off &= ~1;
3225 else
3226 {
a8735c82
EB		 3227 /* For a local symbol in PIC mode, we need to generate a
3228 R_SPARC_RELATIVE reloc for the dynamic linker. */
0e1862bb 3229 if (bfd_link_pic (info))
a9d44aad
AM		 3230 relative_reloc = TRUE;
3231 else
3232 SPARC_ELF_PUT_WORD (htab, output_bfd, relocation,
3233 htab->elf.sgot->contents + off);
22b75d0a
DM		 3234 local_got_offsets[r_symndx] |= 1;
3235 }
3236 }
ec1acaba
EB		 3237
3238 if (relative_reloc)
3239 {
a8735c82 3240 asection *s = htab->elf.srelgot;
ec1acaba
EB		 3241 Elf_Internal_Rela outrel;
3242
ec1acaba
EB		 3243 BFD_ASSERT (s != NULL);
3244
3245 outrel.r_offset = (htab->elf.sgot->output_section->vma
3246 + htab->elf.sgot->output_offset
3247 + off);
3248 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3249 0, R_SPARC_RELATIVE);
3250 outrel.r_addend = relocation;
ec1acaba 3251 sparc_elf_append_rela (output_bfd, s, &outrel);
a9d44aad
AM		 3252 /* Versions of glibc ld.so at least up to 2.26 wrongly
3253 add the section contents to the value calculated for
3254 a RELATIVE reloc. Zero the contents to work around
3255 this bug. */
3256 relocation = 0;
3257 SPARC_ELF_PUT_WORD (htab, output_bfd, relocation,
3258 htab->elf.sgot->contents + off);
ec1acaba
EB		 3259 }
3260
72fbc6e5 3261 relocation = htab->elf.sgot->output_offset + off - got_base;
22b75d0a
DM		 3262 break;
3263
3264 case R_SPARC_PLT32:
3265 case R_SPARC_PLT64:
3266 if (h == NULL || h->plt.offset == (bfd_vma) -1)
3267 {
3268 r_type = (r_type == R_SPARC_PLT32) ? R_SPARC_32 : R_SPARC_64;
3269 goto r_sparc_plt32;
3270 }
3271 /* Fall through. */
3272
3273 case R_SPARC_WPLT30:
3274 case R_SPARC_HIPLT22:
3275 case R_SPARC_LOPLT10:
3276 case R_SPARC_PCPLT32:
3277 case R_SPARC_PCPLT22:
3278 case R_SPARC_PCPLT10:
3279 r_sparc_wplt30:
3280 /* Relocation is to the entry for this symbol in the
3281 procedure linkage table. */
3282
3283 if (! ABI_64_P (output_bfd))
3284 {
3285 /* The Solaris native assembler will generate a WPLT30 reloc
3286 for a local symbol if you assemble a call from one
3287 section to another when using -K pic. We treat it as
3288 WDISP30. */
3289 if (h == NULL)
3290 break;
3291 }
68ffbac6 3292 /* PR 7027: We need similar behaviour for 64-bit binaries. */
af1fb11f
NC		 3293 else if (r_type == R_SPARC_WPLT30 && h == NULL)
3294 break;
22b75d0a
DM		 3295 else
3296 {
3297 BFD_ASSERT (h != NULL);
3298 }
3299
72fbc6e5 3300 if (h->plt.offset == (bfd_vma) -1 || htab->elf.splt == NULL)
22b75d0a
DM		 3301 {
3302 /* We didn't make a PLT entry for this symbol. This
3303 happens when statically linking PIC code, or when
3304 using -Bsymbolic. */
3305 break;
3306 }
3307
72fbc6e5
DM		 3308 relocation = (htab->elf.splt->output_section->vma
3309 + htab->elf.splt->output_offset
22b75d0a
DM		 3310 + h->plt.offset);
3311 unresolved_reloc = FALSE;
3312 if (r_type == R_SPARC_PLT32 || r_type == R_SPARC_PLT64)
3313 {
3314 r_type = r_type == R_SPARC_PLT32 ? R_SPARC_32 : R_SPARC_64;
3315 is_plt = TRUE;
3316 goto r_sparc_plt32;
3317 }
3318 break;
3319
3320 case R_SPARC_PC10:
3321 case R_SPARC_PC22:
3322 case R_SPARC_PC_HH22:
3323 case R_SPARC_PC_HM10:
3324 case R_SPARC_PC_LM22:
3325 if (h != NULL
3326 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
3327 break;
3328 /* Fall through. */
3329 case R_SPARC_DISP8:
3330 case R_SPARC_DISP16:
3331 case R_SPARC_DISP32:
3332 case R_SPARC_DISP64:
3333 case R_SPARC_WDISP30:
3334 case R_SPARC_WDISP22:
3335 case R_SPARC_WDISP19:
3336 case R_SPARC_WDISP16:
2615994e 3337 case R_SPARC_WDISP10:
22b75d0a
DM		 3338 case R_SPARC_8:
3339 case R_SPARC_16:
3340 case R_SPARC_32:
3341 case R_SPARC_HI22:
3342 case R_SPARC_22:
3343 case R_SPARC_13:
3344 case R_SPARC_LO10:
3345 case R_SPARC_UA16:
3346 case R_SPARC_UA32:
3347 case R_SPARC_10:
3348 case R_SPARC_11:
3349 case R_SPARC_64:
3350 case R_SPARC_OLO10:
3351 case R_SPARC_HH22:
3352 case R_SPARC_HM10:
3353 case R_SPARC_LM22:
3354 case R_SPARC_7:
3355 case R_SPARC_5:
3356 case R_SPARC_6:
3357 case R_SPARC_HIX22:
3358 case R_SPARC_LOX10:
3359 case R_SPARC_H44:
3360 case R_SPARC_M44:
3361 case R_SPARC_L44:
2615994e 3362 case R_SPARC_H34:
22b75d0a
DM		 3363 case R_SPARC_UA64:
3364 r_sparc_plt32:
c20c30f6 3365 if ((input_section->flags & SEC_ALLOC) == 0 || is_vxworks_tls)
22b75d0a
DM		 3366 break;
3367
07d6d2b8
AM		 3368 /* Copy dynamic function pointer relocations. Don't generate
3369 dynamic relocations against resolved undefined weak symbols
3370 in PIE. */
0e1862bb 3371 if ((bfd_link_pic (info)
22b75d0a 3372 && (h == NULL
a8735c82
EB		 3373 || !(h->root.type == bfd_link_hash_undefweak
3374 && (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
3375 || resolved_to_zero)))
22b75d0a 3376 && (! howto->pc_relative
72fbc6e5 3377 || !SYMBOL_CALLS_LOCAL (info, h)))
0e1862bb 3378 || (!bfd_link_pic (info)
22b75d0a
DM		 3379 && h != NULL
3380 && h->dynindx != -1
3381 && !h->non_got_ref
3382 && ((h->def_dynamic
3383 && !h->def_regular)
bb1dd176 3384 || (h->root.type == bfd_link_hash_undefweak
07d6d2b8 3385 && !resolved_to_zero)
22b75d0a
DM		 3386 || h->root.type == bfd_link_hash_undefined)))
3387 {
3388 Elf_Internal_Rela outrel;
3389 bfd_boolean skip, relocate = FALSE;
3390
3391 /* When generating a shared object, these relocations
3392 are copied into the output file to be resolved at run
3393 time. */
3394
3395 BFD_ASSERT (sreloc != NULL);
3396
3397 skip = FALSE;
3398
3399 outrel.r_offset =
3400 _bfd_elf_section_offset (output_bfd, info, input_section,
3401 rel->r_offset);
3402 if (outrel.r_offset == (bfd_vma) -1)
3403 skip = TRUE;
3404 else if (outrel.r_offset == (bfd_vma) -2)
3405 skip = TRUE, relocate = TRUE;
3406 outrel.r_offset += (input_section->output_section->vma
3407 + input_section->output_offset);
3408
3409 /* Optimize unaligned reloc usage now that we know where
3410 it finally resides. */
3411 switch (r_type)
3412 {
3413 case R_SPARC_16:
3414 if (outrel.r_offset & 1)
3415 r_type = R_SPARC_UA16;
3416 break;
3417 case R_SPARC_UA16:
3418 if (!(outrel.r_offset & 1))
3419 r_type = R_SPARC_16;
3420 break;
3421 case R_SPARC_32:
3422 if (outrel.r_offset & 3)
3423 r_type = R_SPARC_UA32;
3424 break;
3425 case R_SPARC_UA32:
3426 if (!(outrel.r_offset & 3))
3427 r_type = R_SPARC_32;
3428 break;
3429 case R_SPARC_64:
3430 if (outrel.r_offset & 7)
3431 r_type = R_SPARC_UA64;
3432 break;
3433 case R_SPARC_UA64:
3434 if (!(outrel.r_offset & 7))
3435 r_type = R_SPARC_64;
3436 break;
07d6d2b8 3437 case R_SPARC_DISP8:
22b75d0a 3438 case R_SPARC_DISP16:
07d6d2b8
AM		 3439 case R_SPARC_DISP32:
3440 case R_SPARC_DISP64:
22b75d0a
DM		 3441 /* If the symbol is not dynamic, we should not keep
3442 a dynamic relocation. But an .rela.* slot has been
3443 allocated for it, output R_SPARC_NONE.
3444 FIXME: Add code tracking needed dynamic relocs as
3445 e.g. i386 has. */
3446 if (h->dynindx == -1)
3447 skip = TRUE, relocate = TRUE;
3448 break;
3449 }
3450
3451 if (skip)
3452 memset (&outrel, 0, sizeof outrel);
3453 /* h->dynindx may be -1 if the symbol was marked to
3454 become local. */
886a2506
NC		 3455 else if (h != NULL
3456 && h->dynindx != -1
3457 && (_bfd_sparc_elf_howto_table[r_type].pc_relative
0e1862bb 3458 || !bfd_link_pic (info)
72fbc6e5 3459 || !SYMBOLIC_BIND (info, h)
22b75d0a
DM		 3460 || !h->def_regular))
3461 {
22b75d0a
DM		 3462 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, h->dynindx, r_type);
3463 outrel.r_addend = rel->r_addend;
3464 }
3465 else
3466 {
7160c10d
JC		 3467 if ( (!ABI_64_P (output_bfd) && r_type == R_SPARC_32)
3468 || (ABI_64_P (output_bfd) && r_type == R_SPARC_64))
22b75d0a
DM		 3469 {
3470 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL,
3471 0, R_SPARC_RELATIVE);
3472 outrel.r_addend = relocation + rel->r_addend;
3473 }
3474 else
3475 {
3476 long indx;
3477
74541ad4
AM		 3478 outrel.r_addend = relocation + rel->r_addend;
3479
22b75d0a 3480 if (is_plt)
72fbc6e5 3481 sec = htab->elf.splt;
22b75d0a
DM		 3482
3483 if (bfd_is_abs_section (sec))
3484 indx = 0;
3485 else if (sec == NULL || sec->owner == NULL)
3486 {
3487 bfd_set_error (bfd_error_bad_value);
3488 return FALSE;
3489 }
3490 else
3491 {
3492 asection *osec;
3493
74541ad4
AM		 3494 /* We are turning this relocation into one
3495 against a section symbol. It would be
3496 proper to subtract the symbol's value,
3497 osec->vma, from the emitted reloc addend,
3498 but ld.so expects buggy relocs. */
22b75d0a
DM		 3499 osec = sec->output_section;
3500 indx = elf_section_data (osec)->dynindx;
3501
74541ad4
AM		 3502 if (indx == 0)
3503 {
3504 osec = htab->elf.text_index_section;
3505 indx = elf_section_data (osec)->dynindx;
3506 }
3507
22b75d0a
DM		 3508 /* FIXME: we really should be able to link non-pic
3509 shared libraries. */
3510 if (indx == 0)
3511 {
3512 BFD_FAIL ();
4eca0228 3513 _bfd_error_handler
871b3ab2 3514 (_("%pB: probably compiled without -fPIC?"),
22b75d0a
DM		 3515 input_bfd);
3516 bfd_set_error (bfd_error_bad_value);
3517 return FALSE;
3518 }
3519 }
3520
74541ad4
AM		 3521 outrel.r_info = SPARC_ELF_R_INFO (htab, rel, indx,
3522 r_type);
22b75d0a
DM		 3523 }
3524 }
3525
39817122 3526 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
22b75d0a
DM		 3527
3528 /* This reloc will be computed at runtime, so there's no
3529 need to do anything now. */
3530 if (! relocate)
3531 continue;
3532 }
3533 break;
3534
3535 case R_SPARC_TLS_GD_HI22:
22b75d0a
DM		 3536 case R_SPARC_TLS_GD_LO10:
3537 case R_SPARC_TLS_IE_HI22:
3538 case R_SPARC_TLS_IE_LO10:
c20c30f6
EB		 3539 r_type = sparc_elf_tls_transition (info, input_bfd, r_type,
3540 h == NULL || h->dynindx == -1);
3541 if (r_type == R_SPARC_REV32)
3542 break;
3543 if (h != NULL)
3544 tls_type = _bfd_sparc_elf_hash_entry (h)->tls_type;
3545 else if (local_got_offsets)
22b75d0a 3546 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
c20c30f6
EB		 3547 else
3548 tls_type = GOT_UNKNOWN;
22b75d0a
DM		 3549 if (tls_type == GOT_TLS_IE)
3550 switch (r_type)
3551 {
3552 case R_SPARC_TLS_GD_HI22:
3553 r_type = R_SPARC_TLS_IE_HI22;
3554 break;
3555 case R_SPARC_TLS_GD_LO10:
3556 r_type = R_SPARC_TLS_IE_LO10;
3557 break;
3558 }
3559
3560 if (r_type == R_SPARC_TLS_LE_HIX22)
3561 {
3562 relocation = tpoff (info, relocation);
3563 break;
3564 }
3565 if (r_type == R_SPARC_TLS_LE_LOX10)
3566 {
3567 /* Change add into xor. */
3568 relocation = tpoff (info, relocation);
3569 bfd_put_32 (output_bfd, (bfd_get_32 (input_bfd,
3570 contents + rel->r_offset)
3571 | 0x80182000), contents + rel->r_offset);
3572 break;
3573 }
3574
3575 if (h != NULL)
3576 {
3577 off = h->got.offset;
3578 h->got.offset |= 1;
3579 }
3580 else
3581 {
3582 BFD_ASSERT (local_got_offsets != NULL);
3583 off = local_got_offsets[r_symndx];
3584 local_got_offsets[r_symndx] |= 1;
3585 }
3586
3587 r_sparc_tlsldm:
72fbc6e5 3588 if (htab->elf.sgot == NULL)
22b75d0a
DM		 3589 abort ();
3590
3591 if ((off & 1) != 0)
3592 off &= ~1;
3593 else
3594 {
3595 Elf_Internal_Rela outrel;
3596 int dr_type, indx;
3597
72fbc6e5 3598 if (htab->elf.srelgot == NULL)
22b75d0a
DM		 3599 abort ();
3600
72fbc6e5
DM		 3601 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
3602 htab->elf.sgot->contents + off);
3603 outrel.r_offset = (htab->elf.sgot->output_section->vma
3604 + htab->elf.sgot->output_offset + off);
22b75d0a
DM		 3605 indx = h && h->dynindx != -1 ? h->dynindx : 0;
3606 if (r_type == R_SPARC_TLS_IE_HI22
3607 || r_type == R_SPARC_TLS_IE_LO10)
3608 dr_type = SPARC_ELF_TPOFF_RELOC (htab);
3609 else
3610 dr_type = SPARC_ELF_DTPMOD_RELOC (htab);
3611 if (dr_type == SPARC_ELF_TPOFF_RELOC (htab) && indx == 0)
3612 outrel.r_addend = relocation - dtpoff_base (info);
3613 else
3614 outrel.r_addend = 0;
3615 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, indx, dr_type);
72fbc6e5 3616 sparc_elf_append_rela (output_bfd, htab->elf.srelgot, &outrel);
22b75d0a
DM		 3617
3618 if (r_type == R_SPARC_TLS_GD_HI22
3619 || r_type == R_SPARC_TLS_GD_LO10)
3620 {
3621 if (indx == 0)
3622 {
07d6d2b8 3623 BFD_ASSERT (! unresolved_reloc);
22b75d0a
DM		 3624 SPARC_ELF_PUT_WORD (htab, output_bfd,
3625 relocation - dtpoff_base (info),
72fbc6e5 3626 (htab->elf.sgot->contents + off
22b75d0a
DM		 3627 + SPARC_ELF_WORD_BYTES (htab)));
3628 }
3629 else
3630 {
3631 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
72fbc6e5 3632 (htab->elf.sgot->contents + off
22b75d0a
DM		 3633 + SPARC_ELF_WORD_BYTES (htab)));
3634 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, indx,
3635 SPARC_ELF_DTPOFF_RELOC (htab));
3636 outrel.r_offset += SPARC_ELF_WORD_BYTES (htab);
72fbc6e5 3637 sparc_elf_append_rela (output_bfd, htab->elf.srelgot,
39817122 3638 &outrel);
22b75d0a
DM		 3639 }
3640 }
3641 else if (dr_type == SPARC_ELF_DTPMOD_RELOC (htab))
3642 {
3643 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
72fbc6e5 3644 (htab->elf.sgot->contents + off
22b75d0a
DM		 3645 + SPARC_ELF_WORD_BYTES (htab)));
3646 }
3647 }
3648
3649 if (off >= (bfd_vma) -2)
3650 abort ();
3651
72fbc6e5 3652 relocation = htab->elf.sgot->output_offset + off - got_base;
22b75d0a
DM		 3653 unresolved_reloc = FALSE;
3654 howto = _bfd_sparc_elf_howto_table + r_type;
3655 break;
3656
3657 case R_SPARC_TLS_LDM_HI22:
3658 case R_SPARC_TLS_LDM_LO10:
c20c30f6
EB		 3659 /* LD -> LE */
3660 if (bfd_link_executable (info))
22b75d0a
DM		 3661 {
3662 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3663 continue;
3664 }
3665 off = htab->tls_ldm_got.offset;
3666 htab->tls_ldm_got.offset |= 1;
3667 goto r_sparc_tlsldm;
3668
3669 case R_SPARC_TLS_LDO_HIX22:
3670 case R_SPARC_TLS_LDO_LOX10:
c20c30f6
EB		 3671 /* LD -> LE */
3672 if (bfd_link_executable (info))
3673 {
3674 if (r_type == R_SPARC_TLS_LDO_HIX22)
3675 r_type = R_SPARC_TLS_LE_HIX22;
3676 else
3677 r_type = R_SPARC_TLS_LE_LOX10;
3678 }
3679 else
22b75d0a
DM		 3680 {
3681 relocation -= dtpoff_base (info);
3682 break;
3683 }
22b75d0a
DM		 3684 /* Fall through. */
3685
3686 case R_SPARC_TLS_LE_HIX22:
3687 case R_SPARC_TLS_LE_LOX10:
c20c30f6 3688 if (!bfd_link_executable (info))
22b75d0a
DM		 3689 {
3690 Elf_Internal_Rela outrel;
c20c30f6
EB		 3691 bfd_vma offset
3692 = _bfd_elf_section_offset (output_bfd, info, input_section,
3693 rel->r_offset);
3694 if (offset == (bfd_vma) -1 || offset == (bfd_vma) -2)
22b75d0a
DM		 3695 memset (&outrel, 0, sizeof outrel);
3696 else
3697 {
c20c30f6
EB		 3698 outrel.r_offset = offset
3699 + input_section->output_section->vma
3700 + input_section->output_offset;
22b75d0a 3701 outrel.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, r_type);
c20c30f6
EB		 3702 outrel.r_addend
3703 = relocation - dtpoff_base (info) + rel->r_addend;
22b75d0a
DM		 3704 }
3705
c20c30f6 3706 BFD_ASSERT (sreloc != NULL);
39817122 3707 sparc_elf_append_rela (output_bfd, sreloc, &outrel);
22b75d0a
DM		 3708 continue;
3709 }
3710 relocation = tpoff (info, relocation);
3711 break;
3712
3713 case R_SPARC_TLS_LDM_CALL:
c20c30f6
EB		 3714 /* LD -> LE */
3715 if (bfd_link_executable (info))
22b75d0a
DM		 3716 {
3717 /* mov %g0, %o0 */
3718 bfd_put_32 (output_bfd, 0x90100000, contents + rel->r_offset);
3719 continue;
3720 }
3721 /* Fall through */
3722
3723 case R_SPARC_TLS_GD_CALL:
c20c30f6
EB		 3724 if (h != NULL)
3725 tls_type = _bfd_sparc_elf_hash_entry (h)->tls_type;
3726 else if (local_got_offsets)
22b75d0a 3727 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
c20c30f6
EB		 3728 else
3729 tls_type = GOT_UNKNOWN;
3730 /* GD -> IE or LE */
3731 if (bfd_link_executable (info)
22b75d0a
DM		 3732 || (r_type == R_SPARC_TLS_GD_CALL && tls_type == GOT_TLS_IE))
3733 {
abd242a9 3734 Elf_Internal_Rela *rel2;
22b75d0a
DM		 3735 bfd_vma insn;
3736
c20c30f6
EB		 3737 /* GD -> LE */
3738 if (bfd_link_executable (info) && (h == NULL || h->dynindx == -1))
22b75d0a 3739 {
22b75d0a
DM		 3740 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3741 continue;
3742 }
3743
3744 /* GD -> IE */
3745 if (rel + 1 < relend
3746 && SPARC_ELF_R_TYPE (rel[1].r_info) == R_SPARC_TLS_GD_ADD
3747 && rel[1].r_offset == rel->r_offset + 4
3748 && SPARC_ELF_R_SYMNDX (htab, rel[1].r_info) == r_symndx
3749 && (((insn = bfd_get_32 (input_bfd,
3750 contents + rel[1].r_offset))
3751 >> 25) & 0x1f) == 8)
3752 {
3753 /* We have
3754 call __tls_get_addr, %tgd_call(foo)
3755 add %reg1, %reg2, %o0, %tgd_add(foo)
3756 and change it into IE:
3757 {ld,ldx} [%reg1 + %reg2], %o0, %tie_ldx(foo)
3758 add %g7, %o0, %o0, %tie_add(foo).
3759 add is 0x80000000 | (rd << 25) | (rs1 << 14) | rs2,
3760 ld is 0xc0000000 | (rd << 25) | (rs1 << 14) | rs2,
3761 ldx is 0xc0580000 | (rd << 25) | (rs1 << 14) | rs2. */
3762 bfd_put_32 (output_bfd, insn | (ABI_64_P (output_bfd) ? 0xc0580000 : 0xc0000000),
3763 contents + rel->r_offset);
3764 bfd_put_32 (output_bfd, 0x9001c008,
3765 contents + rel->r_offset + 4);
3766 rel++;
3767 continue;
3768 }
3769
abd242a9
DM		 3770 /* We cannot just overwrite the delay slot instruction,
3771 as it might be what puts the %o0 argument to
3772 __tls_get_addr into place. So we have to transpose
3773 the delay slot with the add we patch in. */
3774 insn = bfd_get_32 (input_bfd, contents + rel->r_offset + 4);
3775 bfd_put_32 (output_bfd, insn,
3776 contents + rel->r_offset);
3777 bfd_put_32 (output_bfd, 0x9001c008,
3778 contents + rel->r_offset + 4);
3779
3780 rel2 = rel;
3781 while ((rel2 = sparc_elf_find_reloc_at_ofs (rel2 + 1, relend,
3782 rel->r_offset + 4))
3783 != NULL)
3784 {
3785 /* If the instruction we moved has a relocation attached to
3786 it, adjust the offset so that it will apply to the correct
3787 instruction. */
3788 rel2->r_offset -= 4;
3789 }
22b75d0a
DM		 3790 continue;
3791 }
3792
3793 h = (struct elf_link_hash_entry *)
3794 bfd_link_hash_lookup (info->hash, "__tls_get_addr", FALSE,
3795 FALSE, TRUE);
3796 BFD_ASSERT (h != NULL);
3797 r_type = R_SPARC_WPLT30;
3798 howto = _bfd_sparc_elf_howto_table + r_type;
3799 goto r_sparc_wplt30;
3800
3801 case R_SPARC_TLS_GD_ADD:
c20c30f6
EB		 3802 if (h != NULL)
3803 tls_type = _bfd_sparc_elf_hash_entry (h)->tls_type;
3804 else if (local_got_offsets)
22b75d0a 3805 tls_type = _bfd_sparc_elf_local_got_tls_type (input_bfd) [r_symndx];
c20c30f6
EB		 3806 else
3807 tls_type = GOT_UNKNOWN;
3808 /* GD -> IE or LE */
3809 if (bfd_link_executable (info) || tls_type == GOT_TLS_IE)
22b75d0a
DM		 3810 {
3811 /* add %reg1, %reg2, %reg3, %tgd_add(foo)
3812 changed into IE:
3813 {ld,ldx} [%reg1 + %reg2], %reg3, %tie_ldx(foo)
3814 or LE:
3815 add %g7, %reg2, %reg3. */
3816 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
c20c30f6 3817 if (bfd_link_executable (info) && (h == NULL || h->dynindx == -1))
22b75d0a 3818 relocation = (insn & ~0x7c000) | 0x1c000;
c20c30f6
EB		 3819 else
3820 relocation = insn | (ABI_64_P (output_bfd) ? 0xc0580000 : 0xc0000000);
22b75d0a
DM		 3821 bfd_put_32 (output_bfd, relocation, contents + rel->r_offset);
3822 }
3823 continue;
3824
3825 case R_SPARC_TLS_LDM_ADD:
c20c30f6
EB		 3826 /* LD -> LE */
3827 if (bfd_link_executable (info))
22b75d0a
DM		 3828 bfd_put_32 (output_bfd, SPARC_NOP, contents + rel->r_offset);
3829 continue;
3830
3831 case R_SPARC_TLS_LDO_ADD:
c20c30f6
EB		 3832 /* LD -> LE */
3833 if (bfd_link_executable (info))
22b75d0a
DM		 3834 {
3835 /* Change rs1 into %g7. */
3836 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3837 insn = (insn & ~0x7c000) | 0x1c000;
3838 bfd_put_32 (output_bfd, insn, contents + rel->r_offset);
3839 }
3840 continue;
3841
3842 case R_SPARC_TLS_IE_LD:
3843 case R_SPARC_TLS_IE_LDX:
c20c30f6
EB		 3844 /* IE -> LE */
3845 if (bfd_link_executable (info) && (h == NULL || h->dynindx == -1))
22b75d0a
DM		 3846 {
3847 bfd_vma insn = bfd_get_32 (input_bfd, contents + rel->r_offset);
3848 int rs2 = insn & 0x1f;
3849 int rd = (insn >> 25) & 0x1f;
3850
3851 if (rs2 == rd)
3852 relocation = SPARC_NOP;
3853 else
3854 relocation = 0x80100000 | (insn & 0x3e00001f);
3855 bfd_put_32 (output_bfd, relocation, contents + rel->r_offset);
3856 }
3857 continue;
3858
3859 case R_SPARC_TLS_IE_ADD:
3860 /* Totally useless relocation. */
3861 continue;
3862
3863 case R_SPARC_TLS_DTPOFF32:
3864 case R_SPARC_TLS_DTPOFF64:
3865 relocation -= dtpoff_base (info);
3866 break;
3867
3868 default:
3869 break;
3870 }
3871
3872 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3873 because such sections are not SEC_ALLOC and thus ld.so will
3874 not process them. */
3875 if (unresolved_reloc
3876 && !((input_section->flags & SEC_DEBUGGING) != 0
1d5316ab
AM		 3877 && h->def_dynamic)
3878 && _bfd_elf_section_offset (output_bfd, info, input_section,
3879 rel->r_offset) != (bfd_vma) -1)
4eca0228 3880 _bfd_error_handler
695344c0 3881 /* xgettext:c-format */
2dcf00ce
AM		 3882 (_("%pB(%pA+%#" PRIx64 "): "
3883 "unresolvable %s relocation against symbol `%s'"),
22b75d0a
DM		 3884 input_bfd,
3885 input_section,
2dcf00ce 3886 (uint64_t) rel->r_offset,
843fe662 3887 howto->name,
22b75d0a
DM		 3888 h->root.root.string);
3889
3890 r = bfd_reloc_continue;
3891 if (r_type == R_SPARC_OLO10)
3892 {
3893 bfd_vma x;
3894
3895 if (! ABI_64_P (output_bfd))
3896 abort ();
3897
3898 relocation += rel->r_addend;
3899 relocation = (relocation & 0x3ff) + ELF64_R_TYPE_DATA (rel->r_info);
3900
3901 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3902 x = (x & ~(bfd_vma) 0x1fff) | (relocation & 0x1fff);
3903 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3904
3905 r = bfd_check_overflow (howto->complain_on_overflow,
3906 howto->bitsize, howto->rightshift,
3907 bfd_arch_bits_per_address (input_bfd),
3908 relocation);
3909 }
3910 else if (r_type == R_SPARC_WDISP16)
3911 {
3912 bfd_vma x;
3913
3914 relocation += rel->r_addend;
3915 relocation -= (input_section->output_section->vma
3916 + input_section->output_offset);
3917 relocation -= rel->r_offset;
3918
3919 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3920 x |= ((((relocation >> 2) & 0xc000) << 6)
3921 | ((relocation >> 2) & 0x3fff));
3922 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3923
2615994e
DM		 3924 r = bfd_check_overflow (howto->complain_on_overflow,
3925 howto->bitsize, howto->rightshift,
3926 bfd_arch_bits_per_address (input_bfd),
3927 relocation);
3928 }
3929 else if (r_type == R_SPARC_WDISP10)
3930 {
3931 bfd_vma x;
3932
3933 relocation += rel->r_addend;
3934 relocation -= (input_section->output_section->vma
3935 + input_section->output_offset);
3936 relocation -= rel->r_offset;
3937
3938 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3939 x |= ((((relocation >> 2) & 0x300) << 11)
3940 | (((relocation >> 2) & 0xff) << 5));
3941 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3942
22b75d0a
DM		 3943 r = bfd_check_overflow (howto->complain_on_overflow,
3944 howto->bitsize, howto->rightshift,
3945 bfd_arch_bits_per_address (input_bfd),
3946 relocation);
3947 }
3948 else if (r_type == R_SPARC_REV32)
3949 {
3950 bfd_vma x;
3951
3952 relocation = relocation + rel->r_addend;
3953
3954 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3955 x = x + relocation;
3956 bfd_putl32 (/*input_bfd,*/ x, contents + rel->r_offset);
3957 r = bfd_reloc_ok;
3958 }
3959 else if (r_type == R_SPARC_TLS_LDO_HIX22
3960 || r_type == R_SPARC_TLS_LE_HIX22)
3961 {
3962 bfd_vma x;
3963
3964 relocation += rel->r_addend;
3965 if (r_type == R_SPARC_TLS_LE_HIX22)
3966 relocation ^= MINUS_ONE;
3967
3968 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3969 x = (x & ~(bfd_vma) 0x3fffff) | ((relocation >> 10) & 0x3fffff);
3970 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3971 r = bfd_reloc_ok;
3972 }
3973 else if (r_type == R_SPARC_TLS_LDO_LOX10
3974 || r_type == R_SPARC_TLS_LE_LOX10)
3975 {
3976 bfd_vma x;
3977
3978 relocation += rel->r_addend;
3979 relocation &= 0x3ff;
3980 if (r_type == R_SPARC_TLS_LE_LOX10)
3981 relocation |= 0x1c00;
3982
3983 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
3984 x = (x & ~(bfd_vma) 0x1fff) | relocation;
3985 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
3986
3987 r = bfd_reloc_ok;
3988 }
00c50991 3989 else if (r_type == R_SPARC_HIX22
cc133f9f
JC		 3990 || r_type == R_SPARC_GOTDATA_HIX22
3991 || r_type == R_SPARC_GOTDATA_OP_HIX22)
22b75d0a
DM		 3992 {
3993 bfd_vma x;
3994
3995 relocation += rel->r_addend;
00c50991
DM		 3996 if (r_type == R_SPARC_HIX22
3997 || (bfd_signed_vma) relocation < 0)
3998 relocation = relocation ^ MINUS_ONE;
22b75d0a
DM		 3999
4000 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4001 x = (x & ~(bfd_vma) 0x3fffff) | ((relocation >> 10) & 0x3fffff);
4002 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4003
4004 r = bfd_check_overflow (howto->complain_on_overflow,
4005 howto->bitsize, howto->rightshift,
4006 bfd_arch_bits_per_address (input_bfd),
4007 relocation);
4008 }
00c50991 4009 else if (r_type == R_SPARC_LOX10
cc133f9f
JC		 4010 || r_type == R_SPARC_GOTDATA_LOX10
4011 || r_type == R_SPARC_GOTDATA_OP_LOX10)
22b75d0a
DM		 4012 {
4013 bfd_vma x;
4014
4015 relocation += rel->r_addend;
00c50991
DM		 4016 if (r_type == R_SPARC_LOX10
4017 || (bfd_signed_vma) relocation < 0)
4018 relocation = (relocation & 0x3ff) | 0x1c00;
4019 else
4020 relocation = (relocation & 0x3ff);
22b75d0a
DM		 4021
4022 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4023 x = (x & ~(bfd_vma) 0x1fff) | relocation;
4024 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4025
4026 r = bfd_reloc_ok;
4027 }
4028 else if ((r_type == R_SPARC_WDISP30 || r_type == R_SPARC_WPLT30)
4029 && sec_do_relax (input_section)
4030 && rel->r_offset + 4 < input_section->size)
4031 {
4032#define G0 0
4033#define O7 15
4034#define XCC (2 << 20)
4035#define COND(x) (((x)&0xf)<<25)
4036#define CONDA COND(0x8)
4037#define INSN_BPA (F2(0,1) | CONDA | BPRED | XCC)
4038#define INSN_BA (F2(0,2) | CONDA)
4039#define INSN_OR F3(2, 0x2, 0)
4040#define INSN_NOP F2(0,4)
4041
4042 bfd_vma x, y;
4043
4044 /* If the instruction is a call with either:
4045 restore
4046 arithmetic instruction with rd == %o7
4047 where rs1 != %o7 and rs2 if it is register != %o7
4048 then we can optimize if the call destination is near
4049 by changing the call into a branch always. */
4050 x = bfd_get_32 (input_bfd, contents + rel->r_offset);
4051 y = bfd_get_32 (input_bfd, contents + rel->r_offset + 4);
4052 if ((x & OP(~0)) == OP(1) && (y & OP(~0)) == OP(2))
4053 {
4054 if (((y & OP3(~0)) == OP3(0x3d) /* restore */
4055 || ((y & OP3(0x28)) == 0 /* arithmetic */
4056 && (y & RD(~0)) == RD(O7)))
4057 && (y & RS1(~0)) != RS1(O7)
4058 && ((y & F3I(~0))
4059 || (y & RS2(~0)) != RS2(O7)))
4060 {
4061 bfd_vma reloc;
4062
4063 reloc = relocation + rel->r_addend - rel->r_offset;
4064 reloc -= (input_section->output_section->vma
4065 + input_section->output_offset);
4066
4067 /* Ensure the branch fits into simm22. */
4068 if ((reloc & 3) == 0
4069 && ((reloc & ~(bfd_vma)0x7fffff) == 0
4070 || ((reloc | 0x7fffff) == ~(bfd_vma)0)))
4071 {
4072 reloc >>= 2;
4073
4074 /* Check whether it fits into simm19. */
4075 if (((reloc & 0x3c0000) == 0
4076 || (reloc & 0x3c0000) == 0x3c0000)
4077 && (ABI_64_P (output_bfd)
4078 || elf_elfheader (output_bfd)->e_flags & EF_SPARC_32PLUS))
4079 x = INSN_BPA | (reloc & 0x7ffff); /* ba,pt %xcc */
4080 else
4081 x = INSN_BA | (reloc & 0x3fffff); /* ba */
4082 bfd_put_32 (input_bfd, x, contents + rel->r_offset);
4083 r = bfd_reloc_ok;
4084 if (rel->r_offset >= 4
4085 && (y & (0xffffffff ^ RS1(~0)))
4086 == (INSN_OR | RD(O7) | RS2(G0)))
4087 {
4088 bfd_vma z;
4089 unsigned int reg;
4090
4091 z = bfd_get_32 (input_bfd,
4092 contents + rel->r_offset - 4);
4093 if ((z & (0xffffffff ^ RD(~0)))
4094 != (INSN_OR | RS1(O7) | RS2(G0)))
597e138c 4095 continue;
22b75d0a
DM		 4096
4097 /* The sequence was
4098 or %o7, %g0, %rN
4099 call foo
4100 or %rN, %g0, %o7
4101
4102 If call foo was replaced with ba, replace
4103 or %rN, %g0, %o7 with nop. */
4104
4105 reg = (y & RS1(~0)) >> 14;
4106 if (reg != ((z & RD(~0)) >> 25)
4107 || reg == G0 || reg == O7)
597e138c 4108 continue;
22b75d0a
DM		 4109
4110 bfd_put_32 (input_bfd, (bfd_vma) INSN_NOP,
4111 contents + rel->r_offset + 4);
4112 }
4113
4114 }
4115 }
4116 }
4117 }
4118
4119 if (r == bfd_reloc_continue)
d0c9aeb3 4120 {
dc1e8a47 4121 do_relocation:
d0c9aeb3
DM		 4122 r = _bfd_final_link_relocate (howto, input_bfd, input_section,
4123 contents, rel->r_offset,
4124 relocation, rel->r_addend);
4125 }
22b75d0a
DM		 4126 if (r != bfd_reloc_ok)
4127 {
4128 switch (r)
4129 {
4130 default:
4131 case bfd_reloc_outofrange:
4132 abort ();
4133 case bfd_reloc_overflow:
4134 {
4135 const char *name;
4136
68ffbac6 4137 /* The Solaris native linker silently disregards overflows.
dc669dc8
EB		 4138 We don't, but this breaks stabs debugging info, whose
4139 relocations are only 32-bits wide. Ignore overflows in
4140 this case and also for discarded entries. */
0bef263a
RO		 4141 if ((r_type == R_SPARC_32
4142 || r_type == R_SPARC_UA32
4143 || r_type == R_SPARC_DISP32)
dc669dc8 4144 && (((input_section->flags & SEC_DEBUGGING) != 0
fd361982 4145 && strcmp (bfd_section_name (input_section),
dc669dc8
EB		 4146 ".stab") == 0)
4147 || _bfd_elf_section_offset (output_bfd, info,
4148 input_section,
4149 rel->r_offset)
4150 == (bfd_vma)-1))
4151 break;
4152
22b75d0a 4153 if (h != NULL)
bb29dfea
EB		 4154 {
4155 /* Assume this is a call protected by other code that
4156 detect the symbol is undefined. If this is the case,
4157 we can safely ignore the overflow. If not, the
4158 program is hosed anyway, and a little warning isn't
4159 going to help. */
4160 if (h->root.type == bfd_link_hash_undefweak
4161 && howto->pc_relative)
4162 break;
4163
07d6d2b8 4164 name = NULL;
bb29dfea 4165 }
22b75d0a
DM		 4166 else
4167 {
4168 name = bfd_elf_string_from_elf_section (input_bfd,
4169 symtab_hdr->sh_link,
4170 sym->st_name);
4171 if (name == NULL)
4172 return FALSE;
4173 if (*name == '\0')
fd361982 4174 name = bfd_section_name (sec);
22b75d0a 4175 }
1a72702b
AM		 4176 (*info->callbacks->reloc_overflow)
4177 (info, (h ? &h->root : NULL), name, howto->name,
4178 (bfd_vma) 0, input_bfd, input_section, rel->r_offset);
22b75d0a
DM		 4179 }
4180 break;
4181 }
4182 }
4183 }
4184
4185 return TRUE;
4186}
4187
910600e9
RS		 4188/* Build a VxWorks PLT entry. PLT_INDEX is the index of the PLT entry
4189 and PLT_OFFSET is the byte offset from the start of .plt. GOT_OFFSET
4190 is the offset of the associated .got.plt entry from
4191 _GLOBAL_OFFSET_TABLE_. */
4192
4193static void
4194sparc_vxworks_build_plt_entry (bfd *output_bfd, struct bfd_link_info *info,
4195 bfd_vma plt_offset, bfd_vma plt_index,
4196 bfd_vma got_offset)
4197{
4198 bfd_vma got_base;
4199 const bfd_vma *plt_entry;
4200 struct _bfd_sparc_elf_link_hash_table *htab;
4201 bfd_byte *loc;
4202 Elf_Internal_Rela rela;
4203
4204 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6
NC		 4205 BFD_ASSERT (htab != NULL);
4206
0e1862bb 4207 if (bfd_link_pic (info))
910600e9
RS		 4208 {
4209 plt_entry = sparc_vxworks_shared_plt_entry;
4210 got_base = 0;
4211 }
4212 else
4213 {
4214 plt_entry = sparc_vxworks_exec_plt_entry;
4215 got_base = (htab->elf.hgot->root.u.def.value
4216 + htab->elf.hgot->root.u.def.section->output_offset
4217 + htab->elf.hgot->root.u.def.section->output_section->vma);
4218 }
4219
4220 /* Fill in the entry in the procedure linkage table. */
4221 bfd_put_32 (output_bfd, plt_entry[0] + ((got_base + got_offset) >> 10),
72fbc6e5 4222 htab->elf.splt->contents + plt_offset);
910600e9 4223 bfd_put_32 (output_bfd, plt_entry[1] + ((got_base + got_offset) & 0x3ff),
72fbc6e5 4224 htab->elf.splt->contents + plt_offset + 4);
910600e9 4225 bfd_put_32 (output_bfd, plt_entry[2],
72fbc6e5 4226 htab->elf.splt->contents + plt_offset + 8);
910600e9 4227 bfd_put_32 (output_bfd, plt_entry[3],
72fbc6e5 4228 htab->elf.splt->contents + plt_offset + 12);
910600e9 4229 bfd_put_32 (output_bfd, plt_entry[4],
72fbc6e5 4230 htab->elf.splt->contents + plt_offset + 16);
910600e9 4231 bfd_put_32 (output_bfd, plt_entry[5] + (plt_index >> 10),
72fbc6e5 4232 htab->elf.splt->contents + plt_offset + 20);
910600e9
RS		 4233 /* PC-relative displacement for a branch to the start of
4234 the PLT section. */
4235 bfd_put_32 (output_bfd, plt_entry[6] + (((-plt_offset - 24) >> 2)
4236 & 0x003fffff),
72fbc6e5 4237 htab->elf.splt->contents + plt_offset + 24);
910600e9 4238 bfd_put_32 (output_bfd, plt_entry[7] + (plt_index & 0x3ff),
72fbc6e5 4239 htab->elf.splt->contents + plt_offset + 28);
910600e9
RS		 4240
4241 /* Fill in the .got.plt entry, pointing initially at the
4242 second half of the PLT entry. */
72fbc6e5 4243 BFD_ASSERT (htab->elf.sgotplt != NULL);
910600e9 4244 bfd_put_32 (output_bfd,
72fbc6e5
DM		 4245 htab->elf.splt->output_section->vma
4246 + htab->elf.splt->output_offset
910600e9 4247 + plt_offset + 20,
72fbc6e5 4248 htab->elf.sgotplt->contents + got_offset);
910600e9
RS		 4249
4250 /* Add relocations to .rela.plt.unloaded. */
0e1862bb 4251 if (!bfd_link_pic (info))
910600e9
RS		 4252 {
4253 loc = (htab->srelplt2->contents
4254 + (2 + 3 * plt_index) * sizeof (Elf32_External_Rela));
4255
4256 /* Relocate the initial sethi. */
72fbc6e5
DM		 4257 rela.r_offset = (htab->elf.splt->output_section->vma
4258 + htab->elf.splt->output_offset
910600e9
RS		 4259 + plt_offset);
4260 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4261 rela.r_addend = got_offset;
4262 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4263 loc += sizeof (Elf32_External_Rela);
4264
4265 /* Likewise the following or. */
4266 rela.r_offset += 4;
4267 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4268 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4269 loc += sizeof (Elf32_External_Rela);
4270
4271 /* Relocate the .got.plt entry. */
72fbc6e5
DM		 4272 rela.r_offset = (htab->elf.sgotplt->output_section->vma
4273 + htab->elf.sgotplt->output_offset
910600e9
RS		 4274 + got_offset);
4275 rela.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_SPARC_32);
4276 rela.r_addend = plt_offset + 20;
4277 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4278 }
4279}
4280
22b75d0a
DM		 4281/* Finish up dynamic symbol handling. We set the contents of various
4282 dynamic sections here. */
4283
4284bfd_boolean
4285_bfd_sparc_elf_finish_dynamic_symbol (bfd *output_bfd,
4286 struct bfd_link_info *info,
4287 struct elf_link_hash_entry *h,
4288 Elf_Internal_Sym *sym)
4289{
22b75d0a 4290 struct _bfd_sparc_elf_link_hash_table *htab;
39817122 4291 const struct elf_backend_data *bed;
bb1dd176 4292 struct _bfd_sparc_elf_link_hash_entry *eh;
a8735c82 4293 bfd_boolean resolved_to_zero;
22b75d0a
DM		 4294
4295 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 4296 BFD_ASSERT (htab != NULL);
39817122 4297 bed = get_elf_backend_data (output_bfd);
22b75d0a 4298
bb1dd176
QZ		 4299 eh = (struct _bfd_sparc_elf_link_hash_entry *) h;
4300
4301 /* We keep PLT/GOT entries without dynamic PLT/GOT relocations for
4302 resolved undefined weak symbols in executable so that their
4303 references have value 0 at run-time. */
a8735c82 4304 resolved_to_zero = UNDEFINED_WEAK_RESOLVED_TO_ZERO (info, eh);
bb1dd176 4305
22b75d0a
DM		 4306 if (h->plt.offset != (bfd_vma) -1)
4307 {
4308 asection *splt;
4309 asection *srela;
4310 Elf_Internal_Rela rela;
4311 bfd_byte *loc;
910600e9 4312 bfd_vma r_offset, got_offset;
22b75d0a
DM		 4313 int rela_index;
4314
d0c9aeb3
DM		 4315 /* When building a static executable, use .iplt and
4316 .rela.iplt sections for STT_GNU_IFUNC symbols. */
4317 if (htab->elf.splt != NULL)
4318 {
4319 splt = htab->elf.splt;
4320 srela = htab->elf.srelplt;
4321 }
4322 else
4323 {
4324 splt = htab->elf.iplt;
4325 srela = htab->elf.irelplt;
4326 }
22b75d0a 4327
d0c9aeb3
DM		 4328 if (splt == NULL || srela == NULL)
4329 abort ();
22b75d0a 4330
22b75d0a 4331 /* Fill in the entry in the .rela.plt section. */
910600e9 4332 if (htab->is_vxworks)
22b75d0a 4333 {
910600e9
RS		 4334 /* Work out the index of this PLT entry. */
4335 rela_index = ((h->plt.offset - htab->plt_header_size)
4336 / htab->plt_entry_size);
4337
4338 /* Calculate the offset of the associated .got.plt entry.
4339 The first three entries are reserved. */
4340 got_offset = (rela_index + 3) * 4;
4341
4342 sparc_vxworks_build_plt_entry (output_bfd, info, h->plt.offset,
4343 rela_index, got_offset);
4344
4345
4346 /* On VxWorks, the relocation points to the .got.plt entry,
4347 not the .plt entry. */
72fbc6e5
DM		 4348 rela.r_offset = (htab->elf.sgotplt->output_section->vma
4349 + htab->elf.sgotplt->output_offset
910600e9 4350 + got_offset);
22b75d0a 4351 rela.r_addend = 0;
d0c9aeb3
DM		 4352 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4353 R_SPARC_JMP_SLOT);
22b75d0a
DM		 4354 }
4355 else
4356 {
d0c9aeb3
DM		 4357 bfd_boolean ifunc = FALSE;
4358
910600e9
RS		 4359 /* Fill in the entry in the procedure linkage table. */
4360 rela_index = SPARC_ELF_BUILD_PLT_ENTRY (htab, output_bfd, splt,
4361 h->plt.offset, splt->size,
4362 &r_offset);
4363
d0c9aeb3
DM		 4364 if (h == NULL
4365 || h->dynindx == -1
0e1862bb 4366 || ((bfd_link_executable (info)
d0c9aeb3
DM		 4367 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
4368 && h->def_regular
4369 && h->type == STT_GNU_IFUNC))
4370 {
4371 ifunc = TRUE;
4372 BFD_ASSERT (h == NULL
4373 || (h->type == STT_GNU_IFUNC
4374 && h->def_regular
4375 && (h->root.type == bfd_link_hash_defined
4376 || h->root.type == bfd_link_hash_defweak)));
4377 }
4378
910600e9
RS		 4379 rela.r_offset = r_offset
4380 + (splt->output_section->vma + splt->output_offset);
d0c9aeb3
DM		 4381 if (ABI_64_P (output_bfd)
4382 && h->plt.offset >= (PLT64_LARGE_THRESHOLD * PLT64_ENTRY_SIZE))
910600e9 4383 {
d0c9aeb3
DM		 4384 if (ifunc)
4385 {
4386 rela.r_addend = (h->root.u.def.section->output_section->vma
4387 + h->root.u.def.section->output_offset
4388 + h->root.u.def.value);
4389 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0,
4390 R_SPARC_IRELATIVE);
4391 }
4392 else
4393 {
4394 rela.r_addend = (-(h->plt.offset + 4)
4395 - splt->output_section->vma
4396 - splt->output_offset);
4397 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4398 R_SPARC_JMP_SLOT);
4399 }
910600e9
RS		 4400 }
4401 else
4402 {
d0c9aeb3
DM		 4403 if (ifunc)
4404 {
4405 rela.r_addend = (h->root.u.def.section->output_section->vma
4406 + h->root.u.def.section->output_offset
4407 + h->root.u.def.value);
4408 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0,
4409 R_SPARC_JMP_IREL);
4410 }
4411 else
4412 {
4413 rela.r_addend = 0;
4414 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx,
4415 R_SPARC_JMP_SLOT);
4416 }
910600e9 4417 }
22b75d0a 4418 }
22b75d0a
DM		 4419
4420 /* Adjust for the first 4 reserved elements in the .plt section
4421 when setting the offset in the .rela.plt section.
4422 Sun forgot to read their own ABI and copied elf32-sparc behaviour,
4423 thus .plt[4] has corresponding .rela.plt[0] and so on. */
4424
4425 loc = srela->contents;
39817122
RS		 4426 loc += rela_index * bed->s->sizeof_rela;
4427 bed->s->swap_reloca_out (output_bfd, &rela, loc);
22b75d0a 4428
a8735c82 4429 if (!resolved_to_zero && !h->def_regular)
22b75d0a
DM		 4430 {
4431 /* Mark the symbol as undefined, rather than as defined in
4432 the .plt section. Leave the value alone. */
4433 sym->st_shndx = SHN_UNDEF;
4434 /* If the symbol is weak, we do need to clear the value.
4435 Otherwise, the PLT entry would provide a definition for
4436 the symbol even if the symbol wasn't defined anywhere,
4437 and so the symbol would never be NULL. */
4438 if (!h->ref_regular_nonweak)
4439 sym->st_value = 0;
4440 }
4441 }
4442
a8735c82
EB		 4443 /* Don't generate dynamic GOT relocation against resolved undefined weak
4444 symbols in an executable. */
22b75d0a
DM		 4445 if (h->got.offset != (bfd_vma) -1
4446 && _bfd_sparc_elf_hash_entry(h)->tls_type != GOT_TLS_GD
bb1dd176 4447 && _bfd_sparc_elf_hash_entry(h)->tls_type != GOT_TLS_IE
a8735c82
EB		 4448 && !(h->root.type == bfd_link_hash_undefweak
4449 && (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
4450 || resolved_to_zero)))
22b75d0a
DM		 4451 {
4452 asection *sgot;
4453 asection *srela;
4454 Elf_Internal_Rela rela;
4455
4456 /* This symbol has an entry in the GOT. Set it up. */
4457
72fbc6e5
DM		 4458 sgot = htab->elf.sgot;
4459 srela = htab->elf.srelgot;
22b75d0a
DM		 4460 BFD_ASSERT (sgot != NULL && srela != NULL);
4461
4462 rela.r_offset = (sgot->output_section->vma
4463 + sgot->output_offset
4464 + (h->got.offset &~ (bfd_vma) 1));
4465
4466 /* If this is a -Bsymbolic link, and the symbol is defined
4467 locally, we just want to emit a RELATIVE reloc. Likewise if
4468 the symbol was forced to be local because of a version file.
4469 The entry in the global offset table will already have been
4470 initialized in the relocate_section function. */
0e1862bb 4471 if (! bfd_link_pic (info)
d0c9aeb3
DM		 4472 && h->type == STT_GNU_IFUNC
4473 && h->def_regular)
4474 {
4475 asection *plt;
4476
4477 /* We load the GOT entry with the PLT entry. */
4478 plt = htab->elf.splt ? htab->elf.splt : htab->elf.iplt;
4479 SPARC_ELF_PUT_WORD (htab, output_bfd,
4480 (plt->output_section->vma
4481 + plt->output_offset + h->plt.offset),
4482 htab->elf.sgot->contents
4483 + (h->got.offset & ~(bfd_vma) 1));
4484 return TRUE;
4485 }
a8735c82
EB		 4486
4487 if (bfd_link_pic (info) && SYMBOL_REFERENCES_LOCAL (info, h))
22b75d0a
DM		 4488 {
4489 asection *sec = h->root.u.def.section;
d0c9aeb3
DM		 4490 if (h->type == STT_GNU_IFUNC)
4491 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, R_SPARC_IRELATIVE);
4492 else
4493 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, 0, R_SPARC_RELATIVE);
22b75d0a
DM		 4494 rela.r_addend = (h->root.u.def.value
4495 + sec->output_section->vma
4496 + sec->output_offset);
4497 }
4498 else
4499 {
4500 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx, R_SPARC_GLOB_DAT);
4501 rela.r_addend = 0;
4502 }
4503
4504 SPARC_ELF_PUT_WORD (htab, output_bfd, 0,
4505 sgot->contents + (h->got.offset & ~(bfd_vma) 1));
39817122 4506 sparc_elf_append_rela (output_bfd, srela, &rela);
22b75d0a
DM		 4507 }
4508
4509 if (h->needs_copy)
4510 {
4511 asection *s;
4512 Elf_Internal_Rela rela;
4513
4514 /* This symbols needs a copy reloc. Set it up. */
4515 BFD_ASSERT (h->dynindx != -1);
4516
22b75d0a
DM		 4517 rela.r_offset = (h->root.u.def.value
4518 + h->root.u.def.section->output_section->vma
4519 + h->root.u.def.section->output_offset);
4520 rela.r_info = SPARC_ELF_R_INFO (htab, NULL, h->dynindx, R_SPARC_COPY);
4521 rela.r_addend = 0;
afbf7e8e 4522 if (h->root.u.def.section == htab->elf.sdynrelro)
5474d94f
AM		 4523 s = htab->elf.sreldynrelro;
4524 else
4525 s = htab->elf.srelbss;
39817122 4526 sparc_elf_append_rela (output_bfd, s, &rela);
22b75d0a
DM		 4527 }
4528
910600e9
RS		 4529 /* Mark some specially defined symbols as absolute. On VxWorks,
4530 _GLOBAL_OFFSET_TABLE_ is not absolute: it is relative to the
4531 ".got" section. Likewise _PROCEDURE_LINKAGE_TABLE_ and ".plt". */
d0c9aeb3 4532 if (sym != NULL
9637f6ef 4533 && (h == htab->elf.hdynamic
d0c9aeb3
DM		 4534 || (!htab->is_vxworks
4535 && (h == htab->elf.hgot || h == htab->elf.hplt))))
22b75d0a
DM		 4536 sym->st_shndx = SHN_ABS;
4537
4538 return TRUE;
4539}
4540
4541/* Finish up the dynamic sections. */
4542
22b75d0a 4543static bfd_boolean
39817122
RS		 4544sparc_finish_dyn (bfd *output_bfd, struct bfd_link_info *info,
4545 bfd *dynobj, asection *sdyn,
4546 asection *splt ATTRIBUTE_UNUSED)
22b75d0a 4547{
910600e9 4548 struct _bfd_sparc_elf_link_hash_table *htab;
39817122
RS		 4549 const struct elf_backend_data *bed;
4550 bfd_byte *dyncon, *dynconend;
4551 size_t dynsize;
4552 int stt_regidx = -1;
4553 bfd_boolean abi_64_p;
22b75d0a 4554
910600e9 4555 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 4556 BFD_ASSERT (htab != NULL);
39817122
RS		 4557 bed = get_elf_backend_data (output_bfd);
4558 dynsize = bed->s->sizeof_dyn;
4559 dynconend = sdyn->contents + sdyn->size;
4560 abi_64_p = ABI_64_P (output_bfd);
4561 for (dyncon = sdyn->contents; dyncon < dynconend; dyncon += dynsize)
22b75d0a
DM		 4562 {
4563 Elf_Internal_Dyn dyn;
22b75d0a
DM		 4564 bfd_boolean size;
4565
39817122 4566 bed->s->swap_dyn_in (dynobj, dyncon, &dyn);
22b75d0a 4567
64f52338 4568 if (htab->is_vxworks && dyn.d_tag == DT_PLTGOT)
22b75d0a 4569 {
910600e9
RS		 4570 /* On VxWorks, DT_PLTGOT should point to the start of the GOT,
4571 not to the start of the PLT. */
72fbc6e5 4572 if (htab->elf.sgotplt)
910600e9 4573 {
72fbc6e5
DM		 4574 dyn.d_un.d_val = (htab->elf.sgotplt->output_section->vma
4575 + htab->elf.sgotplt->output_offset);
39817122 4576 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
910600e9
RS		 4577 }
4578 }
7a2b07ff
NS		 4579 else if (htab->is_vxworks
4580 && elf_vxworks_finish_dynamic_entry (output_bfd, &dyn))
4581 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
39817122
RS		 4582 else if (abi_64_p && dyn.d_tag == DT_SPARC_REGISTER)
4583 {
4584 if (stt_regidx == -1)
4585 {
4586 stt_regidx =
4587 _bfd_elf_link_lookup_local_dynindx (info, output_bfd, -1);
4588 if (stt_regidx == -1)
4589 return FALSE;
4590 }
4591 dyn.d_un.d_val = stt_regidx++;
4592 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
4593 }
910600e9
RS		 4594 else
4595 {
ce558b89
AM		 4596 asection *s;
4597
910600e9
RS		 4598 switch (dyn.d_tag)
4599 {
ce558b89
AM		 4600 case DT_PLTGOT:
4601 s = htab->elf.splt;
4602 size = FALSE;
4603 break;
4604 case DT_PLTRELSZ:
4605 s = htab->elf.srelplt;
4606 size = TRUE;
4607 break;
4608 case DT_JMPREL:
4609 s = htab->elf.srelplt;
4610 size = FALSE;
4611 break;
4612 default:
4613 continue;
910600e9 4614 }
22b75d0a 4615
ce558b89
AM		 4616 if (s == NULL)
4617 dyn.d_un.d_val = 0;
4618 else
22b75d0a 4619 {
ce558b89
AM		 4620 if (!size)
4621 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
22b75d0a 4622 else
ce558b89 4623 dyn.d_un.d_val = s->size;
22b75d0a 4624 }
ce558b89 4625 bed->s->swap_dyn_out (output_bfd, &dyn, dyncon);
22b75d0a
DM		 4626 }
4627 }
4628 return TRUE;
4629}
4630
910600e9
RS		 4631/* Install the first PLT entry in a VxWorks executable and make sure that
4632 .rela.plt.unloaded relocations have the correct symbol indexes. */
4633
4634static void
4635sparc_vxworks_finish_exec_plt (bfd *output_bfd, struct bfd_link_info *info)
4636{
4637 struct _bfd_sparc_elf_link_hash_table *htab;
4638 Elf_Internal_Rela rela;
4639 bfd_vma got_base;
4640 bfd_byte *loc;
4641
4642 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 4643 BFD_ASSERT (htab != NULL);
910600e9
RS		 4644
4645 /* Calculate the absolute value of _GLOBAL_OFFSET_TABLE_. */
4646 got_base = (htab->elf.hgot->root.u.def.section->output_section->vma
4647 + htab->elf.hgot->root.u.def.section->output_offset
4648 + htab->elf.hgot->root.u.def.value);
4649
4650 /* Install the initial PLT entry. */
4651 bfd_put_32 (output_bfd,
4652 sparc_vxworks_exec_plt0_entry[0] + ((got_base + 8) >> 10),
72fbc6e5 4653 htab->elf.splt->contents);
910600e9
RS		 4654 bfd_put_32 (output_bfd,
4655 sparc_vxworks_exec_plt0_entry[1] + ((got_base + 8) & 0x3ff),
72fbc6e5 4656 htab->elf.splt->contents + 4);
910600e9
RS		 4657 bfd_put_32 (output_bfd,
4658 sparc_vxworks_exec_plt0_entry[2],
72fbc6e5 4659 htab->elf.splt->contents + 8);
910600e9
RS		 4660 bfd_put_32 (output_bfd,
4661 sparc_vxworks_exec_plt0_entry[3],
72fbc6e5 4662 htab->elf.splt->contents + 12);
910600e9
RS		 4663 bfd_put_32 (output_bfd,
4664 sparc_vxworks_exec_plt0_entry[4],
72fbc6e5 4665 htab->elf.splt->contents + 16);
910600e9
RS		 4666
4667 loc = htab->srelplt2->contents;
4668
4669 /* Add an unloaded relocation for the initial entry's "sethi". */
72fbc6e5
DM		 4670 rela.r_offset = (htab->elf.splt->output_section->vma
4671 + htab->elf.splt->output_offset);
910600e9
RS		 4672 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4673 rela.r_addend = 8;
4674 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4675 loc += sizeof (Elf32_External_Rela);
4676
4677 /* Likewise the following "or". */
4678 rela.r_offset += 4;
4679 rela.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4680 bfd_elf32_swap_reloca_out (output_bfd, &rela, loc);
4681 loc += sizeof (Elf32_External_Rela);
4682
4683 /* Fix up the remaining .rela.plt.unloaded relocations. They may have
4684 the wrong symbol index for _G_O_T_ or _P_L_T_ depending on the order
4685 in which symbols were output. */
4686 while (loc < htab->srelplt2->contents + htab->srelplt2->size)
4687 {
4688 Elf_Internal_Rela rel;
4689
4690 /* The entry's initial "sethi" (against _G_O_T_). */
4691 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4692 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_HI22);
4693 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4694 loc += sizeof (Elf32_External_Rela);
4695
4696 /* The following "or" (also against _G_O_T_). */
4697 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4698 rel.r_info = ELF32_R_INFO (htab->elf.hgot->indx, R_SPARC_LO10);
4699 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4700 loc += sizeof (Elf32_External_Rela);
4701
4702 /* The .got.plt entry (against _P_L_T_). */
4703 bfd_elf32_swap_reloc_in (output_bfd, loc, &rel);
4704 rel.r_info = ELF32_R_INFO (htab->elf.hplt->indx, R_SPARC_32);
4705 bfd_elf32_swap_reloc_out (output_bfd, &rel, loc);
4706 loc += sizeof (Elf32_External_Rela);
4707 }
4708}
4709
4710/* Install the first PLT entry in a VxWorks shared object. */
4711
4712static void
4713sparc_vxworks_finish_shared_plt (bfd *output_bfd, struct bfd_link_info *info)
4714{
4715 struct _bfd_sparc_elf_link_hash_table *htab;
4716 unsigned int i;
4717
4718 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6
NC		 4719 BFD_ASSERT (htab != NULL);
4720
910600e9
RS		 4721 for (i = 0; i < ARRAY_SIZE (sparc_vxworks_shared_plt0_entry); i++)
4722 bfd_put_32 (output_bfd, sparc_vxworks_shared_plt0_entry[i],
72fbc6e5 4723 htab->elf.splt->contents + i * 4);
910600e9
RS		 4724}
4725
d0c9aeb3
DM		 4726/* Finish up local dynamic symbol handling. We set the contents of
4727 various dynamic sections here. */
4728
4729static bfd_boolean
4730finish_local_dynamic_symbol (void **slot, void *inf)
4731{
4732 struct elf_link_hash_entry *h
4733 = (struct elf_link_hash_entry *) *slot;
4734 struct bfd_link_info *info
68ffbac6 4735 = (struct bfd_link_info *) inf;
d0c9aeb3
DM		 4736
4737 return _bfd_sparc_elf_finish_dynamic_symbol (info->output_bfd, info,
4738 h, NULL);
4739}
4740
bb1dd176
QZ		 4741/* Finish up undefined weak symbol handling in PIE. Fill its PLT entry
4742 here since undefined weak symbol may not be dynamic and may not be
4743 called for _bfd_sparc_elf_finish_dynamic_symbol. */
4744
4745static bfd_boolean
4746pie_finish_undefweak_symbol (struct bfd_hash_entry *bh,
07d6d2b8 4747 void *inf)
bb1dd176
QZ		 4748{
4749 struct elf_link_hash_entry *h = (struct elf_link_hash_entry *) bh;
4750 struct bfd_link_info *info = (struct bfd_link_info *) inf;
4751
4752 if (h->root.type != bfd_link_hash_undefweak
4753 || h->dynindx != -1)
4754 return TRUE;
4755
4756 return _bfd_sparc_elf_finish_dynamic_symbol (info->output_bfd, info,
07d6d2b8 4757 h, NULL);
bb1dd176
QZ		 4758}
4759
22b75d0a
DM		 4760bfd_boolean
4761_bfd_sparc_elf_finish_dynamic_sections (bfd *output_bfd, struct bfd_link_info *info)
4762{
4763 bfd *dynobj;
4764 asection *sdyn;
4765 struct _bfd_sparc_elf_link_hash_table *htab;
4766
4767 htab = _bfd_sparc_elf_hash_table (info);
4dfe6ac6 4768 BFD_ASSERT (htab != NULL);
22b75d0a 4769 dynobj = htab->elf.dynobj;
4b24dd1a 4770
6d0a6093
JM		 4771 /* We arranged in size_dynamic_sections to put the STT_REGISTER
4772 entries at the end of the dynlocal list, so they came at the end
4773 of the local symbols in the symtab. Except that they aren't
4774 STB_LOCAL, so we need to back up symtab->sh_info. */
4775 if (ABI_64_P (output_bfd)
4776 && elf_hash_table (info)->dynlocal)
4777 {
4778 asection *dynsymsec = bfd_get_linker_section (dynobj, ".dynsym");
4779 struct elf_link_local_dynamic_entry *e;
4b24dd1a 4780
6d0a6093
JM		 4781 for (e = elf_hash_table (info)->dynlocal; e ; e = e->next)
4782 if (e->input_indx == -1)
4783 break;
4784 if (e)
4785 elf_section_data (dynsymsec->output_section)->this_hdr.sh_info
4786 = e->dynindx;
4787 }
4b24dd1a 4788
3d4d4302 4789 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
22b75d0a
DM		 4790
4791 if (elf_hash_table (info)->dynamic_sections_created)
4792 {
4793 asection *splt;
22b75d0a 4794
3d4d4302 4795 splt = htab->elf.splt;
22b75d0a
DM		 4796 BFD_ASSERT (splt != NULL && sdyn != NULL);
4797
39817122
RS		 4798 if (!sparc_finish_dyn (output_bfd, info, dynobj, sdyn, splt))
4799 return FALSE;
22b75d0a
DM		 4800
4801 /* Initialize the contents of the .plt section. */
4802 if (splt->size > 0)
4803 {
910600e9
RS		 4804 if (htab->is_vxworks)
4805 {
0e1862bb 4806 if (bfd_link_pic (info))
910600e9
RS		 4807 sparc_vxworks_finish_shared_plt (output_bfd, info);
4808 else
4809 sparc_vxworks_finish_exec_plt (output_bfd, info);
4810 }
22b75d0a
DM		 4811 else
4812 {
910600e9
RS		 4813 memset (splt->contents, 0, htab->plt_header_size);
4814 if (!ABI_64_P (output_bfd))
4815 bfd_put_32 (output_bfd, (bfd_vma) SPARC_NOP,
4816 splt->contents + splt->size - 4);
22b75d0a
DM		 4817 }
4818 }
4819
387f8054 4820 if (elf_section_data (splt->output_section) != NULL)
07d6d2b8
AM		 4821 elf_section_data (splt->output_section)->this_hdr.sh_entsize
4822 = ((htab->is_vxworks || !ABI_64_P (output_bfd))
4823 ? 0 : htab->plt_entry_size);
22b75d0a
DM		 4824 }
4825
4826 /* Set the first entry in the global offset table to the address of
4827 the dynamic section. */
72fbc6e5 4828 if (htab->elf.sgot && htab->elf.sgot->size > 0)
22b75d0a
DM		 4829 {
4830 bfd_vma val = (sdyn ?
4831 sdyn->output_section->vma + sdyn->output_offset :
4832 0);
4833
72fbc6e5 4834 SPARC_ELF_PUT_WORD (htab, output_bfd, val, htab->elf.sgot->contents);
22b75d0a
DM		 4835 }
4836
72fbc6e5
DM		 4837 if (htab->elf.sgot)
4838 elf_section_data (htab->elf.sgot->output_section)->this_hdr.sh_entsize =
22b75d0a
DM		 4839 SPARC_ELF_WORD_BYTES (htab);
4840
d0c9aeb3
DM		 4841 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4842 htab_traverse (htab->loc_hash_table, finish_local_dynamic_symbol, info);
4843
bb1dd176
QZ		 4844 /* Fill PLT entries for undefined weak symbols in PIE. */
4845 if (bfd_link_pie (info))
4846 bfd_hash_traverse (&info->hash->table,
07d6d2b8
AM		 4847 pie_finish_undefweak_symbol,
4848 info);
22b75d0a
DM		 4849 return TRUE;
4850}
4851
4852\f
4853/* Set the right machine number for a SPARC ELF file. */
4854
4855bfd_boolean
4856_bfd_sparc_elf_object_p (bfd *abfd)
4857{
4f26fb3a
JM		 4858 obj_attribute *attrs = elf_known_obj_attributes (abfd)[OBJ_ATTR_GNU];
4859 obj_attribute *hwcaps = &attrs[Tag_GNU_Sparc_HWCAPS];
4860 obj_attribute *hwcaps2 = &attrs[Tag_GNU_Sparc_HWCAPS2];
4861
4862 unsigned int v9c_hwcaps_mask = ELF_SPARC_HWCAP_ASI_BLK_INIT;
4863 unsigned int v9d_hwcaps_mask = (ELF_SPARC_HWCAP_FMAF
07d6d2b8
AM		 4864 | ELF_SPARC_HWCAP_VIS3
4865 | ELF_SPARC_HWCAP_HPC);
4f26fb3a 4866 unsigned int v9e_hwcaps_mask = (ELF_SPARC_HWCAP_AES
07d6d2b8
AM		 4867 | ELF_SPARC_HWCAP_DES
4868 | ELF_SPARC_HWCAP_KASUMI
4869 | ELF_SPARC_HWCAP_CAMELLIA
4870 | ELF_SPARC_HWCAP_MD5
4871 | ELF_SPARC_HWCAP_SHA1
4872 | ELF_SPARC_HWCAP_SHA256
4873 | ELF_SPARC_HWCAP_SHA512
4874 | ELF_SPARC_HWCAP_MPMUL
4875 | ELF_SPARC_HWCAP_MONT
4876 | ELF_SPARC_HWCAP_CRC32C
4877 | ELF_SPARC_HWCAP_CBCOND
4878 | ELF_SPARC_HWCAP_PAUSE);
4f26fb3a 4879 unsigned int v9v_hwcaps_mask = (ELF_SPARC_HWCAP_FJFMAU
07d6d2b8 4880 | ELF_SPARC_HWCAP_IMA);
4f26fb3a 4881 unsigned int v9m_hwcaps2_mask = (ELF_SPARC_HWCAP2_SPARC5
07d6d2b8
AM		 4882 | ELF_SPARC_HWCAP2_MWAIT
4883 | ELF_SPARC_HWCAP2_XMPMUL
4884 | ELF_SPARC_HWCAP2_XMONT);
64517994 4885 unsigned int m8_hwcaps2_mask = (ELF_SPARC_HWCAP2_SPARC6
07d6d2b8
AM		 4886 | ELF_SPARC_HWCAP2_ONADDSUB
4887 | ELF_SPARC_HWCAP2_ONMUL
4888 | ELF_SPARC_HWCAP2_ONDIV
4889 | ELF_SPARC_HWCAP2_DICTUNP
4890 | ELF_SPARC_HWCAP2_FPCMPSHL
4891 | ELF_SPARC_HWCAP2_RLE
4892 | ELF_SPARC_HWCAP2_SHA3);
4f26fb3a 4893
22b75d0a
DM		 4894 if (ABI_64_P (abfd))
4895 {
4896 unsigned long mach = bfd_mach_sparc_v9;
4897
64517994 4898 if (hwcaps2->i & m8_hwcaps2_mask)
07d6d2b8 4899 mach = bfd_mach_sparc_v9m8;
64517994 4900 else if (hwcaps2->i & v9m_hwcaps2_mask)
07d6d2b8 4901 mach = bfd_mach_sparc_v9m;
4f26fb3a 4902 else if (hwcaps->i & v9v_hwcaps_mask)
07d6d2b8 4903 mach = bfd_mach_sparc_v9v;
4f26fb3a 4904 else if (hwcaps->i & v9e_hwcaps_mask)
07d6d2b8 4905 mach = bfd_mach_sparc_v9e;
4f26fb3a 4906 else if (hwcaps->i & v9d_hwcaps_mask)
07d6d2b8 4907 mach = bfd_mach_sparc_v9d;
4f26fb3a 4908 else if (hwcaps->i & v9c_hwcaps_mask)
07d6d2b8 4909 mach = bfd_mach_sparc_v9c;
4f26fb3a 4910 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US3)
22b75d0a
DM		 4911 mach = bfd_mach_sparc_v9b;
4912 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US1)
4913 mach = bfd_mach_sparc_v9a;
4914 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc, mach);
4915 }
4916 else
4917 {
4918 if (elf_elfheader (abfd)->e_machine == EM_SPARC32PLUS)
4919 {
07d6d2b8
AM		 4920 if (hwcaps2->i & m8_hwcaps2_mask)
4921 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4922 bfd_mach_sparc_v8plusm8);
4923 else if (hwcaps2->i & v9m_hwcaps2_mask)
4f26fb3a
JM		 4924 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4925 bfd_mach_sparc_v8plusm);
07d6d2b8
AM		 4926 else if (hwcaps->i & v9v_hwcaps_mask)
4927 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4f26fb3a 4928 bfd_mach_sparc_v8plusv);
07d6d2b8
AM		 4929 else if (hwcaps->i & v9e_hwcaps_mask)
4930 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4f26fb3a 4931 bfd_mach_sparc_v8pluse);
07d6d2b8
AM		 4932 else if (hwcaps->i & v9d_hwcaps_mask)
4933 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4f26fb3a 4934 bfd_mach_sparc_v8plusd);
07d6d2b8
AM		 4935 else if (hwcaps->i & v9c_hwcaps_mask)
4936 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4f26fb3a
JM		 4937 bfd_mach_sparc_v8plusc);
4938 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US3)
22b75d0a
DM		 4939 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4940 bfd_mach_sparc_v8plusb);
4941 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_SUN_US1)
4942 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4943 bfd_mach_sparc_v8plusa);
4944 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_32PLUS)
4945 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4946 bfd_mach_sparc_v8plus);
4947 else
4948 return FALSE;
4949 }
4950 else if (elf_elfheader (abfd)->e_flags & EF_SPARC_LEDATA)
4951 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc,
4952 bfd_mach_sparc_sparclite_le);
4953 else
4954 return bfd_default_set_arch_mach (abfd, bfd_arch_sparc, bfd_mach_sparc);
4955 }
4956}
4957
4958/* Return address for Ith PLT stub in section PLT, for relocation REL
4959 or (bfd_vma) -1 if it should not be included. */
4960
4961bfd_vma
4962_bfd_sparc_elf_plt_sym_val (bfd_vma i, const asection *plt, const arelent *rel)
4963{
4964 if (ABI_64_P (plt->owner))
4965 {
4966 bfd_vma j;
4967
4968 i += PLT64_HEADER_SIZE / PLT64_ENTRY_SIZE;
4969 if (i < PLT64_LARGE_THRESHOLD)
4970 return plt->vma + i * PLT64_ENTRY_SIZE;
4971
4972 j = (i - PLT64_LARGE_THRESHOLD) % 160;
4973 i -= j;
4974 return plt->vma + i * PLT64_ENTRY_SIZE + j * 4 * 6;
4975 }
4976 else
4977 return rel->address;
4978}
9e8c70f9
DM		 4979
4980/* Merge backend specific data from an object file to the output
4981 object file when linking. */
4982
4983bfd_boolean
50e03d47 4984_bfd_sparc_elf_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
9e8c70f9 4985{
50e03d47 4986 bfd *obfd = info->output_bfd;
9e8c70f9
DM		 4987 obj_attribute *in_attr, *in_attrs;
4988 obj_attribute *out_attr, *out_attrs;
4989
4990 if (!elf_known_obj_attributes_proc (obfd)[0].i)
4991 {
4992 /* This is the first object. Copy the attributes. */
4993 _bfd_elf_copy_obj_attributes (ibfd, obfd);
4994
4995 /* Use the Tag_null value to indicate the attributes have been
4996 initialized. */
4997 elf_known_obj_attributes_proc (obfd)[0].i = 1;
4998
4999 return TRUE;
5000 }
5001
5002 in_attrs = elf_known_obj_attributes (ibfd)[OBJ_ATTR_GNU];
5003 out_attrs = elf_known_obj_attributes (obfd)[OBJ_ATTR_GNU];
5004
5005 in_attr = &in_attrs[Tag_GNU_Sparc_HWCAPS];
5006 out_attr = &out_attrs[Tag_GNU_Sparc_HWCAPS];
1b786873 5007
3d68f91c
JM		 5008 out_attr->i |= in_attr->i;
5009 out_attr->type = 1;
9e8c70f9 5010
3d68f91c
JM		 5011 in_attr = &in_attrs[Tag_GNU_Sparc_HWCAPS2];
5012 out_attr = &out_attrs[Tag_GNU_Sparc_HWCAPS2];
1b786873 5013
9e8c70f9 5014 out_attr->i |= in_attr->i;
209be8d2 5015 out_attr->type = 1;
9e8c70f9
DM		 5016
5017 /* Merge Tag_compatibility attributes and any common GNU ones. */
50e03d47 5018 _bfd_elf_merge_object_attributes (ibfd, info);
9e8c70f9
DM		 5019
5020 return TRUE;
5021}
GDB Binutils - Deliverables
This page took 1.105382 seconds and 4 git commands to generate.