1 /* IA-64 support for 64-bit ELF
2 Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006, 2007
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. */
85 bfd_vma pltoff_offset;
89 bfd_vma dtpmod_offset;
90 bfd_vma dtprel_offset;
92 /* The symbol table entry, if any, that this was derived from. */
93 struct elf_link_hash_entry *h;
95 /* Used to count non-got, non-plt relocations for delayed sizing
96 of relocation sections. */
97 struct elfNN_ia64_dyn_reloc_entry
99 struct elfNN_ia64_dyn_reloc_entry *next;
104 /* Is this reloc against readonly section? */
108 /* TRUE when the section contents have been updated. */
109 unsigned got_done : 1;
110 unsigned fptr_done : 1;
111 unsigned pltoff_done : 1;
112 unsigned tprel_done : 1;
113 unsigned dtpmod_done : 1;
114 unsigned dtprel_done : 1;
116 /* TRUE for the different kinds of linker data we want created. */
117 unsigned want_got : 1;
118 unsigned want_gotx : 1;
119 unsigned want_fptr : 1;
120 unsigned want_ltoff_fptr : 1;
121 unsigned want_plt : 1;
122 unsigned want_plt2 : 1;
123 unsigned want_pltoff : 1;
124 unsigned want_tprel : 1;
125 unsigned want_dtpmod : 1;
126 unsigned want_dtprel : 1;
129 struct elfNN_ia64_local_hash_entry
133 /* The number of elements in elfNN_ia64_dyn_sym_info array. */
135 /* The number of sorted elements in elfNN_ia64_dyn_sym_info array. */
136 unsigned int sorted_count;
137 /* The size of elfNN_ia64_dyn_sym_info array. */
139 /* The array of elfNN_ia64_dyn_sym_info. */
140 struct elfNN_ia64_dyn_sym_info *info;
142 /* TRUE if this hash entry's addends was translated for
143 SHF_MERGE optimization. */
144 unsigned sec_merge_done : 1;
147 struct elfNN_ia64_link_hash_entry
149 struct elf_link_hash_entry root;
150 /* The number of elements in elfNN_ia64_dyn_sym_info array. */
152 /* The number of sorted elements in elfNN_ia64_dyn_sym_info array. */
153 unsigned int sorted_count;
154 /* The size of elfNN_ia64_dyn_sym_info array. */
156 /* The array of elfNN_ia64_dyn_sym_info. */
157 struct elfNN_ia64_dyn_sym_info *info;
160 struct elfNN_ia64_link_hash_table
162 /* The main hash table. */
163 struct elf_link_hash_table root;
165 asection *got_sec; /* the linkage table section (or NULL) */
166 asection *rel_got_sec; /* dynamic relocation section for same */
167 asection *fptr_sec; /* function descriptor table (or NULL) */
168 asection *rel_fptr_sec; /* dynamic relocation section for same */
169 asection *plt_sec; /* the primary plt section (or NULL) */
170 asection *pltoff_sec; /* private descriptors for plt (or NULL) */
171 asection *rel_pltoff_sec; /* dynamic relocation section for same */
173 bfd_size_type minplt_entries; /* number of minplt entries */
174 unsigned reltext : 1; /* are there relocs against readonly sections? */
175 unsigned self_dtpmod_done : 1;/* has self DTPMOD entry been finished? */
176 bfd_vma self_dtpmod_offset; /* .got offset to self DTPMOD entry */
178 htab_t loc_hash_table;
179 void *loc_hash_memory;
182 struct elfNN_ia64_allocate_data
184 struct bfd_link_info *info;
186 bfd_boolean only_got;
189 #define elfNN_ia64_hash_table(p) \
190 ((struct elfNN_ia64_link_hash_table *) ((p)->hash))
192 static bfd_reloc_status_type elfNN_ia64_reloc
193 PARAMS ((bfd *abfd, arelent *reloc, asymbol *sym, PTR data,
194 asection *input_section, bfd *output_bfd, char **error_message));
195 static reloc_howto_type * lookup_howto
196 PARAMS ((unsigned int rtype));
197 static reloc_howto_type *elfNN_ia64_reloc_type_lookup
198 PARAMS ((bfd *abfd, bfd_reloc_code_real_type bfd_code));
199 static void elfNN_ia64_info_to_howto
200 PARAMS ((bfd *abfd, arelent *bfd_reloc, Elf_Internal_Rela *elf_reloc));
201 static bfd_boolean elfNN_ia64_relax_section
202 PARAMS((bfd *abfd, asection *sec, struct bfd_link_info *link_info,
203 bfd_boolean *again));
204 static void elfNN_ia64_relax_ldxmov
205 PARAMS((bfd_byte *contents, bfd_vma off));
206 static bfd_boolean is_unwind_section_name
207 PARAMS ((bfd *abfd, const char *));
208 static bfd_boolean elfNN_ia64_section_flags
209 PARAMS ((flagword *, const Elf_Internal_Shdr *));
210 static bfd_boolean elfNN_ia64_fake_sections
211 PARAMS ((bfd *abfd, Elf_Internal_Shdr *hdr, asection *sec));
212 static void elfNN_ia64_final_write_processing
213 PARAMS ((bfd *abfd, bfd_boolean linker));
214 static bfd_boolean elfNN_ia64_add_symbol_hook
215 PARAMS ((bfd *abfd, struct bfd_link_info *info, Elf_Internal_Sym *sym,
216 const char **namep, flagword *flagsp, asection **secp,
218 static bfd_boolean elfNN_ia64_is_local_label_name
219 PARAMS ((bfd *abfd, const char *name));
220 static bfd_boolean elfNN_ia64_dynamic_symbol_p
221 PARAMS ((struct elf_link_hash_entry *h, struct bfd_link_info *info, int));
222 static struct bfd_hash_entry *elfNN_ia64_new_elf_hash_entry
223 PARAMS ((struct bfd_hash_entry *entry, struct bfd_hash_table *table,
224 const char *string));
225 static void elfNN_ia64_hash_copy_indirect
226 PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *,
227 struct elf_link_hash_entry *));
228 static void elfNN_ia64_hash_hide_symbol
229 PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *, bfd_boolean));
230 static hashval_t elfNN_ia64_local_htab_hash PARAMS ((const void *));
231 static int elfNN_ia64_local_htab_eq PARAMS ((const void *ptr1,
233 static struct bfd_link_hash_table *elfNN_ia64_hash_table_create
234 PARAMS ((bfd *abfd));
235 static void elfNN_ia64_hash_table_free
236 PARAMS ((struct bfd_link_hash_table *hash));
237 static bfd_boolean elfNN_ia64_global_dyn_sym_thunk
238 PARAMS ((struct bfd_hash_entry *, PTR));
239 static int elfNN_ia64_local_dyn_sym_thunk
240 PARAMS ((void **, PTR));
241 static void elfNN_ia64_dyn_sym_traverse
242 PARAMS ((struct elfNN_ia64_link_hash_table *ia64_info,
243 bfd_boolean (*func) (struct elfNN_ia64_dyn_sym_info *, PTR),
245 static bfd_boolean elfNN_ia64_create_dynamic_sections
246 PARAMS ((bfd *abfd, struct bfd_link_info *info));
247 static struct elfNN_ia64_local_hash_entry * get_local_sym_hash
248 PARAMS ((struct elfNN_ia64_link_hash_table *ia64_info,
249 bfd *abfd, const Elf_Internal_Rela *rel, bfd_boolean create));
250 static struct elfNN_ia64_dyn_sym_info * get_dyn_sym_info
251 PARAMS ((struct elfNN_ia64_link_hash_table *ia64_info,
252 struct elf_link_hash_entry *h,
253 bfd *abfd, const Elf_Internal_Rela *rel, bfd_boolean create));
254 static asection *get_got
255 PARAMS ((bfd *abfd, struct bfd_link_info *info,
256 struct elfNN_ia64_link_hash_table *ia64_info));
257 static asection *get_fptr
258 PARAMS ((bfd *abfd, struct bfd_link_info *info,
259 struct elfNN_ia64_link_hash_table *ia64_info));
260 static asection *get_pltoff
261 PARAMS ((bfd *abfd, struct bfd_link_info *info,
262 struct elfNN_ia64_link_hash_table *ia64_info));
263 static asection *get_reloc_section
264 PARAMS ((bfd *abfd, struct elfNN_ia64_link_hash_table *ia64_info,
265 asection *sec, bfd_boolean create));
266 static bfd_boolean elfNN_ia64_check_relocs
267 PARAMS ((bfd *abfd, struct bfd_link_info *info, asection *sec,
268 const Elf_Internal_Rela *relocs));
269 static bfd_boolean elfNN_ia64_adjust_dynamic_symbol
270 PARAMS ((struct bfd_link_info *info, struct elf_link_hash_entry *h));
271 static long global_sym_index
272 PARAMS ((struct elf_link_hash_entry *h));
273 static bfd_boolean allocate_fptr
274 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
275 static bfd_boolean allocate_global_data_got
276 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
277 static bfd_boolean allocate_global_fptr_got
278 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
279 static bfd_boolean allocate_local_got
280 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
281 static bfd_boolean allocate_pltoff_entries
282 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
283 static bfd_boolean allocate_plt_entries
284 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
285 static bfd_boolean allocate_plt2_entries
286 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
287 static bfd_boolean allocate_dynrel_entries
288 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
289 static bfd_boolean elfNN_ia64_size_dynamic_sections
290 PARAMS ((bfd *output_bfd, struct bfd_link_info *info));
291 static bfd_reloc_status_type elfNN_ia64_install_value
292 PARAMS ((bfd_byte *hit_addr, bfd_vma val, unsigned int r_type));
293 static void elfNN_ia64_install_dyn_reloc
294 PARAMS ((bfd *abfd, struct bfd_link_info *info, asection *sec,
295 asection *srel, bfd_vma offset, unsigned int type,
296 long dynindx, bfd_vma addend));
297 static bfd_vma set_got_entry
298 PARAMS ((bfd *abfd, struct bfd_link_info *info,
299 struct elfNN_ia64_dyn_sym_info *dyn_i, long dynindx,
300 bfd_vma addend, bfd_vma value, unsigned int dyn_r_type));
301 static bfd_vma set_fptr_entry
302 PARAMS ((bfd *abfd, struct bfd_link_info *info,
303 struct elfNN_ia64_dyn_sym_info *dyn_i,
305 static bfd_vma set_pltoff_entry
306 PARAMS ((bfd *abfd, struct bfd_link_info *info,
307 struct elfNN_ia64_dyn_sym_info *dyn_i,
308 bfd_vma value, bfd_boolean));
309 static bfd_vma elfNN_ia64_tprel_base
310 PARAMS ((struct bfd_link_info *info));
311 static bfd_vma elfNN_ia64_dtprel_base
312 PARAMS ((struct bfd_link_info *info));
313 static int elfNN_ia64_unwind_entry_compare
314 PARAMS ((const PTR, const PTR));
315 static bfd_boolean elfNN_ia64_choose_gp
316 PARAMS ((bfd *abfd, struct bfd_link_info *info));
317 static bfd_boolean elfNN_ia64_final_link
318 PARAMS ((bfd *abfd, struct bfd_link_info *info));
319 static bfd_boolean elfNN_ia64_relocate_section
320 PARAMS ((bfd *output_bfd, struct bfd_link_info *info, bfd *input_bfd,
321 asection *input_section, bfd_byte *contents,
322 Elf_Internal_Rela *relocs, Elf_Internal_Sym *local_syms,
323 asection **local_sections));
324 static bfd_boolean elfNN_ia64_finish_dynamic_symbol
325 PARAMS ((bfd *output_bfd, struct bfd_link_info *info,
326 struct elf_link_hash_entry *h, Elf_Internal_Sym *sym));
327 static bfd_boolean elfNN_ia64_finish_dynamic_sections
328 PARAMS ((bfd *abfd, struct bfd_link_info *info));
329 static bfd_boolean elfNN_ia64_set_private_flags
330 PARAMS ((bfd *abfd, flagword flags));
331 static bfd_boolean elfNN_ia64_merge_private_bfd_data
332 PARAMS ((bfd *ibfd, bfd *obfd));
333 static bfd_boolean elfNN_ia64_print_private_bfd_data
334 PARAMS ((bfd *abfd, PTR ptr));
335 static enum elf_reloc_type_class elfNN_ia64_reloc_type_class
336 PARAMS ((const Elf_Internal_Rela *));
337 static bfd_boolean elfNN_ia64_hpux_vec
338 PARAMS ((const bfd_target *vec));
339 static void elfNN_hpux_post_process_headers
340 PARAMS ((bfd *abfd, struct bfd_link_info *info));
341 bfd_boolean elfNN_hpux_backend_section_from_bfd_section
342 PARAMS ((bfd *abfd, asection *sec, int *retval));
344 /* ia64-specific relocation. */
346 /* Perform a relocation. Not much to do here as all the hard work is
347 done in elfNN_ia64_final_link_relocate. */
348 static bfd_reloc_status_type
349 elfNN_ia64_reloc (abfd, reloc, sym, data, input_section,
350 output_bfd, error_message)
351 bfd *abfd ATTRIBUTE_UNUSED;
353 asymbol *sym ATTRIBUTE_UNUSED;
354 PTR data ATTRIBUTE_UNUSED;
355 asection *input_section;
357 char **error_message;
361 reloc->address += input_section->output_offset;
365 if (input_section->flags & SEC_DEBUGGING)
366 return bfd_reloc_continue;
368 *error_message = "Unsupported call to elfNN_ia64_reloc";
369 return bfd_reloc_notsupported;
372 #define IA64_HOWTO(TYPE, NAME, SIZE, PCREL, IN) \
373 HOWTO (TYPE, 0, SIZE, 0, PCREL, 0, complain_overflow_signed, \
374 elfNN_ia64_reloc, NAME, FALSE, 0, -1, IN)
376 /* This table has to be sorted according to increasing number of the
378 static reloc_howto_type ia64_howto_table[] =
380 IA64_HOWTO (R_IA64_NONE, "NONE", 0, FALSE, TRUE),
382 IA64_HOWTO (R_IA64_IMM14, "IMM14", 0, FALSE, TRUE),
383 IA64_HOWTO (R_IA64_IMM22, "IMM22", 0, FALSE, TRUE),
384 IA64_HOWTO (R_IA64_IMM64, "IMM64", 0, FALSE, TRUE),
385 IA64_HOWTO (R_IA64_DIR32MSB, "DIR32MSB", 2, FALSE, TRUE),
386 IA64_HOWTO (R_IA64_DIR32LSB, "DIR32LSB", 2, FALSE, TRUE),
387 IA64_HOWTO (R_IA64_DIR64MSB, "DIR64MSB", 4, FALSE, TRUE),
388 IA64_HOWTO (R_IA64_DIR64LSB, "DIR64LSB", 4, FALSE, TRUE),
390 IA64_HOWTO (R_IA64_GPREL22, "GPREL22", 0, FALSE, TRUE),
391 IA64_HOWTO (R_IA64_GPREL64I, "GPREL64I", 0, FALSE, TRUE),
392 IA64_HOWTO (R_IA64_GPREL32MSB, "GPREL32MSB", 2, FALSE, TRUE),
393 IA64_HOWTO (R_IA64_GPREL32LSB, "GPREL32LSB", 2, FALSE, TRUE),
394 IA64_HOWTO (R_IA64_GPREL64MSB, "GPREL64MSB", 4, FALSE, TRUE),
395 IA64_HOWTO (R_IA64_GPREL64LSB, "GPREL64LSB", 4, FALSE, TRUE),
397 IA64_HOWTO (R_IA64_LTOFF22, "LTOFF22", 0, FALSE, TRUE),
398 IA64_HOWTO (R_IA64_LTOFF64I, "LTOFF64I", 0, FALSE, TRUE),
400 IA64_HOWTO (R_IA64_PLTOFF22, "PLTOFF22", 0, FALSE, TRUE),
401 IA64_HOWTO (R_IA64_PLTOFF64I, "PLTOFF64I", 0, FALSE, TRUE),
402 IA64_HOWTO (R_IA64_PLTOFF64MSB, "PLTOFF64MSB", 4, FALSE, TRUE),
403 IA64_HOWTO (R_IA64_PLTOFF64LSB, "PLTOFF64LSB", 4, FALSE, TRUE),
405 IA64_HOWTO (R_IA64_FPTR64I, "FPTR64I", 0, FALSE, TRUE),
406 IA64_HOWTO (R_IA64_FPTR32MSB, "FPTR32MSB", 2, FALSE, TRUE),
407 IA64_HOWTO (R_IA64_FPTR32LSB, "FPTR32LSB", 2, FALSE, TRUE),
408 IA64_HOWTO (R_IA64_FPTR64MSB, "FPTR64MSB", 4, FALSE, TRUE),
409 IA64_HOWTO (R_IA64_FPTR64LSB, "FPTR64LSB", 4, FALSE, TRUE),
411 IA64_HOWTO (R_IA64_PCREL60B, "PCREL60B", 0, TRUE, TRUE),
412 IA64_HOWTO (R_IA64_PCREL21B, "PCREL21B", 0, TRUE, TRUE),
413 IA64_HOWTO (R_IA64_PCREL21M, "PCREL21M", 0, TRUE, TRUE),
414 IA64_HOWTO (R_IA64_PCREL21F, "PCREL21F", 0, TRUE, TRUE),
415 IA64_HOWTO (R_IA64_PCREL32MSB, "PCREL32MSB", 2, TRUE, TRUE),
416 IA64_HOWTO (R_IA64_PCREL32LSB, "PCREL32LSB", 2, TRUE, TRUE),
417 IA64_HOWTO (R_IA64_PCREL64MSB, "PCREL64MSB", 4, TRUE, TRUE),
418 IA64_HOWTO (R_IA64_PCREL64LSB, "PCREL64LSB", 4, TRUE, TRUE),
420 IA64_HOWTO (R_IA64_LTOFF_FPTR22, "LTOFF_FPTR22", 0, FALSE, TRUE),
421 IA64_HOWTO (R_IA64_LTOFF_FPTR64I, "LTOFF_FPTR64I", 0, FALSE, TRUE),
422 IA64_HOWTO (R_IA64_LTOFF_FPTR32MSB, "LTOFF_FPTR32MSB", 2, FALSE, TRUE),
423 IA64_HOWTO (R_IA64_LTOFF_FPTR32LSB, "LTOFF_FPTR32LSB", 2, FALSE, TRUE),
424 IA64_HOWTO (R_IA64_LTOFF_FPTR64MSB, "LTOFF_FPTR64MSB", 4, FALSE, TRUE),
425 IA64_HOWTO (R_IA64_LTOFF_FPTR64LSB, "LTOFF_FPTR64LSB", 4, FALSE, TRUE),
427 IA64_HOWTO (R_IA64_SEGREL32MSB, "SEGREL32MSB", 2, FALSE, TRUE),
428 IA64_HOWTO (R_IA64_SEGREL32LSB, "SEGREL32LSB", 2, FALSE, TRUE),
429 IA64_HOWTO (R_IA64_SEGREL64MSB, "SEGREL64MSB", 4, FALSE, TRUE),
430 IA64_HOWTO (R_IA64_SEGREL64LSB, "SEGREL64LSB", 4, FALSE, TRUE),
432 IA64_HOWTO (R_IA64_SECREL32MSB, "SECREL32MSB", 2, FALSE, TRUE),
433 IA64_HOWTO (R_IA64_SECREL32LSB, "SECREL32LSB", 2, FALSE, TRUE),
434 IA64_HOWTO (R_IA64_SECREL64MSB, "SECREL64MSB", 4, FALSE, TRUE),
435 IA64_HOWTO (R_IA64_SECREL64LSB, "SECREL64LSB", 4, FALSE, TRUE),
437 IA64_HOWTO (R_IA64_REL32MSB, "REL32MSB", 2, FALSE, TRUE),
438 IA64_HOWTO (R_IA64_REL32LSB, "REL32LSB", 2, FALSE, TRUE),
439 IA64_HOWTO (R_IA64_REL64MSB, "REL64MSB", 4, FALSE, TRUE),
440 IA64_HOWTO (R_IA64_REL64LSB, "REL64LSB", 4, FALSE, TRUE),
442 IA64_HOWTO (R_IA64_LTV32MSB, "LTV32MSB", 2, FALSE, TRUE),
443 IA64_HOWTO (R_IA64_LTV32LSB, "LTV32LSB", 2, FALSE, TRUE),
444 IA64_HOWTO (R_IA64_LTV64MSB, "LTV64MSB", 4, FALSE, TRUE),
445 IA64_HOWTO (R_IA64_LTV64LSB, "LTV64LSB", 4, FALSE, TRUE),
447 IA64_HOWTO (R_IA64_PCREL21BI, "PCREL21BI", 0, TRUE, TRUE),
448 IA64_HOWTO (R_IA64_PCREL22, "PCREL22", 0, TRUE, TRUE),
449 IA64_HOWTO (R_IA64_PCREL64I, "PCREL64I", 0, TRUE, TRUE),
451 IA64_HOWTO (R_IA64_IPLTMSB, "IPLTMSB", 4, FALSE, TRUE),
452 IA64_HOWTO (R_IA64_IPLTLSB, "IPLTLSB", 4, FALSE, TRUE),
453 IA64_HOWTO (R_IA64_COPY, "COPY", 4, FALSE, TRUE),
454 IA64_HOWTO (R_IA64_LTOFF22X, "LTOFF22X", 0, FALSE, TRUE),
455 IA64_HOWTO (R_IA64_LDXMOV, "LDXMOV", 0, FALSE, TRUE),
457 IA64_HOWTO (R_IA64_TPREL14, "TPREL14", 0, FALSE, FALSE),
458 IA64_HOWTO (R_IA64_TPREL22, "TPREL22", 0, FALSE, FALSE),
459 IA64_HOWTO (R_IA64_TPREL64I, "TPREL64I", 0, FALSE, FALSE),
460 IA64_HOWTO (R_IA64_TPREL64MSB, "TPREL64MSB", 4, FALSE, FALSE),
461 IA64_HOWTO (R_IA64_TPREL64LSB, "TPREL64LSB", 4, FALSE, FALSE),
462 IA64_HOWTO (R_IA64_LTOFF_TPREL22, "LTOFF_TPREL22", 0, FALSE, FALSE),
464 IA64_HOWTO (R_IA64_DTPMOD64MSB, "DTPMOD64MSB", 4, FALSE, FALSE),
465 IA64_HOWTO (R_IA64_DTPMOD64LSB, "DTPMOD64LSB", 4, FALSE, FALSE),
466 IA64_HOWTO (R_IA64_LTOFF_DTPMOD22, "LTOFF_DTPMOD22", 0, FALSE, FALSE),
468 IA64_HOWTO (R_IA64_DTPREL14, "DTPREL14", 0, FALSE, FALSE),
469 IA64_HOWTO (R_IA64_DTPREL22, "DTPREL22", 0, FALSE, FALSE),
470 IA64_HOWTO (R_IA64_DTPREL64I, "DTPREL64I", 0, FALSE, FALSE),
471 IA64_HOWTO (R_IA64_DTPREL32MSB, "DTPREL32MSB", 2, FALSE, FALSE),
472 IA64_HOWTO (R_IA64_DTPREL32LSB, "DTPREL32LSB", 2, FALSE, FALSE),
473 IA64_HOWTO (R_IA64_DTPREL64MSB, "DTPREL64MSB", 4, FALSE, FALSE),
474 IA64_HOWTO (R_IA64_DTPREL64LSB, "DTPREL64LSB", 4, FALSE, FALSE),
475 IA64_HOWTO (R_IA64_LTOFF_DTPREL22, "LTOFF_DTPREL22", 0, FALSE, FALSE),
478 static unsigned char elf_code_to_howto_index[R_IA64_MAX_RELOC_CODE + 1];
480 /* Given a BFD reloc type, return the matching HOWTO structure. */
482 static reloc_howto_type *
486 static int inited = 0;
493 memset (elf_code_to_howto_index, 0xff, sizeof (elf_code_to_howto_index));
494 for (i = 0; i < NELEMS (ia64_howto_table); ++i)
495 elf_code_to_howto_index[ia64_howto_table[i].type] = i;
498 if (rtype > R_IA64_MAX_RELOC_CODE)
500 i = elf_code_to_howto_index[rtype];
501 if (i >= NELEMS (ia64_howto_table))
503 return ia64_howto_table + i;
506 static reloc_howto_type*
507 elfNN_ia64_reloc_type_lookup (abfd, bfd_code)
508 bfd *abfd ATTRIBUTE_UNUSED;
509 bfd_reloc_code_real_type bfd_code;
515 case BFD_RELOC_NONE: rtype = R_IA64_NONE; break;
517 case BFD_RELOC_IA64_IMM14: rtype = R_IA64_IMM14; break;
518 case BFD_RELOC_IA64_IMM22: rtype = R_IA64_IMM22; break;
519 case BFD_RELOC_IA64_IMM64: rtype = R_IA64_IMM64; break;
521 case BFD_RELOC_IA64_DIR32MSB: rtype = R_IA64_DIR32MSB; break;
522 case BFD_RELOC_IA64_DIR32LSB: rtype = R_IA64_DIR32LSB; break;
523 case BFD_RELOC_IA64_DIR64MSB: rtype = R_IA64_DIR64MSB; break;
524 case BFD_RELOC_IA64_DIR64LSB: rtype = R_IA64_DIR64LSB; break;
526 case BFD_RELOC_IA64_GPREL22: rtype = R_IA64_GPREL22; break;
527 case BFD_RELOC_IA64_GPREL64I: rtype = R_IA64_GPREL64I; break;
528 case BFD_RELOC_IA64_GPREL32MSB: rtype = R_IA64_GPREL32MSB; break;
529 case BFD_RELOC_IA64_GPREL32LSB: rtype = R_IA64_GPREL32LSB; break;
530 case BFD_RELOC_IA64_GPREL64MSB: rtype = R_IA64_GPREL64MSB; break;
531 case BFD_RELOC_IA64_GPREL64LSB: rtype = R_IA64_GPREL64LSB; break;
533 case BFD_RELOC_IA64_LTOFF22: rtype = R_IA64_LTOFF22; break;
534 case BFD_RELOC_IA64_LTOFF64I: rtype = R_IA64_LTOFF64I; break;
536 case BFD_RELOC_IA64_PLTOFF22: rtype = R_IA64_PLTOFF22; break;
537 case BFD_RELOC_IA64_PLTOFF64I: rtype = R_IA64_PLTOFF64I; break;
538 case BFD_RELOC_IA64_PLTOFF64MSB: rtype = R_IA64_PLTOFF64MSB; break;
539 case BFD_RELOC_IA64_PLTOFF64LSB: rtype = R_IA64_PLTOFF64LSB; break;
540 case BFD_RELOC_IA64_FPTR64I: rtype = R_IA64_FPTR64I; break;
541 case BFD_RELOC_IA64_FPTR32MSB: rtype = R_IA64_FPTR32MSB; break;
542 case BFD_RELOC_IA64_FPTR32LSB: rtype = R_IA64_FPTR32LSB; break;
543 case BFD_RELOC_IA64_FPTR64MSB: rtype = R_IA64_FPTR64MSB; break;
544 case BFD_RELOC_IA64_FPTR64LSB: rtype = R_IA64_FPTR64LSB; break;
546 case BFD_RELOC_IA64_PCREL21B: rtype = R_IA64_PCREL21B; break;
547 case BFD_RELOC_IA64_PCREL21BI: rtype = R_IA64_PCREL21BI; break;
548 case BFD_RELOC_IA64_PCREL21M: rtype = R_IA64_PCREL21M; break;
549 case BFD_RELOC_IA64_PCREL21F: rtype = R_IA64_PCREL21F; break;
550 case BFD_RELOC_IA64_PCREL22: rtype = R_IA64_PCREL22; break;
551 case BFD_RELOC_IA64_PCREL60B: rtype = R_IA64_PCREL60B; break;
552 case BFD_RELOC_IA64_PCREL64I: rtype = R_IA64_PCREL64I; break;
553 case BFD_RELOC_IA64_PCREL32MSB: rtype = R_IA64_PCREL32MSB; break;
554 case BFD_RELOC_IA64_PCREL32LSB: rtype = R_IA64_PCREL32LSB; break;
555 case BFD_RELOC_IA64_PCREL64MSB: rtype = R_IA64_PCREL64MSB; break;
556 case BFD_RELOC_IA64_PCREL64LSB: rtype = R_IA64_PCREL64LSB; break;
558 case BFD_RELOC_IA64_LTOFF_FPTR22: rtype = R_IA64_LTOFF_FPTR22; break;
559 case BFD_RELOC_IA64_LTOFF_FPTR64I: rtype = R_IA64_LTOFF_FPTR64I; break;
560 case BFD_RELOC_IA64_LTOFF_FPTR32MSB: rtype = R_IA64_LTOFF_FPTR32MSB; break;
561 case BFD_RELOC_IA64_LTOFF_FPTR32LSB: rtype = R_IA64_LTOFF_FPTR32LSB; break;
562 case BFD_RELOC_IA64_LTOFF_FPTR64MSB: rtype = R_IA64_LTOFF_FPTR64MSB; break;
563 case BFD_RELOC_IA64_LTOFF_FPTR64LSB: rtype = R_IA64_LTOFF_FPTR64LSB; break;
565 case BFD_RELOC_IA64_SEGREL32MSB: rtype = R_IA64_SEGREL32MSB; break;
566 case BFD_RELOC_IA64_SEGREL32LSB: rtype = R_IA64_SEGREL32LSB; break;
567 case BFD_RELOC_IA64_SEGREL64MSB: rtype = R_IA64_SEGREL64MSB; break;
568 case BFD_RELOC_IA64_SEGREL64LSB: rtype = R_IA64_SEGREL64LSB; break;
570 case BFD_RELOC_IA64_SECREL32MSB: rtype = R_IA64_SECREL32MSB; break;
571 case BFD_RELOC_IA64_SECREL32LSB: rtype = R_IA64_SECREL32LSB; break;
572 case BFD_RELOC_IA64_SECREL64MSB: rtype = R_IA64_SECREL64MSB; break;
573 case BFD_RELOC_IA64_SECREL64LSB: rtype = R_IA64_SECREL64LSB; break;
575 case BFD_RELOC_IA64_REL32MSB: rtype = R_IA64_REL32MSB; break;
576 case BFD_RELOC_IA64_REL32LSB: rtype = R_IA64_REL32LSB; break;
577 case BFD_RELOC_IA64_REL64MSB: rtype = R_IA64_REL64MSB; break;
578 case BFD_RELOC_IA64_REL64LSB: rtype = R_IA64_REL64LSB; break;
580 case BFD_RELOC_IA64_LTV32MSB: rtype = R_IA64_LTV32MSB; break;
581 case BFD_RELOC_IA64_LTV32LSB: rtype = R_IA64_LTV32LSB; break;
582 case BFD_RELOC_IA64_LTV64MSB: rtype = R_IA64_LTV64MSB; break;
583 case BFD_RELOC_IA64_LTV64LSB: rtype = R_IA64_LTV64LSB; break;
585 case BFD_RELOC_IA64_IPLTMSB: rtype = R_IA64_IPLTMSB; break;
586 case BFD_RELOC_IA64_IPLTLSB: rtype = R_IA64_IPLTLSB; break;
587 case BFD_RELOC_IA64_COPY: rtype = R_IA64_COPY; break;
588 case BFD_RELOC_IA64_LTOFF22X: rtype = R_IA64_LTOFF22X; break;
589 case BFD_RELOC_IA64_LDXMOV: rtype = R_IA64_LDXMOV; break;
591 case BFD_RELOC_IA64_TPREL14: rtype = R_IA64_TPREL14; break;
592 case BFD_RELOC_IA64_TPREL22: rtype = R_IA64_TPREL22; break;
593 case BFD_RELOC_IA64_TPREL64I: rtype = R_IA64_TPREL64I; break;
594 case BFD_RELOC_IA64_TPREL64MSB: rtype = R_IA64_TPREL64MSB; break;
595 case BFD_RELOC_IA64_TPREL64LSB: rtype = R_IA64_TPREL64LSB; break;
596 case BFD_RELOC_IA64_LTOFF_TPREL22: rtype = R_IA64_LTOFF_TPREL22; break;
598 case BFD_RELOC_IA64_DTPMOD64MSB: rtype = R_IA64_DTPMOD64MSB; break;
599 case BFD_RELOC_IA64_DTPMOD64LSB: rtype = R_IA64_DTPMOD64LSB; break;
600 case BFD_RELOC_IA64_LTOFF_DTPMOD22: rtype = R_IA64_LTOFF_DTPMOD22; break;
602 case BFD_RELOC_IA64_DTPREL14: rtype = R_IA64_DTPREL14; break;
603 case BFD_RELOC_IA64_DTPREL22: rtype = R_IA64_DTPREL22; break;
604 case BFD_RELOC_IA64_DTPREL64I: rtype = R_IA64_DTPREL64I; break;
605 case BFD_RELOC_IA64_DTPREL32MSB: rtype = R_IA64_DTPREL32MSB; break;
606 case BFD_RELOC_IA64_DTPREL32LSB: rtype = R_IA64_DTPREL32LSB; break;
607 case BFD_RELOC_IA64_DTPREL64MSB: rtype = R_IA64_DTPREL64MSB; break;
608 case BFD_RELOC_IA64_DTPREL64LSB: rtype = R_IA64_DTPREL64LSB; break;
609 case BFD_RELOC_IA64_LTOFF_DTPREL22: rtype = R_IA64_LTOFF_DTPREL22; break;
613 return lookup_howto (rtype);
616 static reloc_howto_type *
617 elfNN_ia64_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
623 i < sizeof (ia64_howto_table) / sizeof (ia64_howto_table[0]);
625 if (ia64_howto_table[i].name != NULL
626 && strcasecmp (ia64_howto_table[i].name, r_name) == 0)
627 return &ia64_howto_table[i];
632 /* Given a ELF reloc, return the matching HOWTO structure. */
635 elfNN_ia64_info_to_howto (abfd, bfd_reloc, elf_reloc)
636 bfd *abfd ATTRIBUTE_UNUSED;
638 Elf_Internal_Rela *elf_reloc;
641 = lookup_howto ((unsigned int) ELFNN_R_TYPE (elf_reloc->r_info));
644 #define PLT_HEADER_SIZE (3 * 16)
645 #define PLT_MIN_ENTRY_SIZE (1 * 16)
646 #define PLT_FULL_ENTRY_SIZE (2 * 16)
647 #define PLT_RESERVED_WORDS 3
649 static const bfd_byte plt_header[PLT_HEADER_SIZE] =
651 0x0b, 0x10, 0x00, 0x1c, 0x00, 0x21, /* [MMI] mov r2=r14;; */
652 0xe0, 0x00, 0x08, 0x00, 0x48, 0x00, /* addl r14=0,r2 */
653 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
654 0x0b, 0x80, 0x20, 0x1c, 0x18, 0x14, /* [MMI] ld8 r16=[r14],8;; */
655 0x10, 0x41, 0x38, 0x30, 0x28, 0x00, /* ld8 r17=[r14],8 */
656 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
657 0x11, 0x08, 0x00, 0x1c, 0x18, 0x10, /* [MIB] ld8 r1=[r14] */
658 0x60, 0x88, 0x04, 0x80, 0x03, 0x00, /* mov b6=r17 */
659 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
662 static const bfd_byte plt_min_entry[PLT_MIN_ENTRY_SIZE] =
664 0x11, 0x78, 0x00, 0x00, 0x00, 0x24, /* [MIB] mov r15=0 */
665 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, /* nop.i 0x0 */
666 0x00, 0x00, 0x00, 0x40 /* br.few 0 <PLT0>;; */
669 static const bfd_byte plt_full_entry[PLT_FULL_ENTRY_SIZE] =
671 0x0b, 0x78, 0x00, 0x02, 0x00, 0x24, /* [MMI] addl r15=0,r1;; */
672 0x00, 0x41, 0x3c, 0x70, 0x29, 0xc0, /* ld8.acq r16=[r15],8*/
673 0x01, 0x08, 0x00, 0x84, /* mov r14=r1;; */
674 0x11, 0x08, 0x00, 0x1e, 0x18, 0x10, /* [MIB] ld8 r1=[r15] */
675 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
676 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
679 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
681 static const bfd_byte oor_brl[16] =
683 0x05, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
684 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* brl.sptk.few tgt;; */
685 0x00, 0x00, 0x00, 0xc0
688 static const bfd_byte oor_ip[48] =
690 0x04, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
691 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, /* movl r15=0 */
692 0x01, 0x00, 0x00, 0x60,
693 0x03, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MII] nop.m 0 */
694 0x00, 0x01, 0x00, 0x60, 0x00, 0x00, /* mov r16=ip;; */
695 0xf2, 0x80, 0x00, 0x80, /* add r16=r15,r16;; */
696 0x11, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MIB] nop.m 0 */
697 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
698 0x60, 0x00, 0x80, 0x00 /* br b6;; */
701 static size_t oor_branch_size = sizeof (oor_brl);
704 bfd_elfNN_ia64_after_parse (int itanium)
706 oor_branch_size = itanium ? sizeof (oor_ip) : sizeof (oor_brl);
709 #define BTYPE_SHIFT 6
716 #define OPCODE_SHIFT 37
718 #define OPCODE_BITS (0xfLL << OPCODE_SHIFT)
719 #define X6_BITS (0x3fLL << X6_SHIFT)
720 #define X4_BITS (0xfLL << X4_SHIFT)
721 #define X3_BITS (0x7LL << X3_SHIFT)
722 #define X2_BITS (0x3LL << X2_SHIFT)
723 #define X_BITS (0x1LL << X_SHIFT)
724 #define Y_BITS (0x1LL << Y_SHIFT)
725 #define BTYPE_BITS (0x7LL << BTYPE_SHIFT)
726 #define PREDICATE_BITS (0x3fLL)
728 #define IS_NOP_B(i) \
729 (((i) & (OPCODE_BITS | X6_BITS)) == (2LL << OPCODE_SHIFT))
730 #define IS_NOP_F(i) \
731 (((i) & (OPCODE_BITS | X_BITS | X6_BITS | Y_BITS)) \
732 == (0x1LL << X6_SHIFT))
733 #define IS_NOP_I(i) \
734 (((i) & (OPCODE_BITS | X3_BITS | X6_BITS | Y_BITS)) \
735 == (0x1LL << X6_SHIFT))
736 #define IS_NOP_M(i) \
737 (((i) & (OPCODE_BITS | X3_BITS | X2_BITS | X4_BITS | Y_BITS)) \
738 == (0x1LL << X4_SHIFT))
739 #define IS_BR_COND(i) \
740 (((i) & (OPCODE_BITS | BTYPE_BITS)) == (0x4LL << OPCODE_SHIFT))
741 #define IS_BR_CALL(i) \
742 (((i) & OPCODE_BITS) == (0x5LL << OPCODE_SHIFT))
745 elfNN_ia64_relax_br (bfd_byte *contents, bfd_vma off)
747 unsigned int template, mlx;
748 bfd_vma t0, t1, s0, s1, s2, br_code;
752 hit_addr = (bfd_byte *) (contents + off);
753 br_slot = (long) hit_addr & 0x3;
755 t0 = bfd_getl64 (hit_addr + 0);
756 t1 = bfd_getl64 (hit_addr + 8);
758 /* Check if we can turn br into brl. A label is always at the start
759 of the bundle. Even if there are predicates on NOPs, we still
760 perform this optimization. */
761 template = t0 & 0x1e;
762 s0 = (t0 >> 5) & 0x1ffffffffffLL;
763 s1 = ((t0 >> 46) | (t1 << 18)) & 0x1ffffffffffLL;
764 s2 = (t1 >> 23) & 0x1ffffffffffLL;
768 /* Check if slot 1 and slot 2 are NOPs. Possible template is
769 BBB. We only need to check nop.b. */
770 if (!(IS_NOP_B (s1) && IS_NOP_B (s2)))
775 /* Check if slot 2 is NOP. Possible templates are MBB and BBB.
776 For BBB, slot 0 also has to be nop.b. */
777 if (!((template == 0x12 /* MBB */
779 || (template == 0x16 /* BBB */
786 /* Check if slot 1 is NOP. Possible templates are MIB, MBB, BBB,
787 MMB and MFB. For BBB, slot 0 also has to be nop.b. */
788 if (!((template == 0x10 /* MIB */
790 || (template == 0x12 /* MBB */
792 || (template == 0x16 /* BBB */
795 || (template == 0x18 /* MMB */
797 || (template == 0x1c /* MFB */
803 /* It should never happen. */
807 /* We can turn br.cond/br.call into brl.cond/brl.call. */
808 if (!(IS_BR_COND (br_code) || IS_BR_CALL (br_code)))
811 /* Turn br into brl by setting bit 40. */
812 br_code |= 0x1LL << 40;
814 /* Turn the old bundle into a MLX bundle with the same stop-bit
821 if (template == 0x16)
823 /* For BBB, we need to put nop.m in slot 0. We keep the original
824 predicate only if slot 0 isn't br. */
828 t0 &= PREDICATE_BITS << 5;
829 t0 |= 0x1LL << (X4_SHIFT + 5);
833 /* Keep the original instruction in slot 0. */
834 t0 &= 0x1ffffffffffLL << 5;
839 /* Put brl in slot 1. */
842 bfd_putl64 (t0, hit_addr);
843 bfd_putl64 (t1, hit_addr + 8);
848 elfNN_ia64_relax_brl (bfd_byte *contents, bfd_vma off)
852 bfd_vma t0, t1, i0, i1, i2;
854 hit_addr = (bfd_byte *) (contents + off);
855 hit_addr -= (long) hit_addr & 0x3;
856 t0 = bfd_getl64 (hit_addr);
857 t1 = bfd_getl64 (hit_addr + 8);
859 /* Keep the instruction in slot 0. */
860 i0 = (t0 >> 5) & 0x1ffffffffffLL;
861 /* Use nop.b for slot 1. */
863 /* For slot 2, turn brl into br by masking out bit 40. */
864 i2 = (t1 >> 23) & 0x0ffffffffffLL;
866 /* Turn a MLX bundle into a MBB bundle with the same stop-bit
872 t0 = (i1 << 46) | (i0 << 5) | template;
873 t1 = (i2 << 23) | (i1 >> 18);
875 bfd_putl64 (t0, hit_addr);
876 bfd_putl64 (t1, hit_addr + 8);
879 /* Rename some of the generic section flags to better document how they
881 #define skip_relax_pass_0 need_finalize_relax
882 #define skip_relax_pass_1 has_gp_reloc
885 /* These functions do relaxation for IA-64 ELF. */
888 elfNN_ia64_relax_section (abfd, sec, link_info, again)
891 struct bfd_link_info *link_info;
896 struct one_fixup *next;
902 Elf_Internal_Shdr *symtab_hdr;
903 Elf_Internal_Rela *internal_relocs;
904 Elf_Internal_Rela *irel, *irelend;
906 Elf_Internal_Sym *isymbuf = NULL;
907 struct elfNN_ia64_link_hash_table *ia64_info;
908 struct one_fixup *fixups = NULL;
909 bfd_boolean changed_contents = FALSE;
910 bfd_boolean changed_relocs = FALSE;
911 bfd_boolean changed_got = FALSE;
912 bfd_boolean skip_relax_pass_0 = TRUE;
913 bfd_boolean skip_relax_pass_1 = TRUE;
916 /* Assume we're not going to change any sizes, and we'll only need
920 /* Don't even try to relax for non-ELF outputs. */
921 if (!is_elf_hash_table (link_info->hash))
924 /* Nothing to do if there are no relocations or there is no need for
926 if ((sec->flags & SEC_RELOC) == 0
927 || sec->reloc_count == 0
928 || (link_info->relax_pass == 0 && sec->skip_relax_pass_0)
929 || (link_info->relax_pass == 1 && sec->skip_relax_pass_1))
932 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
934 /* Load the relocations for this section. */
935 internal_relocs = (_bfd_elf_link_read_relocs
936 (abfd, sec, (PTR) NULL, (Elf_Internal_Rela *) NULL,
937 link_info->keep_memory));
938 if (internal_relocs == NULL)
941 ia64_info = elfNN_ia64_hash_table (link_info);
942 irelend = internal_relocs + sec->reloc_count;
944 /* Get the section contents. */
945 if (elf_section_data (sec)->this_hdr.contents != NULL)
946 contents = elf_section_data (sec)->this_hdr.contents;
949 if (!bfd_malloc_and_get_section (abfd, sec, &contents))
953 for (irel = internal_relocs; irel < irelend; irel++)
955 unsigned long r_type = ELFNN_R_TYPE (irel->r_info);
956 bfd_vma symaddr, reladdr, trampoff, toff, roff;
960 bfd_boolean is_branch;
961 struct elfNN_ia64_dyn_sym_info *dyn_i;
966 case R_IA64_PCREL21B:
967 case R_IA64_PCREL21BI:
968 case R_IA64_PCREL21M:
969 case R_IA64_PCREL21F:
970 /* In pass 1, all br relaxations are done. We can skip it. */
971 if (link_info->relax_pass == 1)
973 skip_relax_pass_0 = FALSE;
977 case R_IA64_PCREL60B:
978 /* We can't optimize brl to br in pass 0 since br relaxations
979 will increase the code size. Defer it to pass 1. */
980 if (link_info->relax_pass == 0)
982 skip_relax_pass_1 = FALSE;
988 case R_IA64_LTOFF22X:
990 /* We can't relax ldx/mov in pass 0 since br relaxations will
991 increase the code size. Defer it to pass 1. */
992 if (link_info->relax_pass == 0)
994 skip_relax_pass_1 = FALSE;
1004 /* Get the value of the symbol referred to by the reloc. */
1005 if (ELFNN_R_SYM (irel->r_info) < symtab_hdr->sh_info)
1007 /* A local symbol. */
1008 Elf_Internal_Sym *isym;
1010 /* Read this BFD's local symbols. */
1011 if (isymbuf == NULL)
1013 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
1014 if (isymbuf == NULL)
1015 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
1016 symtab_hdr->sh_info, 0,
1022 isym = isymbuf + ELFNN_R_SYM (irel->r_info);
1023 if (isym->st_shndx == SHN_UNDEF)
1024 continue; /* We can't do anything with undefined symbols. */
1025 else if (isym->st_shndx == SHN_ABS)
1026 tsec = bfd_abs_section_ptr;
1027 else if (isym->st_shndx == SHN_COMMON)
1028 tsec = bfd_com_section_ptr;
1029 else if (isym->st_shndx == SHN_IA_64_ANSI_COMMON)
1030 tsec = bfd_com_section_ptr;
1032 tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
1034 toff = isym->st_value;
1035 dyn_i = get_dyn_sym_info (ia64_info, NULL, abfd, irel, FALSE);
1036 symtype = ELF_ST_TYPE (isym->st_info);
1041 struct elf_link_hash_entry *h;
1043 indx = ELFNN_R_SYM (irel->r_info) - symtab_hdr->sh_info;
1044 h = elf_sym_hashes (abfd)[indx];
1045 BFD_ASSERT (h != NULL);
1047 while (h->root.type == bfd_link_hash_indirect
1048 || h->root.type == bfd_link_hash_warning)
1049 h = (struct elf_link_hash_entry *) h->root.u.i.link;
1051 dyn_i = get_dyn_sym_info (ia64_info, h, abfd, irel, FALSE);
1053 /* For branches to dynamic symbols, we're interested instead
1054 in a branch to the PLT entry. */
1055 if (is_branch && dyn_i && dyn_i->want_plt2)
1057 /* Internal branches shouldn't be sent to the PLT.
1058 Leave this for now and we'll give an error later. */
1059 if (r_type != R_IA64_PCREL21B)
1062 tsec = ia64_info->plt_sec;
1063 toff = dyn_i->plt2_offset;
1064 BFD_ASSERT (irel->r_addend == 0);
1067 /* Can't do anything else with dynamic symbols. */
1068 else if (elfNN_ia64_dynamic_symbol_p (h, link_info, r_type))
1073 /* We can't do anything with undefined symbols. */
1074 if (h->root.type == bfd_link_hash_undefined
1075 || h->root.type == bfd_link_hash_undefweak)
1078 tsec = h->root.u.def.section;
1079 toff = h->root.u.def.value;
1085 if (tsec->sec_info_type == ELF_INFO_TYPE_MERGE)
1087 /* At this stage in linking, no SEC_MERGE symbol has been
1088 adjusted, so all references to such symbols need to be
1089 passed through _bfd_merged_section_offset. (Later, in
1090 relocate_section, all SEC_MERGE symbols *except* for
1091 section symbols have been adjusted.)
1093 gas may reduce relocations against symbols in SEC_MERGE
1094 sections to a relocation against the section symbol when
1095 the original addend was zero. When the reloc is against
1096 a section symbol we should include the addend in the
1097 offset passed to _bfd_merged_section_offset, since the
1098 location of interest is the original symbol. On the
1099 other hand, an access to "sym+addend" where "sym" is not
1100 a section symbol should not include the addend; Such an
1101 access is presumed to be an offset from "sym"; The
1102 location of interest is just "sym". */
1103 if (symtype == STT_SECTION)
1104 toff += irel->r_addend;
1106 toff = _bfd_merged_section_offset (abfd, &tsec,
1107 elf_section_data (tsec)->sec_info,
1110 if (symtype != STT_SECTION)
1111 toff += irel->r_addend;
1114 toff += irel->r_addend;
1116 symaddr = tsec->output_section->vma + tsec->output_offset + toff;
1118 roff = irel->r_offset;
1122 bfd_signed_vma offset;
1124 reladdr = (sec->output_section->vma
1125 + sec->output_offset
1126 + roff) & (bfd_vma) -4;
1128 /* If the branch is in range, no need to do anything. */
1129 if ((bfd_signed_vma) (symaddr - reladdr) >= -0x1000000
1130 && (bfd_signed_vma) (symaddr - reladdr) <= 0x0FFFFF0)
1132 /* If the 60-bit branch is in 21-bit range, optimize it. */
1133 if (r_type == R_IA64_PCREL60B)
1135 elfNN_ia64_relax_brl (contents, roff);
1138 = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1141 /* If the original relocation offset points to slot
1142 1, change it to slot 2. */
1143 if ((irel->r_offset & 3) == 1)
1144 irel->r_offset += 1;
1149 else if (r_type == R_IA64_PCREL60B)
1151 else if (elfNN_ia64_relax_br (contents, roff))
1154 = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1157 /* Make the relocation offset point to slot 1. */
1158 irel->r_offset = (irel->r_offset & ~((bfd_vma) 0x3)) + 1;
1162 /* We can't put a trampoline in a .init/.fini section. Issue
1164 if (strcmp (sec->output_section->name, ".init") == 0
1165 || strcmp (sec->output_section->name, ".fini") == 0)
1167 (*_bfd_error_handler)
1168 (_("%B: Can't relax br at 0x%lx in section `%A'. Please use brl or indirect branch."),
1169 sec->owner, sec, (unsigned long) roff);
1170 bfd_set_error (bfd_error_bad_value);
1174 /* If the branch and target are in the same section, you've
1175 got one honking big section and we can't help you unless
1176 you are branching backwards. You'll get an error message
1178 if (tsec == sec && toff > roff)
1181 /* Look for an existing fixup to this address. */
1182 for (f = fixups; f ; f = f->next)
1183 if (f->tsec == tsec && f->toff == toff)
1188 /* Two alternatives: If it's a branch to a PLT entry, we can
1189 make a copy of the FULL_PLT entry. Otherwise, we'll have
1190 to use a `brl' insn to get where we're going. */
1194 if (tsec == ia64_info->plt_sec)
1195 size = sizeof (plt_full_entry);
1197 size = oor_branch_size;
1199 /* Resize the current section to make room for the new branch. */
1200 trampoff = (sec->size + 15) & (bfd_vma) -16;
1202 /* If trampoline is out of range, there is nothing we
1204 offset = trampoff - (roff & (bfd_vma) -4);
1205 if (offset < -0x1000000 || offset > 0x0FFFFF0)
1208 amt = trampoff + size;
1209 contents = (bfd_byte *) bfd_realloc (contents, amt);
1210 if (contents == NULL)
1214 if (tsec == ia64_info->plt_sec)
1216 memcpy (contents + trampoff, plt_full_entry, size);
1218 /* Hijack the old relocation for use as the PLTOFF reloc. */
1219 irel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1221 irel->r_offset = trampoff;
1225 if (size == sizeof (oor_ip))
1227 memcpy (contents + trampoff, oor_ip, size);
1228 irel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1230 irel->r_addend -= 16;
1231 irel->r_offset = trampoff + 2;
1235 memcpy (contents + trampoff, oor_brl, size);
1236 irel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1238 irel->r_offset = trampoff + 2;
1243 /* Record the fixup so we don't do it again this section. */
1244 f = (struct one_fixup *)
1245 bfd_malloc ((bfd_size_type) sizeof (*f));
1249 f->trampoff = trampoff;
1254 /* If trampoline is out of range, there is nothing we
1256 offset = f->trampoff - (roff & (bfd_vma) -4);
1257 if (offset < -0x1000000 || offset > 0x0FFFFF0)
1260 /* Nop out the reloc, since we're finalizing things here. */
1261 irel->r_info = ELFNN_R_INFO (0, R_IA64_NONE);
1264 /* Fix up the existing branch to hit the trampoline. */
1265 if (elfNN_ia64_install_value (contents + roff, offset, r_type)
1269 changed_contents = TRUE;
1270 changed_relocs = TRUE;
1277 bfd *obfd = sec->output_section->owner;
1278 gp = _bfd_get_gp_value (obfd);
1281 if (!elfNN_ia64_choose_gp (obfd, link_info))
1283 gp = _bfd_get_gp_value (obfd);
1287 /* If the data is out of range, do nothing. */
1288 if ((bfd_signed_vma) (symaddr - gp) >= 0x200000
1289 ||(bfd_signed_vma) (symaddr - gp) < -0x200000)
1292 if (r_type == R_IA64_LTOFF22X)
1294 irel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1296 changed_relocs = TRUE;
1297 if (dyn_i->want_gotx)
1299 dyn_i->want_gotx = 0;
1300 changed_got |= !dyn_i->want_got;
1305 elfNN_ia64_relax_ldxmov (contents, roff);
1306 irel->r_info = ELFNN_R_INFO (0, R_IA64_NONE);
1307 changed_contents = TRUE;
1308 changed_relocs = TRUE;
1313 /* ??? If we created fixups, this may push the code segment large
1314 enough that the data segment moves, which will change the GP.
1315 Reset the GP so that we re-calculate next round. We need to
1316 do this at the _beginning_ of the next round; now will not do. */
1318 /* Clean up and go home. */
1321 struct one_fixup *f = fixups;
1322 fixups = fixups->next;
1327 && symtab_hdr->contents != (unsigned char *) isymbuf)
1329 if (! link_info->keep_memory)
1333 /* Cache the symbols for elf_link_input_bfd. */
1334 symtab_hdr->contents = (unsigned char *) isymbuf;
1338 if (contents != NULL
1339 && elf_section_data (sec)->this_hdr.contents != contents)
1341 if (!changed_contents && !link_info->keep_memory)
1345 /* Cache the section contents for elf_link_input_bfd. */
1346 elf_section_data (sec)->this_hdr.contents = contents;
1350 if (elf_section_data (sec)->relocs != internal_relocs)
1352 if (!changed_relocs)
1353 free (internal_relocs);
1355 elf_section_data (sec)->relocs = internal_relocs;
1360 struct elfNN_ia64_allocate_data data;
1361 data.info = link_info;
1363 ia64_info->self_dtpmod_offset = (bfd_vma) -1;
1365 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_global_data_got, &data);
1366 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_global_fptr_got, &data);
1367 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_local_got, &data);
1368 ia64_info->got_sec->size = data.ofs;
1370 if (ia64_info->root.dynamic_sections_created
1371 && ia64_info->rel_got_sec != NULL)
1373 /* Resize .rela.got. */
1374 ia64_info->rel_got_sec->size = 0;
1375 if (link_info->shared
1376 && ia64_info->self_dtpmod_offset != (bfd_vma) -1)
1377 ia64_info->rel_got_sec->size += sizeof (ElfNN_External_Rela);
1378 data.only_got = TRUE;
1379 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_dynrel_entries,
1384 if (link_info->relax_pass == 0)
1386 /* Pass 0 is only needed to relax br. */
1387 sec->skip_relax_pass_0 = skip_relax_pass_0;
1388 sec->skip_relax_pass_1 = skip_relax_pass_1;
1391 *again = changed_contents || changed_relocs;
1395 if (isymbuf != NULL && (unsigned char *) isymbuf != symtab_hdr->contents)
1397 if (contents != NULL
1398 && elf_section_data (sec)->this_hdr.contents != contents)
1400 if (internal_relocs != NULL
1401 && elf_section_data (sec)->relocs != internal_relocs)
1402 free (internal_relocs);
1405 #undef skip_relax_pass_0
1406 #undef skip_relax_pass_1
1409 elfNN_ia64_relax_ldxmov (contents, off)
1414 bfd_vma dword, insn;
1416 switch ((int)off & 0x3)
1418 case 0: shift = 5; break;
1419 case 1: shift = 14; off += 3; break;
1420 case 2: shift = 23; off += 6; break;
1425 dword = bfd_getl64 (contents + off);
1426 insn = (dword >> shift) & 0x1ffffffffffLL;
1428 r1 = (insn >> 6) & 127;
1429 r3 = (insn >> 20) & 127;
1431 insn = 0x8000000; /* nop */
1433 insn = (insn & 0x7f01fff) | 0x10800000000LL; /* (qp) mov r1 = r3 */
1435 dword &= ~(0x1ffffffffffLL << shift);
1436 dword |= (insn << shift);
1437 bfd_putl64 (dword, contents + off);
1440 /* Return TRUE if NAME is an unwind table section name. */
1442 static inline bfd_boolean
1443 is_unwind_section_name (bfd *abfd, const char *name)
1445 if (elfNN_ia64_hpux_vec (abfd->xvec)
1446 && !strcmp (name, ELF_STRING_ia64_unwind_hdr))
1449 return ((CONST_STRNEQ (name, ELF_STRING_ia64_unwind)
1450 && ! CONST_STRNEQ (name, ELF_STRING_ia64_unwind_info))
1451 || CONST_STRNEQ (name, ELF_STRING_ia64_unwind_once));
1454 /* Handle an IA-64 specific section when reading an object file. This
1455 is called when bfd_section_from_shdr finds a section with an unknown
1459 elfNN_ia64_section_from_shdr (bfd *abfd,
1460 Elf_Internal_Shdr *hdr,
1466 /* There ought to be a place to keep ELF backend specific flags, but
1467 at the moment there isn't one. We just keep track of the
1468 sections by their name, instead. Fortunately, the ABI gives
1469 suggested names for all the MIPS specific sections, so we will
1470 probably get away with this. */
1471 switch (hdr->sh_type)
1473 case SHT_IA_64_UNWIND:
1474 case SHT_IA_64_HP_OPT_ANOT:
1478 if (strcmp (name, ELF_STRING_ia64_archext) != 0)
1486 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
1488 newsect = hdr->bfd_section;
1493 /* Convert IA-64 specific section flags to bfd internal section flags. */
1495 /* ??? There is no bfd internal flag equivalent to the SHF_IA_64_NORECOV
1499 elfNN_ia64_section_flags (flags, hdr)
1501 const Elf_Internal_Shdr *hdr;
1503 if (hdr->sh_flags & SHF_IA_64_SHORT)
1504 *flags |= SEC_SMALL_DATA;
1509 /* Set the correct type for an IA-64 ELF section. We do this by the
1510 section name, which is a hack, but ought to work. */
1513 elfNN_ia64_fake_sections (abfd, hdr, sec)
1514 bfd *abfd ATTRIBUTE_UNUSED;
1515 Elf_Internal_Shdr *hdr;
1518 register const char *name;
1520 name = bfd_get_section_name (abfd, sec);
1522 if (is_unwind_section_name (abfd, name))
1524 /* We don't have the sections numbered at this point, so sh_info
1525 is set later, in elfNN_ia64_final_write_processing. */
1526 hdr->sh_type = SHT_IA_64_UNWIND;
1527 hdr->sh_flags |= SHF_LINK_ORDER;
1529 else if (strcmp (name, ELF_STRING_ia64_archext) == 0)
1530 hdr->sh_type = SHT_IA_64_EXT;
1531 else if (strcmp (name, ".HP.opt_annot") == 0)
1532 hdr->sh_type = SHT_IA_64_HP_OPT_ANOT;
1533 else if (strcmp (name, ".reloc") == 0)
1534 /* This is an ugly, but unfortunately necessary hack that is
1535 needed when producing EFI binaries on IA-64. It tells
1536 elf.c:elf_fake_sections() not to consider ".reloc" as a section
1537 containing ELF relocation info. We need this hack in order to
1538 be able to generate ELF binaries that can be translated into
1539 EFI applications (which are essentially COFF objects). Those
1540 files contain a COFF ".reloc" section inside an ELFNN object,
1541 which would normally cause BFD to segfault because it would
1542 attempt to interpret this section as containing relocation
1543 entries for section "oc". With this hack enabled, ".reloc"
1544 will be treated as a normal data section, which will avoid the
1545 segfault. However, you won't be able to create an ELFNN binary
1546 with a section named "oc" that needs relocations, but that's
1547 the kind of ugly side-effects you get when detecting section
1548 types based on their names... In practice, this limitation is
1549 unlikely to bite. */
1550 hdr->sh_type = SHT_PROGBITS;
1552 if (sec->flags & SEC_SMALL_DATA)
1553 hdr->sh_flags |= SHF_IA_64_SHORT;
1555 /* Some HP linkers look for the SHF_IA_64_HP_TLS flag instead of SHF_TLS. */
1557 if (elfNN_ia64_hpux_vec (abfd->xvec) && (sec->flags & SHF_TLS))
1558 hdr->sh_flags |= SHF_IA_64_HP_TLS;
1563 /* The final processing done just before writing out an IA-64 ELF
1567 elfNN_ia64_final_write_processing (abfd, linker)
1569 bfd_boolean linker ATTRIBUTE_UNUSED;
1571 Elf_Internal_Shdr *hdr;
1574 for (s = abfd->sections; s; s = s->next)
1576 hdr = &elf_section_data (s)->this_hdr;
1577 switch (hdr->sh_type)
1579 case SHT_IA_64_UNWIND:
1580 /* The IA-64 processor-specific ABI requires setting sh_link
1581 to the unwind section, whereas HP-UX requires sh_info to
1582 do so. For maximum compatibility, we'll set both for
1584 hdr->sh_info = hdr->sh_link;
1589 if (! elf_flags_init (abfd))
1591 unsigned long flags = 0;
1593 if (abfd->xvec->byteorder == BFD_ENDIAN_BIG)
1594 flags |= EF_IA_64_BE;
1595 if (bfd_get_mach (abfd) == bfd_mach_ia64_elf64)
1596 flags |= EF_IA_64_ABI64;
1598 elf_elfheader(abfd)->e_flags = flags;
1599 elf_flags_init (abfd) = TRUE;
1603 /* Hook called by the linker routine which adds symbols from an object
1604 file. We use it to put .comm items in .sbss, and not .bss. */
1607 elfNN_ia64_add_symbol_hook (abfd, info, sym, namep, flagsp, secp, valp)
1609 struct bfd_link_info *info;
1610 Elf_Internal_Sym *sym;
1611 const char **namep ATTRIBUTE_UNUSED;
1612 flagword *flagsp ATTRIBUTE_UNUSED;
1616 if (sym->st_shndx == SHN_COMMON
1617 && !info->relocatable
1618 && sym->st_size <= elf_gp_size (abfd))
1620 /* Common symbols less than or equal to -G nn bytes are
1621 automatically put into .sbss. */
1623 asection *scomm = bfd_get_section_by_name (abfd, ".scommon");
1627 scomm = bfd_make_section_with_flags (abfd, ".scommon",
1630 | SEC_LINKER_CREATED));
1636 *valp = sym->st_size;
1642 /* Return the number of additional phdrs we will need. */
1645 elfNN_ia64_additional_program_headers (bfd *abfd,
1646 struct bfd_link_info *info ATTRIBUTE_UNUSED)
1651 /* See if we need a PT_IA_64_ARCHEXT segment. */
1652 s = bfd_get_section_by_name (abfd, ELF_STRING_ia64_archext);
1653 if (s && (s->flags & SEC_LOAD))
1656 /* Count how many PT_IA_64_UNWIND segments we need. */
1657 for (s = abfd->sections; s; s = s->next)
1658 if (is_unwind_section_name (abfd, s->name) && (s->flags & SEC_LOAD))
1665 elfNN_ia64_modify_segment_map (bfd *abfd,
1666 struct bfd_link_info *info ATTRIBUTE_UNUSED)
1668 struct elf_segment_map *m, **pm;
1669 Elf_Internal_Shdr *hdr;
1672 /* If we need a PT_IA_64_ARCHEXT segment, it must come before
1673 all PT_LOAD segments. */
1674 s = bfd_get_section_by_name (abfd, ELF_STRING_ia64_archext);
1675 if (s && (s->flags & SEC_LOAD))
1677 for (m = elf_tdata (abfd)->segment_map; m != NULL; m = m->next)
1678 if (m->p_type == PT_IA_64_ARCHEXT)
1682 m = ((struct elf_segment_map *)
1683 bfd_zalloc (abfd, (bfd_size_type) sizeof *m));
1687 m->p_type = PT_IA_64_ARCHEXT;
1691 /* We want to put it after the PHDR and INTERP segments. */
1692 pm = &elf_tdata (abfd)->segment_map;
1694 && ((*pm)->p_type == PT_PHDR
1695 || (*pm)->p_type == PT_INTERP))
1703 /* Install PT_IA_64_UNWIND segments, if needed. */
1704 for (s = abfd->sections; s; s = s->next)
1706 hdr = &elf_section_data (s)->this_hdr;
1707 if (hdr->sh_type != SHT_IA_64_UNWIND)
1710 if (s && (s->flags & SEC_LOAD))
1712 for (m = elf_tdata (abfd)->segment_map; m != NULL; m = m->next)
1713 if (m->p_type == PT_IA_64_UNWIND)
1717 /* Look through all sections in the unwind segment
1718 for a match since there may be multiple sections
1720 for (i = m->count - 1; i >= 0; --i)
1721 if (m->sections[i] == s)
1730 m = ((struct elf_segment_map *)
1731 bfd_zalloc (abfd, (bfd_size_type) sizeof *m));
1735 m->p_type = PT_IA_64_UNWIND;
1740 /* We want to put it last. */
1741 pm = &elf_tdata (abfd)->segment_map;
1752 /* Turn on PF_IA_64_NORECOV if needed. This involves traversing all of
1753 the input sections for each output section in the segment and testing
1754 for SHF_IA_64_NORECOV on each. */
1757 elfNN_ia64_modify_program_headers (bfd *abfd,
1758 struct bfd_link_info *info ATTRIBUTE_UNUSED)
1760 struct elf_obj_tdata *tdata = elf_tdata (abfd);
1761 struct elf_segment_map *m;
1762 Elf_Internal_Phdr *p;
1764 for (p = tdata->phdr, m = tdata->segment_map; m != NULL; m = m->next, p++)
1765 if (m->p_type == PT_LOAD)
1768 for (i = m->count - 1; i >= 0; --i)
1770 struct bfd_link_order *order = m->sections[i]->map_head.link_order;
1772 while (order != NULL)
1774 if (order->type == bfd_indirect_link_order)
1776 asection *is = order->u.indirect.section;
1777 bfd_vma flags = elf_section_data(is)->this_hdr.sh_flags;
1778 if (flags & SHF_IA_64_NORECOV)
1780 p->p_flags |= PF_IA_64_NORECOV;
1784 order = order->next;
1793 /* According to the Tahoe assembler spec, all labels starting with a
1797 elfNN_ia64_is_local_label_name (abfd, name)
1798 bfd *abfd ATTRIBUTE_UNUSED;
1801 return name[0] == '.';
1804 /* Should we do dynamic things to this symbol? */
1807 elfNN_ia64_dynamic_symbol_p (h, info, r_type)
1808 struct elf_link_hash_entry *h;
1809 struct bfd_link_info *info;
1812 bfd_boolean ignore_protected
1813 = ((r_type & 0xf8) == 0x40 /* FPTR relocs */
1814 || (r_type & 0xf8) == 0x50); /* LTOFF_FPTR relocs */
1816 return _bfd_elf_dynamic_symbol_p (h, info, ignore_protected);
1819 static struct bfd_hash_entry*
1820 elfNN_ia64_new_elf_hash_entry (entry, table, string)
1821 struct bfd_hash_entry *entry;
1822 struct bfd_hash_table *table;
1825 struct elfNN_ia64_link_hash_entry *ret;
1826 ret = (struct elfNN_ia64_link_hash_entry *) entry;
1828 /* Allocate the structure if it has not already been allocated by a
1831 ret = bfd_hash_allocate (table, sizeof (*ret));
1836 /* Call the allocation method of the superclass. */
1837 ret = ((struct elfNN_ia64_link_hash_entry *)
1838 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
1843 ret->sorted_count = 0;
1845 return (struct bfd_hash_entry *) ret;
1849 elfNN_ia64_hash_copy_indirect (info, xdir, xind)
1850 struct bfd_link_info *info;
1851 struct elf_link_hash_entry *xdir, *xind;
1853 struct elfNN_ia64_link_hash_entry *dir, *ind;
1855 dir = (struct elfNN_ia64_link_hash_entry *) xdir;
1856 ind = (struct elfNN_ia64_link_hash_entry *) xind;
1858 /* Copy down any references that we may have already seen to the
1859 symbol which just became indirect. */
1861 dir->root.ref_dynamic |= ind->root.ref_dynamic;
1862 dir->root.ref_regular |= ind->root.ref_regular;
1863 dir->root.ref_regular_nonweak |= ind->root.ref_regular_nonweak;
1864 dir->root.needs_plt |= ind->root.needs_plt;
1866 if (ind->root.root.type != bfd_link_hash_indirect)
1869 /* Copy over the got and plt data. This would have been done
1872 if (ind->info != NULL)
1874 struct elfNN_ia64_dyn_sym_info *dyn_i;
1880 dir->info = ind->info;
1881 dir->count = ind->count;
1882 dir->sorted_count = ind->sorted_count;
1883 dir->size = ind->size;
1887 ind->sorted_count = 0;
1890 /* Fix up the dyn_sym_info pointers to the global symbol. */
1891 for (count = dir->count, dyn_i = dir->info;
1894 dyn_i->h = &dir->root;
1897 /* Copy over the dynindx. */
1899 if (ind->root.dynindx != -1)
1901 if (dir->root.dynindx != -1)
1902 _bfd_elf_strtab_delref (elf_hash_table (info)->dynstr,
1903 dir->root.dynstr_index);
1904 dir->root.dynindx = ind->root.dynindx;
1905 dir->root.dynstr_index = ind->root.dynstr_index;
1906 ind->root.dynindx = -1;
1907 ind->root.dynstr_index = 0;
1912 elfNN_ia64_hash_hide_symbol (info, xh, force_local)
1913 struct bfd_link_info *info;
1914 struct elf_link_hash_entry *xh;
1915 bfd_boolean force_local;
1917 struct elfNN_ia64_link_hash_entry *h;
1918 struct elfNN_ia64_dyn_sym_info *dyn_i;
1921 h = (struct elfNN_ia64_link_hash_entry *)xh;
1923 _bfd_elf_link_hash_hide_symbol (info, &h->root, force_local);
1925 for (count = h->count, dyn_i = h->info;
1929 dyn_i->want_plt2 = 0;
1930 dyn_i->want_plt = 0;
1934 /* Compute a hash of a local hash entry. */
1937 elfNN_ia64_local_htab_hash (ptr)
1940 struct elfNN_ia64_local_hash_entry *entry
1941 = (struct elfNN_ia64_local_hash_entry *) ptr;
1943 return (((entry->id & 0xff) << 24) | ((entry->id & 0xff00) << 8))
1944 ^ entry->r_sym ^ (entry->id >> 16);
1947 /* Compare local hash entries. */
1950 elfNN_ia64_local_htab_eq (ptr1, ptr2)
1951 const void *ptr1, *ptr2;
1953 struct elfNN_ia64_local_hash_entry *entry1
1954 = (struct elfNN_ia64_local_hash_entry *) ptr1;
1955 struct elfNN_ia64_local_hash_entry *entry2
1956 = (struct elfNN_ia64_local_hash_entry *) ptr2;
1958 return entry1->id == entry2->id && entry1->r_sym == entry2->r_sym;
1961 /* Create the derived linker hash table. The IA-64 ELF port uses this
1962 derived hash table to keep information specific to the IA-64 ElF
1963 linker (without using static variables). */
1965 static struct bfd_link_hash_table*
1966 elfNN_ia64_hash_table_create (abfd)
1969 struct elfNN_ia64_link_hash_table *ret;
1971 ret = bfd_zmalloc ((bfd_size_type) sizeof (*ret));
1975 if (!_bfd_elf_link_hash_table_init (&ret->root, abfd,
1976 elfNN_ia64_new_elf_hash_entry,
1977 sizeof (struct elfNN_ia64_link_hash_entry)))
1983 ret->loc_hash_table = htab_try_create (1024, elfNN_ia64_local_htab_hash,
1984 elfNN_ia64_local_htab_eq, NULL);
1985 ret->loc_hash_memory = objalloc_create ();
1986 if (!ret->loc_hash_table || !ret->loc_hash_memory)
1992 return &ret->root.root;
1995 /* Free the global elfNN_ia64_dyn_sym_info array. */
1998 elfNN_ia64_global_dyn_info_free (void **xentry,
1999 PTR unused ATTRIBUTE_UNUSED)
2001 struct elfNN_ia64_link_hash_entry *entry
2002 = (struct elfNN_ia64_link_hash_entry *) xentry;
2004 if (entry->root.root.type == bfd_link_hash_warning)
2005 entry = (struct elfNN_ia64_link_hash_entry *) entry->root.root.u.i.link;
2012 entry->sorted_count = 0;
2019 /* Free the local elfNN_ia64_dyn_sym_info array. */
2022 elfNN_ia64_local_dyn_info_free (void **slot,
2023 PTR unused ATTRIBUTE_UNUSED)
2025 struct elfNN_ia64_local_hash_entry *entry
2026 = (struct elfNN_ia64_local_hash_entry *) *slot;
2033 entry->sorted_count = 0;
2040 /* Destroy IA-64 linker hash table. */
2043 elfNN_ia64_hash_table_free (hash)
2044 struct bfd_link_hash_table *hash;
2046 struct elfNN_ia64_link_hash_table *ia64_info
2047 = (struct elfNN_ia64_link_hash_table *) hash;
2048 if (ia64_info->loc_hash_table)
2050 htab_traverse (ia64_info->loc_hash_table,
2051 elfNN_ia64_local_dyn_info_free, NULL);
2052 htab_delete (ia64_info->loc_hash_table);
2054 if (ia64_info->loc_hash_memory)
2055 objalloc_free ((struct objalloc *) ia64_info->loc_hash_memory);
2056 elf_link_hash_traverse (&ia64_info->root,
2057 elfNN_ia64_global_dyn_info_free, NULL);
2058 _bfd_generic_link_hash_table_free (hash);
2061 /* Traverse both local and global hash tables. */
2063 struct elfNN_ia64_dyn_sym_traverse_data
2065 bfd_boolean (*func) PARAMS ((struct elfNN_ia64_dyn_sym_info *, PTR));
2070 elfNN_ia64_global_dyn_sym_thunk (xentry, xdata)
2071 struct bfd_hash_entry *xentry;
2074 struct elfNN_ia64_link_hash_entry *entry
2075 = (struct elfNN_ia64_link_hash_entry *) xentry;
2076 struct elfNN_ia64_dyn_sym_traverse_data *data
2077 = (struct elfNN_ia64_dyn_sym_traverse_data *) xdata;
2078 struct elfNN_ia64_dyn_sym_info *dyn_i;
2081 if (entry->root.root.type == bfd_link_hash_warning)
2082 entry = (struct elfNN_ia64_link_hash_entry *) entry->root.root.u.i.link;
2084 for (count = entry->count, dyn_i = entry->info;
2087 if (! (*data->func) (dyn_i, data->data))
2093 elfNN_ia64_local_dyn_sym_thunk (slot, xdata)
2097 struct elfNN_ia64_local_hash_entry *entry
2098 = (struct elfNN_ia64_local_hash_entry *) *slot;
2099 struct elfNN_ia64_dyn_sym_traverse_data *data
2100 = (struct elfNN_ia64_dyn_sym_traverse_data *) xdata;
2101 struct elfNN_ia64_dyn_sym_info *dyn_i;
2104 for (count = entry->count, dyn_i = entry->info;
2107 if (! (*data->func) (dyn_i, data->data))
2113 elfNN_ia64_dyn_sym_traverse (ia64_info, func, data)
2114 struct elfNN_ia64_link_hash_table *ia64_info;
2115 bfd_boolean (*func) PARAMS ((struct elfNN_ia64_dyn_sym_info *, PTR));
2118 struct elfNN_ia64_dyn_sym_traverse_data xdata;
2123 elf_link_hash_traverse (&ia64_info->root,
2124 elfNN_ia64_global_dyn_sym_thunk, &xdata);
2125 htab_traverse (ia64_info->loc_hash_table,
2126 elfNN_ia64_local_dyn_sym_thunk, &xdata);
2130 elfNN_ia64_create_dynamic_sections (abfd, info)
2132 struct bfd_link_info *info;
2134 struct elfNN_ia64_link_hash_table *ia64_info;
2137 if (! _bfd_elf_create_dynamic_sections (abfd, info))
2140 ia64_info = elfNN_ia64_hash_table (info);
2142 ia64_info->plt_sec = bfd_get_section_by_name (abfd, ".plt");
2143 ia64_info->got_sec = bfd_get_section_by_name (abfd, ".got");
2146 flagword flags = bfd_get_section_flags (abfd, ia64_info->got_sec);
2147 bfd_set_section_flags (abfd, ia64_info->got_sec, SEC_SMALL_DATA | flags);
2148 /* The .got section is always aligned at 8 bytes. */
2149 bfd_set_section_alignment (abfd, ia64_info->got_sec, 3);
2152 if (!get_pltoff (abfd, info, ia64_info))
2155 s = bfd_make_section_with_flags (abfd, ".rela.IA_64.pltoff",
2156 (SEC_ALLOC | SEC_LOAD
2159 | SEC_LINKER_CREATED
2162 || !bfd_set_section_alignment (abfd, s, LOG_SECTION_ALIGN))
2164 ia64_info->rel_pltoff_sec = s;
2166 s = bfd_make_section_with_flags (abfd, ".rela.got",
2167 (SEC_ALLOC | SEC_LOAD
2170 | SEC_LINKER_CREATED
2173 || !bfd_set_section_alignment (abfd, s, LOG_SECTION_ALIGN))
2175 ia64_info->rel_got_sec = s;
2180 /* Find and/or create a hash entry for local symbol. */
2181 static struct elfNN_ia64_local_hash_entry *
2182 get_local_sym_hash (ia64_info, abfd, rel, create)
2183 struct elfNN_ia64_link_hash_table *ia64_info;
2185 const Elf_Internal_Rela *rel;
2188 struct elfNN_ia64_local_hash_entry e, *ret;
2189 asection *sec = abfd->sections;
2190 hashval_t h = (((sec->id & 0xff) << 24) | ((sec->id & 0xff00) << 8))
2191 ^ ELFNN_R_SYM (rel->r_info) ^ (sec->id >> 16);
2195 e.r_sym = ELFNN_R_SYM (rel->r_info);
2196 slot = htab_find_slot_with_hash (ia64_info->loc_hash_table, &e, h,
2197 create ? INSERT : NO_INSERT);
2203 return (struct elfNN_ia64_local_hash_entry *) *slot;
2205 ret = (struct elfNN_ia64_local_hash_entry *)
2206 objalloc_alloc ((struct objalloc *) ia64_info->loc_hash_memory,
2207 sizeof (struct elfNN_ia64_local_hash_entry));
2210 memset (ret, 0, sizeof (*ret));
2212 ret->r_sym = ELFNN_R_SYM (rel->r_info);
2218 /* Used to sort elfNN_ia64_dyn_sym_info array. */
2221 addend_compare (const void *xp, const void *yp)
2223 const struct elfNN_ia64_dyn_sym_info *x
2224 = (const struct elfNN_ia64_dyn_sym_info *) xp;
2225 const struct elfNN_ia64_dyn_sym_info *y
2226 = (const struct elfNN_ia64_dyn_sym_info *) yp;
2228 return x->addend < y->addend ? -1 : x->addend > y->addend ? 1 : 0;
2231 /* Sort elfNN_ia64_dyn_sym_info array and remove duplicates. */
2234 sort_dyn_sym_info (struct elfNN_ia64_dyn_sym_info *info,
2237 bfd_vma curr, prev, got_offset;
2238 unsigned int i, kept, dup, diff, dest, src, len;
2240 qsort (info, count, sizeof (*info), addend_compare);
2242 /* Find the first duplicate. */
2243 prev = info [0].addend;
2244 got_offset = info [0].got_offset;
2245 for (i = 1; i < count; i++)
2247 curr = info [i].addend;
2250 /* For duplicates, make sure that GOT_OFFSET is valid. */
2251 if (got_offset == (bfd_vma) -1)
2252 got_offset = info [i].got_offset;
2255 got_offset = info [i].got_offset;
2259 /* We may move a block of elements to here. */
2262 /* Remove duplicates. */
2267 /* For duplicates, make sure that the kept one has a valid
2270 if (got_offset != (bfd_vma) -1)
2271 info [kept].got_offset = got_offset;
2273 curr = info [i].addend;
2274 got_offset = info [i].got_offset;
2276 /* Move a block of elements whose first one is different from
2280 for (src = i + 1; src < count; src++)
2282 if (info [src].addend != curr)
2284 /* For duplicates, make sure that GOT_OFFSET is
2286 if (got_offset == (bfd_vma) -1)
2287 got_offset = info [src].got_offset;
2290 /* Make sure that the kept one has a valid got_offset. */
2291 if (got_offset != (bfd_vma) -1)
2292 info [kept].got_offset = got_offset;
2300 /* Find the next duplicate. SRC will be kept. */
2301 prev = info [src].addend;
2302 got_offset = info [src].got_offset;
2303 for (dup = src + 1; dup < count; dup++)
2305 curr = info [dup].addend;
2308 /* Make sure that got_offset is valid. */
2309 if (got_offset == (bfd_vma) -1)
2310 got_offset = info [dup].got_offset;
2312 /* For duplicates, make sure that the kept one has
2313 a valid got_offset. */
2314 if (got_offset != (bfd_vma) -1)
2315 info [dup - 1].got_offset = got_offset;
2318 got_offset = info [dup].got_offset;
2322 /* How much to move. */
2326 if (len == 1 && dup < count)
2328 /* If we only move 1 element, we combine it with the next
2329 one. There must be at least a duplicate. Find the
2330 next different one. */
2331 for (diff = dup + 1, src++; diff < count; diff++, src++)
2333 if (info [diff].addend != curr)
2335 /* Make sure that got_offset is valid. */
2336 if (got_offset == (bfd_vma) -1)
2337 got_offset = info [diff].got_offset;
2340 /* Makre sure that the last duplicated one has an valid
2342 BFD_ASSERT (curr == prev);
2343 if (got_offset != (bfd_vma) -1)
2344 info [diff - 1].got_offset = got_offset;
2348 /* Find the next duplicate. Track the current valid
2350 prev = info [diff].addend;
2351 got_offset = info [diff].got_offset;
2352 for (dup = diff + 1; dup < count; dup++)
2354 curr = info [dup].addend;
2357 /* For duplicates, make sure that GOT_OFFSET
2359 if (got_offset == (bfd_vma) -1)
2360 got_offset = info [dup].got_offset;
2363 got_offset = info [dup].got_offset;
2368 len = diff - src + 1;
2373 memmove (&info [dest], &info [src], len * sizeof (*info));
2382 /* When we get here, either there is no duplicate at all or
2383 the only duplicate is the last element. */
2386 /* If the last element is a duplicate, make sure that the
2387 kept one has a valid got_offset. We also update count. */
2388 if (got_offset != (bfd_vma) -1)
2389 info [dest - 1].got_offset = got_offset;
2397 /* Find and/or create a descriptor for dynamic symbol info. This will
2398 vary based on global or local symbol, and the addend to the reloc.
2400 We don't sort when inserting. Also, we sort and eliminate
2401 duplicates if there is an unsorted section. Typically, this will
2402 only happen once, because we do all insertions before lookups. We
2403 then use bsearch to do a lookup. This also allows lookups to be
2404 fast. So we have fast insertion (O(log N) due to duplicate check),
2405 fast lookup (O(log N)) and one sort (O(N log N) expected time).
2406 Previously, all lookups were O(N) because of the use of the linked
2407 list and also all insertions were O(N) because of the check for
2408 duplicates. There are some complications here because the array
2409 size grows occasionally, which may add an O(N) factor, but this
2410 should be rare. Also, we free the excess array allocation, which
2411 requires a copy which is O(N), but this only happens once. */
2413 static struct elfNN_ia64_dyn_sym_info *
2414 get_dyn_sym_info (ia64_info, h, abfd, rel, create)
2415 struct elfNN_ia64_link_hash_table *ia64_info;
2416 struct elf_link_hash_entry *h;
2418 const Elf_Internal_Rela *rel;
2421 struct elfNN_ia64_dyn_sym_info **info_p, *info, *dyn_i, key;
2422 unsigned int *count_p, *sorted_count_p, *size_p;
2423 unsigned int count, sorted_count, size;
2424 bfd_vma addend = rel ? rel->r_addend : 0;
2429 struct elfNN_ia64_link_hash_entry *global_h;
2431 global_h = (struct elfNN_ia64_link_hash_entry *) h;
2432 info_p = &global_h->info;
2433 count_p = &global_h->count;
2434 sorted_count_p = &global_h->sorted_count;
2435 size_p = &global_h->size;
2439 struct elfNN_ia64_local_hash_entry *loc_h;
2441 loc_h = get_local_sym_hash (ia64_info, abfd, rel, create);
2444 BFD_ASSERT (!create);
2448 info_p = &loc_h->info;
2449 count_p = &loc_h->count;
2450 sorted_count_p = &loc_h->sorted_count;
2451 size_p = &loc_h->size;
2455 sorted_count = *sorted_count_p;
2460 /* When we create the array, we don't check for duplicates,
2461 except in the previously sorted section if one exists, and
2462 against the last inserted entry. This allows insertions to
2468 /* Try bsearch first on the sorted section. */
2469 key.addend = addend;
2470 dyn_i = bsearch (&key, info, sorted_count,
2471 sizeof (*info), addend_compare);
2479 /* Do a quick check for the last inserted entry. */
2480 dyn_i = info + count - 1;
2481 if (dyn_i->addend == addend)
2489 /* It is the very first element. We create the array of size
2492 amt = size * sizeof (*info);
2493 info = bfd_malloc (amt);
2495 else if (size <= count)
2497 /* We double the array size every time when we reach the
2500 amt = size * sizeof (*info);
2501 info = bfd_realloc (info, amt);
2512 /* Append the new one to the array. */
2513 dyn_i = info + count;
2514 memset (dyn_i, 0, sizeof (*dyn_i));
2515 dyn_i->got_offset = (bfd_vma) -1;
2516 dyn_i->addend = addend;
2518 /* We increment count only since the new ones are unsorted and
2519 may have duplicate. */
2524 /* It is a lookup without insertion. Sort array if part of the
2525 array isn't sorted. */
2526 if (count != sorted_count)
2528 count = sort_dyn_sym_info (info, count);
2530 *sorted_count_p = count;
2533 /* Free unused memory. */
2536 amt = count * sizeof (*info);
2537 info = bfd_malloc (amt);
2540 memcpy (info, *info_p, amt);
2547 key.addend = addend;
2548 dyn_i = bsearch (&key, info, count,
2549 sizeof (*info), addend_compare);
2556 get_got (abfd, info, ia64_info)
2558 struct bfd_link_info *info;
2559 struct elfNN_ia64_link_hash_table *ia64_info;
2564 got = ia64_info->got_sec;
2569 dynobj = ia64_info->root.dynobj;
2571 ia64_info->root.dynobj = dynobj = abfd;
2572 if (!_bfd_elf_create_got_section (dynobj, info))
2575 got = bfd_get_section_by_name (dynobj, ".got");
2577 ia64_info->got_sec = got;
2579 /* The .got section is always aligned at 8 bytes. */
2580 if (!bfd_set_section_alignment (abfd, got, 3))
2583 flags = bfd_get_section_flags (abfd, got);
2584 bfd_set_section_flags (abfd, got, SEC_SMALL_DATA | flags);
2590 /* Create function descriptor section (.opd). This section is called .opd
2591 because it contains "official procedure descriptors". The "official"
2592 refers to the fact that these descriptors are used when taking the address
2593 of a procedure, thus ensuring a unique address for each procedure. */
2596 get_fptr (abfd, info, ia64_info)
2598 struct bfd_link_info *info;
2599 struct elfNN_ia64_link_hash_table *ia64_info;
2604 fptr = ia64_info->fptr_sec;
2607 dynobj = ia64_info->root.dynobj;
2609 ia64_info->root.dynobj = dynobj = abfd;
2611 fptr = bfd_make_section_with_flags (dynobj, ".opd",
2616 | (info->pie ? 0 : SEC_READONLY)
2617 | SEC_LINKER_CREATED));
2619 || !bfd_set_section_alignment (abfd, fptr, 4))
2625 ia64_info->fptr_sec = fptr;
2630 fptr_rel = bfd_make_section_with_flags (dynobj, ".rela.opd",
2631 (SEC_ALLOC | SEC_LOAD
2634 | SEC_LINKER_CREATED
2636 if (fptr_rel == NULL
2637 || !bfd_set_section_alignment (abfd, fptr_rel,
2644 ia64_info->rel_fptr_sec = fptr_rel;
2652 get_pltoff (abfd, info, ia64_info)
2654 struct bfd_link_info *info ATTRIBUTE_UNUSED;
2655 struct elfNN_ia64_link_hash_table *ia64_info;
2660 pltoff = ia64_info->pltoff_sec;
2663 dynobj = ia64_info->root.dynobj;
2665 ia64_info->root.dynobj = dynobj = abfd;
2667 pltoff = bfd_make_section_with_flags (dynobj,
2668 ELF_STRING_ia64_pltoff,
2674 | SEC_LINKER_CREATED));
2676 || !bfd_set_section_alignment (abfd, pltoff, 4))
2682 ia64_info->pltoff_sec = pltoff;
2689 get_reloc_section (abfd, ia64_info, sec, create)
2691 struct elfNN_ia64_link_hash_table *ia64_info;
2695 const char *srel_name;
2699 srel_name = (bfd_elf_string_from_elf_section
2700 (abfd, elf_elfheader(abfd)->e_shstrndx,
2701 elf_section_data(sec)->rel_hdr.sh_name));
2702 if (srel_name == NULL)
2705 BFD_ASSERT ((CONST_STRNEQ (srel_name, ".rela")
2706 && strcmp (bfd_get_section_name (abfd, sec),
2708 || (CONST_STRNEQ (srel_name, ".rel")
2709 && strcmp (bfd_get_section_name (abfd, sec),
2710 srel_name+4) == 0));
2712 dynobj = ia64_info->root.dynobj;
2714 ia64_info->root.dynobj = dynobj = abfd;
2716 srel = bfd_get_section_by_name (dynobj, srel_name);
2717 if (srel == NULL && create)
2719 srel = bfd_make_section_with_flags (dynobj, srel_name,
2720 (SEC_ALLOC | SEC_LOAD
2723 | SEC_LINKER_CREATED
2726 || !bfd_set_section_alignment (dynobj, srel,
2735 count_dyn_reloc (bfd *abfd, struct elfNN_ia64_dyn_sym_info *dyn_i,
2736 asection *srel, int type, bfd_boolean reltext)
2738 struct elfNN_ia64_dyn_reloc_entry *rent;
2740 for (rent = dyn_i->reloc_entries; rent; rent = rent->next)
2741 if (rent->srel == srel && rent->type == type)
2746 rent = ((struct elfNN_ia64_dyn_reloc_entry *)
2747 bfd_alloc (abfd, (bfd_size_type) sizeof (*rent)));
2751 rent->next = dyn_i->reloc_entries;
2755 dyn_i->reloc_entries = rent;
2757 rent->reltext = reltext;
2764 elfNN_ia64_check_relocs (abfd, info, sec, relocs)
2766 struct bfd_link_info *info;
2768 const Elf_Internal_Rela *relocs;
2770 struct elfNN_ia64_link_hash_table *ia64_info;
2771 const Elf_Internal_Rela *relend;
2772 Elf_Internal_Shdr *symtab_hdr;
2773 const Elf_Internal_Rela *rel;
2774 asection *got, *fptr, *srel, *pltoff;
2783 NEED_LTOFF_FPTR = 128,
2789 struct elf_link_hash_entry *h;
2790 unsigned long r_symndx;
2791 bfd_boolean maybe_dynamic;
2793 if (info->relocatable)
2796 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2797 ia64_info = elfNN_ia64_hash_table (info);
2799 got = fptr = srel = pltoff = NULL;
2801 relend = relocs + sec->reloc_count;
2803 /* We scan relocations first to create dynamic relocation arrays. We
2804 modified get_dyn_sym_info to allow fast insertion and support fast
2805 lookup in the next loop. */
2806 for (rel = relocs; rel < relend; ++rel)
2808 r_symndx = ELFNN_R_SYM (rel->r_info);
2809 if (r_symndx >= symtab_hdr->sh_info)
2811 long indx = r_symndx - symtab_hdr->sh_info;
2812 h = elf_sym_hashes (abfd)[indx];
2813 while (h->root.type == bfd_link_hash_indirect
2814 || h->root.type == bfd_link_hash_warning)
2815 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2820 /* We can only get preliminary data on whether a symbol is
2821 locally or externally defined, as not all of the input files
2822 have yet been processed. Do something with what we know, as
2823 this may help reduce memory usage and processing time later. */
2824 maybe_dynamic = (h && ((!info->executable
2825 && (!SYMBOLIC_BIND (info, h)
2826 || info->unresolved_syms_in_shared_libs == RM_IGNORE))
2828 || h->root.type == bfd_link_hash_defweak));
2831 switch (ELFNN_R_TYPE (rel->r_info))
2833 case R_IA64_TPREL64MSB:
2834 case R_IA64_TPREL64LSB:
2835 if (info->shared || maybe_dynamic)
2836 need_entry = NEED_DYNREL;
2839 case R_IA64_LTOFF_TPREL22:
2840 need_entry = NEED_TPREL;
2842 info->flags |= DF_STATIC_TLS;
2845 case R_IA64_DTPREL32MSB:
2846 case R_IA64_DTPREL32LSB:
2847 case R_IA64_DTPREL64MSB:
2848 case R_IA64_DTPREL64LSB:
2849 if (info->shared || maybe_dynamic)
2850 need_entry = NEED_DYNREL;
2853 case R_IA64_LTOFF_DTPREL22:
2854 need_entry = NEED_DTPREL;
2857 case R_IA64_DTPMOD64MSB:
2858 case R_IA64_DTPMOD64LSB:
2859 if (info->shared || maybe_dynamic)
2860 need_entry = NEED_DYNREL;
2863 case R_IA64_LTOFF_DTPMOD22:
2864 need_entry = NEED_DTPMOD;
2867 case R_IA64_LTOFF_FPTR22:
2868 case R_IA64_LTOFF_FPTR64I:
2869 case R_IA64_LTOFF_FPTR32MSB:
2870 case R_IA64_LTOFF_FPTR32LSB:
2871 case R_IA64_LTOFF_FPTR64MSB:
2872 case R_IA64_LTOFF_FPTR64LSB:
2873 need_entry = NEED_FPTR | NEED_GOT | NEED_LTOFF_FPTR;
2876 case R_IA64_FPTR64I:
2877 case R_IA64_FPTR32MSB:
2878 case R_IA64_FPTR32LSB:
2879 case R_IA64_FPTR64MSB:
2880 case R_IA64_FPTR64LSB:
2881 if (info->shared || h)
2882 need_entry = NEED_FPTR | NEED_DYNREL;
2884 need_entry = NEED_FPTR;
2887 case R_IA64_LTOFF22:
2888 case R_IA64_LTOFF64I:
2889 need_entry = NEED_GOT;
2892 case R_IA64_LTOFF22X:
2893 need_entry = NEED_GOTX;
2896 case R_IA64_PLTOFF22:
2897 case R_IA64_PLTOFF64I:
2898 case R_IA64_PLTOFF64MSB:
2899 case R_IA64_PLTOFF64LSB:
2900 need_entry = NEED_PLTOFF;
2904 need_entry |= NEED_MIN_PLT;
2908 (*info->callbacks->warning)
2909 (info, _("@pltoff reloc against local symbol"), 0,
2910 abfd, 0, (bfd_vma) 0);
2914 case R_IA64_PCREL21B:
2915 case R_IA64_PCREL60B:
2916 /* Depending on where this symbol is defined, we may or may not
2917 need a full plt entry. Only skip if we know we'll not need
2918 the entry -- static or symbolic, and the symbol definition
2919 has already been seen. */
2920 if (maybe_dynamic && rel->r_addend == 0)
2921 need_entry = NEED_FULL_PLT;
2927 case R_IA64_DIR32MSB:
2928 case R_IA64_DIR32LSB:
2929 case R_IA64_DIR64MSB:
2930 case R_IA64_DIR64LSB:
2931 /* Shared objects will always need at least a REL relocation. */
2932 if (info->shared || maybe_dynamic)
2933 need_entry = NEED_DYNREL;
2936 case R_IA64_IPLTMSB:
2937 case R_IA64_IPLTLSB:
2938 /* Shared objects will always need at least a REL relocation. */
2939 if (info->shared || maybe_dynamic)
2940 need_entry = NEED_DYNREL;
2943 case R_IA64_PCREL22:
2944 case R_IA64_PCREL64I:
2945 case R_IA64_PCREL32MSB:
2946 case R_IA64_PCREL32LSB:
2947 case R_IA64_PCREL64MSB:
2948 case R_IA64_PCREL64LSB:
2950 need_entry = NEED_DYNREL;
2957 if ((need_entry & NEED_FPTR) != 0
2960 (*info->callbacks->warning)
2961 (info, _("non-zero addend in @fptr reloc"), 0,
2962 abfd, 0, (bfd_vma) 0);
2965 if (get_dyn_sym_info (ia64_info, h, abfd, rel, TRUE) == NULL)
2969 /* Now, we only do lookup without insertion, which is very fast
2970 with the modified get_dyn_sym_info. */
2971 for (rel = relocs; rel < relend; ++rel)
2973 struct elfNN_ia64_dyn_sym_info *dyn_i;
2974 int dynrel_type = R_IA64_NONE;
2976 r_symndx = ELFNN_R_SYM (rel->r_info);
2977 if (r_symndx >= symtab_hdr->sh_info)
2979 /* We're dealing with a global symbol -- find its hash entry
2980 and mark it as being referenced. */
2981 long indx = r_symndx - symtab_hdr->sh_info;
2982 h = elf_sym_hashes (abfd)[indx];
2983 while (h->root.type == bfd_link_hash_indirect
2984 || h->root.type == bfd_link_hash_warning)
2985 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2992 /* We can only get preliminary data on whether a symbol is
2993 locally or externally defined, as not all of the input files
2994 have yet been processed. Do something with what we know, as
2995 this may help reduce memory usage and processing time later. */
2996 maybe_dynamic = (h && ((!info->executable
2997 && (!SYMBOLIC_BIND (info, h)
2998 || info->unresolved_syms_in_shared_libs == RM_IGNORE))
3000 || h->root.type == bfd_link_hash_defweak));
3003 switch (ELFNN_R_TYPE (rel->r_info))
3005 case R_IA64_TPREL64MSB:
3006 case R_IA64_TPREL64LSB:
3007 if (info->shared || maybe_dynamic)
3008 need_entry = NEED_DYNREL;
3009 dynrel_type = R_IA64_TPREL64LSB;
3011 info->flags |= DF_STATIC_TLS;
3014 case R_IA64_LTOFF_TPREL22:
3015 need_entry = NEED_TPREL;
3017 info->flags |= DF_STATIC_TLS;
3020 case R_IA64_DTPREL32MSB:
3021 case R_IA64_DTPREL32LSB:
3022 case R_IA64_DTPREL64MSB:
3023 case R_IA64_DTPREL64LSB:
3024 if (info->shared || maybe_dynamic)
3025 need_entry = NEED_DYNREL;
3026 dynrel_type = R_IA64_DTPRELNNLSB;
3029 case R_IA64_LTOFF_DTPREL22:
3030 need_entry = NEED_DTPREL;
3033 case R_IA64_DTPMOD64MSB:
3034 case R_IA64_DTPMOD64LSB:
3035 if (info->shared || maybe_dynamic)
3036 need_entry = NEED_DYNREL;
3037 dynrel_type = R_IA64_DTPMOD64LSB;
3040 case R_IA64_LTOFF_DTPMOD22:
3041 need_entry = NEED_DTPMOD;
3044 case R_IA64_LTOFF_FPTR22:
3045 case R_IA64_LTOFF_FPTR64I:
3046 case R_IA64_LTOFF_FPTR32MSB:
3047 case R_IA64_LTOFF_FPTR32LSB:
3048 case R_IA64_LTOFF_FPTR64MSB:
3049 case R_IA64_LTOFF_FPTR64LSB:
3050 need_entry = NEED_FPTR | NEED_GOT | NEED_LTOFF_FPTR;
3053 case R_IA64_FPTR64I:
3054 case R_IA64_FPTR32MSB:
3055 case R_IA64_FPTR32LSB:
3056 case R_IA64_FPTR64MSB:
3057 case R_IA64_FPTR64LSB:
3058 if (info->shared || h)
3059 need_entry = NEED_FPTR | NEED_DYNREL;
3061 need_entry = NEED_FPTR;
3062 dynrel_type = R_IA64_FPTRNNLSB;
3065 case R_IA64_LTOFF22:
3066 case R_IA64_LTOFF64I:
3067 need_entry = NEED_GOT;
3070 case R_IA64_LTOFF22X:
3071 need_entry = NEED_GOTX;
3074 case R_IA64_PLTOFF22:
3075 case R_IA64_PLTOFF64I:
3076 case R_IA64_PLTOFF64MSB:
3077 case R_IA64_PLTOFF64LSB:
3078 need_entry = NEED_PLTOFF;
3082 need_entry |= NEED_MIN_PLT;
3086 case R_IA64_PCREL21B:
3087 case R_IA64_PCREL60B:
3088 /* Depending on where this symbol is defined, we may or may not
3089 need a full plt entry. Only skip if we know we'll not need
3090 the entry -- static or symbolic, and the symbol definition
3091 has already been seen. */
3092 if (maybe_dynamic && rel->r_addend == 0)
3093 need_entry = NEED_FULL_PLT;
3099 case R_IA64_DIR32MSB:
3100 case R_IA64_DIR32LSB:
3101 case R_IA64_DIR64MSB:
3102 case R_IA64_DIR64LSB:
3103 /* Shared objects will always need at least a REL relocation. */
3104 if (info->shared || maybe_dynamic)
3105 need_entry = NEED_DYNREL;
3106 dynrel_type = R_IA64_DIRNNLSB;
3109 case R_IA64_IPLTMSB:
3110 case R_IA64_IPLTLSB:
3111 /* Shared objects will always need at least a REL relocation. */
3112 if (info->shared || maybe_dynamic)
3113 need_entry = NEED_DYNREL;
3114 dynrel_type = R_IA64_IPLTLSB;
3117 case R_IA64_PCREL22:
3118 case R_IA64_PCREL64I:
3119 case R_IA64_PCREL32MSB:
3120 case R_IA64_PCREL32LSB:
3121 case R_IA64_PCREL64MSB:
3122 case R_IA64_PCREL64LSB:
3124 need_entry = NEED_DYNREL;
3125 dynrel_type = R_IA64_PCRELNNLSB;
3132 dyn_i = get_dyn_sym_info (ia64_info, h, abfd, rel, FALSE);
3134 /* Record whether or not this is a local symbol. */
3137 /* Create what's needed. */
3138 if (need_entry & (NEED_GOT | NEED_GOTX | NEED_TPREL
3139 | NEED_DTPMOD | NEED_DTPREL))
3143 got = get_got (abfd, info, ia64_info);
3147 if (need_entry & NEED_GOT)
3148 dyn_i->want_got = 1;
3149 if (need_entry & NEED_GOTX)
3150 dyn_i->want_gotx = 1;
3151 if (need_entry & NEED_TPREL)
3152 dyn_i->want_tprel = 1;
3153 if (need_entry & NEED_DTPMOD)
3154 dyn_i->want_dtpmod = 1;
3155 if (need_entry & NEED_DTPREL)
3156 dyn_i->want_dtprel = 1;
3158 if (need_entry & NEED_FPTR)
3162 fptr = get_fptr (abfd, info, ia64_info);
3167 /* FPTRs for shared libraries are allocated by the dynamic
3168 linker. Make sure this local symbol will appear in the
3169 dynamic symbol table. */
3170 if (!h && info->shared)
3172 if (! (bfd_elf_link_record_local_dynamic_symbol
3173 (info, abfd, (long) r_symndx)))
3177 dyn_i->want_fptr = 1;
3179 if (need_entry & NEED_LTOFF_FPTR)
3180 dyn_i->want_ltoff_fptr = 1;
3181 if (need_entry & (NEED_MIN_PLT | NEED_FULL_PLT))
3183 if (!ia64_info->root.dynobj)
3184 ia64_info->root.dynobj = abfd;
3186 dyn_i->want_plt = 1;
3188 if (need_entry & NEED_FULL_PLT)
3189 dyn_i->want_plt2 = 1;
3190 if (need_entry & NEED_PLTOFF)
3192 /* This is needed here, in case @pltoff is used in a non-shared
3196 pltoff = get_pltoff (abfd, info, ia64_info);
3201 dyn_i->want_pltoff = 1;
3203 if ((need_entry & NEED_DYNREL) && (sec->flags & SEC_ALLOC))
3207 srel = get_reloc_section (abfd, ia64_info, sec, TRUE);
3211 if (!count_dyn_reloc (abfd, dyn_i, srel, dynrel_type,
3212 (sec->flags & SEC_READONLY) != 0))
3220 /* For cleanliness, and potentially faster dynamic loading, allocate
3221 external GOT entries first. */
3224 allocate_global_data_got (dyn_i, data)
3225 struct elfNN_ia64_dyn_sym_info *dyn_i;
3228 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
3230 if ((dyn_i->want_got || dyn_i->want_gotx)
3231 && ! dyn_i->want_fptr
3232 && elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, 0))
3234 dyn_i->got_offset = x->ofs;
3237 if (dyn_i->want_tprel)
3239 dyn_i->tprel_offset = x->ofs;
3242 if (dyn_i->want_dtpmod)
3244 if (elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, 0))
3246 dyn_i->dtpmod_offset = x->ofs;
3251 struct elfNN_ia64_link_hash_table *ia64_info;
3253 ia64_info = elfNN_ia64_hash_table (x->info);
3254 if (ia64_info->self_dtpmod_offset == (bfd_vma) -1)
3256 ia64_info->self_dtpmod_offset = x->ofs;
3259 dyn_i->dtpmod_offset = ia64_info->self_dtpmod_offset;
3262 if (dyn_i->want_dtprel)
3264 dyn_i->dtprel_offset = x->ofs;
3270 /* Next, allocate all the GOT entries used by LTOFF_FPTR relocs. */
3273 allocate_global_fptr_got (dyn_i, data)
3274 struct elfNN_ia64_dyn_sym_info *dyn_i;
3277 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
3281 && elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, R_IA64_FPTRNNLSB))
3283 dyn_i->got_offset = x->ofs;
3289 /* Lastly, allocate all the GOT entries for local data. */
3292 allocate_local_got (dyn_i, data)
3293 struct elfNN_ia64_dyn_sym_info *dyn_i;
3296 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
3298 if ((dyn_i->want_got || dyn_i->want_gotx)
3299 && !elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, 0))
3301 dyn_i->got_offset = x->ofs;
3307 /* Search for the index of a global symbol in it's defining object file. */
3310 global_sym_index (h)
3311 struct elf_link_hash_entry *h;
3313 struct elf_link_hash_entry **p;
3316 BFD_ASSERT (h->root.type == bfd_link_hash_defined
3317 || h->root.type == bfd_link_hash_defweak);
3319 obj = h->root.u.def.section->owner;
3320 for (p = elf_sym_hashes (obj); *p != h; ++p)
3323 return p - elf_sym_hashes (obj) + elf_tdata (obj)->symtab_hdr.sh_info;
3326 /* Allocate function descriptors. We can do these for every function
3327 in a main executable that is not exported. */
3330 allocate_fptr (dyn_i, data)
3331 struct elfNN_ia64_dyn_sym_info *dyn_i;
3334 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
3336 if (dyn_i->want_fptr)
3338 struct elf_link_hash_entry *h = dyn_i->h;
3341 while (h->root.type == bfd_link_hash_indirect
3342 || h->root.type == bfd_link_hash_warning)
3343 h = (struct elf_link_hash_entry *) h->root.u.i.link;
3345 if (!x->info->executable
3347 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
3348 || (h->root.type != bfd_link_hash_undefweak
3349 && h->root.type != bfd_link_hash_undefined)))
3351 if (h && h->dynindx == -1)
3353 BFD_ASSERT ((h->root.type == bfd_link_hash_defined)
3354 || (h->root.type == bfd_link_hash_defweak));
3356 if (!bfd_elf_link_record_local_dynamic_symbol
3357 (x->info, h->root.u.def.section->owner,
3358 global_sym_index (h)))
3362 dyn_i->want_fptr = 0;
3364 else if (h == NULL || h->dynindx == -1)
3366 dyn_i->fptr_offset = x->ofs;
3370 dyn_i->want_fptr = 0;
3375 /* Allocate all the minimal PLT entries. */
3378 allocate_plt_entries (dyn_i, data)
3379 struct elfNN_ia64_dyn_sym_info *dyn_i;
3382 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
3384 if (dyn_i->want_plt)
3386 struct elf_link_hash_entry *h = dyn_i->h;
3389 while (h->root.type == bfd_link_hash_indirect
3390 || h->root.type == bfd_link_hash_warning)
3391 h = (struct elf_link_hash_entry *) h->root.u.i.link;
3393 /* ??? Versioned symbols seem to lose NEEDS_PLT. */
3394 if (elfNN_ia64_dynamic_symbol_p (h, x->info, 0))
3396 bfd_size_type offset = x->ofs;
3398 offset = PLT_HEADER_SIZE;
3399 dyn_i->plt_offset = offset;
3400 x->ofs = offset + PLT_MIN_ENTRY_SIZE;
3402 dyn_i->want_pltoff = 1;
3406 dyn_i->want_plt = 0;
3407 dyn_i->want_plt2 = 0;
3413 /* Allocate all the full PLT entries. */
3416 allocate_plt2_entries (dyn_i, data)
3417 struct elfNN_ia64_dyn_sym_info *dyn_i;
3420 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
3422 if (dyn_i->want_plt2)
3424 struct elf_link_hash_entry *h = dyn_i->h;
3425 bfd_size_type ofs = x->ofs;
3427 dyn_i->plt2_offset = ofs;
3428 x->ofs = ofs + PLT_FULL_ENTRY_SIZE;
3430 while (h->root.type == bfd_link_hash_indirect
3431 || h->root.type == bfd_link_hash_warning)
3432 h = (struct elf_link_hash_entry *) h->root.u.i.link;
3433 dyn_i->h->plt.offset = ofs;
3438 /* Allocate all the PLTOFF entries requested by relocations and
3439 plt entries. We can't share space with allocated FPTR entries,
3440 because the latter are not necessarily addressable by the GP.
3441 ??? Relaxation might be able to determine that they are. */
3444 allocate_pltoff_entries (dyn_i, data)
3445 struct elfNN_ia64_dyn_sym_info *dyn_i;
3448 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
3450 if (dyn_i->want_pltoff)
3452 dyn_i->pltoff_offset = x->ofs;
3458 /* Allocate dynamic relocations for those symbols that turned out
3462 allocate_dynrel_entries (dyn_i, data)
3463 struct elfNN_ia64_dyn_sym_info *dyn_i;
3466 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
3467 struct elfNN_ia64_link_hash_table *ia64_info;
3468 struct elfNN_ia64_dyn_reloc_entry *rent;
3469 bfd_boolean dynamic_symbol, shared, resolved_zero;
3471 ia64_info = elfNN_ia64_hash_table (x->info);
3473 /* Note that this can't be used in relation to FPTR relocs below. */
3474 dynamic_symbol = elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, 0);
3476 shared = x->info->shared;
3477 resolved_zero = (dyn_i->h
3478 && ELF_ST_VISIBILITY (dyn_i->h->other)
3479 && dyn_i->h->root.type == bfd_link_hash_undefweak);
3481 /* Take care of the GOT and PLT relocations. */
3484 && (dynamic_symbol || shared)
3485 && (dyn_i->want_got || dyn_i->want_gotx))
3486 || (dyn_i->want_ltoff_fptr
3488 && dyn_i->h->dynindx != -1))
3490 if (!dyn_i->want_ltoff_fptr
3493 || dyn_i->h->root.type != bfd_link_hash_undefweak)
3494 ia64_info->rel_got_sec->size += sizeof (ElfNN_External_Rela);
3496 if ((dynamic_symbol || shared) && dyn_i->want_tprel)
3497 ia64_info->rel_got_sec->size += sizeof (ElfNN_External_Rela);
3498 if (dynamic_symbol && dyn_i->want_dtpmod)
3499 ia64_info->rel_got_sec->size += sizeof (ElfNN_External_Rela);
3500 if (dynamic_symbol && dyn_i->want_dtprel)
3501 ia64_info->rel_got_sec->size += sizeof (ElfNN_External_Rela);
3506 if (ia64_info->rel_fptr_sec && dyn_i->want_fptr)
3508 if (dyn_i->h == NULL || dyn_i->h->root.type != bfd_link_hash_undefweak)
3509 ia64_info->rel_fptr_sec->size += sizeof (ElfNN_External_Rela);
3512 if (!resolved_zero && dyn_i->want_pltoff)
3514 bfd_size_type t = 0;
3516 /* Dynamic symbols get one IPLT relocation. Local symbols in
3517 shared libraries get two REL relocations. Local symbols in
3518 main applications get nothing. */
3520 t = sizeof (ElfNN_External_Rela);
3522 t = 2 * sizeof (ElfNN_External_Rela);
3524 ia64_info->rel_pltoff_sec->size += t;
3527 /* Take care of the normal data relocations. */
3529 for (rent = dyn_i->reloc_entries; rent; rent = rent->next)
3531 int count = rent->count;
3535 case R_IA64_FPTR32LSB:
3536 case R_IA64_FPTR64LSB:
3537 /* Allocate one iff !want_fptr and not PIE, which by this point
3538 will be true only if we're actually allocating one statically
3539 in the main executable. Position independent executables
3540 need a relative reloc. */
3541 if (dyn_i->want_fptr && !x->info->pie)
3544 case R_IA64_PCREL32LSB:
3545 case R_IA64_PCREL64LSB:
3546 if (!dynamic_symbol)
3549 case R_IA64_DIR32LSB:
3550 case R_IA64_DIR64LSB:
3551 if (!dynamic_symbol && !shared)
3554 case R_IA64_IPLTLSB:
3555 if (!dynamic_symbol && !shared)
3557 /* Use two REL relocations for IPLT relocations
3558 against local symbols. */
3559 if (!dynamic_symbol)
3562 case R_IA64_DTPREL32LSB:
3563 case R_IA64_TPREL64LSB:
3564 case R_IA64_DTPREL64LSB:
3565 case R_IA64_DTPMOD64LSB:
3571 ia64_info->reltext = 1;
3572 rent->srel->size += sizeof (ElfNN_External_Rela) * count;
3579 elfNN_ia64_adjust_dynamic_symbol (info, h)
3580 struct bfd_link_info *info ATTRIBUTE_UNUSED;
3581 struct elf_link_hash_entry *h;
3583 /* ??? Undefined symbols with PLT entries should be re-defined
3584 to be the PLT entry. */
3586 /* If this is a weak symbol, and there is a real definition, the
3587 processor independent code will have arranged for us to see the
3588 real definition first, and we can just use the same value. */
3589 if (h->u.weakdef != NULL)
3591 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
3592 || h->u.weakdef->root.type == bfd_link_hash_defweak);
3593 h->root.u.def.section = h->u.weakdef->root.u.def.section;
3594 h->root.u.def.value = h->u.weakdef->root.u.def.value;
3598 /* If this is a reference to a symbol defined by a dynamic object which
3599 is not a function, we might allocate the symbol in our .dynbss section
3600 and allocate a COPY dynamic relocation.
3602 But IA-64 code is canonically PIC, so as a rule we can avoid this sort
3609 elfNN_ia64_size_dynamic_sections (output_bfd, info)
3610 bfd *output_bfd ATTRIBUTE_UNUSED;
3611 struct bfd_link_info *info;
3613 struct elfNN_ia64_allocate_data data;
3614 struct elfNN_ia64_link_hash_table *ia64_info;
3617 bfd_boolean relplt = FALSE;
3619 dynobj = elf_hash_table(info)->dynobj;
3620 ia64_info = elfNN_ia64_hash_table (info);
3621 ia64_info->self_dtpmod_offset = (bfd_vma) -1;
3622 BFD_ASSERT(dynobj != NULL);
3625 /* Set the contents of the .interp section to the interpreter. */
3626 if (ia64_info->root.dynamic_sections_created
3627 && info->executable)
3629 sec = bfd_get_section_by_name (dynobj, ".interp");
3630 BFD_ASSERT (sec != NULL);
3631 sec->contents = (bfd_byte *) ELF_DYNAMIC_INTERPRETER;
3632 sec->size = strlen (ELF_DYNAMIC_INTERPRETER) + 1;
3635 /* Allocate the GOT entries. */
3637 if (ia64_info->got_sec)
3640 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_global_data_got, &data);
3641 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_global_fptr_got, &data);
3642 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_local_got, &data);
3643 ia64_info->got_sec->size = data.ofs;
3646 /* Allocate the FPTR entries. */
3648 if (ia64_info->fptr_sec)
3651 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_fptr, &data);
3652 ia64_info->fptr_sec->size = data.ofs;
3655 /* Now that we've seen all of the input files, we can decide which
3656 symbols need plt entries. Allocate the minimal PLT entries first.
3657 We do this even though dynamic_sections_created may be FALSE, because
3658 this has the side-effect of clearing want_plt and want_plt2. */
3661 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_plt_entries, &data);
3663 ia64_info->minplt_entries = 0;
3666 ia64_info->minplt_entries
3667 = (data.ofs - PLT_HEADER_SIZE) / PLT_MIN_ENTRY_SIZE;
3670 /* Align the pointer for the plt2 entries. */
3671 data.ofs = (data.ofs + 31) & (bfd_vma) -32;
3673 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_plt2_entries, &data);
3674 if (data.ofs != 0 || ia64_info->root.dynamic_sections_created)
3676 /* FIXME: we always reserve the memory for dynamic linker even if
3677 there are no PLT entries since dynamic linker may assume the
3678 reserved memory always exists. */
3680 BFD_ASSERT (ia64_info->root.dynamic_sections_created);
3682 ia64_info->plt_sec->size = data.ofs;
3684 /* If we've got a .plt, we need some extra memory for the dynamic
3685 linker. We stuff these in .got.plt. */
3686 sec = bfd_get_section_by_name (dynobj, ".got.plt");
3687 sec->size = 8 * PLT_RESERVED_WORDS;
3690 /* Allocate the PLTOFF entries. */
3692 if (ia64_info->pltoff_sec)
3695 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_pltoff_entries, &data);
3696 ia64_info->pltoff_sec->size = data.ofs;
3699 if (ia64_info->root.dynamic_sections_created)
3701 /* Allocate space for the dynamic relocations that turned out to be
3704 if (info->shared && ia64_info->self_dtpmod_offset != (bfd_vma) -1)
3705 ia64_info->rel_got_sec->size += sizeof (ElfNN_External_Rela);
3706 data.only_got = FALSE;
3707 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_dynrel_entries, &data);
3710 /* We have now determined the sizes of the various dynamic sections.
3711 Allocate memory for them. */
3712 for (sec = dynobj->sections; sec != NULL; sec = sec->next)
3716 if (!(sec->flags & SEC_LINKER_CREATED))
3719 /* If we don't need this section, strip it from the output file.
3720 There were several sections primarily related to dynamic
3721 linking that must be create before the linker maps input
3722 sections to output sections. The linker does that before
3723 bfd_elf_size_dynamic_sections is called, and it is that
3724 function which decides whether anything needs to go into
3727 strip = (sec->size == 0);
3729 if (sec == ia64_info->got_sec)
3731 else if (sec == ia64_info->rel_got_sec)
3734 ia64_info->rel_got_sec = NULL;
3736 /* We use the reloc_count field as a counter if we need to
3737 copy relocs into the output file. */
3738 sec->reloc_count = 0;
3740 else if (sec == ia64_info->fptr_sec)
3743 ia64_info->fptr_sec = NULL;
3745 else if (sec == ia64_info->rel_fptr_sec)
3748 ia64_info->rel_fptr_sec = NULL;
3750 /* We use the reloc_count field as a counter if we need to
3751 copy relocs into the output file. */
3752 sec->reloc_count = 0;
3754 else if (sec == ia64_info->plt_sec)
3757 ia64_info->plt_sec = NULL;
3759 else if (sec == ia64_info->pltoff_sec)
3762 ia64_info->pltoff_sec = NULL;
3764 else if (sec == ia64_info->rel_pltoff_sec)
3767 ia64_info->rel_pltoff_sec = NULL;
3771 /* We use the reloc_count field as a counter if we need to
3772 copy relocs into the output file. */
3773 sec->reloc_count = 0;
3780 /* It's OK to base decisions on the section name, because none
3781 of the dynobj section names depend upon the input files. */
3782 name = bfd_get_section_name (dynobj, sec);
3784 if (strcmp (name, ".got.plt") == 0)
3786 else if (CONST_STRNEQ (name, ".rel"))
3790 /* We use the reloc_count field as a counter if we need to
3791 copy relocs into the output file. */
3792 sec->reloc_count = 0;
3800 sec->flags |= SEC_EXCLUDE;
3803 /* Allocate memory for the section contents. */
3804 sec->contents = (bfd_byte *) bfd_zalloc (dynobj, sec->size);
3805 if (sec->contents == NULL && sec->size != 0)
3810 if (elf_hash_table (info)->dynamic_sections_created)
3812 /* Add some entries to the .dynamic section. We fill in the values
3813 later (in finish_dynamic_sections) but we must add the entries now
3814 so that we get the correct size for the .dynamic section. */
3816 if (info->executable)
3818 /* The DT_DEBUG entry is filled in by the dynamic linker and used
3820 #define add_dynamic_entry(TAG, VAL) \
3821 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
3823 if (!add_dynamic_entry (DT_DEBUG, 0))
3827 if (!add_dynamic_entry (DT_IA_64_PLT_RESERVE, 0))
3829 if (!add_dynamic_entry (DT_PLTGOT, 0))
3834 if (!add_dynamic_entry (DT_PLTRELSZ, 0)
3835 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
3836 || !add_dynamic_entry (DT_JMPREL, 0))
3840 if (!add_dynamic_entry (DT_RELA, 0)
3841 || !add_dynamic_entry (DT_RELASZ, 0)
3842 || !add_dynamic_entry (DT_RELAENT, sizeof (ElfNN_External_Rela)))
3845 if (ia64_info->reltext)
3847 if (!add_dynamic_entry (DT_TEXTREL, 0))
3849 info->flags |= DF_TEXTREL;
3853 /* ??? Perhaps force __gp local. */
3858 static bfd_reloc_status_type
3859 elfNN_ia64_install_value (hit_addr, v, r_type)
3862 unsigned int r_type;
3864 const struct ia64_operand *op;
3865 int bigendian = 0, shift = 0;
3866 bfd_vma t0, t1, dword;
3868 enum ia64_opnd opnd;
3871 #ifdef BFD_HOST_U_64_BIT
3872 BFD_HOST_U_64_BIT val = (BFD_HOST_U_64_BIT) v;
3877 opnd = IA64_OPND_NIL;
3882 return bfd_reloc_ok;
3884 /* Instruction relocations. */
3887 case R_IA64_TPREL14:
3888 case R_IA64_DTPREL14:
3889 opnd = IA64_OPND_IMM14;
3892 case R_IA64_PCREL21F: opnd = IA64_OPND_TGT25; break;
3893 case R_IA64_PCREL21M: opnd = IA64_OPND_TGT25b; break;
3894 case R_IA64_PCREL60B: opnd = IA64_OPND_TGT64; break;
3895 case R_IA64_PCREL21B:
3896 case R_IA64_PCREL21BI:
3897 opnd = IA64_OPND_TGT25c;
3901 case R_IA64_GPREL22:
3902 case R_IA64_LTOFF22:
3903 case R_IA64_LTOFF22X:
3904 case R_IA64_PLTOFF22:
3905 case R_IA64_PCREL22:
3906 case R_IA64_LTOFF_FPTR22:
3907 case R_IA64_TPREL22:
3908 case R_IA64_DTPREL22:
3909 case R_IA64_LTOFF_TPREL22:
3910 case R_IA64_LTOFF_DTPMOD22:
3911 case R_IA64_LTOFF_DTPREL22:
3912 opnd = IA64_OPND_IMM22;
3916 case R_IA64_GPREL64I:
3917 case R_IA64_LTOFF64I:
3918 case R_IA64_PLTOFF64I:
3919 case R_IA64_PCREL64I:
3920 case R_IA64_FPTR64I:
3921 case R_IA64_LTOFF_FPTR64I:
3922 case R_IA64_TPREL64I:
3923 case R_IA64_DTPREL64I:
3924 opnd = IA64_OPND_IMMU64;
3927 /* Data relocations. */
3929 case R_IA64_DIR32MSB:
3930 case R_IA64_GPREL32MSB:
3931 case R_IA64_FPTR32MSB:
3932 case R_IA64_PCREL32MSB:
3933 case R_IA64_LTOFF_FPTR32MSB:
3934 case R_IA64_SEGREL32MSB:
3935 case R_IA64_SECREL32MSB:
3936 case R_IA64_LTV32MSB:
3937 case R_IA64_DTPREL32MSB:
3938 size = 4; bigendian = 1;
3941 case R_IA64_DIR32LSB:
3942 case R_IA64_GPREL32LSB:
3943 case R_IA64_FPTR32LSB:
3944 case R_IA64_PCREL32LSB:
3945 case R_IA64_LTOFF_FPTR32LSB:
3946 case R_IA64_SEGREL32LSB:
3947 case R_IA64_SECREL32LSB:
3948 case R_IA64_LTV32LSB:
3949 case R_IA64_DTPREL32LSB:
3950 size = 4; bigendian = 0;
3953 case R_IA64_DIR64MSB:
3954 case R_IA64_GPREL64MSB:
3955 case R_IA64_PLTOFF64MSB:
3956 case R_IA64_FPTR64MSB:
3957 case R_IA64_PCREL64MSB:
3958 case R_IA64_LTOFF_FPTR64MSB:
3959 case R_IA64_SEGREL64MSB:
3960 case R_IA64_SECREL64MSB:
3961 case R_IA64_LTV64MSB:
3962 case R_IA64_TPREL64MSB:
3963 case R_IA64_DTPMOD64MSB:
3964 case R_IA64_DTPREL64MSB:
3965 size = 8; bigendian = 1;
3968 case R_IA64_DIR64LSB:
3969 case R_IA64_GPREL64LSB:
3970 case R_IA64_PLTOFF64LSB:
3971 case R_IA64_FPTR64LSB:
3972 case R_IA64_PCREL64LSB:
3973 case R_IA64_LTOFF_FPTR64LSB:
3974 case R_IA64_SEGREL64LSB:
3975 case R_IA64_SECREL64LSB:
3976 case R_IA64_LTV64LSB:
3977 case R_IA64_TPREL64LSB:
3978 case R_IA64_DTPMOD64LSB:
3979 case R_IA64_DTPREL64LSB:
3980 size = 8; bigendian = 0;
3983 /* Unsupported / Dynamic relocations. */
3985 return bfd_reloc_notsupported;
3990 case IA64_OPND_IMMU64:
3991 hit_addr -= (long) hit_addr & 0x3;
3992 t0 = bfd_getl64 (hit_addr);
3993 t1 = bfd_getl64 (hit_addr + 8);
3995 /* tmpl/s: bits 0.. 5 in t0
3996 slot 0: bits 5..45 in t0
3997 slot 1: bits 46..63 in t0, bits 0..22 in t1
3998 slot 2: bits 23..63 in t1 */
4000 /* First, clear the bits that form the 64 bit constant. */
4001 t0 &= ~(0x3ffffLL << 46);
4003 | (( (0x07fLL << 13) | (0x1ffLL << 27)
4004 | (0x01fLL << 22) | (0x001LL << 21)
4005 | (0x001LL << 36)) << 23));
4007 t0 |= ((val >> 22) & 0x03ffffLL) << 46; /* 18 lsbs of imm41 */
4008 t1 |= ((val >> 40) & 0x7fffffLL) << 0; /* 23 msbs of imm41 */
4009 t1 |= ( (((val >> 0) & 0x07f) << 13) /* imm7b */
4010 | (((val >> 7) & 0x1ff) << 27) /* imm9d */
4011 | (((val >> 16) & 0x01f) << 22) /* imm5c */
4012 | (((val >> 21) & 0x001) << 21) /* ic */
4013 | (((val >> 63) & 0x001) << 36)) << 23; /* i */
4015 bfd_putl64 (t0, hit_addr);
4016 bfd_putl64 (t1, hit_addr + 8);
4019 case IA64_OPND_TGT64:
4020 hit_addr -= (long) hit_addr & 0x3;
4021 t0 = bfd_getl64 (hit_addr);
4022 t1 = bfd_getl64 (hit_addr + 8);
4024 /* tmpl/s: bits 0.. 5 in t0
4025 slot 0: bits 5..45 in t0
4026 slot 1: bits 46..63 in t0, bits 0..22 in t1
4027 slot 2: bits 23..63 in t1 */
4029 /* First, clear the bits that form the 64 bit constant. */
4030 t0 &= ~(0x3ffffLL << 46);
4032 | ((1LL << 36 | 0xfffffLL << 13) << 23));
4035 t0 |= ((val >> 20) & 0xffffLL) << 2 << 46; /* 16 lsbs of imm39 */
4036 t1 |= ((val >> 36) & 0x7fffffLL) << 0; /* 23 msbs of imm39 */
4037 t1 |= ((((val >> 0) & 0xfffffLL) << 13) /* imm20b */
4038 | (((val >> 59) & 0x1LL) << 36)) << 23; /* i */
4040 bfd_putl64 (t0, hit_addr);
4041 bfd_putl64 (t1, hit_addr + 8);
4045 switch ((long) hit_addr & 0x3)
4047 case 0: shift = 5; break;
4048 case 1: shift = 14; hit_addr += 3; break;
4049 case 2: shift = 23; hit_addr += 6; break;
4050 case 3: return bfd_reloc_notsupported; /* shouldn't happen... */
4052 dword = bfd_getl64 (hit_addr);
4053 insn = (dword >> shift) & 0x1ffffffffffLL;
4055 op = elf64_ia64_operands + opnd;
4056 err = (*op->insert) (op, val, &insn);
4058 return bfd_reloc_overflow;
4060 dword &= ~(0x1ffffffffffLL << shift);
4061 dword |= (insn << shift);
4062 bfd_putl64 (dword, hit_addr);
4066 /* A data relocation. */
4069 bfd_putb32 (val, hit_addr);
4071 bfd_putb64 (val, hit_addr);
4074 bfd_putl32 (val, hit_addr);
4076 bfd_putl64 (val, hit_addr);
4080 return bfd_reloc_ok;
4084 elfNN_ia64_install_dyn_reloc (abfd, info, sec, srel, offset, type,
4087 struct bfd_link_info *info;
4095 Elf_Internal_Rela outrel;
4098 BFD_ASSERT (dynindx != -1);
4099 outrel.r_info = ELFNN_R_INFO (dynindx, type);
4100 outrel.r_addend = addend;
4101 outrel.r_offset = _bfd_elf_section_offset (abfd, info, sec, offset);
4102 if (outrel.r_offset >= (bfd_vma) -2)
4104 /* Run for the hills. We shouldn't be outputting a relocation
4105 for this. So do what everyone else does and output a no-op. */
4106 outrel.r_info = ELFNN_R_INFO (0, R_IA64_NONE);
4107 outrel.r_addend = 0;
4108 outrel.r_offset = 0;
4111 outrel.r_offset += sec->output_section->vma + sec->output_offset;
4113 loc = srel->contents;
4114 loc += srel->reloc_count++ * sizeof (ElfNN_External_Rela);
4115 bfd_elfNN_swap_reloca_out (abfd, &outrel, loc);
4116 BFD_ASSERT (sizeof (ElfNN_External_Rela) * srel->reloc_count <= srel->size);
4119 /* Store an entry for target address TARGET_ADDR in the linkage table
4120 and return the gp-relative address of the linkage table entry. */
4123 set_got_entry (abfd, info, dyn_i, dynindx, addend, value, dyn_r_type)
4125 struct bfd_link_info *info;
4126 struct elfNN_ia64_dyn_sym_info *dyn_i;
4130 unsigned int dyn_r_type;
4132 struct elfNN_ia64_link_hash_table *ia64_info;
4137 ia64_info = elfNN_ia64_hash_table (info);
4138 got_sec = ia64_info->got_sec;
4142 case R_IA64_TPREL64LSB:
4143 done = dyn_i->tprel_done;
4144 dyn_i->tprel_done = TRUE;
4145 got_offset = dyn_i->tprel_offset;
4147 case R_IA64_DTPMOD64LSB:
4148 if (dyn_i->dtpmod_offset != ia64_info->self_dtpmod_offset)
4150 done = dyn_i->dtpmod_done;
4151 dyn_i->dtpmod_done = TRUE;
4155 done = ia64_info->self_dtpmod_done;
4156 ia64_info->self_dtpmod_done = TRUE;
4159 got_offset = dyn_i->dtpmod_offset;
4161 case R_IA64_DTPREL32LSB:
4162 case R_IA64_DTPREL64LSB:
4163 done = dyn_i->dtprel_done;
4164 dyn_i->dtprel_done = TRUE;
4165 got_offset = dyn_i->dtprel_offset;
4168 done = dyn_i->got_done;
4169 dyn_i->got_done = TRUE;
4170 got_offset = dyn_i->got_offset;
4174 BFD_ASSERT ((got_offset & 7) == 0);
4178 /* Store the target address in the linkage table entry. */
4179 bfd_put_64 (abfd, value, got_sec->contents + got_offset);
4181 /* Install a dynamic relocation if needed. */
4184 || ELF_ST_VISIBILITY (dyn_i->h->other) == STV_DEFAULT
4185 || dyn_i->h->root.type != bfd_link_hash_undefweak)
4186 && dyn_r_type != R_IA64_DTPREL32LSB
4187 && dyn_r_type != R_IA64_DTPREL64LSB)
4188 || elfNN_ia64_dynamic_symbol_p (dyn_i->h, info, dyn_r_type)
4190 && (dyn_r_type == R_IA64_FPTR32LSB
4191 || dyn_r_type == R_IA64_FPTR64LSB)))
4192 && (!dyn_i->want_ltoff_fptr
4195 || dyn_i->h->root.type != bfd_link_hash_undefweak))
4198 && dyn_r_type != R_IA64_TPREL64LSB
4199 && dyn_r_type != R_IA64_DTPMOD64LSB
4200 && dyn_r_type != R_IA64_DTPREL32LSB
4201 && dyn_r_type != R_IA64_DTPREL64LSB)
4203 dyn_r_type = R_IA64_RELNNLSB;
4208 if (bfd_big_endian (abfd))
4212 case R_IA64_REL32LSB:
4213 dyn_r_type = R_IA64_REL32MSB;
4215 case R_IA64_DIR32LSB:
4216 dyn_r_type = R_IA64_DIR32MSB;
4218 case R_IA64_FPTR32LSB:
4219 dyn_r_type = R_IA64_FPTR32MSB;
4221 case R_IA64_DTPREL32LSB:
4222 dyn_r_type = R_IA64_DTPREL32MSB;
4224 case R_IA64_REL64LSB:
4225 dyn_r_type = R_IA64_REL64MSB;
4227 case R_IA64_DIR64LSB:
4228 dyn_r_type = R_IA64_DIR64MSB;
4230 case R_IA64_FPTR64LSB:
4231 dyn_r_type = R_IA64_FPTR64MSB;
4233 case R_IA64_TPREL64LSB:
4234 dyn_r_type = R_IA64_TPREL64MSB;
4236 case R_IA64_DTPMOD64LSB:
4237 dyn_r_type = R_IA64_DTPMOD64MSB;
4239 case R_IA64_DTPREL64LSB:
4240 dyn_r_type = R_IA64_DTPREL64MSB;
4248 elfNN_ia64_install_dyn_reloc (abfd, NULL, got_sec,
4249 ia64_info->rel_got_sec,
4250 got_offset, dyn_r_type,
4255 /* Return the address of the linkage table entry. */
4256 value = (got_sec->output_section->vma
4257 + got_sec->output_offset
4263 /* Fill in a function descriptor consisting of the function's code
4264 address and its global pointer. Return the descriptor's address. */
4267 set_fptr_entry (abfd, info, dyn_i, value)
4269 struct bfd_link_info *info;
4270 struct elfNN_ia64_dyn_sym_info *dyn_i;
4273 struct elfNN_ia64_link_hash_table *ia64_info;
4276 ia64_info = elfNN_ia64_hash_table (info);
4277 fptr_sec = ia64_info->fptr_sec;
4279 if (!dyn_i->fptr_done)
4281 dyn_i->fptr_done = 1;
4283 /* Fill in the function descriptor. */
4284 bfd_put_64 (abfd, value, fptr_sec->contents + dyn_i->fptr_offset);
4285 bfd_put_64 (abfd, _bfd_get_gp_value (abfd),
4286 fptr_sec->contents + dyn_i->fptr_offset + 8);
4287 if (ia64_info->rel_fptr_sec)
4289 Elf_Internal_Rela outrel;
4292 if (bfd_little_endian (abfd))
4293 outrel.r_info = ELFNN_R_INFO (0, R_IA64_IPLTLSB);
4295 outrel.r_info = ELFNN_R_INFO (0, R_IA64_IPLTMSB);
4296 outrel.r_addend = value;
4297 outrel.r_offset = (fptr_sec->output_section->vma
4298 + fptr_sec->output_offset
4299 + dyn_i->fptr_offset);
4300 loc = ia64_info->rel_fptr_sec->contents;
4301 loc += ia64_info->rel_fptr_sec->reloc_count++
4302 * sizeof (ElfNN_External_Rela);
4303 bfd_elfNN_swap_reloca_out (abfd, &outrel, loc);
4307 /* Return the descriptor's address. */
4308 value = (fptr_sec->output_section->vma
4309 + fptr_sec->output_offset
4310 + dyn_i->fptr_offset);
4315 /* Fill in a PLTOFF entry consisting of the function's code address
4316 and its global pointer. Return the descriptor's address. */
4319 set_pltoff_entry (abfd, info, dyn_i, value, is_plt)
4321 struct bfd_link_info *info;
4322 struct elfNN_ia64_dyn_sym_info *dyn_i;
4326 struct elfNN_ia64_link_hash_table *ia64_info;
4327 asection *pltoff_sec;
4329 ia64_info = elfNN_ia64_hash_table (info);
4330 pltoff_sec = ia64_info->pltoff_sec;
4332 /* Don't do anything if this symbol uses a real PLT entry. In
4333 that case, we'll fill this in during finish_dynamic_symbol. */
4334 if ((! dyn_i->want_plt || is_plt)
4335 && !dyn_i->pltoff_done)
4337 bfd_vma gp = _bfd_get_gp_value (abfd);
4339 /* Fill in the function descriptor. */
4340 bfd_put_64 (abfd, value, pltoff_sec->contents + dyn_i->pltoff_offset);
4341 bfd_put_64 (abfd, gp, pltoff_sec->contents + dyn_i->pltoff_offset + 8);
4343 /* Install dynamic relocations if needed. */
4347 || ELF_ST_VISIBILITY (dyn_i->h->other) == STV_DEFAULT
4348 || dyn_i->h->root.type != bfd_link_hash_undefweak))
4350 unsigned int dyn_r_type;
4352 if (bfd_big_endian (abfd))
4353 dyn_r_type = R_IA64_RELNNMSB;
4355 dyn_r_type = R_IA64_RELNNLSB;
4357 elfNN_ia64_install_dyn_reloc (abfd, NULL, pltoff_sec,
4358 ia64_info->rel_pltoff_sec,
4359 dyn_i->pltoff_offset,
4360 dyn_r_type, 0, value);
4361 elfNN_ia64_install_dyn_reloc (abfd, NULL, pltoff_sec,
4362 ia64_info->rel_pltoff_sec,
4363 dyn_i->pltoff_offset + ARCH_SIZE / 8,
4367 dyn_i->pltoff_done = 1;
4370 /* Return the descriptor's address. */
4371 value = (pltoff_sec->output_section->vma
4372 + pltoff_sec->output_offset
4373 + dyn_i->pltoff_offset);
4378 /* Return the base VMA address which should be subtracted from real addresses
4379 when resolving @tprel() relocation.
4380 Main program TLS (whose template starts at PT_TLS p_vaddr)
4381 is assigned offset round(2 * size of pointer, PT_TLS p_align). */
4384 elfNN_ia64_tprel_base (info)
4385 struct bfd_link_info *info;
4387 asection *tls_sec = elf_hash_table (info)->tls_sec;
4389 BFD_ASSERT (tls_sec != NULL);
4390 return tls_sec->vma - align_power ((bfd_vma) ARCH_SIZE / 4,
4391 tls_sec->alignment_power);
4394 /* Return the base VMA address which should be subtracted from real addresses
4395 when resolving @dtprel() relocation.
4396 This is PT_TLS segment p_vaddr. */
4399 elfNN_ia64_dtprel_base (info)
4400 struct bfd_link_info *info;
4402 BFD_ASSERT (elf_hash_table (info)->tls_sec != NULL);
4403 return elf_hash_table (info)->tls_sec->vma;
4406 /* Called through qsort to sort the .IA_64.unwind section during a
4407 non-relocatable link. Set elfNN_ia64_unwind_entry_compare_bfd
4408 to the output bfd so we can do proper endianness frobbing. */
4410 static bfd *elfNN_ia64_unwind_entry_compare_bfd;
4413 elfNN_ia64_unwind_entry_compare (a, b)
4419 av = bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd, a);
4420 bv = bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd, b);
4422 return (av < bv ? -1 : av > bv ? 1 : 0);
4425 /* Make sure we've got ourselves a nice fat __gp value. */
4427 elfNN_ia64_choose_gp (abfd, info)
4429 struct bfd_link_info *info;
4431 bfd_vma min_vma = (bfd_vma) -1, max_vma = 0;
4432 bfd_vma min_short_vma = min_vma, max_short_vma = 0;
4433 struct elf_link_hash_entry *gp;
4436 struct elfNN_ia64_link_hash_table *ia64_info;
4438 ia64_info = elfNN_ia64_hash_table (info);
4440 /* Find the min and max vma of all sections marked short. Also collect
4441 min and max vma of any type, for use in selecting a nice gp. */
4442 for (os = abfd->sections; os ; os = os->next)
4446 if ((os->flags & SEC_ALLOC) == 0)
4450 hi = os->vma + (os->rawsize ? os->rawsize : os->size);
4458 if (os->flags & SEC_SMALL_DATA)
4460 if (min_short_vma > lo)
4462 if (max_short_vma < hi)
4467 /* See if the user wants to force a value. */
4468 gp = elf_link_hash_lookup (elf_hash_table (info), "__gp", FALSE,
4472 && (gp->root.type == bfd_link_hash_defined
4473 || gp->root.type == bfd_link_hash_defweak))
4475 asection *gp_sec = gp->root.u.def.section;
4476 gp_val = (gp->root.u.def.value
4477 + gp_sec->output_section->vma
4478 + gp_sec->output_offset);
4482 /* Pick a sensible value. */
4484 asection *got_sec = ia64_info->got_sec;
4486 /* Start with just the address of the .got. */
4488 gp_val = got_sec->output_section->vma;
4489 else if (max_short_vma != 0)
4490 gp_val = min_short_vma;
4491 else if (max_vma - min_vma < 0x200000)
4494 gp_val = max_vma - 0x200000 + 8;
4496 /* If it is possible to address the entire image, but we
4497 don't with the choice above, adjust. */
4498 if (max_vma - min_vma < 0x400000
4499 && (max_vma - gp_val >= 0x200000
4500 || gp_val - min_vma > 0x200000))
4501 gp_val = min_vma + 0x200000;
4502 else if (max_short_vma != 0)
4504 /* If we don't cover all the short data, adjust. */
4505 if (max_short_vma - gp_val >= 0x200000)
4506 gp_val = min_short_vma + 0x200000;
4508 /* If we're addressing stuff past the end, adjust back. */
4509 if (gp_val > max_vma)
4510 gp_val = max_vma - 0x200000 + 8;
4514 /* Validate whether all SHF_IA_64_SHORT sections are within
4515 range of the chosen GP. */
4517 if (max_short_vma != 0)
4519 if (max_short_vma - min_short_vma >= 0x400000)
4521 (*_bfd_error_handler)
4522 (_("%s: short data segment overflowed (0x%lx >= 0x400000)"),
4523 bfd_get_filename (abfd),
4524 (unsigned long) (max_short_vma - min_short_vma));
4527 else if ((gp_val > min_short_vma
4528 && gp_val - min_short_vma > 0x200000)
4529 || (gp_val < max_short_vma
4530 && max_short_vma - gp_val >= 0x200000))
4532 (*_bfd_error_handler)
4533 (_("%s: __gp does not cover short data segment"),
4534 bfd_get_filename (abfd));
4539 _bfd_set_gp_value (abfd, gp_val);
4545 elfNN_ia64_final_link (abfd, info)
4547 struct bfd_link_info *info;
4549 struct elfNN_ia64_link_hash_table *ia64_info;
4550 asection *unwind_output_sec;
4552 ia64_info = elfNN_ia64_hash_table (info);
4554 /* Make sure we've got ourselves a nice fat __gp value. */
4555 if (!info->relocatable)
4558 struct elf_link_hash_entry *gp;
4560 /* We assume after gp is set, section size will only decrease. We
4561 need to adjust gp for it. */
4562 _bfd_set_gp_value (abfd, 0);
4563 if (! elfNN_ia64_choose_gp (abfd, info))
4565 gp_val = _bfd_get_gp_value (abfd);
4567 gp = elf_link_hash_lookup (elf_hash_table (info), "__gp", FALSE,
4571 gp->root.type = bfd_link_hash_defined;
4572 gp->root.u.def.value = gp_val;
4573 gp->root.u.def.section = bfd_abs_section_ptr;
4577 /* If we're producing a final executable, we need to sort the contents
4578 of the .IA_64.unwind section. Force this section to be relocated
4579 into memory rather than written immediately to the output file. */
4580 unwind_output_sec = NULL;
4581 if (!info->relocatable)
4583 asection *s = bfd_get_section_by_name (abfd, ELF_STRING_ia64_unwind);
4586 unwind_output_sec = s->output_section;
4587 unwind_output_sec->contents
4588 = bfd_malloc (unwind_output_sec->size);
4589 if (unwind_output_sec->contents == NULL)
4594 /* Invoke the regular ELF backend linker to do all the work. */
4595 if (!bfd_elf_final_link (abfd, info))
4598 if (unwind_output_sec)
4600 elfNN_ia64_unwind_entry_compare_bfd = abfd;
4601 qsort (unwind_output_sec->contents,
4602 (size_t) (unwind_output_sec->size / 24),
4604 elfNN_ia64_unwind_entry_compare);
4606 if (! bfd_set_section_contents (abfd, unwind_output_sec,
4607 unwind_output_sec->contents, (bfd_vma) 0,
4608 unwind_output_sec->size))
4616 elfNN_ia64_relocate_section (output_bfd, info, input_bfd, input_section,
4617 contents, relocs, local_syms, local_sections)
4619 struct bfd_link_info *info;
4621 asection *input_section;
4623 Elf_Internal_Rela *relocs;
4624 Elf_Internal_Sym *local_syms;
4625 asection **local_sections;
4627 struct elfNN_ia64_link_hash_table *ia64_info;
4628 Elf_Internal_Shdr *symtab_hdr;
4629 Elf_Internal_Rela *rel;
4630 Elf_Internal_Rela *relend;
4632 bfd_boolean ret_val = TRUE; /* for non-fatal errors */
4635 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
4636 ia64_info = elfNN_ia64_hash_table (info);
4638 /* Infect various flags from the input section to the output section. */
4639 if (info->relocatable)
4643 flags = elf_section_data(input_section)->this_hdr.sh_flags;
4644 flags &= SHF_IA_64_NORECOV;
4646 elf_section_data(input_section->output_section)
4647 ->this_hdr.sh_flags |= flags;
4650 gp_val = _bfd_get_gp_value (output_bfd);
4651 srel = get_reloc_section (input_bfd, ia64_info, input_section, FALSE);
4654 relend = relocs + input_section->reloc_count;
4655 for (; rel < relend; ++rel)
4657 struct elf_link_hash_entry *h;
4658 struct elfNN_ia64_dyn_sym_info *dyn_i;
4659 bfd_reloc_status_type r;
4660 reloc_howto_type *howto;
4661 unsigned long r_symndx;
4662 Elf_Internal_Sym *sym;
4663 unsigned int r_type;
4667 bfd_boolean dynamic_symbol_p;
4668 bfd_boolean undef_weak_ref;
4670 r_type = ELFNN_R_TYPE (rel->r_info);
4671 if (r_type > R_IA64_MAX_RELOC_CODE)
4673 (*_bfd_error_handler)
4674 (_("%B: unknown relocation type %d"),
4675 input_bfd, (int) r_type);
4676 bfd_set_error (bfd_error_bad_value);
4681 howto = lookup_howto (r_type);
4682 r_symndx = ELFNN_R_SYM (rel->r_info);
4686 undef_weak_ref = FALSE;
4688 if (r_symndx < symtab_hdr->sh_info)
4690 /* Reloc against local symbol. */
4692 sym = local_syms + r_symndx;
4693 sym_sec = local_sections[r_symndx];
4695 value = _bfd_elf_rela_local_sym (output_bfd, sym, &msec, rel);
4696 if (!info->relocatable
4697 && (sym_sec->flags & SEC_MERGE) != 0
4698 && ELF_ST_TYPE (sym->st_info) == STT_SECTION
4699 && sym_sec->sec_info_type == ELF_INFO_TYPE_MERGE)
4701 struct elfNN_ia64_local_hash_entry *loc_h;
4703 loc_h = get_local_sym_hash (ia64_info, input_bfd, rel, FALSE);
4704 if (loc_h && ! loc_h->sec_merge_done)
4706 struct elfNN_ia64_dyn_sym_info *dynent;
4709 for (count = loc_h->count, dynent = loc_h->info;
4715 _bfd_merged_section_offset (output_bfd, &msec,
4716 elf_section_data (msec)->
4720 dynent->addend -= sym->st_value;
4721 dynent->addend += msec->output_section->vma
4722 + msec->output_offset
4723 - sym_sec->output_section->vma
4724 - sym_sec->output_offset;
4727 /* We may have introduced duplicated entries. We need
4728 to remove them properly. */
4729 count = sort_dyn_sym_info (loc_h->info, loc_h->count);
4730 if (count != loc_h->count)
4732 loc_h->count = count;
4733 loc_h->sorted_count = count;
4736 loc_h->sec_merge_done = 1;
4742 bfd_boolean unresolved_reloc;
4744 struct elf_link_hash_entry **sym_hashes = elf_sym_hashes (input_bfd);
4746 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
4747 r_symndx, symtab_hdr, sym_hashes,
4749 unresolved_reloc, warned);
4751 if (h->root.type == bfd_link_hash_undefweak)
4752 undef_weak_ref = TRUE;
4757 /* For relocs against symbols from removed linkonce sections,
4758 or sections discarded by a linker script, we just want the
4759 section contents zeroed. Avoid any special processing. */
4760 if (sym_sec != NULL && elf_discarded_section (sym_sec))
4762 _bfd_clear_contents (howto, input_bfd, contents + rel->r_offset);
4768 if (info->relocatable)
4771 hit_addr = contents + rel->r_offset;
4772 value += rel->r_addend;
4773 dynamic_symbol_p = elfNN_ia64_dynamic_symbol_p (h, info, r_type);
4784 case R_IA64_DIR32MSB:
4785 case R_IA64_DIR32LSB:
4786 case R_IA64_DIR64MSB:
4787 case R_IA64_DIR64LSB:
4788 /* Install a dynamic relocation for this reloc. */
4789 if ((dynamic_symbol_p || info->shared)
4791 && (input_section->flags & SEC_ALLOC) != 0)
4793 unsigned int dyn_r_type;
4797 BFD_ASSERT (srel != NULL);
4804 /* ??? People shouldn't be doing non-pic code in
4805 shared libraries nor dynamic executables. */
4806 (*_bfd_error_handler)
4807 (_("%B: non-pic code with imm relocation against dynamic symbol `%s'"),
4809 h ? h->root.root.string
4810 : bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
4819 /* If we don't need dynamic symbol lookup, find a
4820 matching RELATIVE relocation. */
4821 dyn_r_type = r_type;
4822 if (dynamic_symbol_p)
4824 dynindx = h->dynindx;
4825 addend = rel->r_addend;
4832 case R_IA64_DIR32MSB:
4833 dyn_r_type = R_IA64_REL32MSB;
4835 case R_IA64_DIR32LSB:
4836 dyn_r_type = R_IA64_REL32LSB;
4838 case R_IA64_DIR64MSB:
4839 dyn_r_type = R_IA64_REL64MSB;
4841 case R_IA64_DIR64LSB:
4842 dyn_r_type = R_IA64_REL64LSB;
4852 elfNN_ia64_install_dyn_reloc (output_bfd, info, input_section,
4853 srel, rel->r_offset, dyn_r_type,
4858 case R_IA64_LTV32MSB:
4859 case R_IA64_LTV32LSB:
4860 case R_IA64_LTV64MSB:
4861 case R_IA64_LTV64LSB:
4862 r = elfNN_ia64_install_value (hit_addr, value, r_type);
4865 case R_IA64_GPREL22:
4866 case R_IA64_GPREL64I:
4867 case R_IA64_GPREL32MSB:
4868 case R_IA64_GPREL32LSB:
4869 case R_IA64_GPREL64MSB:
4870 case R_IA64_GPREL64LSB:
4871 if (dynamic_symbol_p)
4873 (*_bfd_error_handler)
4874 (_("%B: @gprel relocation against dynamic symbol %s"),
4876 h ? h->root.root.string
4877 : bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
4883 r = elfNN_ia64_install_value (hit_addr, value, r_type);
4886 case R_IA64_LTOFF22:
4887 case R_IA64_LTOFF22X:
4888 case R_IA64_LTOFF64I:
4889 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4890 value = set_got_entry (input_bfd, info, dyn_i, (h ? h->dynindx : -1),
4891 rel->r_addend, value, R_IA64_DIRNNLSB);
4893 r = elfNN_ia64_install_value (hit_addr, value, r_type);
4896 case R_IA64_PLTOFF22:
4897 case R_IA64_PLTOFF64I:
4898 case R_IA64_PLTOFF64MSB:
4899 case R_IA64_PLTOFF64LSB:
4900 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4901 value = set_pltoff_entry (output_bfd, info, dyn_i, value, FALSE);
4903 r = elfNN_ia64_install_value (hit_addr, value, r_type);
4906 case R_IA64_FPTR64I:
4907 case R_IA64_FPTR32MSB:
4908 case R_IA64_FPTR32LSB:
4909 case R_IA64_FPTR64MSB:
4910 case R_IA64_FPTR64LSB:
4911 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4912 if (dyn_i->want_fptr)
4914 if (!undef_weak_ref)
4915 value = set_fptr_entry (output_bfd, info, dyn_i, value);
4917 if (!dyn_i->want_fptr || info->pie)
4920 unsigned int dyn_r_type = r_type;
4921 bfd_vma addend = rel->r_addend;
4923 /* Otherwise, we expect the dynamic linker to create
4926 if (dyn_i->want_fptr)
4928 if (r_type == R_IA64_FPTR64I)
4930 /* We can't represent this without a dynamic symbol.
4931 Adjust the relocation to be against an output
4932 section symbol, which are always present in the
4933 dynamic symbol table. */
4934 /* ??? People shouldn't be doing non-pic code in
4935 shared libraries. Hork. */
4936 (*_bfd_error_handler)
4937 (_("%B: linking non-pic code in a position independent executable"),
4944 dyn_r_type = r_type + R_IA64_RELNNLSB - R_IA64_FPTRNNLSB;
4948 if (h->dynindx != -1)
4949 dynindx = h->dynindx;
4951 dynindx = (_bfd_elf_link_lookup_local_dynindx
4952 (info, h->root.u.def.section->owner,
4953 global_sym_index (h)));
4958 dynindx = (_bfd_elf_link_lookup_local_dynindx
4959 (info, input_bfd, (long) r_symndx));
4963 elfNN_ia64_install_dyn_reloc (output_bfd, info, input_section,
4964 srel, rel->r_offset, dyn_r_type,
4968 r = elfNN_ia64_install_value (hit_addr, value, r_type);
4971 case R_IA64_LTOFF_FPTR22:
4972 case R_IA64_LTOFF_FPTR64I:
4973 case R_IA64_LTOFF_FPTR32MSB:
4974 case R_IA64_LTOFF_FPTR32LSB:
4975 case R_IA64_LTOFF_FPTR64MSB:
4976 case R_IA64_LTOFF_FPTR64LSB:
4980 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4981 if (dyn_i->want_fptr)
4983 BFD_ASSERT (h == NULL || h->dynindx == -1);
4984 if (!undef_weak_ref)
4985 value = set_fptr_entry (output_bfd, info, dyn_i, value);
4990 /* Otherwise, we expect the dynamic linker to create
4994 if (h->dynindx != -1)
4995 dynindx = h->dynindx;
4997 dynindx = (_bfd_elf_link_lookup_local_dynindx
4998 (info, h->root.u.def.section->owner,
4999 global_sym_index (h)));
5002 dynindx = (_bfd_elf_link_lookup_local_dynindx
5003 (info, input_bfd, (long) r_symndx));
5007 value = set_got_entry (output_bfd, info, dyn_i, dynindx,
5008 rel->r_addend, value, R_IA64_FPTRNNLSB);
5010 r = elfNN_ia64_install_value (hit_addr, value, r_type);
5014 case R_IA64_PCREL32MSB:
5015 case R_IA64_PCREL32LSB:
5016 case R_IA64_PCREL64MSB:
5017 case R_IA64_PCREL64LSB:
5018 /* Install a dynamic relocation for this reloc. */
5019 if (dynamic_symbol_p && r_symndx != 0)
5021 BFD_ASSERT (srel != NULL);
5023 elfNN_ia64_install_dyn_reloc (output_bfd, info, input_section,
5024 srel, rel->r_offset, r_type,
5025 h->dynindx, rel->r_addend);
5029 case R_IA64_PCREL21B:
5030 case R_IA64_PCREL60B:
5031 /* We should have created a PLT entry for any dynamic symbol. */
5034 dyn_i = get_dyn_sym_info (ia64_info, h, NULL, NULL, FALSE);
5036 if (dyn_i && dyn_i->want_plt2)
5038 /* Should have caught this earlier. */
5039 BFD_ASSERT (rel->r_addend == 0);
5041 value = (ia64_info->plt_sec->output_section->vma
5042 + ia64_info->plt_sec->output_offset
5043 + dyn_i->plt2_offset);
5047 /* Since there's no PLT entry, Validate that this is
5049 BFD_ASSERT (undef_weak_ref || sym_sec->output_section != NULL);
5051 /* If the symbol is undef_weak, we shouldn't be trying
5052 to call it. There's every chance that we'd wind up
5053 with an out-of-range fixup here. Don't bother setting
5054 any value at all. */
5060 case R_IA64_PCREL21BI:
5061 case R_IA64_PCREL21F:
5062 case R_IA64_PCREL21M:
5063 case R_IA64_PCREL22:
5064 case R_IA64_PCREL64I:
5065 /* The PCREL21BI reloc is specifically not intended for use with
5066 dynamic relocs. PCREL21F and PCREL21M are used for speculation
5067 fixup code, and thus probably ought not be dynamic. The
5068 PCREL22 and PCREL64I relocs aren't emitted as dynamic relocs. */
5069 if (dynamic_symbol_p)
5073 if (r_type == R_IA64_PCREL21BI)
5074 msg = _("%B: @internal branch to dynamic symbol %s");
5075 else if (r_type == R_IA64_PCREL21F || r_type == R_IA64_PCREL21M)
5076 msg = _("%B: speculation fixup to dynamic symbol %s");
5078 msg = _("%B: @pcrel relocation against dynamic symbol %s");
5079 (*_bfd_error_handler) (msg, input_bfd,
5080 h ? h->root.root.string
5081 : bfd_elf_sym_name (input_bfd,
5091 /* Make pc-relative. */
5092 value -= (input_section->output_section->vma
5093 + input_section->output_offset
5094 + rel->r_offset) & ~ (bfd_vma) 0x3;
5095 r = elfNN_ia64_install_value (hit_addr, value, r_type);
5098 case R_IA64_SEGREL32MSB:
5099 case R_IA64_SEGREL32LSB:
5100 case R_IA64_SEGREL64MSB:
5101 case R_IA64_SEGREL64LSB:
5103 struct elf_segment_map *m;
5104 Elf_Internal_Phdr *p;
5106 /* Find the segment that contains the output_section. */
5107 for (m = elf_tdata (output_bfd)->segment_map,
5108 p = elf_tdata (output_bfd)->phdr;
5113 for (i = m->count - 1; i >= 0; i--)
5114 if (m->sections[i] == input_section->output_section)
5122 r = bfd_reloc_notsupported;
5126 /* The VMA of the segment is the vaddr of the associated
5128 if (value > p->p_vaddr)
5129 value -= p->p_vaddr;
5132 r = elfNN_ia64_install_value (hit_addr, value, r_type);
5137 case R_IA64_SECREL32MSB:
5138 case R_IA64_SECREL32LSB:
5139 case R_IA64_SECREL64MSB:
5140 case R_IA64_SECREL64LSB:
5141 /* Make output-section relative to section where the symbol
5142 is defined. PR 475 */
5144 value -= sym_sec->output_section->vma;
5145 r = elfNN_ia64_install_value (hit_addr, value, r_type);
5148 case R_IA64_IPLTMSB:
5149 case R_IA64_IPLTLSB:
5150 /* Install a dynamic relocation for this reloc. */
5151 if ((dynamic_symbol_p || info->shared)
5152 && (input_section->flags & SEC_ALLOC) != 0)
5154 BFD_ASSERT (srel != NULL);
5156 /* If we don't need dynamic symbol lookup, install two
5157 RELATIVE relocations. */
5158 if (!dynamic_symbol_p)
5160 unsigned int dyn_r_type;
5162 if (r_type == R_IA64_IPLTMSB)
5163 dyn_r_type = R_IA64_REL64MSB;
5165 dyn_r_type = R_IA64_REL64LSB;
5167 elfNN_ia64_install_dyn_reloc (output_bfd, info,
5169 srel, rel->r_offset,
5170 dyn_r_type, 0, value);
5171 elfNN_ia64_install_dyn_reloc (output_bfd, info,
5173 srel, rel->r_offset + 8,
5174 dyn_r_type, 0, gp_val);
5177 elfNN_ia64_install_dyn_reloc (output_bfd, info, input_section,
5178 srel, rel->r_offset, r_type,
5179 h->dynindx, rel->r_addend);
5182 if (r_type == R_IA64_IPLTMSB)
5183 r_type = R_IA64_DIR64MSB;
5185 r_type = R_IA64_DIR64LSB;
5186 elfNN_ia64_install_value (hit_addr, value, r_type);
5187 r = elfNN_ia64_install_value (hit_addr + 8, gp_val, r_type);
5190 case R_IA64_TPREL14:
5191 case R_IA64_TPREL22:
5192 case R_IA64_TPREL64I:
5193 value -= elfNN_ia64_tprel_base (info);
5194 r = elfNN_ia64_install_value (hit_addr, value, r_type);
5197 case R_IA64_DTPREL14:
5198 case R_IA64_DTPREL22:
5199 case R_IA64_DTPREL64I:
5200 case R_IA64_DTPREL32LSB:
5201 case R_IA64_DTPREL32MSB:
5202 case R_IA64_DTPREL64LSB:
5203 case R_IA64_DTPREL64MSB:
5204 value -= elfNN_ia64_dtprel_base (info);
5205 r = elfNN_ia64_install_value (hit_addr, value, r_type);
5208 case R_IA64_LTOFF_TPREL22:
5209 case R_IA64_LTOFF_DTPMOD22:
5210 case R_IA64_LTOFF_DTPREL22:
5213 long dynindx = h ? h->dynindx : -1;
5214 bfd_vma r_addend = rel->r_addend;
5219 case R_IA64_LTOFF_TPREL22:
5220 if (!dynamic_symbol_p)
5223 value -= elfNN_ia64_tprel_base (info);
5226 r_addend += value - elfNN_ia64_dtprel_base (info);
5230 got_r_type = R_IA64_TPREL64LSB;
5232 case R_IA64_LTOFF_DTPMOD22:
5233 if (!dynamic_symbol_p && !info->shared)
5235 got_r_type = R_IA64_DTPMOD64LSB;
5237 case R_IA64_LTOFF_DTPREL22:
5238 if (!dynamic_symbol_p)
5239 value -= elfNN_ia64_dtprel_base (info);
5240 got_r_type = R_IA64_DTPRELNNLSB;
5243 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
5244 value = set_got_entry (input_bfd, info, dyn_i, dynindx, r_addend,
5247 r = elfNN_ia64_install_value (hit_addr, value, r_type);
5252 r = bfd_reloc_notsupported;
5261 case bfd_reloc_undefined:
5262 /* This can happen for global table relative relocs if
5263 __gp is undefined. This is a panic situation so we
5264 don't try to continue. */
5265 (*info->callbacks->undefined_symbol)
5266 (info, "__gp", input_bfd, input_section, rel->r_offset, 1);
5269 case bfd_reloc_notsupported:
5274 name = h->root.root.string;
5276 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
5278 if (!(*info->callbacks->warning) (info, _("unsupported reloc"),
5280 input_section, rel->r_offset))
5286 case bfd_reloc_dangerous:
5287 case bfd_reloc_outofrange:
5288 case bfd_reloc_overflow:
5294 name = h->root.root.string;
5296 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
5301 case R_IA64_PCREL21B:
5302 case R_IA64_PCREL21BI:
5303 case R_IA64_PCREL21M:
5304 case R_IA64_PCREL21F:
5305 if (is_elf_hash_table (info->hash))
5307 /* Relaxtion is always performed for ELF output.
5308 Overflow failures for those relocations mean
5309 that the section is too big to relax. */
5310 (*_bfd_error_handler)
5311 (_("%B: Can't relax br (%s) to `%s' at 0x%lx in section `%A' with size 0x%lx (> 0x1000000)."),
5312 input_bfd, input_section, howto->name, name,
5313 rel->r_offset, input_section->size);
5317 if (!(*info->callbacks->reloc_overflow) (info,
5339 elfNN_ia64_finish_dynamic_symbol (output_bfd, info, h, sym)
5341 struct bfd_link_info *info;
5342 struct elf_link_hash_entry *h;
5343 Elf_Internal_Sym *sym;
5345 struct elfNN_ia64_link_hash_table *ia64_info;
5346 struct elfNN_ia64_dyn_sym_info *dyn_i;
5348 ia64_info = elfNN_ia64_hash_table (info);
5349 dyn_i = get_dyn_sym_info (ia64_info, h, NULL, NULL, FALSE);
5351 /* Fill in the PLT data, if required. */
5352 if (dyn_i && dyn_i->want_plt)
5354 Elf_Internal_Rela outrel;
5357 bfd_vma plt_addr, pltoff_addr, gp_val, index;
5359 gp_val = _bfd_get_gp_value (output_bfd);
5361 /* Initialize the minimal PLT entry. */
5363 index = (dyn_i->plt_offset - PLT_HEADER_SIZE) / PLT_MIN_ENTRY_SIZE;
5364 plt_sec = ia64_info->plt_sec;
5365 loc = plt_sec->contents + dyn_i->plt_offset;
5367 memcpy (loc, plt_min_entry, PLT_MIN_ENTRY_SIZE);
5368 elfNN_ia64_install_value (loc, index, R_IA64_IMM22);
5369 elfNN_ia64_install_value (loc+2, -dyn_i->plt_offset, R_IA64_PCREL21B);
5371 plt_addr = (plt_sec->output_section->vma
5372 + plt_sec->output_offset
5373 + dyn_i->plt_offset);
5374 pltoff_addr = set_pltoff_entry (output_bfd, info, dyn_i, plt_addr, TRUE);
5376 /* Initialize the FULL PLT entry, if needed. */
5377 if (dyn_i->want_plt2)
5379 loc = plt_sec->contents + dyn_i->plt2_offset;
5381 memcpy (loc, plt_full_entry, PLT_FULL_ENTRY_SIZE);
5382 elfNN_ia64_install_value (loc, pltoff_addr - gp_val, R_IA64_IMM22);
5384 /* Mark the symbol as undefined, rather than as defined in the
5385 plt section. Leave the value alone. */
5386 /* ??? We didn't redefine it in adjust_dynamic_symbol in the
5387 first place. But perhaps elflink.c did some for us. */
5388 if (!h->def_regular)
5389 sym->st_shndx = SHN_UNDEF;
5392 /* Create the dynamic relocation. */
5393 outrel.r_offset = pltoff_addr;
5394 if (bfd_little_endian (output_bfd))
5395 outrel.r_info = ELFNN_R_INFO (h->dynindx, R_IA64_IPLTLSB);
5397 outrel.r_info = ELFNN_R_INFO (h->dynindx, R_IA64_IPLTMSB);
5398 outrel.r_addend = 0;
5400 /* This is fun. In the .IA_64.pltoff section, we've got entries
5401 that correspond both to real PLT entries, and those that
5402 happened to resolve to local symbols but need to be created
5403 to satisfy @pltoff relocations. The .rela.IA_64.pltoff
5404 relocations for the real PLT should come at the end of the
5405 section, so that they can be indexed by plt entry at runtime.
5407 We emitted all of the relocations for the non-PLT @pltoff
5408 entries during relocate_section. So we can consider the
5409 existing sec->reloc_count to be the base of the array of
5412 loc = ia64_info->rel_pltoff_sec->contents;
5413 loc += ((ia64_info->rel_pltoff_sec->reloc_count + index)
5414 * sizeof (ElfNN_External_Rela));
5415 bfd_elfNN_swap_reloca_out (output_bfd, &outrel, loc);
5418 /* Mark some specially defined symbols as absolute. */
5419 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
5420 || h == ia64_info->root.hgot
5421 || h == ia64_info->root.hplt)
5422 sym->st_shndx = SHN_ABS;
5428 elfNN_ia64_finish_dynamic_sections (abfd, info)
5430 struct bfd_link_info *info;
5432 struct elfNN_ia64_link_hash_table *ia64_info;
5435 ia64_info = elfNN_ia64_hash_table (info);
5436 dynobj = ia64_info->root.dynobj;
5438 if (elf_hash_table (info)->dynamic_sections_created)
5440 ElfNN_External_Dyn *dyncon, *dynconend;
5441 asection *sdyn, *sgotplt;
5444 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
5445 sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
5446 BFD_ASSERT (sdyn != NULL);
5447 dyncon = (ElfNN_External_Dyn *) sdyn->contents;
5448 dynconend = (ElfNN_External_Dyn *) (sdyn->contents + sdyn->size);
5450 gp_val = _bfd_get_gp_value (abfd);
5452 for (; dyncon < dynconend; dyncon++)
5454 Elf_Internal_Dyn dyn;
5456 bfd_elfNN_swap_dyn_in (dynobj, dyncon, &dyn);
5461 dyn.d_un.d_ptr = gp_val;
5465 dyn.d_un.d_val = (ia64_info->minplt_entries
5466 * sizeof (ElfNN_External_Rela));
5470 /* See the comment above in finish_dynamic_symbol. */
5471 dyn.d_un.d_ptr = (ia64_info->rel_pltoff_sec->output_section->vma
5472 + ia64_info->rel_pltoff_sec->output_offset
5473 + (ia64_info->rel_pltoff_sec->reloc_count
5474 * sizeof (ElfNN_External_Rela)));
5477 case DT_IA_64_PLT_RESERVE:
5478 dyn.d_un.d_ptr = (sgotplt->output_section->vma
5479 + sgotplt->output_offset);
5483 /* Do not have RELASZ include JMPREL. This makes things
5484 easier on ld.so. This is not what the rest of BFD set up. */
5485 dyn.d_un.d_val -= (ia64_info->minplt_entries
5486 * sizeof (ElfNN_External_Rela));
5490 bfd_elfNN_swap_dyn_out (abfd, &dyn, dyncon);
5493 /* Initialize the PLT0 entry. */
5494 if (ia64_info->plt_sec)
5496 bfd_byte *loc = ia64_info->plt_sec->contents;
5499 memcpy (loc, plt_header, PLT_HEADER_SIZE);
5501 pltres = (sgotplt->output_section->vma
5502 + sgotplt->output_offset
5505 elfNN_ia64_install_value (loc+1, pltres, R_IA64_GPREL22);
5512 /* ELF file flag handling: */
5514 /* Function to keep IA-64 specific file flags. */
5516 elfNN_ia64_set_private_flags (abfd, flags)
5520 BFD_ASSERT (!elf_flags_init (abfd)
5521 || elf_elfheader (abfd)->e_flags == flags);
5523 elf_elfheader (abfd)->e_flags = flags;
5524 elf_flags_init (abfd) = TRUE;
5528 /* Merge backend specific data from an object file to the output
5529 object file when linking. */
5531 elfNN_ia64_merge_private_bfd_data (ibfd, obfd)
5536 bfd_boolean ok = TRUE;
5538 /* Don't even pretend to support mixed-format linking. */
5539 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
5540 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
5543 in_flags = elf_elfheader (ibfd)->e_flags;
5544 out_flags = elf_elfheader (obfd)->e_flags;
5546 if (! elf_flags_init (obfd))
5548 elf_flags_init (obfd) = TRUE;
5549 elf_elfheader (obfd)->e_flags = in_flags;
5551 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
5552 && bfd_get_arch_info (obfd)->the_default)
5554 return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd),
5555 bfd_get_mach (ibfd));
5561 /* Check flag compatibility. */
5562 if (in_flags == out_flags)
5565 /* Output has EF_IA_64_REDUCEDFP set only if all inputs have it set. */
5566 if (!(in_flags & EF_IA_64_REDUCEDFP) && (out_flags & EF_IA_64_REDUCEDFP))
5567 elf_elfheader (obfd)->e_flags &= ~EF_IA_64_REDUCEDFP;
5569 if ((in_flags & EF_IA_64_TRAPNIL) != (out_flags & EF_IA_64_TRAPNIL))
5571 (*_bfd_error_handler)
5572 (_("%B: linking trap-on-NULL-dereference with non-trapping files"),
5575 bfd_set_error (bfd_error_bad_value);
5578 if ((in_flags & EF_IA_64_BE) != (out_flags & EF_IA_64_BE))
5580 (*_bfd_error_handler)
5581 (_("%B: linking big-endian files with little-endian files"),
5584 bfd_set_error (bfd_error_bad_value);
5587 if ((in_flags & EF_IA_64_ABI64) != (out_flags & EF_IA_64_ABI64))
5589 (*_bfd_error_handler)
5590 (_("%B: linking 64-bit files with 32-bit files"),
5593 bfd_set_error (bfd_error_bad_value);
5596 if ((in_flags & EF_IA_64_CONS_GP) != (out_flags & EF_IA_64_CONS_GP))
5598 (*_bfd_error_handler)
5599 (_("%B: linking constant-gp files with non-constant-gp files"),
5602 bfd_set_error (bfd_error_bad_value);
5605 if ((in_flags & EF_IA_64_NOFUNCDESC_CONS_GP)
5606 != (out_flags & EF_IA_64_NOFUNCDESC_CONS_GP))
5608 (*_bfd_error_handler)
5609 (_("%B: linking auto-pic files with non-auto-pic files"),
5612 bfd_set_error (bfd_error_bad_value);
5620 elfNN_ia64_print_private_bfd_data (abfd, ptr)
5624 FILE *file = (FILE *) ptr;
5625 flagword flags = elf_elfheader (abfd)->e_flags;
5627 BFD_ASSERT (abfd != NULL && ptr != NULL);
5629 fprintf (file, "private flags = %s%s%s%s%s%s%s%s\n",
5630 (flags & EF_IA_64_TRAPNIL) ? "TRAPNIL, " : "",
5631 (flags & EF_IA_64_EXT) ? "EXT, " : "",
5632 (flags & EF_IA_64_BE) ? "BE, " : "LE, ",
5633 (flags & EF_IA_64_REDUCEDFP) ? "REDUCEDFP, " : "",
5634 (flags & EF_IA_64_CONS_GP) ? "CONS_GP, " : "",
5635 (flags & EF_IA_64_NOFUNCDESC_CONS_GP) ? "NOFUNCDESC_CONS_GP, " : "",
5636 (flags & EF_IA_64_ABSOLUTE) ? "ABSOLUTE, " : "",
5637 (flags & EF_IA_64_ABI64) ? "ABI64" : "ABI32");
5639 _bfd_elf_print_private_bfd_data (abfd, ptr);
5643 static enum elf_reloc_type_class
5644 elfNN_ia64_reloc_type_class (rela)
5645 const Elf_Internal_Rela *rela;
5647 switch ((int) ELFNN_R_TYPE (rela->r_info))
5649 case R_IA64_REL32MSB:
5650 case R_IA64_REL32LSB:
5651 case R_IA64_REL64MSB:
5652 case R_IA64_REL64LSB:
5653 return reloc_class_relative;
5654 case R_IA64_IPLTMSB:
5655 case R_IA64_IPLTLSB:
5656 return reloc_class_plt;
5658 return reloc_class_copy;
5660 return reloc_class_normal;
5664 static const struct bfd_elf_special_section elfNN_ia64_special_sections[] =
5666 { STRING_COMMA_LEN (".sbss"), -1, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_IA_64_SHORT },
5667 { STRING_COMMA_LEN (".sdata"), -1, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_IA_64_SHORT },
5668 { NULL, 0, 0, 0, 0 }
5672 elfNN_ia64_object_p (bfd *abfd)
5675 asection *group, *unwi, *unw;
5678 char *unwi_name, *unw_name;
5681 if (abfd->flags & DYNAMIC)
5684 /* Flags for fake group section. */
5685 flags = (SEC_LINKER_CREATED | SEC_GROUP | SEC_LINK_ONCE
5688 /* We add a fake section group for each .gnu.linkonce.t.* section,
5689 which isn't in a section group, and its unwind sections. */
5690 for (sec = abfd->sections; sec != NULL; sec = sec->next)
5692 if (elf_sec_group (sec) == NULL
5693 && ((sec->flags & (SEC_LINK_ONCE | SEC_CODE | SEC_GROUP))
5694 == (SEC_LINK_ONCE | SEC_CODE))
5695 && CONST_STRNEQ (sec->name, ".gnu.linkonce.t."))
5697 name = sec->name + 16;
5699 amt = strlen (name) + sizeof (".gnu.linkonce.ia64unwi.");
5700 unwi_name = bfd_alloc (abfd, amt);
5704 strcpy (stpcpy (unwi_name, ".gnu.linkonce.ia64unwi."), name);
5705 unwi = bfd_get_section_by_name (abfd, unwi_name);
5707 amt = strlen (name) + sizeof (".gnu.linkonce.ia64unw.");
5708 unw_name = bfd_alloc (abfd, amt);
5712 strcpy (stpcpy (unw_name, ".gnu.linkonce.ia64unw."), name);
5713 unw = bfd_get_section_by_name (abfd, unw_name);
5715 /* We need to create a fake group section for it and its
5717 group = bfd_make_section_anyway_with_flags (abfd, name,
5722 /* Move the fake group section to the beginning. */
5723 bfd_section_list_remove (abfd, group);
5724 bfd_section_list_prepend (abfd, group);
5726 elf_next_in_group (group) = sec;
5728 elf_group_name (sec) = name;
5729 elf_next_in_group (sec) = sec;
5730 elf_sec_group (sec) = group;
5734 elf_group_name (unwi) = name;
5735 elf_next_in_group (unwi) = sec;
5736 elf_next_in_group (sec) = unwi;
5737 elf_sec_group (unwi) = group;
5742 elf_group_name (unw) = name;
5745 elf_next_in_group (unw) = elf_next_in_group (unwi);
5746 elf_next_in_group (unwi) = unw;
5750 elf_next_in_group (unw) = sec;
5751 elf_next_in_group (sec) = unw;
5753 elf_sec_group (unw) = group;
5756 /* Fake SHT_GROUP section header. */
5757 elf_section_data (group)->this_hdr.bfd_section = group;
5758 elf_section_data (group)->this_hdr.sh_type = SHT_GROUP;
5765 elfNN_ia64_hpux_vec (const bfd_target *vec)
5767 extern const bfd_target bfd_elfNN_ia64_hpux_big_vec;
5768 return (vec == & bfd_elfNN_ia64_hpux_big_vec);
5772 elfNN_hpux_post_process_headers (abfd, info)
5774 struct bfd_link_info *info ATTRIBUTE_UNUSED;
5776 Elf_Internal_Ehdr *i_ehdrp = elf_elfheader (abfd);
5778 i_ehdrp->e_ident[EI_OSABI] = get_elf_backend_data (abfd)->elf_osabi;
5779 i_ehdrp->e_ident[EI_ABIVERSION] = 1;
5783 elfNN_hpux_backend_section_from_bfd_section (abfd, sec, retval)
5784 bfd *abfd ATTRIBUTE_UNUSED;
5788 if (bfd_is_com_section (sec))
5790 *retval = SHN_IA_64_ANSI_COMMON;
5797 elfNN_hpux_backend_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
5800 elf_symbol_type *elfsym = (elf_symbol_type *) asym;
5802 switch (elfsym->internal_elf_sym.st_shndx)
5804 case SHN_IA_64_ANSI_COMMON:
5805 asym->section = bfd_com_section_ptr;
5806 asym->value = elfsym->internal_elf_sym.st_size;
5807 asym->flags &= ~BSF_GLOBAL;
5813 #define TARGET_LITTLE_SYM bfd_elfNN_ia64_little_vec
5814 #define TARGET_LITTLE_NAME "elfNN-ia64-little"
5815 #define TARGET_BIG_SYM bfd_elfNN_ia64_big_vec
5816 #define TARGET_BIG_NAME "elfNN-ia64-big"
5817 #define ELF_ARCH bfd_arch_ia64
5818 #define ELF_MACHINE_CODE EM_IA_64
5819 #define ELF_MACHINE_ALT1 1999 /* EAS2.3 */
5820 #define ELF_MACHINE_ALT2 1998 /* EAS2.2 */
5821 #define ELF_MAXPAGESIZE 0x10000 /* 64KB */
5822 #define ELF_COMMONPAGESIZE 0x4000 /* 16KB */
5824 #define elf_backend_section_from_shdr \
5825 elfNN_ia64_section_from_shdr
5826 #define elf_backend_section_flags \
5827 elfNN_ia64_section_flags
5828 #define elf_backend_fake_sections \
5829 elfNN_ia64_fake_sections
5830 #define elf_backend_final_write_processing \
5831 elfNN_ia64_final_write_processing
5832 #define elf_backend_add_symbol_hook \
5833 elfNN_ia64_add_symbol_hook
5834 #define elf_backend_additional_program_headers \
5835 elfNN_ia64_additional_program_headers
5836 #define elf_backend_modify_segment_map \
5837 elfNN_ia64_modify_segment_map
5838 #define elf_backend_modify_program_headers \
5839 elfNN_ia64_modify_program_headers
5840 #define elf_info_to_howto \
5841 elfNN_ia64_info_to_howto
5843 #define bfd_elfNN_bfd_reloc_type_lookup \
5844 elfNN_ia64_reloc_type_lookup
5845 #define bfd_elfNN_bfd_reloc_name_lookup \
5846 elfNN_ia64_reloc_name_lookup
5847 #define bfd_elfNN_bfd_is_local_label_name \
5848 elfNN_ia64_is_local_label_name
5849 #define bfd_elfNN_bfd_relax_section \
5850 elfNN_ia64_relax_section
5852 #define elf_backend_object_p \
5855 /* Stuff for the BFD linker: */
5856 #define bfd_elfNN_bfd_link_hash_table_create \
5857 elfNN_ia64_hash_table_create
5858 #define bfd_elfNN_bfd_link_hash_table_free \
5859 elfNN_ia64_hash_table_free
5860 #define elf_backend_create_dynamic_sections \
5861 elfNN_ia64_create_dynamic_sections
5862 #define elf_backend_check_relocs \
5863 elfNN_ia64_check_relocs
5864 #define elf_backend_adjust_dynamic_symbol \
5865 elfNN_ia64_adjust_dynamic_symbol
5866 #define elf_backend_size_dynamic_sections \
5867 elfNN_ia64_size_dynamic_sections
5868 #define elf_backend_omit_section_dynsym \
5869 ((bfd_boolean (*) (bfd *, struct bfd_link_info *, asection *)) bfd_true)
5870 #define elf_backend_relocate_section \
5871 elfNN_ia64_relocate_section
5872 #define elf_backend_finish_dynamic_symbol \
5873 elfNN_ia64_finish_dynamic_symbol
5874 #define elf_backend_finish_dynamic_sections \
5875 elfNN_ia64_finish_dynamic_sections
5876 #define bfd_elfNN_bfd_final_link \
5877 elfNN_ia64_final_link
5879 #define bfd_elfNN_bfd_merge_private_bfd_data \
5880 elfNN_ia64_merge_private_bfd_data
5881 #define bfd_elfNN_bfd_set_private_flags \
5882 elfNN_ia64_set_private_flags
5883 #define bfd_elfNN_bfd_print_private_bfd_data \
5884 elfNN_ia64_print_private_bfd_data
5886 #define elf_backend_plt_readonly 1
5887 #define elf_backend_want_plt_sym 0
5888 #define elf_backend_plt_alignment 5
5889 #define elf_backend_got_header_size 0
5890 #define elf_backend_want_got_plt 1
5891 #define elf_backend_may_use_rel_p 1
5892 #define elf_backend_may_use_rela_p 1
5893 #define elf_backend_default_use_rela_p 1
5894 #define elf_backend_want_dynbss 0
5895 #define elf_backend_copy_indirect_symbol elfNN_ia64_hash_copy_indirect
5896 #define elf_backend_hide_symbol elfNN_ia64_hash_hide_symbol
5897 #define elf_backend_fixup_symbol _bfd_elf_link_hash_fixup_symbol
5898 #define elf_backend_reloc_type_class elfNN_ia64_reloc_type_class
5899 #define elf_backend_rela_normal 1
5900 #define elf_backend_special_sections elfNN_ia64_special_sections
5901 #define elf_backend_default_execstack 0
5903 /* FIXME: PR 290: The Intel C compiler generates SHT_IA_64_UNWIND with
5904 SHF_LINK_ORDER. But it doesn't set the sh_link or sh_info fields.
5905 We don't want to flood users with so many error messages. We turn
5906 off the warning for now. It will be turned on later when the Intel
5907 compiler is fixed. */
5908 #define elf_backend_link_order_error_handler NULL
5910 #include "elfNN-target.h"
5912 /* FreeBSD support. */
5914 #undef TARGET_LITTLE_SYM
5915 #define TARGET_LITTLE_SYM bfd_elfNN_ia64_freebsd_vec
5916 #undef TARGET_LITTLE_NAME
5917 #define TARGET_LITTLE_NAME "elfNN-ia64-freebsd"
5918 #undef TARGET_BIG_SYM
5919 #undef TARGET_BIG_NAME
5922 #define ELF_OSABI ELFOSABI_FREEBSD
5924 #undef elf_backend_post_process_headers
5925 #define elf_backend_post_process_headers _bfd_elf_set_osabi
5928 #define elfNN_bed elfNN_ia64_fbsd_bed
5930 #include "elfNN-target.h"
5932 /* HPUX-specific vectors. */
5934 #undef TARGET_LITTLE_SYM
5935 #undef TARGET_LITTLE_NAME
5936 #undef TARGET_BIG_SYM
5937 #define TARGET_BIG_SYM bfd_elfNN_ia64_hpux_big_vec
5938 #undef TARGET_BIG_NAME
5939 #define TARGET_BIG_NAME "elfNN-ia64-hpux-big"
5941 /* These are HP-UX specific functions. */
5943 #undef elf_backend_post_process_headers
5944 #define elf_backend_post_process_headers elfNN_hpux_post_process_headers
5946 #undef elf_backend_section_from_bfd_section
5947 #define elf_backend_section_from_bfd_section elfNN_hpux_backend_section_from_bfd_section
5949 #undef elf_backend_symbol_processing
5950 #define elf_backend_symbol_processing elfNN_hpux_backend_symbol_processing
5952 #undef elf_backend_want_p_paddr_set_to_zero
5953 #define elf_backend_want_p_paddr_set_to_zero 1
5955 #undef ELF_MAXPAGESIZE
5956 #define ELF_MAXPAGESIZE 0x1000 /* 4K */
5957 #undef ELF_COMMONPAGESIZE
5959 #define ELF_OSABI ELFOSABI_HPUX
5962 #define elfNN_bed elfNN_ia64_hpux_bed
5964 #include "elfNN-target.h"
5966 #undef elf_backend_want_p_paddr_set_to_zero