1 /* IA-64 support for 64-bit ELF
2 Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005
3 Free Software Foundation, Inc.
4 Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
6 This file is part of BFD, the Binary File Descriptor library.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. */
26 #include "opcode/ia64.h"
34 #define LOG_SECTION_ALIGN 3
38 #define LOG_SECTION_ALIGN 2
41 /* THE RULES for all the stuff the linker creates --
43 GOT Entries created in response to LTOFF or LTOFF_FPTR
44 relocations. Dynamic relocs created for dynamic
45 symbols in an application; REL relocs for locals
48 FPTR The canonical function descriptor. Created for local
49 symbols in applications. Descriptors for dynamic symbols
50 and local symbols in shared libraries are created by
51 ld.so. Thus there are no dynamic relocs against these
52 objects. The FPTR relocs for such _are_ passed through
53 to the dynamic relocation tables.
55 FULL_PLT Created for a PCREL21B relocation against a dynamic symbol.
56 Requires the creation of a PLTOFF entry. This does not
57 require any dynamic relocations.
59 PLTOFF Created by PLTOFF relocations. For local symbols, this
60 is an alternate function descriptor, and in shared libraries
61 requires two REL relocations. Note that this cannot be
62 transformed into an FPTR relocation, since it must be in
63 range of the GP. For dynamic symbols, this is a function
64 descriptor for a MIN_PLT entry, and requires one IPLT reloc.
66 MIN_PLT Created by PLTOFF entries against dynamic symbols. This
67 does not require dynamic relocations. */
69 #define NELEMS(a) ((int) (sizeof (a) / sizeof ((a)[0])))
71 typedef struct bfd_hash_entry
*(*new_hash_entry_func
)
72 PARAMS ((struct bfd_hash_entry
*, struct bfd_hash_table
*, const char *));
74 /* In dynamically (linker-) created sections, we generally need to keep track
75 of the place a symbol or expression got allocated to. This is done via hash
76 tables that store entries of the following type. */
78 struct elfNN_ia64_dyn_sym_info
80 /* The addend for which this entry is relevant. */
83 /* Next addend in the list. */
84 struct elfNN_ia64_dyn_sym_info
*next
;
88 bfd_vma pltoff_offset
;
92 bfd_vma dtpmod_offset
;
93 bfd_vma dtprel_offset
;
95 /* The symbol table entry, if any, that this was derived from. */
96 struct elf_link_hash_entry
*h
;
98 /* Used to count non-got, non-plt relocations for delayed sizing
99 of relocation sections. */
100 struct elfNN_ia64_dyn_reloc_entry
102 struct elfNN_ia64_dyn_reloc_entry
*next
;
107 /* Is this reloc against readonly section? */
111 /* TRUE when the section contents have been updated. */
112 unsigned got_done
: 1;
113 unsigned fptr_done
: 1;
114 unsigned pltoff_done
: 1;
115 unsigned tprel_done
: 1;
116 unsigned dtpmod_done
: 1;
117 unsigned dtprel_done
: 1;
119 /* TRUE for the different kinds of linker data we want created. */
120 unsigned want_got
: 1;
121 unsigned want_gotx
: 1;
122 unsigned want_fptr
: 1;
123 unsigned want_ltoff_fptr
: 1;
124 unsigned want_plt
: 1;
125 unsigned want_plt2
: 1;
126 unsigned want_pltoff
: 1;
127 unsigned want_tprel
: 1;
128 unsigned want_dtpmod
: 1;
129 unsigned want_dtprel
: 1;
132 struct elfNN_ia64_local_hash_entry
136 struct elfNN_ia64_dyn_sym_info
*info
;
138 /* TRUE if this hash entry's addends was translated for
139 SHF_MERGE optimization. */
140 unsigned sec_merge_done
: 1;
143 struct elfNN_ia64_link_hash_entry
145 struct elf_link_hash_entry root
;
146 struct elfNN_ia64_dyn_sym_info
*info
;
149 struct elfNN_ia64_link_hash_table
151 /* The main hash table. */
152 struct elf_link_hash_table root
;
154 asection
*got_sec
; /* the linkage table section (or NULL) */
155 asection
*rel_got_sec
; /* dynamic relocation section for same */
156 asection
*fptr_sec
; /* function descriptor table (or NULL) */
157 asection
*rel_fptr_sec
; /* dynamic relocation section for same */
158 asection
*plt_sec
; /* the primary plt section (or NULL) */
159 asection
*pltoff_sec
; /* private descriptors for plt (or NULL) */
160 asection
*rel_pltoff_sec
; /* dynamic relocation section for same */
162 bfd_size_type minplt_entries
; /* number of minplt entries */
163 unsigned reltext
: 1; /* are there relocs against readonly sections? */
164 unsigned self_dtpmod_done
: 1;/* has self DTPMOD entry been finished? */
165 bfd_vma self_dtpmod_offset
; /* .got offset to self DTPMOD entry */
167 htab_t loc_hash_table
;
168 void *loc_hash_memory
;
171 struct elfNN_ia64_allocate_data
173 struct bfd_link_info
*info
;
175 bfd_boolean only_got
;
178 #define elfNN_ia64_hash_table(p) \
179 ((struct elfNN_ia64_link_hash_table *) ((p)->hash))
181 static bfd_reloc_status_type elfNN_ia64_reloc
182 PARAMS ((bfd
*abfd
, arelent
*reloc
, asymbol
*sym
, PTR data
,
183 asection
*input_section
, bfd
*output_bfd
, char **error_message
));
184 static reloc_howto_type
* lookup_howto
185 PARAMS ((unsigned int rtype
));
186 static reloc_howto_type
*elfNN_ia64_reloc_type_lookup
187 PARAMS ((bfd
*abfd
, bfd_reloc_code_real_type bfd_code
));
188 static void elfNN_ia64_info_to_howto
189 PARAMS ((bfd
*abfd
, arelent
*bfd_reloc
, Elf_Internal_Rela
*elf_reloc
));
190 static bfd_boolean elfNN_ia64_relax_section
191 PARAMS((bfd
*abfd
, asection
*sec
, struct bfd_link_info
*link_info
,
192 bfd_boolean
*again
));
193 static void elfNN_ia64_relax_ldxmov
194 PARAMS((bfd_byte
*contents
, bfd_vma off
));
195 static bfd_boolean is_unwind_section_name
196 PARAMS ((bfd
*abfd
, const char *));
197 static bfd_boolean elfNN_ia64_section_flags
198 PARAMS ((flagword
*, const Elf_Internal_Shdr
*));
199 static bfd_boolean elfNN_ia64_fake_sections
200 PARAMS ((bfd
*abfd
, Elf_Internal_Shdr
*hdr
, asection
*sec
));
201 static void elfNN_ia64_final_write_processing
202 PARAMS ((bfd
*abfd
, bfd_boolean linker
));
203 static bfd_boolean elfNN_ia64_add_symbol_hook
204 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, Elf_Internal_Sym
*sym
,
205 const char **namep
, flagword
*flagsp
, asection
**secp
,
207 static int elfNN_ia64_additional_program_headers
208 PARAMS ((bfd
*abfd
));
209 static bfd_boolean elfNN_ia64_modify_segment_map
210 PARAMS ((bfd
*, struct bfd_link_info
*));
211 static bfd_boolean elfNN_ia64_is_local_label_name
212 PARAMS ((bfd
*abfd
, const char *name
));
213 static bfd_boolean elfNN_ia64_dynamic_symbol_p
214 PARAMS ((struct elf_link_hash_entry
*h
, struct bfd_link_info
*info
, int));
215 static struct bfd_hash_entry
*elfNN_ia64_new_elf_hash_entry
216 PARAMS ((struct bfd_hash_entry
*entry
, struct bfd_hash_table
*table
,
217 const char *string
));
218 static void elfNN_ia64_hash_copy_indirect
219 PARAMS ((const struct elf_backend_data
*, struct elf_link_hash_entry
*,
220 struct elf_link_hash_entry
*));
221 static void elfNN_ia64_hash_hide_symbol
222 PARAMS ((struct bfd_link_info
*, struct elf_link_hash_entry
*, bfd_boolean
));
223 static hashval_t elfNN_ia64_local_htab_hash
PARAMS ((const void *));
224 static int elfNN_ia64_local_htab_eq
PARAMS ((const void *ptr1
,
226 static struct bfd_link_hash_table
*elfNN_ia64_hash_table_create
227 PARAMS ((bfd
*abfd
));
228 static void elfNN_ia64_hash_table_free
229 PARAMS ((struct bfd_link_hash_table
*hash
));
230 static bfd_boolean elfNN_ia64_global_dyn_sym_thunk
231 PARAMS ((struct bfd_hash_entry
*, PTR
));
232 static int elfNN_ia64_local_dyn_sym_thunk
233 PARAMS ((void **, PTR
));
234 static void elfNN_ia64_dyn_sym_traverse
235 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
236 bfd_boolean (*func
) (struct elfNN_ia64_dyn_sym_info
*, PTR
),
238 static bfd_boolean elfNN_ia64_create_dynamic_sections
239 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
240 static struct elfNN_ia64_local_hash_entry
* get_local_sym_hash
241 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
242 bfd
*abfd
, const Elf_Internal_Rela
*rel
, bfd_boolean create
));
243 static struct elfNN_ia64_dyn_sym_info
* get_dyn_sym_info
244 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
245 struct elf_link_hash_entry
*h
,
246 bfd
*abfd
, const Elf_Internal_Rela
*rel
, bfd_boolean create
));
247 static asection
*get_got
248 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
249 struct elfNN_ia64_link_hash_table
*ia64_info
));
250 static asection
*get_fptr
251 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
252 struct elfNN_ia64_link_hash_table
*ia64_info
));
253 static asection
*get_pltoff
254 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
255 struct elfNN_ia64_link_hash_table
*ia64_info
));
256 static asection
*get_reloc_section
257 PARAMS ((bfd
*abfd
, struct elfNN_ia64_link_hash_table
*ia64_info
,
258 asection
*sec
, bfd_boolean create
));
259 static bfd_boolean elfNN_ia64_check_relocs
260 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, asection
*sec
,
261 const Elf_Internal_Rela
*relocs
));
262 static bfd_boolean elfNN_ia64_adjust_dynamic_symbol
263 PARAMS ((struct bfd_link_info
*info
, struct elf_link_hash_entry
*h
));
264 static long global_sym_index
265 PARAMS ((struct elf_link_hash_entry
*h
));
266 static bfd_boolean allocate_fptr
267 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
268 static bfd_boolean allocate_global_data_got
269 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
270 static bfd_boolean allocate_global_fptr_got
271 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
272 static bfd_boolean allocate_local_got
273 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
274 static bfd_boolean allocate_pltoff_entries
275 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
276 static bfd_boolean allocate_plt_entries
277 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
278 static bfd_boolean allocate_plt2_entries
279 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
280 static bfd_boolean allocate_dynrel_entries
281 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
282 static bfd_boolean elfNN_ia64_size_dynamic_sections
283 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
));
284 static bfd_reloc_status_type elfNN_ia64_install_value
285 PARAMS ((bfd_byte
*hit_addr
, bfd_vma val
, unsigned int r_type
));
286 static void elfNN_ia64_install_dyn_reloc
287 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, asection
*sec
,
288 asection
*srel
, bfd_vma offset
, unsigned int type
,
289 long dynindx
, bfd_vma addend
));
290 static bfd_vma set_got_entry
291 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
292 struct elfNN_ia64_dyn_sym_info
*dyn_i
, long dynindx
,
293 bfd_vma addend
, bfd_vma value
, unsigned int dyn_r_type
));
294 static bfd_vma set_fptr_entry
295 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
296 struct elfNN_ia64_dyn_sym_info
*dyn_i
,
298 static bfd_vma set_pltoff_entry
299 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
300 struct elfNN_ia64_dyn_sym_info
*dyn_i
,
301 bfd_vma value
, bfd_boolean
));
302 static bfd_vma elfNN_ia64_tprel_base
303 PARAMS ((struct bfd_link_info
*info
));
304 static bfd_vma elfNN_ia64_dtprel_base
305 PARAMS ((struct bfd_link_info
*info
));
306 static int elfNN_ia64_unwind_entry_compare
307 PARAMS ((const PTR
, const PTR
));
308 static bfd_boolean elfNN_ia64_choose_gp
309 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
310 static bfd_boolean elfNN_ia64_final_link
311 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
312 static bfd_boolean elfNN_ia64_relocate_section
313 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
, bfd
*input_bfd
,
314 asection
*input_section
, bfd_byte
*contents
,
315 Elf_Internal_Rela
*relocs
, Elf_Internal_Sym
*local_syms
,
316 asection
**local_sections
));
317 static bfd_boolean elfNN_ia64_finish_dynamic_symbol
318 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
,
319 struct elf_link_hash_entry
*h
, Elf_Internal_Sym
*sym
));
320 static bfd_boolean elfNN_ia64_finish_dynamic_sections
321 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
322 static bfd_boolean elfNN_ia64_set_private_flags
323 PARAMS ((bfd
*abfd
, flagword flags
));
324 static bfd_boolean elfNN_ia64_merge_private_bfd_data
325 PARAMS ((bfd
*ibfd
, bfd
*obfd
));
326 static bfd_boolean elfNN_ia64_print_private_bfd_data
327 PARAMS ((bfd
*abfd
, PTR ptr
));
328 static enum elf_reloc_type_class elfNN_ia64_reloc_type_class
329 PARAMS ((const Elf_Internal_Rela
*));
330 static bfd_boolean elfNN_ia64_hpux_vec
331 PARAMS ((const bfd_target
*vec
));
332 static void elfNN_hpux_post_process_headers
333 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
334 bfd_boolean elfNN_hpux_backend_section_from_bfd_section
335 PARAMS ((bfd
*abfd
, asection
*sec
, int *retval
));
337 /* ia64-specific relocation. */
339 /* Perform a relocation. Not much to do here as all the hard work is
340 done in elfNN_ia64_final_link_relocate. */
341 static bfd_reloc_status_type
342 elfNN_ia64_reloc (abfd
, reloc
, sym
, data
, input_section
,
343 output_bfd
, error_message
)
344 bfd
*abfd ATTRIBUTE_UNUSED
;
346 asymbol
*sym ATTRIBUTE_UNUSED
;
347 PTR data ATTRIBUTE_UNUSED
;
348 asection
*input_section
;
350 char **error_message
;
354 reloc
->address
+= input_section
->output_offset
;
358 if (input_section
->flags
& SEC_DEBUGGING
)
359 return bfd_reloc_continue
;
361 *error_message
= "Unsupported call to elfNN_ia64_reloc";
362 return bfd_reloc_notsupported
;
365 #define IA64_HOWTO(TYPE, NAME, SIZE, PCREL, IN) \
366 HOWTO (TYPE, 0, SIZE, 0, PCREL, 0, complain_overflow_signed, \
367 elfNN_ia64_reloc, NAME, FALSE, 0, -1, IN)
369 /* This table has to be sorted according to increasing number of the
371 static reloc_howto_type ia64_howto_table
[] =
373 IA64_HOWTO (R_IA64_NONE
, "NONE", 0, FALSE
, TRUE
),
375 IA64_HOWTO (R_IA64_IMM14
, "IMM14", 0, FALSE
, TRUE
),
376 IA64_HOWTO (R_IA64_IMM22
, "IMM22", 0, FALSE
, TRUE
),
377 IA64_HOWTO (R_IA64_IMM64
, "IMM64", 0, FALSE
, TRUE
),
378 IA64_HOWTO (R_IA64_DIR32MSB
, "DIR32MSB", 2, FALSE
, TRUE
),
379 IA64_HOWTO (R_IA64_DIR32LSB
, "DIR32LSB", 2, FALSE
, TRUE
),
380 IA64_HOWTO (R_IA64_DIR64MSB
, "DIR64MSB", 4, FALSE
, TRUE
),
381 IA64_HOWTO (R_IA64_DIR64LSB
, "DIR64LSB", 4, FALSE
, TRUE
),
383 IA64_HOWTO (R_IA64_GPREL22
, "GPREL22", 0, FALSE
, TRUE
),
384 IA64_HOWTO (R_IA64_GPREL64I
, "GPREL64I", 0, FALSE
, TRUE
),
385 IA64_HOWTO (R_IA64_GPREL32MSB
, "GPREL32MSB", 2, FALSE
, TRUE
),
386 IA64_HOWTO (R_IA64_GPREL32LSB
, "GPREL32LSB", 2, FALSE
, TRUE
),
387 IA64_HOWTO (R_IA64_GPREL64MSB
, "GPREL64MSB", 4, FALSE
, TRUE
),
388 IA64_HOWTO (R_IA64_GPREL64LSB
, "GPREL64LSB", 4, FALSE
, TRUE
),
390 IA64_HOWTO (R_IA64_LTOFF22
, "LTOFF22", 0, FALSE
, TRUE
),
391 IA64_HOWTO (R_IA64_LTOFF64I
, "LTOFF64I", 0, FALSE
, TRUE
),
393 IA64_HOWTO (R_IA64_PLTOFF22
, "PLTOFF22", 0, FALSE
, TRUE
),
394 IA64_HOWTO (R_IA64_PLTOFF64I
, "PLTOFF64I", 0, FALSE
, TRUE
),
395 IA64_HOWTO (R_IA64_PLTOFF64MSB
, "PLTOFF64MSB", 4, FALSE
, TRUE
),
396 IA64_HOWTO (R_IA64_PLTOFF64LSB
, "PLTOFF64LSB", 4, FALSE
, TRUE
),
398 IA64_HOWTO (R_IA64_FPTR64I
, "FPTR64I", 0, FALSE
, TRUE
),
399 IA64_HOWTO (R_IA64_FPTR32MSB
, "FPTR32MSB", 2, FALSE
, TRUE
),
400 IA64_HOWTO (R_IA64_FPTR32LSB
, "FPTR32LSB", 2, FALSE
, TRUE
),
401 IA64_HOWTO (R_IA64_FPTR64MSB
, "FPTR64MSB", 4, FALSE
, TRUE
),
402 IA64_HOWTO (R_IA64_FPTR64LSB
, "FPTR64LSB", 4, FALSE
, TRUE
),
404 IA64_HOWTO (R_IA64_PCREL60B
, "PCREL60B", 0, TRUE
, TRUE
),
405 IA64_HOWTO (R_IA64_PCREL21B
, "PCREL21B", 0, TRUE
, TRUE
),
406 IA64_HOWTO (R_IA64_PCREL21M
, "PCREL21M", 0, TRUE
, TRUE
),
407 IA64_HOWTO (R_IA64_PCREL21F
, "PCREL21F", 0, TRUE
, TRUE
),
408 IA64_HOWTO (R_IA64_PCREL32MSB
, "PCREL32MSB", 2, TRUE
, TRUE
),
409 IA64_HOWTO (R_IA64_PCREL32LSB
, "PCREL32LSB", 2, TRUE
, TRUE
),
410 IA64_HOWTO (R_IA64_PCREL64MSB
, "PCREL64MSB", 4, TRUE
, TRUE
),
411 IA64_HOWTO (R_IA64_PCREL64LSB
, "PCREL64LSB", 4, TRUE
, TRUE
),
413 IA64_HOWTO (R_IA64_LTOFF_FPTR22
, "LTOFF_FPTR22", 0, FALSE
, TRUE
),
414 IA64_HOWTO (R_IA64_LTOFF_FPTR64I
, "LTOFF_FPTR64I", 0, FALSE
, TRUE
),
415 IA64_HOWTO (R_IA64_LTOFF_FPTR32MSB
, "LTOFF_FPTR32MSB", 2, FALSE
, TRUE
),
416 IA64_HOWTO (R_IA64_LTOFF_FPTR32LSB
, "LTOFF_FPTR32LSB", 2, FALSE
, TRUE
),
417 IA64_HOWTO (R_IA64_LTOFF_FPTR64MSB
, "LTOFF_FPTR64MSB", 4, FALSE
, TRUE
),
418 IA64_HOWTO (R_IA64_LTOFF_FPTR64LSB
, "LTOFF_FPTR64LSB", 4, FALSE
, TRUE
),
420 IA64_HOWTO (R_IA64_SEGREL32MSB
, "SEGREL32MSB", 2, FALSE
, TRUE
),
421 IA64_HOWTO (R_IA64_SEGREL32LSB
, "SEGREL32LSB", 2, FALSE
, TRUE
),
422 IA64_HOWTO (R_IA64_SEGREL64MSB
, "SEGREL64MSB", 4, FALSE
, TRUE
),
423 IA64_HOWTO (R_IA64_SEGREL64LSB
, "SEGREL64LSB", 4, FALSE
, TRUE
),
425 IA64_HOWTO (R_IA64_SECREL32MSB
, "SECREL32MSB", 2, FALSE
, TRUE
),
426 IA64_HOWTO (R_IA64_SECREL32LSB
, "SECREL32LSB", 2, FALSE
, TRUE
),
427 IA64_HOWTO (R_IA64_SECREL64MSB
, "SECREL64MSB", 4, FALSE
, TRUE
),
428 IA64_HOWTO (R_IA64_SECREL64LSB
, "SECREL64LSB", 4, FALSE
, TRUE
),
430 IA64_HOWTO (R_IA64_REL32MSB
, "REL32MSB", 2, FALSE
, TRUE
),
431 IA64_HOWTO (R_IA64_REL32LSB
, "REL32LSB", 2, FALSE
, TRUE
),
432 IA64_HOWTO (R_IA64_REL64MSB
, "REL64MSB", 4, FALSE
, TRUE
),
433 IA64_HOWTO (R_IA64_REL64LSB
, "REL64LSB", 4, FALSE
, TRUE
),
435 IA64_HOWTO (R_IA64_LTV32MSB
, "LTV32MSB", 2, FALSE
, TRUE
),
436 IA64_HOWTO (R_IA64_LTV32LSB
, "LTV32LSB", 2, FALSE
, TRUE
),
437 IA64_HOWTO (R_IA64_LTV64MSB
, "LTV64MSB", 4, FALSE
, TRUE
),
438 IA64_HOWTO (R_IA64_LTV64LSB
, "LTV64LSB", 4, FALSE
, TRUE
),
440 IA64_HOWTO (R_IA64_PCREL21BI
, "PCREL21BI", 0, TRUE
, TRUE
),
441 IA64_HOWTO (R_IA64_PCREL22
, "PCREL22", 0, TRUE
, TRUE
),
442 IA64_HOWTO (R_IA64_PCREL64I
, "PCREL64I", 0, TRUE
, TRUE
),
444 IA64_HOWTO (R_IA64_IPLTMSB
, "IPLTMSB", 4, FALSE
, TRUE
),
445 IA64_HOWTO (R_IA64_IPLTLSB
, "IPLTLSB", 4, FALSE
, TRUE
),
446 IA64_HOWTO (R_IA64_COPY
, "COPY", 4, FALSE
, TRUE
),
447 IA64_HOWTO (R_IA64_LTOFF22X
, "LTOFF22X", 0, FALSE
, TRUE
),
448 IA64_HOWTO (R_IA64_LDXMOV
, "LDXMOV", 0, FALSE
, TRUE
),
450 IA64_HOWTO (R_IA64_TPREL14
, "TPREL14", 0, FALSE
, FALSE
),
451 IA64_HOWTO (R_IA64_TPREL22
, "TPREL22", 0, FALSE
, FALSE
),
452 IA64_HOWTO (R_IA64_TPREL64I
, "TPREL64I", 0, FALSE
, FALSE
),
453 IA64_HOWTO (R_IA64_TPREL64MSB
, "TPREL64MSB", 4, FALSE
, FALSE
),
454 IA64_HOWTO (R_IA64_TPREL64LSB
, "TPREL64LSB", 4, FALSE
, FALSE
),
455 IA64_HOWTO (R_IA64_LTOFF_TPREL22
, "LTOFF_TPREL22", 0, FALSE
, FALSE
),
457 IA64_HOWTO (R_IA64_DTPMOD64MSB
, "DTPMOD64MSB", 4, FALSE
, FALSE
),
458 IA64_HOWTO (R_IA64_DTPMOD64LSB
, "DTPMOD64LSB", 4, FALSE
, FALSE
),
459 IA64_HOWTO (R_IA64_LTOFF_DTPMOD22
, "LTOFF_DTPMOD22", 0, FALSE
, FALSE
),
461 IA64_HOWTO (R_IA64_DTPREL14
, "DTPREL14", 0, FALSE
, FALSE
),
462 IA64_HOWTO (R_IA64_DTPREL22
, "DTPREL22", 0, FALSE
, FALSE
),
463 IA64_HOWTO (R_IA64_DTPREL64I
, "DTPREL64I", 0, FALSE
, FALSE
),
464 IA64_HOWTO (R_IA64_DTPREL32MSB
, "DTPREL32MSB", 2, FALSE
, FALSE
),
465 IA64_HOWTO (R_IA64_DTPREL32LSB
, "DTPREL32LSB", 2, FALSE
, FALSE
),
466 IA64_HOWTO (R_IA64_DTPREL64MSB
, "DTPREL64MSB", 4, FALSE
, FALSE
),
467 IA64_HOWTO (R_IA64_DTPREL64LSB
, "DTPREL64LSB", 4, FALSE
, FALSE
),
468 IA64_HOWTO (R_IA64_LTOFF_DTPREL22
, "LTOFF_DTPREL22", 0, FALSE
, FALSE
),
471 static unsigned char elf_code_to_howto_index
[R_IA64_MAX_RELOC_CODE
+ 1];
473 /* Given a BFD reloc type, return the matching HOWTO structure. */
475 static reloc_howto_type
*
479 static int inited
= 0;
486 memset (elf_code_to_howto_index
, 0xff, sizeof (elf_code_to_howto_index
));
487 for (i
= 0; i
< NELEMS (ia64_howto_table
); ++i
)
488 elf_code_to_howto_index
[ia64_howto_table
[i
].type
] = i
;
491 if (rtype
> R_IA64_MAX_RELOC_CODE
)
493 i
= elf_code_to_howto_index
[rtype
];
494 if (i
>= NELEMS (ia64_howto_table
))
496 return ia64_howto_table
+ i
;
499 static reloc_howto_type
*
500 elfNN_ia64_reloc_type_lookup (abfd
, bfd_code
)
501 bfd
*abfd ATTRIBUTE_UNUSED
;
502 bfd_reloc_code_real_type bfd_code
;
508 case BFD_RELOC_NONE
: rtype
= R_IA64_NONE
; break;
510 case BFD_RELOC_IA64_IMM14
: rtype
= R_IA64_IMM14
; break;
511 case BFD_RELOC_IA64_IMM22
: rtype
= R_IA64_IMM22
; break;
512 case BFD_RELOC_IA64_IMM64
: rtype
= R_IA64_IMM64
; break;
514 case BFD_RELOC_IA64_DIR32MSB
: rtype
= R_IA64_DIR32MSB
; break;
515 case BFD_RELOC_IA64_DIR32LSB
: rtype
= R_IA64_DIR32LSB
; break;
516 case BFD_RELOC_IA64_DIR64MSB
: rtype
= R_IA64_DIR64MSB
; break;
517 case BFD_RELOC_IA64_DIR64LSB
: rtype
= R_IA64_DIR64LSB
; break;
519 case BFD_RELOC_IA64_GPREL22
: rtype
= R_IA64_GPREL22
; break;
520 case BFD_RELOC_IA64_GPREL64I
: rtype
= R_IA64_GPREL64I
; break;
521 case BFD_RELOC_IA64_GPREL32MSB
: rtype
= R_IA64_GPREL32MSB
; break;
522 case BFD_RELOC_IA64_GPREL32LSB
: rtype
= R_IA64_GPREL32LSB
; break;
523 case BFD_RELOC_IA64_GPREL64MSB
: rtype
= R_IA64_GPREL64MSB
; break;
524 case BFD_RELOC_IA64_GPREL64LSB
: rtype
= R_IA64_GPREL64LSB
; break;
526 case BFD_RELOC_IA64_LTOFF22
: rtype
= R_IA64_LTOFF22
; break;
527 case BFD_RELOC_IA64_LTOFF64I
: rtype
= R_IA64_LTOFF64I
; break;
529 case BFD_RELOC_IA64_PLTOFF22
: rtype
= R_IA64_PLTOFF22
; break;
530 case BFD_RELOC_IA64_PLTOFF64I
: rtype
= R_IA64_PLTOFF64I
; break;
531 case BFD_RELOC_IA64_PLTOFF64MSB
: rtype
= R_IA64_PLTOFF64MSB
; break;
532 case BFD_RELOC_IA64_PLTOFF64LSB
: rtype
= R_IA64_PLTOFF64LSB
; break;
533 case BFD_RELOC_IA64_FPTR64I
: rtype
= R_IA64_FPTR64I
; break;
534 case BFD_RELOC_IA64_FPTR32MSB
: rtype
= R_IA64_FPTR32MSB
; break;
535 case BFD_RELOC_IA64_FPTR32LSB
: rtype
= R_IA64_FPTR32LSB
; break;
536 case BFD_RELOC_IA64_FPTR64MSB
: rtype
= R_IA64_FPTR64MSB
; break;
537 case BFD_RELOC_IA64_FPTR64LSB
: rtype
= R_IA64_FPTR64LSB
; break;
539 case BFD_RELOC_IA64_PCREL21B
: rtype
= R_IA64_PCREL21B
; break;
540 case BFD_RELOC_IA64_PCREL21BI
: rtype
= R_IA64_PCREL21BI
; break;
541 case BFD_RELOC_IA64_PCREL21M
: rtype
= R_IA64_PCREL21M
; break;
542 case BFD_RELOC_IA64_PCREL21F
: rtype
= R_IA64_PCREL21F
; break;
543 case BFD_RELOC_IA64_PCREL22
: rtype
= R_IA64_PCREL22
; break;
544 case BFD_RELOC_IA64_PCREL60B
: rtype
= R_IA64_PCREL60B
; break;
545 case BFD_RELOC_IA64_PCREL64I
: rtype
= R_IA64_PCREL64I
; break;
546 case BFD_RELOC_IA64_PCREL32MSB
: rtype
= R_IA64_PCREL32MSB
; break;
547 case BFD_RELOC_IA64_PCREL32LSB
: rtype
= R_IA64_PCREL32LSB
; break;
548 case BFD_RELOC_IA64_PCREL64MSB
: rtype
= R_IA64_PCREL64MSB
; break;
549 case BFD_RELOC_IA64_PCREL64LSB
: rtype
= R_IA64_PCREL64LSB
; break;
551 case BFD_RELOC_IA64_LTOFF_FPTR22
: rtype
= R_IA64_LTOFF_FPTR22
; break;
552 case BFD_RELOC_IA64_LTOFF_FPTR64I
: rtype
= R_IA64_LTOFF_FPTR64I
; break;
553 case BFD_RELOC_IA64_LTOFF_FPTR32MSB
: rtype
= R_IA64_LTOFF_FPTR32MSB
; break;
554 case BFD_RELOC_IA64_LTOFF_FPTR32LSB
: rtype
= R_IA64_LTOFF_FPTR32LSB
; break;
555 case BFD_RELOC_IA64_LTOFF_FPTR64MSB
: rtype
= R_IA64_LTOFF_FPTR64MSB
; break;
556 case BFD_RELOC_IA64_LTOFF_FPTR64LSB
: rtype
= R_IA64_LTOFF_FPTR64LSB
; break;
558 case BFD_RELOC_IA64_SEGREL32MSB
: rtype
= R_IA64_SEGREL32MSB
; break;
559 case BFD_RELOC_IA64_SEGREL32LSB
: rtype
= R_IA64_SEGREL32LSB
; break;
560 case BFD_RELOC_IA64_SEGREL64MSB
: rtype
= R_IA64_SEGREL64MSB
; break;
561 case BFD_RELOC_IA64_SEGREL64LSB
: rtype
= R_IA64_SEGREL64LSB
; break;
563 case BFD_RELOC_IA64_SECREL32MSB
: rtype
= R_IA64_SECREL32MSB
; break;
564 case BFD_RELOC_IA64_SECREL32LSB
: rtype
= R_IA64_SECREL32LSB
; break;
565 case BFD_RELOC_IA64_SECREL64MSB
: rtype
= R_IA64_SECREL64MSB
; break;
566 case BFD_RELOC_IA64_SECREL64LSB
: rtype
= R_IA64_SECREL64LSB
; break;
568 case BFD_RELOC_IA64_REL32MSB
: rtype
= R_IA64_REL32MSB
; break;
569 case BFD_RELOC_IA64_REL32LSB
: rtype
= R_IA64_REL32LSB
; break;
570 case BFD_RELOC_IA64_REL64MSB
: rtype
= R_IA64_REL64MSB
; break;
571 case BFD_RELOC_IA64_REL64LSB
: rtype
= R_IA64_REL64LSB
; break;
573 case BFD_RELOC_IA64_LTV32MSB
: rtype
= R_IA64_LTV32MSB
; break;
574 case BFD_RELOC_IA64_LTV32LSB
: rtype
= R_IA64_LTV32LSB
; break;
575 case BFD_RELOC_IA64_LTV64MSB
: rtype
= R_IA64_LTV64MSB
; break;
576 case BFD_RELOC_IA64_LTV64LSB
: rtype
= R_IA64_LTV64LSB
; break;
578 case BFD_RELOC_IA64_IPLTMSB
: rtype
= R_IA64_IPLTMSB
; break;
579 case BFD_RELOC_IA64_IPLTLSB
: rtype
= R_IA64_IPLTLSB
; break;
580 case BFD_RELOC_IA64_COPY
: rtype
= R_IA64_COPY
; break;
581 case BFD_RELOC_IA64_LTOFF22X
: rtype
= R_IA64_LTOFF22X
; break;
582 case BFD_RELOC_IA64_LDXMOV
: rtype
= R_IA64_LDXMOV
; break;
584 case BFD_RELOC_IA64_TPREL14
: rtype
= R_IA64_TPREL14
; break;
585 case BFD_RELOC_IA64_TPREL22
: rtype
= R_IA64_TPREL22
; break;
586 case BFD_RELOC_IA64_TPREL64I
: rtype
= R_IA64_TPREL64I
; break;
587 case BFD_RELOC_IA64_TPREL64MSB
: rtype
= R_IA64_TPREL64MSB
; break;
588 case BFD_RELOC_IA64_TPREL64LSB
: rtype
= R_IA64_TPREL64LSB
; break;
589 case BFD_RELOC_IA64_LTOFF_TPREL22
: rtype
= R_IA64_LTOFF_TPREL22
; break;
591 case BFD_RELOC_IA64_DTPMOD64MSB
: rtype
= R_IA64_DTPMOD64MSB
; break;
592 case BFD_RELOC_IA64_DTPMOD64LSB
: rtype
= R_IA64_DTPMOD64LSB
; break;
593 case BFD_RELOC_IA64_LTOFF_DTPMOD22
: rtype
= R_IA64_LTOFF_DTPMOD22
; break;
595 case BFD_RELOC_IA64_DTPREL14
: rtype
= R_IA64_DTPREL14
; break;
596 case BFD_RELOC_IA64_DTPREL22
: rtype
= R_IA64_DTPREL22
; break;
597 case BFD_RELOC_IA64_DTPREL64I
: rtype
= R_IA64_DTPREL64I
; break;
598 case BFD_RELOC_IA64_DTPREL32MSB
: rtype
= R_IA64_DTPREL32MSB
; break;
599 case BFD_RELOC_IA64_DTPREL32LSB
: rtype
= R_IA64_DTPREL32LSB
; break;
600 case BFD_RELOC_IA64_DTPREL64MSB
: rtype
= R_IA64_DTPREL64MSB
; break;
601 case BFD_RELOC_IA64_DTPREL64LSB
: rtype
= R_IA64_DTPREL64LSB
; break;
602 case BFD_RELOC_IA64_LTOFF_DTPREL22
: rtype
= R_IA64_LTOFF_DTPREL22
; break;
606 return lookup_howto (rtype
);
609 /* Given a ELF reloc, return the matching HOWTO structure. */
612 elfNN_ia64_info_to_howto (abfd
, bfd_reloc
, elf_reloc
)
613 bfd
*abfd ATTRIBUTE_UNUSED
;
615 Elf_Internal_Rela
*elf_reloc
;
618 = lookup_howto ((unsigned int) ELFNN_R_TYPE (elf_reloc
->r_info
));
621 #define PLT_HEADER_SIZE (3 * 16)
622 #define PLT_MIN_ENTRY_SIZE (1 * 16)
623 #define PLT_FULL_ENTRY_SIZE (2 * 16)
624 #define PLT_RESERVED_WORDS 3
626 static const bfd_byte plt_header
[PLT_HEADER_SIZE
] =
628 0x0b, 0x10, 0x00, 0x1c, 0x00, 0x21, /* [MMI] mov r2=r14;; */
629 0xe0, 0x00, 0x08, 0x00, 0x48, 0x00, /* addl r14=0,r2 */
630 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
631 0x0b, 0x80, 0x20, 0x1c, 0x18, 0x14, /* [MMI] ld8 r16=[r14],8;; */
632 0x10, 0x41, 0x38, 0x30, 0x28, 0x00, /* ld8 r17=[r14],8 */
633 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
634 0x11, 0x08, 0x00, 0x1c, 0x18, 0x10, /* [MIB] ld8 r1=[r14] */
635 0x60, 0x88, 0x04, 0x80, 0x03, 0x00, /* mov b6=r17 */
636 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
639 static const bfd_byte plt_min_entry
[PLT_MIN_ENTRY_SIZE
] =
641 0x11, 0x78, 0x00, 0x00, 0x00, 0x24, /* [MIB] mov r15=0 */
642 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, /* nop.i 0x0 */
643 0x00, 0x00, 0x00, 0x40 /* br.few 0 <PLT0>;; */
646 static const bfd_byte plt_full_entry
[PLT_FULL_ENTRY_SIZE
] =
648 0x0b, 0x78, 0x00, 0x02, 0x00, 0x24, /* [MMI] addl r15=0,r1;; */
649 0x00, 0x41, 0x3c, 0x70, 0x29, 0xc0, /* ld8.acq r16=[r15],8*/
650 0x01, 0x08, 0x00, 0x84, /* mov r14=r1;; */
651 0x11, 0x08, 0x00, 0x1e, 0x18, 0x10, /* [MIB] ld8 r1=[r15] */
652 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
653 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
656 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
658 static const bfd_byte oor_brl
[16] =
660 0x05, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
661 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* brl.sptk.few tgt;; */
662 0x00, 0x00, 0x00, 0xc0
665 static const bfd_byte oor_ip
[48] =
667 0x04, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
668 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, /* movl r15=0 */
669 0x01, 0x00, 0x00, 0x60,
670 0x03, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MII] nop.m 0 */
671 0x00, 0x01, 0x00, 0x60, 0x00, 0x00, /* mov r16=ip;; */
672 0xf2, 0x80, 0x00, 0x80, /* add r16=r15,r16;; */
673 0x11, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MIB] nop.m 0 */
674 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
675 0x60, 0x00, 0x80, 0x00 /* br b6;; */
678 static size_t oor_branch_size
= sizeof (oor_brl
);
681 bfd_elfNN_ia64_after_parse (int itanium
)
683 oor_branch_size
= itanium
? sizeof (oor_ip
) : sizeof (oor_brl
);
686 #define BTYPE_SHIFT 6
693 #define OPCODE_SHIFT 37
695 #define OPCODE_BITS (0xfLL << OPCODE_SHIFT)
696 #define X6_BITS (0x3fLL << X6_SHIFT)
697 #define X4_BITS (0xfLL << X4_SHIFT)
698 #define X3_BITS (0x7LL << X3_SHIFT)
699 #define X2_BITS (0x3LL << X2_SHIFT)
700 #define X_BITS (0x1LL << X_SHIFT)
701 #define Y_BITS (0x1LL << Y_SHIFT)
702 #define BTYPE_BITS (0x7LL << BTYPE_SHIFT)
703 #define PREDICATE_BITS (0x3fLL)
705 #define IS_NOP_B(i) \
706 (((i) & (OPCODE_BITS | X6_BITS)) == (2LL << OPCODE_SHIFT))
707 #define IS_NOP_F(i) \
708 (((i) & (OPCODE_BITS | X_BITS | X6_BITS | Y_BITS)) \
709 == (0x1LL << X6_SHIFT))
710 #define IS_NOP_I(i) \
711 (((i) & (OPCODE_BITS | X3_BITS | X6_BITS | Y_BITS)) \
712 == (0x1LL << X6_SHIFT))
713 #define IS_NOP_M(i) \
714 (((i) & (OPCODE_BITS | X3_BITS | X2_BITS | X4_BITS | Y_BITS)) \
715 == (0x1LL << X4_SHIFT))
716 #define IS_BR_COND(i) \
717 (((i) & (OPCODE_BITS | BTYPE_BITS)) == (0x4LL << OPCODE_SHIFT))
718 #define IS_BR_CALL(i) \
719 (((i) & OPCODE_BITS) == (0x5LL << OPCODE_SHIFT))
722 elfNN_ia64_relax_br (bfd_byte
*contents
, bfd_vma off
)
724 unsigned int template, mlx
;
725 bfd_vma t0
, t1
, s0
, s1
, s2
, br_code
;
729 hit_addr
= (bfd_byte
*) (contents
+ off
);
730 br_slot
= (long) hit_addr
& 0x3;
732 t0
= bfd_getl64 (hit_addr
+ 0);
733 t1
= bfd_getl64 (hit_addr
+ 8);
735 /* Check if we can turn br into brl. A label is always at the start
736 of the bundle. Even if there are predicates on NOPs, we still
737 perform this optimization. */
738 template = t0
& 0x1e;
739 s0
= (t0
>> 5) & 0x1ffffffffffLL
;
740 s1
= ((t0
>> 46) | (t1
<< 18)) & 0x1ffffffffffLL
;
741 s2
= (t1
>> 23) & 0x1ffffffffffLL
;
745 /* Check if slot 1 and slot 2 are NOPs. Possible template is
746 BBB. We only need to check nop.b. */
747 if (!(IS_NOP_B (s1
) && IS_NOP_B (s2
)))
752 /* Check if slot 2 is NOP. Possible templates are MBB and BBB.
753 For BBB, slot 0 also has to be nop.b. */
754 if (!((template == 0x12 /* MBB */
756 || (template == 0x16 /* BBB */
763 /* Check if slot 1 is NOP. Possible templates are MIB, MBB, BBB,
764 MMB and MFB. For BBB, slot 0 also has to be nop.b. */
765 if (!((template == 0x10 /* MIB */
767 || (template == 0x12 /* MBB */
769 || (template == 0x16 /* BBB */
772 || (template == 0x18 /* MMB */
774 || (template == 0x1c /* MFB */
780 /* It should never happen. */
784 /* We can turn br.cond/br.call into brl.cond/brl.call. */
785 if (!(IS_BR_COND (br_code
) || IS_BR_CALL (br_code
)))
788 /* Turn br into brl by setting bit 40. */
789 br_code
|= 0x1LL
<< 40;
791 /* Turn the old bundle into a MLX bundle with the same stop-bit
798 if (template == 0x16)
800 /* For BBB, we need to put nop.m in slot 0. We keep the original
801 predicate only if slot 0 isn't br. */
805 t0
&= PREDICATE_BITS
<< 5;
806 t0
|= 0x1LL
<< (X4_SHIFT
+ 5);
810 /* Keep the original instruction in slot 0. */
811 t0
&= 0x1ffffffffffLL
<< 5;
816 /* Put brl in slot 1. */
819 bfd_putl64 (t0
, hit_addr
);
820 bfd_putl64 (t1
, hit_addr
+ 8);
825 elfNN_ia64_relax_brl (bfd_byte
*contents
, bfd_vma off
)
829 bfd_vma t0
, t1
, i0
, i1
, i2
;
831 hit_addr
= (bfd_byte
*) (contents
+ off
);
832 hit_addr
-= (long) hit_addr
& 0x3;
833 t0
= bfd_getl64 (hit_addr
);
834 t1
= bfd_getl64 (hit_addr
+ 8);
836 /* Keep the instruction in slot 0. */
837 i0
= (t0
>> 5) & 0x1ffffffffffLL
;
838 /* Use nop.b for slot 1. */
840 /* For slot 2, turn brl into br by masking out bit 40. */
841 i2
= (t1
>> 23) & 0x0ffffffffffLL
;
843 /* Turn a MLX bundle into a MBB bundle with the same stop-bit
849 t0
= (i1
<< 46) | (i0
<< 5) | template;
850 t1
= (i2
<< 23) | (i1
>> 18);
852 bfd_putl64 (t0
, hit_addr
);
853 bfd_putl64 (t1
, hit_addr
+ 8);
856 /* These functions do relaxation for IA-64 ELF. */
859 elfNN_ia64_relax_section (abfd
, sec
, link_info
, again
)
862 struct bfd_link_info
*link_info
;
867 struct one_fixup
*next
;
873 Elf_Internal_Shdr
*symtab_hdr
;
874 Elf_Internal_Rela
*internal_relocs
;
875 Elf_Internal_Rela
*irel
, *irelend
;
877 Elf_Internal_Sym
*isymbuf
= NULL
;
878 struct elfNN_ia64_link_hash_table
*ia64_info
;
879 struct one_fixup
*fixups
= NULL
;
880 bfd_boolean changed_contents
= FALSE
;
881 bfd_boolean changed_relocs
= FALSE
;
882 bfd_boolean changed_got
= FALSE
;
885 /* Assume we're not going to change any sizes, and we'll only need
889 /* Don't even try to relax for non-ELF outputs. */
890 if (!is_elf_hash_table (link_info
->hash
))
893 /* Nothing to do if there are no relocations or there is no need for
894 the relax finalize pass. */
895 if ((sec
->flags
& SEC_RELOC
) == 0
896 || sec
->reloc_count
== 0
897 || (!link_info
->need_relax_finalize
898 && sec
->need_finalize_relax
== 0))
901 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
903 /* Load the relocations for this section. */
904 internal_relocs
= (_bfd_elf_link_read_relocs
905 (abfd
, sec
, (PTR
) NULL
, (Elf_Internal_Rela
*) NULL
,
906 link_info
->keep_memory
));
907 if (internal_relocs
== NULL
)
910 ia64_info
= elfNN_ia64_hash_table (link_info
);
911 irelend
= internal_relocs
+ sec
->reloc_count
;
913 /* Get the section contents. */
914 if (elf_section_data (sec
)->this_hdr
.contents
!= NULL
)
915 contents
= elf_section_data (sec
)->this_hdr
.contents
;
918 if (!bfd_malloc_and_get_section (abfd
, sec
, &contents
))
922 for (irel
= internal_relocs
; irel
< irelend
; irel
++)
924 unsigned long r_type
= ELFNN_R_TYPE (irel
->r_info
);
925 bfd_vma symaddr
, reladdr
, trampoff
, toff
, roff
;
929 bfd_boolean is_branch
;
930 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
935 case R_IA64_PCREL21B
:
936 case R_IA64_PCREL21BI
:
937 case R_IA64_PCREL21M
:
938 case R_IA64_PCREL21F
:
939 /* In the finalize pass, all br relaxations are done. We can
941 if (!link_info
->need_relax_finalize
)
946 case R_IA64_PCREL60B
:
947 /* We can't optimize brl to br before the finalize pass since
948 br relaxations will increase the code size. Defer it to
949 the finalize pass. */
950 if (link_info
->need_relax_finalize
)
952 sec
->need_finalize_relax
= 1;
958 case R_IA64_LTOFF22X
:
960 /* We can't relax ldx/mov before the finalize pass since
961 br relaxations will increase the code size. Defer it to
962 the finalize pass. */
963 if (link_info
->need_relax_finalize
)
965 sec
->need_finalize_relax
= 1;
975 /* Get the value of the symbol referred to by the reloc. */
976 if (ELFNN_R_SYM (irel
->r_info
) < symtab_hdr
->sh_info
)
978 /* A local symbol. */
979 Elf_Internal_Sym
*isym
;
981 /* Read this BFD's local symbols. */
984 isymbuf
= (Elf_Internal_Sym
*) symtab_hdr
->contents
;
986 isymbuf
= bfd_elf_get_elf_syms (abfd
, symtab_hdr
,
987 symtab_hdr
->sh_info
, 0,
993 isym
= isymbuf
+ ELFNN_R_SYM (irel
->r_info
);
994 if (isym
->st_shndx
== SHN_UNDEF
)
995 continue; /* We can't do anything with undefined symbols. */
996 else if (isym
->st_shndx
== SHN_ABS
)
997 tsec
= bfd_abs_section_ptr
;
998 else if (isym
->st_shndx
== SHN_COMMON
)
999 tsec
= bfd_com_section_ptr
;
1000 else if (isym
->st_shndx
== SHN_IA_64_ANSI_COMMON
)
1001 tsec
= bfd_com_section_ptr
;
1003 tsec
= bfd_section_from_elf_index (abfd
, isym
->st_shndx
);
1005 toff
= isym
->st_value
;
1006 dyn_i
= get_dyn_sym_info (ia64_info
, NULL
, abfd
, irel
, FALSE
);
1007 symtype
= ELF_ST_TYPE (isym
->st_info
);
1012 struct elf_link_hash_entry
*h
;
1014 indx
= ELFNN_R_SYM (irel
->r_info
) - symtab_hdr
->sh_info
;
1015 h
= elf_sym_hashes (abfd
)[indx
];
1016 BFD_ASSERT (h
!= NULL
);
1018 while (h
->root
.type
== bfd_link_hash_indirect
1019 || h
->root
.type
== bfd_link_hash_warning
)
1020 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
1022 dyn_i
= get_dyn_sym_info (ia64_info
, h
, abfd
, irel
, FALSE
);
1024 /* For branches to dynamic symbols, we're interested instead
1025 in a branch to the PLT entry. */
1026 if (is_branch
&& dyn_i
&& dyn_i
->want_plt2
)
1028 /* Internal branches shouldn't be sent to the PLT.
1029 Leave this for now and we'll give an error later. */
1030 if (r_type
!= R_IA64_PCREL21B
)
1033 tsec
= ia64_info
->plt_sec
;
1034 toff
= dyn_i
->plt2_offset
;
1035 BFD_ASSERT (irel
->r_addend
== 0);
1038 /* Can't do anything else with dynamic symbols. */
1039 else if (elfNN_ia64_dynamic_symbol_p (h
, link_info
, r_type
))
1044 /* We can't do anything with undefined symbols. */
1045 if (h
->root
.type
== bfd_link_hash_undefined
1046 || h
->root
.type
== bfd_link_hash_undefweak
)
1049 tsec
= h
->root
.u
.def
.section
;
1050 toff
= h
->root
.u
.def
.value
;
1056 if (tsec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
1058 /* At this stage in linking, no SEC_MERGE symbol has been
1059 adjusted, so all references to such symbols need to be
1060 passed through _bfd_merged_section_offset. (Later, in
1061 relocate_section, all SEC_MERGE symbols *except* for
1062 section symbols have been adjusted.)
1064 gas may reduce relocations against symbols in SEC_MERGE
1065 sections to a relocation against the section symbol when
1066 the original addend was zero. When the reloc is against
1067 a section symbol we should include the addend in the
1068 offset passed to _bfd_merged_section_offset, since the
1069 location of interest is the original symbol. On the
1070 other hand, an access to "sym+addend" where "sym" is not
1071 a section symbol should not include the addend; Such an
1072 access is presumed to be an offset from "sym"; The
1073 location of interest is just "sym". */
1074 if (symtype
== STT_SECTION
)
1075 toff
+= irel
->r_addend
;
1077 toff
= _bfd_merged_section_offset (abfd
, &tsec
,
1078 elf_section_data (tsec
)->sec_info
,
1081 if (symtype
!= STT_SECTION
)
1082 toff
+= irel
->r_addend
;
1085 toff
+= irel
->r_addend
;
1087 symaddr
= tsec
->output_section
->vma
+ tsec
->output_offset
+ toff
;
1089 roff
= irel
->r_offset
;
1093 bfd_signed_vma offset
;
1095 reladdr
= (sec
->output_section
->vma
1096 + sec
->output_offset
1097 + roff
) & (bfd_vma
) -4;
1099 /* If the branch is in range, no need to do anything. */
1100 if ((bfd_signed_vma
) (symaddr
- reladdr
) >= -0x1000000
1101 && (bfd_signed_vma
) (symaddr
- reladdr
) <= 0x0FFFFF0)
1103 /* If the 60-bit branch is in 21-bit range, optimize it. */
1104 if (r_type
== R_IA64_PCREL60B
)
1106 elfNN_ia64_relax_brl (contents
, roff
);
1109 = ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1112 /* If the original relocation offset points to slot
1113 1, change it to slot 2. */
1114 if ((irel
->r_offset
& 3) == 1)
1115 irel
->r_offset
+= 1;
1120 else if (r_type
== R_IA64_PCREL60B
)
1122 else if (elfNN_ia64_relax_br (contents
, roff
))
1125 = ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1128 /* Make the relocation offset point to slot 1. */
1129 irel
->r_offset
= (irel
->r_offset
& ~((bfd_vma
) 0x3)) + 1;
1133 /* We can't put a trampoline in a .init/.fini section. Issue
1135 if (strcmp (sec
->output_section
->name
, ".init") == 0
1136 || strcmp (sec
->output_section
->name
, ".fini") == 0)
1138 (*_bfd_error_handler
)
1139 (_("%B: Can't relax br at 0x%lx in section `%A'. Please use brl or indirect branch."),
1140 sec
->owner
, sec
, (unsigned long) roff
);
1141 bfd_set_error (bfd_error_bad_value
);
1145 /* If the branch and target are in the same section, you've
1146 got one honking big section and we can't help you unless
1147 you are branching backwards. You'll get an error message
1149 if (tsec
== sec
&& toff
> roff
)
1152 /* Look for an existing fixup to this address. */
1153 for (f
= fixups
; f
; f
= f
->next
)
1154 if (f
->tsec
== tsec
&& f
->toff
== toff
)
1159 /* Two alternatives: If it's a branch to a PLT entry, we can
1160 make a copy of the FULL_PLT entry. Otherwise, we'll have
1161 to use a `brl' insn to get where we're going. */
1165 if (tsec
== ia64_info
->plt_sec
)
1166 size
= sizeof (plt_full_entry
);
1168 size
= oor_branch_size
;
1170 /* Resize the current section to make room for the new branch. */
1171 trampoff
= (sec
->size
+ 15) & (bfd_vma
) -16;
1173 /* If trampoline is out of range, there is nothing we
1175 offset
= trampoff
- (roff
& (bfd_vma
) -4);
1176 if (offset
< -0x1000000 || offset
> 0x0FFFFF0)
1179 amt
= trampoff
+ size
;
1180 contents
= (bfd_byte
*) bfd_realloc (contents
, amt
);
1181 if (contents
== NULL
)
1185 if (tsec
== ia64_info
->plt_sec
)
1187 memcpy (contents
+ trampoff
, plt_full_entry
, size
);
1189 /* Hijack the old relocation for use as the PLTOFF reloc. */
1190 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1192 irel
->r_offset
= trampoff
;
1196 if (size
== sizeof (oor_ip
))
1198 memcpy (contents
+ trampoff
, oor_ip
, size
);
1199 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1201 irel
->r_addend
-= 16;
1202 irel
->r_offset
= trampoff
+ 2;
1206 memcpy (contents
+ trampoff
, oor_brl
, size
);
1207 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1209 irel
->r_offset
= trampoff
+ 2;
1214 /* Record the fixup so we don't do it again this section. */
1215 f
= (struct one_fixup
*)
1216 bfd_malloc ((bfd_size_type
) sizeof (*f
));
1220 f
->trampoff
= trampoff
;
1225 /* If trampoline is out of range, there is nothing we
1227 offset
= f
->trampoff
- (roff
& (bfd_vma
) -4);
1228 if (offset
< -0x1000000 || offset
> 0x0FFFFF0)
1231 /* Nop out the reloc, since we're finalizing things here. */
1232 irel
->r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
1235 /* Fix up the existing branch to hit the trampoline. */
1236 if (elfNN_ia64_install_value (contents
+ roff
, offset
, r_type
)
1240 changed_contents
= TRUE
;
1241 changed_relocs
= TRUE
;
1248 bfd
*obfd
= sec
->output_section
->owner
;
1249 gp
= _bfd_get_gp_value (obfd
);
1252 if (!elfNN_ia64_choose_gp (obfd
, link_info
))
1254 gp
= _bfd_get_gp_value (obfd
);
1258 /* If the data is out of range, do nothing. */
1259 if ((bfd_signed_vma
) (symaddr
- gp
) >= 0x200000
1260 ||(bfd_signed_vma
) (symaddr
- gp
) < -0x200000)
1263 if (r_type
== R_IA64_LTOFF22X
)
1265 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1267 changed_relocs
= TRUE
;
1268 if (dyn_i
->want_gotx
)
1270 dyn_i
->want_gotx
= 0;
1271 changed_got
|= !dyn_i
->want_got
;
1276 elfNN_ia64_relax_ldxmov (contents
, roff
);
1277 irel
->r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
1278 changed_contents
= TRUE
;
1279 changed_relocs
= TRUE
;
1284 /* ??? If we created fixups, this may push the code segment large
1285 enough that the data segment moves, which will change the GP.
1286 Reset the GP so that we re-calculate next round. We need to
1287 do this at the _beginning_ of the next round; now will not do. */
1289 /* Clean up and go home. */
1292 struct one_fixup
*f
= fixups
;
1293 fixups
= fixups
->next
;
1298 && symtab_hdr
->contents
!= (unsigned char *) isymbuf
)
1300 if (! link_info
->keep_memory
)
1304 /* Cache the symbols for elf_link_input_bfd. */
1305 symtab_hdr
->contents
= (unsigned char *) isymbuf
;
1309 if (contents
!= NULL
1310 && elf_section_data (sec
)->this_hdr
.contents
!= contents
)
1312 if (!changed_contents
&& !link_info
->keep_memory
)
1316 /* Cache the section contents for elf_link_input_bfd. */
1317 elf_section_data (sec
)->this_hdr
.contents
= contents
;
1321 if (elf_section_data (sec
)->relocs
!= internal_relocs
)
1323 if (!changed_relocs
)
1324 free (internal_relocs
);
1326 elf_section_data (sec
)->relocs
= internal_relocs
;
1331 struct elfNN_ia64_allocate_data data
;
1332 data
.info
= link_info
;
1334 ia64_info
->self_dtpmod_offset
= (bfd_vma
) -1;
1336 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_data_got
, &data
);
1337 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_fptr_got
, &data
);
1338 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_local_got
, &data
);
1339 ia64_info
->got_sec
->size
= data
.ofs
;
1341 if (ia64_info
->root
.dynamic_sections_created
)
1343 /* Resize .rela.got. */
1344 ia64_info
->rel_got_sec
->size
= 0;
1345 if (link_info
->shared
1346 && ia64_info
->self_dtpmod_offset
!= (bfd_vma
) -1)
1347 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
1348 data
.only_got
= TRUE
;
1349 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_dynrel_entries
,
1354 if (!link_info
->need_relax_finalize
)
1355 sec
->need_finalize_relax
= 0;
1357 *again
= changed_contents
|| changed_relocs
;
1361 if (isymbuf
!= NULL
&& (unsigned char *) isymbuf
!= symtab_hdr
->contents
)
1363 if (contents
!= NULL
1364 && elf_section_data (sec
)->this_hdr
.contents
!= contents
)
1366 if (internal_relocs
!= NULL
1367 && elf_section_data (sec
)->relocs
!= internal_relocs
)
1368 free (internal_relocs
);
1373 elfNN_ia64_relax_ldxmov (contents
, off
)
1378 bfd_vma dword
, insn
;
1380 switch ((int)off
& 0x3)
1382 case 0: shift
= 5; break;
1383 case 1: shift
= 14; off
+= 3; break;
1384 case 2: shift
= 23; off
+= 6; break;
1389 dword
= bfd_getl64 (contents
+ off
);
1390 insn
= (dword
>> shift
) & 0x1ffffffffffLL
;
1392 r1
= (insn
>> 6) & 127;
1393 r3
= (insn
>> 20) & 127;
1395 insn
= 0x8000000; /* nop */
1397 insn
= (insn
& 0x7f01fff) | 0x10800000000LL
; /* (qp) mov r1 = r3 */
1399 dword
&= ~(0x1ffffffffffLL
<< shift
);
1400 dword
|= (insn
<< shift
);
1401 bfd_putl64 (dword
, contents
+ off
);
1404 /* Return TRUE if NAME is an unwind table section name. */
1406 static inline bfd_boolean
1407 is_unwind_section_name (abfd
, name
)
1411 size_t len1
, len2
, len3
;
1413 if (elfNN_ia64_hpux_vec (abfd
->xvec
)
1414 && !strcmp (name
, ELF_STRING_ia64_unwind_hdr
))
1417 len1
= sizeof (ELF_STRING_ia64_unwind
) - 1;
1418 len2
= sizeof (ELF_STRING_ia64_unwind_info
) - 1;
1419 len3
= sizeof (ELF_STRING_ia64_unwind_once
) - 1;
1420 return ((strncmp (name
, ELF_STRING_ia64_unwind
, len1
) == 0
1421 && strncmp (name
, ELF_STRING_ia64_unwind_info
, len2
) != 0)
1422 || strncmp (name
, ELF_STRING_ia64_unwind_once
, len3
) == 0);
1425 /* Handle an IA-64 specific section when reading an object file. This
1426 is called when bfd_section_from_shdr finds a section with an unknown
1430 elfNN_ia64_section_from_shdr (bfd
*abfd
,
1431 Elf_Internal_Shdr
*hdr
,
1437 /* There ought to be a place to keep ELF backend specific flags, but
1438 at the moment there isn't one. We just keep track of the
1439 sections by their name, instead. Fortunately, the ABI gives
1440 suggested names for all the MIPS specific sections, so we will
1441 probably get away with this. */
1442 switch (hdr
->sh_type
)
1444 case SHT_IA_64_UNWIND
:
1445 case SHT_IA_64_HP_OPT_ANOT
:
1449 if (strcmp (name
, ELF_STRING_ia64_archext
) != 0)
1457 if (! _bfd_elf_make_section_from_shdr (abfd
, hdr
, name
, shindex
))
1459 newsect
= hdr
->bfd_section
;
1464 /* Convert IA-64 specific section flags to bfd internal section flags. */
1466 /* ??? There is no bfd internal flag equivalent to the SHF_IA_64_NORECOV
1470 elfNN_ia64_section_flags (flags
, hdr
)
1472 const Elf_Internal_Shdr
*hdr
;
1474 if (hdr
->sh_flags
& SHF_IA_64_SHORT
)
1475 *flags
|= SEC_SMALL_DATA
;
1480 /* Set the correct type for an IA-64 ELF section. We do this by the
1481 section name, which is a hack, but ought to work. */
1484 elfNN_ia64_fake_sections (abfd
, hdr
, sec
)
1485 bfd
*abfd ATTRIBUTE_UNUSED
;
1486 Elf_Internal_Shdr
*hdr
;
1489 register const char *name
;
1491 name
= bfd_get_section_name (abfd
, sec
);
1493 if (is_unwind_section_name (abfd
, name
))
1495 /* We don't have the sections numbered at this point, so sh_info
1496 is set later, in elfNN_ia64_final_write_processing. */
1497 hdr
->sh_type
= SHT_IA_64_UNWIND
;
1498 hdr
->sh_flags
|= SHF_LINK_ORDER
;
1500 else if (strcmp (name
, ELF_STRING_ia64_archext
) == 0)
1501 hdr
->sh_type
= SHT_IA_64_EXT
;
1502 else if (strcmp (name
, ".HP.opt_annot") == 0)
1503 hdr
->sh_type
= SHT_IA_64_HP_OPT_ANOT
;
1504 else if (strcmp (name
, ".reloc") == 0)
1505 /* This is an ugly, but unfortunately necessary hack that is
1506 needed when producing EFI binaries on IA-64. It tells
1507 elf.c:elf_fake_sections() not to consider ".reloc" as a section
1508 containing ELF relocation info. We need this hack in order to
1509 be able to generate ELF binaries that can be translated into
1510 EFI applications (which are essentially COFF objects). Those
1511 files contain a COFF ".reloc" section inside an ELFNN object,
1512 which would normally cause BFD to segfault because it would
1513 attempt to interpret this section as containing relocation
1514 entries for section "oc". With this hack enabled, ".reloc"
1515 will be treated as a normal data section, which will avoid the
1516 segfault. However, you won't be able to create an ELFNN binary
1517 with a section named "oc" that needs relocations, but that's
1518 the kind of ugly side-effects you get when detecting section
1519 types based on their names... In practice, this limitation is
1520 unlikely to bite. */
1521 hdr
->sh_type
= SHT_PROGBITS
;
1523 if (sec
->flags
& SEC_SMALL_DATA
)
1524 hdr
->sh_flags
|= SHF_IA_64_SHORT
;
1529 /* The final processing done just before writing out an IA-64 ELF
1533 elfNN_ia64_final_write_processing (abfd
, linker
)
1535 bfd_boolean linker ATTRIBUTE_UNUSED
;
1537 Elf_Internal_Shdr
*hdr
;
1540 for (s
= abfd
->sections
; s
; s
= s
->next
)
1542 hdr
= &elf_section_data (s
)->this_hdr
;
1543 switch (hdr
->sh_type
)
1545 case SHT_IA_64_UNWIND
:
1546 /* The IA-64 processor-specific ABI requires setting sh_link
1547 to the unwind section, whereas HP-UX requires sh_info to
1548 do so. For maximum compatibility, we'll set both for
1550 hdr
->sh_info
= hdr
->sh_link
;
1555 if (! elf_flags_init (abfd
))
1557 unsigned long flags
= 0;
1559 if (abfd
->xvec
->byteorder
== BFD_ENDIAN_BIG
)
1560 flags
|= EF_IA_64_BE
;
1561 if (bfd_get_mach (abfd
) == bfd_mach_ia64_elf64
)
1562 flags
|= EF_IA_64_ABI64
;
1564 elf_elfheader(abfd
)->e_flags
= flags
;
1565 elf_flags_init (abfd
) = TRUE
;
1569 /* Hook called by the linker routine which adds symbols from an object
1570 file. We use it to put .comm items in .sbss, and not .bss. */
1573 elfNN_ia64_add_symbol_hook (abfd
, info
, sym
, namep
, flagsp
, secp
, valp
)
1575 struct bfd_link_info
*info
;
1576 Elf_Internal_Sym
*sym
;
1577 const char **namep ATTRIBUTE_UNUSED
;
1578 flagword
*flagsp ATTRIBUTE_UNUSED
;
1582 if (sym
->st_shndx
== SHN_COMMON
1583 && !info
->relocatable
1584 && sym
->st_size
<= elf_gp_size (abfd
))
1586 /* Common symbols less than or equal to -G nn bytes are
1587 automatically put into .sbss. */
1589 asection
*scomm
= bfd_get_section_by_name (abfd
, ".scommon");
1593 scomm
= bfd_make_section_with_flags (abfd
, ".scommon",
1596 | SEC_LINKER_CREATED
));
1602 *valp
= sym
->st_size
;
1608 /* Return the number of additional phdrs we will need. */
1611 elfNN_ia64_additional_program_headers (abfd
)
1617 /* See if we need a PT_IA_64_ARCHEXT segment. */
1618 s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_archext
);
1619 if (s
&& (s
->flags
& SEC_LOAD
))
1622 /* Count how many PT_IA_64_UNWIND segments we need. */
1623 for (s
= abfd
->sections
; s
; s
= s
->next
)
1624 if (is_unwind_section_name (abfd
, s
->name
) && (s
->flags
& SEC_LOAD
))
1631 elfNN_ia64_modify_segment_map (abfd
, info
)
1633 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
1635 struct elf_segment_map
*m
, **pm
;
1636 Elf_Internal_Shdr
*hdr
;
1639 /* If we need a PT_IA_64_ARCHEXT segment, it must come before
1640 all PT_LOAD segments. */
1641 s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_archext
);
1642 if (s
&& (s
->flags
& SEC_LOAD
))
1644 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1645 if (m
->p_type
== PT_IA_64_ARCHEXT
)
1649 m
= ((struct elf_segment_map
*)
1650 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *m
));
1654 m
->p_type
= PT_IA_64_ARCHEXT
;
1658 /* We want to put it after the PHDR and INTERP segments. */
1659 pm
= &elf_tdata (abfd
)->segment_map
;
1661 && ((*pm
)->p_type
== PT_PHDR
1662 || (*pm
)->p_type
== PT_INTERP
))
1670 /* Install PT_IA_64_UNWIND segments, if needed. */
1671 for (s
= abfd
->sections
; s
; s
= s
->next
)
1673 hdr
= &elf_section_data (s
)->this_hdr
;
1674 if (hdr
->sh_type
!= SHT_IA_64_UNWIND
)
1677 if (s
&& (s
->flags
& SEC_LOAD
))
1679 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1680 if (m
->p_type
== PT_IA_64_UNWIND
)
1684 /* Look through all sections in the unwind segment
1685 for a match since there may be multiple sections
1687 for (i
= m
->count
- 1; i
>= 0; --i
)
1688 if (m
->sections
[i
] == s
)
1697 m
= ((struct elf_segment_map
*)
1698 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *m
));
1702 m
->p_type
= PT_IA_64_UNWIND
;
1707 /* We want to put it last. */
1708 pm
= &elf_tdata (abfd
)->segment_map
;
1716 /* Turn on PF_IA_64_NORECOV if needed. This involves traversing all of
1717 the input sections for each output section in the segment and testing
1718 for SHF_IA_64_NORECOV on each. */
1719 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1720 if (m
->p_type
== PT_LOAD
)
1723 for (i
= m
->count
- 1; i
>= 0; --i
)
1725 struct bfd_link_order
*order
= m
->sections
[i
]->map_head
.link_order
;
1728 if (order
->type
== bfd_indirect_link_order
)
1730 asection
*is
= order
->u
.indirect
.section
;
1731 bfd_vma flags
= elf_section_data(is
)->this_hdr
.sh_flags
;
1732 if (flags
& SHF_IA_64_NORECOV
)
1734 m
->p_flags
|= PF_IA_64_NORECOV
;
1738 order
= order
->next
;
1747 /* According to the Tahoe assembler spec, all labels starting with a
1751 elfNN_ia64_is_local_label_name (abfd
, name
)
1752 bfd
*abfd ATTRIBUTE_UNUSED
;
1755 return name
[0] == '.';
1758 /* Should we do dynamic things to this symbol? */
1761 elfNN_ia64_dynamic_symbol_p (h
, info
, r_type
)
1762 struct elf_link_hash_entry
*h
;
1763 struct bfd_link_info
*info
;
1766 bfd_boolean ignore_protected
1767 = ((r_type
& 0xf8) == 0x40 /* FPTR relocs */
1768 || (r_type
& 0xf8) == 0x50); /* LTOFF_FPTR relocs */
1770 return _bfd_elf_dynamic_symbol_p (h
, info
, ignore_protected
);
1773 static struct bfd_hash_entry
*
1774 elfNN_ia64_new_elf_hash_entry (entry
, table
, string
)
1775 struct bfd_hash_entry
*entry
;
1776 struct bfd_hash_table
*table
;
1779 struct elfNN_ia64_link_hash_entry
*ret
;
1780 ret
= (struct elfNN_ia64_link_hash_entry
*) entry
;
1782 /* Allocate the structure if it has not already been allocated by a
1785 ret
= bfd_hash_allocate (table
, sizeof (*ret
));
1790 /* Call the allocation method of the superclass. */
1791 ret
= ((struct elfNN_ia64_link_hash_entry
*)
1792 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry
*) ret
,
1796 return (struct bfd_hash_entry
*) ret
;
1800 elfNN_ia64_hash_copy_indirect (bed
, xdir
, xind
)
1801 const struct elf_backend_data
*bed ATTRIBUTE_UNUSED
;
1802 struct elf_link_hash_entry
*xdir
, *xind
;
1804 struct elfNN_ia64_link_hash_entry
*dir
, *ind
;
1806 dir
= (struct elfNN_ia64_link_hash_entry
*) xdir
;
1807 ind
= (struct elfNN_ia64_link_hash_entry
*) xind
;
1809 /* Copy down any references that we may have already seen to the
1810 symbol which just became indirect. */
1812 dir
->root
.ref_dynamic
|= ind
->root
.ref_dynamic
;
1813 dir
->root
.ref_regular
|= ind
->root
.ref_regular
;
1814 dir
->root
.ref_regular_nonweak
|= ind
->root
.ref_regular_nonweak
;
1815 dir
->root
.needs_plt
|= ind
->root
.needs_plt
;
1817 if (ind
->root
.root
.type
!= bfd_link_hash_indirect
)
1820 /* Copy over the got and plt data. This would have been done
1823 if (dir
->info
== NULL
)
1825 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1827 dir
->info
= dyn_i
= ind
->info
;
1830 /* Fix up the dyn_sym_info pointers to the global symbol. */
1831 for (; dyn_i
; dyn_i
= dyn_i
->next
)
1832 dyn_i
->h
= &dir
->root
;
1834 BFD_ASSERT (ind
->info
== NULL
);
1836 /* Copy over the dynindx. */
1838 if (dir
->root
.dynindx
== -1)
1840 dir
->root
.dynindx
= ind
->root
.dynindx
;
1841 dir
->root
.dynstr_index
= ind
->root
.dynstr_index
;
1842 ind
->root
.dynindx
= -1;
1843 ind
->root
.dynstr_index
= 0;
1845 BFD_ASSERT (ind
->root
.dynindx
== -1);
1849 elfNN_ia64_hash_hide_symbol (info
, xh
, force_local
)
1850 struct bfd_link_info
*info
;
1851 struct elf_link_hash_entry
*xh
;
1852 bfd_boolean force_local
;
1854 struct elfNN_ia64_link_hash_entry
*h
;
1855 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1857 h
= (struct elfNN_ia64_link_hash_entry
*)xh
;
1859 _bfd_elf_link_hash_hide_symbol (info
, &h
->root
, force_local
);
1861 for (dyn_i
= h
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1863 dyn_i
->want_plt2
= 0;
1864 dyn_i
->want_plt
= 0;
1868 /* Compute a hash of a local hash entry. */
1871 elfNN_ia64_local_htab_hash (ptr
)
1874 struct elfNN_ia64_local_hash_entry
*entry
1875 = (struct elfNN_ia64_local_hash_entry
*) ptr
;
1877 return (((entry
->id
& 0xff) << 24) | ((entry
->id
& 0xff00) << 8))
1878 ^ entry
->r_sym
^ (entry
->id
>> 16);
1881 /* Compare local hash entries. */
1884 elfNN_ia64_local_htab_eq (ptr1
, ptr2
)
1885 const void *ptr1
, *ptr2
;
1887 struct elfNN_ia64_local_hash_entry
*entry1
1888 = (struct elfNN_ia64_local_hash_entry
*) ptr1
;
1889 struct elfNN_ia64_local_hash_entry
*entry2
1890 = (struct elfNN_ia64_local_hash_entry
*) ptr2
;
1892 return entry1
->id
== entry2
->id
&& entry1
->r_sym
== entry2
->r_sym
;
1895 /* Create the derived linker hash table. The IA-64 ELF port uses this
1896 derived hash table to keep information specific to the IA-64 ElF
1897 linker (without using static variables). */
1899 static struct bfd_link_hash_table
*
1900 elfNN_ia64_hash_table_create (abfd
)
1903 struct elfNN_ia64_link_hash_table
*ret
;
1905 ret
= bfd_zmalloc ((bfd_size_type
) sizeof (*ret
));
1909 if (!_bfd_elf_link_hash_table_init (&ret
->root
, abfd
,
1910 elfNN_ia64_new_elf_hash_entry
))
1916 ret
->loc_hash_table
= htab_try_create (1024, elfNN_ia64_local_htab_hash
,
1917 elfNN_ia64_local_htab_eq
, NULL
);
1918 ret
->loc_hash_memory
= objalloc_create ();
1919 if (!ret
->loc_hash_table
|| !ret
->loc_hash_memory
)
1925 return &ret
->root
.root
;
1928 /* Destroy IA-64 linker hash table. */
1931 elfNN_ia64_hash_table_free (hash
)
1932 struct bfd_link_hash_table
*hash
;
1934 struct elfNN_ia64_link_hash_table
*ia64_info
1935 = (struct elfNN_ia64_link_hash_table
*) hash
;
1936 if (ia64_info
->loc_hash_table
)
1937 htab_delete (ia64_info
->loc_hash_table
);
1938 if (ia64_info
->loc_hash_memory
)
1939 objalloc_free ((struct objalloc
*) ia64_info
->loc_hash_memory
);
1940 _bfd_generic_link_hash_table_free (hash
);
1943 /* Traverse both local and global hash tables. */
1945 struct elfNN_ia64_dyn_sym_traverse_data
1947 bfd_boolean (*func
) PARAMS ((struct elfNN_ia64_dyn_sym_info
*, PTR
));
1952 elfNN_ia64_global_dyn_sym_thunk (xentry
, xdata
)
1953 struct bfd_hash_entry
*xentry
;
1956 struct elfNN_ia64_link_hash_entry
*entry
1957 = (struct elfNN_ia64_link_hash_entry
*) xentry
;
1958 struct elfNN_ia64_dyn_sym_traverse_data
*data
1959 = (struct elfNN_ia64_dyn_sym_traverse_data
*) xdata
;
1960 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1962 if (entry
->root
.root
.type
== bfd_link_hash_warning
)
1963 entry
= (struct elfNN_ia64_link_hash_entry
*) entry
->root
.root
.u
.i
.link
;
1965 for (dyn_i
= entry
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1966 if (! (*data
->func
) (dyn_i
, data
->data
))
1972 elfNN_ia64_local_dyn_sym_thunk (slot
, xdata
)
1976 struct elfNN_ia64_local_hash_entry
*entry
1977 = (struct elfNN_ia64_local_hash_entry
*) *slot
;
1978 struct elfNN_ia64_dyn_sym_traverse_data
*data
1979 = (struct elfNN_ia64_dyn_sym_traverse_data
*) xdata
;
1980 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1982 for (dyn_i
= entry
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1983 if (! (*data
->func
) (dyn_i
, data
->data
))
1989 elfNN_ia64_dyn_sym_traverse (ia64_info
, func
, data
)
1990 struct elfNN_ia64_link_hash_table
*ia64_info
;
1991 bfd_boolean (*func
) PARAMS ((struct elfNN_ia64_dyn_sym_info
*, PTR
));
1994 struct elfNN_ia64_dyn_sym_traverse_data xdata
;
1999 elf_link_hash_traverse (&ia64_info
->root
,
2000 elfNN_ia64_global_dyn_sym_thunk
, &xdata
);
2001 htab_traverse (ia64_info
->loc_hash_table
,
2002 elfNN_ia64_local_dyn_sym_thunk
, &xdata
);
2006 elfNN_ia64_create_dynamic_sections (abfd
, info
)
2008 struct bfd_link_info
*info
;
2010 struct elfNN_ia64_link_hash_table
*ia64_info
;
2013 if (! _bfd_elf_create_dynamic_sections (abfd
, info
))
2016 ia64_info
= elfNN_ia64_hash_table (info
);
2018 ia64_info
->plt_sec
= bfd_get_section_by_name (abfd
, ".plt");
2019 ia64_info
->got_sec
= bfd_get_section_by_name (abfd
, ".got");
2022 flagword flags
= bfd_get_section_flags (abfd
, ia64_info
->got_sec
);
2023 bfd_set_section_flags (abfd
, ia64_info
->got_sec
, SEC_SMALL_DATA
| flags
);
2024 /* The .got section is always aligned at 8 bytes. */
2025 bfd_set_section_alignment (abfd
, ia64_info
->got_sec
, 3);
2028 if (!get_pltoff (abfd
, info
, ia64_info
))
2031 s
= bfd_make_section_with_flags (abfd
, ".rela.IA_64.pltoff",
2032 (SEC_ALLOC
| SEC_LOAD
2035 | SEC_LINKER_CREATED
2038 || !bfd_set_section_alignment (abfd
, s
, LOG_SECTION_ALIGN
))
2040 ia64_info
->rel_pltoff_sec
= s
;
2042 s
= bfd_make_section_with_flags (abfd
, ".rela.got",
2043 (SEC_ALLOC
| SEC_LOAD
2046 | SEC_LINKER_CREATED
2049 || !bfd_set_section_alignment (abfd
, s
, LOG_SECTION_ALIGN
))
2051 ia64_info
->rel_got_sec
= s
;
2056 /* Find and/or create a hash entry for local symbol. */
2057 static struct elfNN_ia64_local_hash_entry
*
2058 get_local_sym_hash (ia64_info
, abfd
, rel
, create
)
2059 struct elfNN_ia64_link_hash_table
*ia64_info
;
2061 const Elf_Internal_Rela
*rel
;
2064 struct elfNN_ia64_local_hash_entry e
, *ret
;
2065 asection
*sec
= abfd
->sections
;
2066 hashval_t h
= (((sec
->id
& 0xff) << 24) | ((sec
->id
& 0xff00) << 8))
2067 ^ ELFNN_R_SYM (rel
->r_info
) ^ (sec
->id
>> 16);
2071 e
.r_sym
= ELFNN_R_SYM (rel
->r_info
);
2072 slot
= htab_find_slot_with_hash (ia64_info
->loc_hash_table
, &e
, h
,
2073 create
? INSERT
: NO_INSERT
);
2079 return (struct elfNN_ia64_local_hash_entry
*) *slot
;
2081 ret
= (struct elfNN_ia64_local_hash_entry
*)
2082 objalloc_alloc ((struct objalloc
*) ia64_info
->loc_hash_memory
,
2083 sizeof (struct elfNN_ia64_local_hash_entry
));
2086 memset (ret
, 0, sizeof (*ret
));
2088 ret
->r_sym
= ELFNN_R_SYM (rel
->r_info
);
2094 /* Find and/or create a descriptor for dynamic symbol info. This will
2095 vary based on global or local symbol, and the addend to the reloc. */
2097 static struct elfNN_ia64_dyn_sym_info
*
2098 get_dyn_sym_info (ia64_info
, h
, abfd
, rel
, create
)
2099 struct elfNN_ia64_link_hash_table
*ia64_info
;
2100 struct elf_link_hash_entry
*h
;
2102 const Elf_Internal_Rela
*rel
;
2105 struct elfNN_ia64_dyn_sym_info
**pp
;
2106 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2107 bfd_vma addend
= rel
? rel
->r_addend
: 0;
2110 pp
= &((struct elfNN_ia64_link_hash_entry
*)h
)->info
;
2113 struct elfNN_ia64_local_hash_entry
*loc_h
;
2115 loc_h
= get_local_sym_hash (ia64_info
, abfd
, rel
, create
);
2118 BFD_ASSERT (!create
);
2125 for (dyn_i
= *pp
; dyn_i
&& dyn_i
->addend
!= addend
; dyn_i
= *pp
)
2128 if (dyn_i
== NULL
&& create
)
2130 dyn_i
= ((struct elfNN_ia64_dyn_sym_info
*)
2131 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *dyn_i
));
2133 dyn_i
->addend
= addend
;
2140 get_got (abfd
, info
, ia64_info
)
2142 struct bfd_link_info
*info
;
2143 struct elfNN_ia64_link_hash_table
*ia64_info
;
2148 got
= ia64_info
->got_sec
;
2153 dynobj
= ia64_info
->root
.dynobj
;
2155 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2156 if (!_bfd_elf_create_got_section (dynobj
, info
))
2159 got
= bfd_get_section_by_name (dynobj
, ".got");
2161 ia64_info
->got_sec
= got
;
2163 /* The .got section is always aligned at 8 bytes. */
2164 if (!bfd_set_section_alignment (abfd
, got
, 3))
2167 flags
= bfd_get_section_flags (abfd
, got
);
2168 bfd_set_section_flags (abfd
, got
, SEC_SMALL_DATA
| flags
);
2174 /* Create function descriptor section (.opd). This section is called .opd
2175 because it contains "official procedure descriptors". The "official"
2176 refers to the fact that these descriptors are used when taking the address
2177 of a procedure, thus ensuring a unique address for each procedure. */
2180 get_fptr (abfd
, info
, ia64_info
)
2182 struct bfd_link_info
*info
;
2183 struct elfNN_ia64_link_hash_table
*ia64_info
;
2188 fptr
= ia64_info
->fptr_sec
;
2191 dynobj
= ia64_info
->root
.dynobj
;
2193 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2195 fptr
= bfd_make_section_with_flags (dynobj
, ".opd",
2200 | (info
->pie
? 0 : SEC_READONLY
)
2201 | SEC_LINKER_CREATED
));
2203 || !bfd_set_section_alignment (abfd
, fptr
, 4))
2209 ia64_info
->fptr_sec
= fptr
;
2214 fptr_rel
= bfd_make_section_with_flags (dynobj
, ".rela.opd",
2215 (SEC_ALLOC
| SEC_LOAD
2218 | SEC_LINKER_CREATED
2220 if (fptr_rel
== NULL
2221 || !bfd_set_section_alignment (abfd
, fptr_rel
,
2228 ia64_info
->rel_fptr_sec
= fptr_rel
;
2236 get_pltoff (abfd
, info
, ia64_info
)
2238 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
2239 struct elfNN_ia64_link_hash_table
*ia64_info
;
2244 pltoff
= ia64_info
->pltoff_sec
;
2247 dynobj
= ia64_info
->root
.dynobj
;
2249 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2251 pltoff
= bfd_make_section_with_flags (dynobj
,
2252 ELF_STRING_ia64_pltoff
,
2258 | SEC_LINKER_CREATED
));
2260 || !bfd_set_section_alignment (abfd
, pltoff
, 4))
2266 ia64_info
->pltoff_sec
= pltoff
;
2273 get_reloc_section (abfd
, ia64_info
, sec
, create
)
2275 struct elfNN_ia64_link_hash_table
*ia64_info
;
2279 const char *srel_name
;
2283 srel_name
= (bfd_elf_string_from_elf_section
2284 (abfd
, elf_elfheader(abfd
)->e_shstrndx
,
2285 elf_section_data(sec
)->rel_hdr
.sh_name
));
2286 if (srel_name
== NULL
)
2289 BFD_ASSERT ((strncmp (srel_name
, ".rela", 5) == 0
2290 && strcmp (bfd_get_section_name (abfd
, sec
),
2292 || (strncmp (srel_name
, ".rel", 4) == 0
2293 && strcmp (bfd_get_section_name (abfd
, sec
),
2294 srel_name
+4) == 0));
2296 dynobj
= ia64_info
->root
.dynobj
;
2298 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2300 srel
= bfd_get_section_by_name (dynobj
, srel_name
);
2301 if (srel
== NULL
&& create
)
2303 srel
= bfd_make_section_with_flags (dynobj
, srel_name
,
2304 (SEC_ALLOC
| SEC_LOAD
2307 | SEC_LINKER_CREATED
2310 || !bfd_set_section_alignment (dynobj
, srel
,
2319 count_dyn_reloc (bfd
*abfd
, struct elfNN_ia64_dyn_sym_info
*dyn_i
,
2320 asection
*srel
, int type
, bfd_boolean reltext
)
2322 struct elfNN_ia64_dyn_reloc_entry
*rent
;
2324 for (rent
= dyn_i
->reloc_entries
; rent
; rent
= rent
->next
)
2325 if (rent
->srel
== srel
&& rent
->type
== type
)
2330 rent
= ((struct elfNN_ia64_dyn_reloc_entry
*)
2331 bfd_alloc (abfd
, (bfd_size_type
) sizeof (*rent
)));
2335 rent
->next
= dyn_i
->reloc_entries
;
2339 dyn_i
->reloc_entries
= rent
;
2341 rent
->reltext
= reltext
;
2348 elfNN_ia64_check_relocs (abfd
, info
, sec
, relocs
)
2350 struct bfd_link_info
*info
;
2352 const Elf_Internal_Rela
*relocs
;
2354 struct elfNN_ia64_link_hash_table
*ia64_info
;
2355 const Elf_Internal_Rela
*relend
;
2356 Elf_Internal_Shdr
*symtab_hdr
;
2357 const Elf_Internal_Rela
*rel
;
2358 asection
*got
, *fptr
, *srel
, *pltoff
;
2360 if (info
->relocatable
)
2363 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
2364 ia64_info
= elfNN_ia64_hash_table (info
);
2366 got
= fptr
= srel
= pltoff
= NULL
;
2368 relend
= relocs
+ sec
->reloc_count
;
2369 for (rel
= relocs
; rel
< relend
; ++rel
)
2379 NEED_LTOFF_FPTR
= 128,
2385 struct elf_link_hash_entry
*h
= NULL
;
2386 unsigned long r_symndx
= ELFNN_R_SYM (rel
->r_info
);
2387 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2389 bfd_boolean maybe_dynamic
;
2390 int dynrel_type
= R_IA64_NONE
;
2392 if (r_symndx
>= symtab_hdr
->sh_info
)
2394 /* We're dealing with a global symbol -- find its hash entry
2395 and mark it as being referenced. */
2396 long indx
= r_symndx
- symtab_hdr
->sh_info
;
2397 h
= elf_sym_hashes (abfd
)[indx
];
2398 while (h
->root
.type
== bfd_link_hash_indirect
2399 || h
->root
.type
== bfd_link_hash_warning
)
2400 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2405 /* We can only get preliminary data on whether a symbol is
2406 locally or externally defined, as not all of the input files
2407 have yet been processed. Do something with what we know, as
2408 this may help reduce memory usage and processing time later. */
2409 maybe_dynamic
= FALSE
;
2410 if (h
&& ((!info
->executable
2412 || info
->unresolved_syms_in_shared_libs
== RM_IGNORE
))
2414 || h
->root
.type
== bfd_link_hash_defweak
))
2415 maybe_dynamic
= TRUE
;
2418 switch (ELFNN_R_TYPE (rel
->r_info
))
2420 case R_IA64_TPREL64MSB
:
2421 case R_IA64_TPREL64LSB
:
2422 if (info
->shared
|| maybe_dynamic
)
2423 need_entry
= NEED_DYNREL
;
2424 dynrel_type
= R_IA64_TPREL64LSB
;
2426 info
->flags
|= DF_STATIC_TLS
;
2429 case R_IA64_LTOFF_TPREL22
:
2430 need_entry
= NEED_TPREL
;
2432 info
->flags
|= DF_STATIC_TLS
;
2435 case R_IA64_DTPREL32MSB
:
2436 case R_IA64_DTPREL32LSB
:
2437 case R_IA64_DTPREL64MSB
:
2438 case R_IA64_DTPREL64LSB
:
2439 if (info
->shared
|| maybe_dynamic
)
2440 need_entry
= NEED_DYNREL
;
2441 dynrel_type
= R_IA64_DTPRELNNLSB
;
2444 case R_IA64_LTOFF_DTPREL22
:
2445 need_entry
= NEED_DTPREL
;
2448 case R_IA64_DTPMOD64MSB
:
2449 case R_IA64_DTPMOD64LSB
:
2450 if (info
->shared
|| maybe_dynamic
)
2451 need_entry
= NEED_DYNREL
;
2452 dynrel_type
= R_IA64_DTPMOD64LSB
;
2455 case R_IA64_LTOFF_DTPMOD22
:
2456 need_entry
= NEED_DTPMOD
;
2459 case R_IA64_LTOFF_FPTR22
:
2460 case R_IA64_LTOFF_FPTR64I
:
2461 case R_IA64_LTOFF_FPTR32MSB
:
2462 case R_IA64_LTOFF_FPTR32LSB
:
2463 case R_IA64_LTOFF_FPTR64MSB
:
2464 case R_IA64_LTOFF_FPTR64LSB
:
2465 need_entry
= NEED_FPTR
| NEED_GOT
| NEED_LTOFF_FPTR
;
2468 case R_IA64_FPTR64I
:
2469 case R_IA64_FPTR32MSB
:
2470 case R_IA64_FPTR32LSB
:
2471 case R_IA64_FPTR64MSB
:
2472 case R_IA64_FPTR64LSB
:
2473 if (info
->shared
|| h
)
2474 need_entry
= NEED_FPTR
| NEED_DYNREL
;
2476 need_entry
= NEED_FPTR
;
2477 dynrel_type
= R_IA64_FPTRNNLSB
;
2480 case R_IA64_LTOFF22
:
2481 case R_IA64_LTOFF64I
:
2482 need_entry
= NEED_GOT
;
2485 case R_IA64_LTOFF22X
:
2486 need_entry
= NEED_GOTX
;
2489 case R_IA64_PLTOFF22
:
2490 case R_IA64_PLTOFF64I
:
2491 case R_IA64_PLTOFF64MSB
:
2492 case R_IA64_PLTOFF64LSB
:
2493 need_entry
= NEED_PLTOFF
;
2497 need_entry
|= NEED_MIN_PLT
;
2501 (*info
->callbacks
->warning
)
2502 (info
, _("@pltoff reloc against local symbol"), 0,
2503 abfd
, 0, (bfd_vma
) 0);
2507 case R_IA64_PCREL21B
:
2508 case R_IA64_PCREL60B
:
2509 /* Depending on where this symbol is defined, we may or may not
2510 need a full plt entry. Only skip if we know we'll not need
2511 the entry -- static or symbolic, and the symbol definition
2512 has already been seen. */
2513 if (maybe_dynamic
&& rel
->r_addend
== 0)
2514 need_entry
= NEED_FULL_PLT
;
2520 case R_IA64_DIR32MSB
:
2521 case R_IA64_DIR32LSB
:
2522 case R_IA64_DIR64MSB
:
2523 case R_IA64_DIR64LSB
:
2524 /* Shared objects will always need at least a REL relocation. */
2525 if (info
->shared
|| maybe_dynamic
)
2526 need_entry
= NEED_DYNREL
;
2527 dynrel_type
= R_IA64_DIRNNLSB
;
2530 case R_IA64_IPLTMSB
:
2531 case R_IA64_IPLTLSB
:
2532 /* Shared objects will always need at least a REL relocation. */
2533 if (info
->shared
|| maybe_dynamic
)
2534 need_entry
= NEED_DYNREL
;
2535 dynrel_type
= R_IA64_IPLTLSB
;
2538 case R_IA64_PCREL22
:
2539 case R_IA64_PCREL64I
:
2540 case R_IA64_PCREL32MSB
:
2541 case R_IA64_PCREL32LSB
:
2542 case R_IA64_PCREL64MSB
:
2543 case R_IA64_PCREL64LSB
:
2545 need_entry
= NEED_DYNREL
;
2546 dynrel_type
= R_IA64_PCRELNNLSB
;
2553 if ((need_entry
& NEED_FPTR
) != 0
2556 (*info
->callbacks
->warning
)
2557 (info
, _("non-zero addend in @fptr reloc"), 0,
2558 abfd
, 0, (bfd_vma
) 0);
2561 dyn_i
= get_dyn_sym_info (ia64_info
, h
, abfd
, rel
, TRUE
);
2563 /* Record whether or not this is a local symbol. */
2566 /* Create what's needed. */
2567 if (need_entry
& (NEED_GOT
| NEED_GOTX
| NEED_TPREL
2568 | NEED_DTPMOD
| NEED_DTPREL
))
2572 got
= get_got (abfd
, info
, ia64_info
);
2576 if (need_entry
& NEED_GOT
)
2577 dyn_i
->want_got
= 1;
2578 if (need_entry
& NEED_GOTX
)
2579 dyn_i
->want_gotx
= 1;
2580 if (need_entry
& NEED_TPREL
)
2581 dyn_i
->want_tprel
= 1;
2582 if (need_entry
& NEED_DTPMOD
)
2583 dyn_i
->want_dtpmod
= 1;
2584 if (need_entry
& NEED_DTPREL
)
2585 dyn_i
->want_dtprel
= 1;
2587 if (need_entry
& NEED_FPTR
)
2591 fptr
= get_fptr (abfd
, info
, ia64_info
);
2596 /* FPTRs for shared libraries are allocated by the dynamic
2597 linker. Make sure this local symbol will appear in the
2598 dynamic symbol table. */
2599 if (!h
&& info
->shared
)
2601 if (! (bfd_elf_link_record_local_dynamic_symbol
2602 (info
, abfd
, (long) r_symndx
)))
2606 dyn_i
->want_fptr
= 1;
2608 if (need_entry
& NEED_LTOFF_FPTR
)
2609 dyn_i
->want_ltoff_fptr
= 1;
2610 if (need_entry
& (NEED_MIN_PLT
| NEED_FULL_PLT
))
2612 if (!ia64_info
->root
.dynobj
)
2613 ia64_info
->root
.dynobj
= abfd
;
2615 dyn_i
->want_plt
= 1;
2617 if (need_entry
& NEED_FULL_PLT
)
2618 dyn_i
->want_plt2
= 1;
2619 if (need_entry
& NEED_PLTOFF
)
2621 /* This is needed here, in case @pltoff is used in a non-shared
2625 pltoff
= get_pltoff (abfd
, info
, ia64_info
);
2630 dyn_i
->want_pltoff
= 1;
2632 if ((need_entry
& NEED_DYNREL
) && (sec
->flags
& SEC_ALLOC
))
2636 srel
= get_reloc_section (abfd
, ia64_info
, sec
, TRUE
);
2640 if (!count_dyn_reloc (abfd
, dyn_i
, srel
, dynrel_type
,
2641 (sec
->flags
& SEC_READONLY
) != 0))
2649 /* For cleanliness, and potentially faster dynamic loading, allocate
2650 external GOT entries first. */
2653 allocate_global_data_got (dyn_i
, data
)
2654 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2657 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2659 if ((dyn_i
->want_got
|| dyn_i
->want_gotx
)
2660 && ! dyn_i
->want_fptr
2661 && elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2663 dyn_i
->got_offset
= x
->ofs
;
2666 if (dyn_i
->want_tprel
)
2668 dyn_i
->tprel_offset
= x
->ofs
;
2671 if (dyn_i
->want_dtpmod
)
2673 if (elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2675 dyn_i
->dtpmod_offset
= x
->ofs
;
2680 struct elfNN_ia64_link_hash_table
*ia64_info
;
2682 ia64_info
= elfNN_ia64_hash_table (x
->info
);
2683 if (ia64_info
->self_dtpmod_offset
== (bfd_vma
) -1)
2685 ia64_info
->self_dtpmod_offset
= x
->ofs
;
2688 dyn_i
->dtpmod_offset
= ia64_info
->self_dtpmod_offset
;
2691 if (dyn_i
->want_dtprel
)
2693 dyn_i
->dtprel_offset
= x
->ofs
;
2699 /* Next, allocate all the GOT entries used by LTOFF_FPTR relocs. */
2702 allocate_global_fptr_got (dyn_i
, data
)
2703 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2706 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2710 && elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, R_IA64_FPTRNNLSB
))
2712 dyn_i
->got_offset
= x
->ofs
;
2718 /* Lastly, allocate all the GOT entries for local data. */
2721 allocate_local_got (dyn_i
, data
)
2722 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2725 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2727 if ((dyn_i
->want_got
|| dyn_i
->want_gotx
)
2728 && !elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2730 dyn_i
->got_offset
= x
->ofs
;
2736 /* Search for the index of a global symbol in it's defining object file. */
2739 global_sym_index (h
)
2740 struct elf_link_hash_entry
*h
;
2742 struct elf_link_hash_entry
**p
;
2745 BFD_ASSERT (h
->root
.type
== bfd_link_hash_defined
2746 || h
->root
.type
== bfd_link_hash_defweak
);
2748 obj
= h
->root
.u
.def
.section
->owner
;
2749 for (p
= elf_sym_hashes (obj
); *p
!= h
; ++p
)
2752 return p
- elf_sym_hashes (obj
) + elf_tdata (obj
)->symtab_hdr
.sh_info
;
2755 /* Allocate function descriptors. We can do these for every function
2756 in a main executable that is not exported. */
2759 allocate_fptr (dyn_i
, data
)
2760 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2763 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2765 if (dyn_i
->want_fptr
)
2767 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2770 while (h
->root
.type
== bfd_link_hash_indirect
2771 || h
->root
.type
== bfd_link_hash_warning
)
2772 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2774 if (!x
->info
->executable
2776 || ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
2777 || h
->root
.type
!= bfd_link_hash_undefweak
))
2779 if (h
&& h
->dynindx
== -1)
2781 BFD_ASSERT ((h
->root
.type
== bfd_link_hash_defined
)
2782 || (h
->root
.type
== bfd_link_hash_defweak
));
2784 if (!bfd_elf_link_record_local_dynamic_symbol
2785 (x
->info
, h
->root
.u
.def
.section
->owner
,
2786 global_sym_index (h
)))
2790 dyn_i
->want_fptr
= 0;
2792 else if (h
== NULL
|| h
->dynindx
== -1)
2794 dyn_i
->fptr_offset
= x
->ofs
;
2798 dyn_i
->want_fptr
= 0;
2803 /* Allocate all the minimal PLT entries. */
2806 allocate_plt_entries (dyn_i
, data
)
2807 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2810 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2812 if (dyn_i
->want_plt
)
2814 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2817 while (h
->root
.type
== bfd_link_hash_indirect
2818 || h
->root
.type
== bfd_link_hash_warning
)
2819 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2821 /* ??? Versioned symbols seem to lose NEEDS_PLT. */
2822 if (elfNN_ia64_dynamic_symbol_p (h
, x
->info
, 0))
2824 bfd_size_type offset
= x
->ofs
;
2826 offset
= PLT_HEADER_SIZE
;
2827 dyn_i
->plt_offset
= offset
;
2828 x
->ofs
= offset
+ PLT_MIN_ENTRY_SIZE
;
2830 dyn_i
->want_pltoff
= 1;
2834 dyn_i
->want_plt
= 0;
2835 dyn_i
->want_plt2
= 0;
2841 /* Allocate all the full PLT entries. */
2844 allocate_plt2_entries (dyn_i
, data
)
2845 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2848 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2850 if (dyn_i
->want_plt2
)
2852 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2853 bfd_size_type ofs
= x
->ofs
;
2855 dyn_i
->plt2_offset
= ofs
;
2856 x
->ofs
= ofs
+ PLT_FULL_ENTRY_SIZE
;
2858 while (h
->root
.type
== bfd_link_hash_indirect
2859 || h
->root
.type
== bfd_link_hash_warning
)
2860 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2861 dyn_i
->h
->plt
.offset
= ofs
;
2866 /* Allocate all the PLTOFF entries requested by relocations and
2867 plt entries. We can't share space with allocated FPTR entries,
2868 because the latter are not necessarily addressable by the GP.
2869 ??? Relaxation might be able to determine that they are. */
2872 allocate_pltoff_entries (dyn_i
, data
)
2873 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2876 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2878 if (dyn_i
->want_pltoff
)
2880 dyn_i
->pltoff_offset
= x
->ofs
;
2886 /* Allocate dynamic relocations for those symbols that turned out
2890 allocate_dynrel_entries (dyn_i
, data
)
2891 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2894 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2895 struct elfNN_ia64_link_hash_table
*ia64_info
;
2896 struct elfNN_ia64_dyn_reloc_entry
*rent
;
2897 bfd_boolean dynamic_symbol
, shared
, resolved_zero
;
2899 ia64_info
= elfNN_ia64_hash_table (x
->info
);
2901 /* Note that this can't be used in relation to FPTR relocs below. */
2902 dynamic_symbol
= elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0);
2904 shared
= x
->info
->shared
;
2905 resolved_zero
= (dyn_i
->h
2906 && ELF_ST_VISIBILITY (dyn_i
->h
->other
)
2907 && dyn_i
->h
->root
.type
== bfd_link_hash_undefweak
);
2909 /* Take care of the GOT and PLT relocations. */
2912 && (dynamic_symbol
|| shared
)
2913 && (dyn_i
->want_got
|| dyn_i
->want_gotx
))
2914 || (dyn_i
->want_ltoff_fptr
2916 && dyn_i
->h
->dynindx
!= -1))
2918 if (!dyn_i
->want_ltoff_fptr
2921 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
2922 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
2924 if ((dynamic_symbol
|| shared
) && dyn_i
->want_tprel
)
2925 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
2926 if (dynamic_symbol
&& dyn_i
->want_dtpmod
)
2927 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
2928 if (dynamic_symbol
&& dyn_i
->want_dtprel
)
2929 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
2934 if (ia64_info
->rel_fptr_sec
&& dyn_i
->want_fptr
)
2936 if (dyn_i
->h
== NULL
|| dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
2937 ia64_info
->rel_fptr_sec
->size
+= sizeof (ElfNN_External_Rela
);
2940 if (!resolved_zero
&& dyn_i
->want_pltoff
)
2942 bfd_size_type t
= 0;
2944 /* Dynamic symbols get one IPLT relocation. Local symbols in
2945 shared libraries get two REL relocations. Local symbols in
2946 main applications get nothing. */
2948 t
= sizeof (ElfNN_External_Rela
);
2950 t
= 2 * sizeof (ElfNN_External_Rela
);
2952 ia64_info
->rel_pltoff_sec
->size
+= t
;
2955 /* Take care of the normal data relocations. */
2957 for (rent
= dyn_i
->reloc_entries
; rent
; rent
= rent
->next
)
2959 int count
= rent
->count
;
2963 case R_IA64_FPTR32LSB
:
2964 case R_IA64_FPTR64LSB
:
2965 /* Allocate one iff !want_fptr and not PIE, which by this point
2966 will be true only if we're actually allocating one statically
2967 in the main executable. Position independent executables
2968 need a relative reloc. */
2969 if (dyn_i
->want_fptr
&& !x
->info
->pie
)
2972 case R_IA64_PCREL32LSB
:
2973 case R_IA64_PCREL64LSB
:
2974 if (!dynamic_symbol
)
2977 case R_IA64_DIR32LSB
:
2978 case R_IA64_DIR64LSB
:
2979 if (!dynamic_symbol
&& !shared
)
2982 case R_IA64_IPLTLSB
:
2983 if (!dynamic_symbol
&& !shared
)
2985 /* Use two REL relocations for IPLT relocations
2986 against local symbols. */
2987 if (!dynamic_symbol
)
2990 case R_IA64_DTPREL32LSB
:
2991 case R_IA64_TPREL64LSB
:
2992 case R_IA64_DTPREL64LSB
:
2993 case R_IA64_DTPMOD64LSB
:
2999 ia64_info
->reltext
= 1;
3000 rent
->srel
->size
+= sizeof (ElfNN_External_Rela
) * count
;
3007 elfNN_ia64_adjust_dynamic_symbol (info
, h
)
3008 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
3009 struct elf_link_hash_entry
*h
;
3011 /* ??? Undefined symbols with PLT entries should be re-defined
3012 to be the PLT entry. */
3014 /* If this is a weak symbol, and there is a real definition, the
3015 processor independent code will have arranged for us to see the
3016 real definition first, and we can just use the same value. */
3017 if (h
->u
.weakdef
!= NULL
)
3019 BFD_ASSERT (h
->u
.weakdef
->root
.type
== bfd_link_hash_defined
3020 || h
->u
.weakdef
->root
.type
== bfd_link_hash_defweak
);
3021 h
->root
.u
.def
.section
= h
->u
.weakdef
->root
.u
.def
.section
;
3022 h
->root
.u
.def
.value
= h
->u
.weakdef
->root
.u
.def
.value
;
3026 /* If this is a reference to a symbol defined by a dynamic object which
3027 is not a function, we might allocate the symbol in our .dynbss section
3028 and allocate a COPY dynamic relocation.
3030 But IA-64 code is canonically PIC, so as a rule we can avoid this sort
3037 elfNN_ia64_size_dynamic_sections (output_bfd
, info
)
3038 bfd
*output_bfd ATTRIBUTE_UNUSED
;
3039 struct bfd_link_info
*info
;
3041 struct elfNN_ia64_allocate_data data
;
3042 struct elfNN_ia64_link_hash_table
*ia64_info
;
3045 bfd_boolean relplt
= FALSE
;
3047 dynobj
= elf_hash_table(info
)->dynobj
;
3048 ia64_info
= elfNN_ia64_hash_table (info
);
3049 ia64_info
->self_dtpmod_offset
= (bfd_vma
) -1;
3050 BFD_ASSERT(dynobj
!= NULL
);
3053 /* Set the contents of the .interp section to the interpreter. */
3054 if (ia64_info
->root
.dynamic_sections_created
3055 && info
->executable
)
3057 sec
= bfd_get_section_by_name (dynobj
, ".interp");
3058 BFD_ASSERT (sec
!= NULL
);
3059 sec
->contents
= (bfd_byte
*) ELF_DYNAMIC_INTERPRETER
;
3060 sec
->size
= strlen (ELF_DYNAMIC_INTERPRETER
) + 1;
3063 /* Allocate the GOT entries. */
3065 if (ia64_info
->got_sec
)
3068 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_data_got
, &data
);
3069 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_fptr_got
, &data
);
3070 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_local_got
, &data
);
3071 ia64_info
->got_sec
->size
= data
.ofs
;
3074 /* Allocate the FPTR entries. */
3076 if (ia64_info
->fptr_sec
)
3079 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_fptr
, &data
);
3080 ia64_info
->fptr_sec
->size
= data
.ofs
;
3083 /* Now that we've seen all of the input files, we can decide which
3084 symbols need plt entries. Allocate the minimal PLT entries first.
3085 We do this even though dynamic_sections_created may be FALSE, because
3086 this has the side-effect of clearing want_plt and want_plt2. */
3089 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_plt_entries
, &data
);
3091 ia64_info
->minplt_entries
= 0;
3094 ia64_info
->minplt_entries
3095 = (data
.ofs
- PLT_HEADER_SIZE
) / PLT_MIN_ENTRY_SIZE
;
3098 /* Align the pointer for the plt2 entries. */
3099 data
.ofs
= (data
.ofs
+ 31) & (bfd_vma
) -32;
3101 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_plt2_entries
, &data
);
3102 if (data
.ofs
!= 0 || ia64_info
->root
.dynamic_sections_created
)
3104 /* FIXME: we always reserve the memory for dynamic linker even if
3105 there are no PLT entries since dynamic linker may assume the
3106 reserved memory always exists. */
3108 BFD_ASSERT (ia64_info
->root
.dynamic_sections_created
);
3110 ia64_info
->plt_sec
->size
= data
.ofs
;
3112 /* If we've got a .plt, we need some extra memory for the dynamic
3113 linker. We stuff these in .got.plt. */
3114 sec
= bfd_get_section_by_name (dynobj
, ".got.plt");
3115 sec
->size
= 8 * PLT_RESERVED_WORDS
;
3118 /* Allocate the PLTOFF entries. */
3120 if (ia64_info
->pltoff_sec
)
3123 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_pltoff_entries
, &data
);
3124 ia64_info
->pltoff_sec
->size
= data
.ofs
;
3127 if (ia64_info
->root
.dynamic_sections_created
)
3129 /* Allocate space for the dynamic relocations that turned out to be
3132 if (info
->shared
&& ia64_info
->self_dtpmod_offset
!= (bfd_vma
) -1)
3133 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
3134 data
.only_got
= FALSE
;
3135 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_dynrel_entries
, &data
);
3138 /* We have now determined the sizes of the various dynamic sections.
3139 Allocate memory for them. */
3140 for (sec
= dynobj
->sections
; sec
!= NULL
; sec
= sec
->next
)
3144 if (!(sec
->flags
& SEC_LINKER_CREATED
))
3147 /* If we don't need this section, strip it from the output file.
3148 There were several sections primarily related to dynamic
3149 linking that must be create before the linker maps input
3150 sections to output sections. The linker does that before
3151 bfd_elf_size_dynamic_sections is called, and it is that
3152 function which decides whether anything needs to go into
3155 strip
= (sec
->size
== 0);
3157 if (sec
== ia64_info
->got_sec
)
3159 else if (sec
== ia64_info
->rel_got_sec
)
3162 ia64_info
->rel_got_sec
= NULL
;
3164 /* We use the reloc_count field as a counter if we need to
3165 copy relocs into the output file. */
3166 sec
->reloc_count
= 0;
3168 else if (sec
== ia64_info
->fptr_sec
)
3171 ia64_info
->fptr_sec
= NULL
;
3173 else if (sec
== ia64_info
->rel_fptr_sec
)
3176 ia64_info
->rel_fptr_sec
= NULL
;
3178 /* We use the reloc_count field as a counter if we need to
3179 copy relocs into the output file. */
3180 sec
->reloc_count
= 0;
3182 else if (sec
== ia64_info
->plt_sec
)
3185 ia64_info
->plt_sec
= NULL
;
3187 else if (sec
== ia64_info
->pltoff_sec
)
3190 ia64_info
->pltoff_sec
= NULL
;
3192 else if (sec
== ia64_info
->rel_pltoff_sec
)
3195 ia64_info
->rel_pltoff_sec
= NULL
;
3199 /* We use the reloc_count field as a counter if we need to
3200 copy relocs into the output file. */
3201 sec
->reloc_count
= 0;
3208 /* It's OK to base decisions on the section name, because none
3209 of the dynobj section names depend upon the input files. */
3210 name
= bfd_get_section_name (dynobj
, sec
);
3212 if (strcmp (name
, ".got.plt") == 0)
3214 else if (strncmp (name
, ".rel", 4) == 0)
3218 /* We use the reloc_count field as a counter if we need to
3219 copy relocs into the output file. */
3220 sec
->reloc_count
= 0;
3228 sec
->flags
|= SEC_EXCLUDE
;
3231 /* Allocate memory for the section contents. */
3232 sec
->contents
= (bfd_byte
*) bfd_zalloc (dynobj
, sec
->size
);
3233 if (sec
->contents
== NULL
&& sec
->size
!= 0)
3238 if (elf_hash_table (info
)->dynamic_sections_created
)
3240 /* Add some entries to the .dynamic section. We fill in the values
3241 later (in finish_dynamic_sections) but we must add the entries now
3242 so that we get the correct size for the .dynamic section. */
3244 if (info
->executable
)
3246 /* The DT_DEBUG entry is filled in by the dynamic linker and used
3248 #define add_dynamic_entry(TAG, VAL) \
3249 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
3251 if (!add_dynamic_entry (DT_DEBUG
, 0))
3255 if (!add_dynamic_entry (DT_IA_64_PLT_RESERVE
, 0))
3257 if (!add_dynamic_entry (DT_PLTGOT
, 0))
3262 if (!add_dynamic_entry (DT_PLTRELSZ
, 0)
3263 || !add_dynamic_entry (DT_PLTREL
, DT_RELA
)
3264 || !add_dynamic_entry (DT_JMPREL
, 0))
3268 if (!add_dynamic_entry (DT_RELA
, 0)
3269 || !add_dynamic_entry (DT_RELASZ
, 0)
3270 || !add_dynamic_entry (DT_RELAENT
, sizeof (ElfNN_External_Rela
)))
3273 if (ia64_info
->reltext
)
3275 if (!add_dynamic_entry (DT_TEXTREL
, 0))
3277 info
->flags
|= DF_TEXTREL
;
3281 /* ??? Perhaps force __gp local. */
3286 static bfd_reloc_status_type
3287 elfNN_ia64_install_value (hit_addr
, v
, r_type
)
3290 unsigned int r_type
;
3292 const struct ia64_operand
*op
;
3293 int bigendian
= 0, shift
= 0;
3294 bfd_vma t0
, t1
, dword
;
3296 enum ia64_opnd opnd
;
3299 #ifdef BFD_HOST_U_64_BIT
3300 BFD_HOST_U_64_BIT val
= (BFD_HOST_U_64_BIT
) v
;
3305 opnd
= IA64_OPND_NIL
;
3310 return bfd_reloc_ok
;
3312 /* Instruction relocations. */
3315 case R_IA64_TPREL14
:
3316 case R_IA64_DTPREL14
:
3317 opnd
= IA64_OPND_IMM14
;
3320 case R_IA64_PCREL21F
: opnd
= IA64_OPND_TGT25
; break;
3321 case R_IA64_PCREL21M
: opnd
= IA64_OPND_TGT25b
; break;
3322 case R_IA64_PCREL60B
: opnd
= IA64_OPND_TGT64
; break;
3323 case R_IA64_PCREL21B
:
3324 case R_IA64_PCREL21BI
:
3325 opnd
= IA64_OPND_TGT25c
;
3329 case R_IA64_GPREL22
:
3330 case R_IA64_LTOFF22
:
3331 case R_IA64_LTOFF22X
:
3332 case R_IA64_PLTOFF22
:
3333 case R_IA64_PCREL22
:
3334 case R_IA64_LTOFF_FPTR22
:
3335 case R_IA64_TPREL22
:
3336 case R_IA64_DTPREL22
:
3337 case R_IA64_LTOFF_TPREL22
:
3338 case R_IA64_LTOFF_DTPMOD22
:
3339 case R_IA64_LTOFF_DTPREL22
:
3340 opnd
= IA64_OPND_IMM22
;
3344 case R_IA64_GPREL64I
:
3345 case R_IA64_LTOFF64I
:
3346 case R_IA64_PLTOFF64I
:
3347 case R_IA64_PCREL64I
:
3348 case R_IA64_FPTR64I
:
3349 case R_IA64_LTOFF_FPTR64I
:
3350 case R_IA64_TPREL64I
:
3351 case R_IA64_DTPREL64I
:
3352 opnd
= IA64_OPND_IMMU64
;
3355 /* Data relocations. */
3357 case R_IA64_DIR32MSB
:
3358 case R_IA64_GPREL32MSB
:
3359 case R_IA64_FPTR32MSB
:
3360 case R_IA64_PCREL32MSB
:
3361 case R_IA64_LTOFF_FPTR32MSB
:
3362 case R_IA64_SEGREL32MSB
:
3363 case R_IA64_SECREL32MSB
:
3364 case R_IA64_LTV32MSB
:
3365 case R_IA64_DTPREL32MSB
:
3366 size
= 4; bigendian
= 1;
3369 case R_IA64_DIR32LSB
:
3370 case R_IA64_GPREL32LSB
:
3371 case R_IA64_FPTR32LSB
:
3372 case R_IA64_PCREL32LSB
:
3373 case R_IA64_LTOFF_FPTR32LSB
:
3374 case R_IA64_SEGREL32LSB
:
3375 case R_IA64_SECREL32LSB
:
3376 case R_IA64_LTV32LSB
:
3377 case R_IA64_DTPREL32LSB
:
3378 size
= 4; bigendian
= 0;
3381 case R_IA64_DIR64MSB
:
3382 case R_IA64_GPREL64MSB
:
3383 case R_IA64_PLTOFF64MSB
:
3384 case R_IA64_FPTR64MSB
:
3385 case R_IA64_PCREL64MSB
:
3386 case R_IA64_LTOFF_FPTR64MSB
:
3387 case R_IA64_SEGREL64MSB
:
3388 case R_IA64_SECREL64MSB
:
3389 case R_IA64_LTV64MSB
:
3390 case R_IA64_TPREL64MSB
:
3391 case R_IA64_DTPMOD64MSB
:
3392 case R_IA64_DTPREL64MSB
:
3393 size
= 8; bigendian
= 1;
3396 case R_IA64_DIR64LSB
:
3397 case R_IA64_GPREL64LSB
:
3398 case R_IA64_PLTOFF64LSB
:
3399 case R_IA64_FPTR64LSB
:
3400 case R_IA64_PCREL64LSB
:
3401 case R_IA64_LTOFF_FPTR64LSB
:
3402 case R_IA64_SEGREL64LSB
:
3403 case R_IA64_SECREL64LSB
:
3404 case R_IA64_LTV64LSB
:
3405 case R_IA64_TPREL64LSB
:
3406 case R_IA64_DTPMOD64LSB
:
3407 case R_IA64_DTPREL64LSB
:
3408 size
= 8; bigendian
= 0;
3411 /* Unsupported / Dynamic relocations. */
3413 return bfd_reloc_notsupported
;
3418 case IA64_OPND_IMMU64
:
3419 hit_addr
-= (long) hit_addr
& 0x3;
3420 t0
= bfd_getl64 (hit_addr
);
3421 t1
= bfd_getl64 (hit_addr
+ 8);
3423 /* tmpl/s: bits 0.. 5 in t0
3424 slot 0: bits 5..45 in t0
3425 slot 1: bits 46..63 in t0, bits 0..22 in t1
3426 slot 2: bits 23..63 in t1 */
3428 /* First, clear the bits that form the 64 bit constant. */
3429 t0
&= ~(0x3ffffLL
<< 46);
3431 | (( (0x07fLL
<< 13) | (0x1ffLL
<< 27)
3432 | (0x01fLL
<< 22) | (0x001LL
<< 21)
3433 | (0x001LL
<< 36)) << 23));
3435 t0
|= ((val
>> 22) & 0x03ffffLL
) << 46; /* 18 lsbs of imm41 */
3436 t1
|= ((val
>> 40) & 0x7fffffLL
) << 0; /* 23 msbs of imm41 */
3437 t1
|= ( (((val
>> 0) & 0x07f) << 13) /* imm7b */
3438 | (((val
>> 7) & 0x1ff) << 27) /* imm9d */
3439 | (((val
>> 16) & 0x01f) << 22) /* imm5c */
3440 | (((val
>> 21) & 0x001) << 21) /* ic */
3441 | (((val
>> 63) & 0x001) << 36)) << 23; /* i */
3443 bfd_putl64 (t0
, hit_addr
);
3444 bfd_putl64 (t1
, hit_addr
+ 8);
3447 case IA64_OPND_TGT64
:
3448 hit_addr
-= (long) hit_addr
& 0x3;
3449 t0
= bfd_getl64 (hit_addr
);
3450 t1
= bfd_getl64 (hit_addr
+ 8);
3452 /* tmpl/s: bits 0.. 5 in t0
3453 slot 0: bits 5..45 in t0
3454 slot 1: bits 46..63 in t0, bits 0..22 in t1
3455 slot 2: bits 23..63 in t1 */
3457 /* First, clear the bits that form the 64 bit constant. */
3458 t0
&= ~(0x3ffffLL
<< 46);
3460 | ((1LL << 36 | 0xfffffLL
<< 13) << 23));
3463 t0
|= ((val
>> 20) & 0xffffLL
) << 2 << 46; /* 16 lsbs of imm39 */
3464 t1
|= ((val
>> 36) & 0x7fffffLL
) << 0; /* 23 msbs of imm39 */
3465 t1
|= ((((val
>> 0) & 0xfffffLL
) << 13) /* imm20b */
3466 | (((val
>> 59) & 0x1LL
) << 36)) << 23; /* i */
3468 bfd_putl64 (t0
, hit_addr
);
3469 bfd_putl64 (t1
, hit_addr
+ 8);
3473 switch ((long) hit_addr
& 0x3)
3475 case 0: shift
= 5; break;
3476 case 1: shift
= 14; hit_addr
+= 3; break;
3477 case 2: shift
= 23; hit_addr
+= 6; break;
3478 case 3: return bfd_reloc_notsupported
; /* shouldn't happen... */
3480 dword
= bfd_getl64 (hit_addr
);
3481 insn
= (dword
>> shift
) & 0x1ffffffffffLL
;
3483 op
= elf64_ia64_operands
+ opnd
;
3484 err
= (*op
->insert
) (op
, val
, &insn
);
3486 return bfd_reloc_overflow
;
3488 dword
&= ~(0x1ffffffffffLL
<< shift
);
3489 dword
|= (insn
<< shift
);
3490 bfd_putl64 (dword
, hit_addr
);
3494 /* A data relocation. */
3497 bfd_putb32 (val
, hit_addr
);
3499 bfd_putb64 (val
, hit_addr
);
3502 bfd_putl32 (val
, hit_addr
);
3504 bfd_putl64 (val
, hit_addr
);
3508 return bfd_reloc_ok
;
3512 elfNN_ia64_install_dyn_reloc (abfd
, info
, sec
, srel
, offset
, type
,
3515 struct bfd_link_info
*info
;
3523 Elf_Internal_Rela outrel
;
3526 BFD_ASSERT (dynindx
!= -1);
3527 outrel
.r_info
= ELFNN_R_INFO (dynindx
, type
);
3528 outrel
.r_addend
= addend
;
3529 outrel
.r_offset
= _bfd_elf_section_offset (abfd
, info
, sec
, offset
);
3530 if (outrel
.r_offset
>= (bfd_vma
) -2)
3532 /* Run for the hills. We shouldn't be outputting a relocation
3533 for this. So do what everyone else does and output a no-op. */
3534 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
3535 outrel
.r_addend
= 0;
3536 outrel
.r_offset
= 0;
3539 outrel
.r_offset
+= sec
->output_section
->vma
+ sec
->output_offset
;
3541 loc
= srel
->contents
;
3542 loc
+= srel
->reloc_count
++ * sizeof (ElfNN_External_Rela
);
3543 bfd_elfNN_swap_reloca_out (abfd
, &outrel
, loc
);
3544 BFD_ASSERT (sizeof (ElfNN_External_Rela
) * srel
->reloc_count
<= srel
->size
);
3547 /* Store an entry for target address TARGET_ADDR in the linkage table
3548 and return the gp-relative address of the linkage table entry. */
3551 set_got_entry (abfd
, info
, dyn_i
, dynindx
, addend
, value
, dyn_r_type
)
3553 struct bfd_link_info
*info
;
3554 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3558 unsigned int dyn_r_type
;
3560 struct elfNN_ia64_link_hash_table
*ia64_info
;
3565 ia64_info
= elfNN_ia64_hash_table (info
);
3566 got_sec
= ia64_info
->got_sec
;
3570 case R_IA64_TPREL64LSB
:
3571 done
= dyn_i
->tprel_done
;
3572 dyn_i
->tprel_done
= TRUE
;
3573 got_offset
= dyn_i
->tprel_offset
;
3575 case R_IA64_DTPMOD64LSB
:
3576 if (dyn_i
->dtpmod_offset
!= ia64_info
->self_dtpmod_offset
)
3578 done
= dyn_i
->dtpmod_done
;
3579 dyn_i
->dtpmod_done
= TRUE
;
3583 done
= ia64_info
->self_dtpmod_done
;
3584 ia64_info
->self_dtpmod_done
= TRUE
;
3587 got_offset
= dyn_i
->dtpmod_offset
;
3589 case R_IA64_DTPREL32LSB
:
3590 case R_IA64_DTPREL64LSB
:
3591 done
= dyn_i
->dtprel_done
;
3592 dyn_i
->dtprel_done
= TRUE
;
3593 got_offset
= dyn_i
->dtprel_offset
;
3596 done
= dyn_i
->got_done
;
3597 dyn_i
->got_done
= TRUE
;
3598 got_offset
= dyn_i
->got_offset
;
3602 BFD_ASSERT ((got_offset
& 7) == 0);
3606 /* Store the target address in the linkage table entry. */
3607 bfd_put_64 (abfd
, value
, got_sec
->contents
+ got_offset
);
3609 /* Install a dynamic relocation if needed. */
3612 || ELF_ST_VISIBILITY (dyn_i
->h
->other
) == STV_DEFAULT
3613 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
3614 && dyn_r_type
!= R_IA64_DTPREL32LSB
3615 && dyn_r_type
!= R_IA64_DTPREL64LSB
)
3616 || elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, info
, dyn_r_type
)
3618 && (dyn_r_type
== R_IA64_FPTR32LSB
3619 || dyn_r_type
== R_IA64_FPTR64LSB
)))
3620 && (!dyn_i
->want_ltoff_fptr
3623 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
))
3626 && dyn_r_type
!= R_IA64_TPREL64LSB
3627 && dyn_r_type
!= R_IA64_DTPMOD64LSB
3628 && dyn_r_type
!= R_IA64_DTPREL32LSB
3629 && dyn_r_type
!= R_IA64_DTPREL64LSB
)
3631 dyn_r_type
= R_IA64_RELNNLSB
;
3636 if (bfd_big_endian (abfd
))
3640 case R_IA64_REL32LSB
:
3641 dyn_r_type
= R_IA64_REL32MSB
;
3643 case R_IA64_DIR32LSB
:
3644 dyn_r_type
= R_IA64_DIR32MSB
;
3646 case R_IA64_FPTR32LSB
:
3647 dyn_r_type
= R_IA64_FPTR32MSB
;
3649 case R_IA64_DTPREL32LSB
:
3650 dyn_r_type
= R_IA64_DTPREL32MSB
;
3652 case R_IA64_REL64LSB
:
3653 dyn_r_type
= R_IA64_REL64MSB
;
3655 case R_IA64_DIR64LSB
:
3656 dyn_r_type
= R_IA64_DIR64MSB
;
3658 case R_IA64_FPTR64LSB
:
3659 dyn_r_type
= R_IA64_FPTR64MSB
;
3661 case R_IA64_TPREL64LSB
:
3662 dyn_r_type
= R_IA64_TPREL64MSB
;
3664 case R_IA64_DTPMOD64LSB
:
3665 dyn_r_type
= R_IA64_DTPMOD64MSB
;
3667 case R_IA64_DTPREL64LSB
:
3668 dyn_r_type
= R_IA64_DTPREL64MSB
;
3676 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, got_sec
,
3677 ia64_info
->rel_got_sec
,
3678 got_offset
, dyn_r_type
,
3683 /* Return the address of the linkage table entry. */
3684 value
= (got_sec
->output_section
->vma
3685 + got_sec
->output_offset
3691 /* Fill in a function descriptor consisting of the function's code
3692 address and its global pointer. Return the descriptor's address. */
3695 set_fptr_entry (abfd
, info
, dyn_i
, value
)
3697 struct bfd_link_info
*info
;
3698 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3701 struct elfNN_ia64_link_hash_table
*ia64_info
;
3704 ia64_info
= elfNN_ia64_hash_table (info
);
3705 fptr_sec
= ia64_info
->fptr_sec
;
3707 if (!dyn_i
->fptr_done
)
3709 dyn_i
->fptr_done
= 1;
3711 /* Fill in the function descriptor. */
3712 bfd_put_64 (abfd
, value
, fptr_sec
->contents
+ dyn_i
->fptr_offset
);
3713 bfd_put_64 (abfd
, _bfd_get_gp_value (abfd
),
3714 fptr_sec
->contents
+ dyn_i
->fptr_offset
+ 8);
3715 if (ia64_info
->rel_fptr_sec
)
3717 Elf_Internal_Rela outrel
;
3720 if (bfd_little_endian (abfd
))
3721 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_IPLTLSB
);
3723 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_IPLTMSB
);
3724 outrel
.r_addend
= value
;
3725 outrel
.r_offset
= (fptr_sec
->output_section
->vma
3726 + fptr_sec
->output_offset
3727 + dyn_i
->fptr_offset
);
3728 loc
= ia64_info
->rel_fptr_sec
->contents
;
3729 loc
+= ia64_info
->rel_fptr_sec
->reloc_count
++
3730 * sizeof (ElfNN_External_Rela
);
3731 bfd_elfNN_swap_reloca_out (abfd
, &outrel
, loc
);
3735 /* Return the descriptor's address. */
3736 value
= (fptr_sec
->output_section
->vma
3737 + fptr_sec
->output_offset
3738 + dyn_i
->fptr_offset
);
3743 /* Fill in a PLTOFF entry consisting of the function's code address
3744 and its global pointer. Return the descriptor's address. */
3747 set_pltoff_entry (abfd
, info
, dyn_i
, value
, is_plt
)
3749 struct bfd_link_info
*info
;
3750 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3754 struct elfNN_ia64_link_hash_table
*ia64_info
;
3755 asection
*pltoff_sec
;
3757 ia64_info
= elfNN_ia64_hash_table (info
);
3758 pltoff_sec
= ia64_info
->pltoff_sec
;
3760 /* Don't do anything if this symbol uses a real PLT entry. In
3761 that case, we'll fill this in during finish_dynamic_symbol. */
3762 if ((! dyn_i
->want_plt
|| is_plt
)
3763 && !dyn_i
->pltoff_done
)
3765 bfd_vma gp
= _bfd_get_gp_value (abfd
);
3767 /* Fill in the function descriptor. */
3768 bfd_put_64 (abfd
, value
, pltoff_sec
->contents
+ dyn_i
->pltoff_offset
);
3769 bfd_put_64 (abfd
, gp
, pltoff_sec
->contents
+ dyn_i
->pltoff_offset
+ 8);
3771 /* Install dynamic relocations if needed. */
3775 || ELF_ST_VISIBILITY (dyn_i
->h
->other
) == STV_DEFAULT
3776 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
))
3778 unsigned int dyn_r_type
;
3780 if (bfd_big_endian (abfd
))
3781 dyn_r_type
= R_IA64_RELNNMSB
;
3783 dyn_r_type
= R_IA64_RELNNLSB
;
3785 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, pltoff_sec
,
3786 ia64_info
->rel_pltoff_sec
,
3787 dyn_i
->pltoff_offset
,
3788 dyn_r_type
, 0, value
);
3789 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, pltoff_sec
,
3790 ia64_info
->rel_pltoff_sec
,
3791 dyn_i
->pltoff_offset
+ ARCH_SIZE
/ 8,
3795 dyn_i
->pltoff_done
= 1;
3798 /* Return the descriptor's address. */
3799 value
= (pltoff_sec
->output_section
->vma
3800 + pltoff_sec
->output_offset
3801 + dyn_i
->pltoff_offset
);
3806 /* Return the base VMA address which should be subtracted from real addresses
3807 when resolving @tprel() relocation.
3808 Main program TLS (whose template starts at PT_TLS p_vaddr)
3809 is assigned offset round(2 * size of pointer, PT_TLS p_align). */
3812 elfNN_ia64_tprel_base (info
)
3813 struct bfd_link_info
*info
;
3815 asection
*tls_sec
= elf_hash_table (info
)->tls_sec
;
3817 BFD_ASSERT (tls_sec
!= NULL
);
3818 return tls_sec
->vma
- align_power ((bfd_vma
) ARCH_SIZE
/ 4,
3819 tls_sec
->alignment_power
);
3822 /* Return the base VMA address which should be subtracted from real addresses
3823 when resolving @dtprel() relocation.
3824 This is PT_TLS segment p_vaddr. */
3827 elfNN_ia64_dtprel_base (info
)
3828 struct bfd_link_info
*info
;
3830 BFD_ASSERT (elf_hash_table (info
)->tls_sec
!= NULL
);
3831 return elf_hash_table (info
)->tls_sec
->vma
;
3834 /* Called through qsort to sort the .IA_64.unwind section during a
3835 non-relocatable link. Set elfNN_ia64_unwind_entry_compare_bfd
3836 to the output bfd so we can do proper endianness frobbing. */
3838 static bfd
*elfNN_ia64_unwind_entry_compare_bfd
;
3841 elfNN_ia64_unwind_entry_compare (a
, b
)
3847 av
= bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd
, a
);
3848 bv
= bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd
, b
);
3850 return (av
< bv
? -1 : av
> bv
? 1 : 0);
3853 /* Make sure we've got ourselves a nice fat __gp value. */
3855 elfNN_ia64_choose_gp (abfd
, info
)
3857 struct bfd_link_info
*info
;
3859 bfd_vma min_vma
= (bfd_vma
) -1, max_vma
= 0;
3860 bfd_vma min_short_vma
= min_vma
, max_short_vma
= 0;
3861 struct elf_link_hash_entry
*gp
;
3864 struct elfNN_ia64_link_hash_table
*ia64_info
;
3866 ia64_info
= elfNN_ia64_hash_table (info
);
3868 /* Find the min and max vma of all sections marked short. Also collect
3869 min and max vma of any type, for use in selecting a nice gp. */
3870 for (os
= abfd
->sections
; os
; os
= os
->next
)
3874 if ((os
->flags
& SEC_ALLOC
) == 0)
3878 hi
= os
->vma
+ os
->size
;
3886 if (os
->flags
& SEC_SMALL_DATA
)
3888 if (min_short_vma
> lo
)
3890 if (max_short_vma
< hi
)
3895 /* See if the user wants to force a value. */
3896 gp
= elf_link_hash_lookup (elf_hash_table (info
), "__gp", FALSE
,
3900 && (gp
->root
.type
== bfd_link_hash_defined
3901 || gp
->root
.type
== bfd_link_hash_defweak
))
3903 asection
*gp_sec
= gp
->root
.u
.def
.section
;
3904 gp_val
= (gp
->root
.u
.def
.value
3905 + gp_sec
->output_section
->vma
3906 + gp_sec
->output_offset
);
3910 /* Pick a sensible value. */
3912 asection
*got_sec
= ia64_info
->got_sec
;
3914 /* Start with just the address of the .got. */
3916 gp_val
= got_sec
->output_section
->vma
;
3917 else if (max_short_vma
!= 0)
3918 gp_val
= min_short_vma
;
3922 /* If it is possible to address the entire image, but we
3923 don't with the choice above, adjust. */
3924 if (max_vma
- min_vma
< 0x400000
3925 && max_vma
- gp_val
<= 0x200000
3926 && gp_val
- min_vma
> 0x200000)
3927 gp_val
= min_vma
+ 0x200000;
3928 else if (max_short_vma
!= 0)
3930 /* If we don't cover all the short data, adjust. */
3931 if (max_short_vma
- gp_val
>= 0x200000)
3932 gp_val
= min_short_vma
+ 0x200000;
3934 /* If we're addressing stuff past the end, adjust back. */
3935 if (gp_val
> max_vma
)
3936 gp_val
= max_vma
- 0x200000 + 8;
3940 /* Validate whether all SHF_IA_64_SHORT sections are within
3941 range of the chosen GP. */
3943 if (max_short_vma
!= 0)
3945 if (max_short_vma
- min_short_vma
>= 0x400000)
3947 (*_bfd_error_handler
)
3948 (_("%s: short data segment overflowed (0x%lx >= 0x400000)"),
3949 bfd_get_filename (abfd
),
3950 (unsigned long) (max_short_vma
- min_short_vma
));
3953 else if ((gp_val
> min_short_vma
3954 && gp_val
- min_short_vma
> 0x200000)
3955 || (gp_val
< max_short_vma
3956 && max_short_vma
- gp_val
>= 0x200000))
3958 (*_bfd_error_handler
)
3959 (_("%s: __gp does not cover short data segment"),
3960 bfd_get_filename (abfd
));
3965 _bfd_set_gp_value (abfd
, gp_val
);
3971 elfNN_ia64_final_link (abfd
, info
)
3973 struct bfd_link_info
*info
;
3975 struct elfNN_ia64_link_hash_table
*ia64_info
;
3976 asection
*unwind_output_sec
;
3978 ia64_info
= elfNN_ia64_hash_table (info
);
3980 /* Make sure we've got ourselves a nice fat __gp value. */
3981 if (!info
->relocatable
)
3983 bfd_vma gp_val
= _bfd_get_gp_value (abfd
);
3984 struct elf_link_hash_entry
*gp
;
3988 if (! elfNN_ia64_choose_gp (abfd
, info
))
3990 gp_val
= _bfd_get_gp_value (abfd
);
3993 gp
= elf_link_hash_lookup (elf_hash_table (info
), "__gp", FALSE
,
3997 gp
->root
.type
= bfd_link_hash_defined
;
3998 gp
->root
.u
.def
.value
= gp_val
;
3999 gp
->root
.u
.def
.section
= bfd_abs_section_ptr
;
4003 /* If we're producing a final executable, we need to sort the contents
4004 of the .IA_64.unwind section. Force this section to be relocated
4005 into memory rather than written immediately to the output file. */
4006 unwind_output_sec
= NULL
;
4007 if (!info
->relocatable
)
4009 asection
*s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_unwind
);
4012 unwind_output_sec
= s
->output_section
;
4013 unwind_output_sec
->contents
4014 = bfd_malloc (unwind_output_sec
->size
);
4015 if (unwind_output_sec
->contents
== NULL
)
4020 /* Invoke the regular ELF backend linker to do all the work. */
4021 if (!bfd_elf_final_link (abfd
, info
))
4024 if (unwind_output_sec
)
4026 elfNN_ia64_unwind_entry_compare_bfd
= abfd
;
4027 qsort (unwind_output_sec
->contents
,
4028 (size_t) (unwind_output_sec
->size
/ 24),
4030 elfNN_ia64_unwind_entry_compare
);
4032 if (! bfd_set_section_contents (abfd
, unwind_output_sec
,
4033 unwind_output_sec
->contents
, (bfd_vma
) 0,
4034 unwind_output_sec
->size
))
4042 elfNN_ia64_relocate_section (output_bfd
, info
, input_bfd
, input_section
,
4043 contents
, relocs
, local_syms
, local_sections
)
4045 struct bfd_link_info
*info
;
4047 asection
*input_section
;
4049 Elf_Internal_Rela
*relocs
;
4050 Elf_Internal_Sym
*local_syms
;
4051 asection
**local_sections
;
4053 struct elfNN_ia64_link_hash_table
*ia64_info
;
4054 Elf_Internal_Shdr
*symtab_hdr
;
4055 Elf_Internal_Rela
*rel
;
4056 Elf_Internal_Rela
*relend
;
4058 bfd_boolean ret_val
= TRUE
; /* for non-fatal errors */
4061 symtab_hdr
= &elf_tdata (input_bfd
)->symtab_hdr
;
4062 ia64_info
= elfNN_ia64_hash_table (info
);
4064 /* Infect various flags from the input section to the output section. */
4065 if (info
->relocatable
)
4069 flags
= elf_section_data(input_section
)->this_hdr
.sh_flags
;
4070 flags
&= SHF_IA_64_NORECOV
;
4072 elf_section_data(input_section
->output_section
)
4073 ->this_hdr
.sh_flags
|= flags
;
4077 gp_val
= _bfd_get_gp_value (output_bfd
);
4078 srel
= get_reloc_section (input_bfd
, ia64_info
, input_section
, FALSE
);
4081 relend
= relocs
+ input_section
->reloc_count
;
4082 for (; rel
< relend
; ++rel
)
4084 struct elf_link_hash_entry
*h
;
4085 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
4086 bfd_reloc_status_type r
;
4087 reloc_howto_type
*howto
;
4088 unsigned long r_symndx
;
4089 Elf_Internal_Sym
*sym
;
4090 unsigned int r_type
;
4094 bfd_boolean dynamic_symbol_p
;
4095 bfd_boolean undef_weak_ref
;
4097 r_type
= ELFNN_R_TYPE (rel
->r_info
);
4098 if (r_type
> R_IA64_MAX_RELOC_CODE
)
4100 (*_bfd_error_handler
)
4101 (_("%B: unknown relocation type %d"),
4102 input_bfd
, (int) r_type
);
4103 bfd_set_error (bfd_error_bad_value
);
4108 howto
= lookup_howto (r_type
);
4109 r_symndx
= ELFNN_R_SYM (rel
->r_info
);
4113 undef_weak_ref
= FALSE
;
4115 if (r_symndx
< symtab_hdr
->sh_info
)
4117 /* Reloc against local symbol. */
4119 sym
= local_syms
+ r_symndx
;
4120 sym_sec
= local_sections
[r_symndx
];
4122 value
= _bfd_elf_rela_local_sym (output_bfd
, sym
, &msec
, rel
);
4123 if ((sym_sec
->flags
& SEC_MERGE
)
4124 && ELF_ST_TYPE (sym
->st_info
) == STT_SECTION
4125 && sym_sec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
4127 struct elfNN_ia64_local_hash_entry
*loc_h
;
4129 loc_h
= get_local_sym_hash (ia64_info
, input_bfd
, rel
, FALSE
);
4130 if (loc_h
&& ! loc_h
->sec_merge_done
)
4132 struct elfNN_ia64_dyn_sym_info
*dynent
;
4134 for (dynent
= loc_h
->info
; dynent
; dynent
= dynent
->next
)
4138 _bfd_merged_section_offset (output_bfd
, &msec
,
4139 elf_section_data (msec
)->
4143 dynent
->addend
-= sym
->st_value
;
4144 dynent
->addend
+= msec
->output_section
->vma
4145 + msec
->output_offset
4146 - sym_sec
->output_section
->vma
4147 - sym_sec
->output_offset
;
4149 loc_h
->sec_merge_done
= 1;
4155 bfd_boolean unresolved_reloc
;
4157 struct elf_link_hash_entry
**sym_hashes
= elf_sym_hashes (input_bfd
);
4159 RELOC_FOR_GLOBAL_SYMBOL (info
, input_bfd
, input_section
, rel
,
4160 r_symndx
, symtab_hdr
, sym_hashes
,
4162 unresolved_reloc
, warned
);
4164 if (h
->root
.type
== bfd_link_hash_undefweak
)
4165 undef_weak_ref
= TRUE
;
4170 hit_addr
= contents
+ rel
->r_offset
;
4171 value
+= rel
->r_addend
;
4172 dynamic_symbol_p
= elfNN_ia64_dynamic_symbol_p (h
, info
, r_type
);
4183 case R_IA64_DIR32MSB
:
4184 case R_IA64_DIR32LSB
:
4185 case R_IA64_DIR64MSB
:
4186 case R_IA64_DIR64LSB
:
4187 /* Install a dynamic relocation for this reloc. */
4188 if ((dynamic_symbol_p
|| info
->shared
)
4190 && (input_section
->flags
& SEC_ALLOC
) != 0)
4192 unsigned int dyn_r_type
;
4196 BFD_ASSERT (srel
!= NULL
);
4203 /* ??? People shouldn't be doing non-pic code in
4204 shared libraries nor dynamic executables. */
4205 (*_bfd_error_handler
)
4206 (_("%B: non-pic code with imm relocation against dynamic symbol `%s'"),
4208 h
? h
->root
.root
.string
4209 : bfd_elf_sym_name (input_bfd
, symtab_hdr
, sym
,
4218 /* If we don't need dynamic symbol lookup, find a
4219 matching RELATIVE relocation. */
4220 dyn_r_type
= r_type
;
4221 if (dynamic_symbol_p
)
4223 dynindx
= h
->dynindx
;
4224 addend
= rel
->r_addend
;
4231 case R_IA64_DIR32MSB
:
4232 dyn_r_type
= R_IA64_REL32MSB
;
4234 case R_IA64_DIR32LSB
:
4235 dyn_r_type
= R_IA64_REL32LSB
;
4237 case R_IA64_DIR64MSB
:
4238 dyn_r_type
= R_IA64_REL64MSB
;
4240 case R_IA64_DIR64LSB
:
4241 dyn_r_type
= R_IA64_REL64LSB
;
4251 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4252 srel
, rel
->r_offset
, dyn_r_type
,
4257 case R_IA64_LTV32MSB
:
4258 case R_IA64_LTV32LSB
:
4259 case R_IA64_LTV64MSB
:
4260 case R_IA64_LTV64LSB
:
4261 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4264 case R_IA64_GPREL22
:
4265 case R_IA64_GPREL64I
:
4266 case R_IA64_GPREL32MSB
:
4267 case R_IA64_GPREL32LSB
:
4268 case R_IA64_GPREL64MSB
:
4269 case R_IA64_GPREL64LSB
:
4270 if (dynamic_symbol_p
)
4272 (*_bfd_error_handler
)
4273 (_("%B: @gprel relocation against dynamic symbol %s"),
4275 h
? h
->root
.root
.string
4276 : bfd_elf_sym_name (input_bfd
, symtab_hdr
, sym
,
4282 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4285 case R_IA64_LTOFF22
:
4286 case R_IA64_LTOFF22X
:
4287 case R_IA64_LTOFF64I
:
4288 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4289 value
= set_got_entry (input_bfd
, info
, dyn_i
, (h
? h
->dynindx
: -1),
4290 rel
->r_addend
, value
, R_IA64_DIRNNLSB
);
4292 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4295 case R_IA64_PLTOFF22
:
4296 case R_IA64_PLTOFF64I
:
4297 case R_IA64_PLTOFF64MSB
:
4298 case R_IA64_PLTOFF64LSB
:
4299 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4300 value
= set_pltoff_entry (output_bfd
, info
, dyn_i
, value
, FALSE
);
4302 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4305 case R_IA64_FPTR64I
:
4306 case R_IA64_FPTR32MSB
:
4307 case R_IA64_FPTR32LSB
:
4308 case R_IA64_FPTR64MSB
:
4309 case R_IA64_FPTR64LSB
:
4310 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4311 if (dyn_i
->want_fptr
)
4313 if (!undef_weak_ref
)
4314 value
= set_fptr_entry (output_bfd
, info
, dyn_i
, value
);
4316 if (!dyn_i
->want_fptr
|| info
->pie
)
4319 unsigned int dyn_r_type
= r_type
;
4320 bfd_vma addend
= rel
->r_addend
;
4322 /* Otherwise, we expect the dynamic linker to create
4325 if (dyn_i
->want_fptr
)
4327 if (r_type
== R_IA64_FPTR64I
)
4329 /* We can't represent this without a dynamic symbol.
4330 Adjust the relocation to be against an output
4331 section symbol, which are always present in the
4332 dynamic symbol table. */
4333 /* ??? People shouldn't be doing non-pic code in
4334 shared libraries. Hork. */
4335 (*_bfd_error_handler
)
4336 (_("%B: linking non-pic code in a position independent executable"),
4343 dyn_r_type
= r_type
+ R_IA64_RELNNLSB
- R_IA64_FPTRNNLSB
;
4347 if (h
->dynindx
!= -1)
4348 dynindx
= h
->dynindx
;
4350 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4351 (info
, h
->root
.u
.def
.section
->owner
,
4352 global_sym_index (h
)));
4357 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4358 (info
, input_bfd
, (long) r_symndx
));
4362 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4363 srel
, rel
->r_offset
, dyn_r_type
,
4367 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4370 case R_IA64_LTOFF_FPTR22
:
4371 case R_IA64_LTOFF_FPTR64I
:
4372 case R_IA64_LTOFF_FPTR32MSB
:
4373 case R_IA64_LTOFF_FPTR32LSB
:
4374 case R_IA64_LTOFF_FPTR64MSB
:
4375 case R_IA64_LTOFF_FPTR64LSB
:
4379 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4380 if (dyn_i
->want_fptr
)
4382 BFD_ASSERT (h
== NULL
|| h
->dynindx
== -1);
4383 if (!undef_weak_ref
)
4384 value
= set_fptr_entry (output_bfd
, info
, dyn_i
, value
);
4389 /* Otherwise, we expect the dynamic linker to create
4393 if (h
->dynindx
!= -1)
4394 dynindx
= h
->dynindx
;
4396 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4397 (info
, h
->root
.u
.def
.section
->owner
,
4398 global_sym_index (h
)));
4401 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4402 (info
, input_bfd
, (long) r_symndx
));
4406 value
= set_got_entry (output_bfd
, info
, dyn_i
, dynindx
,
4407 rel
->r_addend
, value
, R_IA64_FPTRNNLSB
);
4409 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4413 case R_IA64_PCREL32MSB
:
4414 case R_IA64_PCREL32LSB
:
4415 case R_IA64_PCREL64MSB
:
4416 case R_IA64_PCREL64LSB
:
4417 /* Install a dynamic relocation for this reloc. */
4418 if (dynamic_symbol_p
&& r_symndx
!= 0)
4420 BFD_ASSERT (srel
!= NULL
);
4422 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4423 srel
, rel
->r_offset
, r_type
,
4424 h
->dynindx
, rel
->r_addend
);
4428 case R_IA64_PCREL21B
:
4429 case R_IA64_PCREL60B
:
4430 /* We should have created a PLT entry for any dynamic symbol. */
4433 dyn_i
= get_dyn_sym_info (ia64_info
, h
, NULL
, NULL
, FALSE
);
4435 if (dyn_i
&& dyn_i
->want_plt2
)
4437 /* Should have caught this earlier. */
4438 BFD_ASSERT (rel
->r_addend
== 0);
4440 value
= (ia64_info
->plt_sec
->output_section
->vma
4441 + ia64_info
->plt_sec
->output_offset
4442 + dyn_i
->plt2_offset
);
4446 /* Since there's no PLT entry, Validate that this is
4448 BFD_ASSERT (undef_weak_ref
|| sym_sec
->output_section
!= NULL
);
4450 /* If the symbol is undef_weak, we shouldn't be trying
4451 to call it. There's every chance that we'd wind up
4452 with an out-of-range fixup here. Don't bother setting
4453 any value at all. */
4459 case R_IA64_PCREL21BI
:
4460 case R_IA64_PCREL21F
:
4461 case R_IA64_PCREL21M
:
4462 case R_IA64_PCREL22
:
4463 case R_IA64_PCREL64I
:
4464 /* The PCREL21BI reloc is specifically not intended for use with
4465 dynamic relocs. PCREL21F and PCREL21M are used for speculation
4466 fixup code, and thus probably ought not be dynamic. The
4467 PCREL22 and PCREL64I relocs aren't emitted as dynamic relocs. */
4468 if (dynamic_symbol_p
)
4472 if (r_type
== R_IA64_PCREL21BI
)
4473 msg
= _("%B: @internal branch to dynamic symbol %s");
4474 else if (r_type
== R_IA64_PCREL21F
|| r_type
== R_IA64_PCREL21M
)
4475 msg
= _("%B: speculation fixup to dynamic symbol %s");
4477 msg
= _("%B: @pcrel relocation against dynamic symbol %s");
4478 (*_bfd_error_handler
) (msg
, input_bfd
,
4479 h
? h
->root
.root
.string
4480 : bfd_elf_sym_name (input_bfd
,
4490 /* Make pc-relative. */
4491 value
-= (input_section
->output_section
->vma
4492 + input_section
->output_offset
4493 + rel
->r_offset
) & ~ (bfd_vma
) 0x3;
4494 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4497 case R_IA64_SEGREL32MSB
:
4498 case R_IA64_SEGREL32LSB
:
4499 case R_IA64_SEGREL64MSB
:
4500 case R_IA64_SEGREL64LSB
:
4503 /* If the input section was discarded from the output, then
4509 struct elf_segment_map
*m
;
4510 Elf_Internal_Phdr
*p
;
4512 /* Find the segment that contains the output_section. */
4513 for (m
= elf_tdata (output_bfd
)->segment_map
,
4514 p
= elf_tdata (output_bfd
)->phdr
;
4519 for (i
= m
->count
- 1; i
>= 0; i
--)
4520 if (m
->sections
[i
] == input_section
->output_section
)
4528 r
= bfd_reloc_notsupported
;
4532 /* The VMA of the segment is the vaddr of the associated
4534 if (value
> p
->p_vaddr
)
4535 value
-= p
->p_vaddr
;
4538 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4543 case R_IA64_SECREL32MSB
:
4544 case R_IA64_SECREL32LSB
:
4545 case R_IA64_SECREL64MSB
:
4546 case R_IA64_SECREL64LSB
:
4547 /* Make output-section relative to section where the symbol
4548 is defined. PR 475 */
4550 value
-= sym_sec
->output_section
->vma
;
4551 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4554 case R_IA64_IPLTMSB
:
4555 case R_IA64_IPLTLSB
:
4556 /* Install a dynamic relocation for this reloc. */
4557 if ((dynamic_symbol_p
|| info
->shared
)
4558 && (input_section
->flags
& SEC_ALLOC
) != 0)
4560 BFD_ASSERT (srel
!= NULL
);
4562 /* If we don't need dynamic symbol lookup, install two
4563 RELATIVE relocations. */
4564 if (!dynamic_symbol_p
)
4566 unsigned int dyn_r_type
;
4568 if (r_type
== R_IA64_IPLTMSB
)
4569 dyn_r_type
= R_IA64_REL64MSB
;
4571 dyn_r_type
= R_IA64_REL64LSB
;
4573 elfNN_ia64_install_dyn_reloc (output_bfd
, info
,
4575 srel
, rel
->r_offset
,
4576 dyn_r_type
, 0, value
);
4577 elfNN_ia64_install_dyn_reloc (output_bfd
, info
,
4579 srel
, rel
->r_offset
+ 8,
4580 dyn_r_type
, 0, gp_val
);
4583 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4584 srel
, rel
->r_offset
, r_type
,
4585 h
->dynindx
, rel
->r_addend
);
4588 if (r_type
== R_IA64_IPLTMSB
)
4589 r_type
= R_IA64_DIR64MSB
;
4591 r_type
= R_IA64_DIR64LSB
;
4592 elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4593 r
= elfNN_ia64_install_value (hit_addr
+ 8, gp_val
, r_type
);
4596 case R_IA64_TPREL14
:
4597 case R_IA64_TPREL22
:
4598 case R_IA64_TPREL64I
:
4599 value
-= elfNN_ia64_tprel_base (info
);
4600 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4603 case R_IA64_DTPREL14
:
4604 case R_IA64_DTPREL22
:
4605 case R_IA64_DTPREL64I
:
4606 case R_IA64_DTPREL32LSB
:
4607 case R_IA64_DTPREL32MSB
:
4608 case R_IA64_DTPREL64LSB
:
4609 case R_IA64_DTPREL64MSB
:
4610 value
-= elfNN_ia64_dtprel_base (info
);
4611 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4614 case R_IA64_LTOFF_TPREL22
:
4615 case R_IA64_LTOFF_DTPMOD22
:
4616 case R_IA64_LTOFF_DTPREL22
:
4619 long dynindx
= h
? h
->dynindx
: -1;
4620 bfd_vma r_addend
= rel
->r_addend
;
4625 case R_IA64_LTOFF_TPREL22
:
4626 if (!dynamic_symbol_p
)
4629 value
-= elfNN_ia64_tprel_base (info
);
4632 r_addend
+= value
- elfNN_ia64_dtprel_base (info
);
4636 got_r_type
= R_IA64_TPREL64LSB
;
4638 case R_IA64_LTOFF_DTPMOD22
:
4639 if (!dynamic_symbol_p
&& !info
->shared
)
4641 got_r_type
= R_IA64_DTPMOD64LSB
;
4643 case R_IA64_LTOFF_DTPREL22
:
4644 if (!dynamic_symbol_p
)
4645 value
-= elfNN_ia64_dtprel_base (info
);
4646 got_r_type
= R_IA64_DTPRELNNLSB
;
4649 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4650 value
= set_got_entry (input_bfd
, info
, dyn_i
, dynindx
, r_addend
,
4653 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4658 r
= bfd_reloc_notsupported
;
4667 case bfd_reloc_undefined
:
4668 /* This can happen for global table relative relocs if
4669 __gp is undefined. This is a panic situation so we
4670 don't try to continue. */
4671 (*info
->callbacks
->undefined_symbol
)
4672 (info
, "__gp", input_bfd
, input_section
, rel
->r_offset
, 1);
4675 case bfd_reloc_notsupported
:
4680 name
= h
->root
.root
.string
;
4682 name
= bfd_elf_sym_name (input_bfd
, symtab_hdr
, sym
,
4684 if (!(*info
->callbacks
->warning
) (info
, _("unsupported reloc"),
4686 input_section
, rel
->r_offset
))
4692 case bfd_reloc_dangerous
:
4693 case bfd_reloc_outofrange
:
4694 case bfd_reloc_overflow
:
4700 name
= h
->root
.root
.string
;
4702 name
= bfd_elf_sym_name (input_bfd
, symtab_hdr
, sym
,
4707 case R_IA64_PCREL21B
:
4708 case R_IA64_PCREL21BI
:
4709 case R_IA64_PCREL21M
:
4710 case R_IA64_PCREL21F
:
4711 if (is_elf_hash_table (info
->hash
))
4713 /* Relaxtion is always performed for ELF output.
4714 Overflow failures for those relocations mean
4715 that the section is too big to relax. */
4716 (*_bfd_error_handler
)
4717 (_("%B: Can't relax br (%s) to `%s' at 0x%lx in section `%A' with size 0x%lx (> 0x1000000)."),
4718 input_bfd
, input_section
, howto
->name
, name
,
4719 rel
->r_offset
, input_section
->size
);
4723 if (!(*info
->callbacks
->reloc_overflow
) (info
,
4745 elfNN_ia64_finish_dynamic_symbol (output_bfd
, info
, h
, sym
)
4747 struct bfd_link_info
*info
;
4748 struct elf_link_hash_entry
*h
;
4749 Elf_Internal_Sym
*sym
;
4751 struct elfNN_ia64_link_hash_table
*ia64_info
;
4752 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
4754 ia64_info
= elfNN_ia64_hash_table (info
);
4755 dyn_i
= get_dyn_sym_info (ia64_info
, h
, NULL
, NULL
, FALSE
);
4757 /* Fill in the PLT data, if required. */
4758 if (dyn_i
&& dyn_i
->want_plt
)
4760 Elf_Internal_Rela outrel
;
4763 bfd_vma plt_addr
, pltoff_addr
, gp_val
, index
;
4765 gp_val
= _bfd_get_gp_value (output_bfd
);
4767 /* Initialize the minimal PLT entry. */
4769 index
= (dyn_i
->plt_offset
- PLT_HEADER_SIZE
) / PLT_MIN_ENTRY_SIZE
;
4770 plt_sec
= ia64_info
->plt_sec
;
4771 loc
= plt_sec
->contents
+ dyn_i
->plt_offset
;
4773 memcpy (loc
, plt_min_entry
, PLT_MIN_ENTRY_SIZE
);
4774 elfNN_ia64_install_value (loc
, index
, R_IA64_IMM22
);
4775 elfNN_ia64_install_value (loc
+2, -dyn_i
->plt_offset
, R_IA64_PCREL21B
);
4777 plt_addr
= (plt_sec
->output_section
->vma
4778 + plt_sec
->output_offset
4779 + dyn_i
->plt_offset
);
4780 pltoff_addr
= set_pltoff_entry (output_bfd
, info
, dyn_i
, plt_addr
, TRUE
);
4782 /* Initialize the FULL PLT entry, if needed. */
4783 if (dyn_i
->want_plt2
)
4785 loc
= plt_sec
->contents
+ dyn_i
->plt2_offset
;
4787 memcpy (loc
, plt_full_entry
, PLT_FULL_ENTRY_SIZE
);
4788 elfNN_ia64_install_value (loc
, pltoff_addr
- gp_val
, R_IA64_IMM22
);
4790 /* Mark the symbol as undefined, rather than as defined in the
4791 plt section. Leave the value alone. */
4792 /* ??? We didn't redefine it in adjust_dynamic_symbol in the
4793 first place. But perhaps elflink.c did some for us. */
4794 if (!h
->def_regular
)
4795 sym
->st_shndx
= SHN_UNDEF
;
4798 /* Create the dynamic relocation. */
4799 outrel
.r_offset
= pltoff_addr
;
4800 if (bfd_little_endian (output_bfd
))
4801 outrel
.r_info
= ELFNN_R_INFO (h
->dynindx
, R_IA64_IPLTLSB
);
4803 outrel
.r_info
= ELFNN_R_INFO (h
->dynindx
, R_IA64_IPLTMSB
);
4804 outrel
.r_addend
= 0;
4806 /* This is fun. In the .IA_64.pltoff section, we've got entries
4807 that correspond both to real PLT entries, and those that
4808 happened to resolve to local symbols but need to be created
4809 to satisfy @pltoff relocations. The .rela.IA_64.pltoff
4810 relocations for the real PLT should come at the end of the
4811 section, so that they can be indexed by plt entry at runtime.
4813 We emitted all of the relocations for the non-PLT @pltoff
4814 entries during relocate_section. So we can consider the
4815 existing sec->reloc_count to be the base of the array of
4818 loc
= ia64_info
->rel_pltoff_sec
->contents
;
4819 loc
+= ((ia64_info
->rel_pltoff_sec
->reloc_count
+ index
)
4820 * sizeof (ElfNN_External_Rela
));
4821 bfd_elfNN_swap_reloca_out (output_bfd
, &outrel
, loc
);
4824 /* Mark some specially defined symbols as absolute. */
4825 if (strcmp (h
->root
.root
.string
, "_DYNAMIC") == 0
4826 || strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0
4827 || strcmp (h
->root
.root
.string
, "_PROCEDURE_LINKAGE_TABLE_") == 0)
4828 sym
->st_shndx
= SHN_ABS
;
4834 elfNN_ia64_finish_dynamic_sections (abfd
, info
)
4836 struct bfd_link_info
*info
;
4838 struct elfNN_ia64_link_hash_table
*ia64_info
;
4841 ia64_info
= elfNN_ia64_hash_table (info
);
4842 dynobj
= ia64_info
->root
.dynobj
;
4844 if (elf_hash_table (info
)->dynamic_sections_created
)
4846 ElfNN_External_Dyn
*dyncon
, *dynconend
;
4847 asection
*sdyn
, *sgotplt
;
4850 sdyn
= bfd_get_section_by_name (dynobj
, ".dynamic");
4851 sgotplt
= bfd_get_section_by_name (dynobj
, ".got.plt");
4852 BFD_ASSERT (sdyn
!= NULL
);
4853 dyncon
= (ElfNN_External_Dyn
*) sdyn
->contents
;
4854 dynconend
= (ElfNN_External_Dyn
*) (sdyn
->contents
+ sdyn
->size
);
4856 gp_val
= _bfd_get_gp_value (abfd
);
4858 for (; dyncon
< dynconend
; dyncon
++)
4860 Elf_Internal_Dyn dyn
;
4862 bfd_elfNN_swap_dyn_in (dynobj
, dyncon
, &dyn
);
4867 dyn
.d_un
.d_ptr
= gp_val
;
4871 dyn
.d_un
.d_val
= (ia64_info
->minplt_entries
4872 * sizeof (ElfNN_External_Rela
));
4876 /* See the comment above in finish_dynamic_symbol. */
4877 dyn
.d_un
.d_ptr
= (ia64_info
->rel_pltoff_sec
->output_section
->vma
4878 + ia64_info
->rel_pltoff_sec
->output_offset
4879 + (ia64_info
->rel_pltoff_sec
->reloc_count
4880 * sizeof (ElfNN_External_Rela
)));
4883 case DT_IA_64_PLT_RESERVE
:
4884 dyn
.d_un
.d_ptr
= (sgotplt
->output_section
->vma
4885 + sgotplt
->output_offset
);
4889 /* Do not have RELASZ include JMPREL. This makes things
4890 easier on ld.so. This is not what the rest of BFD set up. */
4891 dyn
.d_un
.d_val
-= (ia64_info
->minplt_entries
4892 * sizeof (ElfNN_External_Rela
));
4896 bfd_elfNN_swap_dyn_out (abfd
, &dyn
, dyncon
);
4899 /* Initialize the PLT0 entry. */
4900 if (ia64_info
->plt_sec
)
4902 bfd_byte
*loc
= ia64_info
->plt_sec
->contents
;
4905 memcpy (loc
, plt_header
, PLT_HEADER_SIZE
);
4907 pltres
= (sgotplt
->output_section
->vma
4908 + sgotplt
->output_offset
4911 elfNN_ia64_install_value (loc
+1, pltres
, R_IA64_GPREL22
);
4918 /* ELF file flag handling: */
4920 /* Function to keep IA-64 specific file flags. */
4922 elfNN_ia64_set_private_flags (abfd
, flags
)
4926 BFD_ASSERT (!elf_flags_init (abfd
)
4927 || elf_elfheader (abfd
)->e_flags
== flags
);
4929 elf_elfheader (abfd
)->e_flags
= flags
;
4930 elf_flags_init (abfd
) = TRUE
;
4934 /* Merge backend specific data from an object file to the output
4935 object file when linking. */
4937 elfNN_ia64_merge_private_bfd_data (ibfd
, obfd
)
4942 bfd_boolean ok
= TRUE
;
4944 /* Don't even pretend to support mixed-format linking. */
4945 if (bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
4946 || bfd_get_flavour (obfd
) != bfd_target_elf_flavour
)
4949 in_flags
= elf_elfheader (ibfd
)->e_flags
;
4950 out_flags
= elf_elfheader (obfd
)->e_flags
;
4952 if (! elf_flags_init (obfd
))
4954 elf_flags_init (obfd
) = TRUE
;
4955 elf_elfheader (obfd
)->e_flags
= in_flags
;
4957 if (bfd_get_arch (obfd
) == bfd_get_arch (ibfd
)
4958 && bfd_get_arch_info (obfd
)->the_default
)
4960 return bfd_set_arch_mach (obfd
, bfd_get_arch (ibfd
),
4961 bfd_get_mach (ibfd
));
4967 /* Check flag compatibility. */
4968 if (in_flags
== out_flags
)
4971 /* Output has EF_IA_64_REDUCEDFP set only if all inputs have it set. */
4972 if (!(in_flags
& EF_IA_64_REDUCEDFP
) && (out_flags
& EF_IA_64_REDUCEDFP
))
4973 elf_elfheader (obfd
)->e_flags
&= ~EF_IA_64_REDUCEDFP
;
4975 if ((in_flags
& EF_IA_64_TRAPNIL
) != (out_flags
& EF_IA_64_TRAPNIL
))
4977 (*_bfd_error_handler
)
4978 (_("%B: linking trap-on-NULL-dereference with non-trapping files"),
4981 bfd_set_error (bfd_error_bad_value
);
4984 if ((in_flags
& EF_IA_64_BE
) != (out_flags
& EF_IA_64_BE
))
4986 (*_bfd_error_handler
)
4987 (_("%B: linking big-endian files with little-endian files"),
4990 bfd_set_error (bfd_error_bad_value
);
4993 if ((in_flags
& EF_IA_64_ABI64
) != (out_flags
& EF_IA_64_ABI64
))
4995 (*_bfd_error_handler
)
4996 (_("%B: linking 64-bit files with 32-bit files"),
4999 bfd_set_error (bfd_error_bad_value
);
5002 if ((in_flags
& EF_IA_64_CONS_GP
) != (out_flags
& EF_IA_64_CONS_GP
))
5004 (*_bfd_error_handler
)
5005 (_("%B: linking constant-gp files with non-constant-gp files"),
5008 bfd_set_error (bfd_error_bad_value
);
5011 if ((in_flags
& EF_IA_64_NOFUNCDESC_CONS_GP
)
5012 != (out_flags
& EF_IA_64_NOFUNCDESC_CONS_GP
))
5014 (*_bfd_error_handler
)
5015 (_("%B: linking auto-pic files with non-auto-pic files"),
5018 bfd_set_error (bfd_error_bad_value
);
5026 elfNN_ia64_print_private_bfd_data (abfd
, ptr
)
5030 FILE *file
= (FILE *) ptr
;
5031 flagword flags
= elf_elfheader (abfd
)->e_flags
;
5033 BFD_ASSERT (abfd
!= NULL
&& ptr
!= NULL
);
5035 fprintf (file
, "private flags = %s%s%s%s%s%s%s%s\n",
5036 (flags
& EF_IA_64_TRAPNIL
) ? "TRAPNIL, " : "",
5037 (flags
& EF_IA_64_EXT
) ? "EXT, " : "",
5038 (flags
& EF_IA_64_BE
) ? "BE, " : "LE, ",
5039 (flags
& EF_IA_64_REDUCEDFP
) ? "REDUCEDFP, " : "",
5040 (flags
& EF_IA_64_CONS_GP
) ? "CONS_GP, " : "",
5041 (flags
& EF_IA_64_NOFUNCDESC_CONS_GP
) ? "NOFUNCDESC_CONS_GP, " : "",
5042 (flags
& EF_IA_64_ABSOLUTE
) ? "ABSOLUTE, " : "",
5043 (flags
& EF_IA_64_ABI64
) ? "ABI64" : "ABI32");
5045 _bfd_elf_print_private_bfd_data (abfd
, ptr
);
5049 static enum elf_reloc_type_class
5050 elfNN_ia64_reloc_type_class (rela
)
5051 const Elf_Internal_Rela
*rela
;
5053 switch ((int) ELFNN_R_TYPE (rela
->r_info
))
5055 case R_IA64_REL32MSB
:
5056 case R_IA64_REL32LSB
:
5057 case R_IA64_REL64MSB
:
5058 case R_IA64_REL64LSB
:
5059 return reloc_class_relative
;
5060 case R_IA64_IPLTMSB
:
5061 case R_IA64_IPLTLSB
:
5062 return reloc_class_plt
;
5064 return reloc_class_copy
;
5066 return reloc_class_normal
;
5070 static const struct bfd_elf_special_section elfNN_ia64_special_sections
[] =
5072 { ".sbss", 5, -1, SHT_NOBITS
, SHF_ALLOC
+ SHF_WRITE
+ SHF_IA_64_SHORT
},
5073 { ".sdata", 6, -1, SHT_PROGBITS
, SHF_ALLOC
+ SHF_WRITE
+ SHF_IA_64_SHORT
},
5074 { NULL
, 0, 0, 0, 0 }
5078 elfNN_ia64_object_p (bfd
*abfd
)
5081 asection
*group
, *unwi
, *unw
;
5084 char *unwi_name
, *unw_name
;
5087 if (abfd
->flags
& DYNAMIC
)
5090 /* Flags for fake group section. */
5091 flags
= (SEC_LINKER_CREATED
| SEC_GROUP
| SEC_LINK_ONCE
5094 /* We add a fake section group for each .gnu.linkonce.t.* section,
5095 which isn't in a section group, and its unwind sections. */
5096 for (sec
= abfd
->sections
; sec
!= NULL
; sec
= sec
->next
)
5098 if (elf_sec_group (sec
) == NULL
5099 && ((sec
->flags
& (SEC_LINK_ONCE
| SEC_CODE
| SEC_GROUP
))
5100 == (SEC_LINK_ONCE
| SEC_CODE
))
5101 && strncmp (sec
->name
, ".gnu.linkonce.t.", 16) == 0)
5103 name
= sec
->name
+ 16;
5105 amt
= strlen (name
) + sizeof (".gnu.linkonce.ia64unwi.");
5106 unwi_name
= bfd_alloc (abfd
, amt
);
5110 strcpy (stpcpy (unwi_name
, ".gnu.linkonce.ia64unwi."), name
);
5111 unwi
= bfd_get_section_by_name (abfd
, unwi_name
);
5113 amt
= strlen (name
) + sizeof (".gnu.linkonce.ia64unw.");
5114 unw_name
= bfd_alloc (abfd
, amt
);
5118 strcpy (stpcpy (unw_name
, ".gnu.linkonce.ia64unw."), name
);
5119 unw
= bfd_get_section_by_name (abfd
, unw_name
);
5121 /* We need to create a fake group section for it and its
5123 group
= bfd_make_section_anyway_with_flags (abfd
, name
,
5128 /* Move the fake group section to the beginning. */
5129 bfd_section_list_remove (abfd
, group
);
5130 bfd_section_list_prepend (abfd
, group
);
5132 elf_next_in_group (group
) = sec
;
5134 elf_group_name (sec
) = name
;
5135 elf_next_in_group (sec
) = sec
;
5136 elf_sec_group (sec
) = group
;
5140 elf_group_name (unwi
) = name
;
5141 elf_next_in_group (unwi
) = sec
;
5142 elf_next_in_group (sec
) = unwi
;
5143 elf_sec_group (unwi
) = group
;
5148 elf_group_name (unw
) = name
;
5151 elf_next_in_group (unw
) = elf_next_in_group (unwi
);
5152 elf_next_in_group (unwi
) = unw
;
5156 elf_next_in_group (unw
) = sec
;
5157 elf_next_in_group (sec
) = unw
;
5159 elf_sec_group (unw
) = group
;
5162 /* Fake SHT_GROUP section header. */
5163 elf_section_data (group
)->this_hdr
.bfd_section
= group
;
5164 elf_section_data (group
)->this_hdr
.sh_type
= SHT_GROUP
;
5171 elfNN_ia64_hpux_vec (const bfd_target
*vec
)
5173 extern const bfd_target bfd_elfNN_ia64_hpux_big_vec
;
5174 return (vec
== & bfd_elfNN_ia64_hpux_big_vec
);
5178 elfNN_hpux_post_process_headers (abfd
, info
)
5180 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
5182 Elf_Internal_Ehdr
*i_ehdrp
= elf_elfheader (abfd
);
5184 i_ehdrp
->e_ident
[EI_OSABI
] = ELFOSABI_HPUX
;
5185 i_ehdrp
->e_ident
[EI_ABIVERSION
] = 1;
5189 elfNN_hpux_backend_section_from_bfd_section (abfd
, sec
, retval
)
5190 bfd
*abfd ATTRIBUTE_UNUSED
;
5194 if (bfd_is_com_section (sec
))
5196 *retval
= SHN_IA_64_ANSI_COMMON
;
5203 elfNN_hpux_backend_symbol_processing (bfd
*abfd ATTRIBUTE_UNUSED
,
5206 elf_symbol_type
*elfsym
= (elf_symbol_type
*) asym
;
5208 switch (elfsym
->internal_elf_sym
.st_shndx
)
5210 case SHN_IA_64_ANSI_COMMON
:
5211 asym
->section
= bfd_com_section_ptr
;
5212 asym
->value
= elfsym
->internal_elf_sym
.st_size
;
5213 asym
->flags
&= ~BSF_GLOBAL
;
5219 #define TARGET_LITTLE_SYM bfd_elfNN_ia64_little_vec
5220 #define TARGET_LITTLE_NAME "elfNN-ia64-little"
5221 #define TARGET_BIG_SYM bfd_elfNN_ia64_big_vec
5222 #define TARGET_BIG_NAME "elfNN-ia64-big"
5223 #define ELF_ARCH bfd_arch_ia64
5224 #define ELF_MACHINE_CODE EM_IA_64
5225 #define ELF_MACHINE_ALT1 1999 /* EAS2.3 */
5226 #define ELF_MACHINE_ALT2 1998 /* EAS2.2 */
5227 #define ELF_MAXPAGESIZE 0x10000 /* 64KB */
5229 #define elf_backend_section_from_shdr \
5230 elfNN_ia64_section_from_shdr
5231 #define elf_backend_section_flags \
5232 elfNN_ia64_section_flags
5233 #define elf_backend_fake_sections \
5234 elfNN_ia64_fake_sections
5235 #define elf_backend_final_write_processing \
5236 elfNN_ia64_final_write_processing
5237 #define elf_backend_add_symbol_hook \
5238 elfNN_ia64_add_symbol_hook
5239 #define elf_backend_additional_program_headers \
5240 elfNN_ia64_additional_program_headers
5241 #define elf_backend_modify_segment_map \
5242 elfNN_ia64_modify_segment_map
5243 #define elf_info_to_howto \
5244 elfNN_ia64_info_to_howto
5246 #define bfd_elfNN_bfd_reloc_type_lookup \
5247 elfNN_ia64_reloc_type_lookup
5248 #define bfd_elfNN_bfd_is_local_label_name \
5249 elfNN_ia64_is_local_label_name
5250 #define bfd_elfNN_bfd_relax_section \
5251 elfNN_ia64_relax_section
5253 #define elf_backend_object_p \
5256 /* Stuff for the BFD linker: */
5257 #define bfd_elfNN_bfd_link_hash_table_create \
5258 elfNN_ia64_hash_table_create
5259 #define bfd_elfNN_bfd_link_hash_table_free \
5260 elfNN_ia64_hash_table_free
5261 #define elf_backend_create_dynamic_sections \
5262 elfNN_ia64_create_dynamic_sections
5263 #define elf_backend_check_relocs \
5264 elfNN_ia64_check_relocs
5265 #define elf_backend_adjust_dynamic_symbol \
5266 elfNN_ia64_adjust_dynamic_symbol
5267 #define elf_backend_size_dynamic_sections \
5268 elfNN_ia64_size_dynamic_sections
5269 #define elf_backend_relocate_section \
5270 elfNN_ia64_relocate_section
5271 #define elf_backend_finish_dynamic_symbol \
5272 elfNN_ia64_finish_dynamic_symbol
5273 #define elf_backend_finish_dynamic_sections \
5274 elfNN_ia64_finish_dynamic_sections
5275 #define bfd_elfNN_bfd_final_link \
5276 elfNN_ia64_final_link
5278 #define bfd_elfNN_bfd_merge_private_bfd_data \
5279 elfNN_ia64_merge_private_bfd_data
5280 #define bfd_elfNN_bfd_set_private_flags \
5281 elfNN_ia64_set_private_flags
5282 #define bfd_elfNN_bfd_print_private_bfd_data \
5283 elfNN_ia64_print_private_bfd_data
5285 #define elf_backend_plt_readonly 1
5286 #define elf_backend_want_plt_sym 0
5287 #define elf_backend_plt_alignment 5
5288 #define elf_backend_got_header_size 0
5289 #define elf_backend_want_got_plt 1
5290 #define elf_backend_may_use_rel_p 1
5291 #define elf_backend_may_use_rela_p 1
5292 #define elf_backend_default_use_rela_p 1
5293 #define elf_backend_want_dynbss 0
5294 #define elf_backend_copy_indirect_symbol elfNN_ia64_hash_copy_indirect
5295 #define elf_backend_hide_symbol elfNN_ia64_hash_hide_symbol
5296 #define elf_backend_reloc_type_class elfNN_ia64_reloc_type_class
5297 #define elf_backend_rela_normal 1
5298 #define elf_backend_special_sections elfNN_ia64_special_sections
5300 /* FIXME: PR 290: The Intel C compiler generates SHT_IA_64_UNWIND with
5301 SHF_LINK_ORDER. But it doesn't set theh sh_link or sh_info fields.
5302 We don't want to flood users with so many error messages. We turn
5303 off the warning for now. It will be turned on later when the Intel
5304 compiler is fixed. */
5305 #define elf_backend_link_order_error_handler NULL
5307 #include "elfNN-target.h"
5309 /* HPUX-specific vectors. */
5311 #undef TARGET_LITTLE_SYM
5312 #undef TARGET_LITTLE_NAME
5313 #undef TARGET_BIG_SYM
5314 #define TARGET_BIG_SYM bfd_elfNN_ia64_hpux_big_vec
5315 #undef TARGET_BIG_NAME
5316 #define TARGET_BIG_NAME "elfNN-ia64-hpux-big"
5318 /* These are HP-UX specific functions. */
5320 #undef elf_backend_post_process_headers
5321 #define elf_backend_post_process_headers elfNN_hpux_post_process_headers
5323 #undef elf_backend_section_from_bfd_section
5324 #define elf_backend_section_from_bfd_section elfNN_hpux_backend_section_from_bfd_section
5326 #undef elf_backend_symbol_processing
5327 #define elf_backend_symbol_processing elfNN_hpux_backend_symbol_processing
5329 #undef elf_backend_want_p_paddr_set_to_zero
5330 #define elf_backend_want_p_paddr_set_to_zero 1
5332 #undef ELF_MAXPAGESIZE
5333 #define ELF_MAXPAGESIZE 0x1000 /* 1K */
5336 #define elfNN_bed elfNN_ia64_hpux_bed
5338 #include "elfNN-target.h"
5340 #undef elf_backend_want_p_paddr_set_to_zero