1 /* IA-64 support for 64-bit ELF
2 Copyright 1998, 1999, 2000, 2001, 2002, 2003, 2004
3 Free Software Foundation, Inc.
4 Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
6 This file is part of BFD, the Binary File Descriptor library.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 2 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
26 #include "opcode/ia64.h"
31 /* THE RULES for all the stuff the linker creates --
33 GOT Entries created in response to LTOFF or LTOFF_FPTR
34 relocations. Dynamic relocs created for dynamic
35 symbols in an application; REL relocs for locals
38 FPTR The canonical function descriptor. Created for local
39 symbols in applications. Descriptors for dynamic symbols
40 and local symbols in shared libraries are created by
41 ld.so. Thus there are no dynamic relocs against these
42 objects. The FPTR relocs for such _are_ passed through
43 to the dynamic relocation tables.
45 FULL_PLT Created for a PCREL21B relocation against a dynamic symbol.
46 Requires the creation of a PLTOFF entry. This does not
47 require any dynamic relocations.
49 PLTOFF Created by PLTOFF relocations. For local symbols, this
50 is an alternate function descriptor, and in shared libraries
51 requires two REL relocations. Note that this cannot be
52 transformed into an FPTR relocation, since it must be in
53 range of the GP. For dynamic symbols, this is a function
54 descriptor for a MIN_PLT entry, and requires one IPLT reloc.
56 MIN_PLT Created by PLTOFF entries against dynamic symbols. This
57 does not require dynamic relocations. */
59 #define NELEMS(a) ((int) (sizeof (a) / sizeof ((a)[0])))
61 typedef struct bfd_hash_entry
*(*new_hash_entry_func
)
62 PARAMS ((struct bfd_hash_entry
*, struct bfd_hash_table
*, const char *));
64 /* In dynamically (linker-) created sections, we generally need to keep track
65 of the place a symbol or expression got allocated to. This is done via hash
66 tables that store entries of the following type. */
68 struct elfNN_ia64_dyn_sym_info
70 /* The addend for which this entry is relevant. */
73 /* Next addend in the list. */
74 struct elfNN_ia64_dyn_sym_info
*next
;
78 bfd_vma pltoff_offset
;
82 bfd_vma dtpmod_offset
;
83 bfd_vma dtprel_offset
;
85 /* The symbol table entry, if any, that this was derived from. */
86 struct elf_link_hash_entry
*h
;
88 /* Used to count non-got, non-plt relocations for delayed sizing
89 of relocation sections. */
90 struct elfNN_ia64_dyn_reloc_entry
92 struct elfNN_ia64_dyn_reloc_entry
*next
;
97 /* Is this reloc against readonly section? */
101 /* TRUE when the section contents have been updated. */
102 unsigned got_done
: 1;
103 unsigned fptr_done
: 1;
104 unsigned pltoff_done
: 1;
105 unsigned tprel_done
: 1;
106 unsigned dtpmod_done
: 1;
107 unsigned dtprel_done
: 1;
109 /* TRUE for the different kinds of linker data we want created. */
110 unsigned want_got
: 1;
111 unsigned want_gotx
: 1;
112 unsigned want_fptr
: 1;
113 unsigned want_ltoff_fptr
: 1;
114 unsigned want_plt
: 1;
115 unsigned want_plt2
: 1;
116 unsigned want_pltoff
: 1;
117 unsigned want_tprel
: 1;
118 unsigned want_dtpmod
: 1;
119 unsigned want_dtprel
: 1;
122 struct elfNN_ia64_local_hash_entry
126 struct elfNN_ia64_dyn_sym_info
*info
;
128 /* TRUE if this hash entry's addends was translated for
129 SHF_MERGE optimization. */
130 unsigned sec_merge_done
: 1;
133 struct elfNN_ia64_link_hash_entry
135 struct elf_link_hash_entry root
;
136 struct elfNN_ia64_dyn_sym_info
*info
;
139 struct elfNN_ia64_link_hash_table
141 /* The main hash table. */
142 struct elf_link_hash_table root
;
144 asection
*got_sec
; /* the linkage table section (or NULL) */
145 asection
*rel_got_sec
; /* dynamic relocation section for same */
146 asection
*fptr_sec
; /* function descriptor table (or NULL) */
147 asection
*rel_fptr_sec
; /* dynamic relocation section for same */
148 asection
*plt_sec
; /* the primary plt section (or NULL) */
149 asection
*pltoff_sec
; /* private descriptors for plt (or NULL) */
150 asection
*rel_pltoff_sec
; /* dynamic relocation section for same */
152 bfd_size_type minplt_entries
; /* number of minplt entries */
153 unsigned reltext
: 1; /* are there relocs against readonly sections? */
154 unsigned self_dtpmod_done
: 1;/* has self DTPMOD entry been finished? */
155 bfd_vma self_dtpmod_offset
; /* .got offset to self DTPMOD entry */
157 htab_t loc_hash_table
;
158 void *loc_hash_memory
;
161 struct elfNN_ia64_allocate_data
163 struct bfd_link_info
*info
;
167 #define elfNN_ia64_hash_table(p) \
168 ((struct elfNN_ia64_link_hash_table *) ((p)->hash))
170 static bfd_reloc_status_type elfNN_ia64_reloc
171 PARAMS ((bfd
*abfd
, arelent
*reloc
, asymbol
*sym
, PTR data
,
172 asection
*input_section
, bfd
*output_bfd
, char **error_message
));
173 static reloc_howto_type
* lookup_howto
174 PARAMS ((unsigned int rtype
));
175 static reloc_howto_type
*elfNN_ia64_reloc_type_lookup
176 PARAMS ((bfd
*abfd
, bfd_reloc_code_real_type bfd_code
));
177 static void elfNN_ia64_info_to_howto
178 PARAMS ((bfd
*abfd
, arelent
*bfd_reloc
, Elf_Internal_Rela
*elf_reloc
));
179 static bfd_boolean elfNN_ia64_relax_section
180 PARAMS((bfd
*abfd
, asection
*sec
, struct bfd_link_info
*link_info
,
181 bfd_boolean
*again
));
182 static void elfNN_ia64_relax_ldxmov
183 PARAMS((bfd_byte
*contents
, bfd_vma off
));
184 static bfd_boolean is_unwind_section_name
185 PARAMS ((bfd
*abfd
, const char *));
186 static bfd_boolean elfNN_ia64_section_from_shdr
187 PARAMS ((bfd
*, Elf_Internal_Shdr
*, const char *));
188 static bfd_boolean elfNN_ia64_section_flags
189 PARAMS ((flagword
*, const Elf_Internal_Shdr
*));
190 static bfd_boolean elfNN_ia64_fake_sections
191 PARAMS ((bfd
*abfd
, Elf_Internal_Shdr
*hdr
, asection
*sec
));
192 static void elfNN_ia64_final_write_processing
193 PARAMS ((bfd
*abfd
, bfd_boolean linker
));
194 static bfd_boolean elfNN_ia64_add_symbol_hook
195 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, Elf_Internal_Sym
*sym
,
196 const char **namep
, flagword
*flagsp
, asection
**secp
,
198 static int elfNN_ia64_additional_program_headers
199 PARAMS ((bfd
*abfd
));
200 static bfd_boolean elfNN_ia64_modify_segment_map
201 PARAMS ((bfd
*, struct bfd_link_info
*));
202 static bfd_boolean elfNN_ia64_is_local_label_name
203 PARAMS ((bfd
*abfd
, const char *name
));
204 static bfd_boolean elfNN_ia64_dynamic_symbol_p
205 PARAMS ((struct elf_link_hash_entry
*h
, struct bfd_link_info
*info
, int));
206 static struct bfd_hash_entry
*elfNN_ia64_new_elf_hash_entry
207 PARAMS ((struct bfd_hash_entry
*entry
, struct bfd_hash_table
*table
,
208 const char *string
));
209 static void elfNN_ia64_hash_copy_indirect
210 PARAMS ((const struct elf_backend_data
*, struct elf_link_hash_entry
*,
211 struct elf_link_hash_entry
*));
212 static void elfNN_ia64_hash_hide_symbol
213 PARAMS ((struct bfd_link_info
*, struct elf_link_hash_entry
*, bfd_boolean
));
214 static hashval_t elfNN_ia64_local_htab_hash
PARAMS ((const void *));
215 static int elfNN_ia64_local_htab_eq
PARAMS ((const void *ptr1
,
217 static struct bfd_link_hash_table
*elfNN_ia64_hash_table_create
218 PARAMS ((bfd
*abfd
));
219 static void elfNN_ia64_hash_table_free
220 PARAMS ((struct bfd_link_hash_table
*hash
));
221 static bfd_boolean elfNN_ia64_global_dyn_sym_thunk
222 PARAMS ((struct bfd_hash_entry
*, PTR
));
223 static int elfNN_ia64_local_dyn_sym_thunk
224 PARAMS ((void **, PTR
));
225 static void elfNN_ia64_dyn_sym_traverse
226 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
227 bfd_boolean (*func
) (struct elfNN_ia64_dyn_sym_info
*, PTR
),
229 static bfd_boolean elfNN_ia64_create_dynamic_sections
230 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
231 static struct elfNN_ia64_local_hash_entry
* get_local_sym_hash
232 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
233 bfd
*abfd
, const Elf_Internal_Rela
*rel
, bfd_boolean create
));
234 static struct elfNN_ia64_dyn_sym_info
* get_dyn_sym_info
235 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
236 struct elf_link_hash_entry
*h
,
237 bfd
*abfd
, const Elf_Internal_Rela
*rel
, bfd_boolean create
));
238 static asection
*get_got
239 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
240 struct elfNN_ia64_link_hash_table
*ia64_info
));
241 static asection
*get_fptr
242 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
243 struct elfNN_ia64_link_hash_table
*ia64_info
));
244 static asection
*get_pltoff
245 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
246 struct elfNN_ia64_link_hash_table
*ia64_info
));
247 static asection
*get_reloc_section
248 PARAMS ((bfd
*abfd
, struct elfNN_ia64_link_hash_table
*ia64_info
,
249 asection
*sec
, bfd_boolean create
));
250 static bfd_boolean elfNN_ia64_check_relocs
251 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, asection
*sec
,
252 const Elf_Internal_Rela
*relocs
));
253 static bfd_boolean elfNN_ia64_adjust_dynamic_symbol
254 PARAMS ((struct bfd_link_info
*info
, struct elf_link_hash_entry
*h
));
255 static long global_sym_index
256 PARAMS ((struct elf_link_hash_entry
*h
));
257 static bfd_boolean allocate_fptr
258 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
259 static bfd_boolean allocate_global_data_got
260 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
261 static bfd_boolean allocate_global_fptr_got
262 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
263 static bfd_boolean allocate_local_got
264 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
265 static bfd_boolean allocate_pltoff_entries
266 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
267 static bfd_boolean allocate_plt_entries
268 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
269 static bfd_boolean allocate_plt2_entries
270 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
271 static bfd_boolean allocate_dynrel_entries
272 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
273 static bfd_boolean elfNN_ia64_size_dynamic_sections
274 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
));
275 static bfd_reloc_status_type elfNN_ia64_install_value
276 PARAMS ((bfd_byte
*hit_addr
, bfd_vma val
, unsigned int r_type
));
277 static void elfNN_ia64_install_dyn_reloc
278 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, asection
*sec
,
279 asection
*srel
, bfd_vma offset
, unsigned int type
,
280 long dynindx
, bfd_vma addend
));
281 static bfd_vma set_got_entry
282 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
283 struct elfNN_ia64_dyn_sym_info
*dyn_i
, long dynindx
,
284 bfd_vma addend
, bfd_vma value
, unsigned int dyn_r_type
));
285 static bfd_vma set_fptr_entry
286 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
287 struct elfNN_ia64_dyn_sym_info
*dyn_i
,
289 static bfd_vma set_pltoff_entry
290 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
291 struct elfNN_ia64_dyn_sym_info
*dyn_i
,
292 bfd_vma value
, bfd_boolean
));
293 static bfd_vma elfNN_ia64_tprel_base
294 PARAMS ((struct bfd_link_info
*info
));
295 static bfd_vma elfNN_ia64_dtprel_base
296 PARAMS ((struct bfd_link_info
*info
));
297 static int elfNN_ia64_unwind_entry_compare
298 PARAMS ((const PTR
, const PTR
));
299 static bfd_boolean elfNN_ia64_choose_gp
300 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
301 static bfd_boolean elfNN_ia64_final_link
302 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
303 static bfd_boolean elfNN_ia64_relocate_section
304 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
, bfd
*input_bfd
,
305 asection
*input_section
, bfd_byte
*contents
,
306 Elf_Internal_Rela
*relocs
, Elf_Internal_Sym
*local_syms
,
307 asection
**local_sections
));
308 static bfd_boolean elfNN_ia64_finish_dynamic_symbol
309 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
,
310 struct elf_link_hash_entry
*h
, Elf_Internal_Sym
*sym
));
311 static bfd_boolean elfNN_ia64_finish_dynamic_sections
312 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
313 static bfd_boolean elfNN_ia64_set_private_flags
314 PARAMS ((bfd
*abfd
, flagword flags
));
315 static bfd_boolean elfNN_ia64_merge_private_bfd_data
316 PARAMS ((bfd
*ibfd
, bfd
*obfd
));
317 static bfd_boolean elfNN_ia64_print_private_bfd_data
318 PARAMS ((bfd
*abfd
, PTR ptr
));
319 static enum elf_reloc_type_class elfNN_ia64_reloc_type_class
320 PARAMS ((const Elf_Internal_Rela
*));
321 static bfd_boolean elfNN_ia64_hpux_vec
322 PARAMS ((const bfd_target
*vec
));
323 static void elfNN_hpux_post_process_headers
324 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
325 bfd_boolean elfNN_hpux_backend_section_from_bfd_section
326 PARAMS ((bfd
*abfd
, asection
*sec
, int *retval
));
328 /* ia64-specific relocation. */
330 /* Perform a relocation. Not much to do here as all the hard work is
331 done in elfNN_ia64_final_link_relocate. */
332 static bfd_reloc_status_type
333 elfNN_ia64_reloc (abfd
, reloc
, sym
, data
, input_section
,
334 output_bfd
, error_message
)
335 bfd
*abfd ATTRIBUTE_UNUSED
;
337 asymbol
*sym ATTRIBUTE_UNUSED
;
338 PTR data ATTRIBUTE_UNUSED
;
339 asection
*input_section
;
341 char **error_message
;
345 reloc
->address
+= input_section
->output_offset
;
349 if (input_section
->flags
& SEC_DEBUGGING
)
350 return bfd_reloc_continue
;
352 *error_message
= "Unsupported call to elfNN_ia64_reloc";
353 return bfd_reloc_notsupported
;
356 #define IA64_HOWTO(TYPE, NAME, SIZE, PCREL, IN) \
357 HOWTO (TYPE, 0, SIZE, 0, PCREL, 0, complain_overflow_signed, \
358 elfNN_ia64_reloc, NAME, FALSE, 0, -1, IN)
360 /* This table has to be sorted according to increasing number of the
362 static reloc_howto_type ia64_howto_table
[] =
364 IA64_HOWTO (R_IA64_NONE
, "NONE", 0, FALSE
, TRUE
),
366 IA64_HOWTO (R_IA64_IMM14
, "IMM14", 0, FALSE
, TRUE
),
367 IA64_HOWTO (R_IA64_IMM22
, "IMM22", 0, FALSE
, TRUE
),
368 IA64_HOWTO (R_IA64_IMM64
, "IMM64", 0, FALSE
, TRUE
),
369 IA64_HOWTO (R_IA64_DIR32MSB
, "DIR32MSB", 2, FALSE
, TRUE
),
370 IA64_HOWTO (R_IA64_DIR32LSB
, "DIR32LSB", 2, FALSE
, TRUE
),
371 IA64_HOWTO (R_IA64_DIR64MSB
, "DIR64MSB", 4, FALSE
, TRUE
),
372 IA64_HOWTO (R_IA64_DIR64LSB
, "DIR64LSB", 4, FALSE
, TRUE
),
374 IA64_HOWTO (R_IA64_GPREL22
, "GPREL22", 0, FALSE
, TRUE
),
375 IA64_HOWTO (R_IA64_GPREL64I
, "GPREL64I", 0, FALSE
, TRUE
),
376 IA64_HOWTO (R_IA64_GPREL32MSB
, "GPREL32MSB", 2, FALSE
, TRUE
),
377 IA64_HOWTO (R_IA64_GPREL32LSB
, "GPREL32LSB", 2, FALSE
, TRUE
),
378 IA64_HOWTO (R_IA64_GPREL64MSB
, "GPREL64MSB", 4, FALSE
, TRUE
),
379 IA64_HOWTO (R_IA64_GPREL64LSB
, "GPREL64LSB", 4, FALSE
, TRUE
),
381 IA64_HOWTO (R_IA64_LTOFF22
, "LTOFF22", 0, FALSE
, TRUE
),
382 IA64_HOWTO (R_IA64_LTOFF64I
, "LTOFF64I", 0, FALSE
, TRUE
),
384 IA64_HOWTO (R_IA64_PLTOFF22
, "PLTOFF22", 0, FALSE
, TRUE
),
385 IA64_HOWTO (R_IA64_PLTOFF64I
, "PLTOFF64I", 0, FALSE
, TRUE
),
386 IA64_HOWTO (R_IA64_PLTOFF64MSB
, "PLTOFF64MSB", 4, FALSE
, TRUE
),
387 IA64_HOWTO (R_IA64_PLTOFF64LSB
, "PLTOFF64LSB", 4, FALSE
, TRUE
),
389 IA64_HOWTO (R_IA64_FPTR64I
, "FPTR64I", 0, FALSE
, TRUE
),
390 IA64_HOWTO (R_IA64_FPTR32MSB
, "FPTR32MSB", 2, FALSE
, TRUE
),
391 IA64_HOWTO (R_IA64_FPTR32LSB
, "FPTR32LSB", 2, FALSE
, TRUE
),
392 IA64_HOWTO (R_IA64_FPTR64MSB
, "FPTR64MSB", 4, FALSE
, TRUE
),
393 IA64_HOWTO (R_IA64_FPTR64LSB
, "FPTR64LSB", 4, FALSE
, TRUE
),
395 IA64_HOWTO (R_IA64_PCREL60B
, "PCREL60B", 0, TRUE
, TRUE
),
396 IA64_HOWTO (R_IA64_PCREL21B
, "PCREL21B", 0, TRUE
, TRUE
),
397 IA64_HOWTO (R_IA64_PCREL21M
, "PCREL21M", 0, TRUE
, TRUE
),
398 IA64_HOWTO (R_IA64_PCREL21F
, "PCREL21F", 0, TRUE
, TRUE
),
399 IA64_HOWTO (R_IA64_PCREL32MSB
, "PCREL32MSB", 2, TRUE
, TRUE
),
400 IA64_HOWTO (R_IA64_PCREL32LSB
, "PCREL32LSB", 2, TRUE
, TRUE
),
401 IA64_HOWTO (R_IA64_PCREL64MSB
, "PCREL64MSB", 4, TRUE
, TRUE
),
402 IA64_HOWTO (R_IA64_PCREL64LSB
, "PCREL64LSB", 4, TRUE
, TRUE
),
404 IA64_HOWTO (R_IA64_LTOFF_FPTR22
, "LTOFF_FPTR22", 0, FALSE
, TRUE
),
405 IA64_HOWTO (R_IA64_LTOFF_FPTR64I
, "LTOFF_FPTR64I", 0, FALSE
, TRUE
),
406 IA64_HOWTO (R_IA64_LTOFF_FPTR32MSB
, "LTOFF_FPTR32MSB", 2, FALSE
, TRUE
),
407 IA64_HOWTO (R_IA64_LTOFF_FPTR32LSB
, "LTOFF_FPTR32LSB", 2, FALSE
, TRUE
),
408 IA64_HOWTO (R_IA64_LTOFF_FPTR64MSB
, "LTOFF_FPTR64MSB", 4, FALSE
, TRUE
),
409 IA64_HOWTO (R_IA64_LTOFF_FPTR64LSB
, "LTOFF_FPTR64LSB", 4, FALSE
, TRUE
),
411 IA64_HOWTO (R_IA64_SEGREL32MSB
, "SEGREL32MSB", 2, FALSE
, TRUE
),
412 IA64_HOWTO (R_IA64_SEGREL32LSB
, "SEGREL32LSB", 2, FALSE
, TRUE
),
413 IA64_HOWTO (R_IA64_SEGREL64MSB
, "SEGREL64MSB", 4, FALSE
, TRUE
),
414 IA64_HOWTO (R_IA64_SEGREL64LSB
, "SEGREL64LSB", 4, FALSE
, TRUE
),
416 IA64_HOWTO (R_IA64_SECREL32MSB
, "SECREL32MSB", 2, FALSE
, TRUE
),
417 IA64_HOWTO (R_IA64_SECREL32LSB
, "SECREL32LSB", 2, FALSE
, TRUE
),
418 IA64_HOWTO (R_IA64_SECREL64MSB
, "SECREL64MSB", 4, FALSE
, TRUE
),
419 IA64_HOWTO (R_IA64_SECREL64LSB
, "SECREL64LSB", 4, FALSE
, TRUE
),
421 IA64_HOWTO (R_IA64_REL32MSB
, "REL32MSB", 2, FALSE
, TRUE
),
422 IA64_HOWTO (R_IA64_REL32LSB
, "REL32LSB", 2, FALSE
, TRUE
),
423 IA64_HOWTO (R_IA64_REL64MSB
, "REL64MSB", 4, FALSE
, TRUE
),
424 IA64_HOWTO (R_IA64_REL64LSB
, "REL64LSB", 4, FALSE
, TRUE
),
426 IA64_HOWTO (R_IA64_LTV32MSB
, "LTV32MSB", 2, FALSE
, TRUE
),
427 IA64_HOWTO (R_IA64_LTV32LSB
, "LTV32LSB", 2, FALSE
, TRUE
),
428 IA64_HOWTO (R_IA64_LTV64MSB
, "LTV64MSB", 4, FALSE
, TRUE
),
429 IA64_HOWTO (R_IA64_LTV64LSB
, "LTV64LSB", 4, FALSE
, TRUE
),
431 IA64_HOWTO (R_IA64_PCREL21BI
, "PCREL21BI", 0, TRUE
, TRUE
),
432 IA64_HOWTO (R_IA64_PCREL22
, "PCREL22", 0, TRUE
, TRUE
),
433 IA64_HOWTO (R_IA64_PCREL64I
, "PCREL64I", 0, TRUE
, TRUE
),
435 IA64_HOWTO (R_IA64_IPLTMSB
, "IPLTMSB", 4, FALSE
, TRUE
),
436 IA64_HOWTO (R_IA64_IPLTLSB
, "IPLTLSB", 4, FALSE
, TRUE
),
437 IA64_HOWTO (R_IA64_COPY
, "COPY", 4, FALSE
, TRUE
),
438 IA64_HOWTO (R_IA64_LTOFF22X
, "LTOFF22X", 0, FALSE
, TRUE
),
439 IA64_HOWTO (R_IA64_LDXMOV
, "LDXMOV", 0, FALSE
, TRUE
),
441 IA64_HOWTO (R_IA64_TPREL14
, "TPREL14", 0, FALSE
, FALSE
),
442 IA64_HOWTO (R_IA64_TPREL22
, "TPREL22", 0, FALSE
, FALSE
),
443 IA64_HOWTO (R_IA64_TPREL64I
, "TPREL64I", 0, FALSE
, FALSE
),
444 IA64_HOWTO (R_IA64_TPREL64MSB
, "TPREL64MSB", 4, FALSE
, FALSE
),
445 IA64_HOWTO (R_IA64_TPREL64LSB
, "TPREL64LSB", 4, FALSE
, FALSE
),
446 IA64_HOWTO (R_IA64_LTOFF_TPREL22
, "LTOFF_TPREL22", 0, FALSE
, FALSE
),
448 IA64_HOWTO (R_IA64_DTPMOD64MSB
, "TPREL64MSB", 4, FALSE
, FALSE
),
449 IA64_HOWTO (R_IA64_DTPMOD64LSB
, "TPREL64LSB", 4, FALSE
, FALSE
),
450 IA64_HOWTO (R_IA64_LTOFF_DTPMOD22
, "LTOFF_DTPMOD22", 0, FALSE
, FALSE
),
452 IA64_HOWTO (R_IA64_DTPREL14
, "DTPREL14", 0, FALSE
, FALSE
),
453 IA64_HOWTO (R_IA64_DTPREL22
, "DTPREL22", 0, FALSE
, FALSE
),
454 IA64_HOWTO (R_IA64_DTPREL64I
, "DTPREL64I", 0, FALSE
, FALSE
),
455 IA64_HOWTO (R_IA64_DTPREL32MSB
, "DTPREL32MSB", 2, FALSE
, FALSE
),
456 IA64_HOWTO (R_IA64_DTPREL32LSB
, "DTPREL32LSB", 2, FALSE
, FALSE
),
457 IA64_HOWTO (R_IA64_DTPREL64MSB
, "DTPREL64MSB", 4, FALSE
, FALSE
),
458 IA64_HOWTO (R_IA64_DTPREL64LSB
, "DTPREL64LSB", 4, FALSE
, FALSE
),
459 IA64_HOWTO (R_IA64_LTOFF_DTPREL22
, "LTOFF_DTPREL22", 0, FALSE
, FALSE
),
462 static unsigned char elf_code_to_howto_index
[R_IA64_MAX_RELOC_CODE
+ 1];
464 /* Given a BFD reloc type, return the matching HOWTO structure. */
466 static reloc_howto_type
*
470 static int inited
= 0;
477 memset (elf_code_to_howto_index
, 0xff, sizeof (elf_code_to_howto_index
));
478 for (i
= 0; i
< NELEMS (ia64_howto_table
); ++i
)
479 elf_code_to_howto_index
[ia64_howto_table
[i
].type
] = i
;
482 BFD_ASSERT (rtype
<= R_IA64_MAX_RELOC_CODE
);
483 i
= elf_code_to_howto_index
[rtype
];
484 if (i
>= NELEMS (ia64_howto_table
))
486 return ia64_howto_table
+ i
;
489 static reloc_howto_type
*
490 elfNN_ia64_reloc_type_lookup (abfd
, bfd_code
)
491 bfd
*abfd ATTRIBUTE_UNUSED
;
492 bfd_reloc_code_real_type bfd_code
;
498 case BFD_RELOC_NONE
: rtype
= R_IA64_NONE
; break;
500 case BFD_RELOC_IA64_IMM14
: rtype
= R_IA64_IMM14
; break;
501 case BFD_RELOC_IA64_IMM22
: rtype
= R_IA64_IMM22
; break;
502 case BFD_RELOC_IA64_IMM64
: rtype
= R_IA64_IMM64
; break;
504 case BFD_RELOC_IA64_DIR32MSB
: rtype
= R_IA64_DIR32MSB
; break;
505 case BFD_RELOC_IA64_DIR32LSB
: rtype
= R_IA64_DIR32LSB
; break;
506 case BFD_RELOC_IA64_DIR64MSB
: rtype
= R_IA64_DIR64MSB
; break;
507 case BFD_RELOC_IA64_DIR64LSB
: rtype
= R_IA64_DIR64LSB
; break;
509 case BFD_RELOC_IA64_GPREL22
: rtype
= R_IA64_GPREL22
; break;
510 case BFD_RELOC_IA64_GPREL64I
: rtype
= R_IA64_GPREL64I
; break;
511 case BFD_RELOC_IA64_GPREL32MSB
: rtype
= R_IA64_GPREL32MSB
; break;
512 case BFD_RELOC_IA64_GPREL32LSB
: rtype
= R_IA64_GPREL32LSB
; break;
513 case BFD_RELOC_IA64_GPREL64MSB
: rtype
= R_IA64_GPREL64MSB
; break;
514 case BFD_RELOC_IA64_GPREL64LSB
: rtype
= R_IA64_GPREL64LSB
; break;
516 case BFD_RELOC_IA64_LTOFF22
: rtype
= R_IA64_LTOFF22
; break;
517 case BFD_RELOC_IA64_LTOFF64I
: rtype
= R_IA64_LTOFF64I
; break;
519 case BFD_RELOC_IA64_PLTOFF22
: rtype
= R_IA64_PLTOFF22
; break;
520 case BFD_RELOC_IA64_PLTOFF64I
: rtype
= R_IA64_PLTOFF64I
; break;
521 case BFD_RELOC_IA64_PLTOFF64MSB
: rtype
= R_IA64_PLTOFF64MSB
; break;
522 case BFD_RELOC_IA64_PLTOFF64LSB
: rtype
= R_IA64_PLTOFF64LSB
; break;
523 case BFD_RELOC_IA64_FPTR64I
: rtype
= R_IA64_FPTR64I
; break;
524 case BFD_RELOC_IA64_FPTR32MSB
: rtype
= R_IA64_FPTR32MSB
; break;
525 case BFD_RELOC_IA64_FPTR32LSB
: rtype
= R_IA64_FPTR32LSB
; break;
526 case BFD_RELOC_IA64_FPTR64MSB
: rtype
= R_IA64_FPTR64MSB
; break;
527 case BFD_RELOC_IA64_FPTR64LSB
: rtype
= R_IA64_FPTR64LSB
; break;
529 case BFD_RELOC_IA64_PCREL21B
: rtype
= R_IA64_PCREL21B
; break;
530 case BFD_RELOC_IA64_PCREL21BI
: rtype
= R_IA64_PCREL21BI
; break;
531 case BFD_RELOC_IA64_PCREL21M
: rtype
= R_IA64_PCREL21M
; break;
532 case BFD_RELOC_IA64_PCREL21F
: rtype
= R_IA64_PCREL21F
; break;
533 case BFD_RELOC_IA64_PCREL22
: rtype
= R_IA64_PCREL22
; break;
534 case BFD_RELOC_IA64_PCREL60B
: rtype
= R_IA64_PCREL60B
; break;
535 case BFD_RELOC_IA64_PCREL64I
: rtype
= R_IA64_PCREL64I
; break;
536 case BFD_RELOC_IA64_PCREL32MSB
: rtype
= R_IA64_PCREL32MSB
; break;
537 case BFD_RELOC_IA64_PCREL32LSB
: rtype
= R_IA64_PCREL32LSB
; break;
538 case BFD_RELOC_IA64_PCREL64MSB
: rtype
= R_IA64_PCREL64MSB
; break;
539 case BFD_RELOC_IA64_PCREL64LSB
: rtype
= R_IA64_PCREL64LSB
; break;
541 case BFD_RELOC_IA64_LTOFF_FPTR22
: rtype
= R_IA64_LTOFF_FPTR22
; break;
542 case BFD_RELOC_IA64_LTOFF_FPTR64I
: rtype
= R_IA64_LTOFF_FPTR64I
; break;
543 case BFD_RELOC_IA64_LTOFF_FPTR32MSB
: rtype
= R_IA64_LTOFF_FPTR32MSB
; break;
544 case BFD_RELOC_IA64_LTOFF_FPTR32LSB
: rtype
= R_IA64_LTOFF_FPTR32LSB
; break;
545 case BFD_RELOC_IA64_LTOFF_FPTR64MSB
: rtype
= R_IA64_LTOFF_FPTR64MSB
; break;
546 case BFD_RELOC_IA64_LTOFF_FPTR64LSB
: rtype
= R_IA64_LTOFF_FPTR64LSB
; break;
548 case BFD_RELOC_IA64_SEGREL32MSB
: rtype
= R_IA64_SEGREL32MSB
; break;
549 case BFD_RELOC_IA64_SEGREL32LSB
: rtype
= R_IA64_SEGREL32LSB
; break;
550 case BFD_RELOC_IA64_SEGREL64MSB
: rtype
= R_IA64_SEGREL64MSB
; break;
551 case BFD_RELOC_IA64_SEGREL64LSB
: rtype
= R_IA64_SEGREL64LSB
; break;
553 case BFD_RELOC_IA64_SECREL32MSB
: rtype
= R_IA64_SECREL32MSB
; break;
554 case BFD_RELOC_IA64_SECREL32LSB
: rtype
= R_IA64_SECREL32LSB
; break;
555 case BFD_RELOC_IA64_SECREL64MSB
: rtype
= R_IA64_SECREL64MSB
; break;
556 case BFD_RELOC_IA64_SECREL64LSB
: rtype
= R_IA64_SECREL64LSB
; break;
558 case BFD_RELOC_IA64_REL32MSB
: rtype
= R_IA64_REL32MSB
; break;
559 case BFD_RELOC_IA64_REL32LSB
: rtype
= R_IA64_REL32LSB
; break;
560 case BFD_RELOC_IA64_REL64MSB
: rtype
= R_IA64_REL64MSB
; break;
561 case BFD_RELOC_IA64_REL64LSB
: rtype
= R_IA64_REL64LSB
; break;
563 case BFD_RELOC_IA64_LTV32MSB
: rtype
= R_IA64_LTV32MSB
; break;
564 case BFD_RELOC_IA64_LTV32LSB
: rtype
= R_IA64_LTV32LSB
; break;
565 case BFD_RELOC_IA64_LTV64MSB
: rtype
= R_IA64_LTV64MSB
; break;
566 case BFD_RELOC_IA64_LTV64LSB
: rtype
= R_IA64_LTV64LSB
; break;
568 case BFD_RELOC_IA64_IPLTMSB
: rtype
= R_IA64_IPLTMSB
; break;
569 case BFD_RELOC_IA64_IPLTLSB
: rtype
= R_IA64_IPLTLSB
; break;
570 case BFD_RELOC_IA64_COPY
: rtype
= R_IA64_COPY
; break;
571 case BFD_RELOC_IA64_LTOFF22X
: rtype
= R_IA64_LTOFF22X
; break;
572 case BFD_RELOC_IA64_LDXMOV
: rtype
= R_IA64_LDXMOV
; break;
574 case BFD_RELOC_IA64_TPREL14
: rtype
= R_IA64_TPREL14
; break;
575 case BFD_RELOC_IA64_TPREL22
: rtype
= R_IA64_TPREL22
; break;
576 case BFD_RELOC_IA64_TPREL64I
: rtype
= R_IA64_TPREL64I
; break;
577 case BFD_RELOC_IA64_TPREL64MSB
: rtype
= R_IA64_TPREL64MSB
; break;
578 case BFD_RELOC_IA64_TPREL64LSB
: rtype
= R_IA64_TPREL64LSB
; break;
579 case BFD_RELOC_IA64_LTOFF_TPREL22
: rtype
= R_IA64_LTOFF_TPREL22
; break;
581 case BFD_RELOC_IA64_DTPMOD64MSB
: rtype
= R_IA64_DTPMOD64MSB
; break;
582 case BFD_RELOC_IA64_DTPMOD64LSB
: rtype
= R_IA64_DTPMOD64LSB
; break;
583 case BFD_RELOC_IA64_LTOFF_DTPMOD22
: rtype
= R_IA64_LTOFF_DTPMOD22
; break;
585 case BFD_RELOC_IA64_DTPREL14
: rtype
= R_IA64_DTPREL14
; break;
586 case BFD_RELOC_IA64_DTPREL22
: rtype
= R_IA64_DTPREL22
; break;
587 case BFD_RELOC_IA64_DTPREL64I
: rtype
= R_IA64_DTPREL64I
; break;
588 case BFD_RELOC_IA64_DTPREL32MSB
: rtype
= R_IA64_DTPREL32MSB
; break;
589 case BFD_RELOC_IA64_DTPREL32LSB
: rtype
= R_IA64_DTPREL32LSB
; break;
590 case BFD_RELOC_IA64_DTPREL64MSB
: rtype
= R_IA64_DTPREL64MSB
; break;
591 case BFD_RELOC_IA64_DTPREL64LSB
: rtype
= R_IA64_DTPREL64LSB
; break;
592 case BFD_RELOC_IA64_LTOFF_DTPREL22
: rtype
= R_IA64_LTOFF_DTPREL22
; break;
596 return lookup_howto (rtype
);
599 /* Given a ELF reloc, return the matching HOWTO structure. */
602 elfNN_ia64_info_to_howto (abfd
, bfd_reloc
, elf_reloc
)
603 bfd
*abfd ATTRIBUTE_UNUSED
;
605 Elf_Internal_Rela
*elf_reloc
;
608 = lookup_howto ((unsigned int) ELFNN_R_TYPE (elf_reloc
->r_info
));
611 #define PLT_HEADER_SIZE (3 * 16)
612 #define PLT_MIN_ENTRY_SIZE (1 * 16)
613 #define PLT_FULL_ENTRY_SIZE (2 * 16)
614 #define PLT_RESERVED_WORDS 3
616 static const bfd_byte plt_header
[PLT_HEADER_SIZE
] =
618 0x0b, 0x10, 0x00, 0x1c, 0x00, 0x21, /* [MMI] mov r2=r14;; */
619 0xe0, 0x00, 0x08, 0x00, 0x48, 0x00, /* addl r14=0,r2 */
620 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
621 0x0b, 0x80, 0x20, 0x1c, 0x18, 0x14, /* [MMI] ld8 r16=[r14],8;; */
622 0x10, 0x41, 0x38, 0x30, 0x28, 0x00, /* ld8 r17=[r14],8 */
623 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
624 0x11, 0x08, 0x00, 0x1c, 0x18, 0x10, /* [MIB] ld8 r1=[r14] */
625 0x60, 0x88, 0x04, 0x80, 0x03, 0x00, /* mov b6=r17 */
626 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
629 static const bfd_byte plt_min_entry
[PLT_MIN_ENTRY_SIZE
] =
631 0x11, 0x78, 0x00, 0x00, 0x00, 0x24, /* [MIB] mov r15=0 */
632 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, /* nop.i 0x0 */
633 0x00, 0x00, 0x00, 0x40 /* br.few 0 <PLT0>;; */
636 static const bfd_byte plt_full_entry
[PLT_FULL_ENTRY_SIZE
] =
638 0x0b, 0x78, 0x00, 0x02, 0x00, 0x24, /* [MMI] addl r15=0,r1;; */
639 0x00, 0x41, 0x3c, 0x70, 0x29, 0xc0, /* ld8.acq r16=[r15],8*/
640 0x01, 0x08, 0x00, 0x84, /* mov r14=r1;; */
641 0x11, 0x08, 0x00, 0x1e, 0x18, 0x10, /* [MIB] ld8 r1=[r15] */
642 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
643 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
646 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
648 static const bfd_byte oor_brl
[16] =
650 0x05, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
651 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* brl.sptk.few tgt;; */
652 0x00, 0x00, 0x00, 0xc0
655 static const bfd_byte oor_ip
[48] =
657 0x04, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
658 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, /* movl r15=0 */
659 0x01, 0x00, 0x00, 0x60,
660 0x03, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MII] nop.m 0 */
661 0x00, 0x01, 0x00, 0x60, 0x00, 0x00, /* mov r16=ip;; */
662 0xf2, 0x80, 0x00, 0x80, /* add r16=r15,r16;; */
663 0x11, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MIB] nop.m 0 */
664 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
665 0x60, 0x00, 0x80, 0x00 /* br b6;; */
668 static size_t oor_branch_size
= sizeof (oor_brl
);
671 bfd_elfNN_ia64_after_parse (int itanium
)
673 oor_branch_size
= itanium
? sizeof (oor_ip
) : sizeof (oor_brl
);
677 elfNN_ia64_relax_brl (bfd_byte
*contents
, bfd_vma off
)
681 bfd_vma t0
, t1
, i0
, i1
, i2
;
683 hit_addr
= (bfd_byte
*) (contents
+ off
);
684 hit_addr
-= (long) hit_addr
& 0x3;
685 t0
= bfd_getl64 (hit_addr
);
686 t1
= bfd_getl64 (hit_addr
+ 8);
688 /* Keep the instruction in slot 0. */
689 i0
= (t0
>> 5) & 0x1ffffffffffLL
;
690 /* Use nop.b for slot 1. */
692 /* For slot 2, turn brl into br by masking out bit 40. */
693 i2
= (t1
>> 23) & 0x0ffffffffffLL
;
695 /* Turn a MLX bundle into a MBB bundle with the same stop-bit
698 if ((t0
& 0x1fLL
) == 5)
700 t0
= (i1
<< 46) | (i0
<< 5) | template;
701 t1
= (i2
<< 23) | (i1
>> 18);
703 bfd_putl64 (t0
, hit_addr
);
704 bfd_putl64 (t1
, hit_addr
+ 8);
707 /* These functions do relaxation for IA-64 ELF. */
710 elfNN_ia64_relax_section (abfd
, sec
, link_info
, again
)
713 struct bfd_link_info
*link_info
;
718 struct one_fixup
*next
;
724 Elf_Internal_Shdr
*symtab_hdr
;
725 Elf_Internal_Rela
*internal_relocs
;
726 Elf_Internal_Rela
*irel
, *irelend
;
728 Elf_Internal_Sym
*isymbuf
= NULL
;
729 struct elfNN_ia64_link_hash_table
*ia64_info
;
730 struct one_fixup
*fixups
= NULL
;
731 bfd_boolean changed_contents
= FALSE
;
732 bfd_boolean changed_relocs
= FALSE
;
733 bfd_boolean changed_got
= FALSE
;
736 /* Assume we're not going to change any sizes, and we'll only need
740 /* Don't even try to relax for non-ELF outputs. */
741 if (!is_elf_hash_table (link_info
->hash
))
744 /* Nothing to do if there are no relocations or there is no need for
745 the relax finalize pass. */
746 if ((sec
->flags
& SEC_RELOC
) == 0
747 || sec
->reloc_count
== 0
748 || (!link_info
->need_relax_finalize
749 && sec
->need_finalize_relax
== 0))
752 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
754 /* Load the relocations for this section. */
755 internal_relocs
= (_bfd_elf_link_read_relocs
756 (abfd
, sec
, (PTR
) NULL
, (Elf_Internal_Rela
*) NULL
,
757 link_info
->keep_memory
));
758 if (internal_relocs
== NULL
)
761 ia64_info
= elfNN_ia64_hash_table (link_info
);
762 irelend
= internal_relocs
+ sec
->reloc_count
;
764 /* Get the section contents. */
765 if (elf_section_data (sec
)->this_hdr
.contents
!= NULL
)
766 contents
= elf_section_data (sec
)->this_hdr
.contents
;
769 if (!bfd_malloc_and_get_section (abfd
, sec
, &contents
))
773 for (irel
= internal_relocs
; irel
< irelend
; irel
++)
775 unsigned long r_type
= ELFNN_R_TYPE (irel
->r_info
);
776 bfd_vma symaddr
, reladdr
, trampoff
, toff
, roff
;
780 bfd_boolean is_branch
;
781 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
786 case R_IA64_PCREL21B
:
787 case R_IA64_PCREL21BI
:
788 case R_IA64_PCREL21M
:
789 case R_IA64_PCREL21F
:
790 /* In the finalize pass, all br relaxations are done. We can
792 if (!link_info
->need_relax_finalize
)
797 case R_IA64_PCREL60B
:
798 /* We can't optimize brl to br before the finalize pass since
799 br relaxations will increase the code size. Defer it to
800 the finalize pass. */
801 if (link_info
->need_relax_finalize
)
803 sec
->need_finalize_relax
= 1;
809 case R_IA64_LTOFF22X
:
811 /* We can't relax ldx/mov before the finalize pass since
812 br relaxations will increase the code size. Defer it to
813 the finalize pass. */
814 if (link_info
->need_relax_finalize
)
816 sec
->need_finalize_relax
= 1;
826 /* Get the value of the symbol referred to by the reloc. */
827 if (ELFNN_R_SYM (irel
->r_info
) < symtab_hdr
->sh_info
)
829 /* A local symbol. */
830 Elf_Internal_Sym
*isym
;
832 /* Read this BFD's local symbols. */
835 isymbuf
= (Elf_Internal_Sym
*) symtab_hdr
->contents
;
837 isymbuf
= bfd_elf_get_elf_syms (abfd
, symtab_hdr
,
838 symtab_hdr
->sh_info
, 0,
844 isym
= isymbuf
+ ELFNN_R_SYM (irel
->r_info
);
845 if (isym
->st_shndx
== SHN_UNDEF
)
846 continue; /* We can't do anything with undefined symbols. */
847 else if (isym
->st_shndx
== SHN_ABS
)
848 tsec
= bfd_abs_section_ptr
;
849 else if (isym
->st_shndx
== SHN_COMMON
)
850 tsec
= bfd_com_section_ptr
;
851 else if (isym
->st_shndx
== SHN_IA_64_ANSI_COMMON
)
852 tsec
= bfd_com_section_ptr
;
854 tsec
= bfd_section_from_elf_index (abfd
, isym
->st_shndx
);
856 toff
= isym
->st_value
;
857 dyn_i
= get_dyn_sym_info (ia64_info
, NULL
, abfd
, irel
, FALSE
);
858 symtype
= ELF_ST_TYPE (isym
->st_info
);
863 struct elf_link_hash_entry
*h
;
865 indx
= ELFNN_R_SYM (irel
->r_info
) - symtab_hdr
->sh_info
;
866 h
= elf_sym_hashes (abfd
)[indx
];
867 BFD_ASSERT (h
!= NULL
);
869 while (h
->root
.type
== bfd_link_hash_indirect
870 || h
->root
.type
== bfd_link_hash_warning
)
871 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
873 dyn_i
= get_dyn_sym_info (ia64_info
, h
, abfd
, irel
, FALSE
);
875 /* For branches to dynamic symbols, we're interested instead
876 in a branch to the PLT entry. */
877 if (is_branch
&& dyn_i
&& dyn_i
->want_plt2
)
879 /* Internal branches shouldn't be sent to the PLT.
880 Leave this for now and we'll give an error later. */
881 if (r_type
!= R_IA64_PCREL21B
)
884 tsec
= ia64_info
->plt_sec
;
885 toff
= dyn_i
->plt2_offset
;
886 BFD_ASSERT (irel
->r_addend
== 0);
889 /* Can't do anything else with dynamic symbols. */
890 else if (elfNN_ia64_dynamic_symbol_p (h
, link_info
, r_type
))
895 /* We can't do anything with undefined symbols. */
896 if (h
->root
.type
== bfd_link_hash_undefined
897 || h
->root
.type
== bfd_link_hash_undefweak
)
900 tsec
= h
->root
.u
.def
.section
;
901 toff
= h
->root
.u
.def
.value
;
907 if (tsec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
909 /* At this stage in linking, no SEC_MERGE symbol has been
910 adjusted, so all references to such symbols need to be
911 passed through _bfd_merged_section_offset. (Later, in
912 relocate_section, all SEC_MERGE symbols *except* for
913 section symbols have been adjusted.)
915 gas may reduce relocations against symbols in SEC_MERGE
916 sections to a relocation against the section symbol when
917 the original addend was zero. When the reloc is against
918 a section symbol we should include the addend in the
919 offset passed to _bfd_merged_section_offset, since the
920 location of interest is the original symbol. On the
921 other hand, an access to "sym+addend" where "sym" is not
922 a section symbol should not include the addend; Such an
923 access is presumed to be an offset from "sym"; The
924 location of interest is just "sym". */
925 if (symtype
== STT_SECTION
)
926 toff
+= irel
->r_addend
;
928 toff
= _bfd_merged_section_offset (abfd
, &tsec
,
929 elf_section_data (tsec
)->sec_info
,
932 if (symtype
!= STT_SECTION
)
933 toff
+= irel
->r_addend
;
936 toff
+= irel
->r_addend
;
938 symaddr
= tsec
->output_section
->vma
+ tsec
->output_offset
+ toff
;
940 roff
= irel
->r_offset
;
944 bfd_signed_vma offset
;
946 reladdr
= (sec
->output_section
->vma
948 + roff
) & (bfd_vma
) -4;
950 /* If the branch is in range, no need to do anything. */
951 if ((bfd_signed_vma
) (symaddr
- reladdr
) >= -0x1000000
952 && (bfd_signed_vma
) (symaddr
- reladdr
) <= 0x0FFFFF0)
954 /* If the 60-bit branch is in 21-bit range, optimize it. */
955 if (r_type
== R_IA64_PCREL60B
)
957 elfNN_ia64_relax_brl (contents
, roff
);
960 = ELF64_R_INFO (ELF64_R_SYM (irel
->r_info
),
963 /* If the original relocation offset points to slot
964 1, change it to slot 2. */
965 if ((irel
->r_offset
& 3) == 1)
971 else if (r_type
== R_IA64_PCREL60B
)
974 /* We can't put a trampoline in a .init/.fini section. Issue
976 if (strcmp (sec
->output_section
->name
, ".init") == 0
977 || strcmp (sec
->output_section
->name
, ".fini") == 0)
979 (*_bfd_error_handler
)
980 (_("%s: Can't relax br at 0x%lx in section `%s'. Please use brl or indirect branch."),
981 bfd_archive_filename (sec
->owner
),
982 (unsigned long) roff
, sec
->name
);
983 bfd_set_error (bfd_error_bad_value
);
987 /* If the branch and target are in the same section, you've
988 got one honking big section and we can't help you. You'll
989 get an error message later. */
993 /* Look for an existing fixup to this address. */
994 for (f
= fixups
; f
; f
= f
->next
)
995 if (f
->tsec
== tsec
&& f
->toff
== toff
)
1000 /* Two alternatives: If it's a branch to a PLT entry, we can
1001 make a copy of the FULL_PLT entry. Otherwise, we'll have
1002 to use a `brl' insn to get where we're going. */
1006 if (tsec
== ia64_info
->plt_sec
)
1007 size
= sizeof (plt_full_entry
);
1009 size
= oor_branch_size
;
1011 /* Resize the current section to make room for the new branch. */
1012 trampoff
= (sec
->size
+ 15) & (bfd_vma
) -16;
1014 /* If trampoline is out of range, there is nothing we
1016 offset
= trampoff
- (roff
& (bfd_vma
) -4);
1017 if (offset
< -0x1000000 || offset
> 0x0FFFFF0)
1020 amt
= trampoff
+ size
;
1021 contents
= (bfd_byte
*) bfd_realloc (contents
, amt
);
1022 if (contents
== NULL
)
1026 if (tsec
== ia64_info
->plt_sec
)
1028 memcpy (contents
+ trampoff
, plt_full_entry
, size
);
1030 /* Hijack the old relocation for use as the PLTOFF reloc. */
1031 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1033 irel
->r_offset
= trampoff
;
1037 if (size
== sizeof (oor_ip
))
1039 memcpy (contents
+ trampoff
, oor_ip
, size
);
1040 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1042 irel
->r_addend
-= 16;
1043 irel
->r_offset
= trampoff
+ 2;
1047 memcpy (contents
+ trampoff
, oor_brl
, size
);
1048 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1050 irel
->r_offset
= trampoff
+ 2;
1055 /* Record the fixup so we don't do it again this section. */
1056 f
= (struct one_fixup
*)
1057 bfd_malloc ((bfd_size_type
) sizeof (*f
));
1061 f
->trampoff
= trampoff
;
1066 /* If trampoline is out of range, there is nothing we
1068 offset
= f
->trampoff
- (roff
& (bfd_vma
) -4);
1069 if (offset
< -0x1000000 || offset
> 0x0FFFFF0)
1072 /* Nop out the reloc, since we're finalizing things here. */
1073 irel
->r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
1076 /* Fix up the existing branch to hit the trampoline. */
1077 if (elfNN_ia64_install_value (contents
+ roff
, offset
, r_type
)
1081 changed_contents
= TRUE
;
1082 changed_relocs
= TRUE
;
1089 bfd
*obfd
= sec
->output_section
->owner
;
1090 gp
= _bfd_get_gp_value (obfd
);
1093 if (!elfNN_ia64_choose_gp (obfd
, link_info
))
1095 gp
= _bfd_get_gp_value (obfd
);
1099 /* If the data is out of range, do nothing. */
1100 if ((bfd_signed_vma
) (symaddr
- gp
) >= 0x200000
1101 ||(bfd_signed_vma
) (symaddr
- gp
) < -0x200000)
1104 if (r_type
== R_IA64_LTOFF22X
)
1106 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
1108 changed_relocs
= TRUE
;
1109 if (dyn_i
->want_gotx
)
1111 dyn_i
->want_gotx
= 0;
1112 changed_got
|= !dyn_i
->want_got
;
1117 elfNN_ia64_relax_ldxmov (contents
, roff
);
1118 irel
->r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
1119 changed_contents
= TRUE
;
1120 changed_relocs
= TRUE
;
1125 /* ??? If we created fixups, this may push the code segment large
1126 enough that the data segment moves, which will change the GP.
1127 Reset the GP so that we re-calculate next round. We need to
1128 do this at the _beginning_ of the next round; now will not do. */
1130 /* Clean up and go home. */
1133 struct one_fixup
*f
= fixups
;
1134 fixups
= fixups
->next
;
1139 && symtab_hdr
->contents
!= (unsigned char *) isymbuf
)
1141 if (! link_info
->keep_memory
)
1145 /* Cache the symbols for elf_link_input_bfd. */
1146 symtab_hdr
->contents
= (unsigned char *) isymbuf
;
1150 if (contents
!= NULL
1151 && elf_section_data (sec
)->this_hdr
.contents
!= contents
)
1153 if (!changed_contents
&& !link_info
->keep_memory
)
1157 /* Cache the section contents for elf_link_input_bfd. */
1158 elf_section_data (sec
)->this_hdr
.contents
= contents
;
1162 if (elf_section_data (sec
)->relocs
!= internal_relocs
)
1164 if (!changed_relocs
)
1165 free (internal_relocs
);
1167 elf_section_data (sec
)->relocs
= internal_relocs
;
1172 struct elfNN_ia64_allocate_data data
;
1173 data
.info
= link_info
;
1175 ia64_info
->self_dtpmod_offset
= (bfd_vma
) -1;
1177 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_data_got
, &data
);
1178 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_fptr_got
, &data
);
1179 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_local_got
, &data
);
1180 ia64_info
->got_sec
->size
= data
.ofs
;
1182 /* ??? Resize .rela.got too. */
1185 if (!link_info
->need_relax_finalize
)
1186 sec
->need_finalize_relax
= 0;
1188 *again
= changed_contents
|| changed_relocs
;
1192 if (isymbuf
!= NULL
&& (unsigned char *) isymbuf
!= symtab_hdr
->contents
)
1194 if (contents
!= NULL
1195 && elf_section_data (sec
)->this_hdr
.contents
!= contents
)
1197 if (internal_relocs
!= NULL
1198 && elf_section_data (sec
)->relocs
!= internal_relocs
)
1199 free (internal_relocs
);
1204 elfNN_ia64_relax_ldxmov (contents
, off
)
1209 bfd_vma dword
, insn
;
1211 switch ((int)off
& 0x3)
1213 case 0: shift
= 5; break;
1214 case 1: shift
= 14; off
+= 3; break;
1215 case 2: shift
= 23; off
+= 6; break;
1220 dword
= bfd_getl64 (contents
+ off
);
1221 insn
= (dword
>> shift
) & 0x1ffffffffffLL
;
1223 r1
= (insn
>> 6) & 127;
1224 r3
= (insn
>> 20) & 127;
1226 insn
= 0x8000000; /* nop */
1228 insn
= (insn
& 0x7f01fff) | 0x10800000000LL
; /* (qp) mov r1 = r3 */
1230 dword
&= ~(0x1ffffffffffLL
<< shift
);
1231 dword
|= (insn
<< shift
);
1232 bfd_putl64 (dword
, contents
+ off
);
1235 /* Return TRUE if NAME is an unwind table section name. */
1237 static inline bfd_boolean
1238 is_unwind_section_name (abfd
, name
)
1242 size_t len1
, len2
, len3
;
1244 if (elfNN_ia64_hpux_vec (abfd
->xvec
)
1245 && !strcmp (name
, ELF_STRING_ia64_unwind_hdr
))
1248 len1
= sizeof (ELF_STRING_ia64_unwind
) - 1;
1249 len2
= sizeof (ELF_STRING_ia64_unwind_info
) - 1;
1250 len3
= sizeof (ELF_STRING_ia64_unwind_once
) - 1;
1251 return ((strncmp (name
, ELF_STRING_ia64_unwind
, len1
) == 0
1252 && strncmp (name
, ELF_STRING_ia64_unwind_info
, len2
) != 0)
1253 || strncmp (name
, ELF_STRING_ia64_unwind_once
, len3
) == 0);
1256 /* Handle an IA-64 specific section when reading an object file. This
1257 is called when elfcode.h finds a section with an unknown type. */
1260 elfNN_ia64_section_from_shdr (abfd
, hdr
, name
)
1262 Elf_Internal_Shdr
*hdr
;
1267 /* There ought to be a place to keep ELF backend specific flags, but
1268 at the moment there isn't one. We just keep track of the
1269 sections by their name, instead. Fortunately, the ABI gives
1270 suggested names for all the MIPS specific sections, so we will
1271 probably get away with this. */
1272 switch (hdr
->sh_type
)
1274 case SHT_IA_64_UNWIND
:
1275 case SHT_IA_64_HP_OPT_ANOT
:
1279 if (strcmp (name
, ELF_STRING_ia64_archext
) != 0)
1287 if (! _bfd_elf_make_section_from_shdr (abfd
, hdr
, name
))
1289 newsect
= hdr
->bfd_section
;
1294 /* Convert IA-64 specific section flags to bfd internal section flags. */
1296 /* ??? There is no bfd internal flag equivalent to the SHF_IA_64_NORECOV
1300 elfNN_ia64_section_flags (flags
, hdr
)
1302 const Elf_Internal_Shdr
*hdr
;
1304 if (hdr
->sh_flags
& SHF_IA_64_SHORT
)
1305 *flags
|= SEC_SMALL_DATA
;
1310 /* Set the correct type for an IA-64 ELF section. We do this by the
1311 section name, which is a hack, but ought to work. */
1314 elfNN_ia64_fake_sections (abfd
, hdr
, sec
)
1315 bfd
*abfd ATTRIBUTE_UNUSED
;
1316 Elf_Internal_Shdr
*hdr
;
1319 register const char *name
;
1321 name
= bfd_get_section_name (abfd
, sec
);
1323 if (is_unwind_section_name (abfd
, name
))
1325 /* We don't have the sections numbered at this point, so sh_info
1326 is set later, in elfNN_ia64_final_write_processing. */
1327 hdr
->sh_type
= SHT_IA_64_UNWIND
;
1328 hdr
->sh_flags
|= SHF_LINK_ORDER
;
1330 else if (strcmp (name
, ELF_STRING_ia64_archext
) == 0)
1331 hdr
->sh_type
= SHT_IA_64_EXT
;
1332 else if (strcmp (name
, ".HP.opt_annot") == 0)
1333 hdr
->sh_type
= SHT_IA_64_HP_OPT_ANOT
;
1334 else if (strcmp (name
, ".reloc") == 0)
1335 /* This is an ugly, but unfortunately necessary hack that is
1336 needed when producing EFI binaries on IA-64. It tells
1337 elf.c:elf_fake_sections() not to consider ".reloc" as a section
1338 containing ELF relocation info. We need this hack in order to
1339 be able to generate ELF binaries that can be translated into
1340 EFI applications (which are essentially COFF objects). Those
1341 files contain a COFF ".reloc" section inside an ELFNN object,
1342 which would normally cause BFD to segfault because it would
1343 attempt to interpret this section as containing relocation
1344 entries for section "oc". With this hack enabled, ".reloc"
1345 will be treated as a normal data section, which will avoid the
1346 segfault. However, you won't be able to create an ELFNN binary
1347 with a section named "oc" that needs relocations, but that's
1348 the kind of ugly side-effects you get when detecting section
1349 types based on their names... In practice, this limitation is
1350 unlikely to bite. */
1351 hdr
->sh_type
= SHT_PROGBITS
;
1353 if (sec
->flags
& SEC_SMALL_DATA
)
1354 hdr
->sh_flags
|= SHF_IA_64_SHORT
;
1359 /* The final processing done just before writing out an IA-64 ELF
1363 elfNN_ia64_final_write_processing (abfd
, linker
)
1365 bfd_boolean linker ATTRIBUTE_UNUSED
;
1367 Elf_Internal_Shdr
*hdr
;
1369 asection
*text_sect
, *s
;
1372 for (s
= abfd
->sections
; s
; s
= s
->next
)
1374 hdr
= &elf_section_data (s
)->this_hdr
;
1375 switch (hdr
->sh_type
)
1377 case SHT_IA_64_UNWIND
:
1378 /* See comments in gas/config/tc-ia64.c:dot_endp on why we
1380 sname
= bfd_get_section_name (abfd
, s
);
1381 len
= sizeof (ELF_STRING_ia64_unwind
) - 1;
1382 if (sname
&& strncmp (sname
, ELF_STRING_ia64_unwind
, len
) == 0)
1386 if (sname
[0] == '\0')
1387 /* .IA_64.unwind -> .text */
1388 text_sect
= bfd_get_section_by_name (abfd
, ".text");
1390 /* .IA_64.unwindFOO -> FOO */
1391 text_sect
= bfd_get_section_by_name (abfd
, sname
);
1394 && (len
= sizeof (ELF_STRING_ia64_unwind_once
) - 1,
1395 strncmp (sname
, ELF_STRING_ia64_unwind_once
, len
)) == 0)
1397 /* .gnu.linkonce.ia64unw.FOO -> .gnu.linkonce.t.FOO */
1398 size_t len2
= sizeof (".gnu.linkonce.t.") - 1;
1399 char *once_name
= bfd_malloc (len2
+ strlen (sname
+ len
) + 1);
1401 if (once_name
!= NULL
)
1403 memcpy (once_name
, ".gnu.linkonce.t.", len2
);
1404 strcpy (once_name
+ len2
, sname
+ len
);
1405 text_sect
= bfd_get_section_by_name (abfd
, once_name
);
1409 /* Should only happen if we run out of memory, in
1410 which case we're probably toast anyway. Try to
1411 cope by finding the section the slow way. */
1412 for (text_sect
= abfd
->sections
;
1414 text_sect
= text_sect
->next
)
1416 if (strncmp (bfd_section_name (abfd
, text_sect
),
1417 ".gnu.linkonce.t.", len2
) == 0
1418 && strcmp (bfd_section_name (abfd
, text_sect
) + len2
,
1424 /* last resort: fall back on .text */
1425 text_sect
= bfd_get_section_by_name (abfd
, ".text");
1429 /* The IA-64 processor-specific ABI requires setting
1430 sh_link to the unwind section, whereas HP-UX requires
1431 sh_info to do so. For maximum compatibility, we'll
1432 set both for now... */
1433 hdr
->sh_link
= elf_section_data (text_sect
)->this_idx
;
1434 hdr
->sh_info
= elf_section_data (text_sect
)->this_idx
;
1440 if (! elf_flags_init (abfd
))
1442 unsigned long flags
= 0;
1444 if (abfd
->xvec
->byteorder
== BFD_ENDIAN_BIG
)
1445 flags
|= EF_IA_64_BE
;
1446 if (bfd_get_mach (abfd
) == bfd_mach_ia64_elf64
)
1447 flags
|= EF_IA_64_ABI64
;
1449 elf_elfheader(abfd
)->e_flags
= flags
;
1450 elf_flags_init (abfd
) = TRUE
;
1454 /* Hook called by the linker routine which adds symbols from an object
1455 file. We use it to put .comm items in .sbss, and not .bss. */
1458 elfNN_ia64_add_symbol_hook (abfd
, info
, sym
, namep
, flagsp
, secp
, valp
)
1460 struct bfd_link_info
*info
;
1461 Elf_Internal_Sym
*sym
;
1462 const char **namep ATTRIBUTE_UNUSED
;
1463 flagword
*flagsp ATTRIBUTE_UNUSED
;
1467 if (sym
->st_shndx
== SHN_COMMON
1468 && !info
->relocatable
1469 && sym
->st_size
<= elf_gp_size (abfd
))
1471 /* Common symbols less than or equal to -G nn bytes are
1472 automatically put into .sbss. */
1474 asection
*scomm
= bfd_get_section_by_name (abfd
, ".scommon");
1478 scomm
= bfd_make_section (abfd
, ".scommon");
1480 || !bfd_set_section_flags (abfd
, scomm
, (SEC_ALLOC
1482 | SEC_LINKER_CREATED
)))
1487 *valp
= sym
->st_size
;
1493 /* Return the number of additional phdrs we will need. */
1496 elfNN_ia64_additional_program_headers (abfd
)
1502 /* See if we need a PT_IA_64_ARCHEXT segment. */
1503 s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_archext
);
1504 if (s
&& (s
->flags
& SEC_LOAD
))
1507 /* Count how many PT_IA_64_UNWIND segments we need. */
1508 for (s
= abfd
->sections
; s
; s
= s
->next
)
1509 if (is_unwind_section_name (abfd
, s
->name
) && (s
->flags
& SEC_LOAD
))
1516 elfNN_ia64_modify_segment_map (abfd
, info
)
1518 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
1520 struct elf_segment_map
*m
, **pm
;
1521 Elf_Internal_Shdr
*hdr
;
1524 /* If we need a PT_IA_64_ARCHEXT segment, it must come before
1525 all PT_LOAD segments. */
1526 s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_archext
);
1527 if (s
&& (s
->flags
& SEC_LOAD
))
1529 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1530 if (m
->p_type
== PT_IA_64_ARCHEXT
)
1534 m
= ((struct elf_segment_map
*)
1535 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *m
));
1539 m
->p_type
= PT_IA_64_ARCHEXT
;
1543 /* We want to put it after the PHDR and INTERP segments. */
1544 pm
= &elf_tdata (abfd
)->segment_map
;
1546 && ((*pm
)->p_type
== PT_PHDR
1547 || (*pm
)->p_type
== PT_INTERP
))
1555 /* Install PT_IA_64_UNWIND segments, if needed. */
1556 for (s
= abfd
->sections
; s
; s
= s
->next
)
1558 hdr
= &elf_section_data (s
)->this_hdr
;
1559 if (hdr
->sh_type
!= SHT_IA_64_UNWIND
)
1562 if (s
&& (s
->flags
& SEC_LOAD
))
1564 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1565 if (m
->p_type
== PT_IA_64_UNWIND
)
1569 /* Look through all sections in the unwind segment
1570 for a match since there may be multiple sections
1572 for (i
= m
->count
- 1; i
>= 0; --i
)
1573 if (m
->sections
[i
] == s
)
1582 m
= ((struct elf_segment_map
*)
1583 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *m
));
1587 m
->p_type
= PT_IA_64_UNWIND
;
1592 /* We want to put it last. */
1593 pm
= &elf_tdata (abfd
)->segment_map
;
1601 /* Turn on PF_IA_64_NORECOV if needed. This involves traversing all of
1602 the input sections for each output section in the segment and testing
1603 for SHF_IA_64_NORECOV on each. */
1604 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1605 if (m
->p_type
== PT_LOAD
)
1608 for (i
= m
->count
- 1; i
>= 0; --i
)
1610 struct bfd_link_order
*order
= m
->sections
[i
]->link_order_head
;
1613 if (order
->type
== bfd_indirect_link_order
)
1615 asection
*is
= order
->u
.indirect
.section
;
1616 bfd_vma flags
= elf_section_data(is
)->this_hdr
.sh_flags
;
1617 if (flags
& SHF_IA_64_NORECOV
)
1619 m
->p_flags
|= PF_IA_64_NORECOV
;
1623 order
= order
->next
;
1632 /* According to the Tahoe assembler spec, all labels starting with a
1636 elfNN_ia64_is_local_label_name (abfd
, name
)
1637 bfd
*abfd ATTRIBUTE_UNUSED
;
1640 return name
[0] == '.';
1643 /* Should we do dynamic things to this symbol? */
1646 elfNN_ia64_dynamic_symbol_p (h
, info
, r_type
)
1647 struct elf_link_hash_entry
*h
;
1648 struct bfd_link_info
*info
;
1651 bfd_boolean ignore_protected
1652 = ((r_type
& 0xf8) == 0x40 /* FPTR relocs */
1653 || (r_type
& 0xf8) == 0x50); /* LTOFF_FPTR relocs */
1655 return _bfd_elf_dynamic_symbol_p (h
, info
, ignore_protected
);
1658 static struct bfd_hash_entry
*
1659 elfNN_ia64_new_elf_hash_entry (entry
, table
, string
)
1660 struct bfd_hash_entry
*entry
;
1661 struct bfd_hash_table
*table
;
1664 struct elfNN_ia64_link_hash_entry
*ret
;
1665 ret
= (struct elfNN_ia64_link_hash_entry
*) entry
;
1667 /* Allocate the structure if it has not already been allocated by a
1670 ret
= bfd_hash_allocate (table
, sizeof (*ret
));
1675 /* Initialize our local data. All zeros, and definitely easier
1676 than setting a handful of bit fields. */
1677 memset (ret
, 0, sizeof (*ret
));
1679 /* Call the allocation method of the superclass. */
1680 ret
= ((struct elfNN_ia64_link_hash_entry
*)
1681 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry
*) ret
,
1684 return (struct bfd_hash_entry
*) ret
;
1688 elfNN_ia64_hash_copy_indirect (bed
, xdir
, xind
)
1689 const struct elf_backend_data
*bed ATTRIBUTE_UNUSED
;
1690 struct elf_link_hash_entry
*xdir
, *xind
;
1692 struct elfNN_ia64_link_hash_entry
*dir
, *ind
;
1694 dir
= (struct elfNN_ia64_link_hash_entry
*) xdir
;
1695 ind
= (struct elfNN_ia64_link_hash_entry
*) xind
;
1697 /* Copy down any references that we may have already seen to the
1698 symbol which just became indirect. */
1700 dir
->root
.elf_link_hash_flags
|=
1701 (ind
->root
.elf_link_hash_flags
1702 & (ELF_LINK_HASH_REF_DYNAMIC
1703 | ELF_LINK_HASH_REF_REGULAR
1704 | ELF_LINK_HASH_REF_REGULAR_NONWEAK
1705 | ELF_LINK_HASH_NEEDS_PLT
));
1707 if (ind
->root
.root
.type
!= bfd_link_hash_indirect
)
1710 /* Copy over the got and plt data. This would have been done
1713 if (dir
->info
== NULL
)
1715 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1717 dir
->info
= dyn_i
= ind
->info
;
1720 /* Fix up the dyn_sym_info pointers to the global symbol. */
1721 for (; dyn_i
; dyn_i
= dyn_i
->next
)
1722 dyn_i
->h
= &dir
->root
;
1724 BFD_ASSERT (ind
->info
== NULL
);
1726 /* Copy over the dynindx. */
1728 if (dir
->root
.dynindx
== -1)
1730 dir
->root
.dynindx
= ind
->root
.dynindx
;
1731 dir
->root
.dynstr_index
= ind
->root
.dynstr_index
;
1732 ind
->root
.dynindx
= -1;
1733 ind
->root
.dynstr_index
= 0;
1735 BFD_ASSERT (ind
->root
.dynindx
== -1);
1739 elfNN_ia64_hash_hide_symbol (info
, xh
, force_local
)
1740 struct bfd_link_info
*info
;
1741 struct elf_link_hash_entry
*xh
;
1742 bfd_boolean force_local
;
1744 struct elfNN_ia64_link_hash_entry
*h
;
1745 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1747 h
= (struct elfNN_ia64_link_hash_entry
*)xh
;
1749 _bfd_elf_link_hash_hide_symbol (info
, &h
->root
, force_local
);
1751 for (dyn_i
= h
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1753 dyn_i
->want_plt2
= 0;
1754 dyn_i
->want_plt
= 0;
1758 /* Compute a hash of a local hash entry. */
1761 elfNN_ia64_local_htab_hash (ptr
)
1764 struct elfNN_ia64_local_hash_entry
*entry
1765 = (struct elfNN_ia64_local_hash_entry
*) ptr
;
1767 return (((entry
->id
& 0xff) << 24) | ((entry
->id
& 0xff00) << 8))
1768 ^ entry
->r_sym
^ (entry
->id
>> 16);
1771 /* Compare local hash entries. */
1774 elfNN_ia64_local_htab_eq (ptr1
, ptr2
)
1775 const void *ptr1
, *ptr2
;
1777 struct elfNN_ia64_local_hash_entry
*entry1
1778 = (struct elfNN_ia64_local_hash_entry
*) ptr1
;
1779 struct elfNN_ia64_local_hash_entry
*entry2
1780 = (struct elfNN_ia64_local_hash_entry
*) ptr2
;
1782 return entry1
->id
== entry2
->id
&& entry1
->r_sym
== entry2
->r_sym
;
1785 /* Create the derived linker hash table. The IA-64 ELF port uses this
1786 derived hash table to keep information specific to the IA-64 ElF
1787 linker (without using static variables). */
1789 static struct bfd_link_hash_table
*
1790 elfNN_ia64_hash_table_create (abfd
)
1793 struct elfNN_ia64_link_hash_table
*ret
;
1795 ret
= bfd_zmalloc ((bfd_size_type
) sizeof (*ret
));
1799 if (!_bfd_elf_link_hash_table_init (&ret
->root
, abfd
,
1800 elfNN_ia64_new_elf_hash_entry
))
1806 ret
->loc_hash_table
= htab_try_create (1024, elfNN_ia64_local_htab_hash
,
1807 elfNN_ia64_local_htab_eq
, NULL
);
1808 ret
->loc_hash_memory
= objalloc_create ();
1809 if (!ret
->loc_hash_table
|| !ret
->loc_hash_memory
)
1815 return &ret
->root
.root
;
1818 /* Destroy IA-64 linker hash table. */
1821 elfNN_ia64_hash_table_free (hash
)
1822 struct bfd_link_hash_table
*hash
;
1824 struct elfNN_ia64_link_hash_table
*ia64_info
1825 = (struct elfNN_ia64_link_hash_table
*) hash
;
1826 if (ia64_info
->loc_hash_table
)
1827 htab_delete (ia64_info
->loc_hash_table
);
1828 if (ia64_info
->loc_hash_memory
)
1829 objalloc_free ((struct objalloc
*) ia64_info
->loc_hash_memory
);
1830 _bfd_generic_link_hash_table_free (hash
);
1833 /* Traverse both local and global hash tables. */
1835 struct elfNN_ia64_dyn_sym_traverse_data
1837 bfd_boolean (*func
) PARAMS ((struct elfNN_ia64_dyn_sym_info
*, PTR
));
1842 elfNN_ia64_global_dyn_sym_thunk (xentry
, xdata
)
1843 struct bfd_hash_entry
*xentry
;
1846 struct elfNN_ia64_link_hash_entry
*entry
1847 = (struct elfNN_ia64_link_hash_entry
*) xentry
;
1848 struct elfNN_ia64_dyn_sym_traverse_data
*data
1849 = (struct elfNN_ia64_dyn_sym_traverse_data
*) xdata
;
1850 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1852 if (entry
->root
.root
.type
== bfd_link_hash_warning
)
1853 entry
= (struct elfNN_ia64_link_hash_entry
*) entry
->root
.root
.u
.i
.link
;
1855 for (dyn_i
= entry
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1856 if (! (*data
->func
) (dyn_i
, data
->data
))
1862 elfNN_ia64_local_dyn_sym_thunk (slot
, xdata
)
1866 struct elfNN_ia64_local_hash_entry
*entry
1867 = (struct elfNN_ia64_local_hash_entry
*) *slot
;
1868 struct elfNN_ia64_dyn_sym_traverse_data
*data
1869 = (struct elfNN_ia64_dyn_sym_traverse_data
*) xdata
;
1870 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1872 for (dyn_i
= entry
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1873 if (! (*data
->func
) (dyn_i
, data
->data
))
1879 elfNN_ia64_dyn_sym_traverse (ia64_info
, func
, data
)
1880 struct elfNN_ia64_link_hash_table
*ia64_info
;
1881 bfd_boolean (*func
) PARAMS ((struct elfNN_ia64_dyn_sym_info
*, PTR
));
1884 struct elfNN_ia64_dyn_sym_traverse_data xdata
;
1889 elf_link_hash_traverse (&ia64_info
->root
,
1890 elfNN_ia64_global_dyn_sym_thunk
, &xdata
);
1891 htab_traverse (ia64_info
->loc_hash_table
,
1892 elfNN_ia64_local_dyn_sym_thunk
, &xdata
);
1896 elfNN_ia64_create_dynamic_sections (abfd
, info
)
1898 struct bfd_link_info
*info
;
1900 struct elfNN_ia64_link_hash_table
*ia64_info
;
1903 if (! _bfd_elf_create_dynamic_sections (abfd
, info
))
1906 ia64_info
= elfNN_ia64_hash_table (info
);
1908 ia64_info
->plt_sec
= bfd_get_section_by_name (abfd
, ".plt");
1909 ia64_info
->got_sec
= bfd_get_section_by_name (abfd
, ".got");
1912 flagword flags
= bfd_get_section_flags (abfd
, ia64_info
->got_sec
);
1913 bfd_set_section_flags (abfd
, ia64_info
->got_sec
, SEC_SMALL_DATA
| flags
);
1914 /* The .got section is always aligned at 8 bytes. */
1915 bfd_set_section_alignment (abfd
, ia64_info
->got_sec
, 3);
1918 if (!get_pltoff (abfd
, info
, ia64_info
))
1921 s
= bfd_make_section(abfd
, ".rela.IA_64.pltoff");
1923 || !bfd_set_section_flags (abfd
, s
, (SEC_ALLOC
| SEC_LOAD
1926 | SEC_LINKER_CREATED
1928 || !bfd_set_section_alignment (abfd
, s
, 3))
1930 ia64_info
->rel_pltoff_sec
= s
;
1932 s
= bfd_make_section(abfd
, ".rela.got");
1934 || !bfd_set_section_flags (abfd
, s
, (SEC_ALLOC
| SEC_LOAD
1937 | SEC_LINKER_CREATED
1939 || !bfd_set_section_alignment (abfd
, s
, 3))
1941 ia64_info
->rel_got_sec
= s
;
1946 /* Find and/or create a hash entry for local symbol. */
1947 static struct elfNN_ia64_local_hash_entry
*
1948 get_local_sym_hash (ia64_info
, abfd
, rel
, create
)
1949 struct elfNN_ia64_link_hash_table
*ia64_info
;
1951 const Elf_Internal_Rela
*rel
;
1954 struct elfNN_ia64_local_hash_entry e
, *ret
;
1955 asection
*sec
= abfd
->sections
;
1956 hashval_t h
= (((sec
->id
& 0xff) << 24) | ((sec
->id
& 0xff00) << 8))
1957 ^ ELFNN_R_SYM (rel
->r_info
) ^ (sec
->id
>> 16);
1961 e
.r_sym
= ELFNN_R_SYM (rel
->r_info
);
1962 slot
= htab_find_slot_with_hash (ia64_info
->loc_hash_table
, &e
, h
,
1963 create
? INSERT
: NO_INSERT
);
1969 return (struct elfNN_ia64_local_hash_entry
*) *slot
;
1971 ret
= (struct elfNN_ia64_local_hash_entry
*)
1972 objalloc_alloc ((struct objalloc
*) ia64_info
->loc_hash_memory
,
1973 sizeof (struct elfNN_ia64_local_hash_entry
));
1976 memset (ret
, 0, sizeof (*ret
));
1978 ret
->r_sym
= ELFNN_R_SYM (rel
->r_info
);
1984 /* Find and/or create a descriptor for dynamic symbol info. This will
1985 vary based on global or local symbol, and the addend to the reloc. */
1987 static struct elfNN_ia64_dyn_sym_info
*
1988 get_dyn_sym_info (ia64_info
, h
, abfd
, rel
, create
)
1989 struct elfNN_ia64_link_hash_table
*ia64_info
;
1990 struct elf_link_hash_entry
*h
;
1992 const Elf_Internal_Rela
*rel
;
1995 struct elfNN_ia64_dyn_sym_info
**pp
;
1996 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1997 bfd_vma addend
= rel
? rel
->r_addend
: 0;
2000 pp
= &((struct elfNN_ia64_link_hash_entry
*)h
)->info
;
2003 struct elfNN_ia64_local_hash_entry
*loc_h
;
2005 loc_h
= get_local_sym_hash (ia64_info
, abfd
, rel
, create
);
2008 BFD_ASSERT (!create
);
2015 for (dyn_i
= *pp
; dyn_i
&& dyn_i
->addend
!= addend
; dyn_i
= *pp
)
2018 if (dyn_i
== NULL
&& create
)
2020 dyn_i
= ((struct elfNN_ia64_dyn_sym_info
*)
2021 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *dyn_i
));
2023 dyn_i
->addend
= addend
;
2030 get_got (abfd
, info
, ia64_info
)
2032 struct bfd_link_info
*info
;
2033 struct elfNN_ia64_link_hash_table
*ia64_info
;
2038 got
= ia64_info
->got_sec
;
2043 dynobj
= ia64_info
->root
.dynobj
;
2045 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2046 if (!_bfd_elf_create_got_section (dynobj
, info
))
2049 got
= bfd_get_section_by_name (dynobj
, ".got");
2051 ia64_info
->got_sec
= got
;
2053 /* The .got section is always aligned at 8 bytes. */
2054 if (!bfd_set_section_alignment (abfd
, got
, 3))
2057 flags
= bfd_get_section_flags (abfd
, got
);
2058 bfd_set_section_flags (abfd
, got
, SEC_SMALL_DATA
| flags
);
2064 /* Create function descriptor section (.opd). This section is called .opd
2065 because it contains "official procedure descriptors". The "official"
2066 refers to the fact that these descriptors are used when taking the address
2067 of a procedure, thus ensuring a unique address for each procedure. */
2070 get_fptr (abfd
, info
, ia64_info
)
2072 struct bfd_link_info
*info
;
2073 struct elfNN_ia64_link_hash_table
*ia64_info
;
2078 fptr
= ia64_info
->fptr_sec
;
2081 dynobj
= ia64_info
->root
.dynobj
;
2083 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2085 fptr
= bfd_make_section (dynobj
, ".opd");
2087 || !bfd_set_section_flags (dynobj
, fptr
,
2092 | (info
->pie
? 0 : SEC_READONLY
)
2093 | SEC_LINKER_CREATED
))
2094 || !bfd_set_section_alignment (abfd
, fptr
, 4))
2100 ia64_info
->fptr_sec
= fptr
;
2105 fptr_rel
= bfd_make_section(dynobj
, ".rela.opd");
2106 if (fptr_rel
== NULL
2107 || !bfd_set_section_flags (dynobj
, fptr_rel
,
2108 (SEC_ALLOC
| SEC_LOAD
2111 | SEC_LINKER_CREATED
2113 || !bfd_set_section_alignment (abfd
, fptr_rel
, 3))
2119 ia64_info
->rel_fptr_sec
= fptr_rel
;
2127 get_pltoff (abfd
, info
, ia64_info
)
2129 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
2130 struct elfNN_ia64_link_hash_table
*ia64_info
;
2135 pltoff
= ia64_info
->pltoff_sec
;
2138 dynobj
= ia64_info
->root
.dynobj
;
2140 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2142 pltoff
= bfd_make_section (dynobj
, ELF_STRING_ia64_pltoff
);
2144 || !bfd_set_section_flags (dynobj
, pltoff
,
2150 | SEC_LINKER_CREATED
))
2151 || !bfd_set_section_alignment (abfd
, pltoff
, 4))
2157 ia64_info
->pltoff_sec
= pltoff
;
2164 get_reloc_section (abfd
, ia64_info
, sec
, create
)
2166 struct elfNN_ia64_link_hash_table
*ia64_info
;
2170 const char *srel_name
;
2174 srel_name
= (bfd_elf_string_from_elf_section
2175 (abfd
, elf_elfheader(abfd
)->e_shstrndx
,
2176 elf_section_data(sec
)->rel_hdr
.sh_name
));
2177 if (srel_name
== NULL
)
2180 BFD_ASSERT ((strncmp (srel_name
, ".rela", 5) == 0
2181 && strcmp (bfd_get_section_name (abfd
, sec
),
2183 || (strncmp (srel_name
, ".rel", 4) == 0
2184 && strcmp (bfd_get_section_name (abfd
, sec
),
2185 srel_name
+4) == 0));
2187 dynobj
= ia64_info
->root
.dynobj
;
2189 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2191 srel
= bfd_get_section_by_name (dynobj
, srel_name
);
2192 if (srel
== NULL
&& create
)
2194 srel
= bfd_make_section (dynobj
, srel_name
);
2196 || !bfd_set_section_flags (dynobj
, srel
,
2201 | SEC_LINKER_CREATED
2203 || !bfd_set_section_alignment (dynobj
, srel
, 3))
2211 count_dyn_reloc (bfd
*abfd
, struct elfNN_ia64_dyn_sym_info
*dyn_i
,
2212 asection
*srel
, int type
, bfd_boolean reltext
)
2214 struct elfNN_ia64_dyn_reloc_entry
*rent
;
2216 for (rent
= dyn_i
->reloc_entries
; rent
; rent
= rent
->next
)
2217 if (rent
->srel
== srel
&& rent
->type
== type
)
2222 rent
= ((struct elfNN_ia64_dyn_reloc_entry
*)
2223 bfd_alloc (abfd
, (bfd_size_type
) sizeof (*rent
)));
2227 rent
->next
= dyn_i
->reloc_entries
;
2231 dyn_i
->reloc_entries
= rent
;
2233 rent
->reltext
= reltext
;
2240 elfNN_ia64_check_relocs (abfd
, info
, sec
, relocs
)
2242 struct bfd_link_info
*info
;
2244 const Elf_Internal_Rela
*relocs
;
2246 struct elfNN_ia64_link_hash_table
*ia64_info
;
2247 const Elf_Internal_Rela
*relend
;
2248 Elf_Internal_Shdr
*symtab_hdr
;
2249 const Elf_Internal_Rela
*rel
;
2250 asection
*got
, *fptr
, *srel
, *pltoff
;
2252 if (info
->relocatable
)
2255 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
2256 ia64_info
= elfNN_ia64_hash_table (info
);
2258 got
= fptr
= srel
= pltoff
= NULL
;
2260 relend
= relocs
+ sec
->reloc_count
;
2261 for (rel
= relocs
; rel
< relend
; ++rel
)
2271 NEED_LTOFF_FPTR
= 128,
2277 struct elf_link_hash_entry
*h
= NULL
;
2278 unsigned long r_symndx
= ELFNN_R_SYM (rel
->r_info
);
2279 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2281 bfd_boolean maybe_dynamic
;
2282 int dynrel_type
= R_IA64_NONE
;
2284 if (r_symndx
>= symtab_hdr
->sh_info
)
2286 /* We're dealing with a global symbol -- find its hash entry
2287 and mark it as being referenced. */
2288 long indx
= r_symndx
- symtab_hdr
->sh_info
;
2289 h
= elf_sym_hashes (abfd
)[indx
];
2290 while (h
->root
.type
== bfd_link_hash_indirect
2291 || h
->root
.type
== bfd_link_hash_warning
)
2292 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2294 h
->elf_link_hash_flags
|= ELF_LINK_HASH_REF_REGULAR
;
2297 /* We can only get preliminary data on whether a symbol is
2298 locally or externally defined, as not all of the input files
2299 have yet been processed. Do something with what we know, as
2300 this may help reduce memory usage and processing time later. */
2301 maybe_dynamic
= FALSE
;
2302 if (h
&& ((!info
->executable
2303 && (!info
->symbolic
|| info
->unresolved_syms_in_shared_libs
== RM_IGNORE
))
2304 || ! (h
->elf_link_hash_flags
& ELF_LINK_HASH_DEF_REGULAR
)
2305 || h
->root
.type
== bfd_link_hash_defweak
))
2306 maybe_dynamic
= TRUE
;
2309 switch (ELFNN_R_TYPE (rel
->r_info
))
2311 case R_IA64_TPREL64MSB
:
2312 case R_IA64_TPREL64LSB
:
2313 if (info
->shared
|| maybe_dynamic
)
2314 need_entry
= NEED_DYNREL
;
2315 dynrel_type
= R_IA64_TPREL64LSB
;
2317 info
->flags
|= DF_STATIC_TLS
;
2320 case R_IA64_LTOFF_TPREL22
:
2321 need_entry
= NEED_TPREL
;
2323 info
->flags
|= DF_STATIC_TLS
;
2326 case R_IA64_DTPREL64MSB
:
2327 case R_IA64_DTPREL64LSB
:
2328 if (info
->shared
|| maybe_dynamic
)
2329 need_entry
= NEED_DYNREL
;
2330 dynrel_type
= R_IA64_DTPREL64LSB
;
2333 case R_IA64_LTOFF_DTPREL22
:
2334 need_entry
= NEED_DTPREL
;
2337 case R_IA64_DTPMOD64MSB
:
2338 case R_IA64_DTPMOD64LSB
:
2339 if (info
->shared
|| maybe_dynamic
)
2340 need_entry
= NEED_DYNREL
;
2341 dynrel_type
= R_IA64_DTPMOD64LSB
;
2344 case R_IA64_LTOFF_DTPMOD22
:
2345 need_entry
= NEED_DTPMOD
;
2348 case R_IA64_LTOFF_FPTR22
:
2349 case R_IA64_LTOFF_FPTR64I
:
2350 case R_IA64_LTOFF_FPTR32MSB
:
2351 case R_IA64_LTOFF_FPTR32LSB
:
2352 case R_IA64_LTOFF_FPTR64MSB
:
2353 case R_IA64_LTOFF_FPTR64LSB
:
2354 need_entry
= NEED_FPTR
| NEED_GOT
| NEED_LTOFF_FPTR
;
2357 case R_IA64_FPTR64I
:
2358 case R_IA64_FPTR32MSB
:
2359 case R_IA64_FPTR32LSB
:
2360 case R_IA64_FPTR64MSB
:
2361 case R_IA64_FPTR64LSB
:
2362 if (info
->shared
|| h
)
2363 need_entry
= NEED_FPTR
| NEED_DYNREL
;
2365 need_entry
= NEED_FPTR
;
2366 dynrel_type
= R_IA64_FPTR64LSB
;
2369 case R_IA64_LTOFF22
:
2370 case R_IA64_LTOFF64I
:
2371 need_entry
= NEED_GOT
;
2374 case R_IA64_LTOFF22X
:
2375 need_entry
= NEED_GOTX
;
2378 case R_IA64_PLTOFF22
:
2379 case R_IA64_PLTOFF64I
:
2380 case R_IA64_PLTOFF64MSB
:
2381 case R_IA64_PLTOFF64LSB
:
2382 need_entry
= NEED_PLTOFF
;
2386 need_entry
|= NEED_MIN_PLT
;
2390 (*info
->callbacks
->warning
)
2391 (info
, _("@pltoff reloc against local symbol"), 0,
2392 abfd
, 0, (bfd_vma
) 0);
2396 case R_IA64_PCREL21B
:
2397 case R_IA64_PCREL60B
:
2398 /* Depending on where this symbol is defined, we may or may not
2399 need a full plt entry. Only skip if we know we'll not need
2400 the entry -- static or symbolic, and the symbol definition
2401 has already been seen. */
2402 if (maybe_dynamic
&& rel
->r_addend
== 0)
2403 need_entry
= NEED_FULL_PLT
;
2409 case R_IA64_DIR32MSB
:
2410 case R_IA64_DIR32LSB
:
2411 case R_IA64_DIR64MSB
:
2412 case R_IA64_DIR64LSB
:
2413 /* Shared objects will always need at least a REL relocation. */
2414 if (info
->shared
|| maybe_dynamic
)
2415 need_entry
= NEED_DYNREL
;
2416 dynrel_type
= R_IA64_DIR64LSB
;
2419 case R_IA64_IPLTMSB
:
2420 case R_IA64_IPLTLSB
:
2421 /* Shared objects will always need at least a REL relocation. */
2422 if (info
->shared
|| maybe_dynamic
)
2423 need_entry
= NEED_DYNREL
;
2424 dynrel_type
= R_IA64_IPLTLSB
;
2427 case R_IA64_PCREL22
:
2428 case R_IA64_PCREL64I
:
2429 case R_IA64_PCREL32MSB
:
2430 case R_IA64_PCREL32LSB
:
2431 case R_IA64_PCREL64MSB
:
2432 case R_IA64_PCREL64LSB
:
2434 need_entry
= NEED_DYNREL
;
2435 dynrel_type
= R_IA64_PCREL64LSB
;
2442 if ((need_entry
& NEED_FPTR
) != 0
2445 (*info
->callbacks
->warning
)
2446 (info
, _("non-zero addend in @fptr reloc"), 0,
2447 abfd
, 0, (bfd_vma
) 0);
2450 dyn_i
= get_dyn_sym_info (ia64_info
, h
, abfd
, rel
, TRUE
);
2452 /* Record whether or not this is a local symbol. */
2455 /* Create what's needed. */
2456 if (need_entry
& (NEED_GOT
| NEED_GOTX
| NEED_TPREL
2457 | NEED_DTPMOD
| NEED_DTPREL
))
2461 got
= get_got (abfd
, info
, ia64_info
);
2465 if (need_entry
& NEED_GOT
)
2466 dyn_i
->want_got
= 1;
2467 if (need_entry
& NEED_GOTX
)
2468 dyn_i
->want_gotx
= 1;
2469 if (need_entry
& NEED_TPREL
)
2470 dyn_i
->want_tprel
= 1;
2471 if (need_entry
& NEED_DTPMOD
)
2472 dyn_i
->want_dtpmod
= 1;
2473 if (need_entry
& NEED_DTPREL
)
2474 dyn_i
->want_dtprel
= 1;
2476 if (need_entry
& NEED_FPTR
)
2480 fptr
= get_fptr (abfd
, info
, ia64_info
);
2485 /* FPTRs for shared libraries are allocated by the dynamic
2486 linker. Make sure this local symbol will appear in the
2487 dynamic symbol table. */
2488 if (!h
&& info
->shared
)
2490 if (! (bfd_elf_link_record_local_dynamic_symbol
2491 (info
, abfd
, (long) r_symndx
)))
2495 dyn_i
->want_fptr
= 1;
2497 if (need_entry
& NEED_LTOFF_FPTR
)
2498 dyn_i
->want_ltoff_fptr
= 1;
2499 if (need_entry
& (NEED_MIN_PLT
| NEED_FULL_PLT
))
2501 if (!ia64_info
->root
.dynobj
)
2502 ia64_info
->root
.dynobj
= abfd
;
2503 h
->elf_link_hash_flags
|= ELF_LINK_HASH_NEEDS_PLT
;
2504 dyn_i
->want_plt
= 1;
2506 if (need_entry
& NEED_FULL_PLT
)
2507 dyn_i
->want_plt2
= 1;
2508 if (need_entry
& NEED_PLTOFF
)
2510 /* This is needed here, in case @pltoff is used in a non-shared
2514 pltoff
= get_pltoff (abfd
, info
, ia64_info
);
2519 dyn_i
->want_pltoff
= 1;
2521 if ((need_entry
& NEED_DYNREL
) && (sec
->flags
& SEC_ALLOC
))
2525 srel
= get_reloc_section (abfd
, ia64_info
, sec
, TRUE
);
2529 if (!count_dyn_reloc (abfd
, dyn_i
, srel
, dynrel_type
,
2530 (sec
->flags
& SEC_READONLY
) != 0))
2538 /* For cleanliness, and potentially faster dynamic loading, allocate
2539 external GOT entries first. */
2542 allocate_global_data_got (dyn_i
, data
)
2543 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2546 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2548 if ((dyn_i
->want_got
|| dyn_i
->want_gotx
)
2549 && ! dyn_i
->want_fptr
2550 && elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2552 dyn_i
->got_offset
= x
->ofs
;
2555 if (dyn_i
->want_tprel
)
2557 dyn_i
->tprel_offset
= x
->ofs
;
2560 if (dyn_i
->want_dtpmod
)
2562 if (elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2564 dyn_i
->dtpmod_offset
= x
->ofs
;
2569 struct elfNN_ia64_link_hash_table
*ia64_info
;
2571 ia64_info
= elfNN_ia64_hash_table (x
->info
);
2572 if (ia64_info
->self_dtpmod_offset
== (bfd_vma
) -1)
2574 ia64_info
->self_dtpmod_offset
= x
->ofs
;
2577 dyn_i
->dtpmod_offset
= ia64_info
->self_dtpmod_offset
;
2580 if (dyn_i
->want_dtprel
)
2582 dyn_i
->dtprel_offset
= x
->ofs
;
2588 /* Next, allocate all the GOT entries used by LTOFF_FPTR relocs. */
2591 allocate_global_fptr_got (dyn_i
, data
)
2592 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2595 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2599 && elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, R_IA64_FPTR64LSB
))
2601 dyn_i
->got_offset
= x
->ofs
;
2607 /* Lastly, allocate all the GOT entries for local data. */
2610 allocate_local_got (dyn_i
, data
)
2611 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2614 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2616 if ((dyn_i
->want_got
|| dyn_i
->want_gotx
)
2617 && !elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2619 dyn_i
->got_offset
= x
->ofs
;
2625 /* Search for the index of a global symbol in it's defining object file. */
2628 global_sym_index (h
)
2629 struct elf_link_hash_entry
*h
;
2631 struct elf_link_hash_entry
**p
;
2634 BFD_ASSERT (h
->root
.type
== bfd_link_hash_defined
2635 || h
->root
.type
== bfd_link_hash_defweak
);
2637 obj
= h
->root
.u
.def
.section
->owner
;
2638 for (p
= elf_sym_hashes (obj
); *p
!= h
; ++p
)
2641 return p
- elf_sym_hashes (obj
) + elf_tdata (obj
)->symtab_hdr
.sh_info
;
2644 /* Allocate function descriptors. We can do these for every function
2645 in a main executable that is not exported. */
2648 allocate_fptr (dyn_i
, data
)
2649 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2652 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2654 if (dyn_i
->want_fptr
)
2656 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2659 while (h
->root
.type
== bfd_link_hash_indirect
2660 || h
->root
.type
== bfd_link_hash_warning
)
2661 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2663 if (!x
->info
->executable
2665 || ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
2666 || h
->root
.type
!= bfd_link_hash_undefweak
))
2668 if (h
&& h
->dynindx
== -1)
2670 BFD_ASSERT ((h
->root
.type
== bfd_link_hash_defined
)
2671 || (h
->root
.type
== bfd_link_hash_defweak
));
2673 if (!bfd_elf_link_record_local_dynamic_symbol
2674 (x
->info
, h
->root
.u
.def
.section
->owner
,
2675 global_sym_index (h
)))
2679 dyn_i
->want_fptr
= 0;
2681 else if (h
== NULL
|| h
->dynindx
== -1)
2683 dyn_i
->fptr_offset
= x
->ofs
;
2687 dyn_i
->want_fptr
= 0;
2692 /* Allocate all the minimal PLT entries. */
2695 allocate_plt_entries (dyn_i
, data
)
2696 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2699 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2701 if (dyn_i
->want_plt
)
2703 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2706 while (h
->root
.type
== bfd_link_hash_indirect
2707 || h
->root
.type
== bfd_link_hash_warning
)
2708 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2710 /* ??? Versioned symbols seem to lose ELF_LINK_HASH_NEEDS_PLT. */
2711 if (elfNN_ia64_dynamic_symbol_p (h
, x
->info
, 0))
2713 bfd_size_type offset
= x
->ofs
;
2715 offset
= PLT_HEADER_SIZE
;
2716 dyn_i
->plt_offset
= offset
;
2717 x
->ofs
= offset
+ PLT_MIN_ENTRY_SIZE
;
2719 dyn_i
->want_pltoff
= 1;
2723 dyn_i
->want_plt
= 0;
2724 dyn_i
->want_plt2
= 0;
2730 /* Allocate all the full PLT entries. */
2733 allocate_plt2_entries (dyn_i
, data
)
2734 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2737 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2739 if (dyn_i
->want_plt2
)
2741 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2742 bfd_size_type ofs
= x
->ofs
;
2744 dyn_i
->plt2_offset
= ofs
;
2745 x
->ofs
= ofs
+ PLT_FULL_ENTRY_SIZE
;
2747 while (h
->root
.type
== bfd_link_hash_indirect
2748 || h
->root
.type
== bfd_link_hash_warning
)
2749 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2750 dyn_i
->h
->plt
.offset
= ofs
;
2755 /* Allocate all the PLTOFF entries requested by relocations and
2756 plt entries. We can't share space with allocated FPTR entries,
2757 because the latter are not necessarily addressable by the GP.
2758 ??? Relaxation might be able to determine that they are. */
2761 allocate_pltoff_entries (dyn_i
, data
)
2762 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2765 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2767 if (dyn_i
->want_pltoff
)
2769 dyn_i
->pltoff_offset
= x
->ofs
;
2775 /* Allocate dynamic relocations for those symbols that turned out
2779 allocate_dynrel_entries (dyn_i
, data
)
2780 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2783 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2784 struct elfNN_ia64_link_hash_table
*ia64_info
;
2785 struct elfNN_ia64_dyn_reloc_entry
*rent
;
2786 bfd_boolean dynamic_symbol
, shared
, resolved_zero
;
2788 ia64_info
= elfNN_ia64_hash_table (x
->info
);
2790 /* Note that this can't be used in relation to FPTR relocs below. */
2791 dynamic_symbol
= elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0);
2793 shared
= x
->info
->shared
;
2794 resolved_zero
= (dyn_i
->h
2795 && ELF_ST_VISIBILITY (dyn_i
->h
->other
)
2796 && dyn_i
->h
->root
.type
== bfd_link_hash_undefweak
);
2798 /* Take care of the normal data relocations. */
2800 for (rent
= dyn_i
->reloc_entries
; rent
; rent
= rent
->next
)
2802 int count
= rent
->count
;
2806 case R_IA64_FPTR64LSB
:
2807 /* Allocate one iff !want_fptr and not PIE, which by this point
2808 will be true only if we're actually allocating one statically
2809 in the main executable. Position independent executables
2810 need a relative reloc. */
2811 if (dyn_i
->want_fptr
&& !x
->info
->pie
)
2814 case R_IA64_PCREL64LSB
:
2815 if (!dynamic_symbol
)
2818 case R_IA64_DIR64LSB
:
2819 if (!dynamic_symbol
&& !shared
)
2822 case R_IA64_IPLTLSB
:
2823 if (!dynamic_symbol
&& !shared
)
2825 /* Use two REL relocations for IPLT relocations
2826 against local symbols. */
2827 if (!dynamic_symbol
)
2830 case R_IA64_TPREL64LSB
:
2831 case R_IA64_DTPREL64LSB
:
2832 case R_IA64_DTPMOD64LSB
:
2838 ia64_info
->reltext
= 1;
2839 rent
->srel
->size
+= sizeof (ElfNN_External_Rela
) * count
;
2842 /* Take care of the GOT and PLT relocations. */
2845 && (dynamic_symbol
|| shared
)
2846 && (dyn_i
->want_got
|| dyn_i
->want_gotx
))
2847 || (dyn_i
->want_ltoff_fptr
2849 && dyn_i
->h
->dynindx
!= -1))
2851 if (!dyn_i
->want_ltoff_fptr
2854 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
2855 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
2857 if ((dynamic_symbol
|| shared
) && dyn_i
->want_tprel
)
2858 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
2859 if (dynamic_symbol
&& dyn_i
->want_dtpmod
)
2860 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
2861 if (dynamic_symbol
&& dyn_i
->want_dtprel
)
2862 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
2863 if (ia64_info
->rel_fptr_sec
&& dyn_i
->want_fptr
)
2865 if (dyn_i
->h
== NULL
|| dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
2866 ia64_info
->rel_fptr_sec
->size
+= sizeof (ElfNN_External_Rela
);
2869 if (!resolved_zero
&& dyn_i
->want_pltoff
)
2871 bfd_size_type t
= 0;
2873 /* Dynamic symbols get one IPLT relocation. Local symbols in
2874 shared libraries get two REL relocations. Local symbols in
2875 main applications get nothing. */
2877 t
= sizeof (ElfNN_External_Rela
);
2879 t
= 2 * sizeof (ElfNN_External_Rela
);
2881 ia64_info
->rel_pltoff_sec
->size
+= t
;
2888 elfNN_ia64_adjust_dynamic_symbol (info
, h
)
2889 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
2890 struct elf_link_hash_entry
*h
;
2892 /* ??? Undefined symbols with PLT entries should be re-defined
2893 to be the PLT entry. */
2895 /* If this is a weak symbol, and there is a real definition, the
2896 processor independent code will have arranged for us to see the
2897 real definition first, and we can just use the same value. */
2898 if (h
->weakdef
!= NULL
)
2900 BFD_ASSERT (h
->weakdef
->root
.type
== bfd_link_hash_defined
2901 || h
->weakdef
->root
.type
== bfd_link_hash_defweak
);
2902 h
->root
.u
.def
.section
= h
->weakdef
->root
.u
.def
.section
;
2903 h
->root
.u
.def
.value
= h
->weakdef
->root
.u
.def
.value
;
2907 /* If this is a reference to a symbol defined by a dynamic object which
2908 is not a function, we might allocate the symbol in our .dynbss section
2909 and allocate a COPY dynamic relocation.
2911 But IA-64 code is canonically PIC, so as a rule we can avoid this sort
2918 elfNN_ia64_size_dynamic_sections (output_bfd
, info
)
2919 bfd
*output_bfd ATTRIBUTE_UNUSED
;
2920 struct bfd_link_info
*info
;
2922 struct elfNN_ia64_allocate_data data
;
2923 struct elfNN_ia64_link_hash_table
*ia64_info
;
2926 bfd_boolean relplt
= FALSE
;
2928 dynobj
= elf_hash_table(info
)->dynobj
;
2929 ia64_info
= elfNN_ia64_hash_table (info
);
2930 ia64_info
->self_dtpmod_offset
= (bfd_vma
) -1;
2931 BFD_ASSERT(dynobj
!= NULL
);
2934 /* Set the contents of the .interp section to the interpreter. */
2935 if (ia64_info
->root
.dynamic_sections_created
2936 && info
->executable
)
2938 sec
= bfd_get_section_by_name (dynobj
, ".interp");
2939 BFD_ASSERT (sec
!= NULL
);
2940 sec
->contents
= (bfd_byte
*) ELF_DYNAMIC_INTERPRETER
;
2941 sec
->size
= strlen (ELF_DYNAMIC_INTERPRETER
) + 1;
2944 /* Allocate the GOT entries. */
2946 if (ia64_info
->got_sec
)
2949 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_data_got
, &data
);
2950 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_fptr_got
, &data
);
2951 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_local_got
, &data
);
2952 ia64_info
->got_sec
->size
= data
.ofs
;
2955 /* Allocate the FPTR entries. */
2957 if (ia64_info
->fptr_sec
)
2960 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_fptr
, &data
);
2961 ia64_info
->fptr_sec
->size
= data
.ofs
;
2964 /* Now that we've seen all of the input files, we can decide which
2965 symbols need plt entries. Allocate the minimal PLT entries first.
2966 We do this even though dynamic_sections_created may be FALSE, because
2967 this has the side-effect of clearing want_plt and want_plt2. */
2970 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_plt_entries
, &data
);
2972 ia64_info
->minplt_entries
= 0;
2975 ia64_info
->minplt_entries
2976 = (data
.ofs
- PLT_HEADER_SIZE
) / PLT_MIN_ENTRY_SIZE
;
2979 /* Align the pointer for the plt2 entries. */
2980 data
.ofs
= (data
.ofs
+ 31) & (bfd_vma
) -32;
2982 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_plt2_entries
, &data
);
2983 if (data
.ofs
!= 0 || ia64_info
->root
.dynamic_sections_created
)
2985 /* FIXME: we always reserve the memory for dynamic linker even if
2986 there are no PLT entries since dynamic linker may assume the
2987 reserved memory always exists. */
2989 BFD_ASSERT (ia64_info
->root
.dynamic_sections_created
);
2991 ia64_info
->plt_sec
->size
= data
.ofs
;
2993 /* If we've got a .plt, we need some extra memory for the dynamic
2994 linker. We stuff these in .got.plt. */
2995 sec
= bfd_get_section_by_name (dynobj
, ".got.plt");
2996 sec
->size
= 8 * PLT_RESERVED_WORDS
;
2999 /* Allocate the PLTOFF entries. */
3001 if (ia64_info
->pltoff_sec
)
3004 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_pltoff_entries
, &data
);
3005 ia64_info
->pltoff_sec
->size
= data
.ofs
;
3008 if (ia64_info
->root
.dynamic_sections_created
)
3010 /* Allocate space for the dynamic relocations that turned out to be
3013 if (info
->shared
&& ia64_info
->self_dtpmod_offset
!= (bfd_vma
) -1)
3014 ia64_info
->rel_got_sec
->size
+= sizeof (ElfNN_External_Rela
);
3015 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_dynrel_entries
, &data
);
3018 /* We have now determined the sizes of the various dynamic sections.
3019 Allocate memory for them. */
3020 for (sec
= dynobj
->sections
; sec
!= NULL
; sec
= sec
->next
)
3024 if (!(sec
->flags
& SEC_LINKER_CREATED
))
3027 /* If we don't need this section, strip it from the output file.
3028 There were several sections primarily related to dynamic
3029 linking that must be create before the linker maps input
3030 sections to output sections. The linker does that before
3031 bfd_elf_size_dynamic_sections is called, and it is that
3032 function which decides whether anything needs to go into
3035 strip
= (sec
->size
== 0);
3037 if (sec
== ia64_info
->got_sec
)
3039 else if (sec
== ia64_info
->rel_got_sec
)
3042 ia64_info
->rel_got_sec
= NULL
;
3044 /* We use the reloc_count field as a counter if we need to
3045 copy relocs into the output file. */
3046 sec
->reloc_count
= 0;
3048 else if (sec
== ia64_info
->fptr_sec
)
3051 ia64_info
->fptr_sec
= NULL
;
3053 else if (sec
== ia64_info
->rel_fptr_sec
)
3056 ia64_info
->rel_fptr_sec
= NULL
;
3058 /* We use the reloc_count field as a counter if we need to
3059 copy relocs into the output file. */
3060 sec
->reloc_count
= 0;
3062 else if (sec
== ia64_info
->plt_sec
)
3065 ia64_info
->plt_sec
= NULL
;
3067 else if (sec
== ia64_info
->pltoff_sec
)
3070 ia64_info
->pltoff_sec
= NULL
;
3072 else if (sec
== ia64_info
->rel_pltoff_sec
)
3075 ia64_info
->rel_pltoff_sec
= NULL
;
3079 /* We use the reloc_count field as a counter if we need to
3080 copy relocs into the output file. */
3081 sec
->reloc_count
= 0;
3088 /* It's OK to base decisions on the section name, because none
3089 of the dynobj section names depend upon the input files. */
3090 name
= bfd_get_section_name (dynobj
, sec
);
3092 if (strcmp (name
, ".got.plt") == 0)
3094 else if (strncmp (name
, ".rel", 4) == 0)
3098 /* We use the reloc_count field as a counter if we need to
3099 copy relocs into the output file. */
3100 sec
->reloc_count
= 0;
3108 _bfd_strip_section_from_output (info
, sec
);
3111 /* Allocate memory for the section contents. */
3112 sec
->contents
= (bfd_byte
*) bfd_zalloc (dynobj
, sec
->size
);
3113 if (sec
->contents
== NULL
&& sec
->size
!= 0)
3118 if (elf_hash_table (info
)->dynamic_sections_created
)
3120 /* Add some entries to the .dynamic section. We fill in the values
3121 later (in finish_dynamic_sections) but we must add the entries now
3122 so that we get the correct size for the .dynamic section. */
3124 if (info
->executable
)
3126 /* The DT_DEBUG entry is filled in by the dynamic linker and used
3128 #define add_dynamic_entry(TAG, VAL) \
3129 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
3131 if (!add_dynamic_entry (DT_DEBUG
, 0))
3135 if (!add_dynamic_entry (DT_IA_64_PLT_RESERVE
, 0))
3137 if (!add_dynamic_entry (DT_PLTGOT
, 0))
3142 if (!add_dynamic_entry (DT_PLTRELSZ
, 0)
3143 || !add_dynamic_entry (DT_PLTREL
, DT_RELA
)
3144 || !add_dynamic_entry (DT_JMPREL
, 0))
3148 if (!add_dynamic_entry (DT_RELA
, 0)
3149 || !add_dynamic_entry (DT_RELASZ
, 0)
3150 || !add_dynamic_entry (DT_RELAENT
, sizeof (ElfNN_External_Rela
)))
3153 if (ia64_info
->reltext
)
3155 if (!add_dynamic_entry (DT_TEXTREL
, 0))
3157 info
->flags
|= DF_TEXTREL
;
3161 /* ??? Perhaps force __gp local. */
3166 static bfd_reloc_status_type
3167 elfNN_ia64_install_value (hit_addr
, v
, r_type
)
3170 unsigned int r_type
;
3172 const struct ia64_operand
*op
;
3173 int bigendian
= 0, shift
= 0;
3174 bfd_vma t0
, t1
, insn
, dword
;
3175 enum ia64_opnd opnd
;
3178 #ifdef BFD_HOST_U_64_BIT
3179 BFD_HOST_U_64_BIT val
= (BFD_HOST_U_64_BIT
) v
;
3184 opnd
= IA64_OPND_NIL
;
3189 return bfd_reloc_ok
;
3191 /* Instruction relocations. */
3194 case R_IA64_TPREL14
:
3195 case R_IA64_DTPREL14
:
3196 opnd
= IA64_OPND_IMM14
;
3199 case R_IA64_PCREL21F
: opnd
= IA64_OPND_TGT25
; break;
3200 case R_IA64_PCREL21M
: opnd
= IA64_OPND_TGT25b
; break;
3201 case R_IA64_PCREL60B
: opnd
= IA64_OPND_TGT64
; break;
3202 case R_IA64_PCREL21B
:
3203 case R_IA64_PCREL21BI
:
3204 opnd
= IA64_OPND_TGT25c
;
3208 case R_IA64_GPREL22
:
3209 case R_IA64_LTOFF22
:
3210 case R_IA64_LTOFF22X
:
3211 case R_IA64_PLTOFF22
:
3212 case R_IA64_PCREL22
:
3213 case R_IA64_LTOFF_FPTR22
:
3214 case R_IA64_TPREL22
:
3215 case R_IA64_DTPREL22
:
3216 case R_IA64_LTOFF_TPREL22
:
3217 case R_IA64_LTOFF_DTPMOD22
:
3218 case R_IA64_LTOFF_DTPREL22
:
3219 opnd
= IA64_OPND_IMM22
;
3223 case R_IA64_GPREL64I
:
3224 case R_IA64_LTOFF64I
:
3225 case R_IA64_PLTOFF64I
:
3226 case R_IA64_PCREL64I
:
3227 case R_IA64_FPTR64I
:
3228 case R_IA64_LTOFF_FPTR64I
:
3229 case R_IA64_TPREL64I
:
3230 case R_IA64_DTPREL64I
:
3231 opnd
= IA64_OPND_IMMU64
;
3234 /* Data relocations. */
3236 case R_IA64_DIR32MSB
:
3237 case R_IA64_GPREL32MSB
:
3238 case R_IA64_FPTR32MSB
:
3239 case R_IA64_PCREL32MSB
:
3240 case R_IA64_LTOFF_FPTR32MSB
:
3241 case R_IA64_SEGREL32MSB
:
3242 case R_IA64_SECREL32MSB
:
3243 case R_IA64_LTV32MSB
:
3244 case R_IA64_DTPREL32MSB
:
3245 size
= 4; bigendian
= 1;
3248 case R_IA64_DIR32LSB
:
3249 case R_IA64_GPREL32LSB
:
3250 case R_IA64_FPTR32LSB
:
3251 case R_IA64_PCREL32LSB
:
3252 case R_IA64_LTOFF_FPTR32LSB
:
3253 case R_IA64_SEGREL32LSB
:
3254 case R_IA64_SECREL32LSB
:
3255 case R_IA64_LTV32LSB
:
3256 case R_IA64_DTPREL32LSB
:
3257 size
= 4; bigendian
= 0;
3260 case R_IA64_DIR64MSB
:
3261 case R_IA64_GPREL64MSB
:
3262 case R_IA64_PLTOFF64MSB
:
3263 case R_IA64_FPTR64MSB
:
3264 case R_IA64_PCREL64MSB
:
3265 case R_IA64_LTOFF_FPTR64MSB
:
3266 case R_IA64_SEGREL64MSB
:
3267 case R_IA64_SECREL64MSB
:
3268 case R_IA64_LTV64MSB
:
3269 case R_IA64_TPREL64MSB
:
3270 case R_IA64_DTPMOD64MSB
:
3271 case R_IA64_DTPREL64MSB
:
3272 size
= 8; bigendian
= 1;
3275 case R_IA64_DIR64LSB
:
3276 case R_IA64_GPREL64LSB
:
3277 case R_IA64_PLTOFF64LSB
:
3278 case R_IA64_FPTR64LSB
:
3279 case R_IA64_PCREL64LSB
:
3280 case R_IA64_LTOFF_FPTR64LSB
:
3281 case R_IA64_SEGREL64LSB
:
3282 case R_IA64_SECREL64LSB
:
3283 case R_IA64_LTV64LSB
:
3284 case R_IA64_TPREL64LSB
:
3285 case R_IA64_DTPMOD64LSB
:
3286 case R_IA64_DTPREL64LSB
:
3287 size
= 8; bigendian
= 0;
3290 /* Unsupported / Dynamic relocations. */
3292 return bfd_reloc_notsupported
;
3297 case IA64_OPND_IMMU64
:
3298 hit_addr
-= (long) hit_addr
& 0x3;
3299 t0
= bfd_getl64 (hit_addr
);
3300 t1
= bfd_getl64 (hit_addr
+ 8);
3302 /* tmpl/s: bits 0.. 5 in t0
3303 slot 0: bits 5..45 in t0
3304 slot 1: bits 46..63 in t0, bits 0..22 in t1
3305 slot 2: bits 23..63 in t1 */
3307 /* First, clear the bits that form the 64 bit constant. */
3308 t0
&= ~(0x3ffffLL
<< 46);
3310 | (( (0x07fLL
<< 13) | (0x1ffLL
<< 27)
3311 | (0x01fLL
<< 22) | (0x001LL
<< 21)
3312 | (0x001LL
<< 36)) << 23));
3314 t0
|= ((val
>> 22) & 0x03ffffLL
) << 46; /* 18 lsbs of imm41 */
3315 t1
|= ((val
>> 40) & 0x7fffffLL
) << 0; /* 23 msbs of imm41 */
3316 t1
|= ( (((val
>> 0) & 0x07f) << 13) /* imm7b */
3317 | (((val
>> 7) & 0x1ff) << 27) /* imm9d */
3318 | (((val
>> 16) & 0x01f) << 22) /* imm5c */
3319 | (((val
>> 21) & 0x001) << 21) /* ic */
3320 | (((val
>> 63) & 0x001) << 36)) << 23; /* i */
3322 bfd_putl64 (t0
, hit_addr
);
3323 bfd_putl64 (t1
, hit_addr
+ 8);
3326 case IA64_OPND_TGT64
:
3327 hit_addr
-= (long) hit_addr
& 0x3;
3328 t0
= bfd_getl64 (hit_addr
);
3329 t1
= bfd_getl64 (hit_addr
+ 8);
3331 /* tmpl/s: bits 0.. 5 in t0
3332 slot 0: bits 5..45 in t0
3333 slot 1: bits 46..63 in t0, bits 0..22 in t1
3334 slot 2: bits 23..63 in t1 */
3336 /* First, clear the bits that form the 64 bit constant. */
3337 t0
&= ~(0x3ffffLL
<< 46);
3339 | ((1LL << 36 | 0xfffffLL
<< 13) << 23));
3342 t0
|= ((val
>> 20) & 0xffffLL
) << 2 << 46; /* 16 lsbs of imm39 */
3343 t1
|= ((val
>> 36) & 0x7fffffLL
) << 0; /* 23 msbs of imm39 */
3344 t1
|= ((((val
>> 0) & 0xfffffLL
) << 13) /* imm20b */
3345 | (((val
>> 59) & 0x1LL
) << 36)) << 23; /* i */
3347 bfd_putl64 (t0
, hit_addr
);
3348 bfd_putl64 (t1
, hit_addr
+ 8);
3352 switch ((long) hit_addr
& 0x3)
3354 case 0: shift
= 5; break;
3355 case 1: shift
= 14; hit_addr
+= 3; break;
3356 case 2: shift
= 23; hit_addr
+= 6; break;
3357 case 3: return bfd_reloc_notsupported
; /* shouldn't happen... */
3359 dword
= bfd_getl64 (hit_addr
);
3360 insn
= (dword
>> shift
) & 0x1ffffffffffLL
;
3362 op
= elf64_ia64_operands
+ opnd
;
3363 err
= (*op
->insert
) (op
, val
, (ia64_insn
*)& insn
);
3365 return bfd_reloc_overflow
;
3367 dword
&= ~(0x1ffffffffffLL
<< shift
);
3368 dword
|= (insn
<< shift
);
3369 bfd_putl64 (dword
, hit_addr
);
3373 /* A data relocation. */
3376 bfd_putb32 (val
, hit_addr
);
3378 bfd_putb64 (val
, hit_addr
);
3381 bfd_putl32 (val
, hit_addr
);
3383 bfd_putl64 (val
, hit_addr
);
3387 return bfd_reloc_ok
;
3391 elfNN_ia64_install_dyn_reloc (abfd
, info
, sec
, srel
, offset
, type
,
3394 struct bfd_link_info
*info
;
3402 Elf_Internal_Rela outrel
;
3405 BFD_ASSERT (dynindx
!= -1);
3406 outrel
.r_info
= ELFNN_R_INFO (dynindx
, type
);
3407 outrel
.r_addend
= addend
;
3408 outrel
.r_offset
= _bfd_elf_section_offset (abfd
, info
, sec
, offset
);
3409 if (outrel
.r_offset
>= (bfd_vma
) -2)
3411 /* Run for the hills. We shouldn't be outputting a relocation
3412 for this. So do what everyone else does and output a no-op. */
3413 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
3414 outrel
.r_addend
= 0;
3415 outrel
.r_offset
= 0;
3418 outrel
.r_offset
+= sec
->output_section
->vma
+ sec
->output_offset
;
3420 loc
= srel
->contents
;
3421 loc
+= srel
->reloc_count
++ * sizeof (ElfNN_External_Rela
);
3422 bfd_elfNN_swap_reloca_out (abfd
, &outrel
, loc
);
3423 BFD_ASSERT (sizeof (ElfNN_External_Rela
) * srel
->reloc_count
<= srel
->size
);
3426 /* Store an entry for target address TARGET_ADDR in the linkage table
3427 and return the gp-relative address of the linkage table entry. */
3430 set_got_entry (abfd
, info
, dyn_i
, dynindx
, addend
, value
, dyn_r_type
)
3432 struct bfd_link_info
*info
;
3433 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3437 unsigned int dyn_r_type
;
3439 struct elfNN_ia64_link_hash_table
*ia64_info
;
3444 ia64_info
= elfNN_ia64_hash_table (info
);
3445 got_sec
= ia64_info
->got_sec
;
3449 case R_IA64_TPREL64LSB
:
3450 done
= dyn_i
->tprel_done
;
3451 dyn_i
->tprel_done
= TRUE
;
3452 got_offset
= dyn_i
->tprel_offset
;
3454 case R_IA64_DTPMOD64LSB
:
3455 if (dyn_i
->dtpmod_offset
!= ia64_info
->self_dtpmod_offset
)
3457 done
= dyn_i
->dtpmod_done
;
3458 dyn_i
->dtpmod_done
= TRUE
;
3462 done
= ia64_info
->self_dtpmod_done
;
3463 ia64_info
->self_dtpmod_done
= TRUE
;
3466 got_offset
= dyn_i
->dtpmod_offset
;
3468 case R_IA64_DTPREL64LSB
:
3469 done
= dyn_i
->dtprel_done
;
3470 dyn_i
->dtprel_done
= TRUE
;
3471 got_offset
= dyn_i
->dtprel_offset
;
3474 done
= dyn_i
->got_done
;
3475 dyn_i
->got_done
= TRUE
;
3476 got_offset
= dyn_i
->got_offset
;
3480 BFD_ASSERT ((got_offset
& 7) == 0);
3484 /* Store the target address in the linkage table entry. */
3485 bfd_put_64 (abfd
, value
, got_sec
->contents
+ got_offset
);
3487 /* Install a dynamic relocation if needed. */
3490 || ELF_ST_VISIBILITY (dyn_i
->h
->other
) == STV_DEFAULT
3491 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
3492 && dyn_r_type
!= R_IA64_DTPREL64LSB
)
3493 || elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, info
, dyn_r_type
)
3494 || (dynindx
!= -1 && dyn_r_type
== R_IA64_FPTR64LSB
))
3495 && (!dyn_i
->want_ltoff_fptr
3498 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
))
3501 && dyn_r_type
!= R_IA64_TPREL64LSB
3502 && dyn_r_type
!= R_IA64_DTPMOD64LSB
3503 && dyn_r_type
!= R_IA64_DTPREL64LSB
)
3505 dyn_r_type
= R_IA64_REL64LSB
;
3510 if (bfd_big_endian (abfd
))
3514 case R_IA64_REL64LSB
:
3515 dyn_r_type
= R_IA64_REL64MSB
;
3517 case R_IA64_DIR64LSB
:
3518 dyn_r_type
= R_IA64_DIR64MSB
;
3520 case R_IA64_FPTR64LSB
:
3521 dyn_r_type
= R_IA64_FPTR64MSB
;
3523 case R_IA64_TPREL64LSB
:
3524 dyn_r_type
= R_IA64_TPREL64MSB
;
3526 case R_IA64_DTPMOD64LSB
:
3527 dyn_r_type
= R_IA64_DTPMOD64MSB
;
3529 case R_IA64_DTPREL64LSB
:
3530 dyn_r_type
= R_IA64_DTPREL64MSB
;
3538 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, got_sec
,
3539 ia64_info
->rel_got_sec
,
3540 got_offset
, dyn_r_type
,
3545 /* Return the address of the linkage table entry. */
3546 value
= (got_sec
->output_section
->vma
3547 + got_sec
->output_offset
3553 /* Fill in a function descriptor consisting of the function's code
3554 address and its global pointer. Return the descriptor's address. */
3557 set_fptr_entry (abfd
, info
, dyn_i
, value
)
3559 struct bfd_link_info
*info
;
3560 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3563 struct elfNN_ia64_link_hash_table
*ia64_info
;
3566 ia64_info
= elfNN_ia64_hash_table (info
);
3567 fptr_sec
= ia64_info
->fptr_sec
;
3569 if (!dyn_i
->fptr_done
)
3571 dyn_i
->fptr_done
= 1;
3573 /* Fill in the function descriptor. */
3574 bfd_put_64 (abfd
, value
, fptr_sec
->contents
+ dyn_i
->fptr_offset
);
3575 bfd_put_64 (abfd
, _bfd_get_gp_value (abfd
),
3576 fptr_sec
->contents
+ dyn_i
->fptr_offset
+ 8);
3577 if (ia64_info
->rel_fptr_sec
)
3579 Elf_Internal_Rela outrel
;
3582 if (bfd_little_endian (abfd
))
3583 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_IPLTLSB
);
3585 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_IPLTMSB
);
3586 outrel
.r_addend
= value
;
3587 outrel
.r_offset
= (fptr_sec
->output_section
->vma
3588 + fptr_sec
->output_offset
3589 + dyn_i
->fptr_offset
);
3590 loc
= ia64_info
->rel_fptr_sec
->contents
;
3591 loc
+= ia64_info
->rel_fptr_sec
->reloc_count
++
3592 * sizeof (ElfNN_External_Rela
);
3593 bfd_elfNN_swap_reloca_out (abfd
, &outrel
, loc
);
3597 /* Return the descriptor's address. */
3598 value
= (fptr_sec
->output_section
->vma
3599 + fptr_sec
->output_offset
3600 + dyn_i
->fptr_offset
);
3605 /* Fill in a PLTOFF entry consisting of the function's code address
3606 and its global pointer. Return the descriptor's address. */
3609 set_pltoff_entry (abfd
, info
, dyn_i
, value
, is_plt
)
3611 struct bfd_link_info
*info
;
3612 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3616 struct elfNN_ia64_link_hash_table
*ia64_info
;
3617 asection
*pltoff_sec
;
3619 ia64_info
= elfNN_ia64_hash_table (info
);
3620 pltoff_sec
= ia64_info
->pltoff_sec
;
3622 /* Don't do anything if this symbol uses a real PLT entry. In
3623 that case, we'll fill this in during finish_dynamic_symbol. */
3624 if ((! dyn_i
->want_plt
|| is_plt
)
3625 && !dyn_i
->pltoff_done
)
3627 bfd_vma gp
= _bfd_get_gp_value (abfd
);
3629 /* Fill in the function descriptor. */
3630 bfd_put_64 (abfd
, value
, pltoff_sec
->contents
+ dyn_i
->pltoff_offset
);
3631 bfd_put_64 (abfd
, gp
, pltoff_sec
->contents
+ dyn_i
->pltoff_offset
+ 8);
3633 /* Install dynamic relocations if needed. */
3637 || ELF_ST_VISIBILITY (dyn_i
->h
->other
) == STV_DEFAULT
3638 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
))
3640 unsigned int dyn_r_type
;
3642 if (bfd_big_endian (abfd
))
3643 dyn_r_type
= R_IA64_REL64MSB
;
3645 dyn_r_type
= R_IA64_REL64LSB
;
3647 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, pltoff_sec
,
3648 ia64_info
->rel_pltoff_sec
,
3649 dyn_i
->pltoff_offset
,
3650 dyn_r_type
, 0, value
);
3651 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, pltoff_sec
,
3652 ia64_info
->rel_pltoff_sec
,
3653 dyn_i
->pltoff_offset
+ 8,
3657 dyn_i
->pltoff_done
= 1;
3660 /* Return the descriptor's address. */
3661 value
= (pltoff_sec
->output_section
->vma
3662 + pltoff_sec
->output_offset
3663 + dyn_i
->pltoff_offset
);
3668 /* Return the base VMA address which should be subtracted from real addresses
3669 when resolving @tprel() relocation.
3670 Main program TLS (whose template starts at PT_TLS p_vaddr)
3671 is assigned offset round(16, PT_TLS p_align). */
3674 elfNN_ia64_tprel_base (info
)
3675 struct bfd_link_info
*info
;
3677 asection
*tls_sec
= elf_hash_table (info
)->tls_sec
;
3679 BFD_ASSERT (tls_sec
!= NULL
);
3680 return tls_sec
->vma
- align_power ((bfd_vma
) 16, tls_sec
->alignment_power
);
3683 /* Return the base VMA address which should be subtracted from real addresses
3684 when resolving @dtprel() relocation.
3685 This is PT_TLS segment p_vaddr. */
3688 elfNN_ia64_dtprel_base (info
)
3689 struct bfd_link_info
*info
;
3691 BFD_ASSERT (elf_hash_table (info
)->tls_sec
!= NULL
);
3692 return elf_hash_table (info
)->tls_sec
->vma
;
3695 /* Called through qsort to sort the .IA_64.unwind section during a
3696 non-relocatable link. Set elfNN_ia64_unwind_entry_compare_bfd
3697 to the output bfd so we can do proper endianness frobbing. */
3699 static bfd
*elfNN_ia64_unwind_entry_compare_bfd
;
3702 elfNN_ia64_unwind_entry_compare (a
, b
)
3708 av
= bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd
, a
);
3709 bv
= bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd
, b
);
3711 return (av
< bv
? -1 : av
> bv
? 1 : 0);
3714 /* Make sure we've got ourselves a nice fat __gp value. */
3716 elfNN_ia64_choose_gp (abfd
, info
)
3718 struct bfd_link_info
*info
;
3720 bfd_vma min_vma
= (bfd_vma
) -1, max_vma
= 0;
3721 bfd_vma min_short_vma
= min_vma
, max_short_vma
= 0;
3722 struct elf_link_hash_entry
*gp
;
3725 struct elfNN_ia64_link_hash_table
*ia64_info
;
3727 ia64_info
= elfNN_ia64_hash_table (info
);
3729 /* Find the min and max vma of all sections marked short. Also collect
3730 min and max vma of any type, for use in selecting a nice gp. */
3731 for (os
= abfd
->sections
; os
; os
= os
->next
)
3735 if ((os
->flags
& SEC_ALLOC
) == 0)
3739 hi
= os
->vma
+ os
->size
;
3747 if (os
->flags
& SEC_SMALL_DATA
)
3749 if (min_short_vma
> lo
)
3751 if (max_short_vma
< hi
)
3756 /* See if the user wants to force a value. */
3757 gp
= elf_link_hash_lookup (elf_hash_table (info
), "__gp", FALSE
,
3761 && (gp
->root
.type
== bfd_link_hash_defined
3762 || gp
->root
.type
== bfd_link_hash_defweak
))
3764 asection
*gp_sec
= gp
->root
.u
.def
.section
;
3765 gp_val
= (gp
->root
.u
.def
.value
3766 + gp_sec
->output_section
->vma
3767 + gp_sec
->output_offset
);
3771 /* Pick a sensible value. */
3773 asection
*got_sec
= ia64_info
->got_sec
;
3775 /* Start with just the address of the .got. */
3777 gp_val
= got_sec
->output_section
->vma
;
3778 else if (max_short_vma
!= 0)
3779 gp_val
= min_short_vma
;
3783 /* If it is possible to address the entire image, but we
3784 don't with the choice above, adjust. */
3785 if (max_vma
- min_vma
< 0x400000
3786 && max_vma
- gp_val
<= 0x200000
3787 && gp_val
- min_vma
> 0x200000)
3788 gp_val
= min_vma
+ 0x200000;
3789 else if (max_short_vma
!= 0)
3791 /* If we don't cover all the short data, adjust. */
3792 if (max_short_vma
- gp_val
>= 0x200000)
3793 gp_val
= min_short_vma
+ 0x200000;
3795 /* If we're addressing stuff past the end, adjust back. */
3796 if (gp_val
> max_vma
)
3797 gp_val
= max_vma
- 0x200000 + 8;
3801 /* Validate whether all SHF_IA_64_SHORT sections are within
3802 range of the chosen GP. */
3804 if (max_short_vma
!= 0)
3806 if (max_short_vma
- min_short_vma
>= 0x400000)
3808 (*_bfd_error_handler
)
3809 (_("%s: short data segment overflowed (0x%lx >= 0x400000)"),
3810 bfd_get_filename (abfd
),
3811 (unsigned long) (max_short_vma
- min_short_vma
));
3814 else if ((gp_val
> min_short_vma
3815 && gp_val
- min_short_vma
> 0x200000)
3816 || (gp_val
< max_short_vma
3817 && max_short_vma
- gp_val
>= 0x200000))
3819 (*_bfd_error_handler
)
3820 (_("%s: __gp does not cover short data segment"),
3821 bfd_get_filename (abfd
));
3826 _bfd_set_gp_value (abfd
, gp_val
);
3832 elfNN_ia64_final_link (abfd
, info
)
3834 struct bfd_link_info
*info
;
3836 struct elfNN_ia64_link_hash_table
*ia64_info
;
3837 asection
*unwind_output_sec
;
3839 ia64_info
= elfNN_ia64_hash_table (info
);
3841 /* Make sure we've got ourselves a nice fat __gp value. */
3842 if (!info
->relocatable
)
3844 bfd_vma gp_val
= _bfd_get_gp_value (abfd
);
3845 struct elf_link_hash_entry
*gp
;
3849 if (! elfNN_ia64_choose_gp (abfd
, info
))
3851 gp_val
= _bfd_get_gp_value (abfd
);
3854 gp
= elf_link_hash_lookup (elf_hash_table (info
), "__gp", FALSE
,
3858 gp
->root
.type
= bfd_link_hash_defined
;
3859 gp
->root
.u
.def
.value
= gp_val
;
3860 gp
->root
.u
.def
.section
= bfd_abs_section_ptr
;
3864 /* If we're producing a final executable, we need to sort the contents
3865 of the .IA_64.unwind section. Force this section to be relocated
3866 into memory rather than written immediately to the output file. */
3867 unwind_output_sec
= NULL
;
3868 if (!info
->relocatable
)
3870 asection
*s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_unwind
);
3873 unwind_output_sec
= s
->output_section
;
3874 unwind_output_sec
->contents
3875 = bfd_malloc (unwind_output_sec
->size
);
3876 if (unwind_output_sec
->contents
== NULL
)
3881 /* Invoke the regular ELF backend linker to do all the work. */
3882 if (!bfd_elf_final_link (abfd
, info
))
3885 if (unwind_output_sec
)
3887 elfNN_ia64_unwind_entry_compare_bfd
= abfd
;
3888 qsort (unwind_output_sec
->contents
,
3889 (size_t) (unwind_output_sec
->size
/ 24),
3891 elfNN_ia64_unwind_entry_compare
);
3893 if (! bfd_set_section_contents (abfd
, unwind_output_sec
,
3894 unwind_output_sec
->contents
, (bfd_vma
) 0,
3895 unwind_output_sec
->size
))
3903 elfNN_ia64_relocate_section (output_bfd
, info
, input_bfd
, input_section
,
3904 contents
, relocs
, local_syms
, local_sections
)
3906 struct bfd_link_info
*info
;
3908 asection
*input_section
;
3910 Elf_Internal_Rela
*relocs
;
3911 Elf_Internal_Sym
*local_syms
;
3912 asection
**local_sections
;
3914 struct elfNN_ia64_link_hash_table
*ia64_info
;
3915 Elf_Internal_Shdr
*symtab_hdr
;
3916 Elf_Internal_Rela
*rel
;
3917 Elf_Internal_Rela
*relend
;
3919 bfd_boolean ret_val
= TRUE
; /* for non-fatal errors */
3922 symtab_hdr
= &elf_tdata (input_bfd
)->symtab_hdr
;
3923 ia64_info
= elfNN_ia64_hash_table (info
);
3925 /* Infect various flags from the input section to the output section. */
3926 if (info
->relocatable
)
3930 flags
= elf_section_data(input_section
)->this_hdr
.sh_flags
;
3931 flags
&= SHF_IA_64_NORECOV
;
3933 elf_section_data(input_section
->output_section
)
3934 ->this_hdr
.sh_flags
|= flags
;
3938 gp_val
= _bfd_get_gp_value (output_bfd
);
3939 srel
= get_reloc_section (input_bfd
, ia64_info
, input_section
, FALSE
);
3942 relend
= relocs
+ input_section
->reloc_count
;
3943 for (; rel
< relend
; ++rel
)
3945 struct elf_link_hash_entry
*h
;
3946 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3947 bfd_reloc_status_type r
;
3948 reloc_howto_type
*howto
;
3949 unsigned long r_symndx
;
3950 Elf_Internal_Sym
*sym
;
3951 unsigned int r_type
;
3955 bfd_boolean dynamic_symbol_p
;
3956 bfd_boolean undef_weak_ref
;
3958 r_type
= ELFNN_R_TYPE (rel
->r_info
);
3959 if (r_type
> R_IA64_MAX_RELOC_CODE
)
3961 (*_bfd_error_handler
)
3962 (_("%s: unknown relocation type %d"),
3963 bfd_archive_filename (input_bfd
), (int)r_type
);
3964 bfd_set_error (bfd_error_bad_value
);
3969 howto
= lookup_howto (r_type
);
3970 r_symndx
= ELFNN_R_SYM (rel
->r_info
);
3974 undef_weak_ref
= FALSE
;
3976 if (r_symndx
< symtab_hdr
->sh_info
)
3978 /* Reloc against local symbol. */
3980 sym
= local_syms
+ r_symndx
;
3981 sym_sec
= local_sections
[r_symndx
];
3983 value
= _bfd_elf_rela_local_sym (output_bfd
, sym
, &msec
, rel
);
3984 if ((sym_sec
->flags
& SEC_MERGE
)
3985 && ELF_ST_TYPE (sym
->st_info
) == STT_SECTION
3986 && sym_sec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
3988 struct elfNN_ia64_local_hash_entry
*loc_h
;
3990 loc_h
= get_local_sym_hash (ia64_info
, input_bfd
, rel
, FALSE
);
3991 if (loc_h
&& ! loc_h
->sec_merge_done
)
3993 struct elfNN_ia64_dyn_sym_info
*dynent
;
3995 for (dynent
= loc_h
->info
; dynent
; dynent
= dynent
->next
)
3999 _bfd_merged_section_offset (output_bfd
, &msec
,
4000 elf_section_data (msec
)->
4004 dynent
->addend
-= sym
->st_value
;
4005 dynent
->addend
+= msec
->output_section
->vma
4006 + msec
->output_offset
4007 - sym_sec
->output_section
->vma
4008 - sym_sec
->output_offset
;
4010 loc_h
->sec_merge_done
= 1;
4016 bfd_boolean unresolved_reloc
;
4018 struct elf_link_hash_entry
**sym_hashes
= elf_sym_hashes (input_bfd
);
4020 RELOC_FOR_GLOBAL_SYMBOL (info
, input_bfd
, input_section
, rel
,
4021 r_symndx
, symtab_hdr
, sym_hashes
,
4023 unresolved_reloc
, warned
);
4025 if (h
->root
.type
== bfd_link_hash_undefweak
)
4026 undef_weak_ref
= TRUE
;
4031 hit_addr
= contents
+ rel
->r_offset
;
4032 value
+= rel
->r_addend
;
4033 dynamic_symbol_p
= elfNN_ia64_dynamic_symbol_p (h
, info
, r_type
);
4044 case R_IA64_DIR32MSB
:
4045 case R_IA64_DIR32LSB
:
4046 case R_IA64_DIR64MSB
:
4047 case R_IA64_DIR64LSB
:
4048 /* Install a dynamic relocation for this reloc. */
4049 if ((dynamic_symbol_p
|| info
->shared
)
4051 && (input_section
->flags
& SEC_ALLOC
) != 0)
4053 unsigned int dyn_r_type
;
4057 BFD_ASSERT (srel
!= NULL
);
4064 /* ??? People shouldn't be doing non-pic code in
4065 shared libraries nor dynamic executables. */
4066 (*_bfd_error_handler
)
4067 (_("%s: non-pic code with imm relocation against dynamic symbol `%s'"),
4068 bfd_archive_filename (input_bfd
),
4069 h
->root
.root
.string
);
4077 /* If we don't need dynamic symbol lookup, find a
4078 matching RELATIVE relocation. */
4079 dyn_r_type
= r_type
;
4080 if (dynamic_symbol_p
)
4082 dynindx
= h
->dynindx
;
4083 addend
= rel
->r_addend
;
4090 case R_IA64_DIR32MSB
:
4091 dyn_r_type
= R_IA64_REL32MSB
;
4093 case R_IA64_DIR32LSB
:
4094 dyn_r_type
= R_IA64_REL32LSB
;
4096 case R_IA64_DIR64MSB
:
4097 dyn_r_type
= R_IA64_REL64MSB
;
4099 case R_IA64_DIR64LSB
:
4100 dyn_r_type
= R_IA64_REL64LSB
;
4110 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4111 srel
, rel
->r_offset
, dyn_r_type
,
4116 case R_IA64_LTV32MSB
:
4117 case R_IA64_LTV32LSB
:
4118 case R_IA64_LTV64MSB
:
4119 case R_IA64_LTV64LSB
:
4120 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4123 case R_IA64_GPREL22
:
4124 case R_IA64_GPREL64I
:
4125 case R_IA64_GPREL32MSB
:
4126 case R_IA64_GPREL32LSB
:
4127 case R_IA64_GPREL64MSB
:
4128 case R_IA64_GPREL64LSB
:
4129 if (dynamic_symbol_p
)
4131 (*_bfd_error_handler
)
4132 (_("%s: @gprel relocation against dynamic symbol %s"),
4133 bfd_archive_filename (input_bfd
), h
->root
.root
.string
);
4138 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4141 case R_IA64_LTOFF22
:
4142 case R_IA64_LTOFF22X
:
4143 case R_IA64_LTOFF64I
:
4144 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4145 value
= set_got_entry (input_bfd
, info
, dyn_i
, (h
? h
->dynindx
: -1),
4146 rel
->r_addend
, value
, R_IA64_DIR64LSB
);
4148 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4151 case R_IA64_PLTOFF22
:
4152 case R_IA64_PLTOFF64I
:
4153 case R_IA64_PLTOFF64MSB
:
4154 case R_IA64_PLTOFF64LSB
:
4155 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4156 value
= set_pltoff_entry (output_bfd
, info
, dyn_i
, value
, FALSE
);
4158 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4161 case R_IA64_FPTR64I
:
4162 case R_IA64_FPTR32MSB
:
4163 case R_IA64_FPTR32LSB
:
4164 case R_IA64_FPTR64MSB
:
4165 case R_IA64_FPTR64LSB
:
4166 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4167 if (dyn_i
->want_fptr
)
4169 if (!undef_weak_ref
)
4170 value
= set_fptr_entry (output_bfd
, info
, dyn_i
, value
);
4172 if (!dyn_i
->want_fptr
|| info
->pie
)
4175 unsigned int dyn_r_type
= r_type
;
4176 bfd_vma addend
= rel
->r_addend
;
4178 /* Otherwise, we expect the dynamic linker to create
4181 if (dyn_i
->want_fptr
)
4183 if (r_type
== R_IA64_FPTR64I
)
4185 /* We can't represent this without a dynamic symbol.
4186 Adjust the relocation to be against an output
4187 section symbol, which are always present in the
4188 dynamic symbol table. */
4189 /* ??? People shouldn't be doing non-pic code in
4190 shared libraries. Hork. */
4191 (*_bfd_error_handler
)
4192 (_("%s: linking non-pic code in a position independent executable"),
4193 bfd_archive_filename (input_bfd
));
4199 dyn_r_type
= r_type
+ R_IA64_REL64LSB
- R_IA64_FPTR64LSB
;
4203 if (h
->dynindx
!= -1)
4204 dynindx
= h
->dynindx
;
4206 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4207 (info
, h
->root
.u
.def
.section
->owner
,
4208 global_sym_index (h
)));
4213 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4214 (info
, input_bfd
, (long) r_symndx
));
4218 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4219 srel
, rel
->r_offset
, dyn_r_type
,
4223 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4226 case R_IA64_LTOFF_FPTR22
:
4227 case R_IA64_LTOFF_FPTR64I
:
4228 case R_IA64_LTOFF_FPTR32MSB
:
4229 case R_IA64_LTOFF_FPTR32LSB
:
4230 case R_IA64_LTOFF_FPTR64MSB
:
4231 case R_IA64_LTOFF_FPTR64LSB
:
4235 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4236 if (dyn_i
->want_fptr
)
4238 BFD_ASSERT (h
== NULL
|| h
->dynindx
== -1)
4239 if (!undef_weak_ref
)
4240 value
= set_fptr_entry (output_bfd
, info
, dyn_i
, value
);
4245 /* Otherwise, we expect the dynamic linker to create
4249 if (h
->dynindx
!= -1)
4250 dynindx
= h
->dynindx
;
4252 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4253 (info
, h
->root
.u
.def
.section
->owner
,
4254 global_sym_index (h
)));
4257 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4258 (info
, input_bfd
, (long) r_symndx
));
4262 value
= set_got_entry (output_bfd
, info
, dyn_i
, dynindx
,
4263 rel
->r_addend
, value
, R_IA64_FPTR64LSB
);
4265 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4269 case R_IA64_PCREL32MSB
:
4270 case R_IA64_PCREL32LSB
:
4271 case R_IA64_PCREL64MSB
:
4272 case R_IA64_PCREL64LSB
:
4273 /* Install a dynamic relocation for this reloc. */
4274 if (dynamic_symbol_p
&& r_symndx
!= 0)
4276 BFD_ASSERT (srel
!= NULL
);
4278 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4279 srel
, rel
->r_offset
, r_type
,
4280 h
->dynindx
, rel
->r_addend
);
4284 case R_IA64_PCREL21B
:
4285 case R_IA64_PCREL60B
:
4286 /* We should have created a PLT entry for any dynamic symbol. */
4289 dyn_i
= get_dyn_sym_info (ia64_info
, h
, NULL
, NULL
, FALSE
);
4291 if (dyn_i
&& dyn_i
->want_plt2
)
4293 /* Should have caught this earlier. */
4294 BFD_ASSERT (rel
->r_addend
== 0);
4296 value
= (ia64_info
->plt_sec
->output_section
->vma
4297 + ia64_info
->plt_sec
->output_offset
4298 + dyn_i
->plt2_offset
);
4302 /* Since there's no PLT entry, Validate that this is
4304 BFD_ASSERT (undef_weak_ref
|| sym_sec
->output_section
!= NULL
);
4306 /* If the symbol is undef_weak, we shouldn't be trying
4307 to call it. There's every chance that we'd wind up
4308 with an out-of-range fixup here. Don't bother setting
4309 any value at all. */
4315 case R_IA64_PCREL21BI
:
4316 case R_IA64_PCREL21F
:
4317 case R_IA64_PCREL21M
:
4318 case R_IA64_PCREL22
:
4319 case R_IA64_PCREL64I
:
4320 /* The PCREL21BI reloc is specifically not intended for use with
4321 dynamic relocs. PCREL21F and PCREL21M are used for speculation
4322 fixup code, and thus probably ought not be dynamic. The
4323 PCREL22 and PCREL64I relocs aren't emitted as dynamic relocs. */
4324 if (dynamic_symbol_p
)
4328 if (r_type
== R_IA64_PCREL21BI
)
4329 msg
= _("%s: @internal branch to dynamic symbol %s");
4330 else if (r_type
== R_IA64_PCREL21F
|| r_type
== R_IA64_PCREL21M
)
4331 msg
= _("%s: speculation fixup to dynamic symbol %s");
4333 msg
= _("%s: @pcrel relocation against dynamic symbol %s");
4334 (*_bfd_error_handler
) (msg
, bfd_archive_filename (input_bfd
),
4335 h
->root
.root
.string
);
4342 /* Make pc-relative. */
4343 value
-= (input_section
->output_section
->vma
4344 + input_section
->output_offset
4345 + rel
->r_offset
) & ~ (bfd_vma
) 0x3;
4346 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4349 case R_IA64_SEGREL32MSB
:
4350 case R_IA64_SEGREL32LSB
:
4351 case R_IA64_SEGREL64MSB
:
4352 case R_IA64_SEGREL64LSB
:
4355 /* If the input section was discarded from the output, then
4361 struct elf_segment_map
*m
;
4362 Elf_Internal_Phdr
*p
;
4364 /* Find the segment that contains the output_section. */
4365 for (m
= elf_tdata (output_bfd
)->segment_map
,
4366 p
= elf_tdata (output_bfd
)->phdr
;
4371 for (i
= m
->count
- 1; i
>= 0; i
--)
4372 if (m
->sections
[i
] == input_section
->output_section
)
4380 r
= bfd_reloc_notsupported
;
4384 /* The VMA of the segment is the vaddr of the associated
4386 if (value
> p
->p_vaddr
)
4387 value
-= p
->p_vaddr
;
4390 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4395 case R_IA64_SECREL32MSB
:
4396 case R_IA64_SECREL32LSB
:
4397 case R_IA64_SECREL64MSB
:
4398 case R_IA64_SECREL64LSB
:
4399 /* Make output-section relative. */
4400 if (value
> input_section
->output_section
->vma
)
4401 value
-= input_section
->output_section
->vma
;
4404 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4407 case R_IA64_IPLTMSB
:
4408 case R_IA64_IPLTLSB
:
4409 /* Install a dynamic relocation for this reloc. */
4410 if ((dynamic_symbol_p
|| info
->shared
)
4411 && (input_section
->flags
& SEC_ALLOC
) != 0)
4413 BFD_ASSERT (srel
!= NULL
);
4415 /* If we don't need dynamic symbol lookup, install two
4416 RELATIVE relocations. */
4417 if (!dynamic_symbol_p
)
4419 unsigned int dyn_r_type
;
4421 if (r_type
== R_IA64_IPLTMSB
)
4422 dyn_r_type
= R_IA64_REL64MSB
;
4424 dyn_r_type
= R_IA64_REL64LSB
;
4426 elfNN_ia64_install_dyn_reloc (output_bfd
, info
,
4428 srel
, rel
->r_offset
,
4429 dyn_r_type
, 0, value
);
4430 elfNN_ia64_install_dyn_reloc (output_bfd
, info
,
4432 srel
, rel
->r_offset
+ 8,
4433 dyn_r_type
, 0, gp_val
);
4436 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4437 srel
, rel
->r_offset
, r_type
,
4438 h
->dynindx
, rel
->r_addend
);
4441 if (r_type
== R_IA64_IPLTMSB
)
4442 r_type
= R_IA64_DIR64MSB
;
4444 r_type
= R_IA64_DIR64LSB
;
4445 elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4446 r
= elfNN_ia64_install_value (hit_addr
+ 8, gp_val
, r_type
);
4449 case R_IA64_TPREL14
:
4450 case R_IA64_TPREL22
:
4451 case R_IA64_TPREL64I
:
4452 value
-= elfNN_ia64_tprel_base (info
);
4453 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4456 case R_IA64_DTPREL14
:
4457 case R_IA64_DTPREL22
:
4458 case R_IA64_DTPREL64I
:
4459 case R_IA64_DTPREL64LSB
:
4460 case R_IA64_DTPREL64MSB
:
4461 value
-= elfNN_ia64_dtprel_base (info
);
4462 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4465 case R_IA64_LTOFF_TPREL22
:
4466 case R_IA64_LTOFF_DTPMOD22
:
4467 case R_IA64_LTOFF_DTPREL22
:
4470 long dynindx
= h
? h
->dynindx
: -1;
4471 bfd_vma r_addend
= rel
->r_addend
;
4476 case R_IA64_LTOFF_TPREL22
:
4477 if (!dynamic_symbol_p
)
4480 value
-= elfNN_ia64_tprel_base (info
);
4483 r_addend
+= value
- elfNN_ia64_dtprel_base (info
);
4487 got_r_type
= R_IA64_TPREL64LSB
;
4489 case R_IA64_LTOFF_DTPMOD22
:
4490 if (!dynamic_symbol_p
&& !info
->shared
)
4492 got_r_type
= R_IA64_DTPMOD64LSB
;
4494 case R_IA64_LTOFF_DTPREL22
:
4495 if (!dynamic_symbol_p
)
4496 value
-= elfNN_ia64_dtprel_base (info
);
4497 got_r_type
= R_IA64_DTPREL64LSB
;
4500 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4501 value
= set_got_entry (input_bfd
, info
, dyn_i
, dynindx
, r_addend
,
4504 r
= elfNN_ia64_install_value (hit_addr
, value
, r_type
);
4509 r
= bfd_reloc_notsupported
;
4518 case bfd_reloc_undefined
:
4519 /* This can happen for global table relative relocs if
4520 __gp is undefined. This is a panic situation so we
4521 don't try to continue. */
4522 (*info
->callbacks
->undefined_symbol
)
4523 (info
, "__gp", input_bfd
, input_section
, rel
->r_offset
, 1);
4526 case bfd_reloc_notsupported
:
4531 name
= h
->root
.root
.string
;
4534 name
= bfd_elf_string_from_elf_section (input_bfd
,
4535 symtab_hdr
->sh_link
,
4540 name
= bfd_section_name (input_bfd
, input_section
);
4542 if (!(*info
->callbacks
->warning
) (info
, _("unsupported reloc"),
4544 input_section
, rel
->r_offset
))
4550 case bfd_reloc_dangerous
:
4551 case bfd_reloc_outofrange
:
4552 case bfd_reloc_overflow
:
4558 name
= h
->root
.root
.string
;
4561 name
= bfd_elf_string_from_elf_section (input_bfd
,
4562 symtab_hdr
->sh_link
,
4567 name
= bfd_section_name (input_bfd
, input_section
);
4569 if (!(*info
->callbacks
->reloc_overflow
) (info
, name
,
4586 elfNN_ia64_finish_dynamic_symbol (output_bfd
, info
, h
, sym
)
4588 struct bfd_link_info
*info
;
4589 struct elf_link_hash_entry
*h
;
4590 Elf_Internal_Sym
*sym
;
4592 struct elfNN_ia64_link_hash_table
*ia64_info
;
4593 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
4595 ia64_info
= elfNN_ia64_hash_table (info
);
4596 dyn_i
= get_dyn_sym_info (ia64_info
, h
, NULL
, NULL
, FALSE
);
4598 /* Fill in the PLT data, if required. */
4599 if (dyn_i
&& dyn_i
->want_plt
)
4601 Elf_Internal_Rela outrel
;
4604 bfd_vma plt_addr
, pltoff_addr
, gp_val
, index
;
4606 gp_val
= _bfd_get_gp_value (output_bfd
);
4608 /* Initialize the minimal PLT entry. */
4610 index
= (dyn_i
->plt_offset
- PLT_HEADER_SIZE
) / PLT_MIN_ENTRY_SIZE
;
4611 plt_sec
= ia64_info
->plt_sec
;
4612 loc
= plt_sec
->contents
+ dyn_i
->plt_offset
;
4614 memcpy (loc
, plt_min_entry
, PLT_MIN_ENTRY_SIZE
);
4615 elfNN_ia64_install_value (loc
, index
, R_IA64_IMM22
);
4616 elfNN_ia64_install_value (loc
+2, -dyn_i
->plt_offset
, R_IA64_PCREL21B
);
4618 plt_addr
= (plt_sec
->output_section
->vma
4619 + plt_sec
->output_offset
4620 + dyn_i
->plt_offset
);
4621 pltoff_addr
= set_pltoff_entry (output_bfd
, info
, dyn_i
, plt_addr
, TRUE
);
4623 /* Initialize the FULL PLT entry, if needed. */
4624 if (dyn_i
->want_plt2
)
4626 loc
= plt_sec
->contents
+ dyn_i
->plt2_offset
;
4628 memcpy (loc
, plt_full_entry
, PLT_FULL_ENTRY_SIZE
);
4629 elfNN_ia64_install_value (loc
, pltoff_addr
- gp_val
, R_IA64_IMM22
);
4631 /* Mark the symbol as undefined, rather than as defined in the
4632 plt section. Leave the value alone. */
4633 /* ??? We didn't redefine it in adjust_dynamic_symbol in the
4634 first place. But perhaps elflink.c did some for us. */
4635 if ((h
->elf_link_hash_flags
& ELF_LINK_HASH_DEF_REGULAR
) == 0)
4636 sym
->st_shndx
= SHN_UNDEF
;
4639 /* Create the dynamic relocation. */
4640 outrel
.r_offset
= pltoff_addr
;
4641 if (bfd_little_endian (output_bfd
))
4642 outrel
.r_info
= ELFNN_R_INFO (h
->dynindx
, R_IA64_IPLTLSB
);
4644 outrel
.r_info
= ELFNN_R_INFO (h
->dynindx
, R_IA64_IPLTMSB
);
4645 outrel
.r_addend
= 0;
4647 /* This is fun. In the .IA_64.pltoff section, we've got entries
4648 that correspond both to real PLT entries, and those that
4649 happened to resolve to local symbols but need to be created
4650 to satisfy @pltoff relocations. The .rela.IA_64.pltoff
4651 relocations for the real PLT should come at the end of the
4652 section, so that they can be indexed by plt entry at runtime.
4654 We emitted all of the relocations for the non-PLT @pltoff
4655 entries during relocate_section. So we can consider the
4656 existing sec->reloc_count to be the base of the array of
4659 loc
= ia64_info
->rel_pltoff_sec
->contents
;
4660 loc
+= ((ia64_info
->rel_pltoff_sec
->reloc_count
+ index
)
4661 * sizeof (ElfNN_External_Rela
));
4662 bfd_elfNN_swap_reloca_out (output_bfd
, &outrel
, loc
);
4665 /* Mark some specially defined symbols as absolute. */
4666 if (strcmp (h
->root
.root
.string
, "_DYNAMIC") == 0
4667 || strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0
4668 || strcmp (h
->root
.root
.string
, "_PROCEDURE_LINKAGE_TABLE_") == 0)
4669 sym
->st_shndx
= SHN_ABS
;
4675 elfNN_ia64_finish_dynamic_sections (abfd
, info
)
4677 struct bfd_link_info
*info
;
4679 struct elfNN_ia64_link_hash_table
*ia64_info
;
4682 ia64_info
= elfNN_ia64_hash_table (info
);
4683 dynobj
= ia64_info
->root
.dynobj
;
4685 if (elf_hash_table (info
)->dynamic_sections_created
)
4687 ElfNN_External_Dyn
*dyncon
, *dynconend
;
4688 asection
*sdyn
, *sgotplt
;
4691 sdyn
= bfd_get_section_by_name (dynobj
, ".dynamic");
4692 sgotplt
= bfd_get_section_by_name (dynobj
, ".got.plt");
4693 BFD_ASSERT (sdyn
!= NULL
);
4694 dyncon
= (ElfNN_External_Dyn
*) sdyn
->contents
;
4695 dynconend
= (ElfNN_External_Dyn
*) (sdyn
->contents
+ sdyn
->size
);
4697 gp_val
= _bfd_get_gp_value (abfd
);
4699 for (; dyncon
< dynconend
; dyncon
++)
4701 Elf_Internal_Dyn dyn
;
4703 bfd_elfNN_swap_dyn_in (dynobj
, dyncon
, &dyn
);
4708 dyn
.d_un
.d_ptr
= gp_val
;
4712 dyn
.d_un
.d_val
= (ia64_info
->minplt_entries
4713 * sizeof (ElfNN_External_Rela
));
4717 /* See the comment above in finish_dynamic_symbol. */
4718 dyn
.d_un
.d_ptr
= (ia64_info
->rel_pltoff_sec
->output_section
->vma
4719 + ia64_info
->rel_pltoff_sec
->output_offset
4720 + (ia64_info
->rel_pltoff_sec
->reloc_count
4721 * sizeof (ElfNN_External_Rela
)));
4724 case DT_IA_64_PLT_RESERVE
:
4725 dyn
.d_un
.d_ptr
= (sgotplt
->output_section
->vma
4726 + sgotplt
->output_offset
);
4730 /* Do not have RELASZ include JMPREL. This makes things
4731 easier on ld.so. This is not what the rest of BFD set up. */
4732 dyn
.d_un
.d_val
-= (ia64_info
->minplt_entries
4733 * sizeof (ElfNN_External_Rela
));
4737 bfd_elfNN_swap_dyn_out (abfd
, &dyn
, dyncon
);
4740 /* Initialize the PLT0 entry. */
4741 if (ia64_info
->plt_sec
)
4743 bfd_byte
*loc
= ia64_info
->plt_sec
->contents
;
4746 memcpy (loc
, plt_header
, PLT_HEADER_SIZE
);
4748 pltres
= (sgotplt
->output_section
->vma
4749 + sgotplt
->output_offset
4752 elfNN_ia64_install_value (loc
+1, pltres
, R_IA64_GPREL22
);
4759 /* ELF file flag handling: */
4761 /* Function to keep IA-64 specific file flags. */
4763 elfNN_ia64_set_private_flags (abfd
, flags
)
4767 BFD_ASSERT (!elf_flags_init (abfd
)
4768 || elf_elfheader (abfd
)->e_flags
== flags
);
4770 elf_elfheader (abfd
)->e_flags
= flags
;
4771 elf_flags_init (abfd
) = TRUE
;
4775 /* Merge backend specific data from an object file to the output
4776 object file when linking. */
4778 elfNN_ia64_merge_private_bfd_data (ibfd
, obfd
)
4783 bfd_boolean ok
= TRUE
;
4785 /* Don't even pretend to support mixed-format linking. */
4786 if (bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
4787 || bfd_get_flavour (obfd
) != bfd_target_elf_flavour
)
4790 in_flags
= elf_elfheader (ibfd
)->e_flags
;
4791 out_flags
= elf_elfheader (obfd
)->e_flags
;
4793 if (! elf_flags_init (obfd
))
4795 elf_flags_init (obfd
) = TRUE
;
4796 elf_elfheader (obfd
)->e_flags
= in_flags
;
4798 if (bfd_get_arch (obfd
) == bfd_get_arch (ibfd
)
4799 && bfd_get_arch_info (obfd
)->the_default
)
4801 return bfd_set_arch_mach (obfd
, bfd_get_arch (ibfd
),
4802 bfd_get_mach (ibfd
));
4808 /* Check flag compatibility. */
4809 if (in_flags
== out_flags
)
4812 /* Output has EF_IA_64_REDUCEDFP set only if all inputs have it set. */
4813 if (!(in_flags
& EF_IA_64_REDUCEDFP
) && (out_flags
& EF_IA_64_REDUCEDFP
))
4814 elf_elfheader (obfd
)->e_flags
&= ~EF_IA_64_REDUCEDFP
;
4816 if ((in_flags
& EF_IA_64_TRAPNIL
) != (out_flags
& EF_IA_64_TRAPNIL
))
4818 (*_bfd_error_handler
)
4819 (_("%s: linking trap-on-NULL-dereference with non-trapping files"),
4820 bfd_archive_filename (ibfd
));
4822 bfd_set_error (bfd_error_bad_value
);
4825 if ((in_flags
& EF_IA_64_BE
) != (out_flags
& EF_IA_64_BE
))
4827 (*_bfd_error_handler
)
4828 (_("%s: linking big-endian files with little-endian files"),
4829 bfd_archive_filename (ibfd
));
4831 bfd_set_error (bfd_error_bad_value
);
4834 if ((in_flags
& EF_IA_64_ABI64
) != (out_flags
& EF_IA_64_ABI64
))
4836 (*_bfd_error_handler
)
4837 (_("%s: linking 64-bit files with 32-bit files"),
4838 bfd_archive_filename (ibfd
));
4840 bfd_set_error (bfd_error_bad_value
);
4843 if ((in_flags
& EF_IA_64_CONS_GP
) != (out_flags
& EF_IA_64_CONS_GP
))
4845 (*_bfd_error_handler
)
4846 (_("%s: linking constant-gp files with non-constant-gp files"),
4847 bfd_archive_filename (ibfd
));
4849 bfd_set_error (bfd_error_bad_value
);
4852 if ((in_flags
& EF_IA_64_NOFUNCDESC_CONS_GP
)
4853 != (out_flags
& EF_IA_64_NOFUNCDESC_CONS_GP
))
4855 (*_bfd_error_handler
)
4856 (_("%s: linking auto-pic files with non-auto-pic files"),
4857 bfd_archive_filename (ibfd
));
4859 bfd_set_error (bfd_error_bad_value
);
4867 elfNN_ia64_print_private_bfd_data (abfd
, ptr
)
4871 FILE *file
= (FILE *) ptr
;
4872 flagword flags
= elf_elfheader (abfd
)->e_flags
;
4874 BFD_ASSERT (abfd
!= NULL
&& ptr
!= NULL
);
4876 fprintf (file
, "private flags = %s%s%s%s%s%s%s%s\n",
4877 (flags
& EF_IA_64_TRAPNIL
) ? "TRAPNIL, " : "",
4878 (flags
& EF_IA_64_EXT
) ? "EXT, " : "",
4879 (flags
& EF_IA_64_BE
) ? "BE, " : "LE, ",
4880 (flags
& EF_IA_64_REDUCEDFP
) ? "REDUCEDFP, " : "",
4881 (flags
& EF_IA_64_CONS_GP
) ? "CONS_GP, " : "",
4882 (flags
& EF_IA_64_NOFUNCDESC_CONS_GP
) ? "NOFUNCDESC_CONS_GP, " : "",
4883 (flags
& EF_IA_64_ABSOLUTE
) ? "ABSOLUTE, " : "",
4884 (flags
& EF_IA_64_ABI64
) ? "ABI64" : "ABI32");
4886 _bfd_elf_print_private_bfd_data (abfd
, ptr
);
4890 static enum elf_reloc_type_class
4891 elfNN_ia64_reloc_type_class (rela
)
4892 const Elf_Internal_Rela
*rela
;
4894 switch ((int) ELFNN_R_TYPE (rela
->r_info
))
4896 case R_IA64_REL32MSB
:
4897 case R_IA64_REL32LSB
:
4898 case R_IA64_REL64MSB
:
4899 case R_IA64_REL64LSB
:
4900 return reloc_class_relative
;
4901 case R_IA64_IPLTMSB
:
4902 case R_IA64_IPLTLSB
:
4903 return reloc_class_plt
;
4905 return reloc_class_copy
;
4907 return reloc_class_normal
;
4911 static struct bfd_elf_special_section
const elfNN_ia64_special_sections
[]=
4913 { ".sbss", 5, -1, SHT_NOBITS
, SHF_ALLOC
+ SHF_WRITE
+ SHF_IA_64_SHORT
},
4914 { ".sdata", 6, -1, SHT_PROGBITS
, SHF_ALLOC
+ SHF_WRITE
+ SHF_IA_64_SHORT
},
4915 { NULL
, 0, 0, 0, 0 }
4919 elfNN_ia64_hpux_vec (const bfd_target
*vec
)
4921 extern const bfd_target bfd_elfNN_ia64_hpux_big_vec
;
4922 return (vec
== & bfd_elfNN_ia64_hpux_big_vec
);
4926 elfNN_hpux_post_process_headers (abfd
, info
)
4928 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
4930 Elf_Internal_Ehdr
*i_ehdrp
= elf_elfheader (abfd
);
4932 i_ehdrp
->e_ident
[EI_OSABI
] = ELFOSABI_HPUX
;
4933 i_ehdrp
->e_ident
[EI_ABIVERSION
] = 1;
4937 elfNN_hpux_backend_section_from_bfd_section (abfd
, sec
, retval
)
4938 bfd
*abfd ATTRIBUTE_UNUSED
;
4942 if (bfd_is_com_section (sec
))
4944 *retval
= SHN_IA_64_ANSI_COMMON
;
4951 elfNN_hpux_backend_symbol_processing (bfd
*abfd ATTRIBUTE_UNUSED
,
4954 elf_symbol_type
*elfsym
= (elf_symbol_type
*) asym
;;
4956 switch (elfsym
->internal_elf_sym
.st_shndx
)
4958 case SHN_IA_64_ANSI_COMMON
:
4959 asym
->section
= bfd_com_section_ptr
;
4960 asym
->value
= elfsym
->internal_elf_sym
.st_size
;
4961 asym
->flags
&= ~BSF_GLOBAL
;
4967 #define TARGET_LITTLE_SYM bfd_elfNN_ia64_little_vec
4968 #define TARGET_LITTLE_NAME "elfNN-ia64-little"
4969 #define TARGET_BIG_SYM bfd_elfNN_ia64_big_vec
4970 #define TARGET_BIG_NAME "elfNN-ia64-big"
4971 #define ELF_ARCH bfd_arch_ia64
4972 #define ELF_MACHINE_CODE EM_IA_64
4973 #define ELF_MACHINE_ALT1 1999 /* EAS2.3 */
4974 #define ELF_MACHINE_ALT2 1998 /* EAS2.2 */
4975 #define ELF_MAXPAGESIZE 0x10000 /* 64KB */
4977 #define elf_backend_section_from_shdr \
4978 elfNN_ia64_section_from_shdr
4979 #define elf_backend_section_flags \
4980 elfNN_ia64_section_flags
4981 #define elf_backend_fake_sections \
4982 elfNN_ia64_fake_sections
4983 #define elf_backend_final_write_processing \
4984 elfNN_ia64_final_write_processing
4985 #define elf_backend_add_symbol_hook \
4986 elfNN_ia64_add_symbol_hook
4987 #define elf_backend_additional_program_headers \
4988 elfNN_ia64_additional_program_headers
4989 #define elf_backend_modify_segment_map \
4990 elfNN_ia64_modify_segment_map
4991 #define elf_info_to_howto \
4992 elfNN_ia64_info_to_howto
4994 #define bfd_elfNN_bfd_reloc_type_lookup \
4995 elfNN_ia64_reloc_type_lookup
4996 #define bfd_elfNN_bfd_is_local_label_name \
4997 elfNN_ia64_is_local_label_name
4998 #define bfd_elfNN_bfd_relax_section \
4999 elfNN_ia64_relax_section
5001 /* Stuff for the BFD linker: */
5002 #define bfd_elfNN_bfd_link_hash_table_create \
5003 elfNN_ia64_hash_table_create
5004 #define bfd_elfNN_bfd_link_hash_table_free \
5005 elfNN_ia64_hash_table_free
5006 #define elf_backend_create_dynamic_sections \
5007 elfNN_ia64_create_dynamic_sections
5008 #define elf_backend_check_relocs \
5009 elfNN_ia64_check_relocs
5010 #define elf_backend_adjust_dynamic_symbol \
5011 elfNN_ia64_adjust_dynamic_symbol
5012 #define elf_backend_size_dynamic_sections \
5013 elfNN_ia64_size_dynamic_sections
5014 #define elf_backend_relocate_section \
5015 elfNN_ia64_relocate_section
5016 #define elf_backend_finish_dynamic_symbol \
5017 elfNN_ia64_finish_dynamic_symbol
5018 #define elf_backend_finish_dynamic_sections \
5019 elfNN_ia64_finish_dynamic_sections
5020 #define bfd_elfNN_bfd_final_link \
5021 elfNN_ia64_final_link
5023 #define bfd_elfNN_bfd_merge_private_bfd_data \
5024 elfNN_ia64_merge_private_bfd_data
5025 #define bfd_elfNN_bfd_set_private_flags \
5026 elfNN_ia64_set_private_flags
5027 #define bfd_elfNN_bfd_print_private_bfd_data \
5028 elfNN_ia64_print_private_bfd_data
5030 #define elf_backend_plt_readonly 1
5031 #define elf_backend_want_plt_sym 0
5032 #define elf_backend_plt_alignment 5
5033 #define elf_backend_got_header_size 0
5034 #define elf_backend_want_got_plt 1
5035 #define elf_backend_may_use_rel_p 1
5036 #define elf_backend_may_use_rela_p 1
5037 #define elf_backend_default_use_rela_p 1
5038 #define elf_backend_want_dynbss 0
5039 #define elf_backend_copy_indirect_symbol elfNN_ia64_hash_copy_indirect
5040 #define elf_backend_hide_symbol elfNN_ia64_hash_hide_symbol
5041 #define elf_backend_reloc_type_class elfNN_ia64_reloc_type_class
5042 #define elf_backend_rela_normal 1
5043 #define elf_backend_special_sections elfNN_ia64_special_sections
5045 #include "elfNN-target.h"
5047 /* HPUX-specific vectors. */
5049 #undef TARGET_LITTLE_SYM
5050 #undef TARGET_LITTLE_NAME
5051 #undef TARGET_BIG_SYM
5052 #define TARGET_BIG_SYM bfd_elfNN_ia64_hpux_big_vec
5053 #undef TARGET_BIG_NAME
5054 #define TARGET_BIG_NAME "elfNN-ia64-hpux-big"
5056 /* These are HP-UX specific functions. */
5058 #undef elf_backend_post_process_headers
5059 #define elf_backend_post_process_headers elfNN_hpux_post_process_headers
5061 #undef elf_backend_section_from_bfd_section
5062 #define elf_backend_section_from_bfd_section elfNN_hpux_backend_section_from_bfd_section
5064 #undef elf_backend_symbol_processing
5065 #define elf_backend_symbol_processing elfNN_hpux_backend_symbol_processing
5067 #undef elf_backend_want_p_paddr_set_to_zero
5068 #define elf_backend_want_p_paddr_set_to_zero 1
5070 #undef ELF_MAXPAGESIZE
5071 #define ELF_MAXPAGESIZE 0x1000 /* 1K */
5074 #define elfNN_bed elfNN_ia64_hpux_bed
5076 #include "elfNN-target.h"
5078 #undef elf_backend_want_p_paddr_set_to_zero