1 /* IA-64 support for 64-bit ELF
2 Copyright 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
3 Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
25 #include "opcode/ia64.h"
30 /* THE RULES for all the stuff the linker creates --
32 GOT Entries created in response to LTOFF or LTOFF_FPTR
33 relocations. Dynamic relocs created for dynamic
34 symbols in an application; REL relocs for locals
37 FPTR The canonical function descriptor. Created for local
38 symbols in applications. Descriptors for dynamic symbols
39 and local symbols in shared libraries are created by
40 ld.so. Thus there are no dynamic relocs against these
41 objects. The FPTR relocs for such _are_ passed through
42 to the dynamic relocation tables.
44 FULL_PLT Created for a PCREL21B relocation against a dynamic symbol.
45 Requires the creation of a PLTOFF entry. This does not
46 require any dynamic relocations.
48 PLTOFF Created by PLTOFF relocations. For local symbols, this
49 is an alternate function descriptor, and in shared libraries
50 requires two REL relocations. Note that this cannot be
51 transformed into an FPTR relocation, since it must be in
52 range of the GP. For dynamic symbols, this is a function
53 descriptor for a MIN_PLT entry, and requires one IPLT reloc.
55 MIN_PLT Created by PLTOFF entries against dynamic symbols. This
56 does not require dynamic relocations. */
58 #define NELEMS(a) ((int) (sizeof (a) / sizeof ((a)[0])))
60 typedef struct bfd_hash_entry *(*new_hash_entry_func)
61 PARAMS ((struct bfd_hash_entry *, struct bfd_hash_table *, const char *));
63 /* In dynamically (linker-) created sections, we generally need to keep track
64 of the place a symbol or expression got allocated to. This is done via hash
65 tables that store entries of the following type. */
67 struct elfNN_ia64_dyn_sym_info
69 /* The addend for which this entry is relevant. */
72 /* Next addend in the list. */
73 struct elfNN_ia64_dyn_sym_info *next;
77 bfd_vma pltoff_offset;
81 bfd_vma dtpmod_offset;
82 bfd_vma dtprel_offset;
84 /* The symbol table entry, if any, that this was derived from. */
85 struct elf_link_hash_entry *h;
87 /* Used to count non-got, non-plt relocations for delayed sizing
88 of relocation sections. */
89 struct elfNN_ia64_dyn_reloc_entry
91 struct elfNN_ia64_dyn_reloc_entry *next;
96 /* Is this reloc against readonly section? */
100 /* TRUE when the section contents have been updated. */
101 unsigned got_done : 1;
102 unsigned fptr_done : 1;
103 unsigned pltoff_done : 1;
104 unsigned tprel_done : 1;
105 unsigned dtpmod_done : 1;
106 unsigned dtprel_done : 1;
108 /* TRUE for the different kinds of linker data we want created. */
109 unsigned want_got : 1;
110 unsigned want_gotx : 1;
111 unsigned want_fptr : 1;
112 unsigned want_ltoff_fptr : 1;
113 unsigned want_plt : 1;
114 unsigned want_plt2 : 1;
115 unsigned want_pltoff : 1;
116 unsigned want_tprel : 1;
117 unsigned want_dtpmod : 1;
118 unsigned want_dtprel : 1;
121 struct elfNN_ia64_local_hash_entry
125 struct elfNN_ia64_dyn_sym_info *info;
127 /* TRUE if this hash entry's addends was translated for
128 SHF_MERGE optimization. */
129 unsigned sec_merge_done : 1;
132 struct elfNN_ia64_link_hash_entry
134 struct elf_link_hash_entry root;
135 struct elfNN_ia64_dyn_sym_info *info;
138 struct elfNN_ia64_link_hash_table
140 /* The main hash table. */
141 struct elf_link_hash_table root;
143 asection *got_sec; /* the linkage table section (or NULL) */
144 asection *rel_got_sec; /* dynamic relocation section for same */
145 asection *fptr_sec; /* function descriptor table (or NULL) */
146 asection *rel_fptr_sec; /* dynamic relocation section for same */
147 asection *plt_sec; /* the primary plt section (or NULL) */
148 asection *pltoff_sec; /* private descriptors for plt (or NULL) */
149 asection *rel_pltoff_sec; /* dynamic relocation section for same */
151 bfd_size_type minplt_entries; /* number of minplt entries */
152 unsigned reltext : 1; /* are there relocs against readonly sections? */
153 unsigned self_dtpmod_done : 1;/* has self DTPMOD entry been finished? */
154 bfd_vma self_dtpmod_offset; /* .got offset to self DTPMOD entry */
156 htab_t loc_hash_table;
157 void *loc_hash_memory;
160 struct elfNN_ia64_allocate_data
162 struct bfd_link_info *info;
166 #define elfNN_ia64_hash_table(p) \
167 ((struct elfNN_ia64_link_hash_table *) ((p)->hash))
169 static bfd_reloc_status_type elfNN_ia64_reloc
170 PARAMS ((bfd *abfd, arelent *reloc, asymbol *sym, PTR data,
171 asection *input_section, bfd *output_bfd, char **error_message));
172 static reloc_howto_type * lookup_howto
173 PARAMS ((unsigned int rtype));
174 static reloc_howto_type *elfNN_ia64_reloc_type_lookup
175 PARAMS ((bfd *abfd, bfd_reloc_code_real_type bfd_code));
176 static void elfNN_ia64_info_to_howto
177 PARAMS ((bfd *abfd, arelent *bfd_reloc, Elf_Internal_Rela *elf_reloc));
178 static bfd_boolean elfNN_ia64_relax_section
179 PARAMS((bfd *abfd, asection *sec, struct bfd_link_info *link_info,
180 bfd_boolean *again));
181 static void elfNN_ia64_relax_ldxmov
182 PARAMS((bfd *abfd, bfd_byte *contents, bfd_vma off));
183 static bfd_boolean is_unwind_section_name
184 PARAMS ((bfd *abfd, const char *));
185 static bfd_boolean elfNN_ia64_section_from_shdr
186 PARAMS ((bfd *, Elf_Internal_Shdr *, const char *));
187 static bfd_boolean elfNN_ia64_section_flags
188 PARAMS ((flagword *, Elf_Internal_Shdr *));
189 static bfd_boolean elfNN_ia64_fake_sections
190 PARAMS ((bfd *abfd, Elf_Internal_Shdr *hdr, asection *sec));
191 static void elfNN_ia64_final_write_processing
192 PARAMS ((bfd *abfd, bfd_boolean linker));
193 static bfd_boolean elfNN_ia64_add_symbol_hook
194 PARAMS ((bfd *abfd, struct bfd_link_info *info, const Elf_Internal_Sym *sym,
195 const char **namep, flagword *flagsp, asection **secp,
197 static int elfNN_ia64_additional_program_headers
198 PARAMS ((bfd *abfd));
199 static bfd_boolean elfNN_ia64_modify_segment_map
200 PARAMS ((bfd *, struct bfd_link_info *));
201 static bfd_boolean elfNN_ia64_is_local_label_name
202 PARAMS ((bfd *abfd, const char *name));
203 static bfd_boolean elfNN_ia64_dynamic_symbol_p
204 PARAMS ((struct elf_link_hash_entry *h, struct bfd_link_info *info, int));
205 static struct bfd_hash_entry *elfNN_ia64_new_elf_hash_entry
206 PARAMS ((struct bfd_hash_entry *entry, struct bfd_hash_table *table,
207 const char *string));
208 static void elfNN_ia64_hash_copy_indirect
209 PARAMS ((const struct elf_backend_data *, struct elf_link_hash_entry *,
210 struct elf_link_hash_entry *));
211 static void elfNN_ia64_hash_hide_symbol
212 PARAMS ((struct bfd_link_info *, struct elf_link_hash_entry *, bfd_boolean));
213 static hashval_t elfNN_ia64_local_htab_hash PARAMS ((const void *));
214 static int elfNN_ia64_local_htab_eq PARAMS ((const void *ptr1,
216 static struct bfd_link_hash_table *elfNN_ia64_hash_table_create
217 PARAMS ((bfd *abfd));
218 static void elfNN_ia64_hash_table_free
219 PARAMS ((struct bfd_link_hash_table *hash));
220 static bfd_boolean elfNN_ia64_global_dyn_sym_thunk
221 PARAMS ((struct bfd_hash_entry *, PTR));
222 static int elfNN_ia64_local_dyn_sym_thunk
223 PARAMS ((void **, PTR));
224 static void elfNN_ia64_dyn_sym_traverse
225 PARAMS ((struct elfNN_ia64_link_hash_table *ia64_info,
226 bfd_boolean (*func) (struct elfNN_ia64_dyn_sym_info *, PTR),
228 static bfd_boolean elfNN_ia64_create_dynamic_sections
229 PARAMS ((bfd *abfd, struct bfd_link_info *info));
230 static struct elfNN_ia64_local_hash_entry * get_local_sym_hash
231 PARAMS ((struct elfNN_ia64_link_hash_table *ia64_info,
232 bfd *abfd, const Elf_Internal_Rela *rel, bfd_boolean create));
233 static struct elfNN_ia64_dyn_sym_info * get_dyn_sym_info
234 PARAMS ((struct elfNN_ia64_link_hash_table *ia64_info,
235 struct elf_link_hash_entry *h,
236 bfd *abfd, const Elf_Internal_Rela *rel, bfd_boolean create));
237 static asection *get_got
238 PARAMS ((bfd *abfd, struct bfd_link_info *info,
239 struct elfNN_ia64_link_hash_table *ia64_info));
240 static asection *get_fptr
241 PARAMS ((bfd *abfd, struct bfd_link_info *info,
242 struct elfNN_ia64_link_hash_table *ia64_info));
243 static asection *get_pltoff
244 PARAMS ((bfd *abfd, struct bfd_link_info *info,
245 struct elfNN_ia64_link_hash_table *ia64_info));
246 static asection *get_reloc_section
247 PARAMS ((bfd *abfd, struct elfNN_ia64_link_hash_table *ia64_info,
248 asection *sec, bfd_boolean create));
249 static bfd_boolean elfNN_ia64_check_relocs
250 PARAMS ((bfd *abfd, struct bfd_link_info *info, asection *sec,
251 const Elf_Internal_Rela *relocs));
252 static bfd_boolean elfNN_ia64_adjust_dynamic_symbol
253 PARAMS ((struct bfd_link_info *info, struct elf_link_hash_entry *h));
254 static long global_sym_index
255 PARAMS ((struct elf_link_hash_entry *h));
256 static bfd_boolean allocate_fptr
257 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
258 static bfd_boolean allocate_global_data_got
259 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
260 static bfd_boolean allocate_global_fptr_got
261 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
262 static bfd_boolean allocate_local_got
263 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
264 static bfd_boolean allocate_pltoff_entries
265 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
266 static bfd_boolean allocate_plt_entries
267 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
268 static bfd_boolean allocate_plt2_entries
269 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
270 static bfd_boolean allocate_dynrel_entries
271 PARAMS ((struct elfNN_ia64_dyn_sym_info *dyn_i, PTR data));
272 static bfd_boolean elfNN_ia64_size_dynamic_sections
273 PARAMS ((bfd *output_bfd, struct bfd_link_info *info));
274 static bfd_reloc_status_type elfNN_ia64_install_value
275 PARAMS ((bfd *abfd, bfd_byte *hit_addr, bfd_vma val, unsigned int r_type));
276 static void elfNN_ia64_install_dyn_reloc
277 PARAMS ((bfd *abfd, struct bfd_link_info *info, asection *sec,
278 asection *srel, bfd_vma offset, unsigned int type,
279 long dynindx, bfd_vma addend));
280 static bfd_vma set_got_entry
281 PARAMS ((bfd *abfd, struct bfd_link_info *info,
282 struct elfNN_ia64_dyn_sym_info *dyn_i, long dynindx,
283 bfd_vma addend, bfd_vma value, unsigned int dyn_r_type));
284 static bfd_vma set_fptr_entry
285 PARAMS ((bfd *abfd, struct bfd_link_info *info,
286 struct elfNN_ia64_dyn_sym_info *dyn_i,
288 static bfd_vma set_pltoff_entry
289 PARAMS ((bfd *abfd, struct bfd_link_info *info,
290 struct elfNN_ia64_dyn_sym_info *dyn_i,
291 bfd_vma value, bfd_boolean));
292 static bfd_vma elfNN_ia64_tprel_base
293 PARAMS ((struct bfd_link_info *info));
294 static bfd_vma elfNN_ia64_dtprel_base
295 PARAMS ((struct bfd_link_info *info));
296 static int elfNN_ia64_unwind_entry_compare
297 PARAMS ((const PTR, const PTR));
298 static bfd_boolean elfNN_ia64_choose_gp
299 PARAMS ((bfd *abfd, struct bfd_link_info *info));
300 static bfd_boolean elfNN_ia64_final_link
301 PARAMS ((bfd *abfd, struct bfd_link_info *info));
302 static bfd_boolean elfNN_ia64_relocate_section
303 PARAMS ((bfd *output_bfd, struct bfd_link_info *info, bfd *input_bfd,
304 asection *input_section, bfd_byte *contents,
305 Elf_Internal_Rela *relocs, Elf_Internal_Sym *local_syms,
306 asection **local_sections));
307 static bfd_boolean elfNN_ia64_finish_dynamic_symbol
308 PARAMS ((bfd *output_bfd, struct bfd_link_info *info,
309 struct elf_link_hash_entry *h, Elf_Internal_Sym *sym));
310 static bfd_boolean elfNN_ia64_finish_dynamic_sections
311 PARAMS ((bfd *abfd, struct bfd_link_info *info));
312 static bfd_boolean elfNN_ia64_set_private_flags
313 PARAMS ((bfd *abfd, flagword flags));
314 static bfd_boolean elfNN_ia64_merge_private_bfd_data
315 PARAMS ((bfd *ibfd, bfd *obfd));
316 static bfd_boolean elfNN_ia64_print_private_bfd_data
317 PARAMS ((bfd *abfd, PTR ptr));
318 static enum elf_reloc_type_class elfNN_ia64_reloc_type_class
319 PARAMS ((const Elf_Internal_Rela *));
320 static bfd_boolean elfNN_ia64_hpux_vec
321 PARAMS ((const bfd_target *vec));
322 static void elfNN_hpux_post_process_headers
323 PARAMS ((bfd *abfd, struct bfd_link_info *info));
324 bfd_boolean elfNN_hpux_backend_section_from_bfd_section
325 PARAMS ((bfd *abfd, asection *sec, int *retval));
327 /* ia64-specific relocation. */
329 /* Perform a relocation. Not much to do here as all the hard work is
330 done in elfNN_ia64_final_link_relocate. */
331 static bfd_reloc_status_type
332 elfNN_ia64_reloc (abfd, reloc, sym, data, input_section,
333 output_bfd, error_message)
334 bfd *abfd ATTRIBUTE_UNUSED;
336 asymbol *sym ATTRIBUTE_UNUSED;
337 PTR data ATTRIBUTE_UNUSED;
338 asection *input_section;
340 char **error_message;
344 reloc->address += input_section->output_offset;
348 if (input_section->flags & SEC_DEBUGGING)
349 return bfd_reloc_continue;
351 *error_message = "Unsupported call to elfNN_ia64_reloc";
352 return bfd_reloc_notsupported;
355 #define IA64_HOWTO(TYPE, NAME, SIZE, PCREL, IN) \
356 HOWTO (TYPE, 0, SIZE, 0, PCREL, 0, complain_overflow_signed, \
357 elfNN_ia64_reloc, NAME, FALSE, 0, -1, IN)
359 /* This table has to be sorted according to increasing number of the
361 static reloc_howto_type ia64_howto_table[] =
363 IA64_HOWTO (R_IA64_NONE, "NONE", 0, FALSE, TRUE),
365 IA64_HOWTO (R_IA64_IMM14, "IMM14", 0, FALSE, TRUE),
366 IA64_HOWTO (R_IA64_IMM22, "IMM22", 0, FALSE, TRUE),
367 IA64_HOWTO (R_IA64_IMM64, "IMM64", 0, FALSE, TRUE),
368 IA64_HOWTO (R_IA64_DIR32MSB, "DIR32MSB", 2, FALSE, TRUE),
369 IA64_HOWTO (R_IA64_DIR32LSB, "DIR32LSB", 2, FALSE, TRUE),
370 IA64_HOWTO (R_IA64_DIR64MSB, "DIR64MSB", 4, FALSE, TRUE),
371 IA64_HOWTO (R_IA64_DIR64LSB, "DIR64LSB", 4, FALSE, TRUE),
373 IA64_HOWTO (R_IA64_GPREL22, "GPREL22", 0, FALSE, TRUE),
374 IA64_HOWTO (R_IA64_GPREL64I, "GPREL64I", 0, FALSE, TRUE),
375 IA64_HOWTO (R_IA64_GPREL32MSB, "GPREL32MSB", 2, FALSE, TRUE),
376 IA64_HOWTO (R_IA64_GPREL32LSB, "GPREL32LSB", 2, FALSE, TRUE),
377 IA64_HOWTO (R_IA64_GPREL64MSB, "GPREL64MSB", 4, FALSE, TRUE),
378 IA64_HOWTO (R_IA64_GPREL64LSB, "GPREL64LSB", 4, FALSE, TRUE),
380 IA64_HOWTO (R_IA64_LTOFF22, "LTOFF22", 0, FALSE, TRUE),
381 IA64_HOWTO (R_IA64_LTOFF64I, "LTOFF64I", 0, FALSE, TRUE),
383 IA64_HOWTO (R_IA64_PLTOFF22, "PLTOFF22", 0, FALSE, TRUE),
384 IA64_HOWTO (R_IA64_PLTOFF64I, "PLTOFF64I", 0, FALSE, TRUE),
385 IA64_HOWTO (R_IA64_PLTOFF64MSB, "PLTOFF64MSB", 4, FALSE, TRUE),
386 IA64_HOWTO (R_IA64_PLTOFF64LSB, "PLTOFF64LSB", 4, FALSE, TRUE),
388 IA64_HOWTO (R_IA64_FPTR64I, "FPTR64I", 0, FALSE, TRUE),
389 IA64_HOWTO (R_IA64_FPTR32MSB, "FPTR32MSB", 2, FALSE, TRUE),
390 IA64_HOWTO (R_IA64_FPTR32LSB, "FPTR32LSB", 2, FALSE, TRUE),
391 IA64_HOWTO (R_IA64_FPTR64MSB, "FPTR64MSB", 4, FALSE, TRUE),
392 IA64_HOWTO (R_IA64_FPTR64LSB, "FPTR64LSB", 4, FALSE, TRUE),
394 IA64_HOWTO (R_IA64_PCREL60B, "PCREL60B", 0, TRUE, TRUE),
395 IA64_HOWTO (R_IA64_PCREL21B, "PCREL21B", 0, TRUE, TRUE),
396 IA64_HOWTO (R_IA64_PCREL21M, "PCREL21M", 0, TRUE, TRUE),
397 IA64_HOWTO (R_IA64_PCREL21F, "PCREL21F", 0, TRUE, TRUE),
398 IA64_HOWTO (R_IA64_PCREL32MSB, "PCREL32MSB", 2, TRUE, TRUE),
399 IA64_HOWTO (R_IA64_PCREL32LSB, "PCREL32LSB", 2, TRUE, TRUE),
400 IA64_HOWTO (R_IA64_PCREL64MSB, "PCREL64MSB", 4, TRUE, TRUE),
401 IA64_HOWTO (R_IA64_PCREL64LSB, "PCREL64LSB", 4, TRUE, TRUE),
403 IA64_HOWTO (R_IA64_LTOFF_FPTR22, "LTOFF_FPTR22", 0, FALSE, TRUE),
404 IA64_HOWTO (R_IA64_LTOFF_FPTR64I, "LTOFF_FPTR64I", 0, FALSE, TRUE),
405 IA64_HOWTO (R_IA64_LTOFF_FPTR32MSB, "LTOFF_FPTR32MSB", 2, FALSE, TRUE),
406 IA64_HOWTO (R_IA64_LTOFF_FPTR32LSB, "LTOFF_FPTR32LSB", 2, FALSE, TRUE),
407 IA64_HOWTO (R_IA64_LTOFF_FPTR64MSB, "LTOFF_FPTR64MSB", 4, FALSE, TRUE),
408 IA64_HOWTO (R_IA64_LTOFF_FPTR64LSB, "LTOFF_FPTR64LSB", 4, FALSE, TRUE),
410 IA64_HOWTO (R_IA64_SEGREL32MSB, "SEGREL32MSB", 2, FALSE, TRUE),
411 IA64_HOWTO (R_IA64_SEGREL32LSB, "SEGREL32LSB", 2, FALSE, TRUE),
412 IA64_HOWTO (R_IA64_SEGREL64MSB, "SEGREL64MSB", 4, FALSE, TRUE),
413 IA64_HOWTO (R_IA64_SEGREL64LSB, "SEGREL64LSB", 4, FALSE, TRUE),
415 IA64_HOWTO (R_IA64_SECREL32MSB, "SECREL32MSB", 2, FALSE, TRUE),
416 IA64_HOWTO (R_IA64_SECREL32LSB, "SECREL32LSB", 2, FALSE, TRUE),
417 IA64_HOWTO (R_IA64_SECREL64MSB, "SECREL64MSB", 4, FALSE, TRUE),
418 IA64_HOWTO (R_IA64_SECREL64LSB, "SECREL64LSB", 4, FALSE, TRUE),
420 IA64_HOWTO (R_IA64_REL32MSB, "REL32MSB", 2, FALSE, TRUE),
421 IA64_HOWTO (R_IA64_REL32LSB, "REL32LSB", 2, FALSE, TRUE),
422 IA64_HOWTO (R_IA64_REL64MSB, "REL64MSB", 4, FALSE, TRUE),
423 IA64_HOWTO (R_IA64_REL64LSB, "REL64LSB", 4, FALSE, TRUE),
425 IA64_HOWTO (R_IA64_LTV32MSB, "LTV32MSB", 2, FALSE, TRUE),
426 IA64_HOWTO (R_IA64_LTV32LSB, "LTV32LSB", 2, FALSE, TRUE),
427 IA64_HOWTO (R_IA64_LTV64MSB, "LTV64MSB", 4, FALSE, TRUE),
428 IA64_HOWTO (R_IA64_LTV64LSB, "LTV64LSB", 4, FALSE, TRUE),
430 IA64_HOWTO (R_IA64_PCREL21BI, "PCREL21BI", 0, TRUE, TRUE),
431 IA64_HOWTO (R_IA64_PCREL22, "PCREL22", 0, TRUE, TRUE),
432 IA64_HOWTO (R_IA64_PCREL64I, "PCREL64I", 0, TRUE, TRUE),
434 IA64_HOWTO (R_IA64_IPLTMSB, "IPLTMSB", 4, FALSE, TRUE),
435 IA64_HOWTO (R_IA64_IPLTLSB, "IPLTLSB", 4, FALSE, TRUE),
436 IA64_HOWTO (R_IA64_COPY, "COPY", 4, FALSE, TRUE),
437 IA64_HOWTO (R_IA64_LTOFF22X, "LTOFF22X", 0, FALSE, TRUE),
438 IA64_HOWTO (R_IA64_LDXMOV, "LDXMOV", 0, FALSE, TRUE),
440 IA64_HOWTO (R_IA64_TPREL14, "TPREL14", 0, FALSE, FALSE),
441 IA64_HOWTO (R_IA64_TPREL22, "TPREL22", 0, FALSE, FALSE),
442 IA64_HOWTO (R_IA64_TPREL64I, "TPREL64I", 0, FALSE, FALSE),
443 IA64_HOWTO (R_IA64_TPREL64MSB, "TPREL64MSB", 4, FALSE, FALSE),
444 IA64_HOWTO (R_IA64_TPREL64LSB, "TPREL64LSB", 4, FALSE, FALSE),
445 IA64_HOWTO (R_IA64_LTOFF_TPREL22, "LTOFF_TPREL22", 0, FALSE, FALSE),
447 IA64_HOWTO (R_IA64_DTPMOD64MSB, "TPREL64MSB", 4, FALSE, FALSE),
448 IA64_HOWTO (R_IA64_DTPMOD64LSB, "TPREL64LSB", 4, FALSE, FALSE),
449 IA64_HOWTO (R_IA64_LTOFF_DTPMOD22, "LTOFF_DTPMOD22", 0, FALSE, FALSE),
451 IA64_HOWTO (R_IA64_DTPREL14, "DTPREL14", 0, FALSE, FALSE),
452 IA64_HOWTO (R_IA64_DTPREL22, "DTPREL22", 0, FALSE, FALSE),
453 IA64_HOWTO (R_IA64_DTPREL64I, "DTPREL64I", 0, FALSE, FALSE),
454 IA64_HOWTO (R_IA64_DTPREL32MSB, "DTPREL32MSB", 2, FALSE, FALSE),
455 IA64_HOWTO (R_IA64_DTPREL32LSB, "DTPREL32LSB", 2, FALSE, FALSE),
456 IA64_HOWTO (R_IA64_DTPREL64MSB, "DTPREL64MSB", 4, FALSE, FALSE),
457 IA64_HOWTO (R_IA64_DTPREL64LSB, "DTPREL64LSB", 4, FALSE, FALSE),
458 IA64_HOWTO (R_IA64_LTOFF_DTPREL22, "LTOFF_DTPREL22", 0, FALSE, FALSE),
461 static unsigned char elf_code_to_howto_index[R_IA64_MAX_RELOC_CODE + 1];
463 /* Given a BFD reloc type, return the matching HOWTO structure. */
465 static reloc_howto_type *
469 static int inited = 0;
476 memset (elf_code_to_howto_index, 0xff, sizeof (elf_code_to_howto_index));
477 for (i = 0; i < NELEMS (ia64_howto_table); ++i)
478 elf_code_to_howto_index[ia64_howto_table[i].type] = i;
481 BFD_ASSERT (rtype <= R_IA64_MAX_RELOC_CODE);
482 i = elf_code_to_howto_index[rtype];
483 if (i >= NELEMS (ia64_howto_table))
485 return ia64_howto_table + i;
488 static reloc_howto_type*
489 elfNN_ia64_reloc_type_lookup (abfd, bfd_code)
490 bfd *abfd ATTRIBUTE_UNUSED;
491 bfd_reloc_code_real_type bfd_code;
497 case BFD_RELOC_NONE: rtype = R_IA64_NONE; break;
499 case BFD_RELOC_IA64_IMM14: rtype = R_IA64_IMM14; break;
500 case BFD_RELOC_IA64_IMM22: rtype = R_IA64_IMM22; break;
501 case BFD_RELOC_IA64_IMM64: rtype = R_IA64_IMM64; break;
503 case BFD_RELOC_IA64_DIR32MSB: rtype = R_IA64_DIR32MSB; break;
504 case BFD_RELOC_IA64_DIR32LSB: rtype = R_IA64_DIR32LSB; break;
505 case BFD_RELOC_IA64_DIR64MSB: rtype = R_IA64_DIR64MSB; break;
506 case BFD_RELOC_IA64_DIR64LSB: rtype = R_IA64_DIR64LSB; break;
508 case BFD_RELOC_IA64_GPREL22: rtype = R_IA64_GPREL22; break;
509 case BFD_RELOC_IA64_GPREL64I: rtype = R_IA64_GPREL64I; break;
510 case BFD_RELOC_IA64_GPREL32MSB: rtype = R_IA64_GPREL32MSB; break;
511 case BFD_RELOC_IA64_GPREL32LSB: rtype = R_IA64_GPREL32LSB; break;
512 case BFD_RELOC_IA64_GPREL64MSB: rtype = R_IA64_GPREL64MSB; break;
513 case BFD_RELOC_IA64_GPREL64LSB: rtype = R_IA64_GPREL64LSB; break;
515 case BFD_RELOC_IA64_LTOFF22: rtype = R_IA64_LTOFF22; break;
516 case BFD_RELOC_IA64_LTOFF64I: rtype = R_IA64_LTOFF64I; break;
518 case BFD_RELOC_IA64_PLTOFF22: rtype = R_IA64_PLTOFF22; break;
519 case BFD_RELOC_IA64_PLTOFF64I: rtype = R_IA64_PLTOFF64I; break;
520 case BFD_RELOC_IA64_PLTOFF64MSB: rtype = R_IA64_PLTOFF64MSB; break;
521 case BFD_RELOC_IA64_PLTOFF64LSB: rtype = R_IA64_PLTOFF64LSB; break;
522 case BFD_RELOC_IA64_FPTR64I: rtype = R_IA64_FPTR64I; break;
523 case BFD_RELOC_IA64_FPTR32MSB: rtype = R_IA64_FPTR32MSB; break;
524 case BFD_RELOC_IA64_FPTR32LSB: rtype = R_IA64_FPTR32LSB; break;
525 case BFD_RELOC_IA64_FPTR64MSB: rtype = R_IA64_FPTR64MSB; break;
526 case BFD_RELOC_IA64_FPTR64LSB: rtype = R_IA64_FPTR64LSB; break;
528 case BFD_RELOC_IA64_PCREL21B: rtype = R_IA64_PCREL21B; break;
529 case BFD_RELOC_IA64_PCREL21BI: rtype = R_IA64_PCREL21BI; break;
530 case BFD_RELOC_IA64_PCREL21M: rtype = R_IA64_PCREL21M; break;
531 case BFD_RELOC_IA64_PCREL21F: rtype = R_IA64_PCREL21F; break;
532 case BFD_RELOC_IA64_PCREL22: rtype = R_IA64_PCREL22; break;
533 case BFD_RELOC_IA64_PCREL60B: rtype = R_IA64_PCREL60B; break;
534 case BFD_RELOC_IA64_PCREL64I: rtype = R_IA64_PCREL64I; break;
535 case BFD_RELOC_IA64_PCREL32MSB: rtype = R_IA64_PCREL32MSB; break;
536 case BFD_RELOC_IA64_PCREL32LSB: rtype = R_IA64_PCREL32LSB; break;
537 case BFD_RELOC_IA64_PCREL64MSB: rtype = R_IA64_PCREL64MSB; break;
538 case BFD_RELOC_IA64_PCREL64LSB: rtype = R_IA64_PCREL64LSB; break;
540 case BFD_RELOC_IA64_LTOFF_FPTR22: rtype = R_IA64_LTOFF_FPTR22; break;
541 case BFD_RELOC_IA64_LTOFF_FPTR64I: rtype = R_IA64_LTOFF_FPTR64I; break;
542 case BFD_RELOC_IA64_LTOFF_FPTR32MSB: rtype = R_IA64_LTOFF_FPTR32MSB; break;
543 case BFD_RELOC_IA64_LTOFF_FPTR32LSB: rtype = R_IA64_LTOFF_FPTR32LSB; break;
544 case BFD_RELOC_IA64_LTOFF_FPTR64MSB: rtype = R_IA64_LTOFF_FPTR64MSB; break;
545 case BFD_RELOC_IA64_LTOFF_FPTR64LSB: rtype = R_IA64_LTOFF_FPTR64LSB; break;
547 case BFD_RELOC_IA64_SEGREL32MSB: rtype = R_IA64_SEGREL32MSB; break;
548 case BFD_RELOC_IA64_SEGREL32LSB: rtype = R_IA64_SEGREL32LSB; break;
549 case BFD_RELOC_IA64_SEGREL64MSB: rtype = R_IA64_SEGREL64MSB; break;
550 case BFD_RELOC_IA64_SEGREL64LSB: rtype = R_IA64_SEGREL64LSB; break;
552 case BFD_RELOC_IA64_SECREL32MSB: rtype = R_IA64_SECREL32MSB; break;
553 case BFD_RELOC_IA64_SECREL32LSB: rtype = R_IA64_SECREL32LSB; break;
554 case BFD_RELOC_IA64_SECREL64MSB: rtype = R_IA64_SECREL64MSB; break;
555 case BFD_RELOC_IA64_SECREL64LSB: rtype = R_IA64_SECREL64LSB; break;
557 case BFD_RELOC_IA64_REL32MSB: rtype = R_IA64_REL32MSB; break;
558 case BFD_RELOC_IA64_REL32LSB: rtype = R_IA64_REL32LSB; break;
559 case BFD_RELOC_IA64_REL64MSB: rtype = R_IA64_REL64MSB; break;
560 case BFD_RELOC_IA64_REL64LSB: rtype = R_IA64_REL64LSB; break;
562 case BFD_RELOC_IA64_LTV32MSB: rtype = R_IA64_LTV32MSB; break;
563 case BFD_RELOC_IA64_LTV32LSB: rtype = R_IA64_LTV32LSB; break;
564 case BFD_RELOC_IA64_LTV64MSB: rtype = R_IA64_LTV64MSB; break;
565 case BFD_RELOC_IA64_LTV64LSB: rtype = R_IA64_LTV64LSB; break;
567 case BFD_RELOC_IA64_IPLTMSB: rtype = R_IA64_IPLTMSB; break;
568 case BFD_RELOC_IA64_IPLTLSB: rtype = R_IA64_IPLTLSB; break;
569 case BFD_RELOC_IA64_COPY: rtype = R_IA64_COPY; break;
570 case BFD_RELOC_IA64_LTOFF22X: rtype = R_IA64_LTOFF22X; break;
571 case BFD_RELOC_IA64_LDXMOV: rtype = R_IA64_LDXMOV; break;
573 case BFD_RELOC_IA64_TPREL14: rtype = R_IA64_TPREL14; break;
574 case BFD_RELOC_IA64_TPREL22: rtype = R_IA64_TPREL22; break;
575 case BFD_RELOC_IA64_TPREL64I: rtype = R_IA64_TPREL64I; break;
576 case BFD_RELOC_IA64_TPREL64MSB: rtype = R_IA64_TPREL64MSB; break;
577 case BFD_RELOC_IA64_TPREL64LSB: rtype = R_IA64_TPREL64LSB; break;
578 case BFD_RELOC_IA64_LTOFF_TPREL22: rtype = R_IA64_LTOFF_TPREL22; break;
580 case BFD_RELOC_IA64_DTPMOD64MSB: rtype = R_IA64_DTPMOD64MSB; break;
581 case BFD_RELOC_IA64_DTPMOD64LSB: rtype = R_IA64_DTPMOD64LSB; break;
582 case BFD_RELOC_IA64_LTOFF_DTPMOD22: rtype = R_IA64_LTOFF_DTPMOD22; break;
584 case BFD_RELOC_IA64_DTPREL14: rtype = R_IA64_DTPREL14; break;
585 case BFD_RELOC_IA64_DTPREL22: rtype = R_IA64_DTPREL22; break;
586 case BFD_RELOC_IA64_DTPREL64I: rtype = R_IA64_DTPREL64I; break;
587 case BFD_RELOC_IA64_DTPREL32MSB: rtype = R_IA64_DTPREL32MSB; break;
588 case BFD_RELOC_IA64_DTPREL32LSB: rtype = R_IA64_DTPREL32LSB; break;
589 case BFD_RELOC_IA64_DTPREL64MSB: rtype = R_IA64_DTPREL64MSB; break;
590 case BFD_RELOC_IA64_DTPREL64LSB: rtype = R_IA64_DTPREL64LSB; break;
591 case BFD_RELOC_IA64_LTOFF_DTPREL22: rtype = R_IA64_LTOFF_DTPREL22; break;
595 return lookup_howto (rtype);
598 /* Given a ELF reloc, return the matching HOWTO structure. */
601 elfNN_ia64_info_to_howto (abfd, bfd_reloc, elf_reloc)
602 bfd *abfd ATTRIBUTE_UNUSED;
604 Elf_Internal_Rela *elf_reloc;
607 = lookup_howto ((unsigned int) ELFNN_R_TYPE (elf_reloc->r_info));
610 #define PLT_HEADER_SIZE (3 * 16)
611 #define PLT_MIN_ENTRY_SIZE (1 * 16)
612 #define PLT_FULL_ENTRY_SIZE (2 * 16)
613 #define PLT_RESERVED_WORDS 3
615 static const bfd_byte plt_header[PLT_HEADER_SIZE] =
617 0x0b, 0x10, 0x00, 0x1c, 0x00, 0x21, /* [MMI] mov r2=r14;; */
618 0xe0, 0x00, 0x08, 0x00, 0x48, 0x00, /* addl r14=0,r2 */
619 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
620 0x0b, 0x80, 0x20, 0x1c, 0x18, 0x14, /* [MMI] ld8 r16=[r14],8;; */
621 0x10, 0x41, 0x38, 0x30, 0x28, 0x00, /* ld8 r17=[r14],8 */
622 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
623 0x11, 0x08, 0x00, 0x1c, 0x18, 0x10, /* [MIB] ld8 r1=[r14] */
624 0x60, 0x88, 0x04, 0x80, 0x03, 0x00, /* mov b6=r17 */
625 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
628 static const bfd_byte plt_min_entry[PLT_MIN_ENTRY_SIZE] =
630 0x11, 0x78, 0x00, 0x00, 0x00, 0x24, /* [MIB] mov r15=0 */
631 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, /* nop.i 0x0 */
632 0x00, 0x00, 0x00, 0x40 /* br.few 0 <PLT0>;; */
635 static const bfd_byte plt_full_entry[PLT_FULL_ENTRY_SIZE] =
637 0x0b, 0x78, 0x00, 0x02, 0x00, 0x24, /* [MMI] addl r15=0,r1;; */
638 0x00, 0x41, 0x3c, 0x30, 0x28, 0xc0, /* ld8 r16=[r15],8 */
639 0x01, 0x08, 0x00, 0x84, /* mov r14=r1;; */
640 0x11, 0x08, 0x00, 0x1e, 0x18, 0x10, /* [MIB] ld8 r1=[r15] */
641 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
642 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
645 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
647 static const bfd_byte oor_brl[16] =
649 0x05, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
650 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* brl.sptk.few tgt;; */
651 0x00, 0x00, 0x00, 0xc0
654 static const bfd_byte oor_ip[48] =
656 0x04, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
657 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, /* movl r15=0 */
658 0x01, 0x00, 0x00, 0x60,
659 0x03, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MII] nop.m 0 */
660 0x00, 0x01, 0x00, 0x60, 0x00, 0x00, /* mov r16=ip;; */
661 0xf2, 0x80, 0x00, 0x80, /* add r16=r15,r16;; */
662 0x11, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MIB] nop.m 0 */
663 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
664 0x60, 0x00, 0x80, 0x00 /* br b6;; */
667 static size_t oor_branch_size = sizeof (oor_brl);
670 bfd_elfNN_ia64_after_parse (int itanium)
672 oor_branch_size = itanium ? sizeof (oor_ip) : sizeof (oor_brl);
676 elfNN_ia64_relax_brl (bfd *abfd, bfd_byte *contents, bfd_vma off)
680 bfd_vma t0, t1, i0, i1, i2;
682 hit_addr = (bfd_byte *) (contents + off);
683 hit_addr -= (long) hit_addr & 0x3;
684 t0 = bfd_get_64 (abfd, hit_addr);
685 t1 = bfd_get_64 (abfd, hit_addr + 8);
687 /* Keep the instruction in slot 0. */
688 i0 = (t0 >> 5) & 0x1ffffffffffLL;
689 /* Use nop.b for slot 1. */
691 /* For slot 2, turn brl into br by masking out bit 40. */
692 i2 = (t1 >> 23) & 0x0ffffffffffLL;
694 /* Turn a MLX bundle into a MBB bundle with the same stop-bit
697 if ((t0 & 0x1fLL) == 5)
699 t0 = (i1 << 46) | (i0 << 5) | template;
700 t1 = (i2 << 23) | (i1 >> 18);
702 bfd_put_64 (abfd, t0, hit_addr);
703 bfd_put_64 (abfd, t1, hit_addr + 8);
706 /* These functions do relaxation for IA-64 ELF. */
709 elfNN_ia64_relax_section (abfd, sec, link_info, again)
712 struct bfd_link_info *link_info;
717 struct one_fixup *next;
723 Elf_Internal_Shdr *symtab_hdr;
724 Elf_Internal_Rela *internal_relocs;
725 Elf_Internal_Rela *irel, *irelend;
727 Elf_Internal_Sym *isymbuf = NULL;
728 struct elfNN_ia64_link_hash_table *ia64_info;
729 struct one_fixup *fixups = NULL;
730 bfd_boolean changed_contents = FALSE;
731 bfd_boolean changed_relocs = FALSE;
732 bfd_boolean changed_got = FALSE;
735 /* Assume we're not going to change any sizes, and we'll only need
739 /* Don't even try to relax for non-ELF outputs. */
740 if (!is_elf_hash_table (link_info->hash))
743 /* Nothing to do if there are no relocations or there is no need for
744 the relax finalize pass. */
745 if ((sec->flags & SEC_RELOC) == 0
746 || sec->reloc_count == 0
747 || (!link_info->need_relax_finalize
748 && sec->need_finalize_relax == 0))
751 /* If this is the first time we have been called for this section,
752 initialize the cooked size. */
753 if (sec->_cooked_size == 0)
754 sec->_cooked_size = sec->_raw_size;
756 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
758 /* Load the relocations for this section. */
759 internal_relocs = (_bfd_elf_link_read_relocs
760 (abfd, sec, (PTR) NULL, (Elf_Internal_Rela *) NULL,
761 link_info->keep_memory));
762 if (internal_relocs == NULL)
765 ia64_info = elfNN_ia64_hash_table (link_info);
766 irelend = internal_relocs + sec->reloc_count;
768 /* Get the section contents. */
769 if (elf_section_data (sec)->this_hdr.contents != NULL)
770 contents = elf_section_data (sec)->this_hdr.contents;
773 contents = (bfd_byte *) bfd_malloc (sec->_raw_size);
774 if (contents == NULL)
777 if (! bfd_get_section_contents (abfd, sec, contents,
778 (file_ptr) 0, sec->_raw_size))
782 for (irel = internal_relocs; irel < irelend; irel++)
784 unsigned long r_type = ELFNN_R_TYPE (irel->r_info);
785 bfd_vma symaddr, reladdr, trampoff, toff, roff;
789 bfd_boolean is_branch;
790 struct elfNN_ia64_dyn_sym_info *dyn_i;
794 case R_IA64_PCREL21B:
795 case R_IA64_PCREL21BI:
796 case R_IA64_PCREL21M:
797 case R_IA64_PCREL21F:
798 /* In the finalize pass, all br relaxations are done. We can
800 if (!link_info->need_relax_finalize)
805 case R_IA64_PCREL60B:
806 /* We can't optimize brl to br before the finalize pass since
807 br relaxations will increase the code size. Defer it to
808 the finalize pass. */
809 if (link_info->need_relax_finalize)
811 sec->need_finalize_relax = 1;
817 case R_IA64_LTOFF22X:
819 /* We can't relax ldx/mov before the finalize pass since
820 br relaxations will increase the code size. Defer it to
821 the finalize pass. */
822 if (link_info->need_relax_finalize)
824 sec->need_finalize_relax = 1;
834 /* Get the value of the symbol referred to by the reloc. */
835 if (ELFNN_R_SYM (irel->r_info) < symtab_hdr->sh_info)
837 /* A local symbol. */
838 Elf_Internal_Sym *isym;
840 /* Read this BFD's local symbols. */
843 isymbuf = (Elf_Internal_Sym *) symtab_hdr->contents;
845 isymbuf = bfd_elf_get_elf_syms (abfd, symtab_hdr,
846 symtab_hdr->sh_info, 0,
852 isym = isymbuf + ELFNN_R_SYM (irel->r_info);
853 if (isym->st_shndx == SHN_UNDEF)
854 continue; /* We can't do anything with undefined symbols. */
855 else if (isym->st_shndx == SHN_ABS)
856 tsec = bfd_abs_section_ptr;
857 else if (isym->st_shndx == SHN_COMMON)
858 tsec = bfd_com_section_ptr;
859 else if (isym->st_shndx == SHN_IA_64_ANSI_COMMON)
860 tsec = bfd_com_section_ptr;
862 tsec = bfd_section_from_elf_index (abfd, isym->st_shndx);
864 toff = isym->st_value;
865 dyn_i = get_dyn_sym_info (ia64_info, NULL, abfd, irel, FALSE);
870 struct elf_link_hash_entry *h;
872 indx = ELFNN_R_SYM (irel->r_info) - symtab_hdr->sh_info;
873 h = elf_sym_hashes (abfd)[indx];
874 BFD_ASSERT (h != NULL);
876 while (h->root.type == bfd_link_hash_indirect
877 || h->root.type == bfd_link_hash_warning)
878 h = (struct elf_link_hash_entry *) h->root.u.i.link;
880 dyn_i = get_dyn_sym_info (ia64_info, h, abfd, irel, FALSE);
882 /* For branches to dynamic symbols, we're interested instead
883 in a branch to the PLT entry. */
884 if (is_branch && dyn_i && dyn_i->want_plt2)
886 /* Internal branches shouldn't be sent to the PLT.
887 Leave this for now and we'll give an error later. */
888 if (r_type != R_IA64_PCREL21B)
891 tsec = ia64_info->plt_sec;
892 toff = dyn_i->plt2_offset;
893 BFD_ASSERT (irel->r_addend == 0);
896 /* Can't do anything else with dynamic symbols. */
897 else if (elfNN_ia64_dynamic_symbol_p (h, link_info, r_type))
902 /* We can't do anything with undefined symbols. */
903 if (h->root.type == bfd_link_hash_undefined
904 || h->root.type == bfd_link_hash_undefweak)
907 tsec = h->root.u.def.section;
908 toff = h->root.u.def.value;
912 if (tsec->sec_info_type == ELF_INFO_TYPE_MERGE)
913 toff = _bfd_merged_section_offset (abfd, &tsec,
914 elf_section_data (tsec)->sec_info,
915 toff + irel->r_addend,
918 toff += irel->r_addend;
920 symaddr = tsec->output_section->vma + tsec->output_offset + toff;
922 roff = irel->r_offset;
926 bfd_signed_vma offset;
928 reladdr = (sec->output_section->vma
930 + roff) & (bfd_vma) -4;
932 /* If the branch is in range, no need to do anything. */
933 if ((bfd_signed_vma) (symaddr - reladdr) >= -0x1000000
934 && (bfd_signed_vma) (symaddr - reladdr) <= 0x0FFFFF0)
936 /* If the 60-bit branch is in 21-bit range, optimize it. */
937 if (r_type == R_IA64_PCREL60B)
939 elfNN_ia64_relax_brl (abfd, contents, roff);
942 = ELF64_R_INFO (ELF64_R_SYM (irel->r_info),
945 /* If the original relocation offset points to slot
946 1, change it to slot 2. */
947 if ((irel->r_offset & 3) == 1)
953 else if (r_type == R_IA64_PCREL60B)
956 /* If the branch and target are in the same section, you've
957 got one honking big section and we can't help you. You'll
958 get an error message later. */
962 /* Look for an existing fixup to this address. */
963 for (f = fixups; f ; f = f->next)
964 if (f->tsec == tsec && f->toff == toff)
969 /* Two alternatives: If it's a branch to a PLT entry, we can
970 make a copy of the FULL_PLT entry. Otherwise, we'll have
971 to use a `brl' insn to get where we're going. */
975 if (tsec == ia64_info->plt_sec)
976 size = sizeof (plt_full_entry);
978 size = oor_branch_size;
980 /* Resize the current section to make room for the new branch. */
981 trampoff = (sec->_cooked_size + 15) & (bfd_vma) -16;
983 /* If trampoline is out of range, there is nothing we
985 offset = trampoff - (roff & (bfd_vma) -4);
986 if (offset < -0x1000000 || offset > 0x0FFFFF0)
989 amt = trampoff + size;
990 contents = (bfd_byte *) bfd_realloc (contents, amt);
991 if (contents == NULL)
993 sec->_cooked_size = amt;
995 if (tsec == ia64_info->plt_sec)
997 memcpy (contents + trampoff, plt_full_entry, size);
999 /* Hijack the old relocation for use as the PLTOFF reloc. */
1000 irel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1002 irel->r_offset = trampoff;
1006 if (size == sizeof (oor_ip))
1008 memcpy (contents + trampoff, oor_ip, size);
1009 irel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1011 irel->r_addend -= 16;
1012 irel->r_offset = trampoff + 2;
1016 memcpy (contents + trampoff, oor_brl, size);
1017 irel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1019 irel->r_offset = trampoff + 2;
1024 /* Record the fixup so we don't do it again this section. */
1025 f = (struct one_fixup *)
1026 bfd_malloc ((bfd_size_type) sizeof (*f));
1030 f->trampoff = trampoff;
1035 /* If trampoline is out of range, there is nothing we
1037 offset = f->trampoff - (roff & (bfd_vma) -4);
1038 if (offset < -0x1000000 || offset > 0x0FFFFF0)
1041 /* Nop out the reloc, since we're finalizing things here. */
1042 irel->r_info = ELFNN_R_INFO (0, R_IA64_NONE);
1045 /* Fix up the existing branch to hit the trampoline. */
1046 if (elfNN_ia64_install_value (abfd, contents + roff, offset,
1047 r_type) != bfd_reloc_ok)
1050 changed_contents = TRUE;
1051 changed_relocs = TRUE;
1058 bfd *obfd = sec->output_section->owner;
1059 gp = _bfd_get_gp_value (obfd);
1062 if (!elfNN_ia64_choose_gp (obfd, link_info))
1064 gp = _bfd_get_gp_value (obfd);
1068 /* If the data is out of range, do nothing. */
1069 if ((bfd_signed_vma) (symaddr - gp) >= 0x200000
1070 ||(bfd_signed_vma) (symaddr - gp) < -0x200000)
1073 if (r_type == R_IA64_LTOFF22X)
1075 irel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (irel->r_info),
1077 changed_relocs = TRUE;
1078 if (dyn_i->want_gotx)
1080 dyn_i->want_gotx = 0;
1081 changed_got |= !dyn_i->want_got;
1086 elfNN_ia64_relax_ldxmov (abfd, contents, roff);
1087 irel->r_info = ELFNN_R_INFO (0, R_IA64_NONE);
1088 changed_contents = TRUE;
1089 changed_relocs = TRUE;
1094 /* ??? If we created fixups, this may push the code segment large
1095 enough that the data segment moves, which will change the GP.
1096 Reset the GP so that we re-calculate next round. We need to
1097 do this at the _beginning_ of the next round; now will not do. */
1099 /* Clean up and go home. */
1102 struct one_fixup *f = fixups;
1103 fixups = fixups->next;
1108 && symtab_hdr->contents != (unsigned char *) isymbuf)
1110 if (! link_info->keep_memory)
1114 /* Cache the symbols for elf_link_input_bfd. */
1115 symtab_hdr->contents = (unsigned char *) isymbuf;
1119 if (contents != NULL
1120 && elf_section_data (sec)->this_hdr.contents != contents)
1122 if (!changed_contents && !link_info->keep_memory)
1126 /* Cache the section contents for elf_link_input_bfd. */
1127 elf_section_data (sec)->this_hdr.contents = contents;
1131 if (elf_section_data (sec)->relocs != internal_relocs)
1133 if (!changed_relocs)
1134 free (internal_relocs);
1136 elf_section_data (sec)->relocs = internal_relocs;
1141 struct elfNN_ia64_allocate_data data;
1142 data.info = link_info;
1144 ia64_info->self_dtpmod_offset = (bfd_vma) -1;
1146 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_global_data_got, &data);
1147 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_global_fptr_got, &data);
1148 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_local_got, &data);
1149 ia64_info->got_sec->_raw_size = data.ofs;
1150 ia64_info->got_sec->_cooked_size = data.ofs;
1152 /* ??? Resize .rela.got too. */
1155 if (!link_info->need_relax_finalize)
1156 sec->need_finalize_relax = 0;
1158 *again = changed_contents || changed_relocs;
1162 if (isymbuf != NULL && (unsigned char *) isymbuf != symtab_hdr->contents)
1164 if (contents != NULL
1165 && elf_section_data (sec)->this_hdr.contents != contents)
1167 if (internal_relocs != NULL
1168 && elf_section_data (sec)->relocs != internal_relocs)
1169 free (internal_relocs);
1174 elfNN_ia64_relax_ldxmov (abfd, contents, off)
1180 bfd_vma dword, insn;
1182 switch ((int)off & 0x3)
1184 case 0: shift = 5; break;
1185 case 1: shift = 14; off += 3; break;
1186 case 2: shift = 23; off += 6; break;
1191 dword = bfd_get_64 (abfd, contents + off);
1192 insn = (dword >> shift) & 0x1ffffffffffLL;
1194 r1 = (insn >> 6) & 127;
1195 r3 = (insn >> 20) & 127;
1197 insn = 0x8000000; /* nop */
1199 insn = (insn & 0x7f01fff) | 0x10800000000LL; /* (qp) mov r1 = r3 */
1201 dword &= ~(0x1ffffffffffLL << shift);
1202 dword |= (insn << shift);
1203 bfd_put_64 (abfd, dword, contents + off);
1206 /* Return TRUE if NAME is an unwind table section name. */
1208 static inline bfd_boolean
1209 is_unwind_section_name (abfd, name)
1213 size_t len1, len2, len3;
1215 if (elfNN_ia64_hpux_vec (abfd->xvec)
1216 && !strcmp (name, ELF_STRING_ia64_unwind_hdr))
1219 len1 = sizeof (ELF_STRING_ia64_unwind) - 1;
1220 len2 = sizeof (ELF_STRING_ia64_unwind_info) - 1;
1221 len3 = sizeof (ELF_STRING_ia64_unwind_once) - 1;
1222 return ((strncmp (name, ELF_STRING_ia64_unwind, len1) == 0
1223 && strncmp (name, ELF_STRING_ia64_unwind_info, len2) != 0)
1224 || strncmp (name, ELF_STRING_ia64_unwind_once, len3) == 0);
1227 /* Handle an IA-64 specific section when reading an object file. This
1228 is called when elfcode.h finds a section with an unknown type. */
1231 elfNN_ia64_section_from_shdr (abfd, hdr, name)
1233 Elf_Internal_Shdr *hdr;
1238 /* There ought to be a place to keep ELF backend specific flags, but
1239 at the moment there isn't one. We just keep track of the
1240 sections by their name, instead. Fortunately, the ABI gives
1241 suggested names for all the MIPS specific sections, so we will
1242 probably get away with this. */
1243 switch (hdr->sh_type)
1245 case SHT_IA_64_UNWIND:
1246 case SHT_IA_64_HP_OPT_ANOT:
1250 if (strcmp (name, ELF_STRING_ia64_archext) != 0)
1258 if (! _bfd_elf_make_section_from_shdr (abfd, hdr, name))
1260 newsect = hdr->bfd_section;
1265 /* Convert IA-64 specific section flags to bfd internal section flags. */
1267 /* ??? There is no bfd internal flag equivalent to the SHF_IA_64_NORECOV
1271 elfNN_ia64_section_flags (flags, hdr)
1273 Elf_Internal_Shdr *hdr;
1275 if (hdr->sh_flags & SHF_IA_64_SHORT)
1276 *flags |= SEC_SMALL_DATA;
1281 /* Set the correct type for an IA-64 ELF section. We do this by the
1282 section name, which is a hack, but ought to work. */
1285 elfNN_ia64_fake_sections (abfd, hdr, sec)
1286 bfd *abfd ATTRIBUTE_UNUSED;
1287 Elf_Internal_Shdr *hdr;
1290 register const char *name;
1292 name = bfd_get_section_name (abfd, sec);
1294 if (is_unwind_section_name (abfd, name))
1296 /* We don't have the sections numbered at this point, so sh_info
1297 is set later, in elfNN_ia64_final_write_processing. */
1298 hdr->sh_type = SHT_IA_64_UNWIND;
1299 hdr->sh_flags |= SHF_LINK_ORDER;
1301 else if (strcmp (name, ELF_STRING_ia64_archext) == 0)
1302 hdr->sh_type = SHT_IA_64_EXT;
1303 else if (strcmp (name, ".HP.opt_annot") == 0)
1304 hdr->sh_type = SHT_IA_64_HP_OPT_ANOT;
1305 else if (strcmp (name, ".reloc") == 0)
1306 /* This is an ugly, but unfortunately necessary hack that is
1307 needed when producing EFI binaries on IA-64. It tells
1308 elf.c:elf_fake_sections() not to consider ".reloc" as a section
1309 containing ELF relocation info. We need this hack in order to
1310 be able to generate ELF binaries that can be translated into
1311 EFI applications (which are essentially COFF objects). Those
1312 files contain a COFF ".reloc" section inside an ELFNN object,
1313 which would normally cause BFD to segfault because it would
1314 attempt to interpret this section as containing relocation
1315 entries for section "oc". With this hack enabled, ".reloc"
1316 will be treated as a normal data section, which will avoid the
1317 segfault. However, you won't be able to create an ELFNN binary
1318 with a section named "oc" that needs relocations, but that's
1319 the kind of ugly side-effects you get when detecting section
1320 types based on their names... In practice, this limitation is
1321 unlikely to bite. */
1322 hdr->sh_type = SHT_PROGBITS;
1324 if (sec->flags & SEC_SMALL_DATA)
1325 hdr->sh_flags |= SHF_IA_64_SHORT;
1330 /* The final processing done just before writing out an IA-64 ELF
1334 elfNN_ia64_final_write_processing (abfd, linker)
1336 bfd_boolean linker ATTRIBUTE_UNUSED;
1338 Elf_Internal_Shdr *hdr;
1340 asection *text_sect, *s;
1343 for (s = abfd->sections; s; s = s->next)
1345 hdr = &elf_section_data (s)->this_hdr;
1346 switch (hdr->sh_type)
1348 case SHT_IA_64_UNWIND:
1349 /* See comments in gas/config/tc-ia64.c:dot_endp on why we
1351 sname = bfd_get_section_name (abfd, s);
1352 len = sizeof (ELF_STRING_ia64_unwind) - 1;
1353 if (sname && strncmp (sname, ELF_STRING_ia64_unwind, len) == 0)
1357 if (sname[0] == '\0')
1358 /* .IA_64.unwind -> .text */
1359 text_sect = bfd_get_section_by_name (abfd, ".text");
1361 /* .IA_64.unwindFOO -> FOO */
1362 text_sect = bfd_get_section_by_name (abfd, sname);
1365 && (len = sizeof (ELF_STRING_ia64_unwind_once) - 1,
1366 strncmp (sname, ELF_STRING_ia64_unwind_once, len)) == 0)
1368 /* .gnu.linkonce.ia64unw.FOO -> .gnu.linkonce.t.FOO */
1369 size_t len2 = sizeof (".gnu.linkonce.t.") - 1;
1370 char *once_name = bfd_malloc (len2 + strlen (sname + len) + 1);
1372 if (once_name != NULL)
1374 memcpy (once_name, ".gnu.linkonce.t.", len2);
1375 strcpy (once_name + len2, sname + len);
1376 text_sect = bfd_get_section_by_name (abfd, once_name);
1380 /* Should only happen if we run out of memory, in
1381 which case we're probably toast anyway. Try to
1382 cope by finding the section the slow way. */
1383 for (text_sect = abfd->sections;
1385 text_sect = text_sect->next)
1387 if (strncmp (bfd_section_name (abfd, text_sect),
1388 ".gnu.linkonce.t.", len2) == 0
1389 && strcmp (bfd_section_name (abfd, text_sect) + len2,
1395 /* last resort: fall back on .text */
1396 text_sect = bfd_get_section_by_name (abfd, ".text");
1400 /* The IA-64 processor-specific ABI requires setting
1401 sh_link to the unwind section, whereas HP-UX requires
1402 sh_info to do so. For maximum compatibility, we'll
1403 set both for now... */
1404 hdr->sh_link = elf_section_data (text_sect)->this_idx;
1405 hdr->sh_info = elf_section_data (text_sect)->this_idx;
1411 if (! elf_flags_init (abfd))
1413 unsigned long flags = 0;
1415 if (abfd->xvec->byteorder == BFD_ENDIAN_BIG)
1416 flags |= EF_IA_64_BE;
1417 if (bfd_get_mach (abfd) == bfd_mach_ia64_elf64)
1418 flags |= EF_IA_64_ABI64;
1420 elf_elfheader(abfd)->e_flags = flags;
1421 elf_flags_init (abfd) = TRUE;
1425 /* Hook called by the linker routine which adds symbols from an object
1426 file. We use it to put .comm items in .sbss, and not .bss. */
1429 elfNN_ia64_add_symbol_hook (abfd, info, sym, namep, flagsp, secp, valp)
1431 struct bfd_link_info *info;
1432 const Elf_Internal_Sym *sym;
1433 const char **namep ATTRIBUTE_UNUSED;
1434 flagword *flagsp ATTRIBUTE_UNUSED;
1438 if (sym->st_shndx == SHN_COMMON
1439 && !info->relocatable
1440 && sym->st_size <= elf_gp_size (abfd))
1442 /* Common symbols less than or equal to -G nn bytes are
1443 automatically put into .sbss. */
1445 asection *scomm = bfd_get_section_by_name (abfd, ".scommon");
1449 scomm = bfd_make_section (abfd, ".scommon");
1451 || !bfd_set_section_flags (abfd, scomm, (SEC_ALLOC
1453 | SEC_LINKER_CREATED)))
1458 *valp = sym->st_size;
1464 /* Return the number of additional phdrs we will need. */
1467 elfNN_ia64_additional_program_headers (abfd)
1473 /* See if we need a PT_IA_64_ARCHEXT segment. */
1474 s = bfd_get_section_by_name (abfd, ELF_STRING_ia64_archext);
1475 if (s && (s->flags & SEC_LOAD))
1478 /* Count how many PT_IA_64_UNWIND segments we need. */
1479 for (s = abfd->sections; s; s = s->next)
1480 if (is_unwind_section_name (abfd, s->name) && (s->flags & SEC_LOAD))
1487 elfNN_ia64_modify_segment_map (abfd, info)
1489 struct bfd_link_info *info ATTRIBUTE_UNUSED;
1491 struct elf_segment_map *m, **pm;
1492 Elf_Internal_Shdr *hdr;
1495 /* If we need a PT_IA_64_ARCHEXT segment, it must come before
1496 all PT_LOAD segments. */
1497 s = bfd_get_section_by_name (abfd, ELF_STRING_ia64_archext);
1498 if (s && (s->flags & SEC_LOAD))
1500 for (m = elf_tdata (abfd)->segment_map; m != NULL; m = m->next)
1501 if (m->p_type == PT_IA_64_ARCHEXT)
1505 m = ((struct elf_segment_map *)
1506 bfd_zalloc (abfd, (bfd_size_type) sizeof *m));
1510 m->p_type = PT_IA_64_ARCHEXT;
1514 /* We want to put it after the PHDR and INTERP segments. */
1515 pm = &elf_tdata (abfd)->segment_map;
1517 && ((*pm)->p_type == PT_PHDR
1518 || (*pm)->p_type == PT_INTERP))
1526 /* Install PT_IA_64_UNWIND segments, if needed. */
1527 for (s = abfd->sections; s; s = s->next)
1529 hdr = &elf_section_data (s)->this_hdr;
1530 if (hdr->sh_type != SHT_IA_64_UNWIND)
1533 if (s && (s->flags & SEC_LOAD))
1535 for (m = elf_tdata (abfd)->segment_map; m != NULL; m = m->next)
1536 if (m->p_type == PT_IA_64_UNWIND)
1540 /* Look through all sections in the unwind segment
1541 for a match since there may be multiple sections
1543 for (i = m->count - 1; i >= 0; --i)
1544 if (m->sections[i] == s)
1553 m = ((struct elf_segment_map *)
1554 bfd_zalloc (abfd, (bfd_size_type) sizeof *m));
1558 m->p_type = PT_IA_64_UNWIND;
1563 /* We want to put it last. */
1564 pm = &elf_tdata (abfd)->segment_map;
1572 /* Turn on PF_IA_64_NORECOV if needed. This involves traversing all of
1573 the input sections for each output section in the segment and testing
1574 for SHF_IA_64_NORECOV on each. */
1575 for (m = elf_tdata (abfd)->segment_map; m != NULL; m = m->next)
1576 if (m->p_type == PT_LOAD)
1579 for (i = m->count - 1; i >= 0; --i)
1581 struct bfd_link_order *order = m->sections[i]->link_order_head;
1584 if (order->type == bfd_indirect_link_order)
1586 asection *is = order->u.indirect.section;
1587 bfd_vma flags = elf_section_data(is)->this_hdr.sh_flags;
1588 if (flags & SHF_IA_64_NORECOV)
1590 m->p_flags |= PF_IA_64_NORECOV;
1594 order = order->next;
1603 /* According to the Tahoe assembler spec, all labels starting with a
1607 elfNN_ia64_is_local_label_name (abfd, name)
1608 bfd *abfd ATTRIBUTE_UNUSED;
1611 return name[0] == '.';
1614 /* Should we do dynamic things to this symbol? */
1617 elfNN_ia64_dynamic_symbol_p (h, info, r_type)
1618 struct elf_link_hash_entry *h;
1619 struct bfd_link_info *info;
1622 bfd_boolean ignore_protected
1623 = ((r_type & 0xf8) == 0x40 /* FPTR relocs */
1624 || (r_type & 0xf8) == 0x50); /* LTOFF_FPTR relocs */
1626 return _bfd_elf_dynamic_symbol_p (h, info, ignore_protected);
1629 static struct bfd_hash_entry*
1630 elfNN_ia64_new_elf_hash_entry (entry, table, string)
1631 struct bfd_hash_entry *entry;
1632 struct bfd_hash_table *table;
1635 struct elfNN_ia64_link_hash_entry *ret;
1636 ret = (struct elfNN_ia64_link_hash_entry *) entry;
1638 /* Allocate the structure if it has not already been allocated by a
1641 ret = bfd_hash_allocate (table, sizeof (*ret));
1646 /* Initialize our local data. All zeros, and definitely easier
1647 than setting a handful of bit fields. */
1648 memset (ret, 0, sizeof (*ret));
1650 /* Call the allocation method of the superclass. */
1651 ret = ((struct elfNN_ia64_link_hash_entry *)
1652 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
1655 return (struct bfd_hash_entry *) ret;
1659 elfNN_ia64_hash_copy_indirect (bed, xdir, xind)
1660 const struct elf_backend_data *bed ATTRIBUTE_UNUSED;
1661 struct elf_link_hash_entry *xdir, *xind;
1663 struct elfNN_ia64_link_hash_entry *dir, *ind;
1665 dir = (struct elfNN_ia64_link_hash_entry *) xdir;
1666 ind = (struct elfNN_ia64_link_hash_entry *) xind;
1668 /* Copy down any references that we may have already seen to the
1669 symbol which just became indirect. */
1671 dir->root.elf_link_hash_flags |=
1672 (ind->root.elf_link_hash_flags
1673 & (ELF_LINK_HASH_REF_DYNAMIC
1674 | ELF_LINK_HASH_REF_REGULAR
1675 | ELF_LINK_HASH_REF_REGULAR_NONWEAK
1676 | ELF_LINK_HASH_NEEDS_PLT));
1678 if (ind->root.root.type != bfd_link_hash_indirect)
1681 /* Copy over the got and plt data. This would have been done
1684 if (dir->info == NULL)
1686 struct elfNN_ia64_dyn_sym_info *dyn_i;
1688 dir->info = dyn_i = ind->info;
1691 /* Fix up the dyn_sym_info pointers to the global symbol. */
1692 for (; dyn_i; dyn_i = dyn_i->next)
1693 dyn_i->h = &dir->root;
1695 BFD_ASSERT (ind->info == NULL);
1697 /* Copy over the dynindx. */
1699 if (dir->root.dynindx == -1)
1701 dir->root.dynindx = ind->root.dynindx;
1702 dir->root.dynstr_index = ind->root.dynstr_index;
1703 ind->root.dynindx = -1;
1704 ind->root.dynstr_index = 0;
1706 BFD_ASSERT (ind->root.dynindx == -1);
1710 elfNN_ia64_hash_hide_symbol (info, xh, force_local)
1711 struct bfd_link_info *info;
1712 struct elf_link_hash_entry *xh;
1713 bfd_boolean force_local;
1715 struct elfNN_ia64_link_hash_entry *h;
1716 struct elfNN_ia64_dyn_sym_info *dyn_i;
1718 h = (struct elfNN_ia64_link_hash_entry *)xh;
1720 _bfd_elf_link_hash_hide_symbol (info, &h->root, force_local);
1722 for (dyn_i = h->info; dyn_i; dyn_i = dyn_i->next)
1724 dyn_i->want_plt2 = 0;
1725 dyn_i->want_plt = 0;
1729 /* Compute a hash of a local hash entry. */
1732 elfNN_ia64_local_htab_hash (ptr)
1735 struct elfNN_ia64_local_hash_entry *entry
1736 = (struct elfNN_ia64_local_hash_entry *) ptr;
1738 return (((entry->id & 0xff) << 24) | ((entry->id & 0xff00) << 8))
1739 ^ entry->r_sym ^ (entry->id >> 16);
1742 /* Compare local hash entries. */
1745 elfNN_ia64_local_htab_eq (ptr1, ptr2)
1746 const void *ptr1, *ptr2;
1748 struct elfNN_ia64_local_hash_entry *entry1
1749 = (struct elfNN_ia64_local_hash_entry *) ptr1;
1750 struct elfNN_ia64_local_hash_entry *entry2
1751 = (struct elfNN_ia64_local_hash_entry *) ptr2;
1753 return entry1->id == entry2->id && entry1->r_sym == entry2->r_sym;
1756 /* Create the derived linker hash table. The IA-64 ELF port uses this
1757 derived hash table to keep information specific to the IA-64 ElF
1758 linker (without using static variables). */
1760 static struct bfd_link_hash_table*
1761 elfNN_ia64_hash_table_create (abfd)
1764 struct elfNN_ia64_link_hash_table *ret;
1766 ret = bfd_zmalloc ((bfd_size_type) sizeof (*ret));
1770 if (!_bfd_elf_link_hash_table_init (&ret->root, abfd,
1771 elfNN_ia64_new_elf_hash_entry))
1777 ret->loc_hash_table = htab_try_create (1024, elfNN_ia64_local_htab_hash,
1778 elfNN_ia64_local_htab_eq, NULL);
1779 ret->loc_hash_memory = objalloc_create ();
1780 if (!ret->loc_hash_table || !ret->loc_hash_memory)
1786 return &ret->root.root;
1789 /* Destroy IA-64 linker hash table. */
1792 elfNN_ia64_hash_table_free (hash)
1793 struct bfd_link_hash_table *hash;
1795 struct elfNN_ia64_link_hash_table *ia64_info
1796 = (struct elfNN_ia64_link_hash_table *) hash;
1797 if (ia64_info->loc_hash_table)
1798 htab_delete (ia64_info->loc_hash_table);
1799 if (ia64_info->loc_hash_memory)
1800 objalloc_free ((struct objalloc *) ia64_info->loc_hash_memory);
1801 _bfd_generic_link_hash_table_free (hash);
1804 /* Traverse both local and global hash tables. */
1806 struct elfNN_ia64_dyn_sym_traverse_data
1808 bfd_boolean (*func) PARAMS ((struct elfNN_ia64_dyn_sym_info *, PTR));
1813 elfNN_ia64_global_dyn_sym_thunk (xentry, xdata)
1814 struct bfd_hash_entry *xentry;
1817 struct elfNN_ia64_link_hash_entry *entry
1818 = (struct elfNN_ia64_link_hash_entry *) xentry;
1819 struct elfNN_ia64_dyn_sym_traverse_data *data
1820 = (struct elfNN_ia64_dyn_sym_traverse_data *) xdata;
1821 struct elfNN_ia64_dyn_sym_info *dyn_i;
1823 if (entry->root.root.type == bfd_link_hash_warning)
1824 entry = (struct elfNN_ia64_link_hash_entry *) entry->root.root.u.i.link;
1826 for (dyn_i = entry->info; dyn_i; dyn_i = dyn_i->next)
1827 if (! (*data->func) (dyn_i, data->data))
1833 elfNN_ia64_local_dyn_sym_thunk (slot, xdata)
1837 struct elfNN_ia64_local_hash_entry *entry
1838 = (struct elfNN_ia64_local_hash_entry *) *slot;
1839 struct elfNN_ia64_dyn_sym_traverse_data *data
1840 = (struct elfNN_ia64_dyn_sym_traverse_data *) xdata;
1841 struct elfNN_ia64_dyn_sym_info *dyn_i;
1843 for (dyn_i = entry->info; dyn_i; dyn_i = dyn_i->next)
1844 if (! (*data->func) (dyn_i, data->data))
1850 elfNN_ia64_dyn_sym_traverse (ia64_info, func, data)
1851 struct elfNN_ia64_link_hash_table *ia64_info;
1852 bfd_boolean (*func) PARAMS ((struct elfNN_ia64_dyn_sym_info *, PTR));
1855 struct elfNN_ia64_dyn_sym_traverse_data xdata;
1860 elf_link_hash_traverse (&ia64_info->root,
1861 elfNN_ia64_global_dyn_sym_thunk, &xdata);
1862 htab_traverse (ia64_info->loc_hash_table,
1863 elfNN_ia64_local_dyn_sym_thunk, &xdata);
1867 elfNN_ia64_create_dynamic_sections (abfd, info)
1869 struct bfd_link_info *info;
1871 struct elfNN_ia64_link_hash_table *ia64_info;
1874 if (! _bfd_elf_create_dynamic_sections (abfd, info))
1877 ia64_info = elfNN_ia64_hash_table (info);
1879 ia64_info->plt_sec = bfd_get_section_by_name (abfd, ".plt");
1880 ia64_info->got_sec = bfd_get_section_by_name (abfd, ".got");
1883 flagword flags = bfd_get_section_flags (abfd, ia64_info->got_sec);
1884 bfd_set_section_flags (abfd, ia64_info->got_sec, SEC_SMALL_DATA | flags);
1885 /* The .got section is always aligned at 8 bytes. */
1886 bfd_set_section_alignment (abfd, ia64_info->got_sec, 3);
1889 if (!get_pltoff (abfd, info, ia64_info))
1892 s = bfd_make_section(abfd, ".rela.IA_64.pltoff");
1894 || !bfd_set_section_flags (abfd, s, (SEC_ALLOC | SEC_LOAD
1897 | SEC_LINKER_CREATED
1899 || !bfd_set_section_alignment (abfd, s, 3))
1901 ia64_info->rel_pltoff_sec = s;
1903 s = bfd_make_section(abfd, ".rela.got");
1905 || !bfd_set_section_flags (abfd, s, (SEC_ALLOC | SEC_LOAD
1908 | SEC_LINKER_CREATED
1910 || !bfd_set_section_alignment (abfd, s, 3))
1912 ia64_info->rel_got_sec = s;
1917 /* Find and/or create a hash entry for local symbol. */
1918 static struct elfNN_ia64_local_hash_entry *
1919 get_local_sym_hash (ia64_info, abfd, rel, create)
1920 struct elfNN_ia64_link_hash_table *ia64_info;
1922 const Elf_Internal_Rela *rel;
1925 struct elfNN_ia64_local_hash_entry e, *ret;
1926 asection *sec = abfd->sections;
1927 hashval_t h = (((sec->id & 0xff) << 24) | ((sec->id & 0xff00) << 8))
1928 ^ ELFNN_R_SYM (rel->r_info) ^ (sec->id >> 16);
1932 e.r_sym = ELFNN_R_SYM (rel->r_info);
1933 slot = htab_find_slot_with_hash (ia64_info->loc_hash_table, &e, h,
1934 create ? INSERT : NO_INSERT);
1940 return (struct elfNN_ia64_local_hash_entry *) *slot;
1942 ret = (struct elfNN_ia64_local_hash_entry *)
1943 objalloc_alloc ((struct objalloc *) ia64_info->loc_hash_memory,
1944 sizeof (struct elfNN_ia64_local_hash_entry));
1947 memset (ret, 0, sizeof (*ret));
1949 ret->r_sym = ELFNN_R_SYM (rel->r_info);
1955 /* Find and/or create a descriptor for dynamic symbol info. This will
1956 vary based on global or local symbol, and the addend to the reloc. */
1958 static struct elfNN_ia64_dyn_sym_info *
1959 get_dyn_sym_info (ia64_info, h, abfd, rel, create)
1960 struct elfNN_ia64_link_hash_table *ia64_info;
1961 struct elf_link_hash_entry *h;
1963 const Elf_Internal_Rela *rel;
1966 struct elfNN_ia64_dyn_sym_info **pp;
1967 struct elfNN_ia64_dyn_sym_info *dyn_i;
1968 bfd_vma addend = rel ? rel->r_addend : 0;
1971 pp = &((struct elfNN_ia64_link_hash_entry *)h)->info;
1974 struct elfNN_ia64_local_hash_entry *loc_h;
1976 loc_h = get_local_sym_hash (ia64_info, abfd, rel, create);
1979 BFD_ASSERT (!create);
1986 for (dyn_i = *pp; dyn_i && dyn_i->addend != addend; dyn_i = *pp)
1989 if (dyn_i == NULL && create)
1991 dyn_i = ((struct elfNN_ia64_dyn_sym_info *)
1992 bfd_zalloc (abfd, (bfd_size_type) sizeof *dyn_i));
1994 dyn_i->addend = addend;
2001 get_got (abfd, info, ia64_info)
2003 struct bfd_link_info *info;
2004 struct elfNN_ia64_link_hash_table *ia64_info;
2009 got = ia64_info->got_sec;
2014 dynobj = ia64_info->root.dynobj;
2016 ia64_info->root.dynobj = dynobj = abfd;
2017 if (!_bfd_elf_create_got_section (dynobj, info))
2020 got = bfd_get_section_by_name (dynobj, ".got");
2022 ia64_info->got_sec = got;
2024 /* The .got section is always aligned at 8 bytes. */
2025 if (!bfd_set_section_alignment (abfd, got, 3))
2028 flags = bfd_get_section_flags (abfd, got);
2029 bfd_set_section_flags (abfd, got, SEC_SMALL_DATA | flags);
2035 /* Create function descriptor section (.opd). This section is called .opd
2036 because it contains "official procedure descriptors". The "official"
2037 refers to the fact that these descriptors are used when taking the address
2038 of a procedure, thus ensuring a unique address for each procedure. */
2041 get_fptr (abfd, info, ia64_info)
2043 struct bfd_link_info *info;
2044 struct elfNN_ia64_link_hash_table *ia64_info;
2049 fptr = ia64_info->fptr_sec;
2052 dynobj = ia64_info->root.dynobj;
2054 ia64_info->root.dynobj = dynobj = abfd;
2056 fptr = bfd_make_section (dynobj, ".opd");
2058 || !bfd_set_section_flags (dynobj, fptr,
2063 | (info->pie ? 0 : SEC_READONLY)
2064 | SEC_LINKER_CREATED))
2065 || !bfd_set_section_alignment (abfd, fptr, 4))
2071 ia64_info->fptr_sec = fptr;
2076 fptr_rel = bfd_make_section(dynobj, ".rela.opd");
2077 if (fptr_rel == NULL
2078 || !bfd_set_section_flags (dynobj, fptr_rel,
2079 (SEC_ALLOC | SEC_LOAD
2082 | SEC_LINKER_CREATED
2084 || !bfd_set_section_alignment (abfd, fptr_rel, 3))
2090 ia64_info->rel_fptr_sec = fptr_rel;
2098 get_pltoff (abfd, info, ia64_info)
2100 struct bfd_link_info *info ATTRIBUTE_UNUSED;
2101 struct elfNN_ia64_link_hash_table *ia64_info;
2106 pltoff = ia64_info->pltoff_sec;
2109 dynobj = ia64_info->root.dynobj;
2111 ia64_info->root.dynobj = dynobj = abfd;
2113 pltoff = bfd_make_section (dynobj, ELF_STRING_ia64_pltoff);
2115 || !bfd_set_section_flags (dynobj, pltoff,
2121 | SEC_LINKER_CREATED))
2122 || !bfd_set_section_alignment (abfd, pltoff, 4))
2128 ia64_info->pltoff_sec = pltoff;
2135 get_reloc_section (abfd, ia64_info, sec, create)
2137 struct elfNN_ia64_link_hash_table *ia64_info;
2141 const char *srel_name;
2145 srel_name = (bfd_elf_string_from_elf_section
2146 (abfd, elf_elfheader(abfd)->e_shstrndx,
2147 elf_section_data(sec)->rel_hdr.sh_name));
2148 if (srel_name == NULL)
2151 BFD_ASSERT ((strncmp (srel_name, ".rela", 5) == 0
2152 && strcmp (bfd_get_section_name (abfd, sec),
2154 || (strncmp (srel_name, ".rel", 4) == 0
2155 && strcmp (bfd_get_section_name (abfd, sec),
2156 srel_name+4) == 0));
2158 dynobj = ia64_info->root.dynobj;
2160 ia64_info->root.dynobj = dynobj = abfd;
2162 srel = bfd_get_section_by_name (dynobj, srel_name);
2163 if (srel == NULL && create)
2165 srel = bfd_make_section (dynobj, srel_name);
2167 || !bfd_set_section_flags (dynobj, srel,
2172 | SEC_LINKER_CREATED
2174 || !bfd_set_section_alignment (dynobj, srel, 3))
2182 count_dyn_reloc (bfd *abfd, struct elfNN_ia64_dyn_sym_info *dyn_i,
2183 asection *srel, int type, bfd_boolean reltext)
2185 struct elfNN_ia64_dyn_reloc_entry *rent;
2187 for (rent = dyn_i->reloc_entries; rent; rent = rent->next)
2188 if (rent->srel == srel && rent->type == type)
2193 rent = ((struct elfNN_ia64_dyn_reloc_entry *)
2194 bfd_alloc (abfd, (bfd_size_type) sizeof (*rent)));
2198 rent->next = dyn_i->reloc_entries;
2202 dyn_i->reloc_entries = rent;
2204 rent->reltext = reltext;
2211 elfNN_ia64_check_relocs (abfd, info, sec, relocs)
2213 struct bfd_link_info *info;
2215 const Elf_Internal_Rela *relocs;
2217 struct elfNN_ia64_link_hash_table *ia64_info;
2218 const Elf_Internal_Rela *relend;
2219 Elf_Internal_Shdr *symtab_hdr;
2220 const Elf_Internal_Rela *rel;
2221 asection *got, *fptr, *srel;
2223 if (info->relocatable)
2226 symtab_hdr = &elf_tdata (abfd)->symtab_hdr;
2227 ia64_info = elfNN_ia64_hash_table (info);
2229 got = fptr = srel = NULL;
2231 relend = relocs + sec->reloc_count;
2232 for (rel = relocs; rel < relend; ++rel)
2242 NEED_LTOFF_FPTR = 128,
2248 struct elf_link_hash_entry *h = NULL;
2249 unsigned long r_symndx = ELFNN_R_SYM (rel->r_info);
2250 struct elfNN_ia64_dyn_sym_info *dyn_i;
2252 bfd_boolean maybe_dynamic;
2253 int dynrel_type = R_IA64_NONE;
2255 if (r_symndx >= symtab_hdr->sh_info)
2257 /* We're dealing with a global symbol -- find its hash entry
2258 and mark it as being referenced. */
2259 long indx = r_symndx - symtab_hdr->sh_info;
2260 h = elf_sym_hashes (abfd)[indx];
2261 while (h->root.type == bfd_link_hash_indirect
2262 || h->root.type == bfd_link_hash_warning)
2263 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2265 h->elf_link_hash_flags |= ELF_LINK_HASH_REF_REGULAR;
2268 /* We can only get preliminary data on whether a symbol is
2269 locally or externally defined, as not all of the input files
2270 have yet been processed. Do something with what we know, as
2271 this may help reduce memory usage and processing time later. */
2272 maybe_dynamic = FALSE;
2273 if (h && ((!info->executable
2274 && (!info->symbolic || info->unresolved_syms_in_shared_libs == RM_IGNORE))
2275 || ! (h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR)
2276 || h->root.type == bfd_link_hash_defweak))
2277 maybe_dynamic = TRUE;
2280 switch (ELFNN_R_TYPE (rel->r_info))
2282 case R_IA64_TPREL64MSB:
2283 case R_IA64_TPREL64LSB:
2284 if (info->shared || maybe_dynamic)
2285 need_entry = NEED_DYNREL;
2286 dynrel_type = R_IA64_TPREL64LSB;
2288 info->flags |= DF_STATIC_TLS;
2291 case R_IA64_LTOFF_TPREL22:
2292 need_entry = NEED_TPREL;
2294 info->flags |= DF_STATIC_TLS;
2297 case R_IA64_DTPREL64MSB:
2298 case R_IA64_DTPREL64LSB:
2299 if (info->shared || maybe_dynamic)
2300 need_entry = NEED_DYNREL;
2301 dynrel_type = R_IA64_DTPREL64LSB;
2304 case R_IA64_LTOFF_DTPREL22:
2305 need_entry = NEED_DTPREL;
2308 case R_IA64_DTPMOD64MSB:
2309 case R_IA64_DTPMOD64LSB:
2310 if (info->shared || maybe_dynamic)
2311 need_entry = NEED_DYNREL;
2312 dynrel_type = R_IA64_DTPMOD64LSB;
2315 case R_IA64_LTOFF_DTPMOD22:
2316 need_entry = NEED_DTPMOD;
2319 case R_IA64_LTOFF_FPTR22:
2320 case R_IA64_LTOFF_FPTR64I:
2321 case R_IA64_LTOFF_FPTR32MSB:
2322 case R_IA64_LTOFF_FPTR32LSB:
2323 case R_IA64_LTOFF_FPTR64MSB:
2324 case R_IA64_LTOFF_FPTR64LSB:
2325 need_entry = NEED_FPTR | NEED_GOT | NEED_LTOFF_FPTR;
2328 case R_IA64_FPTR64I:
2329 case R_IA64_FPTR32MSB:
2330 case R_IA64_FPTR32LSB:
2331 case R_IA64_FPTR64MSB:
2332 case R_IA64_FPTR64LSB:
2333 if (info->shared || h)
2334 need_entry = NEED_FPTR | NEED_DYNREL;
2336 need_entry = NEED_FPTR;
2337 dynrel_type = R_IA64_FPTR64LSB;
2340 case R_IA64_LTOFF22:
2341 case R_IA64_LTOFF64I:
2342 need_entry = NEED_GOT;
2345 case R_IA64_LTOFF22X:
2346 need_entry = NEED_GOTX;
2349 case R_IA64_PLTOFF22:
2350 case R_IA64_PLTOFF64I:
2351 case R_IA64_PLTOFF64MSB:
2352 case R_IA64_PLTOFF64LSB:
2353 need_entry = NEED_PLTOFF;
2357 need_entry |= NEED_MIN_PLT;
2361 (*info->callbacks->warning)
2362 (info, _("@pltoff reloc against local symbol"), 0,
2363 abfd, 0, (bfd_vma) 0);
2367 case R_IA64_PCREL21B:
2368 case R_IA64_PCREL60B:
2369 /* Depending on where this symbol is defined, we may or may not
2370 need a full plt entry. Only skip if we know we'll not need
2371 the entry -- static or symbolic, and the symbol definition
2372 has already been seen. */
2373 if (maybe_dynamic && rel->r_addend == 0)
2374 need_entry = NEED_FULL_PLT;
2380 case R_IA64_DIR32MSB:
2381 case R_IA64_DIR32LSB:
2382 case R_IA64_DIR64MSB:
2383 case R_IA64_DIR64LSB:
2384 /* Shared objects will always need at least a REL relocation. */
2385 if (info->shared || maybe_dynamic)
2386 need_entry = NEED_DYNREL;
2387 dynrel_type = R_IA64_DIR64LSB;
2390 case R_IA64_IPLTMSB:
2391 case R_IA64_IPLTLSB:
2392 /* Shared objects will always need at least a REL relocation. */
2393 if (info->shared || maybe_dynamic)
2394 need_entry = NEED_DYNREL;
2395 dynrel_type = R_IA64_IPLTLSB;
2398 case R_IA64_PCREL22:
2399 case R_IA64_PCREL64I:
2400 case R_IA64_PCREL32MSB:
2401 case R_IA64_PCREL32LSB:
2402 case R_IA64_PCREL64MSB:
2403 case R_IA64_PCREL64LSB:
2405 need_entry = NEED_DYNREL;
2406 dynrel_type = R_IA64_PCREL64LSB;
2413 if ((need_entry & NEED_FPTR) != 0
2416 (*info->callbacks->warning)
2417 (info, _("non-zero addend in @fptr reloc"), 0,
2418 abfd, 0, (bfd_vma) 0);
2421 dyn_i = get_dyn_sym_info (ia64_info, h, abfd, rel, TRUE);
2423 /* Record whether or not this is a local symbol. */
2426 /* Create what's needed. */
2427 if (need_entry & (NEED_GOT | NEED_GOTX | NEED_TPREL
2428 | NEED_DTPMOD | NEED_DTPREL))
2432 got = get_got (abfd, info, ia64_info);
2436 if (need_entry & NEED_GOT)
2437 dyn_i->want_got = 1;
2438 if (need_entry & NEED_GOTX)
2439 dyn_i->want_gotx = 1;
2440 if (need_entry & NEED_TPREL)
2441 dyn_i->want_tprel = 1;
2442 if (need_entry & NEED_DTPMOD)
2443 dyn_i->want_dtpmod = 1;
2444 if (need_entry & NEED_DTPREL)
2445 dyn_i->want_dtprel = 1;
2447 if (need_entry & NEED_FPTR)
2451 fptr = get_fptr (abfd, info, ia64_info);
2456 /* FPTRs for shared libraries are allocated by the dynamic
2457 linker. Make sure this local symbol will appear in the
2458 dynamic symbol table. */
2459 if (!h && info->shared)
2461 if (! (_bfd_elfNN_link_record_local_dynamic_symbol
2462 (info, abfd, (long) r_symndx)))
2466 dyn_i->want_fptr = 1;
2468 if (need_entry & NEED_LTOFF_FPTR)
2469 dyn_i->want_ltoff_fptr = 1;
2470 if (need_entry & (NEED_MIN_PLT | NEED_FULL_PLT))
2472 if (!ia64_info->root.dynobj)
2473 ia64_info->root.dynobj = abfd;
2474 h->elf_link_hash_flags |= ELF_LINK_HASH_NEEDS_PLT;
2475 dyn_i->want_plt = 1;
2477 if (need_entry & NEED_FULL_PLT)
2478 dyn_i->want_plt2 = 1;
2479 if (need_entry & NEED_PLTOFF)
2480 dyn_i->want_pltoff = 1;
2481 if ((need_entry & NEED_DYNREL) && (sec->flags & SEC_ALLOC))
2485 srel = get_reloc_section (abfd, ia64_info, sec, TRUE);
2489 if (!count_dyn_reloc (abfd, dyn_i, srel, dynrel_type,
2490 (sec->flags & SEC_READONLY)))
2498 /* For cleanliness, and potentially faster dynamic loading, allocate
2499 external GOT entries first. */
2502 allocate_global_data_got (dyn_i, data)
2503 struct elfNN_ia64_dyn_sym_info *dyn_i;
2506 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
2508 if ((dyn_i->want_got || dyn_i->want_gotx)
2509 && ! dyn_i->want_fptr
2510 && elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, 0))
2512 dyn_i->got_offset = x->ofs;
2515 if (dyn_i->want_tprel)
2517 dyn_i->tprel_offset = x->ofs;
2520 if (dyn_i->want_dtpmod)
2522 if (elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, 0))
2524 dyn_i->dtpmod_offset = x->ofs;
2529 struct elfNN_ia64_link_hash_table *ia64_info;
2531 ia64_info = elfNN_ia64_hash_table (x->info);
2532 if (ia64_info->self_dtpmod_offset == (bfd_vma) -1)
2534 ia64_info->self_dtpmod_offset = x->ofs;
2537 dyn_i->dtpmod_offset = ia64_info->self_dtpmod_offset;
2540 if (dyn_i->want_dtprel)
2542 dyn_i->dtprel_offset = x->ofs;
2548 /* Next, allocate all the GOT entries used by LTOFF_FPTR relocs. */
2551 allocate_global_fptr_got (dyn_i, data)
2552 struct elfNN_ia64_dyn_sym_info *dyn_i;
2555 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
2559 && elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, R_IA64_FPTR64LSB))
2561 dyn_i->got_offset = x->ofs;
2567 /* Lastly, allocate all the GOT entries for local data. */
2570 allocate_local_got (dyn_i, data)
2571 struct elfNN_ia64_dyn_sym_info *dyn_i;
2574 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
2576 if ((dyn_i->want_got || dyn_i->want_gotx)
2577 && !elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, 0))
2579 dyn_i->got_offset = x->ofs;
2585 /* Search for the index of a global symbol in it's defining object file. */
2588 global_sym_index (h)
2589 struct elf_link_hash_entry *h;
2591 struct elf_link_hash_entry **p;
2594 BFD_ASSERT (h->root.type == bfd_link_hash_defined
2595 || h->root.type == bfd_link_hash_defweak);
2597 obj = h->root.u.def.section->owner;
2598 for (p = elf_sym_hashes (obj); *p != h; ++p)
2601 return p - elf_sym_hashes (obj) + elf_tdata (obj)->symtab_hdr.sh_info;
2604 /* Allocate function descriptors. We can do these for every function
2605 in a main executable that is not exported. */
2608 allocate_fptr (dyn_i, data)
2609 struct elfNN_ia64_dyn_sym_info *dyn_i;
2612 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
2614 if (dyn_i->want_fptr)
2616 struct elf_link_hash_entry *h = dyn_i->h;
2619 while (h->root.type == bfd_link_hash_indirect
2620 || h->root.type == bfd_link_hash_warning)
2621 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2623 if (!x->info->executable
2625 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
2626 || h->root.type != bfd_link_hash_undefweak))
2628 if (h && h->dynindx == -1)
2630 BFD_ASSERT ((h->root.type == bfd_link_hash_defined)
2631 || (h->root.type == bfd_link_hash_defweak));
2633 if (!_bfd_elfNN_link_record_local_dynamic_symbol
2634 (x->info, h->root.u.def.section->owner,
2635 global_sym_index (h)))
2639 dyn_i->want_fptr = 0;
2641 else if (h == NULL || h->dynindx == -1)
2643 dyn_i->fptr_offset = x->ofs;
2647 dyn_i->want_fptr = 0;
2652 /* Allocate all the minimal PLT entries. */
2655 allocate_plt_entries (dyn_i, data)
2656 struct elfNN_ia64_dyn_sym_info *dyn_i;
2659 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
2661 if (dyn_i->want_plt)
2663 struct elf_link_hash_entry *h = dyn_i->h;
2666 while (h->root.type == bfd_link_hash_indirect
2667 || h->root.type == bfd_link_hash_warning)
2668 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2670 /* ??? Versioned symbols seem to lose ELF_LINK_HASH_NEEDS_PLT. */
2671 if (elfNN_ia64_dynamic_symbol_p (h, x->info, 0))
2673 bfd_size_type offset = x->ofs;
2675 offset = PLT_HEADER_SIZE;
2676 dyn_i->plt_offset = offset;
2677 x->ofs = offset + PLT_MIN_ENTRY_SIZE;
2679 dyn_i->want_pltoff = 1;
2683 dyn_i->want_plt = 0;
2684 dyn_i->want_plt2 = 0;
2690 /* Allocate all the full PLT entries. */
2693 allocate_plt2_entries (dyn_i, data)
2694 struct elfNN_ia64_dyn_sym_info *dyn_i;
2697 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
2699 if (dyn_i->want_plt2)
2701 struct elf_link_hash_entry *h = dyn_i->h;
2702 bfd_size_type ofs = x->ofs;
2704 dyn_i->plt2_offset = ofs;
2705 x->ofs = ofs + PLT_FULL_ENTRY_SIZE;
2707 while (h->root.type == bfd_link_hash_indirect
2708 || h->root.type == bfd_link_hash_warning)
2709 h = (struct elf_link_hash_entry *) h->root.u.i.link;
2710 dyn_i->h->plt.offset = ofs;
2715 /* Allocate all the PLTOFF entries requested by relocations and
2716 plt entries. We can't share space with allocated FPTR entries,
2717 because the latter are not necessarily addressable by the GP.
2718 ??? Relaxation might be able to determine that they are. */
2721 allocate_pltoff_entries (dyn_i, data)
2722 struct elfNN_ia64_dyn_sym_info *dyn_i;
2725 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
2727 if (dyn_i->want_pltoff)
2729 dyn_i->pltoff_offset = x->ofs;
2735 /* Allocate dynamic relocations for those symbols that turned out
2739 allocate_dynrel_entries (dyn_i, data)
2740 struct elfNN_ia64_dyn_sym_info *dyn_i;
2743 struct elfNN_ia64_allocate_data *x = (struct elfNN_ia64_allocate_data *)data;
2744 struct elfNN_ia64_link_hash_table *ia64_info;
2745 struct elfNN_ia64_dyn_reloc_entry *rent;
2746 bfd_boolean dynamic_symbol, shared, resolved_zero;
2748 ia64_info = elfNN_ia64_hash_table (x->info);
2750 /* Note that this can't be used in relation to FPTR relocs below. */
2751 dynamic_symbol = elfNN_ia64_dynamic_symbol_p (dyn_i->h, x->info, 0);
2753 shared = x->info->shared;
2754 resolved_zero = (dyn_i->h
2755 && ELF_ST_VISIBILITY (dyn_i->h->other)
2756 && dyn_i->h->root.type == bfd_link_hash_undefweak);
2758 /* Take care of the normal data relocations. */
2760 for (rent = dyn_i->reloc_entries; rent; rent = rent->next)
2762 int count = rent->count;
2766 case R_IA64_FPTR64LSB:
2767 /* Allocate one iff !want_fptr and not PIE, which by this point
2768 will be true only if we're actually allocating one statically
2769 in the main executable. Position independent executables
2770 need a relative reloc. */
2771 if (dyn_i->want_fptr && !x->info->pie)
2774 case R_IA64_PCREL64LSB:
2775 if (!dynamic_symbol)
2778 case R_IA64_DIR64LSB:
2779 if (!dynamic_symbol && !shared)
2782 case R_IA64_IPLTLSB:
2783 if (!dynamic_symbol && !shared)
2785 /* Use two REL relocations for IPLT relocations
2786 against local symbols. */
2787 if (!dynamic_symbol)
2790 case R_IA64_TPREL64LSB:
2791 case R_IA64_DTPREL64LSB:
2792 case R_IA64_DTPMOD64LSB:
2798 ia64_info->reltext = 1;
2799 rent->srel->_raw_size += sizeof (ElfNN_External_Rela) * count;
2802 /* Take care of the GOT and PLT relocations. */
2805 && (dynamic_symbol || shared)
2806 && (dyn_i->want_got || dyn_i->want_gotx))
2807 || (dyn_i->want_ltoff_fptr
2809 && dyn_i->h->dynindx != -1))
2811 if (!dyn_i->want_ltoff_fptr
2814 || dyn_i->h->root.type != bfd_link_hash_undefweak)
2815 ia64_info->rel_got_sec->_raw_size += sizeof (ElfNN_External_Rela);
2817 if ((dynamic_symbol || shared) && dyn_i->want_tprel)
2818 ia64_info->rel_got_sec->_raw_size += sizeof (ElfNN_External_Rela);
2819 if (dynamic_symbol && dyn_i->want_dtpmod)
2820 ia64_info->rel_got_sec->_raw_size += sizeof (ElfNN_External_Rela);
2821 if (dynamic_symbol && dyn_i->want_dtprel)
2822 ia64_info->rel_got_sec->_raw_size += sizeof (ElfNN_External_Rela);
2823 if (ia64_info->rel_fptr_sec && dyn_i->want_fptr)
2825 if (dyn_i->h == NULL || dyn_i->h->root.type != bfd_link_hash_undefweak)
2826 ia64_info->rel_fptr_sec->_raw_size += sizeof (ElfNN_External_Rela);
2829 if (!resolved_zero && dyn_i->want_pltoff)
2831 bfd_size_type t = 0;
2833 /* Dynamic symbols get one IPLT relocation. Local symbols in
2834 shared libraries get two REL relocations. Local symbols in
2835 main applications get nothing. */
2837 t = sizeof (ElfNN_External_Rela);
2839 t = 2 * sizeof (ElfNN_External_Rela);
2841 ia64_info->rel_pltoff_sec->_raw_size += t;
2848 elfNN_ia64_adjust_dynamic_symbol (info, h)
2849 struct bfd_link_info *info ATTRIBUTE_UNUSED;
2850 struct elf_link_hash_entry *h;
2852 /* ??? Undefined symbols with PLT entries should be re-defined
2853 to be the PLT entry. */
2855 /* If this is a weak symbol, and there is a real definition, the
2856 processor independent code will have arranged for us to see the
2857 real definition first, and we can just use the same value. */
2858 if (h->weakdef != NULL)
2860 BFD_ASSERT (h->weakdef->root.type == bfd_link_hash_defined
2861 || h->weakdef->root.type == bfd_link_hash_defweak);
2862 h->root.u.def.section = h->weakdef->root.u.def.section;
2863 h->root.u.def.value = h->weakdef->root.u.def.value;
2867 /* If this is a reference to a symbol defined by a dynamic object which
2868 is not a function, we might allocate the symbol in our .dynbss section
2869 and allocate a COPY dynamic relocation.
2871 But IA-64 code is canonically PIC, so as a rule we can avoid this sort
2878 elfNN_ia64_size_dynamic_sections (output_bfd, info)
2879 bfd *output_bfd ATTRIBUTE_UNUSED;
2880 struct bfd_link_info *info;
2882 struct elfNN_ia64_allocate_data data;
2883 struct elfNN_ia64_link_hash_table *ia64_info;
2886 bfd_boolean relplt = FALSE;
2888 dynobj = elf_hash_table(info)->dynobj;
2889 ia64_info = elfNN_ia64_hash_table (info);
2890 ia64_info->self_dtpmod_offset = (bfd_vma) -1;
2891 BFD_ASSERT(dynobj != NULL);
2894 /* Set the contents of the .interp section to the interpreter. */
2895 if (ia64_info->root.dynamic_sections_created
2896 && info->executable)
2898 sec = bfd_get_section_by_name (dynobj, ".interp");
2899 BFD_ASSERT (sec != NULL);
2900 sec->contents = (bfd_byte *) ELF_DYNAMIC_INTERPRETER;
2901 sec->_raw_size = strlen (ELF_DYNAMIC_INTERPRETER) + 1;
2904 /* Allocate the GOT entries. */
2906 if (ia64_info->got_sec)
2909 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_global_data_got, &data);
2910 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_global_fptr_got, &data);
2911 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_local_got, &data);
2912 ia64_info->got_sec->_raw_size = data.ofs;
2915 /* Allocate the FPTR entries. */
2917 if (ia64_info->fptr_sec)
2920 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_fptr, &data);
2921 ia64_info->fptr_sec->_raw_size = data.ofs;
2924 /* Now that we've seen all of the input files, we can decide which
2925 symbols need plt entries. Allocate the minimal PLT entries first.
2926 We do this even though dynamic_sections_created may be FALSE, because
2927 this has the side-effect of clearing want_plt and want_plt2. */
2930 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_plt_entries, &data);
2932 ia64_info->minplt_entries = 0;
2935 ia64_info->minplt_entries
2936 = (data.ofs - PLT_HEADER_SIZE) / PLT_MIN_ENTRY_SIZE;
2939 /* Align the pointer for the plt2 entries. */
2940 data.ofs = (data.ofs + 31) & (bfd_vma) -32;
2942 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_plt2_entries, &data);
2945 BFD_ASSERT (ia64_info->root.dynamic_sections_created);
2947 ia64_info->plt_sec->_raw_size = data.ofs;
2949 /* If we've got a .plt, we need some extra memory for the dynamic
2950 linker. We stuff these in .got.plt. */
2951 sec = bfd_get_section_by_name (dynobj, ".got.plt");
2952 sec->_raw_size = 8 * PLT_RESERVED_WORDS;
2955 /* Allocate the PLTOFF entries. */
2957 if (ia64_info->pltoff_sec)
2960 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_pltoff_entries, &data);
2961 ia64_info->pltoff_sec->_raw_size = data.ofs;
2964 if (ia64_info->root.dynamic_sections_created)
2966 /* Allocate space for the dynamic relocations that turned out to be
2969 if (info->shared && ia64_info->self_dtpmod_offset != (bfd_vma) -1)
2970 ia64_info->rel_got_sec->_raw_size += sizeof (ElfNN_External_Rela);
2971 elfNN_ia64_dyn_sym_traverse (ia64_info, allocate_dynrel_entries, &data);
2974 /* We have now determined the sizes of the various dynamic sections.
2975 Allocate memory for them. */
2976 for (sec = dynobj->sections; sec != NULL; sec = sec->next)
2980 if (!(sec->flags & SEC_LINKER_CREATED))
2983 /* If we don't need this section, strip it from the output file.
2984 There were several sections primarily related to dynamic
2985 linking that must be create before the linker maps input
2986 sections to output sections. The linker does that before
2987 bfd_elf_size_dynamic_sections is called, and it is that
2988 function which decides whether anything needs to go into
2991 strip = (sec->_raw_size == 0);
2993 if (sec == ia64_info->got_sec)
2995 else if (sec == ia64_info->rel_got_sec)
2998 ia64_info->rel_got_sec = NULL;
3000 /* We use the reloc_count field as a counter if we need to
3001 copy relocs into the output file. */
3002 sec->reloc_count = 0;
3004 else if (sec == ia64_info->fptr_sec)
3007 ia64_info->fptr_sec = NULL;
3009 else if (sec == ia64_info->rel_fptr_sec)
3012 ia64_info->rel_fptr_sec = NULL;
3014 /* We use the reloc_count field as a counter if we need to
3015 copy relocs into the output file. */
3016 sec->reloc_count = 0;
3018 else if (sec == ia64_info->plt_sec)
3021 ia64_info->plt_sec = NULL;
3023 else if (sec == ia64_info->pltoff_sec)
3026 ia64_info->pltoff_sec = NULL;
3028 else if (sec == ia64_info->rel_pltoff_sec)
3031 ia64_info->rel_pltoff_sec = NULL;
3035 /* We use the reloc_count field as a counter if we need to
3036 copy relocs into the output file. */
3037 sec->reloc_count = 0;
3044 /* It's OK to base decisions on the section name, because none
3045 of the dynobj section names depend upon the input files. */
3046 name = bfd_get_section_name (dynobj, sec);
3048 if (strcmp (name, ".got.plt") == 0)
3050 else if (strncmp (name, ".rel", 4) == 0)
3054 /* We use the reloc_count field as a counter if we need to
3055 copy relocs into the output file. */
3056 sec->reloc_count = 0;
3064 _bfd_strip_section_from_output (info, sec);
3067 /* Allocate memory for the section contents. */
3068 sec->contents = (bfd_byte *) bfd_zalloc (dynobj, sec->_raw_size);
3069 if (sec->contents == NULL && sec->_raw_size != 0)
3074 if (elf_hash_table (info)->dynamic_sections_created)
3076 /* Add some entries to the .dynamic section. We fill in the values
3077 later (in finish_dynamic_sections) but we must add the entries now
3078 so that we get the correct size for the .dynamic section. */
3080 if (info->executable)
3082 /* The DT_DEBUG entry is filled in by the dynamic linker and used
3084 #define add_dynamic_entry(TAG, VAL) \
3085 bfd_elfNN_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
3087 if (!add_dynamic_entry (DT_DEBUG, 0))
3091 if (!add_dynamic_entry (DT_IA_64_PLT_RESERVE, 0))
3093 if (!add_dynamic_entry (DT_PLTGOT, 0))
3098 if (!add_dynamic_entry (DT_PLTRELSZ, 0)
3099 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
3100 || !add_dynamic_entry (DT_JMPREL, 0))
3104 if (!add_dynamic_entry (DT_RELA, 0)
3105 || !add_dynamic_entry (DT_RELASZ, 0)
3106 || !add_dynamic_entry (DT_RELAENT, sizeof (ElfNN_External_Rela)))
3109 if (ia64_info->reltext)
3111 if (!add_dynamic_entry (DT_TEXTREL, 0))
3113 info->flags |= DF_TEXTREL;
3117 /* ??? Perhaps force __gp local. */
3122 static bfd_reloc_status_type
3123 elfNN_ia64_install_value (abfd, hit_addr, v, r_type)
3127 unsigned int r_type;
3129 const struct ia64_operand *op;
3130 int bigendian = 0, shift = 0;
3131 bfd_vma t0, t1, insn, dword;
3132 enum ia64_opnd opnd;
3135 #ifdef BFD_HOST_U_64_BIT
3136 BFD_HOST_U_64_BIT val = (BFD_HOST_U_64_BIT) v;
3141 opnd = IA64_OPND_NIL;
3146 return bfd_reloc_ok;
3148 /* Instruction relocations. */
3151 case R_IA64_TPREL14:
3152 case R_IA64_DTPREL14:
3153 opnd = IA64_OPND_IMM14;
3156 case R_IA64_PCREL21F: opnd = IA64_OPND_TGT25; break;
3157 case R_IA64_PCREL21M: opnd = IA64_OPND_TGT25b; break;
3158 case R_IA64_PCREL60B: opnd = IA64_OPND_TGT64; break;
3159 case R_IA64_PCREL21B:
3160 case R_IA64_PCREL21BI:
3161 opnd = IA64_OPND_TGT25c;
3165 case R_IA64_GPREL22:
3166 case R_IA64_LTOFF22:
3167 case R_IA64_LTOFF22X:
3168 case R_IA64_PLTOFF22:
3169 case R_IA64_PCREL22:
3170 case R_IA64_LTOFF_FPTR22:
3171 case R_IA64_TPREL22:
3172 case R_IA64_DTPREL22:
3173 case R_IA64_LTOFF_TPREL22:
3174 case R_IA64_LTOFF_DTPMOD22:
3175 case R_IA64_LTOFF_DTPREL22:
3176 opnd = IA64_OPND_IMM22;
3180 case R_IA64_GPREL64I:
3181 case R_IA64_LTOFF64I:
3182 case R_IA64_PLTOFF64I:
3183 case R_IA64_PCREL64I:
3184 case R_IA64_FPTR64I:
3185 case R_IA64_LTOFF_FPTR64I:
3186 case R_IA64_TPREL64I:
3187 case R_IA64_DTPREL64I:
3188 opnd = IA64_OPND_IMMU64;
3191 /* Data relocations. */
3193 case R_IA64_DIR32MSB:
3194 case R_IA64_GPREL32MSB:
3195 case R_IA64_FPTR32MSB:
3196 case R_IA64_PCREL32MSB:
3197 case R_IA64_LTOFF_FPTR32MSB:
3198 case R_IA64_SEGREL32MSB:
3199 case R_IA64_SECREL32MSB:
3200 case R_IA64_LTV32MSB:
3201 case R_IA64_DTPREL32MSB:
3202 size = 4; bigendian = 1;
3205 case R_IA64_DIR32LSB:
3206 case R_IA64_GPREL32LSB:
3207 case R_IA64_FPTR32LSB:
3208 case R_IA64_PCREL32LSB:
3209 case R_IA64_LTOFF_FPTR32LSB:
3210 case R_IA64_SEGREL32LSB:
3211 case R_IA64_SECREL32LSB:
3212 case R_IA64_LTV32LSB:
3213 case R_IA64_DTPREL32LSB:
3214 size = 4; bigendian = 0;
3217 case R_IA64_DIR64MSB:
3218 case R_IA64_GPREL64MSB:
3219 case R_IA64_PLTOFF64MSB:
3220 case R_IA64_FPTR64MSB:
3221 case R_IA64_PCREL64MSB:
3222 case R_IA64_LTOFF_FPTR64MSB:
3223 case R_IA64_SEGREL64MSB:
3224 case R_IA64_SECREL64MSB:
3225 case R_IA64_LTV64MSB:
3226 case R_IA64_TPREL64MSB:
3227 case R_IA64_DTPMOD64MSB:
3228 case R_IA64_DTPREL64MSB:
3229 size = 8; bigendian = 1;
3232 case R_IA64_DIR64LSB:
3233 case R_IA64_GPREL64LSB:
3234 case R_IA64_PLTOFF64LSB:
3235 case R_IA64_FPTR64LSB:
3236 case R_IA64_PCREL64LSB:
3237 case R_IA64_LTOFF_FPTR64LSB:
3238 case R_IA64_SEGREL64LSB:
3239 case R_IA64_SECREL64LSB:
3240 case R_IA64_LTV64LSB:
3241 case R_IA64_TPREL64LSB:
3242 case R_IA64_DTPMOD64LSB:
3243 case R_IA64_DTPREL64LSB:
3244 size = 8; bigendian = 0;
3247 /* Unsupported / Dynamic relocations. */
3249 return bfd_reloc_notsupported;
3254 case IA64_OPND_IMMU64:
3255 hit_addr -= (long) hit_addr & 0x3;
3256 t0 = bfd_get_64 (abfd, hit_addr);
3257 t1 = bfd_get_64 (abfd, hit_addr + 8);
3259 /* tmpl/s: bits 0.. 5 in t0
3260 slot 0: bits 5..45 in t0
3261 slot 1: bits 46..63 in t0, bits 0..22 in t1
3262 slot 2: bits 23..63 in t1 */
3264 /* First, clear the bits that form the 64 bit constant. */
3265 t0 &= ~(0x3ffffLL << 46);
3267 | (( (0x07fLL << 13) | (0x1ffLL << 27)
3268 | (0x01fLL << 22) | (0x001LL << 21)
3269 | (0x001LL << 36)) << 23));
3271 t0 |= ((val >> 22) & 0x03ffffLL) << 46; /* 18 lsbs of imm41 */
3272 t1 |= ((val >> 40) & 0x7fffffLL) << 0; /* 23 msbs of imm41 */
3273 t1 |= ( (((val >> 0) & 0x07f) << 13) /* imm7b */
3274 | (((val >> 7) & 0x1ff) << 27) /* imm9d */
3275 | (((val >> 16) & 0x01f) << 22) /* imm5c */
3276 | (((val >> 21) & 0x001) << 21) /* ic */
3277 | (((val >> 63) & 0x001) << 36)) << 23; /* i */
3279 bfd_put_64 (abfd, t0, hit_addr);
3280 bfd_put_64 (abfd, t1, hit_addr + 8);
3283 case IA64_OPND_TGT64:
3284 hit_addr -= (long) hit_addr & 0x3;
3285 t0 = bfd_get_64 (abfd, hit_addr);
3286 t1 = bfd_get_64 (abfd, hit_addr + 8);
3288 /* tmpl/s: bits 0.. 5 in t0
3289 slot 0: bits 5..45 in t0
3290 slot 1: bits 46..63 in t0, bits 0..22 in t1
3291 slot 2: bits 23..63 in t1 */
3293 /* First, clear the bits that form the 64 bit constant. */
3294 t0 &= ~(0x3ffffLL << 46);
3296 | ((1LL << 36 | 0xfffffLL << 13) << 23));
3299 t0 |= ((val >> 20) & 0xffffLL) << 2 << 46; /* 16 lsbs of imm39 */
3300 t1 |= ((val >> 36) & 0x7fffffLL) << 0; /* 23 msbs of imm39 */
3301 t1 |= ((((val >> 0) & 0xfffffLL) << 13) /* imm20b */
3302 | (((val >> 59) & 0x1LL) << 36)) << 23; /* i */
3304 bfd_put_64 (abfd, t0, hit_addr);
3305 bfd_put_64 (abfd, t1, hit_addr + 8);
3309 switch ((long) hit_addr & 0x3)
3311 case 0: shift = 5; break;
3312 case 1: shift = 14; hit_addr += 3; break;
3313 case 2: shift = 23; hit_addr += 6; break;
3314 case 3: return bfd_reloc_notsupported; /* shouldn't happen... */
3316 dword = bfd_get_64 (abfd, hit_addr);
3317 insn = (dword >> shift) & 0x1ffffffffffLL;
3319 op = elf64_ia64_operands + opnd;
3320 err = (*op->insert) (op, val, (ia64_insn *)& insn);
3322 return bfd_reloc_overflow;
3324 dword &= ~(0x1ffffffffffLL << shift);
3325 dword |= (insn << shift);
3326 bfd_put_64 (abfd, dword, hit_addr);
3330 /* A data relocation. */
3333 bfd_putb32 (val, hit_addr);
3335 bfd_putb64 (val, hit_addr);
3338 bfd_putl32 (val, hit_addr);
3340 bfd_putl64 (val, hit_addr);
3344 return bfd_reloc_ok;
3348 elfNN_ia64_install_dyn_reloc (abfd, info, sec, srel, offset, type,
3351 struct bfd_link_info *info;
3359 Elf_Internal_Rela outrel;
3362 BFD_ASSERT (dynindx != -1);
3363 outrel.r_info = ELFNN_R_INFO (dynindx, type);
3364 outrel.r_addend = addend;
3365 outrel.r_offset = _bfd_elf_section_offset (abfd, info, sec, offset);
3366 if (outrel.r_offset >= (bfd_vma) -2)
3368 /* Run for the hills. We shouldn't be outputting a relocation
3369 for this. So do what everyone else does and output a no-op. */
3370 outrel.r_info = ELFNN_R_INFO (0, R_IA64_NONE);
3371 outrel.r_addend = 0;
3372 outrel.r_offset = 0;
3375 outrel.r_offset += sec->output_section->vma + sec->output_offset;
3377 loc = srel->contents;
3378 loc += srel->reloc_count++ * sizeof (ElfNN_External_Rela);
3379 bfd_elfNN_swap_reloca_out (abfd, &outrel, loc);
3380 BFD_ASSERT (sizeof (ElfNN_External_Rela) * srel->reloc_count
3381 <= srel->_cooked_size);
3384 /* Store an entry for target address TARGET_ADDR in the linkage table
3385 and return the gp-relative address of the linkage table entry. */
3388 set_got_entry (abfd, info, dyn_i, dynindx, addend, value, dyn_r_type)
3390 struct bfd_link_info *info;
3391 struct elfNN_ia64_dyn_sym_info *dyn_i;
3395 unsigned int dyn_r_type;
3397 struct elfNN_ia64_link_hash_table *ia64_info;
3402 ia64_info = elfNN_ia64_hash_table (info);
3403 got_sec = ia64_info->got_sec;
3407 case R_IA64_TPREL64LSB:
3408 done = dyn_i->tprel_done;
3409 dyn_i->tprel_done = TRUE;
3410 got_offset = dyn_i->tprel_offset;
3412 case R_IA64_DTPMOD64LSB:
3413 if (dyn_i->dtpmod_offset != ia64_info->self_dtpmod_offset)
3415 done = dyn_i->dtpmod_done;
3416 dyn_i->dtpmod_done = TRUE;
3420 done = ia64_info->self_dtpmod_done;
3421 ia64_info->self_dtpmod_done = TRUE;
3424 got_offset = dyn_i->dtpmod_offset;
3426 case R_IA64_DTPREL64LSB:
3427 done = dyn_i->dtprel_done;
3428 dyn_i->dtprel_done = TRUE;
3429 got_offset = dyn_i->dtprel_offset;
3432 done = dyn_i->got_done;
3433 dyn_i->got_done = TRUE;
3434 got_offset = dyn_i->got_offset;
3438 BFD_ASSERT ((got_offset & 7) == 0);
3442 /* Store the target address in the linkage table entry. */
3443 bfd_put_64 (abfd, value, got_sec->contents + got_offset);
3445 /* Install a dynamic relocation if needed. */
3448 || ELF_ST_VISIBILITY (dyn_i->h->other) == STV_DEFAULT
3449 || dyn_i->h->root.type != bfd_link_hash_undefweak)
3450 && dyn_r_type != R_IA64_DTPREL64LSB)
3451 || elfNN_ia64_dynamic_symbol_p (dyn_i->h, info, dyn_r_type)
3452 || (dynindx != -1 && dyn_r_type == R_IA64_FPTR64LSB))
3453 && (!dyn_i->want_ltoff_fptr
3456 || dyn_i->h->root.type != bfd_link_hash_undefweak))
3459 && dyn_r_type != R_IA64_TPREL64LSB
3460 && dyn_r_type != R_IA64_DTPMOD64LSB
3461 && dyn_r_type != R_IA64_DTPREL64LSB)
3463 dyn_r_type = R_IA64_REL64LSB;
3468 if (bfd_big_endian (abfd))
3472 case R_IA64_REL64LSB:
3473 dyn_r_type = R_IA64_REL64MSB;
3475 case R_IA64_DIR64LSB:
3476 dyn_r_type = R_IA64_DIR64MSB;
3478 case R_IA64_FPTR64LSB:
3479 dyn_r_type = R_IA64_FPTR64MSB;
3481 case R_IA64_TPREL64LSB:
3482 dyn_r_type = R_IA64_TPREL64MSB;
3484 case R_IA64_DTPMOD64LSB:
3485 dyn_r_type = R_IA64_DTPMOD64MSB;
3487 case R_IA64_DTPREL64LSB:
3488 dyn_r_type = R_IA64_DTPREL64MSB;
3496 elfNN_ia64_install_dyn_reloc (abfd, NULL, got_sec,
3497 ia64_info->rel_got_sec,
3498 got_offset, dyn_r_type,
3503 /* Return the address of the linkage table entry. */
3504 value = (got_sec->output_section->vma
3505 + got_sec->output_offset
3511 /* Fill in a function descriptor consisting of the function's code
3512 address and its global pointer. Return the descriptor's address. */
3515 set_fptr_entry (abfd, info, dyn_i, value)
3517 struct bfd_link_info *info;
3518 struct elfNN_ia64_dyn_sym_info *dyn_i;
3521 struct elfNN_ia64_link_hash_table *ia64_info;
3524 ia64_info = elfNN_ia64_hash_table (info);
3525 fptr_sec = ia64_info->fptr_sec;
3527 if (!dyn_i->fptr_done)
3529 dyn_i->fptr_done = 1;
3531 /* Fill in the function descriptor. */
3532 bfd_put_64 (abfd, value, fptr_sec->contents + dyn_i->fptr_offset);
3533 bfd_put_64 (abfd, _bfd_get_gp_value (abfd),
3534 fptr_sec->contents + dyn_i->fptr_offset + 8);
3535 if (ia64_info->rel_fptr_sec)
3537 Elf_Internal_Rela outrel;
3540 if (bfd_little_endian (abfd))
3541 outrel.r_info = ELFNN_R_INFO (0, R_IA64_IPLTLSB);
3543 outrel.r_info = ELFNN_R_INFO (0, R_IA64_IPLTMSB);
3544 outrel.r_addend = value;
3545 outrel.r_offset = (fptr_sec->output_section->vma
3546 + fptr_sec->output_offset
3547 + dyn_i->fptr_offset);
3548 loc = ia64_info->rel_fptr_sec->contents;
3549 loc += ia64_info->rel_fptr_sec->reloc_count++
3550 * sizeof (ElfNN_External_Rela);
3551 bfd_elfNN_swap_reloca_out (abfd, &outrel, loc);
3555 /* Return the descriptor's address. */
3556 value = (fptr_sec->output_section->vma
3557 + fptr_sec->output_offset
3558 + dyn_i->fptr_offset);
3563 /* Fill in a PLTOFF entry consisting of the function's code address
3564 and its global pointer. Return the descriptor's address. */
3567 set_pltoff_entry (abfd, info, dyn_i, value, is_plt)
3569 struct bfd_link_info *info;
3570 struct elfNN_ia64_dyn_sym_info *dyn_i;
3574 struct elfNN_ia64_link_hash_table *ia64_info;
3575 asection *pltoff_sec;
3577 ia64_info = elfNN_ia64_hash_table (info);
3578 pltoff_sec = ia64_info->pltoff_sec;
3580 /* Don't do anything if this symbol uses a real PLT entry. In
3581 that case, we'll fill this in during finish_dynamic_symbol. */
3582 if ((! dyn_i->want_plt || is_plt)
3583 && !dyn_i->pltoff_done)
3585 bfd_vma gp = _bfd_get_gp_value (abfd);
3587 /* Fill in the function descriptor. */
3588 bfd_put_64 (abfd, value, pltoff_sec->contents + dyn_i->pltoff_offset);
3589 bfd_put_64 (abfd, gp, pltoff_sec->contents + dyn_i->pltoff_offset + 8);
3591 /* Install dynamic relocations if needed. */
3595 || ELF_ST_VISIBILITY (dyn_i->h->other) == STV_DEFAULT
3596 || dyn_i->h->root.type != bfd_link_hash_undefweak))
3598 unsigned int dyn_r_type;
3600 if (bfd_big_endian (abfd))
3601 dyn_r_type = R_IA64_REL64MSB;
3603 dyn_r_type = R_IA64_REL64LSB;
3605 elfNN_ia64_install_dyn_reloc (abfd, NULL, pltoff_sec,
3606 ia64_info->rel_pltoff_sec,
3607 dyn_i->pltoff_offset,
3608 dyn_r_type, 0, value);
3609 elfNN_ia64_install_dyn_reloc (abfd, NULL, pltoff_sec,
3610 ia64_info->rel_pltoff_sec,
3611 dyn_i->pltoff_offset + 8,
3615 dyn_i->pltoff_done = 1;
3618 /* Return the descriptor's address. */
3619 value = (pltoff_sec->output_section->vma
3620 + pltoff_sec->output_offset
3621 + dyn_i->pltoff_offset);
3626 /* Return the base VMA address which should be subtracted from real addresses
3627 when resolving @tprel() relocation.
3628 Main program TLS (whose template starts at PT_TLS p_vaddr)
3629 is assigned offset round(16, PT_TLS p_align). */
3632 elfNN_ia64_tprel_base (info)
3633 struct bfd_link_info *info;
3635 asection *tls_sec = elf_hash_table (info)->tls_sec;
3637 BFD_ASSERT (tls_sec != NULL);
3638 return tls_sec->vma - align_power ((bfd_vma) 16, tls_sec->alignment_power);
3641 /* Return the base VMA address which should be subtracted from real addresses
3642 when resolving @dtprel() relocation.
3643 This is PT_TLS segment p_vaddr. */
3646 elfNN_ia64_dtprel_base (info)
3647 struct bfd_link_info *info;
3649 BFD_ASSERT (elf_hash_table (info)->tls_sec != NULL);
3650 return elf_hash_table (info)->tls_sec->vma;
3653 /* Called through qsort to sort the .IA_64.unwind section during a
3654 non-relocatable link. Set elfNN_ia64_unwind_entry_compare_bfd
3655 to the output bfd so we can do proper endianness frobbing. */
3657 static bfd *elfNN_ia64_unwind_entry_compare_bfd;
3660 elfNN_ia64_unwind_entry_compare (a, b)
3666 av = bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd, a);
3667 bv = bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd, b);
3669 return (av < bv ? -1 : av > bv ? 1 : 0);
3672 /* Make sure we've got ourselves a nice fat __gp value. */
3674 elfNN_ia64_choose_gp (abfd, info)
3676 struct bfd_link_info *info;
3678 bfd_vma min_vma = (bfd_vma) -1, max_vma = 0;
3679 bfd_vma min_short_vma = min_vma, max_short_vma = 0;
3680 struct elf_link_hash_entry *gp;
3683 struct elfNN_ia64_link_hash_table *ia64_info;
3685 ia64_info = elfNN_ia64_hash_table (info);
3687 /* Find the min and max vma of all sections marked short. Also collect
3688 min and max vma of any type, for use in selecting a nice gp. */
3689 for (os = abfd->sections; os ; os = os->next)
3693 if ((os->flags & SEC_ALLOC) == 0)
3697 hi = os->vma + os->_raw_size;
3705 if (os->flags & SEC_SMALL_DATA)
3707 if (min_short_vma > lo)
3709 if (max_short_vma < hi)
3714 /* See if the user wants to force a value. */
3715 gp = elf_link_hash_lookup (elf_hash_table (info), "__gp", FALSE,
3719 && (gp->root.type == bfd_link_hash_defined
3720 || gp->root.type == bfd_link_hash_defweak))
3722 asection *gp_sec = gp->root.u.def.section;
3723 gp_val = (gp->root.u.def.value
3724 + gp_sec->output_section->vma
3725 + gp_sec->output_offset);
3729 /* Pick a sensible value. */
3731 asection *got_sec = ia64_info->got_sec;
3733 /* Start with just the address of the .got. */
3735 gp_val = got_sec->output_section->vma;
3736 else if (max_short_vma != 0)
3737 gp_val = min_short_vma;
3741 /* If it is possible to address the entire image, but we
3742 don't with the choice above, adjust. */
3743 if (max_vma - min_vma < 0x400000
3744 && max_vma - gp_val <= 0x200000
3745 && gp_val - min_vma > 0x200000)
3746 gp_val = min_vma + 0x200000;
3747 else if (max_short_vma != 0)
3749 /* If we don't cover all the short data, adjust. */
3750 if (max_short_vma - gp_val >= 0x200000)
3751 gp_val = min_short_vma + 0x200000;
3753 /* If we're addressing stuff past the end, adjust back. */
3754 if (gp_val > max_vma)
3755 gp_val = max_vma - 0x200000 + 8;
3759 /* Validate whether all SHF_IA_64_SHORT sections are within
3760 range of the chosen GP. */
3762 if (max_short_vma != 0)
3764 if (max_short_vma - min_short_vma >= 0x400000)
3766 (*_bfd_error_handler)
3767 (_("%s: short data segment overflowed (0x%lx >= 0x400000)"),
3768 bfd_get_filename (abfd),
3769 (unsigned long) (max_short_vma - min_short_vma));
3772 else if ((gp_val > min_short_vma
3773 && gp_val - min_short_vma > 0x200000)
3774 || (gp_val < max_short_vma
3775 && max_short_vma - gp_val >= 0x200000))
3777 (*_bfd_error_handler)
3778 (_("%s: __gp does not cover short data segment"),
3779 bfd_get_filename (abfd));
3784 _bfd_set_gp_value (abfd, gp_val);
3790 elfNN_ia64_final_link (abfd, info)
3792 struct bfd_link_info *info;
3794 struct elfNN_ia64_link_hash_table *ia64_info;
3795 asection *unwind_output_sec;
3797 ia64_info = elfNN_ia64_hash_table (info);
3799 /* Make sure we've got ourselves a nice fat __gp value. */
3800 if (!info->relocatable)
3802 bfd_vma gp_val = _bfd_get_gp_value (abfd);
3803 struct elf_link_hash_entry *gp;
3807 if (! elfNN_ia64_choose_gp (abfd, info))
3809 gp_val = _bfd_get_gp_value (abfd);
3812 gp = elf_link_hash_lookup (elf_hash_table (info), "__gp", FALSE,
3816 gp->root.type = bfd_link_hash_defined;
3817 gp->root.u.def.value = gp_val;
3818 gp->root.u.def.section = bfd_abs_section_ptr;
3822 /* If we're producing a final executable, we need to sort the contents
3823 of the .IA_64.unwind section. Force this section to be relocated
3824 into memory rather than written immediately to the output file. */
3825 unwind_output_sec = NULL;
3826 if (!info->relocatable)
3828 asection *s = bfd_get_section_by_name (abfd, ELF_STRING_ia64_unwind);
3831 unwind_output_sec = s->output_section;
3832 unwind_output_sec->contents
3833 = bfd_malloc (unwind_output_sec->_raw_size);
3834 if (unwind_output_sec->contents == NULL)
3839 /* Invoke the regular ELF backend linker to do all the work. */
3840 if (!bfd_elfNN_bfd_final_link (abfd, info))
3843 if (unwind_output_sec)
3845 elfNN_ia64_unwind_entry_compare_bfd = abfd;
3846 qsort (unwind_output_sec->contents,
3847 (size_t) (unwind_output_sec->_raw_size / 24),
3849 elfNN_ia64_unwind_entry_compare);
3851 if (! bfd_set_section_contents (abfd, unwind_output_sec,
3852 unwind_output_sec->contents, (bfd_vma) 0,
3853 unwind_output_sec->_raw_size))
3861 elfNN_ia64_relocate_section (output_bfd, info, input_bfd, input_section,
3862 contents, relocs, local_syms, local_sections)
3864 struct bfd_link_info *info;
3866 asection *input_section;
3868 Elf_Internal_Rela *relocs;
3869 Elf_Internal_Sym *local_syms;
3870 asection **local_sections;
3872 struct elfNN_ia64_link_hash_table *ia64_info;
3873 Elf_Internal_Shdr *symtab_hdr;
3874 Elf_Internal_Rela *rel;
3875 Elf_Internal_Rela *relend;
3877 bfd_boolean ret_val = TRUE; /* for non-fatal errors */
3880 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
3881 ia64_info = elfNN_ia64_hash_table (info);
3883 /* Infect various flags from the input section to the output section. */
3884 if (info->relocatable)
3888 flags = elf_section_data(input_section)->this_hdr.sh_flags;
3889 flags &= SHF_IA_64_NORECOV;
3891 elf_section_data(input_section->output_section)
3892 ->this_hdr.sh_flags |= flags;
3896 gp_val = _bfd_get_gp_value (output_bfd);
3897 srel = get_reloc_section (input_bfd, ia64_info, input_section, FALSE);
3900 relend = relocs + input_section->reloc_count;
3901 for (; rel < relend; ++rel)
3903 struct elf_link_hash_entry *h;
3904 struct elfNN_ia64_dyn_sym_info *dyn_i;
3905 bfd_reloc_status_type r;
3906 reloc_howto_type *howto;
3907 unsigned long r_symndx;
3908 Elf_Internal_Sym *sym;
3909 unsigned int r_type;
3913 bfd_boolean dynamic_symbol_p;
3914 bfd_boolean undef_weak_ref;
3916 r_type = ELFNN_R_TYPE (rel->r_info);
3917 if (r_type > R_IA64_MAX_RELOC_CODE)
3919 (*_bfd_error_handler)
3920 (_("%s: unknown relocation type %d"),
3921 bfd_archive_filename (input_bfd), (int)r_type);
3922 bfd_set_error (bfd_error_bad_value);
3927 howto = lookup_howto (r_type);
3928 r_symndx = ELFNN_R_SYM (rel->r_info);
3932 undef_weak_ref = FALSE;
3934 if (r_symndx < symtab_hdr->sh_info)
3936 /* Reloc against local symbol. */
3938 sym = local_syms + r_symndx;
3939 sym_sec = local_sections[r_symndx];
3941 value = _bfd_elf_rela_local_sym (output_bfd, sym, &msec, rel);
3942 if ((sym_sec->flags & SEC_MERGE)
3943 && ELF_ST_TYPE (sym->st_info) == STT_SECTION
3944 && sym_sec->sec_info_type == ELF_INFO_TYPE_MERGE)
3946 struct elfNN_ia64_local_hash_entry *loc_h;
3948 loc_h = get_local_sym_hash (ia64_info, input_bfd, rel, FALSE);
3949 if (loc_h && ! loc_h->sec_merge_done)
3951 struct elfNN_ia64_dyn_sym_info *dynent;
3953 for (dynent = loc_h->info; dynent; dynent = dynent->next)
3957 _bfd_merged_section_offset (output_bfd, &msec,
3958 elf_section_data (msec)->
3963 dynent->addend -= sym->st_value;
3964 dynent->addend += msec->output_section->vma
3965 + msec->output_offset
3966 - sym_sec->output_section->vma
3967 - sym_sec->output_offset;
3969 loc_h->sec_merge_done = 1;
3975 bfd_boolean unresolved_reloc;
3978 RELOC_FOR_GLOBAL_SYMBOL (h, elf_sym_hashes (input_bfd),
3980 symtab_hdr, value, sym_sec,
3981 unresolved_reloc, info,
3984 if (h->root.type == bfd_link_hash_undefweak)
3985 undef_weak_ref = TRUE;
3990 hit_addr = contents + rel->r_offset;
3991 value += rel->r_addend;
3992 dynamic_symbol_p = elfNN_ia64_dynamic_symbol_p (h, info, r_type);
4003 case R_IA64_DIR32MSB:
4004 case R_IA64_DIR32LSB:
4005 case R_IA64_DIR64MSB:
4006 case R_IA64_DIR64LSB:
4007 /* Install a dynamic relocation for this reloc. */
4008 if ((dynamic_symbol_p || info->shared)
4010 && (input_section->flags & SEC_ALLOC) != 0)
4012 unsigned int dyn_r_type;
4016 BFD_ASSERT (srel != NULL);
4023 /* ??? People shouldn't be doing non-pic code in
4024 shared libraries nor dynamic executables. */
4025 (*_bfd_error_handler)
4026 (_("%s: non-pic code with imm relocation against dynamic symbol `%s'"),
4027 bfd_archive_filename (input_bfd),
4028 h->root.root.string);
4036 /* If we don't need dynamic symbol lookup, find a
4037 matching RELATIVE relocation. */
4038 dyn_r_type = r_type;
4039 if (dynamic_symbol_p)
4041 dynindx = h->dynindx;
4042 addend = rel->r_addend;
4049 case R_IA64_DIR32MSB:
4050 dyn_r_type = R_IA64_REL32MSB;
4052 case R_IA64_DIR32LSB:
4053 dyn_r_type = R_IA64_REL32LSB;
4055 case R_IA64_DIR64MSB:
4056 dyn_r_type = R_IA64_REL64MSB;
4058 case R_IA64_DIR64LSB:
4059 dyn_r_type = R_IA64_REL64LSB;
4069 elfNN_ia64_install_dyn_reloc (output_bfd, info, input_section,
4070 srel, rel->r_offset, dyn_r_type,
4075 case R_IA64_LTV32MSB:
4076 case R_IA64_LTV32LSB:
4077 case R_IA64_LTV64MSB:
4078 case R_IA64_LTV64LSB:
4079 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4082 case R_IA64_GPREL22:
4083 case R_IA64_GPREL64I:
4084 case R_IA64_GPREL32MSB:
4085 case R_IA64_GPREL32LSB:
4086 case R_IA64_GPREL64MSB:
4087 case R_IA64_GPREL64LSB:
4088 if (dynamic_symbol_p)
4090 (*_bfd_error_handler)
4091 (_("%s: @gprel relocation against dynamic symbol %s"),
4092 bfd_archive_filename (input_bfd), h->root.root.string);
4097 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4100 case R_IA64_LTOFF22:
4101 case R_IA64_LTOFF22X:
4102 case R_IA64_LTOFF64I:
4103 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4104 value = set_got_entry (input_bfd, info, dyn_i, (h ? h->dynindx : -1),
4105 rel->r_addend, value, R_IA64_DIR64LSB);
4107 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4110 case R_IA64_PLTOFF22:
4111 case R_IA64_PLTOFF64I:
4112 case R_IA64_PLTOFF64MSB:
4113 case R_IA64_PLTOFF64LSB:
4114 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4115 value = set_pltoff_entry (output_bfd, info, dyn_i, value, FALSE);
4117 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4120 case R_IA64_FPTR64I:
4121 case R_IA64_FPTR32MSB:
4122 case R_IA64_FPTR32LSB:
4123 case R_IA64_FPTR64MSB:
4124 case R_IA64_FPTR64LSB:
4125 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4126 if (dyn_i->want_fptr)
4128 if (!undef_weak_ref)
4129 value = set_fptr_entry (output_bfd, info, dyn_i, value);
4131 if (!dyn_i->want_fptr || info->pie)
4134 unsigned int dyn_r_type = r_type;
4135 bfd_vma addend = rel->r_addend;
4137 /* Otherwise, we expect the dynamic linker to create
4140 if (dyn_i->want_fptr)
4142 if (r_type == R_IA64_FPTR64I)
4144 /* We can't represent this without a dynamic symbol.
4145 Adjust the relocation to be against an output
4146 section symbol, which are always present in the
4147 dynamic symbol table. */
4148 /* ??? People shouldn't be doing non-pic code in
4149 shared libraries. Hork. */
4150 (*_bfd_error_handler)
4151 (_("%s: linking non-pic code in a position independent executable"),
4152 bfd_archive_filename (input_bfd));
4158 dyn_r_type = r_type + R_IA64_REL64LSB - R_IA64_FPTR64LSB;
4162 if (h->dynindx != -1)
4163 dynindx = h->dynindx;
4165 dynindx = (_bfd_elf_link_lookup_local_dynindx
4166 (info, h->root.u.def.section->owner,
4167 global_sym_index (h)));
4172 dynindx = (_bfd_elf_link_lookup_local_dynindx
4173 (info, input_bfd, (long) r_symndx));
4177 elfNN_ia64_install_dyn_reloc (output_bfd, info, input_section,
4178 srel, rel->r_offset, dyn_r_type,
4182 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4185 case R_IA64_LTOFF_FPTR22:
4186 case R_IA64_LTOFF_FPTR64I:
4187 case R_IA64_LTOFF_FPTR32MSB:
4188 case R_IA64_LTOFF_FPTR32LSB:
4189 case R_IA64_LTOFF_FPTR64MSB:
4190 case R_IA64_LTOFF_FPTR64LSB:
4194 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4195 if (dyn_i->want_fptr)
4197 BFD_ASSERT (h == NULL || h->dynindx == -1)
4198 if (!undef_weak_ref)
4199 value = set_fptr_entry (output_bfd, info, dyn_i, value);
4204 /* Otherwise, we expect the dynamic linker to create
4208 if (h->dynindx != -1)
4209 dynindx = h->dynindx;
4211 dynindx = (_bfd_elf_link_lookup_local_dynindx
4212 (info, h->root.u.def.section->owner,
4213 global_sym_index (h)));
4216 dynindx = (_bfd_elf_link_lookup_local_dynindx
4217 (info, input_bfd, (long) r_symndx));
4221 value = set_got_entry (output_bfd, info, dyn_i, dynindx,
4222 rel->r_addend, value, R_IA64_FPTR64LSB);
4224 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4228 case R_IA64_PCREL32MSB:
4229 case R_IA64_PCREL32LSB:
4230 case R_IA64_PCREL64MSB:
4231 case R_IA64_PCREL64LSB:
4232 /* Install a dynamic relocation for this reloc. */
4233 if (dynamic_symbol_p && r_symndx != 0)
4235 BFD_ASSERT (srel != NULL);
4237 elfNN_ia64_install_dyn_reloc (output_bfd, info, input_section,
4238 srel, rel->r_offset, r_type,
4239 h->dynindx, rel->r_addend);
4243 case R_IA64_PCREL21B:
4244 case R_IA64_PCREL60B:
4245 /* We should have created a PLT entry for any dynamic symbol. */
4248 dyn_i = get_dyn_sym_info (ia64_info, h, NULL, NULL, FALSE);
4250 if (dyn_i && dyn_i->want_plt2)
4252 /* Should have caught this earlier. */
4253 BFD_ASSERT (rel->r_addend == 0);
4255 value = (ia64_info->plt_sec->output_section->vma
4256 + ia64_info->plt_sec->output_offset
4257 + dyn_i->plt2_offset);
4261 /* Since there's no PLT entry, Validate that this is
4263 BFD_ASSERT (undef_weak_ref || sym_sec->output_section != NULL);
4265 /* If the symbol is undef_weak, we shouldn't be trying
4266 to call it. There's every chance that we'd wind up
4267 with an out-of-range fixup here. Don't bother setting
4268 any value at all. */
4274 case R_IA64_PCREL21BI:
4275 case R_IA64_PCREL21F:
4276 case R_IA64_PCREL21M:
4277 case R_IA64_PCREL22:
4278 case R_IA64_PCREL64I:
4279 /* The PCREL21BI reloc is specifically not intended for use with
4280 dynamic relocs. PCREL21F and PCREL21M are used for speculation
4281 fixup code, and thus probably ought not be dynamic. The
4282 PCREL22 and PCREL64I relocs aren't emitted as dynamic relocs. */
4283 if (dynamic_symbol_p)
4287 if (r_type == R_IA64_PCREL21BI)
4288 msg = _("%s: @internal branch to dynamic symbol %s");
4289 else if (r_type == R_IA64_PCREL21F || r_type == R_IA64_PCREL21M)
4290 msg = _("%s: speculation fixup to dynamic symbol %s");
4292 msg = _("%s: @pcrel relocation against dynamic symbol %s");
4293 (*_bfd_error_handler) (msg, bfd_archive_filename (input_bfd),
4294 h->root.root.string);
4301 /* Make pc-relative. */
4302 value -= (input_section->output_section->vma
4303 + input_section->output_offset
4304 + rel->r_offset) & ~ (bfd_vma) 0x3;
4305 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4308 case R_IA64_SEGREL32MSB:
4309 case R_IA64_SEGREL32LSB:
4310 case R_IA64_SEGREL64MSB:
4311 case R_IA64_SEGREL64LSB:
4314 /* If the input section was discarded from the output, then
4320 struct elf_segment_map *m;
4321 Elf_Internal_Phdr *p;
4323 /* Find the segment that contains the output_section. */
4324 for (m = elf_tdata (output_bfd)->segment_map,
4325 p = elf_tdata (output_bfd)->phdr;
4330 for (i = m->count - 1; i >= 0; i--)
4331 if (m->sections[i] == input_section->output_section)
4339 r = bfd_reloc_notsupported;
4343 /* The VMA of the segment is the vaddr of the associated
4345 if (value > p->p_vaddr)
4346 value -= p->p_vaddr;
4349 r = elfNN_ia64_install_value (output_bfd, hit_addr, value,
4355 case R_IA64_SECREL32MSB:
4356 case R_IA64_SECREL32LSB:
4357 case R_IA64_SECREL64MSB:
4358 case R_IA64_SECREL64LSB:
4359 /* Make output-section relative. */
4360 if (value > input_section->output_section->vma)
4361 value -= input_section->output_section->vma;
4364 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4367 case R_IA64_IPLTMSB:
4368 case R_IA64_IPLTLSB:
4369 /* Install a dynamic relocation for this reloc. */
4370 if ((dynamic_symbol_p || info->shared)
4371 && (input_section->flags & SEC_ALLOC) != 0)
4373 BFD_ASSERT (srel != NULL);
4375 /* If we don't need dynamic symbol lookup, install two
4376 RELATIVE relocations. */
4377 if (!dynamic_symbol_p)
4379 unsigned int dyn_r_type;
4381 if (r_type == R_IA64_IPLTMSB)
4382 dyn_r_type = R_IA64_REL64MSB;
4384 dyn_r_type = R_IA64_REL64LSB;
4386 elfNN_ia64_install_dyn_reloc (output_bfd, info,
4388 srel, rel->r_offset,
4389 dyn_r_type, 0, value);
4390 elfNN_ia64_install_dyn_reloc (output_bfd, info,
4392 srel, rel->r_offset + 8,
4393 dyn_r_type, 0, gp_val);
4396 elfNN_ia64_install_dyn_reloc (output_bfd, info, input_section,
4397 srel, rel->r_offset, r_type,
4398 h->dynindx, rel->r_addend);
4401 if (r_type == R_IA64_IPLTMSB)
4402 r_type = R_IA64_DIR64MSB;
4404 r_type = R_IA64_DIR64LSB;
4405 elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4406 r = elfNN_ia64_install_value (output_bfd, hit_addr + 8, gp_val,
4410 case R_IA64_TPREL14:
4411 case R_IA64_TPREL22:
4412 case R_IA64_TPREL64I:
4413 value -= elfNN_ia64_tprel_base (info);
4414 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4417 case R_IA64_DTPREL14:
4418 case R_IA64_DTPREL22:
4419 case R_IA64_DTPREL64I:
4420 case R_IA64_DTPREL64LSB:
4421 case R_IA64_DTPREL64MSB:
4422 value -= elfNN_ia64_dtprel_base (info);
4423 r = elfNN_ia64_install_value (output_bfd, hit_addr, value, r_type);
4426 case R_IA64_LTOFF_TPREL22:
4427 case R_IA64_LTOFF_DTPMOD22:
4428 case R_IA64_LTOFF_DTPREL22:
4431 long dynindx = h ? h->dynindx : -1;
4432 bfd_vma r_addend = rel->r_addend;
4437 case R_IA64_LTOFF_TPREL22:
4438 if (!dynamic_symbol_p)
4441 value -= elfNN_ia64_tprel_base (info);
4444 r_addend += value - elfNN_ia64_dtprel_base (info);
4448 got_r_type = R_IA64_TPREL64LSB;
4450 case R_IA64_LTOFF_DTPMOD22:
4451 if (!dynamic_symbol_p && !info->shared)
4453 got_r_type = R_IA64_DTPMOD64LSB;
4455 case R_IA64_LTOFF_DTPREL22:
4456 if (!dynamic_symbol_p)
4457 value -= elfNN_ia64_dtprel_base (info);
4458 got_r_type = R_IA64_DTPREL64LSB;
4461 dyn_i = get_dyn_sym_info (ia64_info, h, input_bfd, rel, FALSE);
4462 value = set_got_entry (input_bfd, info, dyn_i, dynindx, r_addend,
4465 r = elfNN_ia64_install_value (output_bfd, hit_addr, value,
4471 r = bfd_reloc_notsupported;
4480 case bfd_reloc_undefined:
4481 /* This can happen for global table relative relocs if
4482 __gp is undefined. This is a panic situation so we
4483 don't try to continue. */
4484 (*info->callbacks->undefined_symbol)
4485 (info, "__gp", input_bfd, input_section, rel->r_offset, 1);
4488 case bfd_reloc_notsupported:
4493 name = h->root.root.string;
4496 name = bfd_elf_string_from_elf_section (input_bfd,
4497 symtab_hdr->sh_link,
4502 name = bfd_section_name (input_bfd, input_section);
4504 if (!(*info->callbacks->warning) (info, _("unsupported reloc"),
4506 input_section, rel->r_offset))
4512 case bfd_reloc_dangerous:
4513 case bfd_reloc_outofrange:
4514 case bfd_reloc_overflow:
4520 name = h->root.root.string;
4523 name = bfd_elf_string_from_elf_section (input_bfd,
4524 symtab_hdr->sh_link,
4529 name = bfd_section_name (input_bfd, input_section);
4531 if (!(*info->callbacks->reloc_overflow) (info, name,
4548 elfNN_ia64_finish_dynamic_symbol (output_bfd, info, h, sym)
4550 struct bfd_link_info *info;
4551 struct elf_link_hash_entry *h;
4552 Elf_Internal_Sym *sym;
4554 struct elfNN_ia64_link_hash_table *ia64_info;
4555 struct elfNN_ia64_dyn_sym_info *dyn_i;
4557 ia64_info = elfNN_ia64_hash_table (info);
4558 dyn_i = get_dyn_sym_info (ia64_info, h, NULL, NULL, FALSE);
4560 /* Fill in the PLT data, if required. */
4561 if (dyn_i && dyn_i->want_plt)
4563 Elf_Internal_Rela outrel;
4566 bfd_vma plt_addr, pltoff_addr, gp_val, index;
4568 gp_val = _bfd_get_gp_value (output_bfd);
4570 /* Initialize the minimal PLT entry. */
4572 index = (dyn_i->plt_offset - PLT_HEADER_SIZE) / PLT_MIN_ENTRY_SIZE;
4573 plt_sec = ia64_info->plt_sec;
4574 loc = plt_sec->contents + dyn_i->plt_offset;
4576 memcpy (loc, plt_min_entry, PLT_MIN_ENTRY_SIZE);
4577 elfNN_ia64_install_value (output_bfd, loc, index, R_IA64_IMM22);
4578 elfNN_ia64_install_value (output_bfd, loc+2, -dyn_i->plt_offset,
4581 plt_addr = (plt_sec->output_section->vma
4582 + plt_sec->output_offset
4583 + dyn_i->plt_offset);
4584 pltoff_addr = set_pltoff_entry (output_bfd, info, dyn_i, plt_addr, TRUE);
4586 /* Initialize the FULL PLT entry, if needed. */
4587 if (dyn_i->want_plt2)
4589 loc = plt_sec->contents + dyn_i->plt2_offset;
4591 memcpy (loc, plt_full_entry, PLT_FULL_ENTRY_SIZE);
4592 elfNN_ia64_install_value (output_bfd, loc, pltoff_addr - gp_val,
4595 /* Mark the symbol as undefined, rather than as defined in the
4596 plt section. Leave the value alone. */
4597 /* ??? We didn't redefine it in adjust_dynamic_symbol in the
4598 first place. But perhaps elflink.h did some for us. */
4599 if ((h->elf_link_hash_flags & ELF_LINK_HASH_DEF_REGULAR) == 0)
4600 sym->st_shndx = SHN_UNDEF;
4603 /* Create the dynamic relocation. */
4604 outrel.r_offset = pltoff_addr;
4605 if (bfd_little_endian (output_bfd))
4606 outrel.r_info = ELFNN_R_INFO (h->dynindx, R_IA64_IPLTLSB);
4608 outrel.r_info = ELFNN_R_INFO (h->dynindx, R_IA64_IPLTMSB);
4609 outrel.r_addend = 0;
4611 /* This is fun. In the .IA_64.pltoff section, we've got entries
4612 that correspond both to real PLT entries, and those that
4613 happened to resolve to local symbols but need to be created
4614 to satisfy @pltoff relocations. The .rela.IA_64.pltoff
4615 relocations for the real PLT should come at the end of the
4616 section, so that they can be indexed by plt entry at runtime.
4618 We emitted all of the relocations for the non-PLT @pltoff
4619 entries during relocate_section. So we can consider the
4620 existing sec->reloc_count to be the base of the array of
4623 loc = ia64_info->rel_pltoff_sec->contents;
4624 loc += ((ia64_info->rel_pltoff_sec->reloc_count + index)
4625 * sizeof (ElfNN_External_Rela));
4626 bfd_elfNN_swap_reloca_out (output_bfd, &outrel, loc);
4629 /* Mark some specially defined symbols as absolute. */
4630 if (strcmp (h->root.root.string, "_DYNAMIC") == 0
4631 || strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0
4632 || strcmp (h->root.root.string, "_PROCEDURE_LINKAGE_TABLE_") == 0)
4633 sym->st_shndx = SHN_ABS;
4639 elfNN_ia64_finish_dynamic_sections (abfd, info)
4641 struct bfd_link_info *info;
4643 struct elfNN_ia64_link_hash_table *ia64_info;
4646 ia64_info = elfNN_ia64_hash_table (info);
4647 dynobj = ia64_info->root.dynobj;
4649 if (elf_hash_table (info)->dynamic_sections_created)
4651 ElfNN_External_Dyn *dyncon, *dynconend;
4652 asection *sdyn, *sgotplt;
4655 sdyn = bfd_get_section_by_name (dynobj, ".dynamic");
4656 sgotplt = bfd_get_section_by_name (dynobj, ".got.plt");
4657 BFD_ASSERT (sdyn != NULL);
4658 dyncon = (ElfNN_External_Dyn *) sdyn->contents;
4659 dynconend = (ElfNN_External_Dyn *) (sdyn->contents + sdyn->_raw_size);
4661 gp_val = _bfd_get_gp_value (abfd);
4663 for (; dyncon < dynconend; dyncon++)
4665 Elf_Internal_Dyn dyn;
4667 bfd_elfNN_swap_dyn_in (dynobj, dyncon, &dyn);
4672 dyn.d_un.d_ptr = gp_val;
4676 dyn.d_un.d_val = (ia64_info->minplt_entries
4677 * sizeof (ElfNN_External_Rela));
4681 /* See the comment above in finish_dynamic_symbol. */
4682 dyn.d_un.d_ptr = (ia64_info->rel_pltoff_sec->output_section->vma
4683 + ia64_info->rel_pltoff_sec->output_offset
4684 + (ia64_info->rel_pltoff_sec->reloc_count
4685 * sizeof (ElfNN_External_Rela)));
4688 case DT_IA_64_PLT_RESERVE:
4689 dyn.d_un.d_ptr = (sgotplt->output_section->vma
4690 + sgotplt->output_offset);
4694 /* Do not have RELASZ include JMPREL. This makes things
4695 easier on ld.so. This is not what the rest of BFD set up. */
4696 dyn.d_un.d_val -= (ia64_info->minplt_entries
4697 * sizeof (ElfNN_External_Rela));
4701 bfd_elfNN_swap_dyn_out (abfd, &dyn, dyncon);
4704 /* Initialize the PLT0 entry. */
4705 if (ia64_info->plt_sec)
4707 bfd_byte *loc = ia64_info->plt_sec->contents;
4710 memcpy (loc, plt_header, PLT_HEADER_SIZE);
4712 pltres = (sgotplt->output_section->vma
4713 + sgotplt->output_offset
4716 elfNN_ia64_install_value (abfd, loc+1, pltres, R_IA64_GPREL22);
4723 /* ELF file flag handling: */
4725 /* Function to keep IA-64 specific file flags. */
4727 elfNN_ia64_set_private_flags (abfd, flags)
4731 BFD_ASSERT (!elf_flags_init (abfd)
4732 || elf_elfheader (abfd)->e_flags == flags);
4734 elf_elfheader (abfd)->e_flags = flags;
4735 elf_flags_init (abfd) = TRUE;
4739 /* Merge backend specific data from an object file to the output
4740 object file when linking. */
4742 elfNN_ia64_merge_private_bfd_data (ibfd, obfd)
4747 bfd_boolean ok = TRUE;
4749 /* Don't even pretend to support mixed-format linking. */
4750 if (bfd_get_flavour (ibfd) != bfd_target_elf_flavour
4751 || bfd_get_flavour (obfd) != bfd_target_elf_flavour)
4754 in_flags = elf_elfheader (ibfd)->e_flags;
4755 out_flags = elf_elfheader (obfd)->e_flags;
4757 if (! elf_flags_init (obfd))
4759 elf_flags_init (obfd) = TRUE;
4760 elf_elfheader (obfd)->e_flags = in_flags;
4762 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
4763 && bfd_get_arch_info (obfd)->the_default)
4765 return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd),
4766 bfd_get_mach (ibfd));
4772 /* Check flag compatibility. */
4773 if (in_flags == out_flags)
4776 /* Output has EF_IA_64_REDUCEDFP set only if all inputs have it set. */
4777 if (!(in_flags & EF_IA_64_REDUCEDFP) && (out_flags & EF_IA_64_REDUCEDFP))
4778 elf_elfheader (obfd)->e_flags &= ~EF_IA_64_REDUCEDFP;
4780 if ((in_flags & EF_IA_64_TRAPNIL) != (out_flags & EF_IA_64_TRAPNIL))
4782 (*_bfd_error_handler)
4783 (_("%s: linking trap-on-NULL-dereference with non-trapping files"),
4784 bfd_archive_filename (ibfd));
4786 bfd_set_error (bfd_error_bad_value);
4789 if ((in_flags & EF_IA_64_BE) != (out_flags & EF_IA_64_BE))
4791 (*_bfd_error_handler)
4792 (_("%s: linking big-endian files with little-endian files"),
4793 bfd_archive_filename (ibfd));
4795 bfd_set_error (bfd_error_bad_value);
4798 if ((in_flags & EF_IA_64_ABI64) != (out_flags & EF_IA_64_ABI64))
4800 (*_bfd_error_handler)
4801 (_("%s: linking 64-bit files with 32-bit files"),
4802 bfd_archive_filename (ibfd));
4804 bfd_set_error (bfd_error_bad_value);
4807 if ((in_flags & EF_IA_64_CONS_GP) != (out_flags & EF_IA_64_CONS_GP))
4809 (*_bfd_error_handler)
4810 (_("%s: linking constant-gp files with non-constant-gp files"),
4811 bfd_archive_filename (ibfd));
4813 bfd_set_error (bfd_error_bad_value);
4816 if ((in_flags & EF_IA_64_NOFUNCDESC_CONS_GP)
4817 != (out_flags & EF_IA_64_NOFUNCDESC_CONS_GP))
4819 (*_bfd_error_handler)
4820 (_("%s: linking auto-pic files with non-auto-pic files"),
4821 bfd_archive_filename (ibfd));
4823 bfd_set_error (bfd_error_bad_value);
4831 elfNN_ia64_print_private_bfd_data (abfd, ptr)
4835 FILE *file = (FILE *) ptr;
4836 flagword flags = elf_elfheader (abfd)->e_flags;
4838 BFD_ASSERT (abfd != NULL && ptr != NULL);
4840 fprintf (file, "private flags = %s%s%s%s%s%s%s%s\n",
4841 (flags & EF_IA_64_TRAPNIL) ? "TRAPNIL, " : "",
4842 (flags & EF_IA_64_EXT) ? "EXT, " : "",
4843 (flags & EF_IA_64_BE) ? "BE, " : "LE, ",
4844 (flags & EF_IA_64_REDUCEDFP) ? "REDUCEDFP, " : "",
4845 (flags & EF_IA_64_CONS_GP) ? "CONS_GP, " : "",
4846 (flags & EF_IA_64_NOFUNCDESC_CONS_GP) ? "NOFUNCDESC_CONS_GP, " : "",
4847 (flags & EF_IA_64_ABSOLUTE) ? "ABSOLUTE, " : "",
4848 (flags & EF_IA_64_ABI64) ? "ABI64" : "ABI32");
4850 _bfd_elf_print_private_bfd_data (abfd, ptr);
4854 static enum elf_reloc_type_class
4855 elfNN_ia64_reloc_type_class (rela)
4856 const Elf_Internal_Rela *rela;
4858 switch ((int) ELFNN_R_TYPE (rela->r_info))
4860 case R_IA64_REL32MSB:
4861 case R_IA64_REL32LSB:
4862 case R_IA64_REL64MSB:
4863 case R_IA64_REL64LSB:
4864 return reloc_class_relative;
4865 case R_IA64_IPLTMSB:
4866 case R_IA64_IPLTLSB:
4867 return reloc_class_plt;
4869 return reloc_class_copy;
4871 return reloc_class_normal;
4875 static struct bfd_elf_special_section const elfNN_ia64_special_sections[]=
4877 { ".sbss", 5, -1, SHT_NOBITS, SHF_ALLOC + SHF_WRITE + SHF_IA_64_SHORT },
4878 { ".sdata", 6, -1, SHT_PROGBITS, SHF_ALLOC + SHF_WRITE + SHF_IA_64_SHORT },
4879 { NULL, 0, 0, 0, 0 }
4883 elfNN_ia64_hpux_vec (const bfd_target *vec)
4885 extern const bfd_target bfd_elfNN_ia64_hpux_big_vec;
4886 return (vec == & bfd_elfNN_ia64_hpux_big_vec);
4890 elfNN_hpux_post_process_headers (abfd, info)
4892 struct bfd_link_info *info ATTRIBUTE_UNUSED;
4894 Elf_Internal_Ehdr *i_ehdrp = elf_elfheader (abfd);
4896 i_ehdrp->e_ident[EI_OSABI] = ELFOSABI_HPUX;
4897 i_ehdrp->e_ident[EI_ABIVERSION] = 1;
4901 elfNN_hpux_backend_section_from_bfd_section (abfd, sec, retval)
4902 bfd *abfd ATTRIBUTE_UNUSED;
4906 if (bfd_is_com_section (sec))
4908 *retval = SHN_IA_64_ANSI_COMMON;
4915 elfNN_hpux_backend_symbol_processing (bfd *abfd ATTRIBUTE_UNUSED,
4918 elf_symbol_type *elfsym = (elf_symbol_type *) asym;;
4920 switch (elfsym->internal_elf_sym.st_shndx)
4922 case SHN_IA_64_ANSI_COMMON:
4923 asym->section = bfd_com_section_ptr;
4924 asym->value = elfsym->internal_elf_sym.st_size;
4925 asym->flags &= ~BSF_GLOBAL;
4931 #define TARGET_LITTLE_SYM bfd_elfNN_ia64_little_vec
4932 #define TARGET_LITTLE_NAME "elfNN-ia64-little"
4933 #define TARGET_BIG_SYM bfd_elfNN_ia64_big_vec
4934 #define TARGET_BIG_NAME "elfNN-ia64-big"
4935 #define ELF_ARCH bfd_arch_ia64
4936 #define ELF_MACHINE_CODE EM_IA_64
4937 #define ELF_MACHINE_ALT1 1999 /* EAS2.3 */
4938 #define ELF_MACHINE_ALT2 1998 /* EAS2.2 */
4939 #define ELF_MAXPAGESIZE 0x10000 /* 64KB */
4941 #define elf_backend_section_from_shdr \
4942 elfNN_ia64_section_from_shdr
4943 #define elf_backend_section_flags \
4944 elfNN_ia64_section_flags
4945 #define elf_backend_fake_sections \
4946 elfNN_ia64_fake_sections
4947 #define elf_backend_final_write_processing \
4948 elfNN_ia64_final_write_processing
4949 #define elf_backend_add_symbol_hook \
4950 elfNN_ia64_add_symbol_hook
4951 #define elf_backend_additional_program_headers \
4952 elfNN_ia64_additional_program_headers
4953 #define elf_backend_modify_segment_map \
4954 elfNN_ia64_modify_segment_map
4955 #define elf_info_to_howto \
4956 elfNN_ia64_info_to_howto
4958 #define bfd_elfNN_bfd_reloc_type_lookup \
4959 elfNN_ia64_reloc_type_lookup
4960 #define bfd_elfNN_bfd_is_local_label_name \
4961 elfNN_ia64_is_local_label_name
4962 #define bfd_elfNN_bfd_relax_section \
4963 elfNN_ia64_relax_section
4965 /* Stuff for the BFD linker: */
4966 #define bfd_elfNN_bfd_link_hash_table_create \
4967 elfNN_ia64_hash_table_create
4968 #define bfd_elfNN_bfd_link_hash_table_free \
4969 elfNN_ia64_hash_table_free
4970 #define elf_backend_create_dynamic_sections \
4971 elfNN_ia64_create_dynamic_sections
4972 #define elf_backend_check_relocs \
4973 elfNN_ia64_check_relocs
4974 #define elf_backend_adjust_dynamic_symbol \
4975 elfNN_ia64_adjust_dynamic_symbol
4976 #define elf_backend_size_dynamic_sections \
4977 elfNN_ia64_size_dynamic_sections
4978 #define elf_backend_relocate_section \
4979 elfNN_ia64_relocate_section
4980 #define elf_backend_finish_dynamic_symbol \
4981 elfNN_ia64_finish_dynamic_symbol
4982 #define elf_backend_finish_dynamic_sections \
4983 elfNN_ia64_finish_dynamic_sections
4984 #define bfd_elfNN_bfd_final_link \
4985 elfNN_ia64_final_link
4987 #define bfd_elfNN_bfd_merge_private_bfd_data \
4988 elfNN_ia64_merge_private_bfd_data
4989 #define bfd_elfNN_bfd_set_private_flags \
4990 elfNN_ia64_set_private_flags
4991 #define bfd_elfNN_bfd_print_private_bfd_data \
4992 elfNN_ia64_print_private_bfd_data
4994 #define elf_backend_plt_readonly 1
4995 #define elf_backend_want_plt_sym 0
4996 #define elf_backend_plt_alignment 5
4997 #define elf_backend_got_header_size 0
4998 #define elf_backend_want_got_plt 1
4999 #define elf_backend_may_use_rel_p 1
5000 #define elf_backend_may_use_rela_p 1
5001 #define elf_backend_default_use_rela_p 1
5002 #define elf_backend_want_dynbss 0
5003 #define elf_backend_copy_indirect_symbol elfNN_ia64_hash_copy_indirect
5004 #define elf_backend_hide_symbol elfNN_ia64_hash_hide_symbol
5005 #define elf_backend_reloc_type_class elfNN_ia64_reloc_type_class
5006 #define elf_backend_rela_normal 1
5007 #define elf_backend_special_sections elfNN_ia64_special_sections
5009 #include "elfNN-target.h"
5011 /* HPUX-specific vectors. */
5013 #undef TARGET_LITTLE_SYM
5014 #undef TARGET_LITTLE_NAME
5015 #undef TARGET_BIG_SYM
5016 #define TARGET_BIG_SYM bfd_elfNN_ia64_hpux_big_vec
5017 #undef TARGET_BIG_NAME
5018 #define TARGET_BIG_NAME "elfNN-ia64-hpux-big"
5020 /* These are HP-UX specific functions. */
5022 #undef elf_backend_post_process_headers
5023 #define elf_backend_post_process_headers elfNN_hpux_post_process_headers
5025 #undef elf_backend_section_from_bfd_section
5026 #define elf_backend_section_from_bfd_section elfNN_hpux_backend_section_from_bfd_section
5028 #undef elf_backend_symbol_processing
5029 #define elf_backend_symbol_processing elfNN_hpux_backend_symbol_processing
5031 #undef elf_backend_want_p_paddr_set_to_zero
5032 #define elf_backend_want_p_paddr_set_to_zero 1
5034 #undef ELF_MAXPAGESIZE
5035 #define ELF_MAXPAGESIZE 0x1000 /* 1K */
5038 #define elfNN_bed elfNN_ia64_hpux_bed
5040 #include "elfNN-target.h"
5042 #undef elf_backend_want_p_paddr_set_to_zero