1 /* SPARC-specific support for ELF
2 Copyright 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
3 Free Software Foundation, Inc.
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 3 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
20 MA 02110-1301, USA. */
23 /* This file handles functionality common to the different SPARC ABI's. */
29 #include "libiberty.h"
31 #include "elf/sparc.h"
32 #include "opcode/sparc.h"
33 #include "elfxx-sparc.h"
34 #include "elf-vxworks.h"
38 /* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
39 #define MINUS_ONE (~ (bfd_vma) 0)
41 #define ABI_64_P(abfd) \
42 (get_elf_backend_data (abfd)->s->elfclass == ELFCLASS64)
44 /* The relocation "howto" table. */
46 /* Utility for performing the standard initial work of an instruction
48 *PRELOCATION will contain the relocated item.
49 *PINSN will contain the instruction from the input stream.
50 If the result is `bfd_reloc_other' the caller can continue with
51 performing the relocation. Otherwise it must stop and return the
52 value to its caller. */
54 static bfd_reloc_status_type
55 init_insn_reloc (bfd
*abfd
, arelent
*reloc_entry
, asymbol
*symbol
,
56 PTR data
, asection
*input_section
, bfd
*output_bfd
,
57 bfd_vma
*prelocation
, bfd_vma
*pinsn
)
60 reloc_howto_type
*howto
= reloc_entry
->howto
;
62 if (output_bfd
!= (bfd
*) NULL
63 && (symbol
->flags
& BSF_SECTION_SYM
) == 0
64 && (! howto
->partial_inplace
65 || reloc_entry
->addend
== 0))
67 reloc_entry
->address
+= input_section
->output_offset
;
71 /* This works because partial_inplace is FALSE. */
72 if (output_bfd
!= NULL
)
73 return bfd_reloc_continue
;
75 if (reloc_entry
->address
> bfd_get_section_limit (abfd
, input_section
))
76 return bfd_reloc_outofrange
;
78 relocation
= (symbol
->value
79 + symbol
->section
->output_section
->vma
80 + symbol
->section
->output_offset
);
81 relocation
+= reloc_entry
->addend
;
82 if (howto
->pc_relative
)
84 relocation
-= (input_section
->output_section
->vma
85 + input_section
->output_offset
);
86 relocation
-= reloc_entry
->address
;
89 *prelocation
= relocation
;
90 *pinsn
= bfd_get_32 (abfd
, (bfd_byte
*) data
+ reloc_entry
->address
);
91 return bfd_reloc_other
;
94 /* For unsupported relocs. */
96 static bfd_reloc_status_type
97 sparc_elf_notsup_reloc (bfd
*abfd ATTRIBUTE_UNUSED
,
98 arelent
*reloc_entry ATTRIBUTE_UNUSED
,
99 asymbol
*symbol ATTRIBUTE_UNUSED
,
100 PTR data ATTRIBUTE_UNUSED
,
101 asection
*input_section ATTRIBUTE_UNUSED
,
102 bfd
*output_bfd ATTRIBUTE_UNUSED
,
103 char **error_message ATTRIBUTE_UNUSED
)
105 return bfd_reloc_notsupported
;
108 /* Handle the WDISP16 reloc. */
110 static bfd_reloc_status_type
111 sparc_elf_wdisp16_reloc (bfd
*abfd
, arelent
*reloc_entry
, asymbol
*symbol
,
112 PTR data
, asection
*input_section
, bfd
*output_bfd
,
113 char **error_message ATTRIBUTE_UNUSED
)
117 bfd_reloc_status_type status
;
119 status
= init_insn_reloc (abfd
, reloc_entry
, symbol
, data
,
120 input_section
, output_bfd
, &relocation
, &insn
);
121 if (status
!= bfd_reloc_other
)
124 insn
&= ~ (bfd_vma
) 0x303fff;
125 insn
|= (((relocation
>> 2) & 0xc000) << 6) | ((relocation
>> 2) & 0x3fff);
126 bfd_put_32 (abfd
, insn
, (bfd_byte
*) data
+ reloc_entry
->address
);
128 if ((bfd_signed_vma
) relocation
< - 0x40000
129 || (bfd_signed_vma
) relocation
> 0x3ffff)
130 return bfd_reloc_overflow
;
135 /* Handle the HIX22 reloc. */
137 static bfd_reloc_status_type
138 sparc_elf_hix22_reloc (bfd
*abfd
, arelent
*reloc_entry
, asymbol
*symbol
,
139 PTR data
, asection
*input_section
, bfd
*output_bfd
,
140 char **error_message ATTRIBUTE_UNUSED
)
144 bfd_reloc_status_type status
;
146 status
= init_insn_reloc (abfd
, reloc_entry
, symbol
, data
,
147 input_section
, output_bfd
, &relocation
, &insn
);
148 if (status
!= bfd_reloc_other
)
151 relocation
^= MINUS_ONE
;
152 insn
= (insn
&~ (bfd_vma
) 0x3fffff) | ((relocation
>> 10) & 0x3fffff);
153 bfd_put_32 (abfd
, insn
, (bfd_byte
*) data
+ reloc_entry
->address
);
155 if ((relocation
& ~ (bfd_vma
) 0xffffffff) != 0)
156 return bfd_reloc_overflow
;
161 /* Handle the LOX10 reloc. */
163 static bfd_reloc_status_type
164 sparc_elf_lox10_reloc (bfd
*abfd
, arelent
*reloc_entry
, asymbol
*symbol
,
165 PTR data
, asection
*input_section
, bfd
*output_bfd
,
166 char **error_message ATTRIBUTE_UNUSED
)
170 bfd_reloc_status_type status
;
172 status
= init_insn_reloc (abfd
, reloc_entry
, symbol
, data
,
173 input_section
, output_bfd
, &relocation
, &insn
);
174 if (status
!= bfd_reloc_other
)
177 insn
= (insn
&~ (bfd_vma
) 0x1fff) | 0x1c00 | (relocation
& 0x3ff);
178 bfd_put_32 (abfd
, insn
, (bfd_byte
*) data
+ reloc_entry
->address
);
183 static reloc_howto_type _bfd_sparc_elf_howto_table
[] =
185 HOWTO(R_SPARC_NONE
, 0,0, 0,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_NONE", FALSE
,0,0x00000000,TRUE
),
186 HOWTO(R_SPARC_8
, 0,0, 8,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_8", FALSE
,0,0x000000ff,TRUE
),
187 HOWTO(R_SPARC_16
, 0,1,16,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_16", FALSE
,0,0x0000ffff,TRUE
),
188 HOWTO(R_SPARC_32
, 0,2,32,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_32", FALSE
,0,0xffffffff,TRUE
),
189 HOWTO(R_SPARC_DISP8
, 0,0, 8,TRUE
, 0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_DISP8", FALSE
,0,0x000000ff,TRUE
),
190 HOWTO(R_SPARC_DISP16
, 0,1,16,TRUE
, 0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_DISP16", FALSE
,0,0x0000ffff,TRUE
),
191 HOWTO(R_SPARC_DISP32
, 0,2,32,TRUE
, 0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_DISP32", FALSE
,0,0xffffffff,TRUE
),
192 HOWTO(R_SPARC_WDISP30
, 2,2,30,TRUE
, 0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_WDISP30", FALSE
,0,0x3fffffff,TRUE
),
193 HOWTO(R_SPARC_WDISP22
, 2,2,22,TRUE
, 0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_WDISP22", FALSE
,0,0x003fffff,TRUE
),
194 HOWTO(R_SPARC_HI22
, 10,2,22,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_HI22", FALSE
,0,0x003fffff,TRUE
),
195 HOWTO(R_SPARC_22
, 0,2,22,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_22", FALSE
,0,0x003fffff,TRUE
),
196 HOWTO(R_SPARC_13
, 0,2,13,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_13", FALSE
,0,0x00001fff,TRUE
),
197 HOWTO(R_SPARC_LO10
, 0,2,10,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_LO10", FALSE
,0,0x000003ff,TRUE
),
198 HOWTO(R_SPARC_GOT10
, 0,2,10,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_GOT10", FALSE
,0,0x000003ff,TRUE
),
199 HOWTO(R_SPARC_GOT13
, 0,2,13,FALSE
,0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_GOT13", FALSE
,0,0x00001fff,TRUE
),
200 HOWTO(R_SPARC_GOT22
, 10,2,22,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_GOT22", FALSE
,0,0x003fffff,TRUE
),
201 HOWTO(R_SPARC_PC10
, 0,2,10,TRUE
, 0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_PC10", FALSE
,0,0x000003ff,TRUE
),
202 HOWTO(R_SPARC_PC22
, 10,2,22,TRUE
, 0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_PC22", FALSE
,0,0x003fffff,TRUE
),
203 HOWTO(R_SPARC_WPLT30
, 2,2,30,TRUE
, 0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_WPLT30", FALSE
,0,0x3fffffff,TRUE
),
204 HOWTO(R_SPARC_COPY
, 0,0,00,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_COPY", FALSE
,0,0x00000000,TRUE
),
205 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
),
206 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
),
207 HOWTO(R_SPARC_RELATIVE
, 0,0,00,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_RELATIVE",FALSE
,0,0x00000000,TRUE
),
208 HOWTO(R_SPARC_UA32
, 0,2,32,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_UA32", FALSE
,0,0xffffffff,TRUE
),
209 HOWTO(R_SPARC_PLT32
, 0,2,32,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_PLT32", FALSE
,0,0xffffffff,TRUE
),
210 HOWTO(R_SPARC_HIPLT22
, 0,0,00,FALSE
,0,complain_overflow_dont
, sparc_elf_notsup_reloc
, "R_SPARC_HIPLT22", FALSE
,0,0x00000000,TRUE
),
211 HOWTO(R_SPARC_LOPLT10
, 0,0,00,FALSE
,0,complain_overflow_dont
, sparc_elf_notsup_reloc
, "R_SPARC_LOPLT10", FALSE
,0,0x00000000,TRUE
),
212 HOWTO(R_SPARC_PCPLT32
, 0,0,00,FALSE
,0,complain_overflow_dont
, sparc_elf_notsup_reloc
, "R_SPARC_PCPLT32", FALSE
,0,0x00000000,TRUE
),
213 HOWTO(R_SPARC_PCPLT22
, 0,0,00,FALSE
,0,complain_overflow_dont
, sparc_elf_notsup_reloc
, "R_SPARC_PCPLT22", FALSE
,0,0x00000000,TRUE
),
214 HOWTO(R_SPARC_PCPLT10
, 0,0,00,FALSE
,0,complain_overflow_dont
, sparc_elf_notsup_reloc
, "R_SPARC_PCPLT10", FALSE
,0,0x00000000,TRUE
),
215 HOWTO(R_SPARC_10
, 0,2,10,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_10", FALSE
,0,0x000003ff,TRUE
),
216 HOWTO(R_SPARC_11
, 0,2,11,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_11", FALSE
,0,0x000007ff,TRUE
),
217 HOWTO(R_SPARC_64
, 0,4,64,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_64", FALSE
,0,MINUS_ONE
, TRUE
),
218 HOWTO(R_SPARC_OLO10
, 0,2,13,FALSE
,0,complain_overflow_signed
, sparc_elf_notsup_reloc
, "R_SPARC_OLO10", FALSE
,0,0x00001fff,TRUE
),
219 HOWTO(R_SPARC_HH22
, 42,2,22,FALSE
,0,complain_overflow_unsigned
,bfd_elf_generic_reloc
, "R_SPARC_HH22", FALSE
,0,0x003fffff,TRUE
),
220 HOWTO(R_SPARC_HM10
, 32,2,10,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_HM10", FALSE
,0,0x000003ff,TRUE
),
221 HOWTO(R_SPARC_LM22
, 10,2,22,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_LM22", FALSE
,0,0x003fffff,TRUE
),
222 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
),
223 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
),
224 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
),
225 HOWTO(R_SPARC_WDISP16
, 2,2,16,TRUE
, 0,complain_overflow_signed
, sparc_elf_wdisp16_reloc
,"R_SPARC_WDISP16", FALSE
,0,0x00000000,TRUE
),
226 HOWTO(R_SPARC_WDISP19
, 2,2,19,TRUE
, 0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_WDISP19", FALSE
,0,0x0007ffff,TRUE
),
227 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
),
228 HOWTO(R_SPARC_7
, 0,2, 7,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_7", FALSE
,0,0x0000007f,TRUE
),
229 HOWTO(R_SPARC_5
, 0,2, 5,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_5", FALSE
,0,0x0000001f,TRUE
),
230 HOWTO(R_SPARC_6
, 0,2, 6,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_6", FALSE
,0,0x0000003f,TRUE
),
231 HOWTO(R_SPARC_DISP64
, 0,4,64,TRUE
, 0,complain_overflow_signed
, bfd_elf_generic_reloc
, "R_SPARC_DISP64", FALSE
,0,MINUS_ONE
, TRUE
),
232 HOWTO(R_SPARC_PLT64
, 0,4,64,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_PLT64", FALSE
,0,MINUS_ONE
, TRUE
),
233 HOWTO(R_SPARC_HIX22
, 0,4, 0,FALSE
,0,complain_overflow_bitfield
,sparc_elf_hix22_reloc
, "R_SPARC_HIX22", FALSE
,0,MINUS_ONE
, FALSE
),
234 HOWTO(R_SPARC_LOX10
, 0,4, 0,FALSE
,0,complain_overflow_dont
, sparc_elf_lox10_reloc
, "R_SPARC_LOX10", FALSE
,0,MINUS_ONE
, FALSE
),
235 HOWTO(R_SPARC_H44
, 22,2,22,FALSE
,0,complain_overflow_unsigned
,bfd_elf_generic_reloc
, "R_SPARC_H44", FALSE
,0,0x003fffff,FALSE
),
236 HOWTO(R_SPARC_M44
, 12,2,10,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_M44", FALSE
,0,0x000003ff,FALSE
),
237 HOWTO(R_SPARC_L44
, 0,2,13,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_L44", FALSE
,0,0x00000fff,FALSE
),
238 HOWTO(R_SPARC_REGISTER
, 0,4, 0,FALSE
,0,complain_overflow_bitfield
,sparc_elf_notsup_reloc
, "R_SPARC_REGISTER",FALSE
,0,MINUS_ONE
, FALSE
),
239 HOWTO(R_SPARC_UA64
, 0,4,64,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_UA64", FALSE
,0,MINUS_ONE
, TRUE
),
240 HOWTO(R_SPARC_UA16
, 0,1,16,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_UA16", FALSE
,0,0x0000ffff,TRUE
),
241 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
),
242 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
),
243 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
),
244 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
),
245 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
),
246 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
),
247 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
),
248 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
),
249 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
),
250 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
),
251 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
),
252 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
),
253 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
),
254 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
),
255 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
),
256 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
),
257 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
),
258 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
),
259 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
),
260 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
),
261 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
),
262 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
),
263 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
),
264 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
),
265 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
),
266 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
),
267 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
),
268 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
),
269 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
),
271 static reloc_howto_type sparc_jmp_irel_howto
=
272 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
);
273 static reloc_howto_type sparc_irelative_howto
=
274 HOWTO(R_SPARC_IRELATIVE
, 0,0,00,FALSE
,0,complain_overflow_dont
, bfd_elf_generic_reloc
, "R_SPARC_IRELATIVE",FALSE
,0,0x00000000,TRUE
);
275 static reloc_howto_type sparc_vtinherit_howto
=
276 HOWTO (R_SPARC_GNU_VTINHERIT
, 0,2,0,FALSE
,0,complain_overflow_dont
, NULL
, "R_SPARC_GNU_VTINHERIT", FALSE
,0, 0, FALSE
);
277 static reloc_howto_type sparc_vtentry_howto
=
278 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
);
279 static reloc_howto_type sparc_rev32_howto
=
280 HOWTO(R_SPARC_REV32
, 0,2,32,FALSE
,0,complain_overflow_bitfield
,bfd_elf_generic_reloc
, "R_SPARC_REV32", FALSE
,0,0xffffffff,TRUE
);
283 _bfd_sparc_elf_reloc_type_lookup (bfd
*abfd ATTRIBUTE_UNUSED
,
284 bfd_reloc_code_real_type code
)
286 /* We explicitly handle each relocation type in the switch
287 instead of using a lookup table for efficiency. */
291 return &_bfd_sparc_elf_howto_table
[R_SPARC_NONE
];
294 return &_bfd_sparc_elf_howto_table
[R_SPARC_8
];
297 return &_bfd_sparc_elf_howto_table
[R_SPARC_16
];
300 return &_bfd_sparc_elf_howto_table
[R_SPARC_32
];
302 case BFD_RELOC_8_PCREL
:
303 return &_bfd_sparc_elf_howto_table
[R_SPARC_DISP8
];
305 case BFD_RELOC_16_PCREL
:
306 return &_bfd_sparc_elf_howto_table
[R_SPARC_DISP16
];
308 case BFD_RELOC_32_PCREL
:
309 return &_bfd_sparc_elf_howto_table
[R_SPARC_DISP32
];
311 case BFD_RELOC_32_PCREL_S2
:
312 return &_bfd_sparc_elf_howto_table
[R_SPARC_WDISP30
];
314 case BFD_RELOC_SPARC_WDISP22
:
315 return &_bfd_sparc_elf_howto_table
[R_SPARC_WDISP22
];
318 return &_bfd_sparc_elf_howto_table
[R_SPARC_HI22
];
320 case BFD_RELOC_SPARC22
:
321 return &_bfd_sparc_elf_howto_table
[R_SPARC_22
];
323 case BFD_RELOC_SPARC13
:
324 return &_bfd_sparc_elf_howto_table
[R_SPARC_13
];
327 return &_bfd_sparc_elf_howto_table
[R_SPARC_LO10
];
329 case BFD_RELOC_SPARC_GOT10
:
330 return &_bfd_sparc_elf_howto_table
[R_SPARC_GOT10
];
332 case BFD_RELOC_SPARC_GOT13
:
333 return &_bfd_sparc_elf_howto_table
[R_SPARC_GOT13
];
335 case BFD_RELOC_SPARC_GOT22
:
336 return &_bfd_sparc_elf_howto_table
[R_SPARC_GOT22
];
338 case BFD_RELOC_SPARC_PC10
:
339 return &_bfd_sparc_elf_howto_table
[R_SPARC_PC10
];
341 case BFD_RELOC_SPARC_PC22
:
342 return &_bfd_sparc_elf_howto_table
[R_SPARC_PC22
];
344 case BFD_RELOC_SPARC_WPLT30
:
345 return &_bfd_sparc_elf_howto_table
[R_SPARC_WPLT30
];
347 case BFD_RELOC_SPARC_COPY
:
348 return &_bfd_sparc_elf_howto_table
[R_SPARC_COPY
];
350 case BFD_RELOC_SPARC_GLOB_DAT
:
351 return &_bfd_sparc_elf_howto_table
[R_SPARC_GLOB_DAT
];
353 case BFD_RELOC_SPARC_JMP_SLOT
:
354 return &_bfd_sparc_elf_howto_table
[R_SPARC_JMP_SLOT
];
356 case BFD_RELOC_SPARC_RELATIVE
:
357 return &_bfd_sparc_elf_howto_table
[R_SPARC_RELATIVE
];
359 case BFD_RELOC_SPARC_UA32
:
360 return &_bfd_sparc_elf_howto_table
[R_SPARC_UA32
];
362 case BFD_RELOC_SPARC_PLT32
:
363 return &_bfd_sparc_elf_howto_table
[R_SPARC_PLT32
];
365 case BFD_RELOC_SPARC_10
:
366 return &_bfd_sparc_elf_howto_table
[R_SPARC_10
];
368 case BFD_RELOC_SPARC_11
:
369 return &_bfd_sparc_elf_howto_table
[R_SPARC_11
];
371 case BFD_RELOC_SPARC_64
:
372 return &_bfd_sparc_elf_howto_table
[R_SPARC_64
];
374 case BFD_RELOC_SPARC_OLO10
:
375 return &_bfd_sparc_elf_howto_table
[R_SPARC_OLO10
];
377 case BFD_RELOC_SPARC_HH22
:
378 return &_bfd_sparc_elf_howto_table
[R_SPARC_HH22
];
380 case BFD_RELOC_SPARC_HM10
:
381 return &_bfd_sparc_elf_howto_table
[R_SPARC_HM10
];
383 case BFD_RELOC_SPARC_LM22
:
384 return &_bfd_sparc_elf_howto_table
[R_SPARC_LM22
];
386 case BFD_RELOC_SPARC_PC_HH22
:
387 return &_bfd_sparc_elf_howto_table
[R_SPARC_PC_HH22
];
389 case BFD_RELOC_SPARC_PC_HM10
:
390 return &_bfd_sparc_elf_howto_table
[R_SPARC_PC_HM10
];
392 case BFD_RELOC_SPARC_PC_LM22
:
393 return &_bfd_sparc_elf_howto_table
[R_SPARC_PC_LM22
];
395 case BFD_RELOC_SPARC_WDISP16
:
396 return &_bfd_sparc_elf_howto_table
[R_SPARC_WDISP16
];
398 case BFD_RELOC_SPARC_WDISP19
:
399 return &_bfd_sparc_elf_howto_table
[R_SPARC_WDISP19
];
401 case BFD_RELOC_SPARC_7
:
402 return &_bfd_sparc_elf_howto_table
[R_SPARC_7
];
404 case BFD_RELOC_SPARC_5
:
405 return &_bfd_sparc_elf_howto_table
[R_SPARC_5
];
407 case BFD_RELOC_SPARC_6
:
408 return &_bfd_sparc_elf_howto_table
[R_SPARC_6
];
410 case BFD_RELOC_SPARC_DISP64
:
411 return &_bfd_sparc_elf_howto_table
[R_SPARC_DISP64
];
413 case BFD_RELOC_SPARC_PLT64
:
414 return &_bfd_sparc_elf_howto_table
[R_SPARC_PLT64
];
416 case BFD_RELOC_SPARC_HIX22
:
417 return &_bfd_sparc_elf_howto_table
[R_SPARC_HIX22
];
419 case BFD_RELOC_SPARC_LOX10
:
420 return &_bfd_sparc_elf_howto_table
[R_SPARC_LOX10
];
422 case BFD_RELOC_SPARC_H44
:
423 return &_bfd_sparc_elf_howto_table
[R_SPARC_H44
];
425 case BFD_RELOC_SPARC_M44
:
426 return &_bfd_sparc_elf_howto_table
[R_SPARC_M44
];
428 case BFD_RELOC_SPARC_L44
:
429 return &_bfd_sparc_elf_howto_table
[R_SPARC_L44
];
431 case BFD_RELOC_SPARC_REGISTER
:
432 return &_bfd_sparc_elf_howto_table
[R_SPARC_REGISTER
];
434 case BFD_RELOC_SPARC_UA64
:
435 return &_bfd_sparc_elf_howto_table
[R_SPARC_UA64
];
437 case BFD_RELOC_SPARC_UA16
:
438 return &_bfd_sparc_elf_howto_table
[R_SPARC_UA16
];
440 case BFD_RELOC_SPARC_TLS_GD_HI22
:
441 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_GD_HI22
];
443 case BFD_RELOC_SPARC_TLS_GD_LO10
:
444 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_GD_LO10
];
446 case BFD_RELOC_SPARC_TLS_GD_ADD
:
447 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_GD_ADD
];
449 case BFD_RELOC_SPARC_TLS_GD_CALL
:
450 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_GD_CALL
];
452 case BFD_RELOC_SPARC_TLS_LDM_HI22
:
453 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LDM_HI22
];
455 case BFD_RELOC_SPARC_TLS_LDM_LO10
:
456 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LDM_LO10
];
458 case BFD_RELOC_SPARC_TLS_LDM_ADD
:
459 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LDM_ADD
];
461 case BFD_RELOC_SPARC_TLS_LDM_CALL
:
462 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LDM_CALL
];
464 case BFD_RELOC_SPARC_TLS_LDO_HIX22
:
465 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LDO_HIX22
];
467 case BFD_RELOC_SPARC_TLS_LDO_LOX10
:
468 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LDO_LOX10
];
470 case BFD_RELOC_SPARC_TLS_LDO_ADD
:
471 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LDO_ADD
];
473 case BFD_RELOC_SPARC_TLS_IE_HI22
:
474 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_IE_HI22
];
476 case BFD_RELOC_SPARC_TLS_IE_LO10
:
477 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_IE_LO10
];
479 case BFD_RELOC_SPARC_TLS_IE_LD
:
480 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_IE_LD
];
482 case BFD_RELOC_SPARC_TLS_IE_LDX
:
483 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_IE_LDX
];
485 case BFD_RELOC_SPARC_TLS_IE_ADD
:
486 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_IE_ADD
];
488 case BFD_RELOC_SPARC_TLS_LE_HIX22
:
489 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LE_HIX22
];
491 case BFD_RELOC_SPARC_TLS_LE_LOX10
:
492 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_LE_LOX10
];
494 case BFD_RELOC_SPARC_TLS_DTPMOD32
:
495 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_DTPMOD32
];
497 case BFD_RELOC_SPARC_TLS_DTPMOD64
:
498 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_DTPMOD64
];
500 case BFD_RELOC_SPARC_TLS_DTPOFF32
:
501 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_DTPOFF32
];
503 case BFD_RELOC_SPARC_TLS_DTPOFF64
:
504 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_DTPOFF64
];
506 case BFD_RELOC_SPARC_TLS_TPOFF32
:
507 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_TPOFF32
];
509 case BFD_RELOC_SPARC_TLS_TPOFF64
:
510 return &_bfd_sparc_elf_howto_table
[R_SPARC_TLS_TPOFF64
];
512 case BFD_RELOC_SPARC_GOTDATA_HIX22
:
513 return &_bfd_sparc_elf_howto_table
[R_SPARC_GOTDATA_HIX22
];
515 case BFD_RELOC_SPARC_GOTDATA_LOX10
:
516 return &_bfd_sparc_elf_howto_table
[R_SPARC_GOTDATA_LOX10
];
518 case BFD_RELOC_SPARC_GOTDATA_OP_HIX22
:
519 return &_bfd_sparc_elf_howto_table
[R_SPARC_GOTDATA_OP_HIX22
];
521 case BFD_RELOC_SPARC_GOTDATA_OP_LOX10
:
522 return &_bfd_sparc_elf_howto_table
[R_SPARC_GOTDATA_OP_LOX10
];
524 case BFD_RELOC_SPARC_GOTDATA_OP
:
525 return &_bfd_sparc_elf_howto_table
[R_SPARC_GOTDATA_OP
];
527 case BFD_RELOC_SPARC_JMP_IREL
:
528 return &sparc_jmp_irel_howto
;
530 case BFD_RELOC_SPARC_IRELATIVE
:
531 return &sparc_irelative_howto
;
533 case BFD_RELOC_VTABLE_INHERIT
:
534 return &sparc_vtinherit_howto
;
536 case BFD_RELOC_VTABLE_ENTRY
:
537 return &sparc_vtentry_howto
;
539 case BFD_RELOC_SPARC_REV32
:
540 return &sparc_rev32_howto
;
545 bfd_set_error (bfd_error_bad_value
);
550 _bfd_sparc_elf_reloc_name_lookup (bfd
*abfd ATTRIBUTE_UNUSED
,
556 i
< (sizeof (_bfd_sparc_elf_howto_table
)
557 / sizeof (_bfd_sparc_elf_howto_table
[0]));
559 if (_bfd_sparc_elf_howto_table
[i
].name
!= NULL
560 && strcasecmp (_bfd_sparc_elf_howto_table
[i
].name
, r_name
) == 0)
561 return &_bfd_sparc_elf_howto_table
[i
];
563 if (strcasecmp (sparc_vtinherit_howto
.name
, r_name
) == 0)
564 return &sparc_vtinherit_howto
;
565 if (strcasecmp (sparc_vtentry_howto
.name
, r_name
) == 0)
566 return &sparc_vtentry_howto
;
567 if (strcasecmp (sparc_rev32_howto
.name
, r_name
) == 0)
568 return &sparc_rev32_howto
;
574 _bfd_sparc_elf_info_to_howto_ptr (unsigned int r_type
)
578 case R_SPARC_JMP_IREL
:
579 return &sparc_jmp_irel_howto
;
581 case R_SPARC_IRELATIVE
:
582 return &sparc_irelative_howto
;
584 case R_SPARC_GNU_VTINHERIT
:
585 return &sparc_vtinherit_howto
;
587 case R_SPARC_GNU_VTENTRY
:
588 return &sparc_vtentry_howto
;
591 return &sparc_rev32_howto
;
594 if (r_type
>= (unsigned int) R_SPARC_max_std
)
596 (*_bfd_error_handler
) (_("invalid relocation type %d"),
598 r_type
= R_SPARC_NONE
;
600 return &_bfd_sparc_elf_howto_table
[r_type
];
604 /* Both 32-bit and 64-bit sparc encode this in an identical manner,
605 so just take advantage of that. */
606 #define SPARC_ELF_R_TYPE(r_info) \
610 _bfd_sparc_elf_info_to_howto (bfd
*abfd ATTRIBUTE_UNUSED
, arelent
*cache_ptr
,
611 Elf_Internal_Rela
*dst
)
613 unsigned int r_type
= SPARC_ELF_R_TYPE (dst
->r_info
);
615 cache_ptr
->howto
= _bfd_sparc_elf_info_to_howto_ptr (r_type
);
619 /* The nop opcode we use. */
620 #define SPARC_NOP 0x01000000
622 #define SPARC_INSN_BYTES 4
624 /* The SPARC linker needs to keep track of the number of relocs that it
625 decides to copy as dynamic relocs in check_relocs for each symbol.
626 This is so that it can later discard them if they are found to be
627 unnecessary. We store the information in a field extending the
628 regular ELF linker hash table. */
630 struct _bfd_sparc_elf_dyn_relocs
632 struct _bfd_sparc_elf_dyn_relocs
*next
;
634 /* The input section of the reloc. */
637 /* Total number of relocs copied for the input section. */
640 /* Number of pc-relative relocs copied for the input section. */
641 bfd_size_type pc_count
;
644 /* SPARC ELF linker hash entry. */
646 struct _bfd_sparc_elf_link_hash_entry
648 struct elf_link_hash_entry elf
;
650 /* Track dynamic relocs copied for this symbol. */
651 struct _bfd_sparc_elf_dyn_relocs
*dyn_relocs
;
653 #define GOT_UNKNOWN 0
657 unsigned char tls_type
;
660 #define _bfd_sparc_elf_hash_entry(ent) ((struct _bfd_sparc_elf_link_hash_entry *)(ent))
662 struct _bfd_sparc_elf_obj_tdata
664 struct elf_obj_tdata root
;
666 /* tls_type for each local got entry. */
667 char *local_got_tls_type
;
669 /* TRUE if TLS GD relocs has been seen for this object. */
670 bfd_boolean has_tlsgd
;
673 #define _bfd_sparc_elf_tdata(abfd) \
674 ((struct _bfd_sparc_elf_obj_tdata *) (abfd)->tdata.any)
676 #define _bfd_sparc_elf_local_got_tls_type(abfd) \
677 (_bfd_sparc_elf_tdata (abfd)->local_got_tls_type)
679 #define is_sparc_elf(bfd) \
680 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
681 && elf_tdata (bfd) != NULL \
682 && elf_object_id (bfd) == SPARC_ELF_DATA)
685 _bfd_sparc_elf_mkobject (bfd
*abfd
)
687 return bfd_elf_allocate_object (abfd
, sizeof (struct _bfd_sparc_elf_obj_tdata
),
692 sparc_put_word_32 (bfd
*abfd
, bfd_vma val
, void *ptr
)
694 bfd_put_32 (abfd
, val
, ptr
);
698 sparc_put_word_64 (bfd
*abfd
, bfd_vma val
, void *ptr
)
700 bfd_put_64 (abfd
, val
, ptr
);
704 sparc_elf_append_rela (bfd
*abfd
, asection
*s
, Elf_Internal_Rela
*rel
)
706 const struct elf_backend_data
*bed
;
709 bed
= get_elf_backend_data (abfd
);
710 loc
= s
->contents
+ (s
->reloc_count
++ * bed
->s
->sizeof_rela
);
711 bed
->s
->swap_reloca_out (abfd
, rel
, loc
);
715 sparc_elf_r_info_64 (Elf_Internal_Rela
*in_rel ATTRIBUTE_UNUSED
,
716 bfd_vma rel_index ATTRIBUTE_UNUSED
,
717 bfd_vma type ATTRIBUTE_UNUSED
)
719 return ELF64_R_INFO (rel_index
,
721 ELF64_R_TYPE_INFO (ELF64_R_TYPE_DATA (in_rel
->r_info
),
726 sparc_elf_r_info_32 (Elf_Internal_Rela
*in_rel ATTRIBUTE_UNUSED
,
727 bfd_vma rel_index
, bfd_vma type
)
729 return ELF32_R_INFO (rel_index
, type
);
733 sparc_elf_r_symndx_64 (bfd_vma r_info
)
735 bfd_vma r_symndx
= ELF32_R_SYM (r_info
);
736 return (r_symndx
>> 24);
740 sparc_elf_r_symndx_32 (bfd_vma r_info
)
742 return ELF32_R_SYM (r_info
);
747 #define PLT32_ENTRY_SIZE 12
748 #define PLT32_HEADER_SIZE (4 * PLT32_ENTRY_SIZE)
750 /* The first four entries in a 32-bit procedure linkage table are reserved,
751 and the initial contents are unimportant (we zero them out).
752 Subsequent entries look like this. See the SVR4 ABI SPARC
753 supplement to see how this works. */
755 /* sethi %hi(.-.plt0),%g1. We fill in the address later. */
756 #define PLT32_ENTRY_WORD0 0x03000000
757 /* b,a .plt0. We fill in the offset later. */
758 #define PLT32_ENTRY_WORD1 0x30800000
760 #define PLT32_ENTRY_WORD2 SPARC_NOP
763 sparc32_plt_entry_build (bfd
*output_bfd
, asection
*splt
, bfd_vma offset
,
764 bfd_vma max ATTRIBUTE_UNUSED
,
767 bfd_put_32 (output_bfd
,
768 PLT32_ENTRY_WORD0
+ offset
,
769 splt
->contents
+ offset
);
770 bfd_put_32 (output_bfd
,
772 + (((- (offset
+ 4)) >> 2) & 0x3fffff)),
773 splt
->contents
+ offset
+ 4);
774 bfd_put_32 (output_bfd
, (bfd_vma
) PLT32_ENTRY_WORD2
,
775 splt
->contents
+ offset
+ 8);
779 return offset
/ PLT32_ENTRY_SIZE
- 4;
782 /* Both the headers and the entries are icache aligned. */
783 #define PLT64_ENTRY_SIZE 32
784 #define PLT64_HEADER_SIZE (4 * PLT64_ENTRY_SIZE)
785 #define PLT64_LARGE_THRESHOLD 32768
788 sparc64_plt_entry_build (bfd
*output_bfd
, asection
*splt
, bfd_vma offset
,
789 bfd_vma max
, bfd_vma
*r_offset
)
791 unsigned char *entry
= splt
->contents
+ offset
;
792 const unsigned int nop
= SPARC_NOP
;
795 if (offset
< (PLT64_LARGE_THRESHOLD
* PLT64_ENTRY_SIZE
))
797 unsigned int sethi
, ba
;
801 plt_index
= (offset
/ PLT64_ENTRY_SIZE
);
803 sethi
= 0x03000000 | (plt_index
* PLT64_ENTRY_SIZE
);
805 | (((splt
->contents
+ PLT64_ENTRY_SIZE
) - (entry
+ 4)) / 4 & 0x7ffff);
807 bfd_put_32 (output_bfd
, (bfd_vma
) sethi
, entry
);
808 bfd_put_32 (output_bfd
, (bfd_vma
) ba
, entry
+ 4);
809 bfd_put_32 (output_bfd
, (bfd_vma
) nop
, entry
+ 8);
810 bfd_put_32 (output_bfd
, (bfd_vma
) nop
, entry
+ 12);
811 bfd_put_32 (output_bfd
, (bfd_vma
) nop
, entry
+ 16);
812 bfd_put_32 (output_bfd
, (bfd_vma
) nop
, entry
+ 20);
813 bfd_put_32 (output_bfd
, (bfd_vma
) nop
, entry
+ 24);
814 bfd_put_32 (output_bfd
, (bfd_vma
) nop
, entry
+ 28);
820 int block
, last_block
, ofs
, last_ofs
, chunks_this_block
;
821 const int insn_chunk_size
= (6 * 4);
822 const int ptr_chunk_size
= (1 * 8);
823 const int entries_per_block
= 160;
824 const int block_size
= entries_per_block
* (insn_chunk_size
827 /* Entries 32768 and higher are grouped into blocks of 160.
828 The blocks are further subdivided into 160 sequences of
829 6 instructions and 160 pointers. If a block does not require
830 the full 160 entries, let's say it requires N, then there
831 will be N sequences of 6 instructions and N pointers. */
833 offset
-= (PLT64_LARGE_THRESHOLD
* PLT64_ENTRY_SIZE
);
834 max
-= (PLT64_LARGE_THRESHOLD
* PLT64_ENTRY_SIZE
);
836 block
= offset
/ block_size
;
837 last_block
= max
/ block_size
;
838 if (block
!= last_block
)
840 chunks_this_block
= 160;
844 last_ofs
= max
% block_size
;
845 chunks_this_block
= last_ofs
/ (insn_chunk_size
+ ptr_chunk_size
);
848 ofs
= offset
% block_size
;
850 plt_index
= (PLT64_LARGE_THRESHOLD
+
852 (ofs
/ insn_chunk_size
));
855 + (PLT64_LARGE_THRESHOLD
* PLT64_ENTRY_SIZE
)
856 + (block
* block_size
)
857 + (chunks_this_block
* insn_chunk_size
)
858 + (ofs
/ insn_chunk_size
) * ptr_chunk_size
;
860 *r_offset
= (bfd_vma
) (ptr
- splt
->contents
);
862 ldx
= 0xc25be000 | ((ptr
- (entry
+4)) & 0x1fff);
870 bfd_put_32 (output_bfd
, (bfd_vma
) 0x8a10000f, entry
);
871 bfd_put_32 (output_bfd
, (bfd_vma
) 0x40000002, entry
+ 4);
872 bfd_put_32 (output_bfd
, (bfd_vma
) SPARC_NOP
, entry
+ 8);
873 bfd_put_32 (output_bfd
, (bfd_vma
) ldx
, entry
+ 12);
874 bfd_put_32 (output_bfd
, (bfd_vma
) 0x83c3c001, entry
+ 16);
875 bfd_put_32 (output_bfd
, (bfd_vma
) 0x9e100005, entry
+ 20);
877 bfd_put_64 (output_bfd
, (bfd_vma
) (splt
->contents
- (entry
+ 4)), ptr
);
880 return plt_index
- 4;
883 /* The format of the first PLT entry in a VxWorks executable. */
884 static const bfd_vma sparc_vxworks_exec_plt0_entry
[] =
886 0x05000000, /* sethi %hi(_GLOBAL_OFFSET_TABLE_+8), %g2 */
887 0x8410a000, /* or %g2, %lo(_GLOBAL_OFFSET_TABLE_+8), %g2 */
888 0xc4008000, /* ld [ %g2 ], %g2 */
889 0x81c08000, /* jmp %g2 */
893 /* The format of subsequent PLT entries. */
894 static const bfd_vma sparc_vxworks_exec_plt_entry
[] =
896 0x03000000, /* sethi %hi(_GLOBAL_OFFSET_TABLE_+f@got), %g1 */
897 0x82106000, /* or %g1, %lo(_GLOBAL_OFFSET_TABLE_+f@got), %g1 */
898 0xc2004000, /* ld [ %g1 ], %g1 */
899 0x81c04000, /* jmp %g1 */
900 0x01000000, /* nop */
901 0x03000000, /* sethi %hi(f@pltindex), %g1 */
902 0x10800000, /* b _PLT_resolve */
903 0x82106000 /* or %g1, %lo(f@pltindex), %g1 */
906 /* The format of the first PLT entry in a VxWorks shared object. */
907 static const bfd_vma sparc_vxworks_shared_plt0_entry
[] =
909 0xc405e008, /* ld [ %l7 + 8 ], %g2 */
910 0x81c08000, /* jmp %g2 */
914 /* The format of subsequent PLT entries. */
915 static const bfd_vma sparc_vxworks_shared_plt_entry
[] =
917 0x03000000, /* sethi %hi(f@got), %g1 */
918 0x82106000, /* or %g1, %lo(f@got), %g1 */
919 0xc205c001, /* ld [ %l7 + %g1 ], %g1 */
920 0x81c04000, /* jmp %g1 */
921 0x01000000, /* nop */
922 0x03000000, /* sethi %hi(f@pltindex), %g1 */
923 0x10800000, /* b _PLT_resolve */
924 0x82106000 /* or %g1, %lo(f@pltindex), %g1 */
927 #define SPARC_ELF_PUT_WORD(htab, bfd, val, ptr) \
928 htab->put_word(bfd, val, ptr)
930 #define SPARC_ELF_R_INFO(htab, in_rel, index, type) \
931 htab->r_info(in_rel, index, type)
933 #define SPARC_ELF_R_SYMNDX(htab, r_info) \
934 htab->r_symndx(r_info)
936 #define SPARC_ELF_WORD_BYTES(htab) \
939 #define SPARC_ELF_RELA_BYTES(htab) \
942 #define SPARC_ELF_DTPOFF_RELOC(htab) \
945 #define SPARC_ELF_DTPMOD_RELOC(htab) \
948 #define SPARC_ELF_TPOFF_RELOC(htab) \
951 #define SPARC_ELF_BUILD_PLT_ENTRY(htab, obfd, splt, off, max, r_off) \
952 htab->build_plt_entry (obfd, splt, off, max, r_off)
954 /* Create an entry in an SPARC ELF linker hash table. */
956 static struct bfd_hash_entry
*
957 link_hash_newfunc (struct bfd_hash_entry
*entry
,
958 struct bfd_hash_table
*table
, const char *string
)
960 /* Allocate the structure if it has not already been allocated by a
964 entry
= bfd_hash_allocate (table
,
965 sizeof (struct _bfd_sparc_elf_link_hash_entry
));
970 /* Call the allocation method of the superclass. */
971 entry
= _bfd_elf_link_hash_newfunc (entry
, table
, string
);
974 struct _bfd_sparc_elf_link_hash_entry
*eh
;
976 eh
= (struct _bfd_sparc_elf_link_hash_entry
*) entry
;
977 eh
->dyn_relocs
= NULL
;
978 eh
->tls_type
= GOT_UNKNOWN
;
984 /* The name of the dynamic interpreter. This is put in the .interp
987 #define ELF32_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
988 #define ELF64_DYNAMIC_INTERPRETER "/usr/lib/sparcv9/ld.so.1"
990 /* Compute a hash of a local hash entry. We use elf_link_hash_entry
991 for local symbol so that we can handle local STT_GNU_IFUNC symbols
992 as global symbol. We reuse indx and dynstr_index for local symbol
993 hash since they aren't used by global symbols in this backend. */
996 elf_sparc_local_htab_hash (const void *ptr
)
998 struct elf_link_hash_entry
*h
999 = (struct elf_link_hash_entry
*) ptr
;
1000 return ELF_LOCAL_SYMBOL_HASH (h
->indx
, h
->dynstr_index
);
1003 /* Compare local hash entries. */
1006 elf_sparc_local_htab_eq (const void *ptr1
, const void *ptr2
)
1008 struct elf_link_hash_entry
*h1
1009 = (struct elf_link_hash_entry
*) ptr1
;
1010 struct elf_link_hash_entry
*h2
1011 = (struct elf_link_hash_entry
*) ptr2
;
1013 return h1
->indx
== h2
->indx
&& h1
->dynstr_index
== h2
->dynstr_index
;
1016 /* Find and/or create a hash entry for local symbol. */
1018 static struct elf_link_hash_entry
*
1019 elf_sparc_get_local_sym_hash (struct _bfd_sparc_elf_link_hash_table
*htab
,
1020 bfd
*abfd
, const Elf_Internal_Rela
*rel
,
1023 struct _bfd_sparc_elf_link_hash_entry e
, *ret
;
1024 asection
*sec
= abfd
->sections
;
1025 unsigned long r_symndx
;
1029 r_symndx
= SPARC_ELF_R_SYMNDX (htab
, rel
->r_info
);
1030 h
= ELF_LOCAL_SYMBOL_HASH (sec
->id
, r_symndx
);
1032 e
.elf
.indx
= sec
->id
;
1033 e
.elf
.dynstr_index
= r_symndx
;
1034 slot
= htab_find_slot_with_hash (htab
->loc_hash_table
, &e
, h
,
1035 create
? INSERT
: NO_INSERT
);
1042 ret
= (struct _bfd_sparc_elf_link_hash_entry
*) *slot
;
1046 ret
= (struct _bfd_sparc_elf_link_hash_entry
*)
1047 objalloc_alloc ((struct objalloc
*) htab
->loc_hash_memory
,
1048 sizeof (struct _bfd_sparc_elf_link_hash_entry
));
1051 memset (ret
, 0, sizeof (*ret
));
1052 ret
->elf
.indx
= sec
->id
;
1053 ret
->elf
.dynstr_index
= r_symndx
;
1054 ret
->elf
.dynindx
= -1;
1055 ret
->elf
.plt
.offset
= (bfd_vma
) -1;
1056 ret
->elf
.got
.offset
= (bfd_vma
) -1;
1062 /* Create a SPARC ELF linker hash table. */
1064 struct bfd_link_hash_table
*
1065 _bfd_sparc_elf_link_hash_table_create (bfd
*abfd
)
1067 struct _bfd_sparc_elf_link_hash_table
*ret
;
1068 bfd_size_type amt
= sizeof (struct _bfd_sparc_elf_link_hash_table
);
1070 ret
= (struct _bfd_sparc_elf_link_hash_table
*) bfd_zmalloc (amt
);
1074 if (ABI_64_P (abfd
))
1076 ret
->put_word
= sparc_put_word_64
;
1077 ret
->r_info
= sparc_elf_r_info_64
;
1078 ret
->r_symndx
= sparc_elf_r_symndx_64
;
1079 ret
->dtpoff_reloc
= R_SPARC_TLS_DTPOFF64
;
1080 ret
->dtpmod_reloc
= R_SPARC_TLS_DTPMOD64
;
1081 ret
->tpoff_reloc
= R_SPARC_TLS_TPOFF64
;
1082 ret
->word_align_power
= 3;
1083 ret
->align_power_max
= 4;
1084 ret
->bytes_per_word
= 8;
1085 ret
->bytes_per_rela
= sizeof (Elf64_External_Rela
);
1086 ret
->dynamic_interpreter
= ELF64_DYNAMIC_INTERPRETER
;
1087 ret
->dynamic_interpreter_size
= sizeof ELF64_DYNAMIC_INTERPRETER
;
1089 ret
->build_plt_entry
= sparc64_plt_entry_build
;
1090 ret
->plt_header_size
= PLT64_HEADER_SIZE
;
1091 ret
->plt_entry_size
= PLT64_ENTRY_SIZE
;
1095 ret
->put_word
= sparc_put_word_32
;
1096 ret
->r_info
= sparc_elf_r_info_32
;
1097 ret
->r_symndx
= sparc_elf_r_symndx_32
;
1098 ret
->dtpoff_reloc
= R_SPARC_TLS_DTPOFF32
;
1099 ret
->dtpmod_reloc
= R_SPARC_TLS_DTPMOD32
;
1100 ret
->tpoff_reloc
= R_SPARC_TLS_TPOFF32
;
1101 ret
->word_align_power
= 2;
1102 ret
->align_power_max
= 3;
1103 ret
->bytes_per_word
= 4;
1104 ret
->bytes_per_rela
= sizeof (Elf32_External_Rela
);
1105 ret
->dynamic_interpreter
= ELF32_DYNAMIC_INTERPRETER
;
1106 ret
->dynamic_interpreter_size
= sizeof ELF32_DYNAMIC_INTERPRETER
;
1108 ret
->build_plt_entry
= sparc32_plt_entry_build
;
1109 ret
->plt_header_size
= PLT32_HEADER_SIZE
;
1110 ret
->plt_entry_size
= PLT32_ENTRY_SIZE
;
1113 if (!_bfd_elf_link_hash_table_init (&ret
->elf
, abfd
, link_hash_newfunc
,
1114 sizeof (struct _bfd_sparc_elf_link_hash_entry
),
1121 ret
->loc_hash_table
= htab_try_create (1024,
1122 elf_sparc_local_htab_hash
,
1123 elf_sparc_local_htab_eq
,
1125 ret
->loc_hash_memory
= objalloc_create ();
1126 if (!ret
->loc_hash_table
|| !ret
->loc_hash_memory
)
1132 return &ret
->elf
.root
;
1135 /* Destroy a SPARC ELF linker hash table. */
1138 _bfd_sparc_elf_link_hash_table_free (struct bfd_link_hash_table
*hash
)
1140 struct _bfd_sparc_elf_link_hash_table
*htab
1141 = (struct _bfd_sparc_elf_link_hash_table
*) hash
;
1143 if (htab
->loc_hash_table
)
1144 htab_delete (htab
->loc_hash_table
);
1145 if (htab
->loc_hash_memory
)
1146 objalloc_free ((struct objalloc
*) htab
->loc_hash_memory
);
1147 _bfd_generic_link_hash_table_free (hash
);
1150 /* Create .plt, .rela.plt, .got, .rela.got, .dynbss, and
1151 .rela.bss sections in DYNOBJ, and set up shortcuts to them in our
1155 _bfd_sparc_elf_create_dynamic_sections (bfd
*dynobj
,
1156 struct bfd_link_info
*info
)
1158 struct _bfd_sparc_elf_link_hash_table
*htab
;
1160 htab
= _bfd_sparc_elf_hash_table (info
);
1161 BFD_ASSERT (htab
!= NULL
);
1163 if (!_bfd_elf_create_dynamic_sections (dynobj
, info
))
1166 htab
->sdynbss
= bfd_get_section_by_name (dynobj
, ".dynbss");
1168 htab
->srelbss
= bfd_get_section_by_name (dynobj
, ".rela.bss");
1170 if (htab
->is_vxworks
)
1172 if (!elf_vxworks_create_dynamic_sections (dynobj
, info
, &htab
->srelplt2
))
1176 htab
->plt_header_size
1177 = 4 * ARRAY_SIZE (sparc_vxworks_shared_plt0_entry
);
1178 htab
->plt_entry_size
1179 = 4 * ARRAY_SIZE (sparc_vxworks_shared_plt_entry
);
1183 htab
->plt_header_size
1184 = 4 * ARRAY_SIZE (sparc_vxworks_exec_plt0_entry
);
1185 htab
->plt_entry_size
1186 = 4 * ARRAY_SIZE (sparc_vxworks_exec_plt_entry
);
1190 if (!htab
->elf
.splt
|| !htab
->elf
.srelplt
|| !htab
->sdynbss
1191 || (!info
->shared
&& !htab
->srelbss
))
1198 create_ifunc_sections (bfd
*abfd
, struct bfd_link_info
*info
)
1200 const struct elf_backend_data
*bed
= get_elf_backend_data (abfd
);
1201 struct elf_link_hash_table
*htab
= elf_hash_table (info
);
1202 flagword flags
, pltflags
;
1205 if (htab
->irelifunc
!= NULL
|| htab
->iplt
!= NULL
)
1208 flags
= bed
->dynamic_sec_flags
;
1209 pltflags
= flags
| SEC_ALLOC
| SEC_CODE
| SEC_LOAD
;
1211 s
= bfd_make_section_with_flags (abfd
, ".iplt", pltflags
);
1213 || ! bfd_set_section_alignment (abfd
, s
, bed
->plt_alignment
))
1217 s
= bfd_make_section_with_flags (abfd
, ".rela.iplt",
1218 flags
| SEC_READONLY
);
1220 || ! bfd_set_section_alignment (abfd
, s
,
1221 bed
->s
->log_file_align
))
1228 /* Copy the extra info we tack onto an elf_link_hash_entry. */
1231 _bfd_sparc_elf_copy_indirect_symbol (struct bfd_link_info
*info
,
1232 struct elf_link_hash_entry
*dir
,
1233 struct elf_link_hash_entry
*ind
)
1235 struct _bfd_sparc_elf_link_hash_entry
*edir
, *eind
;
1237 edir
= (struct _bfd_sparc_elf_link_hash_entry
*) dir
;
1238 eind
= (struct _bfd_sparc_elf_link_hash_entry
*) ind
;
1240 if (eind
->dyn_relocs
!= NULL
)
1242 if (edir
->dyn_relocs
!= NULL
)
1244 struct _bfd_sparc_elf_dyn_relocs
**pp
;
1245 struct _bfd_sparc_elf_dyn_relocs
*p
;
1247 /* Add reloc counts against the indirect sym to the direct sym
1248 list. Merge any entries against the same section. */
1249 for (pp
= &eind
->dyn_relocs
; (p
= *pp
) != NULL
; )
1251 struct _bfd_sparc_elf_dyn_relocs
*q
;
1253 for (q
= edir
->dyn_relocs
; q
!= NULL
; q
= q
->next
)
1254 if (q
->sec
== p
->sec
)
1256 q
->pc_count
+= p
->pc_count
;
1257 q
->count
+= p
->count
;
1264 *pp
= edir
->dyn_relocs
;
1267 edir
->dyn_relocs
= eind
->dyn_relocs
;
1268 eind
->dyn_relocs
= NULL
;
1271 if (ind
->root
.type
== bfd_link_hash_indirect
1272 && dir
->got
.refcount
<= 0)
1274 edir
->tls_type
= eind
->tls_type
;
1275 eind
->tls_type
= GOT_UNKNOWN
;
1277 _bfd_elf_link_hash_copy_indirect (info
, dir
, ind
);
1281 sparc_elf_tls_transition (struct bfd_link_info
*info
, bfd
*abfd
,
1282 int r_type
, int is_local
)
1284 if (! ABI_64_P (abfd
)
1285 && r_type
== R_SPARC_TLS_GD_HI22
1286 && ! _bfd_sparc_elf_tdata (abfd
)->has_tlsgd
)
1287 r_type
= R_SPARC_REV32
;
1294 case R_SPARC_TLS_GD_HI22
:
1296 return R_SPARC_TLS_LE_HIX22
;
1297 return R_SPARC_TLS_IE_HI22
;
1298 case R_SPARC_TLS_GD_LO10
:
1300 return R_SPARC_TLS_LE_LOX10
;
1301 return R_SPARC_TLS_IE_LO10
;
1302 case R_SPARC_TLS_IE_HI22
:
1304 return R_SPARC_TLS_LE_HIX22
;
1306 case R_SPARC_TLS_IE_LO10
:
1308 return R_SPARC_TLS_LE_LOX10
;
1310 case R_SPARC_TLS_LDM_HI22
:
1311 return R_SPARC_TLS_LE_HIX22
;
1312 case R_SPARC_TLS_LDM_LO10
:
1313 return R_SPARC_TLS_LE_LOX10
;
1319 /* Look through the relocs for a section during the first phase, and
1320 allocate space in the global offset table or procedure linkage
1324 _bfd_sparc_elf_check_relocs (bfd
*abfd
, struct bfd_link_info
*info
,
1325 asection
*sec
, const Elf_Internal_Rela
*relocs
)
1327 struct _bfd_sparc_elf_link_hash_table
*htab
;
1328 Elf_Internal_Shdr
*symtab_hdr
;
1329 struct elf_link_hash_entry
**sym_hashes
;
1330 const Elf_Internal_Rela
*rel
;
1331 const Elf_Internal_Rela
*rel_end
;
1334 bfd_boolean checked_tlsgd
= FALSE
;
1336 if (info
->relocatable
)
1339 htab
= _bfd_sparc_elf_hash_table (info
);
1340 BFD_ASSERT (htab
!= NULL
);
1341 symtab_hdr
= &elf_symtab_hdr (abfd
);
1342 sym_hashes
= elf_sym_hashes (abfd
);
1346 if (ABI_64_P (abfd
))
1347 num_relocs
= NUM_SHDR_ENTRIES (_bfd_elf_single_rel_hdr (sec
));
1349 num_relocs
= sec
->reloc_count
;
1351 BFD_ASSERT (is_sparc_elf (abfd
) || num_relocs
== 0);
1353 if (htab
->elf
.dynobj
== NULL
)
1354 htab
->elf
.dynobj
= abfd
;
1355 if (!create_ifunc_sections (htab
->elf
.dynobj
, info
))
1358 rel_end
= relocs
+ num_relocs
;
1359 for (rel
= relocs
; rel
< rel_end
; rel
++)
1361 unsigned int r_type
;
1362 unsigned long r_symndx
;
1363 struct elf_link_hash_entry
*h
;
1364 Elf_Internal_Sym
*isym
;
1366 r_symndx
= SPARC_ELF_R_SYMNDX (htab
, rel
->r_info
);
1367 r_type
= SPARC_ELF_R_TYPE (rel
->r_info
);
1369 if (r_symndx
>= NUM_SHDR_ENTRIES (symtab_hdr
))
1371 (*_bfd_error_handler
) (_("%B: bad symbol index: %d"),
1377 if (r_symndx
< symtab_hdr
->sh_info
)
1379 /* A local symbol. */
1380 isym
= bfd_sym_from_r_symndx (&htab
->sym_cache
,
1385 /* Check relocation against local STT_GNU_IFUNC symbol. */
1386 if (ELF_ST_TYPE (isym
->st_info
) == STT_GNU_IFUNC
)
1388 h
= elf_sparc_get_local_sym_hash (htab
, abfd
, rel
,
1393 /* Fake a STT_GNU_IFUNC symbol. */
1394 h
->type
= STT_GNU_IFUNC
;
1397 h
->forced_local
= 1;
1398 h
->root
.type
= bfd_link_hash_defined
;
1405 h
= sym_hashes
[r_symndx
- symtab_hdr
->sh_info
];
1406 while (h
->root
.type
== bfd_link_hash_indirect
1407 || h
->root
.type
== bfd_link_hash_warning
)
1408 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
1411 if (h
&& h
->type
== STT_GNU_IFUNC
)
1416 h
->plt
.refcount
+= 1;
1420 /* Compatibility with old R_SPARC_REV32 reloc conflicting
1421 with R_SPARC_TLS_GD_HI22. */
1422 if (! ABI_64_P (abfd
) && ! checked_tlsgd
)
1425 case R_SPARC_TLS_GD_HI22
:
1427 const Elf_Internal_Rela
*relt
;
1429 for (relt
= rel
+ 1; relt
< rel_end
; relt
++)
1430 if (ELF32_R_TYPE (relt
->r_info
) == R_SPARC_TLS_GD_LO10
1431 || ELF32_R_TYPE (relt
->r_info
) == R_SPARC_TLS_GD_ADD
1432 || ELF32_R_TYPE (relt
->r_info
) == R_SPARC_TLS_GD_CALL
)
1434 checked_tlsgd
= TRUE
;
1435 _bfd_sparc_elf_tdata (abfd
)->has_tlsgd
= relt
< rel_end
;
1438 case R_SPARC_TLS_GD_LO10
:
1439 case R_SPARC_TLS_GD_ADD
:
1440 case R_SPARC_TLS_GD_CALL
:
1441 checked_tlsgd
= TRUE
;
1442 _bfd_sparc_elf_tdata (abfd
)->has_tlsgd
= TRUE
;
1446 r_type
= sparc_elf_tls_transition (info
, abfd
, r_type
, h
== NULL
);
1449 case R_SPARC_TLS_LDM_HI22
:
1450 case R_SPARC_TLS_LDM_LO10
:
1451 htab
->tls_ldm_got
.refcount
+= 1;
1454 case R_SPARC_TLS_LE_HIX22
:
1455 case R_SPARC_TLS_LE_LOX10
:
1460 case R_SPARC_TLS_IE_HI22
:
1461 case R_SPARC_TLS_IE_LO10
:
1463 info
->flags
|= DF_STATIC_TLS
;
1469 case R_SPARC_GOTDATA_HIX22
:
1470 case R_SPARC_GOTDATA_LOX10
:
1471 case R_SPARC_GOTDATA_OP_HIX22
:
1472 case R_SPARC_GOTDATA_OP_LOX10
:
1473 case R_SPARC_TLS_GD_HI22
:
1474 case R_SPARC_TLS_GD_LO10
:
1475 /* This symbol requires a global offset table entry. */
1477 int tls_type
, old_tls_type
;
1485 case R_SPARC_GOTDATA_OP_HIX22
:
1486 case R_SPARC_GOTDATA_OP_LOX10
:
1487 tls_type
= GOT_NORMAL
;
1489 case R_SPARC_TLS_GD_HI22
:
1490 case R_SPARC_TLS_GD_LO10
:
1491 tls_type
= GOT_TLS_GD
;
1493 case R_SPARC_TLS_IE_HI22
:
1494 case R_SPARC_TLS_IE_LO10
:
1495 tls_type
= GOT_TLS_IE
;
1501 h
->got
.refcount
+= 1;
1502 old_tls_type
= _bfd_sparc_elf_hash_entry(h
)->tls_type
;
1506 bfd_signed_vma
*local_got_refcounts
;
1508 /* This is a global offset table entry for a local symbol. */
1509 local_got_refcounts
= elf_local_got_refcounts (abfd
);
1510 if (local_got_refcounts
== NULL
)
1514 size
= symtab_hdr
->sh_info
;
1515 size
*= (sizeof (bfd_signed_vma
) + sizeof(char));
1516 local_got_refcounts
= ((bfd_signed_vma
*)
1517 bfd_zalloc (abfd
, size
));
1518 if (local_got_refcounts
== NULL
)
1520 elf_local_got_refcounts (abfd
) = local_got_refcounts
;
1521 _bfd_sparc_elf_local_got_tls_type (abfd
)
1522 = (char *) (local_got_refcounts
+ symtab_hdr
->sh_info
);
1526 case R_SPARC_GOTDATA_OP_HIX22
:
1527 case R_SPARC_GOTDATA_OP_LOX10
:
1531 local_got_refcounts
[r_symndx
] += 1;
1534 old_tls_type
= _bfd_sparc_elf_local_got_tls_type (abfd
) [r_symndx
];
1537 /* If a TLS symbol is accessed using IE at least once,
1538 there is no point to use dynamic model for it. */
1539 if (old_tls_type
!= tls_type
&& old_tls_type
!= GOT_UNKNOWN
1540 && (old_tls_type
!= GOT_TLS_GD
1541 || tls_type
!= GOT_TLS_IE
))
1543 if (old_tls_type
== GOT_TLS_IE
&& tls_type
== GOT_TLS_GD
)
1544 tls_type
= old_tls_type
;
1547 (*_bfd_error_handler
)
1548 (_("%B: `%s' accessed both as normal and thread local symbol"),
1549 abfd
, h
? h
->root
.root
.string
: "<local>");
1554 if (old_tls_type
!= tls_type
)
1557 _bfd_sparc_elf_hash_entry (h
)->tls_type
= tls_type
;
1559 _bfd_sparc_elf_local_got_tls_type (abfd
) [r_symndx
] = tls_type
;
1563 if (htab
->elf
.sgot
== NULL
)
1565 if (!_bfd_elf_create_got_section (htab
->elf
.dynobj
, info
))
1570 case R_SPARC_TLS_GD_CALL
:
1571 case R_SPARC_TLS_LDM_CALL
:
1574 /* These are basically R_SPARC_TLS_WPLT30 relocs against
1576 struct bfd_link_hash_entry
*bh
= NULL
;
1577 if (! _bfd_generic_link_add_one_symbol (info
, abfd
,
1578 "__tls_get_addr", 0,
1579 bfd_und_section_ptr
, 0,
1583 h
= (struct elf_link_hash_entry
*) bh
;
1590 case R_SPARC_WPLT30
:
1591 case R_SPARC_HIPLT22
:
1592 case R_SPARC_LOPLT10
:
1593 case R_SPARC_PCPLT32
:
1594 case R_SPARC_PCPLT22
:
1595 case R_SPARC_PCPLT10
:
1597 /* This symbol requires a procedure linkage table entry. We
1598 actually build the entry in adjust_dynamic_symbol,
1599 because this might be a case of linking PIC code without
1600 linking in any dynamic objects, in which case we don't
1601 need to generate a procedure linkage table after all. */
1605 if (! ABI_64_P (abfd
))
1607 /* The Solaris native assembler will generate a WPLT30
1608 reloc for a local symbol if you assemble a call from
1609 one section to another when using -K pic. We treat
1611 if (ELF32_R_TYPE (rel
->r_info
) == R_SPARC_PLT32
)
1615 /* PR 7027: We need similar behaviour for 64-bit binaries. */
1616 else if (r_type
== R_SPARC_WPLT30
)
1619 /* It does not make sense to have a procedure linkage
1620 table entry for a local symbol. */
1621 bfd_set_error (bfd_error_bad_value
);
1630 this_r_type
= SPARC_ELF_R_TYPE (rel
->r_info
);
1631 if (this_r_type
== R_SPARC_PLT32
1632 || this_r_type
== R_SPARC_PLT64
)
1635 h
->plt
.refcount
+= 1;
1640 case R_SPARC_PC_HH22
:
1641 case R_SPARC_PC_HM10
:
1642 case R_SPARC_PC_LM22
:
1647 && strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0)
1652 case R_SPARC_DISP16
:
1653 case R_SPARC_DISP32
:
1654 case R_SPARC_DISP64
:
1655 case R_SPARC_WDISP30
:
1656 case R_SPARC_WDISP22
:
1657 case R_SPARC_WDISP19
:
1658 case R_SPARC_WDISP16
:
1688 if (h
!= NULL
&& !info
->shared
)
1690 /* We may need a .plt entry if the function this reloc
1691 refers to is in a shared lib. */
1692 h
->plt
.refcount
+= 1;
1695 /* If we are creating a shared library, and this is a reloc
1696 against a global symbol, or a non PC relative reloc
1697 against a local symbol, then we need to copy the reloc
1698 into the shared library. However, if we are linking with
1699 -Bsymbolic, we do not need to copy a reloc against a
1700 global symbol which is defined in an object we are
1701 including in the link (i.e., DEF_REGULAR is set). At
1702 this point we have not seen all the input files, so it is
1703 possible that DEF_REGULAR is not set now but will be set
1704 later (it is never cleared). In case of a weak definition,
1705 DEF_REGULAR may be cleared later by a strong definition in
1706 a shared library. We account for that possibility below by
1707 storing information in the relocs_copied field of the hash
1708 table entry. A similar situation occurs when creating
1709 shared libraries and symbol visibility changes render the
1712 If on the other hand, we are creating an executable, we
1713 may need to keep relocations for symbols satisfied by a
1714 dynamic library if we manage to avoid copy relocs for the
1717 && (sec
->flags
& SEC_ALLOC
) != 0
1718 && (! _bfd_sparc_elf_howto_table
[r_type
].pc_relative
1720 && (! SYMBOLIC_BIND (info
, h
)
1721 || h
->root
.type
== bfd_link_hash_defweak
1722 || !h
->def_regular
))))
1724 && (sec
->flags
& SEC_ALLOC
) != 0
1726 && (h
->root
.type
== bfd_link_hash_defweak
1727 || !h
->def_regular
))
1730 && h
->type
== STT_GNU_IFUNC
))
1732 struct _bfd_sparc_elf_dyn_relocs
*p
;
1733 struct _bfd_sparc_elf_dyn_relocs
**head
;
1735 /* When creating a shared object, we must copy these
1736 relocs into the output file. We create a reloc
1737 section in dynobj and make room for the reloc. */
1740 sreloc
= _bfd_elf_make_dynamic_reloc_section
1741 (sec
, htab
->elf
.dynobj
, htab
->word_align_power
,
1742 abfd
, /*rela?*/ TRUE
);
1748 /* If this is a global symbol, we count the number of
1749 relocations we need for this symbol. */
1751 head
= &((struct _bfd_sparc_elf_link_hash_entry
*) h
)->dyn_relocs
;
1754 /* Track dynamic relocs needed for local syms too.
1755 We really need local syms available to do this
1760 BFD_ASSERT (isym
!= NULL
);
1761 s
= bfd_section_from_elf_index (abfd
, isym
->st_shndx
);
1765 vpp
= &elf_section_data (s
)->local_dynrel
;
1766 head
= (struct _bfd_sparc_elf_dyn_relocs
**) vpp
;
1770 if (p
== NULL
|| p
->sec
!= sec
)
1772 bfd_size_type amt
= sizeof *p
;
1773 p
= ((struct _bfd_sparc_elf_dyn_relocs
*)
1774 bfd_alloc (htab
->elf
.dynobj
, amt
));
1785 if (_bfd_sparc_elf_howto_table
[r_type
].pc_relative
)
1791 case R_SPARC_GNU_VTINHERIT
:
1792 if (!bfd_elf_gc_record_vtinherit (abfd
, sec
, h
, rel
->r_offset
))
1796 case R_SPARC_GNU_VTENTRY
:
1797 BFD_ASSERT (h
!= NULL
);
1799 && !bfd_elf_gc_record_vtentry (abfd
, sec
, h
, rel
->r_addend
))
1803 case R_SPARC_REGISTER
:
1804 /* Nothing to do. */
1816 _bfd_sparc_elf_gc_mark_hook (asection
*sec
,
1817 struct bfd_link_info
*info
,
1818 Elf_Internal_Rela
*rel
,
1819 struct elf_link_hash_entry
*h
,
1820 Elf_Internal_Sym
*sym
)
1823 switch (SPARC_ELF_R_TYPE (rel
->r_info
))
1825 case R_SPARC_GNU_VTINHERIT
:
1826 case R_SPARC_GNU_VTENTRY
:
1830 return _bfd_elf_gc_mark_hook (sec
, info
, rel
, h
, sym
);
1833 static Elf_Internal_Rela
*
1834 sparc_elf_find_reloc_at_ofs (Elf_Internal_Rela
*rel
,
1835 Elf_Internal_Rela
*relend
,
1838 while (rel
< relend
)
1840 if (rel
->r_offset
== offset
)
1847 /* Update the got entry reference counts for the section being removed. */
1849 _bfd_sparc_elf_gc_sweep_hook (bfd
*abfd
, struct bfd_link_info
*info
,
1850 asection
*sec
, const Elf_Internal_Rela
*relocs
)
1852 struct _bfd_sparc_elf_link_hash_table
*htab
;
1853 Elf_Internal_Shdr
*symtab_hdr
;
1854 struct elf_link_hash_entry
**sym_hashes
;
1855 bfd_signed_vma
*local_got_refcounts
;
1856 const Elf_Internal_Rela
*rel
, *relend
;
1858 if (info
->relocatable
)
1861 BFD_ASSERT (is_sparc_elf (abfd
) || sec
->reloc_count
== 0);
1863 elf_section_data (sec
)->local_dynrel
= NULL
;
1865 htab
= _bfd_sparc_elf_hash_table (info
);
1866 BFD_ASSERT (htab
!= NULL
);
1867 symtab_hdr
= &elf_symtab_hdr (abfd
);
1868 sym_hashes
= elf_sym_hashes (abfd
);
1869 local_got_refcounts
= elf_local_got_refcounts (abfd
);
1871 relend
= relocs
+ sec
->reloc_count
;
1872 for (rel
= relocs
; rel
< relend
; rel
++)
1874 unsigned long r_symndx
;
1875 unsigned int r_type
;
1876 struct elf_link_hash_entry
*h
= NULL
;
1878 r_symndx
= SPARC_ELF_R_SYMNDX (htab
, rel
->r_info
);
1879 if (r_symndx
>= symtab_hdr
->sh_info
)
1881 struct _bfd_sparc_elf_link_hash_entry
*eh
;
1882 struct _bfd_sparc_elf_dyn_relocs
**pp
;
1883 struct _bfd_sparc_elf_dyn_relocs
*p
;
1885 h
= sym_hashes
[r_symndx
- symtab_hdr
->sh_info
];
1886 while (h
->root
.type
== bfd_link_hash_indirect
1887 || h
->root
.type
== bfd_link_hash_warning
)
1888 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
1889 eh
= (struct _bfd_sparc_elf_link_hash_entry
*) h
;
1890 for (pp
= &eh
->dyn_relocs
; (p
= *pp
) != NULL
; pp
= &p
->next
)
1893 /* Everything must go for SEC. */
1899 r_type
= SPARC_ELF_R_TYPE (rel
->r_info
);
1900 r_type
= sparc_elf_tls_transition (info
, abfd
, r_type
, h
!= NULL
);
1903 case R_SPARC_TLS_LDM_HI22
:
1904 case R_SPARC_TLS_LDM_LO10
:
1905 if (_bfd_sparc_elf_hash_table (info
)->tls_ldm_got
.refcount
> 0)
1906 _bfd_sparc_elf_hash_table (info
)->tls_ldm_got
.refcount
-= 1;
1909 case R_SPARC_TLS_GD_HI22
:
1910 case R_SPARC_TLS_GD_LO10
:
1911 case R_SPARC_TLS_IE_HI22
:
1912 case R_SPARC_TLS_IE_LO10
:
1916 case R_SPARC_GOTDATA_HIX22
:
1917 case R_SPARC_GOTDATA_LOX10
:
1918 case R_SPARC_GOTDATA_OP_HIX22
:
1919 case R_SPARC_GOTDATA_OP_LOX10
:
1922 if (h
->got
.refcount
> 0)
1929 case R_SPARC_GOTDATA_OP_HIX22
:
1930 case R_SPARC_GOTDATA_OP_LOX10
:
1934 if (local_got_refcounts
[r_symndx
] > 0)
1935 local_got_refcounts
[r_symndx
]--;
1943 case R_SPARC_PC_HH22
:
1944 case R_SPARC_PC_HM10
:
1945 case R_SPARC_PC_LM22
:
1947 && strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0)
1952 case R_SPARC_DISP16
:
1953 case R_SPARC_DISP32
:
1954 case R_SPARC_DISP64
:
1955 case R_SPARC_WDISP30
:
1956 case R_SPARC_WDISP22
:
1957 case R_SPARC_WDISP19
:
1958 case R_SPARC_WDISP16
:
1989 case R_SPARC_WPLT30
:
1992 if (h
->plt
.refcount
> 0)
2005 /* Adjust a symbol defined by a dynamic object and referenced by a
2006 regular object. The current definition is in some section of the
2007 dynamic object, but we're not including those sections. We have to
2008 change the definition to something the rest of the link can
2012 _bfd_sparc_elf_adjust_dynamic_symbol (struct bfd_link_info
*info
,
2013 struct elf_link_hash_entry
*h
)
2015 struct _bfd_sparc_elf_link_hash_table
*htab
;
2016 struct _bfd_sparc_elf_link_hash_entry
* eh
;
2017 struct _bfd_sparc_elf_dyn_relocs
*p
;
2020 htab
= _bfd_sparc_elf_hash_table (info
);
2021 BFD_ASSERT (htab
!= NULL
);
2023 /* Make sure we know what is going on here. */
2024 BFD_ASSERT (htab
->elf
.dynobj
!= NULL
2026 || h
->type
== STT_GNU_IFUNC
2027 || h
->u
.weakdef
!= NULL
2030 && !h
->def_regular
)));
2032 /* If this is a function, put it in the procedure linkage table. We
2033 will fill in the contents of the procedure linkage table later
2034 (although we could actually do it here). The STT_NOTYPE
2035 condition is a hack specifically for the Oracle libraries
2036 delivered for Solaris; for some inexplicable reason, they define
2037 some of their functions as STT_NOTYPE when they really should be
2039 if (h
->type
== STT_FUNC
2040 || h
->type
== STT_GNU_IFUNC
2042 || (h
->type
== STT_NOTYPE
2043 && (h
->root
.type
== bfd_link_hash_defined
2044 || h
->root
.type
== bfd_link_hash_defweak
)
2045 && (h
->root
.u
.def
.section
->flags
& SEC_CODE
) != 0))
2047 if (h
->plt
.refcount
<= 0
2048 || (h
->type
!= STT_GNU_IFUNC
2049 && (SYMBOL_CALLS_LOCAL (info
, h
)
2050 || (ELF_ST_VISIBILITY (h
->other
) != STV_DEFAULT
2051 && h
->root
.type
== bfd_link_hash_undefweak
))))
2053 /* This case can occur if we saw a WPLT30 reloc in an input
2054 file, but the symbol was never referred to by a dynamic
2055 object, or if all references were garbage collected. In
2056 such a case, we don't actually need to build a procedure
2057 linkage table, and we can just do a WDISP30 reloc instead. */
2058 h
->plt
.offset
= (bfd_vma
) -1;
2065 h
->plt
.offset
= (bfd_vma
) -1;
2067 /* If this is a weak symbol, and there is a real definition, the
2068 processor independent code will have arranged for us to see the
2069 real definition first, and we can just use the same value. */
2070 if (h
->u
.weakdef
!= NULL
)
2072 BFD_ASSERT (h
->u
.weakdef
->root
.type
== bfd_link_hash_defined
2073 || h
->u
.weakdef
->root
.type
== bfd_link_hash_defweak
);
2074 h
->root
.u
.def
.section
= h
->u
.weakdef
->root
.u
.def
.section
;
2075 h
->root
.u
.def
.value
= h
->u
.weakdef
->root
.u
.def
.value
;
2079 /* This is a reference to a symbol defined by a dynamic object which
2080 is not a function. */
2082 /* If we are creating a shared library, we must presume that the
2083 only references to the symbol are via the global offset table.
2084 For such cases we need not do anything here; the relocations will
2085 be handled correctly by relocate_section. */
2089 /* If there are no references to this symbol that do not use the
2090 GOT, we don't need to generate a copy reloc. */
2091 if (!h
->non_got_ref
)
2094 /* If -z nocopyreloc was given, we won't generate them either. */
2095 if (info
->nocopyreloc
)
2101 eh
= (struct _bfd_sparc_elf_link_hash_entry
*) h
;
2102 for (p
= eh
->dyn_relocs
; p
!= NULL
; p
= p
->next
)
2104 s
= p
->sec
->output_section
;
2105 if (s
!= NULL
&& (s
->flags
& SEC_READONLY
) != 0)
2109 /* If we didn't find any dynamic relocs in read-only sections, then
2110 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
2117 /* We must allocate the symbol in our .dynbss section, which will
2118 become part of the .bss section of the executable. There will be
2119 an entry for this symbol in the .dynsym section. The dynamic
2120 object will contain position independent code, so all references
2121 from the dynamic object to this symbol will go through the global
2122 offset table. The dynamic linker will use the .dynsym entry to
2123 determine the address it must put in the global offset table, so
2124 both the dynamic object and the regular object will refer to the
2125 same memory location for the variable. */
2127 /* We must generate a R_SPARC_COPY reloc to tell the dynamic linker
2128 to copy the initial value out of the dynamic object and into the
2129 runtime process image. We need to remember the offset into the
2130 .rel.bss section we are going to use. */
2131 if ((h
->root
.u
.def
.section
->flags
& SEC_ALLOC
) != 0 && h
->size
!= 0)
2133 htab
->srelbss
->size
+= SPARC_ELF_RELA_BYTES (htab
);
2139 return _bfd_elf_adjust_dynamic_copy (h
, s
);
2142 /* Allocate space in .plt, .got and associated reloc sections for
2146 allocate_dynrelocs (struct elf_link_hash_entry
*h
, PTR inf
)
2148 struct bfd_link_info
*info
;
2149 struct _bfd_sparc_elf_link_hash_table
*htab
;
2150 struct _bfd_sparc_elf_link_hash_entry
*eh
;
2151 struct _bfd_sparc_elf_dyn_relocs
*p
;
2153 if (h
->root
.type
== bfd_link_hash_indirect
)
2156 info
= (struct bfd_link_info
*) inf
;
2157 htab
= _bfd_sparc_elf_hash_table (info
);
2158 BFD_ASSERT (htab
!= NULL
);
2160 if ((htab
->elf
.dynamic_sections_created
2161 && h
->plt
.refcount
> 0)
2162 || (h
->type
== STT_GNU_IFUNC
2166 /* Make sure this symbol is output as a dynamic symbol.
2167 Undefined weak syms won't yet be marked as dynamic. */
2168 if (h
->dynindx
== -1
2169 && !h
->forced_local
)
2171 if (! bfd_elf_link_record_dynamic_symbol (info
, h
))
2175 if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, info
->shared
, h
)
2176 || (h
->type
== STT_GNU_IFUNC
2179 asection
*s
= htab
->elf
.splt
;
2184 /* Allocate room for the header. */
2187 s
->size
= htab
->plt_header_size
;
2189 /* Allocate space for the .rela.plt.unloaded relocations. */
2190 if (htab
->is_vxworks
&& !info
->shared
)
2191 htab
->srelplt2
->size
= sizeof (Elf32_External_Rela
) * 2;
2194 /* The procedure linkage table size is bounded by the magnitude
2195 of the offset we can describe in the entry. */
2196 if (s
->size
>= (SPARC_ELF_WORD_BYTES(htab
) == 8 ?
2197 (((bfd_vma
)1 << 31) << 1) : 0x400000))
2199 bfd_set_error (bfd_error_bad_value
);
2203 if (SPARC_ELF_WORD_BYTES(htab
) == 8
2204 && s
->size
>= PLT64_LARGE_THRESHOLD
* PLT64_ENTRY_SIZE
)
2206 bfd_vma off
= s
->size
- PLT64_LARGE_THRESHOLD
* PLT64_ENTRY_SIZE
;
2209 off
= (off
% (160 * PLT64_ENTRY_SIZE
)) / PLT64_ENTRY_SIZE
;
2211 h
->plt
.offset
= (s
->size
- (off
* 8));
2214 h
->plt
.offset
= s
->size
;
2216 /* If this symbol is not defined in a regular file, and we are
2217 not generating a shared library, then set the symbol to this
2218 location in the .plt. This is required to make function
2219 pointers compare as equal between the normal executable and
2220 the shared library. */
2224 h
->root
.u
.def
.section
= s
;
2225 h
->root
.u
.def
.value
= h
->plt
.offset
;
2228 /* Make room for this entry. */
2229 s
->size
+= htab
->plt_entry_size
;
2231 /* We also need to make an entry in the .rela.plt section. */
2232 if (s
== htab
->elf
.splt
)
2233 htab
->elf
.srelplt
->size
+= SPARC_ELF_RELA_BYTES (htab
);
2235 htab
->elf
.irelplt
->size
+= SPARC_ELF_RELA_BYTES (htab
);
2237 if (htab
->is_vxworks
)
2239 /* Allocate space for the .got.plt entry. */
2240 htab
->elf
.sgotplt
->size
+= 4;
2242 /* ...and for the .rela.plt.unloaded relocations. */
2244 htab
->srelplt2
->size
+= sizeof (Elf32_External_Rela
) * 3;
2249 h
->plt
.offset
= (bfd_vma
) -1;
2255 h
->plt
.offset
= (bfd_vma
) -1;
2259 /* If R_SPARC_TLS_IE_{HI22,LO10} symbol is now local to the binary,
2260 make it a R_SPARC_TLS_LE_{HI22,LO10} requiring no TLS entry. */
2261 if (h
->got
.refcount
> 0
2264 && _bfd_sparc_elf_hash_entry(h
)->tls_type
== GOT_TLS_IE
)
2265 h
->got
.offset
= (bfd_vma
) -1;
2266 else if (h
->got
.refcount
> 0)
2270 int tls_type
= _bfd_sparc_elf_hash_entry(h
)->tls_type
;
2272 /* Make sure this symbol is output as a dynamic symbol.
2273 Undefined weak syms won't yet be marked as dynamic. */
2274 if (h
->dynindx
== -1
2275 && !h
->forced_local
)
2277 if (! bfd_elf_link_record_dynamic_symbol (info
, h
))
2282 h
->got
.offset
= s
->size
;
2283 s
->size
+= SPARC_ELF_WORD_BYTES (htab
);
2284 /* R_SPARC_TLS_GD_HI{22,LO10} needs 2 consecutive GOT slots. */
2285 if (tls_type
== GOT_TLS_GD
)
2286 s
->size
+= SPARC_ELF_WORD_BYTES (htab
);
2287 dyn
= htab
->elf
.dynamic_sections_created
;
2288 /* R_SPARC_TLS_IE_{HI22,LO10} needs one dynamic relocation,
2289 R_SPARC_TLS_GD_{HI22,LO10} needs one if local symbol and two if
2291 if ((tls_type
== GOT_TLS_GD
&& h
->dynindx
== -1)
2292 || tls_type
== GOT_TLS_IE
2293 || h
->type
== STT_GNU_IFUNC
)
2294 htab
->elf
.srelgot
->size
+= SPARC_ELF_RELA_BYTES (htab
);
2295 else if (tls_type
== GOT_TLS_GD
)
2296 htab
->elf
.srelgot
->size
+= 2 * SPARC_ELF_RELA_BYTES (htab
);
2297 else if (WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn
, info
->shared
, h
))
2298 htab
->elf
.srelgot
->size
+= SPARC_ELF_RELA_BYTES (htab
);
2301 h
->got
.offset
= (bfd_vma
) -1;
2303 eh
= (struct _bfd_sparc_elf_link_hash_entry
*) h
;
2304 if (eh
->dyn_relocs
== NULL
)
2307 /* In the shared -Bsymbolic case, discard space allocated for
2308 dynamic pc-relative relocs against symbols which turn out to be
2309 defined in regular objects. For the normal shared case, discard
2310 space for pc-relative relocs that have become local due to symbol
2311 visibility changes. */
2315 if (SYMBOL_CALLS_LOCAL (info
, h
))
2317 struct _bfd_sparc_elf_dyn_relocs
**pp
;
2319 for (pp
= &eh
->dyn_relocs
; (p
= *pp
) != NULL
; )
2321 p
->count
-= p
->pc_count
;
2330 if (htab
->is_vxworks
)
2332 struct _bfd_sparc_elf_dyn_relocs
**pp
;
2334 for (pp
= &eh
->dyn_relocs
; (p
= *pp
) != NULL
; )
2336 if (strcmp (p
->sec
->output_section
->name
, ".tls_vars") == 0)
2343 /* Also discard relocs on undefined weak syms with non-default
2345 if (eh
->dyn_relocs
!= NULL
2346 && h
->root
.type
== bfd_link_hash_undefweak
)
2348 if (ELF_ST_VISIBILITY (h
->other
) != STV_DEFAULT
)
2349 eh
->dyn_relocs
= NULL
;
2351 /* Make sure undefined weak symbols are output as a dynamic
2353 else if (h
->dynindx
== -1
2354 && !h
->forced_local
)
2356 if (! bfd_elf_link_record_dynamic_symbol (info
, h
))
2363 /* For the non-shared case, discard space for relocs against
2364 symbols which turn out to need copy relocs or are not
2370 || (htab
->elf
.dynamic_sections_created
2371 && (h
->root
.type
== bfd_link_hash_undefweak
2372 || h
->root
.type
== bfd_link_hash_undefined
))))
2374 /* Make sure this symbol is output as a dynamic symbol.
2375 Undefined weak syms won't yet be marked as dynamic. */
2376 if (h
->dynindx
== -1
2377 && !h
->forced_local
)
2379 if (! bfd_elf_link_record_dynamic_symbol (info
, h
))
2383 /* If that succeeded, we know we'll be keeping all the
2385 if (h
->dynindx
!= -1)
2389 eh
->dyn_relocs
= NULL
;
2394 /* Finally, allocate space. */
2395 for (p
= eh
->dyn_relocs
; p
!= NULL
; p
= p
->next
)
2397 asection
*sreloc
= elf_section_data (p
->sec
)->sreloc
;
2398 sreloc
->size
+= p
->count
* SPARC_ELF_RELA_BYTES (htab
);
2404 /* Allocate space in .plt, .got and associated reloc sections for
2405 local dynamic relocs. */
2408 allocate_local_dynrelocs (void **slot
, void *inf
)
2410 struct elf_link_hash_entry
*h
2411 = (struct elf_link_hash_entry
*) *slot
;
2413 if (h
->type
!= STT_GNU_IFUNC
2417 || h
->root
.type
!= bfd_link_hash_defined
)
2420 return allocate_dynrelocs (h
, inf
);
2423 /* Find any dynamic relocs that apply to read-only sections. */
2426 readonly_dynrelocs (struct elf_link_hash_entry
*h
, PTR inf
)
2428 struct _bfd_sparc_elf_link_hash_entry
*eh
;
2429 struct _bfd_sparc_elf_dyn_relocs
*p
;
2431 eh
= (struct _bfd_sparc_elf_link_hash_entry
*) h
;
2432 for (p
= eh
->dyn_relocs
; p
!= NULL
; p
= p
->next
)
2434 asection
*s
= p
->sec
->output_section
;
2436 if (s
!= NULL
&& (s
->flags
& SEC_READONLY
) != 0)
2438 struct bfd_link_info
*info
= (struct bfd_link_info
*) inf
;
2440 info
->flags
|= DF_TEXTREL
;
2442 /* Not an error, just cut short the traversal. */
2449 /* Return true if the dynamic symbol for a given section should be
2450 omitted when creating a shared library. */
2453 _bfd_sparc_elf_omit_section_dynsym (bfd
*output_bfd
,
2454 struct bfd_link_info
*info
,
2457 /* We keep the .got section symbol so that explicit relocations
2458 against the _GLOBAL_OFFSET_TABLE_ symbol emitted in PIC mode
2459 can be turned into relocations against the .got symbol. */
2460 if (strcmp (p
->name
, ".got") == 0)
2463 return _bfd_elf_link_omit_section_dynsym (output_bfd
, info
, p
);
2466 /* Set the sizes of the dynamic sections. */
2469 _bfd_sparc_elf_size_dynamic_sections (bfd
*output_bfd
,
2470 struct bfd_link_info
*info
)
2472 struct _bfd_sparc_elf_link_hash_table
*htab
;
2477 htab
= _bfd_sparc_elf_hash_table (info
);
2478 BFD_ASSERT (htab
!= NULL
);
2479 dynobj
= htab
->elf
.dynobj
;
2480 BFD_ASSERT (dynobj
!= NULL
);
2482 if (elf_hash_table (info
)->dynamic_sections_created
)
2484 /* Set the contents of the .interp section to the interpreter. */
2485 if (info
->executable
)
2487 s
= bfd_get_section_by_name (dynobj
, ".interp");
2488 BFD_ASSERT (s
!= NULL
);
2489 s
->size
= htab
->dynamic_interpreter_size
;
2490 s
->contents
= (unsigned char *) htab
->dynamic_interpreter
;
2494 /* Set up .got offsets for local syms, and space for local dynamic
2496 for (ibfd
= info
->input_bfds
; ibfd
!= NULL
; ibfd
= ibfd
->link_next
)
2498 bfd_signed_vma
*local_got
;
2499 bfd_signed_vma
*end_local_got
;
2500 char *local_tls_type
;
2501 bfd_size_type locsymcount
;
2502 Elf_Internal_Shdr
*symtab_hdr
;
2505 if (! is_sparc_elf (ibfd
))
2508 for (s
= ibfd
->sections
; s
!= NULL
; s
= s
->next
)
2510 struct _bfd_sparc_elf_dyn_relocs
*p
;
2512 for (p
= elf_section_data (s
)->local_dynrel
; p
!= NULL
; p
= p
->next
)
2514 if (!bfd_is_abs_section (p
->sec
)
2515 && bfd_is_abs_section (p
->sec
->output_section
))
2517 /* Input section has been discarded, either because
2518 it is a copy of a linkonce section or due to
2519 linker script /DISCARD/, so we'll be discarding
2522 else if (htab
->is_vxworks
2523 && strcmp (p
->sec
->output_section
->name
,
2526 /* Relocations in vxworks .tls_vars sections are
2527 handled specially by the loader. */
2529 else if (p
->count
!= 0)
2531 srel
= elf_section_data (p
->sec
)->sreloc
;
2532 if (!htab
->elf
.dynamic_sections_created
)
2533 srel
= htab
->elf
.irelplt
;
2534 srel
->size
+= p
->count
* SPARC_ELF_RELA_BYTES (htab
);
2535 if ((p
->sec
->output_section
->flags
& SEC_READONLY
) != 0)
2536 info
->flags
|= DF_TEXTREL
;
2541 local_got
= elf_local_got_refcounts (ibfd
);
2545 symtab_hdr
= &elf_symtab_hdr (ibfd
);
2546 locsymcount
= symtab_hdr
->sh_info
;
2547 end_local_got
= local_got
+ locsymcount
;
2548 local_tls_type
= _bfd_sparc_elf_local_got_tls_type (ibfd
);
2550 srel
= htab
->elf
.srelgot
;
2551 for (; local_got
< end_local_got
; ++local_got
, ++local_tls_type
)
2555 *local_got
= s
->size
;
2556 s
->size
+= SPARC_ELF_WORD_BYTES (htab
);
2557 if (*local_tls_type
== GOT_TLS_GD
)
2558 s
->size
+= SPARC_ELF_WORD_BYTES (htab
);
2560 || *local_tls_type
== GOT_TLS_GD
2561 || *local_tls_type
== GOT_TLS_IE
)
2562 srel
->size
+= SPARC_ELF_RELA_BYTES (htab
);
2565 *local_got
= (bfd_vma
) -1;
2569 if (htab
->tls_ldm_got
.refcount
> 0)
2571 /* Allocate 2 got entries and 1 dynamic reloc for
2572 R_SPARC_TLS_LDM_{HI22,LO10} relocs. */
2573 htab
->tls_ldm_got
.offset
= htab
->elf
.sgot
->size
;
2574 htab
->elf
.sgot
->size
+= (2 * SPARC_ELF_WORD_BYTES (htab
));
2575 htab
->elf
.srelgot
->size
+= SPARC_ELF_RELA_BYTES (htab
);
2578 htab
->tls_ldm_got
.offset
= -1;
2580 /* Allocate global sym .plt and .got entries, and space for global
2581 sym dynamic relocs. */
2582 elf_link_hash_traverse (&htab
->elf
, allocate_dynrelocs
, (PTR
) info
);
2584 /* Allocate .plt and .got entries, and space for local symbols. */
2585 htab_traverse (htab
->loc_hash_table
, allocate_local_dynrelocs
, info
);
2587 if (! ABI_64_P (output_bfd
)
2588 && !htab
->is_vxworks
2589 && elf_hash_table (info
)->dynamic_sections_created
)
2591 /* Make space for the trailing nop in .plt. */
2592 if (htab
->elf
.splt
->size
> 0)
2593 htab
->elf
.splt
->size
+= 1 * SPARC_INSN_BYTES
;
2595 /* If the .got section is more than 0x1000 bytes, we add
2596 0x1000 to the value of _GLOBAL_OFFSET_TABLE_, so that 13
2597 bit relocations have a greater chance of working.
2599 FIXME: Make this optimization work for 64-bit too. */
2600 if (htab
->elf
.sgot
->size
>= 0x1000
2601 && elf_hash_table (info
)->hgot
->root
.u
.def
.value
== 0)
2602 elf_hash_table (info
)->hgot
->root
.u
.def
.value
= 0x1000;
2605 /* The check_relocs and adjust_dynamic_symbol entry points have
2606 determined the sizes of the various dynamic sections. Allocate
2608 for (s
= dynobj
->sections
; s
!= NULL
; s
= s
->next
)
2610 if ((s
->flags
& SEC_LINKER_CREATED
) == 0)
2613 if (s
== htab
->elf
.splt
2614 || s
== htab
->elf
.sgot
2615 || s
== htab
->sdynbss
2616 || s
== htab
->elf
.iplt
2617 || s
== htab
->elf
.sgotplt
)
2619 /* Strip this section if we don't need it; see the
2622 else if (CONST_STRNEQ (s
->name
, ".rela"))
2626 /* We use the reloc_count field as a counter if we need
2627 to copy relocs into the output file. */
2633 /* It's not one of our sections. */
2639 /* If we don't need this section, strip it from the
2640 output file. This is mostly to handle .rela.bss and
2641 .rela.plt. We must create both sections in
2642 create_dynamic_sections, because they must be created
2643 before the linker maps input sections to output
2644 sections. The linker does that before
2645 adjust_dynamic_symbol is called, and it is that
2646 function which decides whether anything needs to go
2647 into these sections. */
2648 s
->flags
|= SEC_EXCLUDE
;
2652 if ((s
->flags
& SEC_HAS_CONTENTS
) == 0)
2655 /* Allocate memory for the section contents. Zero the memory
2656 for the benefit of .rela.plt, which has 4 unused entries
2657 at the beginning, and we don't want garbage. */
2658 s
->contents
= (bfd_byte
*) bfd_zalloc (dynobj
, s
->size
);
2659 if (s
->contents
== NULL
)
2663 if (elf_hash_table (info
)->dynamic_sections_created
)
2665 /* Add some entries to the .dynamic section. We fill in the
2666 values later, in _bfd_sparc_elf_finish_dynamic_sections, but we
2667 must add the entries now so that we get the correct size for
2668 the .dynamic section. The DT_DEBUG entry is filled in by the
2669 dynamic linker and used by the debugger. */
2670 #define add_dynamic_entry(TAG, VAL) \
2671 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
2673 if (info
->executable
)
2675 if (!add_dynamic_entry (DT_DEBUG
, 0))
2679 if (htab
->elf
.srelplt
->size
!= 0)
2681 if (!add_dynamic_entry (DT_PLTGOT
, 0)
2682 || !add_dynamic_entry (DT_PLTRELSZ
, 0)
2683 || !add_dynamic_entry (DT_PLTREL
, DT_RELA
)
2684 || !add_dynamic_entry (DT_JMPREL
, 0))
2688 if (!add_dynamic_entry (DT_RELA
, 0)
2689 || !add_dynamic_entry (DT_RELASZ
, 0)
2690 || !add_dynamic_entry (DT_RELAENT
,
2691 SPARC_ELF_RELA_BYTES (htab
)))
2694 /* If any dynamic relocs apply to a read-only section,
2695 then we need a DT_TEXTREL entry. */
2696 if ((info
->flags
& DF_TEXTREL
) == 0)
2697 elf_link_hash_traverse (&htab
->elf
, readonly_dynrelocs
,
2700 if (info
->flags
& DF_TEXTREL
)
2702 if (!add_dynamic_entry (DT_TEXTREL
, 0))
2706 if (ABI_64_P (output_bfd
))
2709 struct _bfd_sparc_elf_app_reg
* app_regs
;
2710 struct elf_strtab_hash
*dynstr
;
2711 struct elf_link_hash_table
*eht
= elf_hash_table (info
);
2713 /* Add dynamic STT_REGISTER symbols and corresponding DT_SPARC_REGISTER
2714 entries if needed. */
2715 app_regs
= _bfd_sparc_elf_hash_table (info
)->app_regs
;
2716 dynstr
= eht
->dynstr
;
2718 for (reg
= 0; reg
< 4; reg
++)
2719 if (app_regs
[reg
].name
!= NULL
)
2721 struct elf_link_local_dynamic_entry
*entry
, *e
;
2723 if (!add_dynamic_entry (DT_SPARC_REGISTER
, 0))
2726 entry
= (struct elf_link_local_dynamic_entry
*)
2727 bfd_hash_allocate (&info
->hash
->table
, sizeof (*entry
));
2731 /* We cheat here a little bit: the symbol will not be local, so we
2732 put it at the end of the dynlocal linked list. We will fix it
2733 later on, as we have to fix other fields anyway. */
2734 entry
->isym
.st_value
= reg
< 2 ? reg
+ 2 : reg
+ 4;
2735 entry
->isym
.st_size
= 0;
2736 if (*app_regs
[reg
].name
!= '\0')
2738 = _bfd_elf_strtab_add (dynstr
, app_regs
[reg
].name
, FALSE
);
2740 entry
->isym
.st_name
= 0;
2741 entry
->isym
.st_other
= 0;
2742 entry
->isym
.st_info
= ELF_ST_INFO (app_regs
[reg
].bind
,
2744 entry
->isym
.st_shndx
= app_regs
[reg
].shndx
;
2745 entry
->isym
.st_target_internal
= 0;
2747 entry
->input_bfd
= output_bfd
;
2748 entry
->input_indx
= -1;
2750 if (eht
->dynlocal
== NULL
)
2751 eht
->dynlocal
= entry
;
2754 for (e
= eht
->dynlocal
; e
->next
; e
= e
->next
)
2761 if (htab
->is_vxworks
2762 && !elf_vxworks_add_dynamic_entries (output_bfd
, info
))
2765 #undef add_dynamic_entry
2771 _bfd_sparc_elf_new_section_hook (bfd
*abfd
, asection
*sec
)
2773 if (!sec
->used_by_bfd
)
2775 struct _bfd_sparc_elf_section_data
*sdata
;
2776 bfd_size_type amt
= sizeof (*sdata
);
2778 sdata
= bfd_zalloc (abfd
, amt
);
2781 sec
->used_by_bfd
= sdata
;
2784 return _bfd_elf_new_section_hook (abfd
, sec
);
2788 _bfd_sparc_elf_relax_section (bfd
*abfd ATTRIBUTE_UNUSED
,
2789 struct bfd_section
*section
,
2790 struct bfd_link_info
*link_info ATTRIBUTE_UNUSED
,
2793 if (link_info
->relocatable
)
2794 (*link_info
->callbacks
->einfo
)
2795 (_("%P%F: --relax and -r may not be used together\n"));
2798 sec_do_relax (section
) = 1;
2802 /* Return the base VMA address which should be subtracted from real addresses
2803 when resolving @dtpoff relocation.
2804 This is PT_TLS segment p_vaddr. */
2807 dtpoff_base (struct bfd_link_info
*info
)
2809 /* If tls_sec is NULL, we should have signalled an error already. */
2810 if (elf_hash_table (info
)->tls_sec
== NULL
)
2812 return elf_hash_table (info
)->tls_sec
->vma
;
2815 /* Return the relocation value for @tpoff relocation
2816 if STT_TLS virtual address is ADDRESS. */
2819 tpoff (struct bfd_link_info
*info
, bfd_vma address
)
2821 struct elf_link_hash_table
*htab
= elf_hash_table (info
);
2822 const struct elf_backend_data
*bed
= get_elf_backend_data (info
->output_bfd
);
2823 bfd_vma static_tls_size
;
2825 /* If tls_sec is NULL, we should have signalled an error already. */
2826 if (htab
->tls_sec
== NULL
)
2829 /* Consider special static TLS alignment requirements. */
2830 static_tls_size
= BFD_ALIGN (htab
->tls_size
, bed
->static_tls_alignment
);
2831 return address
- static_tls_size
- htab
->tls_sec
->vma
;
2834 /* Return the relocation value for a %gdop relocation. */
2837 gdopoff (struct bfd_link_info
*info
, bfd_vma address
)
2839 struct elf_link_hash_table
*htab
= elf_hash_table (info
);
2842 got_base
= (htab
->hgot
->root
.u
.def
.value
2843 + htab
->hgot
->root
.u
.def
.section
->output_offset
2844 + htab
->hgot
->root
.u
.def
.section
->output_section
->vma
);
2846 return address
- got_base
;
2849 /* Relocate a SPARC ELF section. */
2852 _bfd_sparc_elf_relocate_section (bfd
*output_bfd
,
2853 struct bfd_link_info
*info
,
2855 asection
*input_section
,
2857 Elf_Internal_Rela
*relocs
,
2858 Elf_Internal_Sym
*local_syms
,
2859 asection
**local_sections
)
2861 struct _bfd_sparc_elf_link_hash_table
*htab
;
2862 Elf_Internal_Shdr
*symtab_hdr
;
2863 struct elf_link_hash_entry
**sym_hashes
;
2864 bfd_vma
*local_got_offsets
;
2867 Elf_Internal_Rela
*rel
;
2868 Elf_Internal_Rela
*relend
;
2870 bfd_boolean is_vxworks_tls
;
2872 htab
= _bfd_sparc_elf_hash_table (info
);
2873 BFD_ASSERT (htab
!= NULL
);
2874 symtab_hdr
= &elf_symtab_hdr (input_bfd
);
2875 sym_hashes
= elf_sym_hashes (input_bfd
);
2876 local_got_offsets
= elf_local_got_offsets (input_bfd
);
2878 if (elf_hash_table (info
)->hgot
== NULL
)
2881 got_base
= elf_hash_table (info
)->hgot
->root
.u
.def
.value
;
2883 sreloc
= elf_section_data (input_section
)->sreloc
;
2884 /* We have to handle relocations in vxworks .tls_vars sections
2885 specially, because the dynamic loader is 'weird'. */
2886 is_vxworks_tls
= (htab
->is_vxworks
&& info
->shared
2887 && !strcmp (input_section
->output_section
->name
,
2891 if (ABI_64_P (output_bfd
))
2892 num_relocs
= NUM_SHDR_ENTRIES (_bfd_elf_single_rel_hdr (input_section
));
2894 num_relocs
= input_section
->reloc_count
;
2895 relend
= relocs
+ num_relocs
;
2896 for (; rel
< relend
; rel
++)
2898 int r_type
, tls_type
;
2899 reloc_howto_type
*howto
;
2900 unsigned long r_symndx
;
2901 struct elf_link_hash_entry
*h
;
2902 Elf_Internal_Sym
*sym
;
2904 bfd_vma relocation
, off
;
2905 bfd_reloc_status_type r
;
2906 bfd_boolean is_plt
= FALSE
;
2907 bfd_boolean unresolved_reloc
;
2909 r_type
= SPARC_ELF_R_TYPE (rel
->r_info
);
2910 if (r_type
== R_SPARC_GNU_VTINHERIT
2911 || r_type
== R_SPARC_GNU_VTENTRY
)
2914 if (r_type
< 0 || r_type
>= (int) R_SPARC_max_std
)
2916 bfd_set_error (bfd_error_bad_value
);
2919 howto
= _bfd_sparc_elf_howto_table
+ r_type
;
2921 r_symndx
= SPARC_ELF_R_SYMNDX (htab
, rel
->r_info
);
2925 unresolved_reloc
= FALSE
;
2926 if (r_symndx
< symtab_hdr
->sh_info
)
2928 sym
= local_syms
+ r_symndx
;
2929 sec
= local_sections
[r_symndx
];
2930 relocation
= _bfd_elf_rela_local_sym (output_bfd
, sym
, &sec
, rel
);
2932 if (!info
->relocatable
2933 && ELF_ST_TYPE (sym
->st_info
) == STT_GNU_IFUNC
)
2935 /* Relocate against local STT_GNU_IFUNC symbol. */
2936 h
= elf_sparc_get_local_sym_hash (htab
, input_bfd
,
2941 /* Set STT_GNU_IFUNC symbol value. */
2942 h
->root
.u
.def
.value
= sym
->st_value
;
2943 h
->root
.u
.def
.section
= sec
;
2950 RELOC_FOR_GLOBAL_SYMBOL (info
, input_bfd
, input_section
, rel
,
2951 r_symndx
, symtab_hdr
, sym_hashes
,
2953 unresolved_reloc
, warned
);
2956 /* To avoid generating warning messages about truncated
2957 relocations, set the relocation's address to be the same as
2958 the start of this section. */
2959 if (input_section
->output_section
!= NULL
)
2960 relocation
= input_section
->output_section
->vma
;
2966 if (sec
!= NULL
&& elf_discarded_section (sec
))
2967 RELOC_AGAINST_DISCARDED_SECTION (info
, input_bfd
, input_section
,
2968 rel
, relend
, howto
, contents
);
2970 if (info
->relocatable
)
2974 && h
->type
== STT_GNU_IFUNC
2980 if ((input_section
->flags
& SEC_ALLOC
) == 0
2981 || h
->plt
.offset
== (bfd_vma
) -1)
2984 plt_sec
= htab
->elf
.splt
;
2986 plt_sec
=htab
->elf
.iplt
;
2990 case R_SPARC_GOTDATA_OP
:
2993 case R_SPARC_GOTDATA_OP_HIX22
:
2994 case R_SPARC_GOTDATA_OP_LOX10
:
2995 r_type
= (r_type
== R_SPARC_GOTDATA_OP_HIX22
2998 howto
= _bfd_sparc_elf_howto_table
+ r_type
;
3004 if (htab
->elf
.sgot
== NULL
)
3006 off
= h
->got
.offset
;
3007 if (off
== (bfd_vma
) -1)
3009 relocation
= htab
->elf
.sgot
->output_offset
+ off
- got_base
;
3012 case R_SPARC_WPLT30
:
3013 case R_SPARC_WDISP30
:
3014 relocation
= (plt_sec
->output_section
->vma
3015 + plt_sec
->output_offset
+ h
->plt
.offset
);
3020 if (info
->shared
&& h
->non_got_ref
)
3022 Elf_Internal_Rela outrel
;
3025 offset
= _bfd_elf_section_offset (output_bfd
, info
,
3028 if (offset
== (bfd_vma
) -1
3029 || offset
== (bfd_vma
) -2)
3032 outrel
.r_offset
= (input_section
->output_section
->vma
3033 + input_section
->output_offset
3036 if (h
->dynindx
== -1
3038 || info
->executable
)
3040 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
,
3041 0, R_SPARC_IRELATIVE
);
3042 outrel
.r_addend
= relocation
+ rel
->r_addend
;
3046 if (h
->dynindx
== -1)
3048 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, rel
, h
->dynindx
, r_type
);
3049 outrel
.r_addend
= rel
->r_addend
;
3052 sparc_elf_append_rela (output_bfd
, sreloc
, &outrel
);
3056 relocation
= (plt_sec
->output_section
->vma
3057 + plt_sec
->output_offset
+ h
->plt
.offset
);
3062 /* We should only see such relocs in static links. */
3065 relocation
= (plt_sec
->output_section
->vma
3066 + plt_sec
->output_offset
+ h
->plt
.offset
);
3070 if (h
->root
.root
.string
)
3071 name
= h
->root
.root
.string
;
3073 name
= bfd_elf_sym_name (input_bfd
, symtab_hdr
, sym
,
3075 (*_bfd_error_handler
)
3076 (_("%B: relocation %s against STT_GNU_IFUNC "
3077 "symbol `%s' isn't handled by %s"), input_bfd
,
3078 _bfd_sparc_elf_howto_table
[r_type
].name
,
3079 name
, __FUNCTION__
);
3080 bfd_set_error (bfd_error_bad_value
);
3087 case R_SPARC_GOTDATA_OP_HIX22
:
3088 case R_SPARC_GOTDATA_OP_LOX10
:
3089 if (SYMBOL_REFERENCES_LOCAL (info
, h
))
3090 r_type
= (r_type
== R_SPARC_GOTDATA_OP_HIX22
3091 ? R_SPARC_GOTDATA_HIX22
3092 : R_SPARC_GOTDATA_LOX10
);
3094 r_type
= (r_type
== R_SPARC_GOTDATA_OP_HIX22
3097 howto
= _bfd_sparc_elf_howto_table
+ r_type
;
3100 case R_SPARC_GOTDATA_OP
:
3101 if (SYMBOL_REFERENCES_LOCAL (info
, h
))
3103 bfd_vma insn
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3105 /* {ld,ldx} [%rs1 + %rs2], %rd --> add %rs1, %rs2, %rd */
3106 relocation
= 0x80000000 | (insn
& 0x3e07c01f);
3107 bfd_put_32 (output_bfd
, relocation
, contents
+ rel
->r_offset
);
3114 case R_SPARC_GOTDATA_HIX22
:
3115 case R_SPARC_GOTDATA_LOX10
:
3116 relocation
= gdopoff (info
, relocation
);
3122 /* Relocation is to the entry for this symbol in the global
3124 if (htab
->elf
.sgot
== NULL
)
3131 off
= h
->got
.offset
;
3132 BFD_ASSERT (off
!= (bfd_vma
) -1);
3133 dyn
= elf_hash_table (info
)->dynamic_sections_created
;
3135 if (! WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn
, info
->shared
, h
)
3137 && SYMBOL_REFERENCES_LOCAL (info
, h
)))
3139 /* This is actually a static link, or it is a
3140 -Bsymbolic link and the symbol is defined
3141 locally, or the symbol was forced to be local
3142 because of a version file. We must initialize
3143 this entry in the global offset table. Since the
3144 offset must always be a multiple of 8 for 64-bit
3145 and 4 for 32-bit, we use the least significant bit
3146 to record whether we have initialized it already.
3148 When doing a dynamic link, we create a .rela.got
3149 relocation entry to initialize the value. This
3150 is done in the finish_dynamic_symbol routine. */
3155 SPARC_ELF_PUT_WORD (htab
, output_bfd
, relocation
,
3156 htab
->elf
.sgot
->contents
+ off
);
3161 unresolved_reloc
= FALSE
;
3165 BFD_ASSERT (local_got_offsets
!= NULL
3166 && local_got_offsets
[r_symndx
] != (bfd_vma
) -1);
3168 off
= local_got_offsets
[r_symndx
];
3170 /* The offset must always be a multiple of 8 on 64-bit and
3171 4 on 32-bit. We use the least significant bit to record
3172 whether we have already processed this entry. */
3181 Elf_Internal_Rela outrel
;
3183 /* We need to generate a R_SPARC_RELATIVE reloc
3184 for the dynamic linker. */
3185 s
= htab
->elf
.srelgot
;
3186 BFD_ASSERT (s
!= NULL
);
3188 outrel
.r_offset
= (htab
->elf
.sgot
->output_section
->vma
3189 + htab
->elf
.sgot
->output_offset
3191 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
,
3192 0, R_SPARC_RELATIVE
);
3193 outrel
.r_addend
= relocation
;
3195 sparc_elf_append_rela (output_bfd
, s
, &outrel
);
3198 SPARC_ELF_PUT_WORD (htab
, output_bfd
, relocation
,
3199 htab
->elf
.sgot
->contents
+ off
);
3200 local_got_offsets
[r_symndx
] |= 1;
3203 relocation
= htab
->elf
.sgot
->output_offset
+ off
- got_base
;
3208 if (h
== NULL
|| h
->plt
.offset
== (bfd_vma
) -1)
3210 r_type
= (r_type
== R_SPARC_PLT32
) ? R_SPARC_32
: R_SPARC_64
;
3215 case R_SPARC_WPLT30
:
3216 case R_SPARC_HIPLT22
:
3217 case R_SPARC_LOPLT10
:
3218 case R_SPARC_PCPLT32
:
3219 case R_SPARC_PCPLT22
:
3220 case R_SPARC_PCPLT10
:
3222 /* Relocation is to the entry for this symbol in the
3223 procedure linkage table. */
3225 if (! ABI_64_P (output_bfd
))
3227 /* The Solaris native assembler will generate a WPLT30 reloc
3228 for a local symbol if you assemble a call from one
3229 section to another when using -K pic. We treat it as
3234 /* PR 7027: We need similar behaviour for 64-bit binaries. */
3235 else if (r_type
== R_SPARC_WPLT30
&& h
== NULL
)
3239 BFD_ASSERT (h
!= NULL
);
3242 if (h
->plt
.offset
== (bfd_vma
) -1 || htab
->elf
.splt
== NULL
)
3244 /* We didn't make a PLT entry for this symbol. This
3245 happens when statically linking PIC code, or when
3246 using -Bsymbolic. */
3250 relocation
= (htab
->elf
.splt
->output_section
->vma
3251 + htab
->elf
.splt
->output_offset
3253 unresolved_reloc
= FALSE
;
3254 if (r_type
== R_SPARC_PLT32
|| r_type
== R_SPARC_PLT64
)
3256 r_type
= r_type
== R_SPARC_PLT32
? R_SPARC_32
: R_SPARC_64
;
3264 case R_SPARC_PC_HH22
:
3265 case R_SPARC_PC_HM10
:
3266 case R_SPARC_PC_LM22
:
3268 && strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0)
3272 case R_SPARC_DISP16
:
3273 case R_SPARC_DISP32
:
3274 case R_SPARC_DISP64
:
3275 case R_SPARC_WDISP30
:
3276 case R_SPARC_WDISP22
:
3277 case R_SPARC_WDISP19
:
3278 case R_SPARC_WDISP16
:
3305 if ((input_section
->flags
& SEC_ALLOC
) == 0
3311 || ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
3312 || h
->root
.type
!= bfd_link_hash_undefweak
)
3313 && (! howto
->pc_relative
3314 || !SYMBOL_CALLS_LOCAL (info
, h
)))
3321 || h
->root
.type
== bfd_link_hash_undefweak
3322 || h
->root
.type
== bfd_link_hash_undefined
)))
3324 Elf_Internal_Rela outrel
;
3325 bfd_boolean skip
, relocate
= FALSE
;
3327 /* When generating a shared object, these relocations
3328 are copied into the output file to be resolved at run
3331 BFD_ASSERT (sreloc
!= NULL
);
3336 _bfd_elf_section_offset (output_bfd
, info
, input_section
,
3338 if (outrel
.r_offset
== (bfd_vma
) -1)
3340 else if (outrel
.r_offset
== (bfd_vma
) -2)
3341 skip
= TRUE
, relocate
= TRUE
;
3342 outrel
.r_offset
+= (input_section
->output_section
->vma
3343 + input_section
->output_offset
);
3345 /* Optimize unaligned reloc usage now that we know where
3346 it finally resides. */
3350 if (outrel
.r_offset
& 1)
3351 r_type
= R_SPARC_UA16
;
3354 if (!(outrel
.r_offset
& 1))
3355 r_type
= R_SPARC_16
;
3358 if (outrel
.r_offset
& 3)
3359 r_type
= R_SPARC_UA32
;
3362 if (!(outrel
.r_offset
& 3))
3363 r_type
= R_SPARC_32
;
3366 if (outrel
.r_offset
& 7)
3367 r_type
= R_SPARC_UA64
;
3370 if (!(outrel
.r_offset
& 7))
3371 r_type
= R_SPARC_64
;
3374 case R_SPARC_DISP16
:
3375 case R_SPARC_DISP32
:
3376 case R_SPARC_DISP64
:
3377 /* If the symbol is not dynamic, we should not keep
3378 a dynamic relocation. But an .rela.* slot has been
3379 allocated for it, output R_SPARC_NONE.
3380 FIXME: Add code tracking needed dynamic relocs as
3382 if (h
->dynindx
== -1)
3383 skip
= TRUE
, relocate
= TRUE
;
3388 memset (&outrel
, 0, sizeof outrel
);
3389 /* h->dynindx may be -1 if the symbol was marked to
3391 else if (h
!= NULL
&&
3395 || !SYMBOLIC_BIND (info
, h
)
3396 || !h
->def_regular
))
3398 BFD_ASSERT (h
->dynindx
!= -1);
3399 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, rel
, h
->dynindx
, r_type
);
3400 outrel
.r_addend
= rel
->r_addend
;
3404 if (r_type
== R_SPARC_32
|| r_type
== R_SPARC_64
)
3406 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
,
3407 0, R_SPARC_RELATIVE
);
3408 outrel
.r_addend
= relocation
+ rel
->r_addend
;
3414 outrel
.r_addend
= relocation
+ rel
->r_addend
;
3417 sec
= htab
->elf
.splt
;
3419 if (bfd_is_abs_section (sec
))
3421 else if (sec
== NULL
|| sec
->owner
== NULL
)
3423 bfd_set_error (bfd_error_bad_value
);
3430 /* We are turning this relocation into one
3431 against a section symbol. It would be
3432 proper to subtract the symbol's value,
3433 osec->vma, from the emitted reloc addend,
3434 but ld.so expects buggy relocs. */
3435 osec
= sec
->output_section
;
3436 indx
= elf_section_data (osec
)->dynindx
;
3440 osec
= htab
->elf
.text_index_section
;
3441 indx
= elf_section_data (osec
)->dynindx
;
3444 /* FIXME: we really should be able to link non-pic
3445 shared libraries. */
3449 (*_bfd_error_handler
)
3450 (_("%B: probably compiled without -fPIC?"),
3452 bfd_set_error (bfd_error_bad_value
);
3457 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, rel
, indx
,
3462 sparc_elf_append_rela (output_bfd
, sreloc
, &outrel
);
3464 /* This reloc will be computed at runtime, so there's no
3465 need to do anything now. */
3471 case R_SPARC_TLS_GD_HI22
:
3472 if (! ABI_64_P (input_bfd
)
3473 && ! _bfd_sparc_elf_tdata (input_bfd
)->has_tlsgd
)
3475 /* R_SPARC_REV32 used the same reloc number as
3476 R_SPARC_TLS_GD_HI22. */
3477 r_type
= R_SPARC_REV32
;
3482 case R_SPARC_TLS_GD_LO10
:
3483 case R_SPARC_TLS_IE_HI22
:
3484 case R_SPARC_TLS_IE_LO10
:
3485 r_type
= sparc_elf_tls_transition (info
, input_bfd
, r_type
, h
== NULL
);
3486 tls_type
= GOT_UNKNOWN
;
3487 if (h
== NULL
&& local_got_offsets
)
3488 tls_type
= _bfd_sparc_elf_local_got_tls_type (input_bfd
) [r_symndx
];
3491 tls_type
= _bfd_sparc_elf_hash_entry(h
)->tls_type
;
3492 if (!info
->shared
&& h
->dynindx
== -1 && tls_type
== GOT_TLS_IE
)
3493 switch (SPARC_ELF_R_TYPE (rel
->r_info
))
3495 case R_SPARC_TLS_GD_HI22
:
3496 case R_SPARC_TLS_IE_HI22
:
3497 r_type
= R_SPARC_TLS_LE_HIX22
;
3500 r_type
= R_SPARC_TLS_LE_LOX10
;
3504 if (tls_type
== GOT_TLS_IE
)
3507 case R_SPARC_TLS_GD_HI22
:
3508 r_type
= R_SPARC_TLS_IE_HI22
;
3510 case R_SPARC_TLS_GD_LO10
:
3511 r_type
= R_SPARC_TLS_IE_LO10
;
3515 if (r_type
== R_SPARC_TLS_LE_HIX22
)
3517 relocation
= tpoff (info
, relocation
);
3520 if (r_type
== R_SPARC_TLS_LE_LOX10
)
3522 /* Change add into xor. */
3523 relocation
= tpoff (info
, relocation
);
3524 bfd_put_32 (output_bfd
, (bfd_get_32 (input_bfd
,
3525 contents
+ rel
->r_offset
)
3526 | 0x80182000), contents
+ rel
->r_offset
);
3532 off
= h
->got
.offset
;
3537 BFD_ASSERT (local_got_offsets
!= NULL
);
3538 off
= local_got_offsets
[r_symndx
];
3539 local_got_offsets
[r_symndx
] |= 1;
3543 if (htab
->elf
.sgot
== NULL
)
3550 Elf_Internal_Rela outrel
;
3553 if (htab
->elf
.srelgot
== NULL
)
3556 SPARC_ELF_PUT_WORD (htab
, output_bfd
, 0,
3557 htab
->elf
.sgot
->contents
+ off
);
3558 outrel
.r_offset
= (htab
->elf
.sgot
->output_section
->vma
3559 + htab
->elf
.sgot
->output_offset
+ off
);
3560 indx
= h
&& h
->dynindx
!= -1 ? h
->dynindx
: 0;
3561 if (r_type
== R_SPARC_TLS_IE_HI22
3562 || r_type
== R_SPARC_TLS_IE_LO10
)
3563 dr_type
= SPARC_ELF_TPOFF_RELOC (htab
);
3565 dr_type
= SPARC_ELF_DTPMOD_RELOC (htab
);
3566 if (dr_type
== SPARC_ELF_TPOFF_RELOC (htab
) && indx
== 0)
3567 outrel
.r_addend
= relocation
- dtpoff_base (info
);
3569 outrel
.r_addend
= 0;
3570 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, indx
, dr_type
);
3571 sparc_elf_append_rela (output_bfd
, htab
->elf
.srelgot
, &outrel
);
3573 if (r_type
== R_SPARC_TLS_GD_HI22
3574 || r_type
== R_SPARC_TLS_GD_LO10
)
3578 BFD_ASSERT (! unresolved_reloc
);
3579 SPARC_ELF_PUT_WORD (htab
, output_bfd
,
3580 relocation
- dtpoff_base (info
),
3581 (htab
->elf
.sgot
->contents
+ off
3582 + SPARC_ELF_WORD_BYTES (htab
)));
3586 SPARC_ELF_PUT_WORD (htab
, output_bfd
, 0,
3587 (htab
->elf
.sgot
->contents
+ off
3588 + SPARC_ELF_WORD_BYTES (htab
)));
3589 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, indx
,
3590 SPARC_ELF_DTPOFF_RELOC (htab
));
3591 outrel
.r_offset
+= SPARC_ELF_WORD_BYTES (htab
);
3592 sparc_elf_append_rela (output_bfd
, htab
->elf
.srelgot
,
3596 else if (dr_type
== SPARC_ELF_DTPMOD_RELOC (htab
))
3598 SPARC_ELF_PUT_WORD (htab
, output_bfd
, 0,
3599 (htab
->elf
.sgot
->contents
+ off
3600 + SPARC_ELF_WORD_BYTES (htab
)));
3604 if (off
>= (bfd_vma
) -2)
3607 relocation
= htab
->elf
.sgot
->output_offset
+ off
- got_base
;
3608 unresolved_reloc
= FALSE
;
3609 howto
= _bfd_sparc_elf_howto_table
+ r_type
;
3612 case R_SPARC_TLS_LDM_HI22
:
3613 case R_SPARC_TLS_LDM_LO10
:
3616 bfd_put_32 (output_bfd
, SPARC_NOP
, contents
+ rel
->r_offset
);
3619 off
= htab
->tls_ldm_got
.offset
;
3620 htab
->tls_ldm_got
.offset
|= 1;
3621 goto r_sparc_tlsldm
;
3623 case R_SPARC_TLS_LDO_HIX22
:
3624 case R_SPARC_TLS_LDO_LOX10
:
3627 relocation
-= dtpoff_base (info
);
3631 r_type
= (r_type
== R_SPARC_TLS_LDO_HIX22
3632 ? R_SPARC_TLS_LE_HIX22
: R_SPARC_TLS_LE_LOX10
);
3635 case R_SPARC_TLS_LE_HIX22
:
3636 case R_SPARC_TLS_LE_LOX10
:
3639 Elf_Internal_Rela outrel
;
3642 BFD_ASSERT (sreloc
!= NULL
);
3645 _bfd_elf_section_offset (output_bfd
, info
, input_section
,
3647 if (outrel
.r_offset
== (bfd_vma
) -1)
3649 else if (outrel
.r_offset
== (bfd_vma
) -2)
3651 outrel
.r_offset
+= (input_section
->output_section
->vma
3652 + input_section
->output_offset
);
3654 memset (&outrel
, 0, sizeof outrel
);
3657 outrel
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, 0, r_type
);
3658 outrel
.r_addend
= relocation
- dtpoff_base (info
)
3662 sparc_elf_append_rela (output_bfd
, sreloc
, &outrel
);
3665 relocation
= tpoff (info
, relocation
);
3668 case R_SPARC_TLS_LDM_CALL
:
3672 bfd_put_32 (output_bfd
, 0x90100000, contents
+ rel
->r_offset
);
3677 case R_SPARC_TLS_GD_CALL
:
3678 tls_type
= GOT_UNKNOWN
;
3679 if (h
== NULL
&& local_got_offsets
)
3680 tls_type
= _bfd_sparc_elf_local_got_tls_type (input_bfd
) [r_symndx
];
3682 tls_type
= _bfd_sparc_elf_hash_entry(h
)->tls_type
;
3684 || (r_type
== R_SPARC_TLS_GD_CALL
&& tls_type
== GOT_TLS_IE
))
3686 Elf_Internal_Rela
*rel2
;
3689 if (!info
->shared
&& (h
== NULL
|| h
->dynindx
== -1))
3692 bfd_put_32 (output_bfd
, SPARC_NOP
, contents
+ rel
->r_offset
);
3697 if (rel
+ 1 < relend
3698 && SPARC_ELF_R_TYPE (rel
[1].r_info
) == R_SPARC_TLS_GD_ADD
3699 && rel
[1].r_offset
== rel
->r_offset
+ 4
3700 && SPARC_ELF_R_SYMNDX (htab
, rel
[1].r_info
) == r_symndx
3701 && (((insn
= bfd_get_32 (input_bfd
,
3702 contents
+ rel
[1].r_offset
))
3703 >> 25) & 0x1f) == 8)
3706 call __tls_get_addr, %tgd_call(foo)
3707 add %reg1, %reg2, %o0, %tgd_add(foo)
3708 and change it into IE:
3709 {ld,ldx} [%reg1 + %reg2], %o0, %tie_ldx(foo)
3710 add %g7, %o0, %o0, %tie_add(foo).
3711 add is 0x80000000 | (rd << 25) | (rs1 << 14) | rs2,
3712 ld is 0xc0000000 | (rd << 25) | (rs1 << 14) | rs2,
3713 ldx is 0xc0580000 | (rd << 25) | (rs1 << 14) | rs2. */
3714 bfd_put_32 (output_bfd
, insn
| (ABI_64_P (output_bfd
) ? 0xc0580000 : 0xc0000000),
3715 contents
+ rel
->r_offset
);
3716 bfd_put_32 (output_bfd
, 0x9001c008,
3717 contents
+ rel
->r_offset
+ 4);
3722 /* We cannot just overwrite the delay slot instruction,
3723 as it might be what puts the %o0 argument to
3724 __tls_get_addr into place. So we have to transpose
3725 the delay slot with the add we patch in. */
3726 insn
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
+ 4);
3727 bfd_put_32 (output_bfd
, insn
,
3728 contents
+ rel
->r_offset
);
3729 bfd_put_32 (output_bfd
, 0x9001c008,
3730 contents
+ rel
->r_offset
+ 4);
3733 while ((rel2
= sparc_elf_find_reloc_at_ofs (rel2
+ 1, relend
,
3737 /* If the instruction we moved has a relocation attached to
3738 it, adjust the offset so that it will apply to the correct
3740 rel2
->r_offset
-= 4;
3745 h
= (struct elf_link_hash_entry
*)
3746 bfd_link_hash_lookup (info
->hash
, "__tls_get_addr", FALSE
,
3748 BFD_ASSERT (h
!= NULL
);
3749 r_type
= R_SPARC_WPLT30
;
3750 howto
= _bfd_sparc_elf_howto_table
+ r_type
;
3751 goto r_sparc_wplt30
;
3753 case R_SPARC_TLS_GD_ADD
:
3754 tls_type
= GOT_UNKNOWN
;
3755 if (h
== NULL
&& local_got_offsets
)
3756 tls_type
= _bfd_sparc_elf_local_got_tls_type (input_bfd
) [r_symndx
];
3758 tls_type
= _bfd_sparc_elf_hash_entry(h
)->tls_type
;
3759 if (! info
->shared
|| tls_type
== GOT_TLS_IE
)
3761 /* add %reg1, %reg2, %reg3, %tgd_add(foo)
3763 {ld,ldx} [%reg1 + %reg2], %reg3, %tie_ldx(foo)
3765 add %g7, %reg2, %reg3. */
3766 bfd_vma insn
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3767 if ((h
!= NULL
&& h
->dynindx
!= -1) || info
->shared
)
3768 relocation
= insn
| (ABI_64_P (output_bfd
) ? 0xc0580000 : 0xc0000000);
3770 relocation
= (insn
& ~0x7c000) | 0x1c000;
3771 bfd_put_32 (output_bfd
, relocation
, contents
+ rel
->r_offset
);
3775 case R_SPARC_TLS_LDM_ADD
:
3777 bfd_put_32 (output_bfd
, SPARC_NOP
, contents
+ rel
->r_offset
);
3780 case R_SPARC_TLS_LDO_ADD
:
3783 /* Change rs1 into %g7. */
3784 bfd_vma insn
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3785 insn
= (insn
& ~0x7c000) | 0x1c000;
3786 bfd_put_32 (output_bfd
, insn
, contents
+ rel
->r_offset
);
3790 case R_SPARC_TLS_IE_LD
:
3791 case R_SPARC_TLS_IE_LDX
:
3792 if (! info
->shared
&& (h
== NULL
|| h
->dynindx
== -1))
3794 bfd_vma insn
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3795 int rs2
= insn
& 0x1f;
3796 int rd
= (insn
>> 25) & 0x1f;
3799 relocation
= SPARC_NOP
;
3801 relocation
= 0x80100000 | (insn
& 0x3e00001f);
3802 bfd_put_32 (output_bfd
, relocation
, contents
+ rel
->r_offset
);
3806 case R_SPARC_TLS_IE_ADD
:
3807 /* Totally useless relocation. */
3810 case R_SPARC_TLS_DTPOFF32
:
3811 case R_SPARC_TLS_DTPOFF64
:
3812 relocation
-= dtpoff_base (info
);
3819 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
3820 because such sections are not SEC_ALLOC and thus ld.so will
3821 not process them. */
3822 if (unresolved_reloc
3823 && !((input_section
->flags
& SEC_DEBUGGING
) != 0
3825 && _bfd_elf_section_offset (output_bfd
, info
, input_section
,
3826 rel
->r_offset
) != (bfd_vma
) -1)
3827 (*_bfd_error_handler
)
3828 (_("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
3831 (long) rel
->r_offset
,
3833 h
->root
.root
.string
);
3835 r
= bfd_reloc_continue
;
3836 if (r_type
== R_SPARC_OLO10
)
3840 if (! ABI_64_P (output_bfd
))
3843 relocation
+= rel
->r_addend
;
3844 relocation
= (relocation
& 0x3ff) + ELF64_R_TYPE_DATA (rel
->r_info
);
3846 x
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3847 x
= (x
& ~(bfd_vma
) 0x1fff) | (relocation
& 0x1fff);
3848 bfd_put_32 (input_bfd
, x
, contents
+ rel
->r_offset
);
3850 r
= bfd_check_overflow (howto
->complain_on_overflow
,
3851 howto
->bitsize
, howto
->rightshift
,
3852 bfd_arch_bits_per_address (input_bfd
),
3855 else if (r_type
== R_SPARC_WDISP16
)
3859 relocation
+= rel
->r_addend
;
3860 relocation
-= (input_section
->output_section
->vma
3861 + input_section
->output_offset
);
3862 relocation
-= rel
->r_offset
;
3864 x
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3865 x
|= ((((relocation
>> 2) & 0xc000) << 6)
3866 | ((relocation
>> 2) & 0x3fff));
3867 bfd_put_32 (input_bfd
, x
, contents
+ rel
->r_offset
);
3869 r
= bfd_check_overflow (howto
->complain_on_overflow
,
3870 howto
->bitsize
, howto
->rightshift
,
3871 bfd_arch_bits_per_address (input_bfd
),
3874 else if (r_type
== R_SPARC_REV32
)
3878 relocation
= relocation
+ rel
->r_addend
;
3880 x
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3882 bfd_putl32 (/*input_bfd,*/ x
, contents
+ rel
->r_offset
);
3885 else if (r_type
== R_SPARC_TLS_LDO_HIX22
3886 || r_type
== R_SPARC_TLS_LE_HIX22
)
3890 relocation
+= rel
->r_addend
;
3891 if (r_type
== R_SPARC_TLS_LE_HIX22
)
3892 relocation
^= MINUS_ONE
;
3894 x
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3895 x
= (x
& ~(bfd_vma
) 0x3fffff) | ((relocation
>> 10) & 0x3fffff);
3896 bfd_put_32 (input_bfd
, x
, contents
+ rel
->r_offset
);
3899 else if (r_type
== R_SPARC_TLS_LDO_LOX10
3900 || r_type
== R_SPARC_TLS_LE_LOX10
)
3904 relocation
+= rel
->r_addend
;
3905 relocation
&= 0x3ff;
3906 if (r_type
== R_SPARC_TLS_LE_LOX10
)
3907 relocation
|= 0x1c00;
3909 x
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3910 x
= (x
& ~(bfd_vma
) 0x1fff) | relocation
;
3911 bfd_put_32 (input_bfd
, x
, contents
+ rel
->r_offset
);
3915 else if (r_type
== R_SPARC_HIX22
3916 || r_type
== R_SPARC_GOTDATA_HIX22
)
3920 relocation
+= rel
->r_addend
;
3921 if (r_type
== R_SPARC_HIX22
3922 || (bfd_signed_vma
) relocation
< 0)
3923 relocation
= relocation
^ MINUS_ONE
;
3925 x
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3926 x
= (x
& ~(bfd_vma
) 0x3fffff) | ((relocation
>> 10) & 0x3fffff);
3927 bfd_put_32 (input_bfd
, x
, contents
+ rel
->r_offset
);
3929 r
= bfd_check_overflow (howto
->complain_on_overflow
,
3930 howto
->bitsize
, howto
->rightshift
,
3931 bfd_arch_bits_per_address (input_bfd
),
3934 else if (r_type
== R_SPARC_LOX10
3935 || r_type
== R_SPARC_GOTDATA_LOX10
)
3939 relocation
+= rel
->r_addend
;
3940 if (r_type
== R_SPARC_LOX10
3941 || (bfd_signed_vma
) relocation
< 0)
3942 relocation
= (relocation
& 0x3ff) | 0x1c00;
3944 relocation
= (relocation
& 0x3ff);
3946 x
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3947 x
= (x
& ~(bfd_vma
) 0x1fff) | relocation
;
3948 bfd_put_32 (input_bfd
, x
, contents
+ rel
->r_offset
);
3952 else if ((r_type
== R_SPARC_WDISP30
|| r_type
== R_SPARC_WPLT30
)
3953 && sec_do_relax (input_section
)
3954 && rel
->r_offset
+ 4 < input_section
->size
)
3958 #define XCC (2 << 20)
3959 #define COND(x) (((x)&0xf)<<25)
3960 #define CONDA COND(0x8)
3961 #define INSN_BPA (F2(0,1) | CONDA | BPRED | XCC)
3962 #define INSN_BA (F2(0,2) | CONDA)
3963 #define INSN_OR F3(2, 0x2, 0)
3964 #define INSN_NOP F2(0,4)
3968 /* If the instruction is a call with either:
3970 arithmetic instruction with rd == %o7
3971 where rs1 != %o7 and rs2 if it is register != %o7
3972 then we can optimize if the call destination is near
3973 by changing the call into a branch always. */
3974 x
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
);
3975 y
= bfd_get_32 (input_bfd
, contents
+ rel
->r_offset
+ 4);
3976 if ((x
& OP(~0)) == OP(1) && (y
& OP(~0)) == OP(2))
3978 if (((y
& OP3(~0)) == OP3(0x3d) /* restore */
3979 || ((y
& OP3(0x28)) == 0 /* arithmetic */
3980 && (y
& RD(~0)) == RD(O7
)))
3981 && (y
& RS1(~0)) != RS1(O7
)
3983 || (y
& RS2(~0)) != RS2(O7
)))
3987 reloc
= relocation
+ rel
->r_addend
- rel
->r_offset
;
3988 reloc
-= (input_section
->output_section
->vma
3989 + input_section
->output_offset
);
3991 /* Ensure the branch fits into simm22. */
3992 if ((reloc
& 3) == 0
3993 && ((reloc
& ~(bfd_vma
)0x7fffff) == 0
3994 || ((reloc
| 0x7fffff) == ~(bfd_vma
)0)))
3998 /* Check whether it fits into simm19. */
3999 if (((reloc
& 0x3c0000) == 0
4000 || (reloc
& 0x3c0000) == 0x3c0000)
4001 && (ABI_64_P (output_bfd
)
4002 || elf_elfheader (output_bfd
)->e_flags
& EF_SPARC_32PLUS
))
4003 x
= INSN_BPA
| (reloc
& 0x7ffff); /* ba,pt %xcc */
4005 x
= INSN_BA
| (reloc
& 0x3fffff); /* ba */
4006 bfd_put_32 (input_bfd
, x
, contents
+ rel
->r_offset
);
4008 if (rel
->r_offset
>= 4
4009 && (y
& (0xffffffff ^ RS1(~0)))
4010 == (INSN_OR
| RD(O7
) | RS2(G0
)))
4015 z
= bfd_get_32 (input_bfd
,
4016 contents
+ rel
->r_offset
- 4);
4017 if ((z
& (0xffffffff ^ RD(~0)))
4018 != (INSN_OR
| RS1(O7
) | RS2(G0
)))
4026 If call foo was replaced with ba, replace
4027 or %rN, %g0, %o7 with nop. */
4029 reg
= (y
& RS1(~0)) >> 14;
4030 if (reg
!= ((z
& RD(~0)) >> 25)
4031 || reg
== G0
|| reg
== O7
)
4034 bfd_put_32 (input_bfd
, (bfd_vma
) INSN_NOP
,
4035 contents
+ rel
->r_offset
+ 4);
4043 if (r
== bfd_reloc_continue
)
4046 r
= _bfd_final_link_relocate (howto
, input_bfd
, input_section
,
4047 contents
, rel
->r_offset
,
4048 relocation
, rel
->r_addend
);
4050 if (r
!= bfd_reloc_ok
)
4055 case bfd_reloc_outofrange
:
4057 case bfd_reloc_overflow
:
4061 /* The Solaris native linker silently disregards overflows.
4062 We don't, but this breaks stabs debugging info, whose
4063 relocations are only 32-bits wide. Ignore overflows in
4064 this case and also for discarded entries. */
4065 if ((r_type
== R_SPARC_32
4066 || r_type
== R_SPARC_UA32
4067 || r_type
== R_SPARC_DISP32
)
4068 && (((input_section
->flags
& SEC_DEBUGGING
) != 0
4069 && strcmp (bfd_section_name (input_bfd
,
4072 || _bfd_elf_section_offset (output_bfd
, info
,
4080 /* Assume this is a call protected by other code that
4081 detect the symbol is undefined. If this is the case,
4082 we can safely ignore the overflow. If not, the
4083 program is hosed anyway, and a little warning isn't
4085 if (h
->root
.type
== bfd_link_hash_undefweak
4086 && howto
->pc_relative
)
4093 name
= bfd_elf_string_from_elf_section (input_bfd
,
4094 symtab_hdr
->sh_link
,
4099 name
= bfd_section_name (input_bfd
, sec
);
4101 if (! ((*info
->callbacks
->reloc_overflow
)
4102 (info
, (h
? &h
->root
: NULL
), name
, howto
->name
,
4103 (bfd_vma
) 0, input_bfd
, input_section
,
4115 /* Build a VxWorks PLT entry. PLT_INDEX is the index of the PLT entry
4116 and PLT_OFFSET is the byte offset from the start of .plt. GOT_OFFSET
4117 is the offset of the associated .got.plt entry from
4118 _GLOBAL_OFFSET_TABLE_. */
4121 sparc_vxworks_build_plt_entry (bfd
*output_bfd
, struct bfd_link_info
*info
,
4122 bfd_vma plt_offset
, bfd_vma plt_index
,
4126 const bfd_vma
*plt_entry
;
4127 struct _bfd_sparc_elf_link_hash_table
*htab
;
4129 Elf_Internal_Rela rela
;
4131 htab
= _bfd_sparc_elf_hash_table (info
);
4132 BFD_ASSERT (htab
!= NULL
);
4136 plt_entry
= sparc_vxworks_shared_plt_entry
;
4141 plt_entry
= sparc_vxworks_exec_plt_entry
;
4142 got_base
= (htab
->elf
.hgot
->root
.u
.def
.value
4143 + htab
->elf
.hgot
->root
.u
.def
.section
->output_offset
4144 + htab
->elf
.hgot
->root
.u
.def
.section
->output_section
->vma
);
4147 /* Fill in the entry in the procedure linkage table. */
4148 bfd_put_32 (output_bfd
, plt_entry
[0] + ((got_base
+ got_offset
) >> 10),
4149 htab
->elf
.splt
->contents
+ plt_offset
);
4150 bfd_put_32 (output_bfd
, plt_entry
[1] + ((got_base
+ got_offset
) & 0x3ff),
4151 htab
->elf
.splt
->contents
+ plt_offset
+ 4);
4152 bfd_put_32 (output_bfd
, plt_entry
[2],
4153 htab
->elf
.splt
->contents
+ plt_offset
+ 8);
4154 bfd_put_32 (output_bfd
, plt_entry
[3],
4155 htab
->elf
.splt
->contents
+ plt_offset
+ 12);
4156 bfd_put_32 (output_bfd
, plt_entry
[4],
4157 htab
->elf
.splt
->contents
+ plt_offset
+ 16);
4158 bfd_put_32 (output_bfd
, plt_entry
[5] + (plt_index
>> 10),
4159 htab
->elf
.splt
->contents
+ plt_offset
+ 20);
4160 /* PC-relative displacement for a branch to the start of
4162 bfd_put_32 (output_bfd
, plt_entry
[6] + (((-plt_offset
- 24) >> 2)
4164 htab
->elf
.splt
->contents
+ plt_offset
+ 24);
4165 bfd_put_32 (output_bfd
, plt_entry
[7] + (plt_index
& 0x3ff),
4166 htab
->elf
.splt
->contents
+ plt_offset
+ 28);
4168 /* Fill in the .got.plt entry, pointing initially at the
4169 second half of the PLT entry. */
4170 BFD_ASSERT (htab
->elf
.sgotplt
!= NULL
);
4171 bfd_put_32 (output_bfd
,
4172 htab
->elf
.splt
->output_section
->vma
4173 + htab
->elf
.splt
->output_offset
4175 htab
->elf
.sgotplt
->contents
+ got_offset
);
4177 /* Add relocations to .rela.plt.unloaded. */
4180 loc
= (htab
->srelplt2
->contents
4181 + (2 + 3 * plt_index
) * sizeof (Elf32_External_Rela
));
4183 /* Relocate the initial sethi. */
4184 rela
.r_offset
= (htab
->elf
.splt
->output_section
->vma
4185 + htab
->elf
.splt
->output_offset
4187 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_SPARC_HI22
);
4188 rela
.r_addend
= got_offset
;
4189 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
4190 loc
+= sizeof (Elf32_External_Rela
);
4192 /* Likewise the following or. */
4194 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_SPARC_LO10
);
4195 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
4196 loc
+= sizeof (Elf32_External_Rela
);
4198 /* Relocate the .got.plt entry. */
4199 rela
.r_offset
= (htab
->elf
.sgotplt
->output_section
->vma
4200 + htab
->elf
.sgotplt
->output_offset
4202 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hplt
->indx
, R_SPARC_32
);
4203 rela
.r_addend
= plt_offset
+ 20;
4204 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
4208 /* Finish up dynamic symbol handling. We set the contents of various
4209 dynamic sections here. */
4212 _bfd_sparc_elf_finish_dynamic_symbol (bfd
*output_bfd
,
4213 struct bfd_link_info
*info
,
4214 struct elf_link_hash_entry
*h
,
4215 Elf_Internal_Sym
*sym
)
4217 struct _bfd_sparc_elf_link_hash_table
*htab
;
4218 const struct elf_backend_data
*bed
;
4220 htab
= _bfd_sparc_elf_hash_table (info
);
4221 BFD_ASSERT (htab
!= NULL
);
4222 bed
= get_elf_backend_data (output_bfd
);
4224 if (h
->plt
.offset
!= (bfd_vma
) -1)
4228 Elf_Internal_Rela rela
;
4230 bfd_vma r_offset
, got_offset
;
4233 /* When building a static executable, use .iplt and
4234 .rela.iplt sections for STT_GNU_IFUNC symbols. */
4235 if (htab
->elf
.splt
!= NULL
)
4237 splt
= htab
->elf
.splt
;
4238 srela
= htab
->elf
.srelplt
;
4242 splt
= htab
->elf
.iplt
;
4243 srela
= htab
->elf
.irelplt
;
4246 if (splt
== NULL
|| srela
== NULL
)
4249 /* Fill in the entry in the .rela.plt section. */
4250 if (htab
->is_vxworks
)
4252 /* Work out the index of this PLT entry. */
4253 rela_index
= ((h
->plt
.offset
- htab
->plt_header_size
)
4254 / htab
->plt_entry_size
);
4256 /* Calculate the offset of the associated .got.plt entry.
4257 The first three entries are reserved. */
4258 got_offset
= (rela_index
+ 3) * 4;
4260 sparc_vxworks_build_plt_entry (output_bfd
, info
, h
->plt
.offset
,
4261 rela_index
, got_offset
);
4264 /* On VxWorks, the relocation points to the .got.plt entry,
4265 not the .plt entry. */
4266 rela
.r_offset
= (htab
->elf
.sgotplt
->output_section
->vma
4267 + htab
->elf
.sgotplt
->output_offset
4270 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, h
->dynindx
,
4275 bfd_boolean ifunc
= FALSE
;
4277 /* Fill in the entry in the procedure linkage table. */
4278 rela_index
= SPARC_ELF_BUILD_PLT_ENTRY (htab
, output_bfd
, splt
,
4279 h
->plt
.offset
, splt
->size
,
4284 || ((info
->executable
4285 || ELF_ST_VISIBILITY (h
->other
) != STV_DEFAULT
)
4287 && h
->type
== STT_GNU_IFUNC
))
4290 BFD_ASSERT (h
== NULL
4291 || (h
->type
== STT_GNU_IFUNC
4293 && (h
->root
.type
== bfd_link_hash_defined
4294 || h
->root
.type
== bfd_link_hash_defweak
)));
4297 rela
.r_offset
= r_offset
4298 + (splt
->output_section
->vma
+ splt
->output_offset
);
4299 if (ABI_64_P (output_bfd
)
4300 && h
->plt
.offset
>= (PLT64_LARGE_THRESHOLD
* PLT64_ENTRY_SIZE
))
4304 rela
.r_addend
= (h
->root
.u
.def
.section
->output_section
->vma
4305 + h
->root
.u
.def
.section
->output_offset
4306 + h
->root
.u
.def
.value
);
4307 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, 0,
4312 rela
.r_addend
= (-(h
->plt
.offset
+ 4)
4313 - splt
->output_section
->vma
4314 - splt
->output_offset
);
4315 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, h
->dynindx
,
4323 rela
.r_addend
= (h
->root
.u
.def
.section
->output_section
->vma
4324 + h
->root
.u
.def
.section
->output_offset
4325 + h
->root
.u
.def
.value
);
4326 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, 0,
4332 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, h
->dynindx
,
4338 /* Adjust for the first 4 reserved elements in the .plt section
4339 when setting the offset in the .rela.plt section.
4340 Sun forgot to read their own ABI and copied elf32-sparc behaviour,
4341 thus .plt[4] has corresponding .rela.plt[0] and so on. */
4343 loc
= srela
->contents
;
4344 loc
+= rela_index
* bed
->s
->sizeof_rela
;
4345 bed
->s
->swap_reloca_out (output_bfd
, &rela
, loc
);
4347 if (!h
->def_regular
)
4349 /* Mark the symbol as undefined, rather than as defined in
4350 the .plt section. Leave the value alone. */
4351 sym
->st_shndx
= SHN_UNDEF
;
4352 /* If the symbol is weak, we do need to clear the value.
4353 Otherwise, the PLT entry would provide a definition for
4354 the symbol even if the symbol wasn't defined anywhere,
4355 and so the symbol would never be NULL. */
4356 if (!h
->ref_regular_nonweak
)
4361 if (h
->got
.offset
!= (bfd_vma
) -1
4362 && _bfd_sparc_elf_hash_entry(h
)->tls_type
!= GOT_TLS_GD
4363 && _bfd_sparc_elf_hash_entry(h
)->tls_type
!= GOT_TLS_IE
)
4367 Elf_Internal_Rela rela
;
4369 /* This symbol has an entry in the GOT. Set it up. */
4371 sgot
= htab
->elf
.sgot
;
4372 srela
= htab
->elf
.srelgot
;
4373 BFD_ASSERT (sgot
!= NULL
&& srela
!= NULL
);
4375 rela
.r_offset
= (sgot
->output_section
->vma
4376 + sgot
->output_offset
4377 + (h
->got
.offset
&~ (bfd_vma
) 1));
4379 /* If this is a -Bsymbolic link, and the symbol is defined
4380 locally, we just want to emit a RELATIVE reloc. Likewise if
4381 the symbol was forced to be local because of a version file.
4382 The entry in the global offset table will already have been
4383 initialized in the relocate_section function. */
4385 && h
->type
== STT_GNU_IFUNC
4390 /* We load the GOT entry with the PLT entry. */
4391 plt
= htab
->elf
.splt
? htab
->elf
.splt
: htab
->elf
.iplt
;
4392 SPARC_ELF_PUT_WORD (htab
, output_bfd
,
4393 (plt
->output_section
->vma
4394 + plt
->output_offset
+ h
->plt
.offset
),
4395 htab
->elf
.sgot
->contents
4396 + (h
->got
.offset
& ~(bfd_vma
) 1));
4399 else if (info
->shared
4400 && SYMBOL_REFERENCES_LOCAL (info
, h
))
4402 asection
*sec
= h
->root
.u
.def
.section
;
4403 if (h
->type
== STT_GNU_IFUNC
)
4404 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, 0, R_SPARC_IRELATIVE
);
4406 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, 0, R_SPARC_RELATIVE
);
4407 rela
.r_addend
= (h
->root
.u
.def
.value
4408 + sec
->output_section
->vma
4409 + sec
->output_offset
);
4413 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, h
->dynindx
, R_SPARC_GLOB_DAT
);
4417 SPARC_ELF_PUT_WORD (htab
, output_bfd
, 0,
4418 sgot
->contents
+ (h
->got
.offset
& ~(bfd_vma
) 1));
4419 sparc_elf_append_rela (output_bfd
, srela
, &rela
);
4425 Elf_Internal_Rela rela
;
4427 /* This symbols needs a copy reloc. Set it up. */
4428 BFD_ASSERT (h
->dynindx
!= -1);
4430 s
= bfd_get_section_by_name (h
->root
.u
.def
.section
->owner
,
4432 BFD_ASSERT (s
!= NULL
);
4434 rela
.r_offset
= (h
->root
.u
.def
.value
4435 + h
->root
.u
.def
.section
->output_section
->vma
4436 + h
->root
.u
.def
.section
->output_offset
);
4437 rela
.r_info
= SPARC_ELF_R_INFO (htab
, NULL
, h
->dynindx
, R_SPARC_COPY
);
4439 sparc_elf_append_rela (output_bfd
, s
, &rela
);
4442 /* Mark some specially defined symbols as absolute. On VxWorks,
4443 _GLOBAL_OFFSET_TABLE_ is not absolute: it is relative to the
4444 ".got" section. Likewise _PROCEDURE_LINKAGE_TABLE_ and ".plt". */
4446 && (strcmp (h
->root
.root
.string
, "_DYNAMIC") == 0
4447 || (!htab
->is_vxworks
4448 && (h
== htab
->elf
.hgot
|| h
== htab
->elf
.hplt
))))
4449 sym
->st_shndx
= SHN_ABS
;
4454 /* Finish up the dynamic sections. */
4457 sparc_finish_dyn (bfd
*output_bfd
, struct bfd_link_info
*info
,
4458 bfd
*dynobj
, asection
*sdyn
,
4459 asection
*splt ATTRIBUTE_UNUSED
)
4461 struct _bfd_sparc_elf_link_hash_table
*htab
;
4462 const struct elf_backend_data
*bed
;
4463 bfd_byte
*dyncon
, *dynconend
;
4465 int stt_regidx
= -1;
4466 bfd_boolean abi_64_p
;
4468 htab
= _bfd_sparc_elf_hash_table (info
);
4469 BFD_ASSERT (htab
!= NULL
);
4470 bed
= get_elf_backend_data (output_bfd
);
4471 dynsize
= bed
->s
->sizeof_dyn
;
4472 dynconend
= sdyn
->contents
+ sdyn
->size
;
4473 abi_64_p
= ABI_64_P (output_bfd
);
4474 for (dyncon
= sdyn
->contents
; dyncon
< dynconend
; dyncon
+= dynsize
)
4476 Elf_Internal_Dyn dyn
;
4480 bed
->s
->swap_dyn_in (dynobj
, dyncon
, &dyn
);
4482 if (htab
->is_vxworks
&& dyn
.d_tag
== DT_RELASZ
)
4484 /* On VxWorks, DT_RELASZ should not include the relocations
4486 if (htab
->elf
.srelplt
)
4488 dyn
.d_un
.d_val
-= htab
->elf
.srelplt
->size
;
4489 bed
->s
->swap_dyn_out (output_bfd
, &dyn
, dyncon
);
4492 else if (htab
->is_vxworks
&& dyn
.d_tag
== DT_PLTGOT
)
4494 /* On VxWorks, DT_PLTGOT should point to the start of the GOT,
4495 not to the start of the PLT. */
4496 if (htab
->elf
.sgotplt
)
4498 dyn
.d_un
.d_val
= (htab
->elf
.sgotplt
->output_section
->vma
4499 + htab
->elf
.sgotplt
->output_offset
);
4500 bed
->s
->swap_dyn_out (output_bfd
, &dyn
, dyncon
);
4503 else if (htab
->is_vxworks
4504 && elf_vxworks_finish_dynamic_entry (output_bfd
, &dyn
))
4505 bed
->s
->swap_dyn_out (output_bfd
, &dyn
, dyncon
);
4506 else if (abi_64_p
&& dyn
.d_tag
== DT_SPARC_REGISTER
)
4508 if (stt_regidx
== -1)
4511 _bfd_elf_link_lookup_local_dynindx (info
, output_bfd
, -1);
4512 if (stt_regidx
== -1)
4515 dyn
.d_un
.d_val
= stt_regidx
++;
4516 bed
->s
->swap_dyn_out (output_bfd
, &dyn
, dyncon
);
4522 case DT_PLTGOT
: name
= ".plt"; size
= FALSE
; break;
4523 case DT_PLTRELSZ
: name
= ".rela.plt"; size
= TRUE
; break;
4524 case DT_JMPREL
: name
= ".rela.plt"; size
= FALSE
; break;
4525 default: name
= NULL
; size
= FALSE
; break;
4532 s
= bfd_get_section_by_name (output_bfd
, name
);
4538 dyn
.d_un
.d_ptr
= s
->vma
;
4540 dyn
.d_un
.d_val
= s
->size
;
4542 bed
->s
->swap_dyn_out (output_bfd
, &dyn
, dyncon
);
4549 /* Install the first PLT entry in a VxWorks executable and make sure that
4550 .rela.plt.unloaded relocations have the correct symbol indexes. */
4553 sparc_vxworks_finish_exec_plt (bfd
*output_bfd
, struct bfd_link_info
*info
)
4555 struct _bfd_sparc_elf_link_hash_table
*htab
;
4556 Elf_Internal_Rela rela
;
4560 htab
= _bfd_sparc_elf_hash_table (info
);
4561 BFD_ASSERT (htab
!= NULL
);
4563 /* Calculate the absolute value of _GLOBAL_OFFSET_TABLE_. */
4564 got_base
= (htab
->elf
.hgot
->root
.u
.def
.section
->output_section
->vma
4565 + htab
->elf
.hgot
->root
.u
.def
.section
->output_offset
4566 + htab
->elf
.hgot
->root
.u
.def
.value
);
4568 /* Install the initial PLT entry. */
4569 bfd_put_32 (output_bfd
,
4570 sparc_vxworks_exec_plt0_entry
[0] + ((got_base
+ 8) >> 10),
4571 htab
->elf
.splt
->contents
);
4572 bfd_put_32 (output_bfd
,
4573 sparc_vxworks_exec_plt0_entry
[1] + ((got_base
+ 8) & 0x3ff),
4574 htab
->elf
.splt
->contents
+ 4);
4575 bfd_put_32 (output_bfd
,
4576 sparc_vxworks_exec_plt0_entry
[2],
4577 htab
->elf
.splt
->contents
+ 8);
4578 bfd_put_32 (output_bfd
,
4579 sparc_vxworks_exec_plt0_entry
[3],
4580 htab
->elf
.splt
->contents
+ 12);
4581 bfd_put_32 (output_bfd
,
4582 sparc_vxworks_exec_plt0_entry
[4],
4583 htab
->elf
.splt
->contents
+ 16);
4585 loc
= htab
->srelplt2
->contents
;
4587 /* Add an unloaded relocation for the initial entry's "sethi". */
4588 rela
.r_offset
= (htab
->elf
.splt
->output_section
->vma
4589 + htab
->elf
.splt
->output_offset
);
4590 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_SPARC_HI22
);
4592 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
4593 loc
+= sizeof (Elf32_External_Rela
);
4595 /* Likewise the following "or". */
4597 rela
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_SPARC_LO10
);
4598 bfd_elf32_swap_reloca_out (output_bfd
, &rela
, loc
);
4599 loc
+= sizeof (Elf32_External_Rela
);
4601 /* Fix up the remaining .rela.plt.unloaded relocations. They may have
4602 the wrong symbol index for _G_O_T_ or _P_L_T_ depending on the order
4603 in which symbols were output. */
4604 while (loc
< htab
->srelplt2
->contents
+ htab
->srelplt2
->size
)
4606 Elf_Internal_Rela rel
;
4608 /* The entry's initial "sethi" (against _G_O_T_). */
4609 bfd_elf32_swap_reloc_in (output_bfd
, loc
, &rel
);
4610 rel
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_SPARC_HI22
);
4611 bfd_elf32_swap_reloc_out (output_bfd
, &rel
, loc
);
4612 loc
+= sizeof (Elf32_External_Rela
);
4614 /* The following "or" (also against _G_O_T_). */
4615 bfd_elf32_swap_reloc_in (output_bfd
, loc
, &rel
);
4616 rel
.r_info
= ELF32_R_INFO (htab
->elf
.hgot
->indx
, R_SPARC_LO10
);
4617 bfd_elf32_swap_reloc_out (output_bfd
, &rel
, loc
);
4618 loc
+= sizeof (Elf32_External_Rela
);
4620 /* The .got.plt entry (against _P_L_T_). */
4621 bfd_elf32_swap_reloc_in (output_bfd
, loc
, &rel
);
4622 rel
.r_info
= ELF32_R_INFO (htab
->elf
.hplt
->indx
, R_SPARC_32
);
4623 bfd_elf32_swap_reloc_out (output_bfd
, &rel
, loc
);
4624 loc
+= sizeof (Elf32_External_Rela
);
4628 /* Install the first PLT entry in a VxWorks shared object. */
4631 sparc_vxworks_finish_shared_plt (bfd
*output_bfd
, struct bfd_link_info
*info
)
4633 struct _bfd_sparc_elf_link_hash_table
*htab
;
4636 htab
= _bfd_sparc_elf_hash_table (info
);
4637 BFD_ASSERT (htab
!= NULL
);
4639 for (i
= 0; i
< ARRAY_SIZE (sparc_vxworks_shared_plt0_entry
); i
++)
4640 bfd_put_32 (output_bfd
, sparc_vxworks_shared_plt0_entry
[i
],
4641 htab
->elf
.splt
->contents
+ i
* 4);
4644 /* Finish up local dynamic symbol handling. We set the contents of
4645 various dynamic sections here. */
4648 finish_local_dynamic_symbol (void **slot
, void *inf
)
4650 struct elf_link_hash_entry
*h
4651 = (struct elf_link_hash_entry
*) *slot
;
4652 struct bfd_link_info
*info
4653 = (struct bfd_link_info
*) inf
;
4655 return _bfd_sparc_elf_finish_dynamic_symbol (info
->output_bfd
, info
,
4660 _bfd_sparc_elf_finish_dynamic_sections (bfd
*output_bfd
, struct bfd_link_info
*info
)
4664 struct _bfd_sparc_elf_link_hash_table
*htab
;
4666 htab
= _bfd_sparc_elf_hash_table (info
);
4667 BFD_ASSERT (htab
!= NULL
);
4668 dynobj
= htab
->elf
.dynobj
;
4670 sdyn
= bfd_get_section_by_name (dynobj
, ".dynamic");
4672 if (elf_hash_table (info
)->dynamic_sections_created
)
4676 splt
= bfd_get_section_by_name (dynobj
, ".plt");
4677 BFD_ASSERT (splt
!= NULL
&& sdyn
!= NULL
);
4679 if (!sparc_finish_dyn (output_bfd
, info
, dynobj
, sdyn
, splt
))
4682 /* Initialize the contents of the .plt section. */
4685 if (htab
->is_vxworks
)
4688 sparc_vxworks_finish_shared_plt (output_bfd
, info
);
4690 sparc_vxworks_finish_exec_plt (output_bfd
, info
);
4694 memset (splt
->contents
, 0, htab
->plt_header_size
);
4695 if (!ABI_64_P (output_bfd
))
4696 bfd_put_32 (output_bfd
, (bfd_vma
) SPARC_NOP
,
4697 splt
->contents
+ splt
->size
- 4);
4701 elf_section_data (splt
->output_section
)->this_hdr
.sh_entsize
4702 = (htab
->is_vxworks
|| !ABI_64_P (output_bfd
))
4703 ? 0 : htab
->plt_entry_size
;
4706 /* Set the first entry in the global offset table to the address of
4707 the dynamic section. */
4708 if (htab
->elf
.sgot
&& htab
->elf
.sgot
->size
> 0)
4710 bfd_vma val
= (sdyn
?
4711 sdyn
->output_section
->vma
+ sdyn
->output_offset
:
4714 SPARC_ELF_PUT_WORD (htab
, output_bfd
, val
, htab
->elf
.sgot
->contents
);
4718 elf_section_data (htab
->elf
.sgot
->output_section
)->this_hdr
.sh_entsize
=
4719 SPARC_ELF_WORD_BYTES (htab
);
4721 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
4722 htab_traverse (htab
->loc_hash_table
, finish_local_dynamic_symbol
, info
);
4728 /* Set the right machine number for a SPARC ELF file. */
4731 _bfd_sparc_elf_object_p (bfd
*abfd
)
4733 if (ABI_64_P (abfd
))
4735 unsigned long mach
= bfd_mach_sparc_v9
;
4737 if (elf_elfheader (abfd
)->e_flags
& EF_SPARC_SUN_US3
)
4738 mach
= bfd_mach_sparc_v9b
;
4739 else if (elf_elfheader (abfd
)->e_flags
& EF_SPARC_SUN_US1
)
4740 mach
= bfd_mach_sparc_v9a
;
4741 return bfd_default_set_arch_mach (abfd
, bfd_arch_sparc
, mach
);
4745 if (elf_elfheader (abfd
)->e_machine
== EM_SPARC32PLUS
)
4747 if (elf_elfheader (abfd
)->e_flags
& EF_SPARC_SUN_US3
)
4748 return bfd_default_set_arch_mach (abfd
, bfd_arch_sparc
,
4749 bfd_mach_sparc_v8plusb
);
4750 else if (elf_elfheader (abfd
)->e_flags
& EF_SPARC_SUN_US1
)
4751 return bfd_default_set_arch_mach (abfd
, bfd_arch_sparc
,
4752 bfd_mach_sparc_v8plusa
);
4753 else if (elf_elfheader (abfd
)->e_flags
& EF_SPARC_32PLUS
)
4754 return bfd_default_set_arch_mach (abfd
, bfd_arch_sparc
,
4755 bfd_mach_sparc_v8plus
);
4759 else if (elf_elfheader (abfd
)->e_flags
& EF_SPARC_LEDATA
)
4760 return bfd_default_set_arch_mach (abfd
, bfd_arch_sparc
,
4761 bfd_mach_sparc_sparclite_le
);
4763 return bfd_default_set_arch_mach (abfd
, bfd_arch_sparc
, bfd_mach_sparc
);
4767 /* Return address for Ith PLT stub in section PLT, for relocation REL
4768 or (bfd_vma) -1 if it should not be included. */
4771 _bfd_sparc_elf_plt_sym_val (bfd_vma i
, const asection
*plt
, const arelent
*rel
)
4773 if (ABI_64_P (plt
->owner
))
4777 i
+= PLT64_HEADER_SIZE
/ PLT64_ENTRY_SIZE
;
4778 if (i
< PLT64_LARGE_THRESHOLD
)
4779 return plt
->vma
+ i
* PLT64_ENTRY_SIZE
;
4781 j
= (i
- PLT64_LARGE_THRESHOLD
) % 160;
4783 return plt
->vma
+ i
* PLT64_ENTRY_SIZE
+ j
* 4 * 6;
4786 return rel
->address
;
4789 /* Merge backend specific data from an object file to the output
4790 object file when linking. */
4793 _bfd_sparc_elf_merge_private_bfd_data (bfd
*ibfd
, bfd
*obfd
)
4795 obj_attribute
*in_attr
, *in_attrs
;
4796 obj_attribute
*out_attr
, *out_attrs
;
4798 if (!elf_known_obj_attributes_proc (obfd
)[0].i
)
4800 /* This is the first object. Copy the attributes. */
4801 _bfd_elf_copy_obj_attributes (ibfd
, obfd
);
4803 /* Use the Tag_null value to indicate the attributes have been
4805 elf_known_obj_attributes_proc (obfd
)[0].i
= 1;
4810 in_attrs
= elf_known_obj_attributes (ibfd
)[OBJ_ATTR_GNU
];
4811 out_attrs
= elf_known_obj_attributes (obfd
)[OBJ_ATTR_GNU
];
4813 in_attr
= &in_attrs
[Tag_GNU_Sparc_HWCAPS
];
4814 out_attr
= &out_attrs
[Tag_GNU_Sparc_HWCAPS
];
4816 out_attr
->i
|= in_attr
->i
;
4818 /* Merge Tag_compatibility attributes and any common GNU ones. */
4819 _bfd_elf_merge_object_attributes (ibfd
, obfd
);