1 /* IA-64 support for 64-bit ELF
2 Copyright 1998, 1999, 2000, 2001, 2002, 2003 Free Software Foundation, Inc.
3 Contributed by David Mosberger-Tang <davidm@hpl.hp.com>
5 This file is part of BFD, the Binary File Descriptor library.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
25 #include "opcode/ia64.h"
30 /* THE RULES for all the stuff the linker creates --
32 GOT Entries created in response to LTOFF or LTOFF_FPTR
33 relocations. Dynamic relocs created for dynamic
34 symbols in an application; REL relocs for locals
37 FPTR The canonical function descriptor. Created for local
38 symbols in applications. Descriptors for dynamic symbols
39 and local symbols in shared libraries are created by
40 ld.so. Thus there are no dynamic relocs against these
41 objects. The FPTR relocs for such _are_ passed through
42 to the dynamic relocation tables.
44 FULL_PLT Created for a PCREL21B relocation against a dynamic symbol.
45 Requires the creation of a PLTOFF entry. This does not
46 require any dynamic relocations.
48 PLTOFF Created by PLTOFF relocations. For local symbols, this
49 is an alternate function descriptor, and in shared libraries
50 requires two REL relocations. Note that this cannot be
51 transformed into an FPTR relocation, since it must be in
52 range of the GP. For dynamic symbols, this is a function
53 descriptor for a MIN_PLT entry, and requires one IPLT reloc.
55 MIN_PLT Created by PLTOFF entries against dynamic symbols. This
56 does not reqire dynamic relocations. */
58 #define NELEMS(a) ((int) (sizeof (a) / sizeof ((a)[0])))
60 typedef struct bfd_hash_entry
*(*new_hash_entry_func
)
61 PARAMS ((struct bfd_hash_entry
*, struct bfd_hash_table
*, const char *));
63 /* In dynamically (linker-) created sections, we generally need to keep track
64 of the place a symbol or expression got allocated to. This is done via hash
65 tables that store entries of the following type. */
67 struct elfNN_ia64_dyn_sym_info
69 /* The addend for which this entry is relevant. */
72 /* Next addend in the list. */
73 struct elfNN_ia64_dyn_sym_info
*next
;
77 bfd_vma pltoff_offset
;
81 bfd_vma dtpmod_offset
;
82 bfd_vma dtprel_offset
;
84 /* The symbol table entry, if any, that this was derrived from. */
85 struct elf_link_hash_entry
*h
;
87 /* Used to count non-got, non-plt relocations for delayed sizing
88 of relocation sections. */
89 struct elfNN_ia64_dyn_reloc_entry
91 struct elfNN_ia64_dyn_reloc_entry
*next
;
97 /* TRUE when the section contents have been updated. */
98 unsigned got_done
: 1;
99 unsigned fptr_done
: 1;
100 unsigned pltoff_done
: 1;
101 unsigned tprel_done
: 1;
102 unsigned dtpmod_done
: 1;
103 unsigned dtprel_done
: 1;
105 /* TRUE for the different kinds of linker data we want created. */
106 unsigned want_got
: 1;
107 unsigned want_gotx
: 1;
108 unsigned want_fptr
: 1;
109 unsigned want_ltoff_fptr
: 1;
110 unsigned want_plt
: 1;
111 unsigned want_plt2
: 1;
112 unsigned want_pltoff
: 1;
113 unsigned want_tprel
: 1;
114 unsigned want_dtpmod
: 1;
115 unsigned want_dtprel
: 1;
118 struct elfNN_ia64_local_hash_entry
122 struct elfNN_ia64_dyn_sym_info
*info
;
124 /* TRUE if this hash entry's addends was translated for
125 SHF_MERGE optimization. */
126 unsigned sec_merge_done
: 1;
129 struct elfNN_ia64_link_hash_entry
131 struct elf_link_hash_entry root
;
132 struct elfNN_ia64_dyn_sym_info
*info
;
135 struct elfNN_ia64_link_hash_table
137 /* The main hash table. */
138 struct elf_link_hash_table root
;
140 asection
*got_sec
; /* the linkage table section (or NULL) */
141 asection
*rel_got_sec
; /* dynamic relocation section for same */
142 asection
*fptr_sec
; /* function descriptor table (or NULL) */
143 asection
*rel_fptr_sec
; /* dynamic relocation section for same */
144 asection
*plt_sec
; /* the primary plt section (or NULL) */
145 asection
*pltoff_sec
; /* private descriptors for plt (or NULL) */
146 asection
*rel_pltoff_sec
; /* dynamic relocation section for same */
148 bfd_size_type minplt_entries
; /* number of minplt entries */
149 unsigned reltext
: 1; /* are there relocs against readonly sections? */
150 unsigned self_dtpmod_done
: 1;/* has self DTPMOD entry been finished? */
151 bfd_vma self_dtpmod_offset
; /* .got offset to self DTPMOD entry */
153 htab_t loc_hash_table
;
154 void *loc_hash_memory
;
157 struct elfNN_ia64_allocate_data
159 struct bfd_link_info
*info
;
163 #define elfNN_ia64_hash_table(p) \
164 ((struct elfNN_ia64_link_hash_table *) ((p)->hash))
166 static bfd_reloc_status_type elfNN_ia64_reloc
167 PARAMS ((bfd
*abfd
, arelent
*reloc
, asymbol
*sym
, PTR data
,
168 asection
*input_section
, bfd
*output_bfd
, char **error_message
));
169 static reloc_howto_type
* lookup_howto
170 PARAMS ((unsigned int rtype
));
171 static reloc_howto_type
*elfNN_ia64_reloc_type_lookup
172 PARAMS ((bfd
*abfd
, bfd_reloc_code_real_type bfd_code
));
173 static void elfNN_ia64_info_to_howto
174 PARAMS ((bfd
*abfd
, arelent
*bfd_reloc
, Elf_Internal_Rela
*elf_reloc
));
175 static bfd_boolean elfNN_ia64_relax_section
176 PARAMS((bfd
*abfd
, asection
*sec
, struct bfd_link_info
*link_info
,
177 bfd_boolean
*again
));
178 static void elfNN_ia64_relax_ldxmov
179 PARAMS((bfd
*abfd
, bfd_byte
*contents
, bfd_vma off
));
180 static bfd_boolean is_unwind_section_name
181 PARAMS ((bfd
*abfd
, const char *));
182 static bfd_boolean elfNN_ia64_section_from_shdr
183 PARAMS ((bfd
*, Elf_Internal_Shdr
*, const char *));
184 static bfd_boolean elfNN_ia64_section_flags
185 PARAMS ((flagword
*, Elf_Internal_Shdr
*));
186 static bfd_boolean elfNN_ia64_fake_sections
187 PARAMS ((bfd
*abfd
, Elf_Internal_Shdr
*hdr
, asection
*sec
));
188 static void elfNN_ia64_final_write_processing
189 PARAMS ((bfd
*abfd
, bfd_boolean linker
));
190 static bfd_boolean elfNN_ia64_add_symbol_hook
191 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, const Elf_Internal_Sym
*sym
,
192 const char **namep
, flagword
*flagsp
, asection
**secp
,
194 static int elfNN_ia64_additional_program_headers
195 PARAMS ((bfd
*abfd
));
196 static bfd_boolean elfNN_ia64_modify_segment_map
198 static bfd_boolean elfNN_ia64_is_local_label_name
199 PARAMS ((bfd
*abfd
, const char *name
));
200 static bfd_boolean elfNN_ia64_dynamic_symbol_p
201 PARAMS ((struct elf_link_hash_entry
*h
, struct bfd_link_info
*info
, int));
202 static struct bfd_hash_entry
*elfNN_ia64_new_elf_hash_entry
203 PARAMS ((struct bfd_hash_entry
*entry
, struct bfd_hash_table
*table
,
204 const char *string
));
205 static void elfNN_ia64_hash_copy_indirect
206 PARAMS ((const struct elf_backend_data
*, struct elf_link_hash_entry
*,
207 struct elf_link_hash_entry
*));
208 static void elfNN_ia64_hash_hide_symbol
209 PARAMS ((struct bfd_link_info
*, struct elf_link_hash_entry
*, bfd_boolean
));
210 static hashval_t elfNN_ia64_local_htab_hash
PARAMS ((const void *));
211 static int elfNN_ia64_local_htab_eq
PARAMS ((const void *ptr1
,
213 static struct bfd_link_hash_table
*elfNN_ia64_hash_table_create
214 PARAMS ((bfd
*abfd
));
215 static void elfNN_ia64_hash_table_free
216 PARAMS ((struct bfd_link_hash_table
*hash
));
217 static bfd_boolean elfNN_ia64_global_dyn_sym_thunk
218 PARAMS ((struct bfd_hash_entry
*, PTR
));
219 static int elfNN_ia64_local_dyn_sym_thunk
220 PARAMS ((void **, PTR
));
221 static void elfNN_ia64_dyn_sym_traverse
222 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
223 bfd_boolean (*func
) (struct elfNN_ia64_dyn_sym_info
*, PTR
),
225 static bfd_boolean elfNN_ia64_create_dynamic_sections
226 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
227 static struct elfNN_ia64_local_hash_entry
* get_local_sym_hash
228 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
229 bfd
*abfd
, const Elf_Internal_Rela
*rel
, bfd_boolean create
));
230 static struct elfNN_ia64_dyn_sym_info
* get_dyn_sym_info
231 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
232 struct elf_link_hash_entry
*h
,
233 bfd
*abfd
, const Elf_Internal_Rela
*rel
, bfd_boolean create
));
234 static asection
*get_got
235 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
236 struct elfNN_ia64_link_hash_table
*ia64_info
));
237 static asection
*get_fptr
238 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
239 struct elfNN_ia64_link_hash_table
*ia64_info
));
240 static asection
*get_pltoff
241 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
242 struct elfNN_ia64_link_hash_table
*ia64_info
));
243 static asection
*get_reloc_section
244 PARAMS ((bfd
*abfd
, struct elfNN_ia64_link_hash_table
*ia64_info
,
245 asection
*sec
, bfd_boolean create
));
246 static bfd_boolean count_dyn_reloc
247 PARAMS ((bfd
*abfd
, struct elfNN_ia64_dyn_sym_info
*dyn_i
,
248 asection
*srel
, int type
));
249 static bfd_boolean elfNN_ia64_check_relocs
250 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, asection
*sec
,
251 const Elf_Internal_Rela
*relocs
));
252 static bfd_boolean elfNN_ia64_adjust_dynamic_symbol
253 PARAMS ((struct bfd_link_info
*info
, struct elf_link_hash_entry
*h
));
254 static long global_sym_index
255 PARAMS ((struct elf_link_hash_entry
*h
));
256 static bfd_boolean allocate_fptr
257 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
258 static bfd_boolean allocate_global_data_got
259 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
260 static bfd_boolean allocate_global_fptr_got
261 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
262 static bfd_boolean allocate_local_got
263 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
264 static bfd_boolean allocate_pltoff_entries
265 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
266 static bfd_boolean allocate_plt_entries
267 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
268 static bfd_boolean allocate_plt2_entries
269 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
270 static bfd_boolean allocate_dynrel_entries
271 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
272 static bfd_boolean elfNN_ia64_size_dynamic_sections
273 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
));
274 static bfd_reloc_status_type elfNN_ia64_install_value
275 PARAMS ((bfd
*abfd
, bfd_byte
*hit_addr
, bfd_vma val
, unsigned int r_type
));
276 static void elfNN_ia64_install_dyn_reloc
277 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, asection
*sec
,
278 asection
*srel
, bfd_vma offset
, unsigned int type
,
279 long dynindx
, bfd_vma addend
));
280 static bfd_vma set_got_entry
281 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
282 struct elfNN_ia64_dyn_sym_info
*dyn_i
, long dynindx
,
283 bfd_vma addend
, bfd_vma value
, unsigned int dyn_r_type
));
284 static bfd_vma set_fptr_entry
285 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
286 struct elfNN_ia64_dyn_sym_info
*dyn_i
,
288 static bfd_vma set_pltoff_entry
289 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
290 struct elfNN_ia64_dyn_sym_info
*dyn_i
,
291 bfd_vma value
, bfd_boolean
));
292 static bfd_vma elfNN_ia64_tprel_base
293 PARAMS ((struct bfd_link_info
*info
));
294 static bfd_vma elfNN_ia64_dtprel_base
295 PARAMS ((struct bfd_link_info
*info
));
296 static int elfNN_ia64_unwind_entry_compare
297 PARAMS ((const PTR
, const PTR
));
298 static bfd_boolean elfNN_ia64_choose_gp
299 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
300 static bfd_boolean elfNN_ia64_final_link
301 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
302 static bfd_boolean elfNN_ia64_relocate_section
303 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
, bfd
*input_bfd
,
304 asection
*input_section
, bfd_byte
*contents
,
305 Elf_Internal_Rela
*relocs
, Elf_Internal_Sym
*local_syms
,
306 asection
**local_sections
));
307 static bfd_boolean elfNN_ia64_finish_dynamic_symbol
308 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
,
309 struct elf_link_hash_entry
*h
, Elf_Internal_Sym
*sym
));
310 static bfd_boolean elfNN_ia64_finish_dynamic_sections
311 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
312 static bfd_boolean elfNN_ia64_set_private_flags
313 PARAMS ((bfd
*abfd
, flagword flags
));
314 static bfd_boolean elfNN_ia64_merge_private_bfd_data
315 PARAMS ((bfd
*ibfd
, bfd
*obfd
));
316 static bfd_boolean elfNN_ia64_print_private_bfd_data
317 PARAMS ((bfd
*abfd
, PTR ptr
));
318 static enum elf_reloc_type_class elfNN_ia64_reloc_type_class
319 PARAMS ((const Elf_Internal_Rela
*));
320 static bfd_boolean elfNN_ia64_hpux_vec
321 PARAMS ((const bfd_target
*vec
));
322 static void elfNN_hpux_post_process_headers
323 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
324 bfd_boolean elfNN_hpux_backend_section_from_bfd_section
325 PARAMS ((bfd
*abfd
, asection
*sec
, int *retval
));
327 /* ia64-specific relocation. */
329 /* Perform a relocation. Not much to do here as all the hard work is
330 done in elfNN_ia64_final_link_relocate. */
331 static bfd_reloc_status_type
332 elfNN_ia64_reloc (abfd
, reloc
, sym
, data
, input_section
,
333 output_bfd
, error_message
)
334 bfd
*abfd ATTRIBUTE_UNUSED
;
336 asymbol
*sym ATTRIBUTE_UNUSED
;
337 PTR data ATTRIBUTE_UNUSED
;
338 asection
*input_section
;
340 char **error_message
;
344 reloc
->address
+= input_section
->output_offset
;
348 if (input_section
->flags
& SEC_DEBUGGING
)
349 return bfd_reloc_continue
;
351 *error_message
= "Unsupported call to elfNN_ia64_reloc";
352 return bfd_reloc_notsupported
;
355 #define IA64_HOWTO(TYPE, NAME, SIZE, PCREL, IN) \
356 HOWTO (TYPE, 0, SIZE, 0, PCREL, 0, complain_overflow_signed, \
357 elfNN_ia64_reloc, NAME, FALSE, 0, -1, IN)
359 /* This table has to be sorted according to increasing number of the
361 static reloc_howto_type ia64_howto_table
[] =
363 IA64_HOWTO (R_IA64_NONE
, "NONE", 0, FALSE
, TRUE
),
365 IA64_HOWTO (R_IA64_IMM14
, "IMM14", 0, FALSE
, TRUE
),
366 IA64_HOWTO (R_IA64_IMM22
, "IMM22", 0, FALSE
, TRUE
),
367 IA64_HOWTO (R_IA64_IMM64
, "IMM64", 0, FALSE
, TRUE
),
368 IA64_HOWTO (R_IA64_DIR32MSB
, "DIR32MSB", 2, FALSE
, TRUE
),
369 IA64_HOWTO (R_IA64_DIR32LSB
, "DIR32LSB", 2, FALSE
, TRUE
),
370 IA64_HOWTO (R_IA64_DIR64MSB
, "DIR64MSB", 4, FALSE
, TRUE
),
371 IA64_HOWTO (R_IA64_DIR64LSB
, "DIR64LSB", 4, FALSE
, TRUE
),
373 IA64_HOWTO (R_IA64_GPREL22
, "GPREL22", 0, FALSE
, TRUE
),
374 IA64_HOWTO (R_IA64_GPREL64I
, "GPREL64I", 0, FALSE
, TRUE
),
375 IA64_HOWTO (R_IA64_GPREL32MSB
, "GPREL32MSB", 2, FALSE
, TRUE
),
376 IA64_HOWTO (R_IA64_GPREL32LSB
, "GPREL32LSB", 2, FALSE
, TRUE
),
377 IA64_HOWTO (R_IA64_GPREL64MSB
, "GPREL64MSB", 4, FALSE
, TRUE
),
378 IA64_HOWTO (R_IA64_GPREL64LSB
, "GPREL64LSB", 4, FALSE
, TRUE
),
380 IA64_HOWTO (R_IA64_LTOFF22
, "LTOFF22", 0, FALSE
, TRUE
),
381 IA64_HOWTO (R_IA64_LTOFF64I
, "LTOFF64I", 0, FALSE
, TRUE
),
383 IA64_HOWTO (R_IA64_PLTOFF22
, "PLTOFF22", 0, FALSE
, TRUE
),
384 IA64_HOWTO (R_IA64_PLTOFF64I
, "PLTOFF64I", 0, FALSE
, TRUE
),
385 IA64_HOWTO (R_IA64_PLTOFF64MSB
, "PLTOFF64MSB", 4, FALSE
, TRUE
),
386 IA64_HOWTO (R_IA64_PLTOFF64LSB
, "PLTOFF64LSB", 4, FALSE
, TRUE
),
388 IA64_HOWTO (R_IA64_FPTR64I
, "FPTR64I", 0, FALSE
, TRUE
),
389 IA64_HOWTO (R_IA64_FPTR32MSB
, "FPTR32MSB", 2, FALSE
, TRUE
),
390 IA64_HOWTO (R_IA64_FPTR32LSB
, "FPTR32LSB", 2, FALSE
, TRUE
),
391 IA64_HOWTO (R_IA64_FPTR64MSB
, "FPTR64MSB", 4, FALSE
, TRUE
),
392 IA64_HOWTO (R_IA64_FPTR64LSB
, "FPTR64LSB", 4, FALSE
, TRUE
),
394 IA64_HOWTO (R_IA64_PCREL60B
, "PCREL60B", 0, TRUE
, TRUE
),
395 IA64_HOWTO (R_IA64_PCREL21B
, "PCREL21B", 0, TRUE
, TRUE
),
396 IA64_HOWTO (R_IA64_PCREL21M
, "PCREL21M", 0, TRUE
, TRUE
),
397 IA64_HOWTO (R_IA64_PCREL21F
, "PCREL21F", 0, TRUE
, TRUE
),
398 IA64_HOWTO (R_IA64_PCREL32MSB
, "PCREL32MSB", 2, TRUE
, TRUE
),
399 IA64_HOWTO (R_IA64_PCREL32LSB
, "PCREL32LSB", 2, TRUE
, TRUE
),
400 IA64_HOWTO (R_IA64_PCREL64MSB
, "PCREL64MSB", 4, TRUE
, TRUE
),
401 IA64_HOWTO (R_IA64_PCREL64LSB
, "PCREL64LSB", 4, TRUE
, TRUE
),
403 IA64_HOWTO (R_IA64_LTOFF_FPTR22
, "LTOFF_FPTR22", 0, FALSE
, TRUE
),
404 IA64_HOWTO (R_IA64_LTOFF_FPTR64I
, "LTOFF_FPTR64I", 0, FALSE
, TRUE
),
405 IA64_HOWTO (R_IA64_LTOFF_FPTR32MSB
, "LTOFF_FPTR32MSB", 2, FALSE
, TRUE
),
406 IA64_HOWTO (R_IA64_LTOFF_FPTR32LSB
, "LTOFF_FPTR32LSB", 2, FALSE
, TRUE
),
407 IA64_HOWTO (R_IA64_LTOFF_FPTR64MSB
, "LTOFF_FPTR64MSB", 4, FALSE
, TRUE
),
408 IA64_HOWTO (R_IA64_LTOFF_FPTR64LSB
, "LTOFF_FPTR64LSB", 4, FALSE
, TRUE
),
410 IA64_HOWTO (R_IA64_SEGREL32MSB
, "SEGREL32MSB", 2, FALSE
, TRUE
),
411 IA64_HOWTO (R_IA64_SEGREL32LSB
, "SEGREL32LSB", 2, FALSE
, TRUE
),
412 IA64_HOWTO (R_IA64_SEGREL64MSB
, "SEGREL64MSB", 4, FALSE
, TRUE
),
413 IA64_HOWTO (R_IA64_SEGREL64LSB
, "SEGREL64LSB", 4, FALSE
, TRUE
),
415 IA64_HOWTO (R_IA64_SECREL32MSB
, "SECREL32MSB", 2, FALSE
, TRUE
),
416 IA64_HOWTO (R_IA64_SECREL32LSB
, "SECREL32LSB", 2, FALSE
, TRUE
),
417 IA64_HOWTO (R_IA64_SECREL64MSB
, "SECREL64MSB", 4, FALSE
, TRUE
),
418 IA64_HOWTO (R_IA64_SECREL64LSB
, "SECREL64LSB", 4, FALSE
, TRUE
),
420 IA64_HOWTO (R_IA64_REL32MSB
, "REL32MSB", 2, FALSE
, TRUE
),
421 IA64_HOWTO (R_IA64_REL32LSB
, "REL32LSB", 2, FALSE
, TRUE
),
422 IA64_HOWTO (R_IA64_REL64MSB
, "REL64MSB", 4, FALSE
, TRUE
),
423 IA64_HOWTO (R_IA64_REL64LSB
, "REL64LSB", 4, FALSE
, TRUE
),
425 IA64_HOWTO (R_IA64_LTV32MSB
, "LTV32MSB", 2, FALSE
, TRUE
),
426 IA64_HOWTO (R_IA64_LTV32LSB
, "LTV32LSB", 2, FALSE
, TRUE
),
427 IA64_HOWTO (R_IA64_LTV64MSB
, "LTV64MSB", 4, FALSE
, TRUE
),
428 IA64_HOWTO (R_IA64_LTV64LSB
, "LTV64LSB", 4, FALSE
, TRUE
),
430 IA64_HOWTO (R_IA64_PCREL21BI
, "PCREL21BI", 0, TRUE
, TRUE
),
431 IA64_HOWTO (R_IA64_PCREL22
, "PCREL22", 0, TRUE
, TRUE
),
432 IA64_HOWTO (R_IA64_PCREL64I
, "PCREL64I", 0, TRUE
, TRUE
),
434 IA64_HOWTO (R_IA64_IPLTMSB
, "IPLTMSB", 4, FALSE
, TRUE
),
435 IA64_HOWTO (R_IA64_IPLTLSB
, "IPLTLSB", 4, FALSE
, TRUE
),
436 IA64_HOWTO (R_IA64_COPY
, "COPY", 4, FALSE
, TRUE
),
437 IA64_HOWTO (R_IA64_LTOFF22X
, "LTOFF22X", 0, FALSE
, TRUE
),
438 IA64_HOWTO (R_IA64_LDXMOV
, "LDXMOV", 0, FALSE
, TRUE
),
440 IA64_HOWTO (R_IA64_TPREL14
, "TPREL14", 0, FALSE
, FALSE
),
441 IA64_HOWTO (R_IA64_TPREL22
, "TPREL22", 0, FALSE
, FALSE
),
442 IA64_HOWTO (R_IA64_TPREL64I
, "TPREL64I", 0, FALSE
, FALSE
),
443 IA64_HOWTO (R_IA64_TPREL64MSB
, "TPREL64MSB", 4, FALSE
, FALSE
),
444 IA64_HOWTO (R_IA64_TPREL64LSB
, "TPREL64LSB", 4, FALSE
, FALSE
),
445 IA64_HOWTO (R_IA64_LTOFF_TPREL22
, "LTOFF_TPREL22", 0, FALSE
, FALSE
),
447 IA64_HOWTO (R_IA64_DTPMOD64MSB
, "TPREL64MSB", 4, FALSE
, FALSE
),
448 IA64_HOWTO (R_IA64_DTPMOD64LSB
, "TPREL64LSB", 4, FALSE
, FALSE
),
449 IA64_HOWTO (R_IA64_LTOFF_DTPMOD22
, "LTOFF_DTPMOD22", 0, FALSE
, FALSE
),
451 IA64_HOWTO (R_IA64_DTPREL14
, "DTPREL14", 0, FALSE
, FALSE
),
452 IA64_HOWTO (R_IA64_DTPREL22
, "DTPREL22", 0, FALSE
, FALSE
),
453 IA64_HOWTO (R_IA64_DTPREL64I
, "DTPREL64I", 0, FALSE
, FALSE
),
454 IA64_HOWTO (R_IA64_DTPREL32MSB
, "DTPREL32MSB", 2, FALSE
, FALSE
),
455 IA64_HOWTO (R_IA64_DTPREL32LSB
, "DTPREL32LSB", 2, FALSE
, FALSE
),
456 IA64_HOWTO (R_IA64_DTPREL64MSB
, "DTPREL64MSB", 4, FALSE
, FALSE
),
457 IA64_HOWTO (R_IA64_DTPREL64LSB
, "DTPREL64LSB", 4, FALSE
, FALSE
),
458 IA64_HOWTO (R_IA64_LTOFF_DTPREL22
, "LTOFF_DTPREL22", 0, FALSE
, FALSE
),
461 static unsigned char elf_code_to_howto_index
[R_IA64_MAX_RELOC_CODE
+ 1];
463 /* Given a BFD reloc type, return the matching HOWTO structure. */
465 static reloc_howto_type
*
469 static int inited
= 0;
476 memset (elf_code_to_howto_index
, 0xff, sizeof (elf_code_to_howto_index
));
477 for (i
= 0; i
< NELEMS (ia64_howto_table
); ++i
)
478 elf_code_to_howto_index
[ia64_howto_table
[i
].type
] = i
;
481 BFD_ASSERT (rtype
<= R_IA64_MAX_RELOC_CODE
);
482 i
= elf_code_to_howto_index
[rtype
];
483 if (i
>= NELEMS (ia64_howto_table
))
485 return ia64_howto_table
+ i
;
488 static reloc_howto_type
*
489 elfNN_ia64_reloc_type_lookup (abfd
, bfd_code
)
490 bfd
*abfd ATTRIBUTE_UNUSED
;
491 bfd_reloc_code_real_type bfd_code
;
497 case BFD_RELOC_NONE
: rtype
= R_IA64_NONE
; break;
499 case BFD_RELOC_IA64_IMM14
: rtype
= R_IA64_IMM14
; break;
500 case BFD_RELOC_IA64_IMM22
: rtype
= R_IA64_IMM22
; break;
501 case BFD_RELOC_IA64_IMM64
: rtype
= R_IA64_IMM64
; break;
503 case BFD_RELOC_IA64_DIR32MSB
: rtype
= R_IA64_DIR32MSB
; break;
504 case BFD_RELOC_IA64_DIR32LSB
: rtype
= R_IA64_DIR32LSB
; break;
505 case BFD_RELOC_IA64_DIR64MSB
: rtype
= R_IA64_DIR64MSB
; break;
506 case BFD_RELOC_IA64_DIR64LSB
: rtype
= R_IA64_DIR64LSB
; break;
508 case BFD_RELOC_IA64_GPREL22
: rtype
= R_IA64_GPREL22
; break;
509 case BFD_RELOC_IA64_GPREL64I
: rtype
= R_IA64_GPREL64I
; break;
510 case BFD_RELOC_IA64_GPREL32MSB
: rtype
= R_IA64_GPREL32MSB
; break;
511 case BFD_RELOC_IA64_GPREL32LSB
: rtype
= R_IA64_GPREL32LSB
; break;
512 case BFD_RELOC_IA64_GPREL64MSB
: rtype
= R_IA64_GPREL64MSB
; break;
513 case BFD_RELOC_IA64_GPREL64LSB
: rtype
= R_IA64_GPREL64LSB
; break;
515 case BFD_RELOC_IA64_LTOFF22
: rtype
= R_IA64_LTOFF22
; break;
516 case BFD_RELOC_IA64_LTOFF64I
: rtype
= R_IA64_LTOFF64I
; break;
518 case BFD_RELOC_IA64_PLTOFF22
: rtype
= R_IA64_PLTOFF22
; break;
519 case BFD_RELOC_IA64_PLTOFF64I
: rtype
= R_IA64_PLTOFF64I
; break;
520 case BFD_RELOC_IA64_PLTOFF64MSB
: rtype
= R_IA64_PLTOFF64MSB
; break;
521 case BFD_RELOC_IA64_PLTOFF64LSB
: rtype
= R_IA64_PLTOFF64LSB
; break;
522 case BFD_RELOC_IA64_FPTR64I
: rtype
= R_IA64_FPTR64I
; break;
523 case BFD_RELOC_IA64_FPTR32MSB
: rtype
= R_IA64_FPTR32MSB
; break;
524 case BFD_RELOC_IA64_FPTR32LSB
: rtype
= R_IA64_FPTR32LSB
; break;
525 case BFD_RELOC_IA64_FPTR64MSB
: rtype
= R_IA64_FPTR64MSB
; break;
526 case BFD_RELOC_IA64_FPTR64LSB
: rtype
= R_IA64_FPTR64LSB
; break;
528 case BFD_RELOC_IA64_PCREL21B
: rtype
= R_IA64_PCREL21B
; break;
529 case BFD_RELOC_IA64_PCREL21BI
: rtype
= R_IA64_PCREL21BI
; break;
530 case BFD_RELOC_IA64_PCREL21M
: rtype
= R_IA64_PCREL21M
; break;
531 case BFD_RELOC_IA64_PCREL21F
: rtype
= R_IA64_PCREL21F
; break;
532 case BFD_RELOC_IA64_PCREL22
: rtype
= R_IA64_PCREL22
; break;
533 case BFD_RELOC_IA64_PCREL60B
: rtype
= R_IA64_PCREL60B
; break;
534 case BFD_RELOC_IA64_PCREL64I
: rtype
= R_IA64_PCREL64I
; break;
535 case BFD_RELOC_IA64_PCREL32MSB
: rtype
= R_IA64_PCREL32MSB
; break;
536 case BFD_RELOC_IA64_PCREL32LSB
: rtype
= R_IA64_PCREL32LSB
; break;
537 case BFD_RELOC_IA64_PCREL64MSB
: rtype
= R_IA64_PCREL64MSB
; break;
538 case BFD_RELOC_IA64_PCREL64LSB
: rtype
= R_IA64_PCREL64LSB
; break;
540 case BFD_RELOC_IA64_LTOFF_FPTR22
: rtype
= R_IA64_LTOFF_FPTR22
; break;
541 case BFD_RELOC_IA64_LTOFF_FPTR64I
: rtype
= R_IA64_LTOFF_FPTR64I
; break;
542 case BFD_RELOC_IA64_LTOFF_FPTR32MSB
: rtype
= R_IA64_LTOFF_FPTR32MSB
; break;
543 case BFD_RELOC_IA64_LTOFF_FPTR32LSB
: rtype
= R_IA64_LTOFF_FPTR32LSB
; break;
544 case BFD_RELOC_IA64_LTOFF_FPTR64MSB
: rtype
= R_IA64_LTOFF_FPTR64MSB
; break;
545 case BFD_RELOC_IA64_LTOFF_FPTR64LSB
: rtype
= R_IA64_LTOFF_FPTR64LSB
; break;
547 case BFD_RELOC_IA64_SEGREL32MSB
: rtype
= R_IA64_SEGREL32MSB
; break;
548 case BFD_RELOC_IA64_SEGREL32LSB
: rtype
= R_IA64_SEGREL32LSB
; break;
549 case BFD_RELOC_IA64_SEGREL64MSB
: rtype
= R_IA64_SEGREL64MSB
; break;
550 case BFD_RELOC_IA64_SEGREL64LSB
: rtype
= R_IA64_SEGREL64LSB
; break;
552 case BFD_RELOC_IA64_SECREL32MSB
: rtype
= R_IA64_SECREL32MSB
; break;
553 case BFD_RELOC_IA64_SECREL32LSB
: rtype
= R_IA64_SECREL32LSB
; break;
554 case BFD_RELOC_IA64_SECREL64MSB
: rtype
= R_IA64_SECREL64MSB
; break;
555 case BFD_RELOC_IA64_SECREL64LSB
: rtype
= R_IA64_SECREL64LSB
; break;
557 case BFD_RELOC_IA64_REL32MSB
: rtype
= R_IA64_REL32MSB
; break;
558 case BFD_RELOC_IA64_REL32LSB
: rtype
= R_IA64_REL32LSB
; break;
559 case BFD_RELOC_IA64_REL64MSB
: rtype
= R_IA64_REL64MSB
; break;
560 case BFD_RELOC_IA64_REL64LSB
: rtype
= R_IA64_REL64LSB
; break;
562 case BFD_RELOC_IA64_LTV32MSB
: rtype
= R_IA64_LTV32MSB
; break;
563 case BFD_RELOC_IA64_LTV32LSB
: rtype
= R_IA64_LTV32LSB
; break;
564 case BFD_RELOC_IA64_LTV64MSB
: rtype
= R_IA64_LTV64MSB
; break;
565 case BFD_RELOC_IA64_LTV64LSB
: rtype
= R_IA64_LTV64LSB
; break;
567 case BFD_RELOC_IA64_IPLTMSB
: rtype
= R_IA64_IPLTMSB
; break;
568 case BFD_RELOC_IA64_IPLTLSB
: rtype
= R_IA64_IPLTLSB
; break;
569 case BFD_RELOC_IA64_COPY
: rtype
= R_IA64_COPY
; break;
570 case BFD_RELOC_IA64_LTOFF22X
: rtype
= R_IA64_LTOFF22X
; break;
571 case BFD_RELOC_IA64_LDXMOV
: rtype
= R_IA64_LDXMOV
; break;
573 case BFD_RELOC_IA64_TPREL14
: rtype
= R_IA64_TPREL14
; break;
574 case BFD_RELOC_IA64_TPREL22
: rtype
= R_IA64_TPREL22
; break;
575 case BFD_RELOC_IA64_TPREL64I
: rtype
= R_IA64_TPREL64I
; break;
576 case BFD_RELOC_IA64_TPREL64MSB
: rtype
= R_IA64_TPREL64MSB
; break;
577 case BFD_RELOC_IA64_TPREL64LSB
: rtype
= R_IA64_TPREL64LSB
; break;
578 case BFD_RELOC_IA64_LTOFF_TPREL22
: rtype
= R_IA64_LTOFF_TPREL22
; break;
580 case BFD_RELOC_IA64_DTPMOD64MSB
: rtype
= R_IA64_DTPMOD64MSB
; break;
581 case BFD_RELOC_IA64_DTPMOD64LSB
: rtype
= R_IA64_DTPMOD64LSB
; break;
582 case BFD_RELOC_IA64_LTOFF_DTPMOD22
: rtype
= R_IA64_LTOFF_DTPMOD22
; break;
584 case BFD_RELOC_IA64_DTPREL14
: rtype
= R_IA64_DTPREL14
; break;
585 case BFD_RELOC_IA64_DTPREL22
: rtype
= R_IA64_DTPREL22
; break;
586 case BFD_RELOC_IA64_DTPREL64I
: rtype
= R_IA64_DTPREL64I
; break;
587 case BFD_RELOC_IA64_DTPREL32MSB
: rtype
= R_IA64_DTPREL32MSB
; break;
588 case BFD_RELOC_IA64_DTPREL32LSB
: rtype
= R_IA64_DTPREL32LSB
; break;
589 case BFD_RELOC_IA64_DTPREL64MSB
: rtype
= R_IA64_DTPREL64MSB
; break;
590 case BFD_RELOC_IA64_DTPREL64LSB
: rtype
= R_IA64_DTPREL64LSB
; break;
591 case BFD_RELOC_IA64_LTOFF_DTPREL22
: rtype
= R_IA64_LTOFF_DTPREL22
; break;
595 return lookup_howto (rtype
);
598 /* Given a ELF reloc, return the matching HOWTO structure. */
601 elfNN_ia64_info_to_howto (abfd
, bfd_reloc
, elf_reloc
)
602 bfd
*abfd ATTRIBUTE_UNUSED
;
604 Elf_Internal_Rela
*elf_reloc
;
607 = lookup_howto ((unsigned int) ELFNN_R_TYPE (elf_reloc
->r_info
));
610 #define PLT_HEADER_SIZE (3 * 16)
611 #define PLT_MIN_ENTRY_SIZE (1 * 16)
612 #define PLT_FULL_ENTRY_SIZE (2 * 16)
613 #define PLT_RESERVED_WORDS 3
615 static const bfd_byte plt_header
[PLT_HEADER_SIZE
] =
617 0x0b, 0x10, 0x00, 0x1c, 0x00, 0x21, /* [MMI] mov r2=r14;; */
618 0xe0, 0x00, 0x08, 0x00, 0x48, 0x00, /* addl r14=0,r2 */
619 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
620 0x0b, 0x80, 0x20, 0x1c, 0x18, 0x14, /* [MMI] ld8 r16=[r14],8;; */
621 0x10, 0x41, 0x38, 0x30, 0x28, 0x00, /* ld8 r17=[r14],8 */
622 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
623 0x11, 0x08, 0x00, 0x1c, 0x18, 0x10, /* [MIB] ld8 r1=[r14] */
624 0x60, 0x88, 0x04, 0x80, 0x03, 0x00, /* mov b6=r17 */
625 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
628 static const bfd_byte plt_min_entry
[PLT_MIN_ENTRY_SIZE
] =
630 0x11, 0x78, 0x00, 0x00, 0x00, 0x24, /* [MIB] mov r15=0 */
631 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, /* nop.i 0x0 */
632 0x00, 0x00, 0x00, 0x40 /* br.few 0 <PLT0>;; */
635 static const bfd_byte plt_full_entry
[PLT_FULL_ENTRY_SIZE
] =
637 0x0b, 0x78, 0x00, 0x02, 0x00, 0x24, /* [MMI] addl r15=0,r1;; */
638 0x00, 0x41, 0x3c, 0x30, 0x28, 0xc0, /* ld8 r16=[r15],8 */
639 0x01, 0x08, 0x00, 0x84, /* mov r14=r1;; */
640 0x11, 0x08, 0x00, 0x1e, 0x18, 0x10, /* [MIB] ld8 r1=[r15] */
641 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
642 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
645 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
647 static const bfd_byte oor_brl
[16] =
649 0x05, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
650 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* brl.sptk.few tgt;; */
651 0x00, 0x00, 0x00, 0xc0
654 static const bfd_byte oor_ip
[48] =
656 0x04, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
657 0x00, 0x00, 0x00, 0x00, 0x00, 0xe0, /* movl r15=0 */
658 0x01, 0x00, 0x00, 0x60,
659 0x03, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MII] nop.m 0 */
660 0x00, 0x01, 0x00, 0x60, 0x00, 0x00, /* mov r16=ip;; */
661 0xf2, 0x80, 0x00, 0x80, /* add r16=r15,r16;; */
662 0x11, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MIB] nop.m 0 */
663 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
664 0x60, 0x00, 0x80, 0x00 /* br b6;; */
667 static size_t oor_branch_size
= sizeof (oor_brl
);
670 bfd_elfNN_ia64_after_parse (int itanium
)
672 oor_branch_size
= itanium
? sizeof (oor_ip
) : sizeof (oor_brl
);
676 /* These functions do relaxation for IA-64 ELF. */
679 elfNN_ia64_relax_section (abfd
, sec
, link_info
, again
)
682 struct bfd_link_info
*link_info
;
687 struct one_fixup
*next
;
693 Elf_Internal_Shdr
*symtab_hdr
;
694 Elf_Internal_Rela
*internal_relocs
;
695 Elf_Internal_Rela
*irel
, *irelend
;
697 Elf_Internal_Sym
*isymbuf
= NULL
;
698 struct elfNN_ia64_link_hash_table
*ia64_info
;
699 struct one_fixup
*fixups
= NULL
;
700 bfd_boolean changed_contents
= FALSE
;
701 bfd_boolean changed_relocs
= FALSE
;
702 bfd_boolean changed_got
= FALSE
;
705 /* Assume we're not going to change any sizes, and we'll only need
709 /* Don't even try to relax for non-ELF outputs. */
710 if (link_info
->hash
->creator
->flavour
!= bfd_target_elf_flavour
)
713 /* Nothing to do if there are no relocations or there is no need for
714 the relax finalize pass. */
715 if ((sec
->flags
& SEC_RELOC
) == 0
716 || sec
->reloc_count
== 0
717 || (link_info
->relax_finalizing
718 && sec
->need_finalize_relax
== 0))
721 /* If this is the first time we have been called for this section,
722 initialize the cooked size. */
723 if (sec
->_cooked_size
== 0)
724 sec
->_cooked_size
= sec
->_raw_size
;
726 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
728 /* Load the relocations for this section. */
729 internal_relocs
= (_bfd_elf_link_read_relocs
730 (abfd
, sec
, (PTR
) NULL
, (Elf_Internal_Rela
*) NULL
,
731 link_info
->keep_memory
));
732 if (internal_relocs
== NULL
)
735 ia64_info
= elfNN_ia64_hash_table (link_info
);
736 irelend
= internal_relocs
+ sec
->reloc_count
;
738 /* Get the section contents. */
739 if (elf_section_data (sec
)->this_hdr
.contents
!= NULL
)
740 contents
= elf_section_data (sec
)->this_hdr
.contents
;
743 contents
= (bfd_byte
*) bfd_malloc (sec
->_raw_size
);
744 if (contents
== NULL
)
747 if (! bfd_get_section_contents (abfd
, sec
, contents
,
748 (file_ptr
) 0, sec
->_raw_size
))
752 for (irel
= internal_relocs
; irel
< irelend
; irel
++)
754 unsigned long r_type
= ELFNN_R_TYPE (irel
->r_info
);
755 bfd_vma symaddr
, reladdr
, trampoff
, toff
, roff
;
759 bfd_boolean is_branch
;
760 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
764 case R_IA64_PCREL21B
:
765 case R_IA64_PCREL21BI
:
766 case R_IA64_PCREL21M
:
767 case R_IA64_PCREL21F
:
768 if (link_info
->relax_finalizing
)
773 case R_IA64_LTOFF22X
:
775 if (!link_info
->relax_finalizing
)
777 sec
->need_finalize_relax
= 1;
787 /* Get the value of the symbol referred to by the reloc. */
788 if (ELFNN_R_SYM (irel
->r_info
) < symtab_hdr
->sh_info
)
790 /* A local symbol. */
791 Elf_Internal_Sym
*isym
;
793 /* Read this BFD's local symbols. */
796 isymbuf
= (Elf_Internal_Sym
*) symtab_hdr
->contents
;
798 isymbuf
= bfd_elf_get_elf_syms (abfd
, symtab_hdr
,
799 symtab_hdr
->sh_info
, 0,
805 isym
= isymbuf
+ ELFNN_R_SYM (irel
->r_info
);
806 if (isym
->st_shndx
== SHN_UNDEF
)
807 continue; /* We can't do anthing with undefined symbols. */
808 else if (isym
->st_shndx
== SHN_ABS
)
809 tsec
= bfd_abs_section_ptr
;
810 else if (isym
->st_shndx
== SHN_COMMON
)
811 tsec
= bfd_com_section_ptr
;
812 else if (isym
->st_shndx
== SHN_IA_64_ANSI_COMMON
)
813 tsec
= bfd_com_section_ptr
;
815 tsec
= bfd_section_from_elf_index (abfd
, isym
->st_shndx
);
817 toff
= isym
->st_value
;
818 dyn_i
= get_dyn_sym_info (ia64_info
, NULL
, abfd
, irel
, FALSE
);
823 struct elf_link_hash_entry
*h
;
825 indx
= ELFNN_R_SYM (irel
->r_info
) - symtab_hdr
->sh_info
;
826 h
= elf_sym_hashes (abfd
)[indx
];
827 BFD_ASSERT (h
!= NULL
);
829 while (h
->root
.type
== bfd_link_hash_indirect
830 || h
->root
.type
== bfd_link_hash_warning
)
831 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
833 dyn_i
= get_dyn_sym_info (ia64_info
, h
, abfd
, irel
, FALSE
);
835 /* For branches to dynamic symbols, we're interested instead
836 in a branch to the PLT entry. */
837 if (is_branch
&& dyn_i
&& dyn_i
->want_plt2
)
839 /* Internal branches shouldn't be sent to the PLT.
840 Leave this for now and we'll give an error later. */
841 if (r_type
!= R_IA64_PCREL21B
)
844 tsec
= ia64_info
->plt_sec
;
845 toff
= dyn_i
->plt2_offset
;
846 BFD_ASSERT (irel
->r_addend
== 0);
849 /* Can't do anything else with dynamic symbols. */
850 else if (elfNN_ia64_dynamic_symbol_p (h
, link_info
, r_type
))
855 /* We can't do anthing with undefined symbols. */
856 if (h
->root
.type
== bfd_link_hash_undefined
857 || h
->root
.type
== bfd_link_hash_undefweak
)
860 tsec
= h
->root
.u
.def
.section
;
861 toff
= h
->root
.u
.def
.value
;
865 if (tsec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
866 toff
= _bfd_merged_section_offset (abfd
, &tsec
,
867 elf_section_data (tsec
)->sec_info
,
868 toff
+ irel
->r_addend
,
871 toff
+= irel
->r_addend
;
873 symaddr
= tsec
->output_section
->vma
+ tsec
->output_offset
+ toff
;
875 roff
= irel
->r_offset
;
879 reladdr
= (sec
->output_section
->vma
881 + roff
) & (bfd_vma
) -4;
883 /* If the branch is in range, no need to do anything. */
884 if ((bfd_signed_vma
) (symaddr
- reladdr
) >= -0x1000000
885 && (bfd_signed_vma
) (symaddr
- reladdr
) <= 0x0FFFFF0)
888 /* If the branch and target are in the same section, you've
889 got one honking big section and we can't help you. You'll
890 get an error message later. */
894 /* Look for an existing fixup to this address. */
895 for (f
= fixups
; f
; f
= f
->next
)
896 if (f
->tsec
== tsec
&& f
->toff
== toff
)
901 /* Two alternatives: If it's a branch to a PLT entry, we can
902 make a copy of the FULL_PLT entry. Otherwise, we'll have
903 to use a `brl' insn to get where we're going. */
907 if (tsec
== ia64_info
->plt_sec
)
908 size
= sizeof (plt_full_entry
);
910 size
= oor_branch_size
;
912 /* Resize the current section to make room for the new branch. */
913 trampoff
= (sec
->_cooked_size
+ 15) & (bfd_vma
) -16;
914 amt
= trampoff
+ size
;
915 contents
= (bfd_byte
*) bfd_realloc (contents
, amt
);
916 if (contents
== NULL
)
918 sec
->_cooked_size
= amt
;
920 if (tsec
== ia64_info
->plt_sec
)
922 memcpy (contents
+ trampoff
, plt_full_entry
, size
);
924 /* Hijack the old relocation for use as the PLTOFF reloc. */
925 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
927 irel
->r_offset
= trampoff
;
931 if (size
== sizeof (oor_ip
))
933 memcpy (contents
+ trampoff
, oor_ip
, size
);
934 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
936 irel
->r_addend
-= 16;
937 irel
->r_offset
= trampoff
+ 2;
941 memcpy (contents
+ trampoff
, oor_brl
, size
);
942 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
944 irel
->r_offset
= trampoff
+ 2;
949 /* Record the fixup so we don't do it again this section. */
950 f
= (struct one_fixup
*)
951 bfd_malloc ((bfd_size_type
) sizeof (*f
));
955 f
->trampoff
= trampoff
;
960 /* Nop out the reloc, since we're finalizing things here. */
961 irel
->r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
964 /* Fix up the existing branch to hit the trampoline. Hope like
965 hell this doesn't overflow too. */
966 if (elfNN_ia64_install_value (abfd
, contents
+ roff
,
967 f
->trampoff
- (roff
& (bfd_vma
) -4),
968 r_type
) != bfd_reloc_ok
)
971 changed_contents
= TRUE
;
972 changed_relocs
= TRUE
;
979 bfd
*obfd
= sec
->output_section
->owner
;
980 gp
= _bfd_get_gp_value (obfd
);
983 if (!elfNN_ia64_choose_gp (obfd
, link_info
))
985 gp
= _bfd_get_gp_value (obfd
);
989 /* If the data is out of range, do nothing. */
990 if ((bfd_signed_vma
) (symaddr
- gp
) >= 0x200000
991 ||(bfd_signed_vma
) (symaddr
- gp
) < -0x200000)
994 if (r_type
== R_IA64_LTOFF22X
)
996 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
998 changed_relocs
= TRUE
;
999 if (dyn_i
->want_gotx
)
1001 dyn_i
->want_gotx
= 0;
1002 changed_got
|= !dyn_i
->want_got
;
1007 elfNN_ia64_relax_ldxmov (abfd
, contents
, roff
);
1008 irel
->r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
1009 changed_contents
= TRUE
;
1010 changed_relocs
= TRUE
;
1015 /* ??? If we created fixups, this may push the code segment large
1016 enough that the data segment moves, which will change the GP.
1017 Reset the GP so that we re-calculate next round. We need to
1018 do this at the _beginning_ of the next round; now will not do. */
1020 /* Clean up and go home. */
1023 struct one_fixup
*f
= fixups
;
1024 fixups
= fixups
->next
;
1029 && symtab_hdr
->contents
!= (unsigned char *) isymbuf
)
1031 if (! link_info
->keep_memory
)
1035 /* Cache the symbols for elf_link_input_bfd. */
1036 symtab_hdr
->contents
= (unsigned char *) isymbuf
;
1040 if (contents
!= NULL
1041 && elf_section_data (sec
)->this_hdr
.contents
!= contents
)
1043 if (!changed_contents
&& !link_info
->keep_memory
)
1047 /* Cache the section contents for elf_link_input_bfd. */
1048 elf_section_data (sec
)->this_hdr
.contents
= contents
;
1052 if (elf_section_data (sec
)->relocs
!= internal_relocs
)
1054 if (!changed_relocs
)
1055 free (internal_relocs
);
1057 elf_section_data (sec
)->relocs
= internal_relocs
;
1062 struct elfNN_ia64_allocate_data data
;
1063 data
.info
= link_info
;
1065 ia64_info
->self_dtpmod_offset
= (bfd_vma
) -1;
1067 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_data_got
, &data
);
1068 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_fptr_got
, &data
);
1069 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_local_got
, &data
);
1070 ia64_info
->got_sec
->_raw_size
= data
.ofs
;
1071 ia64_info
->got_sec
->_cooked_size
= data
.ofs
;
1073 /* ??? Resize .rela.got too. */
1076 if (link_info
->relax_finalizing
)
1077 sec
->need_finalize_relax
= 0;
1079 *again
= changed_contents
|| changed_relocs
;
1083 if (isymbuf
!= NULL
&& (unsigned char *) isymbuf
!= symtab_hdr
->contents
)
1085 if (contents
!= NULL
1086 && elf_section_data (sec
)->this_hdr
.contents
!= contents
)
1088 if (internal_relocs
!= NULL
1089 && elf_section_data (sec
)->relocs
!= internal_relocs
)
1090 free (internal_relocs
);
1095 elfNN_ia64_relax_ldxmov (abfd
, contents
, off
)
1101 bfd_vma dword
, insn
;
1103 switch ((int)off
& 0x3)
1105 case 0: shift
= 5; break;
1106 case 1: shift
= 14; off
+= 3; break;
1107 case 2: shift
= 23; off
+= 6; break;
1112 dword
= bfd_get_64 (abfd
, contents
+ off
);
1113 insn
= (dword
>> shift
) & 0x1ffffffffffLL
;
1115 r1
= (insn
>> 6) & 127;
1116 r3
= (insn
>> 20) & 127;
1118 insn
= 0x8000000; /* nop */
1120 insn
= (insn
& 0x7f01fff) | 0x10800000000LL
; /* (qp) mov r1 = r3 */
1122 dword
&= ~(0x1ffffffffffLL
<< shift
);
1123 dword
|= (insn
<< shift
);
1124 bfd_put_64 (abfd
, dword
, contents
+ off
);
1127 /* Return TRUE if NAME is an unwind table section name. */
1129 static inline bfd_boolean
1130 is_unwind_section_name (abfd
, name
)
1134 size_t len1
, len2
, len3
;
1136 if (elfNN_ia64_hpux_vec (abfd
->xvec
)
1137 && !strcmp (name
, ELF_STRING_ia64_unwind_hdr
))
1140 len1
= sizeof (ELF_STRING_ia64_unwind
) - 1;
1141 len2
= sizeof (ELF_STRING_ia64_unwind_info
) - 1;
1142 len3
= sizeof (ELF_STRING_ia64_unwind_once
) - 1;
1143 return ((strncmp (name
, ELF_STRING_ia64_unwind
, len1
) == 0
1144 && strncmp (name
, ELF_STRING_ia64_unwind_info
, len2
) != 0)
1145 || strncmp (name
, ELF_STRING_ia64_unwind_once
, len3
) == 0);
1148 /* Handle an IA-64 specific section when reading an object file. This
1149 is called when elfcode.h finds a section with an unknown type. */
1152 elfNN_ia64_section_from_shdr (abfd
, hdr
, name
)
1154 Elf_Internal_Shdr
*hdr
;
1159 /* There ought to be a place to keep ELF backend specific flags, but
1160 at the moment there isn't one. We just keep track of the
1161 sections by their name, instead. Fortunately, the ABI gives
1162 suggested names for all the MIPS specific sections, so we will
1163 probably get away with this. */
1164 switch (hdr
->sh_type
)
1166 case SHT_IA_64_UNWIND
:
1167 case SHT_IA_64_HP_OPT_ANOT
:
1171 if (strcmp (name
, ELF_STRING_ia64_archext
) != 0)
1179 if (! _bfd_elf_make_section_from_shdr (abfd
, hdr
, name
))
1181 newsect
= hdr
->bfd_section
;
1186 /* Convert IA-64 specific section flags to bfd internal section flags. */
1188 /* ??? There is no bfd internal flag equivalent to the SHF_IA_64_NORECOV
1192 elfNN_ia64_section_flags (flags
, hdr
)
1194 Elf_Internal_Shdr
*hdr
;
1196 if (hdr
->sh_flags
& SHF_IA_64_SHORT
)
1197 *flags
|= SEC_SMALL_DATA
;
1202 /* Set the correct type for an IA-64 ELF section. We do this by the
1203 section name, which is a hack, but ought to work. */
1206 elfNN_ia64_fake_sections (abfd
, hdr
, sec
)
1207 bfd
*abfd ATTRIBUTE_UNUSED
;
1208 Elf_Internal_Shdr
*hdr
;
1211 register const char *name
;
1213 name
= bfd_get_section_name (abfd
, sec
);
1215 if (is_unwind_section_name (abfd
, name
))
1217 /* We don't have the sections numbered at this point, so sh_info
1218 is set later, in elfNN_ia64_final_write_processing. */
1219 hdr
->sh_type
= SHT_IA_64_UNWIND
;
1220 hdr
->sh_flags
|= SHF_LINK_ORDER
;
1222 else if (strcmp (name
, ELF_STRING_ia64_archext
) == 0)
1223 hdr
->sh_type
= SHT_IA_64_EXT
;
1224 else if (strcmp (name
, ".HP.opt_annot") == 0)
1225 hdr
->sh_type
= SHT_IA_64_HP_OPT_ANOT
;
1226 else if (strcmp (name
, ".reloc") == 0)
1227 /* This is an ugly, but unfortunately necessary hack that is
1228 needed when producing EFI binaries on IA-64. It tells
1229 elf.c:elf_fake_sections() not to consider ".reloc" as a section
1230 containing ELF relocation info. We need this hack in order to
1231 be able to generate ELF binaries that can be translated into
1232 EFI applications (which are essentially COFF objects). Those
1233 files contain a COFF ".reloc" section inside an ELFNN object,
1234 which would normally cause BFD to segfault because it would
1235 attempt to interpret this section as containing relocation
1236 entries for section "oc". With this hack enabled, ".reloc"
1237 will be treated as a normal data section, which will avoid the
1238 segfault. However, you won't be able to create an ELFNN binary
1239 with a section named "oc" that needs relocations, but that's
1240 the kind of ugly side-effects you get when detecting section
1241 types based on their names... In practice, this limitation is
1242 unlikely to bite. */
1243 hdr
->sh_type
= SHT_PROGBITS
;
1245 if (sec
->flags
& SEC_SMALL_DATA
)
1246 hdr
->sh_flags
|= SHF_IA_64_SHORT
;
1251 /* The final processing done just before writing out an IA-64 ELF
1255 elfNN_ia64_final_write_processing (abfd
, linker
)
1257 bfd_boolean linker ATTRIBUTE_UNUSED
;
1259 Elf_Internal_Shdr
*hdr
;
1261 asection
*text_sect
, *s
;
1264 for (s
= abfd
->sections
; s
; s
= s
->next
)
1266 hdr
= &elf_section_data (s
)->this_hdr
;
1267 switch (hdr
->sh_type
)
1269 case SHT_IA_64_UNWIND
:
1270 /* See comments in gas/config/tc-ia64.c:dot_endp on why we
1272 sname
= bfd_get_section_name (abfd
, s
);
1273 len
= sizeof (ELF_STRING_ia64_unwind
) - 1;
1274 if (sname
&& strncmp (sname
, ELF_STRING_ia64_unwind
, len
) == 0)
1278 if (sname
[0] == '\0')
1279 /* .IA_64.unwind -> .text */
1280 text_sect
= bfd_get_section_by_name (abfd
, ".text");
1282 /* .IA_64.unwindFOO -> FOO */
1283 text_sect
= bfd_get_section_by_name (abfd
, sname
);
1286 && (len
= sizeof (ELF_STRING_ia64_unwind_once
) - 1,
1287 strncmp (sname
, ELF_STRING_ia64_unwind_once
, len
)) == 0)
1289 /* .gnu.linkonce.ia64unw.FOO -> .gnu.linkonce.t.FOO */
1290 size_t len2
= sizeof (".gnu.linkonce.t.") - 1;
1291 char *once_name
= bfd_malloc (len2
+ strlen (sname
+ len
) + 1);
1293 if (once_name
!= NULL
)
1295 memcpy (once_name
, ".gnu.linkonce.t.", len2
);
1296 strcpy (once_name
+ len2
, sname
+ len
);
1297 text_sect
= bfd_get_section_by_name (abfd
, once_name
);
1301 /* Should only happen if we run out of memory, in
1302 which case we're probably toast anyway. Try to
1303 cope by finding the section the slow way. */
1304 for (text_sect
= abfd
->sections
;
1306 text_sect
= text_sect
->next
)
1308 if (strncmp (bfd_section_name (abfd
, text_sect
),
1309 ".gnu.linkonce.t.", len2
) == 0
1310 && strcmp (bfd_section_name (abfd
, text_sect
) + len2
,
1316 /* last resort: fall back on .text */
1317 text_sect
= bfd_get_section_by_name (abfd
, ".text");
1321 /* The IA-64 processor-specific ABI requires setting
1322 sh_link to the unwind section, whereas HP-UX requires
1323 sh_info to do so. For maximum compatibility, we'll
1324 set both for now... */
1325 hdr
->sh_link
= elf_section_data (text_sect
)->this_idx
;
1326 hdr
->sh_info
= elf_section_data (text_sect
)->this_idx
;
1332 if (! elf_flags_init (abfd
))
1334 unsigned long flags
= 0;
1336 if (abfd
->xvec
->byteorder
== BFD_ENDIAN_BIG
)
1337 flags
|= EF_IA_64_BE
;
1338 if (bfd_get_mach (abfd
) == bfd_mach_ia64_elf64
)
1339 flags
|= EF_IA_64_ABI64
;
1341 elf_elfheader(abfd
)->e_flags
= flags
;
1342 elf_flags_init (abfd
) = TRUE
;
1346 /* Hook called by the linker routine which adds symbols from an object
1347 file. We use it to put .comm items in .sbss, and not .bss. */
1350 elfNN_ia64_add_symbol_hook (abfd
, info
, sym
, namep
, flagsp
, secp
, valp
)
1352 struct bfd_link_info
*info
;
1353 const Elf_Internal_Sym
*sym
;
1354 const char **namep ATTRIBUTE_UNUSED
;
1355 flagword
*flagsp ATTRIBUTE_UNUSED
;
1359 if (sym
->st_shndx
== SHN_COMMON
1360 && !info
->relocatable
1361 && sym
->st_size
<= elf_gp_size (abfd
))
1363 /* Common symbols less than or equal to -G nn bytes are
1364 automatically put into .sbss. */
1366 asection
*scomm
= bfd_get_section_by_name (abfd
, ".scommon");
1370 scomm
= bfd_make_section (abfd
, ".scommon");
1372 || !bfd_set_section_flags (abfd
, scomm
, (SEC_ALLOC
1374 | SEC_LINKER_CREATED
)))
1379 *valp
= sym
->st_size
;
1385 /* Return the number of additional phdrs we will need. */
1388 elfNN_ia64_additional_program_headers (abfd
)
1394 /* See if we need a PT_IA_64_ARCHEXT segment. */
1395 s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_archext
);
1396 if (s
&& (s
->flags
& SEC_LOAD
))
1399 /* Count how many PT_IA_64_UNWIND segments we need. */
1400 for (s
= abfd
->sections
; s
; s
= s
->next
)
1401 if (is_unwind_section_name (abfd
, s
->name
) && (s
->flags
& SEC_LOAD
))
1408 elfNN_ia64_modify_segment_map (abfd
)
1411 struct elf_segment_map
*m
, **pm
;
1412 Elf_Internal_Shdr
*hdr
;
1415 /* If we need a PT_IA_64_ARCHEXT segment, it must come before
1416 all PT_LOAD segments. */
1417 s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_archext
);
1418 if (s
&& (s
->flags
& SEC_LOAD
))
1420 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1421 if (m
->p_type
== PT_IA_64_ARCHEXT
)
1425 m
= ((struct elf_segment_map
*)
1426 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *m
));
1430 m
->p_type
= PT_IA_64_ARCHEXT
;
1434 /* We want to put it after the PHDR and INTERP segments. */
1435 pm
= &elf_tdata (abfd
)->segment_map
;
1437 && ((*pm
)->p_type
== PT_PHDR
1438 || (*pm
)->p_type
== PT_INTERP
))
1446 /* Install PT_IA_64_UNWIND segments, if needed. */
1447 for (s
= abfd
->sections
; s
; s
= s
->next
)
1449 hdr
= &elf_section_data (s
)->this_hdr
;
1450 if (hdr
->sh_type
!= SHT_IA_64_UNWIND
)
1453 if (s
&& (s
->flags
& SEC_LOAD
))
1455 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1456 if (m
->p_type
== PT_IA_64_UNWIND
)
1460 /* Look through all sections in the unwind segment
1461 for a match since there may be multiple sections
1463 for (i
= m
->count
- 1; i
>= 0; --i
)
1464 if (m
->sections
[i
] == s
)
1473 m
= ((struct elf_segment_map
*)
1474 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *m
));
1478 m
->p_type
= PT_IA_64_UNWIND
;
1483 /* We want to put it last. */
1484 pm
= &elf_tdata (abfd
)->segment_map
;
1492 /* Turn on PF_IA_64_NORECOV if needed. This involves traversing all of
1493 the input sections for each output section in the segment and testing
1494 for SHF_IA_64_NORECOV on each. */
1495 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1496 if (m
->p_type
== PT_LOAD
)
1499 for (i
= m
->count
- 1; i
>= 0; --i
)
1501 struct bfd_link_order
*order
= m
->sections
[i
]->link_order_head
;
1504 if (order
->type
== bfd_indirect_link_order
)
1506 asection
*is
= order
->u
.indirect
.section
;
1507 bfd_vma flags
= elf_section_data(is
)->this_hdr
.sh_flags
;
1508 if (flags
& SHF_IA_64_NORECOV
)
1510 m
->p_flags
|= PF_IA_64_NORECOV
;
1514 order
= order
->next
;
1523 /* According to the Tahoe assembler spec, all labels starting with a
1527 elfNN_ia64_is_local_label_name (abfd
, name
)
1528 bfd
*abfd ATTRIBUTE_UNUSED
;
1531 return name
[0] == '.';
1534 /* Should we do dynamic things to this symbol? */
1537 elfNN_ia64_dynamic_symbol_p (h
, info
, r_type
)
1538 struct elf_link_hash_entry
*h
;
1539 struct bfd_link_info
*info
;
1542 bfd_boolean ignore_protected
1543 = ((r_type
& 0xf8) == 0x40 /* FPTR relocs */
1544 || (r_type
& 0xf8) == 0x50); /* LTOFF_FPTR relocs */
1546 return _bfd_elf_dynamic_symbol_p (h
, info
, ignore_protected
);
1549 static struct bfd_hash_entry
*
1550 elfNN_ia64_new_elf_hash_entry (entry
, table
, string
)
1551 struct bfd_hash_entry
*entry
;
1552 struct bfd_hash_table
*table
;
1555 struct elfNN_ia64_link_hash_entry
*ret
;
1556 ret
= (struct elfNN_ia64_link_hash_entry
*) entry
;
1558 /* Allocate the structure if it has not already been allocated by a
1561 ret
= bfd_hash_allocate (table
, sizeof (*ret
));
1566 /* Initialize our local data. All zeros, and definitely easier
1567 than setting a handful of bit fields. */
1568 memset (ret
, 0, sizeof (*ret
));
1570 /* Call the allocation method of the superclass. */
1571 ret
= ((struct elfNN_ia64_link_hash_entry
*)
1572 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry
*) ret
,
1575 return (struct bfd_hash_entry
*) ret
;
1579 elfNN_ia64_hash_copy_indirect (bed
, xdir
, xind
)
1580 const struct elf_backend_data
*bed ATTRIBUTE_UNUSED
;
1581 struct elf_link_hash_entry
*xdir
, *xind
;
1583 struct elfNN_ia64_link_hash_entry
*dir
, *ind
;
1585 dir
= (struct elfNN_ia64_link_hash_entry
*) xdir
;
1586 ind
= (struct elfNN_ia64_link_hash_entry
*) xind
;
1588 /* Copy down any references that we may have already seen to the
1589 symbol which just became indirect. */
1591 dir
->root
.elf_link_hash_flags
|=
1592 (ind
->root
.elf_link_hash_flags
1593 & (ELF_LINK_HASH_REF_DYNAMIC
1594 | ELF_LINK_HASH_REF_REGULAR
1595 | ELF_LINK_HASH_REF_REGULAR_NONWEAK
1596 | ELF_LINK_HASH_NEEDS_PLT
));
1598 if (ind
->root
.root
.type
!= bfd_link_hash_indirect
)
1601 /* Copy over the got and plt data. This would have been done
1604 if (dir
->info
== NULL
)
1606 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1608 dir
->info
= dyn_i
= ind
->info
;
1611 /* Fix up the dyn_sym_info pointers to the global symbol. */
1612 for (; dyn_i
; dyn_i
= dyn_i
->next
)
1613 dyn_i
->h
= &dir
->root
;
1615 BFD_ASSERT (ind
->info
== NULL
);
1617 /* Copy over the dynindx. */
1619 if (dir
->root
.dynindx
== -1)
1621 dir
->root
.dynindx
= ind
->root
.dynindx
;
1622 dir
->root
.dynstr_index
= ind
->root
.dynstr_index
;
1623 ind
->root
.dynindx
= -1;
1624 ind
->root
.dynstr_index
= 0;
1626 BFD_ASSERT (ind
->root
.dynindx
== -1);
1630 elfNN_ia64_hash_hide_symbol (info
, xh
, force_local
)
1631 struct bfd_link_info
*info
;
1632 struct elf_link_hash_entry
*xh
;
1633 bfd_boolean force_local
;
1635 struct elfNN_ia64_link_hash_entry
*h
;
1636 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1638 h
= (struct elfNN_ia64_link_hash_entry
*)xh
;
1640 _bfd_elf_link_hash_hide_symbol (info
, &h
->root
, force_local
);
1642 for (dyn_i
= h
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1644 dyn_i
->want_plt2
= 0;
1645 dyn_i
->want_plt
= 0;
1649 /* Compute a hash of a local hash entry. */
1652 elfNN_ia64_local_htab_hash (ptr
)
1655 struct elfNN_ia64_local_hash_entry
*entry
1656 = (struct elfNN_ia64_local_hash_entry
*) ptr
;
1658 return (((entry
->id
& 0xff) << 24) | ((entry
->id
& 0xff00) << 8))
1659 ^ entry
->r_sym
^ (entry
->id
>> 16);
1662 /* Compare local hash entries. */
1665 elfNN_ia64_local_htab_eq (ptr1
, ptr2
)
1666 const void *ptr1
, *ptr2
;
1668 struct elfNN_ia64_local_hash_entry
*entry1
1669 = (struct elfNN_ia64_local_hash_entry
*) ptr1
;
1670 struct elfNN_ia64_local_hash_entry
*entry2
1671 = (struct elfNN_ia64_local_hash_entry
*) ptr2
;
1673 return entry1
->id
== entry2
->id
&& entry1
->r_sym
== entry2
->r_sym
;
1676 /* Create the derived linker hash table. The IA-64 ELF port uses this
1677 derived hash table to keep information specific to the IA-64 ElF
1678 linker (without using static variables). */
1680 static struct bfd_link_hash_table
*
1681 elfNN_ia64_hash_table_create (abfd
)
1684 struct elfNN_ia64_link_hash_table
*ret
;
1686 ret
= bfd_zmalloc ((bfd_size_type
) sizeof (*ret
));
1690 if (!_bfd_elf_link_hash_table_init (&ret
->root
, abfd
,
1691 elfNN_ia64_new_elf_hash_entry
))
1697 ret
->loc_hash_table
= htab_try_create (1024, elfNN_ia64_local_htab_hash
,
1698 elfNN_ia64_local_htab_eq
, NULL
);
1699 ret
->loc_hash_memory
= objalloc_create ();
1700 if (!ret
->loc_hash_table
|| !ret
->loc_hash_memory
)
1706 return &ret
->root
.root
;
1709 /* Destroy IA-64 linker hash table. */
1712 elfNN_ia64_hash_table_free (hash
)
1713 struct bfd_link_hash_table
*hash
;
1715 struct elfNN_ia64_link_hash_table
*ia64_info
1716 = (struct elfNN_ia64_link_hash_table
*) hash
;
1717 if (ia64_info
->loc_hash_table
)
1718 htab_delete (ia64_info
->loc_hash_table
);
1719 if (ia64_info
->loc_hash_memory
)
1720 objalloc_free ((struct objalloc
*) ia64_info
->loc_hash_memory
);
1721 _bfd_generic_link_hash_table_free (hash
);
1724 /* Traverse both local and global hash tables. */
1726 struct elfNN_ia64_dyn_sym_traverse_data
1728 bfd_boolean (*func
) PARAMS ((struct elfNN_ia64_dyn_sym_info
*, PTR
));
1733 elfNN_ia64_global_dyn_sym_thunk (xentry
, xdata
)
1734 struct bfd_hash_entry
*xentry
;
1737 struct elfNN_ia64_link_hash_entry
*entry
1738 = (struct elfNN_ia64_link_hash_entry
*) xentry
;
1739 struct elfNN_ia64_dyn_sym_traverse_data
*data
1740 = (struct elfNN_ia64_dyn_sym_traverse_data
*) xdata
;
1741 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1743 if (entry
->root
.root
.type
== bfd_link_hash_warning
)
1744 entry
= (struct elfNN_ia64_link_hash_entry
*) entry
->root
.root
.u
.i
.link
;
1746 for (dyn_i
= entry
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1747 if (! (*data
->func
) (dyn_i
, data
->data
))
1753 elfNN_ia64_local_dyn_sym_thunk (slot
, xdata
)
1757 struct elfNN_ia64_local_hash_entry
*entry
1758 = (struct elfNN_ia64_local_hash_entry
*) *slot
;
1759 struct elfNN_ia64_dyn_sym_traverse_data
*data
1760 = (struct elfNN_ia64_dyn_sym_traverse_data
*) xdata
;
1761 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1763 for (dyn_i
= entry
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1764 if (! (*data
->func
) (dyn_i
, data
->data
))
1770 elfNN_ia64_dyn_sym_traverse (ia64_info
, func
, data
)
1771 struct elfNN_ia64_link_hash_table
*ia64_info
;
1772 bfd_boolean (*func
) PARAMS ((struct elfNN_ia64_dyn_sym_info
*, PTR
));
1775 struct elfNN_ia64_dyn_sym_traverse_data xdata
;
1780 elf_link_hash_traverse (&ia64_info
->root
,
1781 elfNN_ia64_global_dyn_sym_thunk
, &xdata
);
1782 htab_traverse (ia64_info
->loc_hash_table
,
1783 elfNN_ia64_local_dyn_sym_thunk
, &xdata
);
1787 elfNN_ia64_create_dynamic_sections (abfd
, info
)
1789 struct bfd_link_info
*info
;
1791 struct elfNN_ia64_link_hash_table
*ia64_info
;
1794 if (! _bfd_elf_create_dynamic_sections (abfd
, info
))
1797 ia64_info
= elfNN_ia64_hash_table (info
);
1799 ia64_info
->plt_sec
= bfd_get_section_by_name (abfd
, ".plt");
1800 ia64_info
->got_sec
= bfd_get_section_by_name (abfd
, ".got");
1803 flagword flags
= bfd_get_section_flags (abfd
, ia64_info
->got_sec
);
1804 bfd_set_section_flags (abfd
, ia64_info
->got_sec
, SEC_SMALL_DATA
| flags
);
1805 /* The .got section is always aligned at 8 bytes. */
1806 bfd_set_section_alignment (abfd
, ia64_info
->got_sec
, 3);
1809 if (!get_pltoff (abfd
, info
, ia64_info
))
1812 s
= bfd_make_section(abfd
, ".rela.IA_64.pltoff");
1814 || !bfd_set_section_flags (abfd
, s
, (SEC_ALLOC
| SEC_LOAD
1817 | SEC_LINKER_CREATED
1819 || !bfd_set_section_alignment (abfd
, s
, 3))
1821 ia64_info
->rel_pltoff_sec
= s
;
1823 s
= bfd_make_section(abfd
, ".rela.got");
1825 || !bfd_set_section_flags (abfd
, s
, (SEC_ALLOC
| SEC_LOAD
1828 | SEC_LINKER_CREATED
1830 || !bfd_set_section_alignment (abfd
, s
, 3))
1832 ia64_info
->rel_got_sec
= s
;
1837 /* Find and/or create a hash entry for local symbol. */
1838 static struct elfNN_ia64_local_hash_entry
*
1839 get_local_sym_hash (ia64_info
, abfd
, rel
, create
)
1840 struct elfNN_ia64_link_hash_table
*ia64_info
;
1842 const Elf_Internal_Rela
*rel
;
1845 struct elfNN_ia64_local_hash_entry e
, *ret
;
1846 asection
*sec
= abfd
->sections
;
1847 hashval_t h
= (((sec
->id
& 0xff) << 24) | ((sec
->id
& 0xff00) << 8))
1848 ^ ELFNN_R_SYM (rel
->r_info
) ^ (sec
->id
>> 16);
1852 e
.r_sym
= ELFNN_R_SYM (rel
->r_info
);
1853 slot
= htab_find_slot_with_hash (ia64_info
->loc_hash_table
, &e
, h
,
1854 create
? INSERT
: NO_INSERT
);
1860 return (struct elfNN_ia64_local_hash_entry
*) *slot
;
1862 ret
= (struct elfNN_ia64_local_hash_entry
*)
1863 objalloc_alloc ((struct objalloc
*) ia64_info
->loc_hash_memory
,
1864 sizeof (struct elfNN_ia64_local_hash_entry
));
1867 memset (ret
, 0, sizeof (*ret
));
1869 ret
->r_sym
= ELFNN_R_SYM (rel
->r_info
);
1875 /* Find and/or create a descriptor for dynamic symbol info. This will
1876 vary based on global or local symbol, and the addend to the reloc. */
1878 static struct elfNN_ia64_dyn_sym_info
*
1879 get_dyn_sym_info (ia64_info
, h
, abfd
, rel
, create
)
1880 struct elfNN_ia64_link_hash_table
*ia64_info
;
1881 struct elf_link_hash_entry
*h
;
1883 const Elf_Internal_Rela
*rel
;
1886 struct elfNN_ia64_dyn_sym_info
**pp
;
1887 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1888 bfd_vma addend
= rel
? rel
->r_addend
: 0;
1891 pp
= &((struct elfNN_ia64_link_hash_entry
*)h
)->info
;
1894 struct elfNN_ia64_local_hash_entry
*loc_h
;
1896 loc_h
= get_local_sym_hash (ia64_info
, abfd
, rel
, create
);
1899 BFD_ASSERT (!create
);
1906 for (dyn_i
= *pp
; dyn_i
&& dyn_i
->addend
!= addend
; dyn_i
= *pp
)
1909 if (dyn_i
== NULL
&& create
)
1911 dyn_i
= ((struct elfNN_ia64_dyn_sym_info
*)
1912 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *dyn_i
));
1914 dyn_i
->addend
= addend
;
1921 get_got (abfd
, info
, ia64_info
)
1923 struct bfd_link_info
*info
;
1924 struct elfNN_ia64_link_hash_table
*ia64_info
;
1929 got
= ia64_info
->got_sec
;
1934 dynobj
= ia64_info
->root
.dynobj
;
1936 ia64_info
->root
.dynobj
= dynobj
= abfd
;
1937 if (!_bfd_elf_create_got_section (dynobj
, info
))
1940 got
= bfd_get_section_by_name (dynobj
, ".got");
1942 ia64_info
->got_sec
= got
;
1944 /* The .got section is always aligned at 8 bytes. */
1945 if (!bfd_set_section_alignment (abfd
, got
, 3))
1948 flags
= bfd_get_section_flags (abfd
, got
);
1949 bfd_set_section_flags (abfd
, got
, SEC_SMALL_DATA
| flags
);
1955 /* Create function descriptor section (.opd). This section is called .opd
1956 because it contains "official prodecure descriptors". The "official"
1957 refers to the fact that these descriptors are used when taking the address
1958 of a procedure, thus ensuring a unique address for each procedure. */
1961 get_fptr (abfd
, info
, ia64_info
)
1963 struct bfd_link_info
*info
;
1964 struct elfNN_ia64_link_hash_table
*ia64_info
;
1969 fptr
= ia64_info
->fptr_sec
;
1972 dynobj
= ia64_info
->root
.dynobj
;
1974 ia64_info
->root
.dynobj
= dynobj
= abfd
;
1976 fptr
= bfd_make_section (dynobj
, ".opd");
1978 || !bfd_set_section_flags (dynobj
, fptr
,
1983 | (info
->pie
? 0 : SEC_READONLY
)
1984 | SEC_LINKER_CREATED
))
1985 || !bfd_set_section_alignment (abfd
, fptr
, 4))
1991 ia64_info
->fptr_sec
= fptr
;
1996 fptr_rel
= bfd_make_section(dynobj
, ".rela.opd");
1997 if (fptr_rel
== NULL
1998 || !bfd_set_section_flags (dynobj
, fptr_rel
,
1999 (SEC_ALLOC
| SEC_LOAD
2002 | SEC_LINKER_CREATED
2004 || !bfd_set_section_alignment (abfd
, fptr_rel
, 3))
2010 ia64_info
->rel_fptr_sec
= fptr_rel
;
2018 get_pltoff (abfd
, info
, ia64_info
)
2020 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
2021 struct elfNN_ia64_link_hash_table
*ia64_info
;
2026 pltoff
= ia64_info
->pltoff_sec
;
2029 dynobj
= ia64_info
->root
.dynobj
;
2031 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2033 pltoff
= bfd_make_section (dynobj
, ELF_STRING_ia64_pltoff
);
2035 || !bfd_set_section_flags (dynobj
, pltoff
,
2041 | SEC_LINKER_CREATED
))
2042 || !bfd_set_section_alignment (abfd
, pltoff
, 4))
2048 ia64_info
->pltoff_sec
= pltoff
;
2055 get_reloc_section (abfd
, ia64_info
, sec
, create
)
2057 struct elfNN_ia64_link_hash_table
*ia64_info
;
2061 const char *srel_name
;
2065 srel_name
= (bfd_elf_string_from_elf_section
2066 (abfd
, elf_elfheader(abfd
)->e_shstrndx
,
2067 elf_section_data(sec
)->rel_hdr
.sh_name
));
2068 if (srel_name
== NULL
)
2071 BFD_ASSERT ((strncmp (srel_name
, ".rela", 5) == 0
2072 && strcmp (bfd_get_section_name (abfd
, sec
),
2074 || (strncmp (srel_name
, ".rel", 4) == 0
2075 && strcmp (bfd_get_section_name (abfd
, sec
),
2076 srel_name
+4) == 0));
2078 dynobj
= ia64_info
->root
.dynobj
;
2080 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2082 srel
= bfd_get_section_by_name (dynobj
, srel_name
);
2083 if (srel
== NULL
&& create
)
2085 srel
= bfd_make_section (dynobj
, srel_name
);
2087 || !bfd_set_section_flags (dynobj
, srel
,
2092 | SEC_LINKER_CREATED
2094 || !bfd_set_section_alignment (dynobj
, srel
, 3))
2098 if (sec
->flags
& SEC_READONLY
)
2099 ia64_info
->reltext
= 1;
2105 count_dyn_reloc (abfd
, dyn_i
, srel
, type
)
2107 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2111 struct elfNN_ia64_dyn_reloc_entry
*rent
;
2113 for (rent
= dyn_i
->reloc_entries
; rent
; rent
= rent
->next
)
2114 if (rent
->srel
== srel
&& rent
->type
== type
)
2119 rent
= ((struct elfNN_ia64_dyn_reloc_entry
*)
2120 bfd_alloc (abfd
, (bfd_size_type
) sizeof (*rent
)));
2124 rent
->next
= dyn_i
->reloc_entries
;
2128 dyn_i
->reloc_entries
= rent
;
2136 elfNN_ia64_check_relocs (abfd
, info
, sec
, relocs
)
2138 struct bfd_link_info
*info
;
2140 const Elf_Internal_Rela
*relocs
;
2142 struct elfNN_ia64_link_hash_table
*ia64_info
;
2143 const Elf_Internal_Rela
*relend
;
2144 Elf_Internal_Shdr
*symtab_hdr
;
2145 const Elf_Internal_Rela
*rel
;
2146 asection
*got
, *fptr
, *srel
;
2148 if (info
->relocatable
)
2151 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
2152 ia64_info
= elfNN_ia64_hash_table (info
);
2154 got
= fptr
= srel
= NULL
;
2156 relend
= relocs
+ sec
->reloc_count
;
2157 for (rel
= relocs
; rel
< relend
; ++rel
)
2167 NEED_LTOFF_FPTR
= 128,
2173 struct elf_link_hash_entry
*h
= NULL
;
2174 unsigned long r_symndx
= ELFNN_R_SYM (rel
->r_info
);
2175 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2177 bfd_boolean maybe_dynamic
;
2178 int dynrel_type
= R_IA64_NONE
;
2180 if (r_symndx
>= symtab_hdr
->sh_info
)
2182 /* We're dealing with a global symbol -- find its hash entry
2183 and mark it as being referenced. */
2184 long indx
= r_symndx
- symtab_hdr
->sh_info
;
2185 h
= elf_sym_hashes (abfd
)[indx
];
2186 while (h
->root
.type
== bfd_link_hash_indirect
2187 || h
->root
.type
== bfd_link_hash_warning
)
2188 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2190 h
->elf_link_hash_flags
|= ELF_LINK_HASH_REF_REGULAR
;
2193 /* We can only get preliminary data on whether a symbol is
2194 locally or externally defined, as not all of the input files
2195 have yet been processed. Do something with what we know, as
2196 this may help reduce memory usage and processing time later. */
2197 maybe_dynamic
= FALSE
;
2198 if (h
&& ((!info
->executable
2199 && (!info
->symbolic
|| info
->unresolved_syms_in_shared_libs
== RM_IGNORE
))
2200 || ! (h
->elf_link_hash_flags
& ELF_LINK_HASH_DEF_REGULAR
)
2201 || h
->root
.type
== bfd_link_hash_defweak
))
2202 maybe_dynamic
= TRUE
;
2205 switch (ELFNN_R_TYPE (rel
->r_info
))
2207 case R_IA64_TPREL64MSB
:
2208 case R_IA64_TPREL64LSB
:
2209 if (info
->shared
|| maybe_dynamic
)
2210 need_entry
= NEED_DYNREL
;
2211 dynrel_type
= R_IA64_TPREL64LSB
;
2213 info
->flags
|= DF_STATIC_TLS
;
2216 case R_IA64_LTOFF_TPREL22
:
2217 need_entry
= NEED_TPREL
;
2219 info
->flags
|= DF_STATIC_TLS
;
2222 case R_IA64_DTPREL64MSB
:
2223 case R_IA64_DTPREL64LSB
:
2224 if (info
->shared
|| maybe_dynamic
)
2225 need_entry
= NEED_DYNREL
;
2226 dynrel_type
= R_IA64_DTPREL64LSB
;
2229 case R_IA64_LTOFF_DTPREL22
:
2230 need_entry
= NEED_DTPREL
;
2233 case R_IA64_DTPMOD64MSB
:
2234 case R_IA64_DTPMOD64LSB
:
2235 if (info
->shared
|| maybe_dynamic
)
2236 need_entry
= NEED_DYNREL
;
2237 dynrel_type
= R_IA64_DTPMOD64LSB
;
2240 case R_IA64_LTOFF_DTPMOD22
:
2241 need_entry
= NEED_DTPMOD
;
2244 case R_IA64_LTOFF_FPTR22
:
2245 case R_IA64_LTOFF_FPTR64I
:
2246 case R_IA64_LTOFF_FPTR32MSB
:
2247 case R_IA64_LTOFF_FPTR32LSB
:
2248 case R_IA64_LTOFF_FPTR64MSB
:
2249 case R_IA64_LTOFF_FPTR64LSB
:
2250 need_entry
= NEED_FPTR
| NEED_GOT
| NEED_LTOFF_FPTR
;
2253 case R_IA64_FPTR64I
:
2254 case R_IA64_FPTR32MSB
:
2255 case R_IA64_FPTR32LSB
:
2256 case R_IA64_FPTR64MSB
:
2257 case R_IA64_FPTR64LSB
:
2258 if (info
->shared
|| h
)
2259 need_entry
= NEED_FPTR
| NEED_DYNREL
;
2261 need_entry
= NEED_FPTR
;
2262 dynrel_type
= R_IA64_FPTR64LSB
;
2265 case R_IA64_LTOFF22
:
2266 case R_IA64_LTOFF64I
:
2267 need_entry
= NEED_GOT
;
2270 case R_IA64_LTOFF22X
:
2271 need_entry
= NEED_GOTX
;
2274 case R_IA64_PLTOFF22
:
2275 case R_IA64_PLTOFF64I
:
2276 case R_IA64_PLTOFF64MSB
:
2277 case R_IA64_PLTOFF64LSB
:
2278 need_entry
= NEED_PLTOFF
;
2282 need_entry
|= NEED_MIN_PLT
;
2286 (*info
->callbacks
->warning
)
2287 (info
, _("@pltoff reloc against local symbol"), 0,
2288 abfd
, 0, (bfd_vma
) 0);
2292 case R_IA64_PCREL21B
:
2293 case R_IA64_PCREL60B
:
2294 /* Depending on where this symbol is defined, we may or may not
2295 need a full plt entry. Only skip if we know we'll not need
2296 the entry -- static or symbolic, and the symbol definition
2297 has already been seen. */
2298 if (maybe_dynamic
&& rel
->r_addend
== 0)
2299 need_entry
= NEED_FULL_PLT
;
2305 case R_IA64_DIR32MSB
:
2306 case R_IA64_DIR32LSB
:
2307 case R_IA64_DIR64MSB
:
2308 case R_IA64_DIR64LSB
:
2309 /* Shared objects will always need at least a REL relocation. */
2310 if (info
->shared
|| maybe_dynamic
)
2311 need_entry
= NEED_DYNREL
;
2312 dynrel_type
= R_IA64_DIR64LSB
;
2315 case R_IA64_IPLTMSB
:
2316 case R_IA64_IPLTLSB
:
2317 /* Shared objects will always need at least a REL relocation. */
2318 if (info
->shared
|| maybe_dynamic
)
2319 need_entry
= NEED_DYNREL
;
2320 dynrel_type
= R_IA64_IPLTLSB
;
2323 case R_IA64_PCREL22
:
2324 case R_IA64_PCREL64I
:
2325 case R_IA64_PCREL32MSB
:
2326 case R_IA64_PCREL32LSB
:
2327 case R_IA64_PCREL64MSB
:
2328 case R_IA64_PCREL64LSB
:
2330 need_entry
= NEED_DYNREL
;
2331 dynrel_type
= R_IA64_PCREL64LSB
;
2338 if ((need_entry
& NEED_FPTR
) != 0
2341 (*info
->callbacks
->warning
)
2342 (info
, _("non-zero addend in @fptr reloc"), 0,
2343 abfd
, 0, (bfd_vma
) 0);
2346 dyn_i
= get_dyn_sym_info (ia64_info
, h
, abfd
, rel
, TRUE
);
2348 /* Record whether or not this is a local symbol. */
2351 /* Create what's needed. */
2352 if (need_entry
& (NEED_GOT
| NEED_GOTX
| NEED_TPREL
2353 | NEED_DTPMOD
| NEED_DTPREL
))
2357 got
= get_got (abfd
, info
, ia64_info
);
2361 if (need_entry
& NEED_GOT
)
2362 dyn_i
->want_got
= 1;
2363 if (need_entry
& NEED_GOTX
)
2364 dyn_i
->want_gotx
= 1;
2365 if (need_entry
& NEED_TPREL
)
2366 dyn_i
->want_tprel
= 1;
2367 if (need_entry
& NEED_DTPMOD
)
2368 dyn_i
->want_dtpmod
= 1;
2369 if (need_entry
& NEED_DTPREL
)
2370 dyn_i
->want_dtprel
= 1;
2372 if (need_entry
& NEED_FPTR
)
2376 fptr
= get_fptr (abfd
, info
, ia64_info
);
2381 /* FPTRs for shared libraries are allocated by the dynamic
2382 linker. Make sure this local symbol will appear in the
2383 dynamic symbol table. */
2384 if (!h
&& info
->shared
)
2386 if (! (_bfd_elfNN_link_record_local_dynamic_symbol
2387 (info
, abfd
, (long) r_symndx
)))
2391 dyn_i
->want_fptr
= 1;
2393 if (need_entry
& NEED_LTOFF_FPTR
)
2394 dyn_i
->want_ltoff_fptr
= 1;
2395 if (need_entry
& (NEED_MIN_PLT
| NEED_FULL_PLT
))
2397 if (!ia64_info
->root
.dynobj
)
2398 ia64_info
->root
.dynobj
= abfd
;
2399 h
->elf_link_hash_flags
|= ELF_LINK_HASH_NEEDS_PLT
;
2400 dyn_i
->want_plt
= 1;
2402 if (need_entry
& NEED_FULL_PLT
)
2403 dyn_i
->want_plt2
= 1;
2404 if (need_entry
& NEED_PLTOFF
)
2405 dyn_i
->want_pltoff
= 1;
2406 if ((need_entry
& NEED_DYNREL
) && (sec
->flags
& SEC_ALLOC
))
2410 srel
= get_reloc_section (abfd
, ia64_info
, sec
, TRUE
);
2414 if (!count_dyn_reloc (abfd
, dyn_i
, srel
, dynrel_type
))
2422 /* For cleanliness, and potentially faster dynamic loading, allocate
2423 external GOT entries first. */
2426 allocate_global_data_got (dyn_i
, data
)
2427 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2430 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2432 if ((dyn_i
->want_got
|| dyn_i
->want_gotx
)
2433 && ! dyn_i
->want_fptr
2434 && elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2436 dyn_i
->got_offset
= x
->ofs
;
2439 if (dyn_i
->want_tprel
)
2441 dyn_i
->tprel_offset
= x
->ofs
;
2444 if (dyn_i
->want_dtpmod
)
2446 if (elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2448 dyn_i
->dtpmod_offset
= x
->ofs
;
2453 struct elfNN_ia64_link_hash_table
*ia64_info
;
2455 ia64_info
= elfNN_ia64_hash_table (x
->info
);
2456 if (ia64_info
->self_dtpmod_offset
== (bfd_vma
) -1)
2458 ia64_info
->self_dtpmod_offset
= x
->ofs
;
2461 dyn_i
->dtpmod_offset
= ia64_info
->self_dtpmod_offset
;
2464 if (dyn_i
->want_dtprel
)
2466 dyn_i
->dtprel_offset
= x
->ofs
;
2472 /* Next, allocate all the GOT entries used by LTOFF_FPTR relocs. */
2475 allocate_global_fptr_got (dyn_i
, data
)
2476 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2479 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2483 && elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, R_IA64_FPTR64LSB
))
2485 dyn_i
->got_offset
= x
->ofs
;
2491 /* Lastly, allocate all the GOT entries for local data. */
2494 allocate_local_got (dyn_i
, data
)
2495 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2498 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2500 if ((dyn_i
->want_got
|| dyn_i
->want_gotx
)
2501 && !elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2503 dyn_i
->got_offset
= x
->ofs
;
2509 /* Search for the index of a global symbol in it's defining object file. */
2512 global_sym_index (h
)
2513 struct elf_link_hash_entry
*h
;
2515 struct elf_link_hash_entry
**p
;
2518 BFD_ASSERT (h
->root
.type
== bfd_link_hash_defined
2519 || h
->root
.type
== bfd_link_hash_defweak
);
2521 obj
= h
->root
.u
.def
.section
->owner
;
2522 for (p
= elf_sym_hashes (obj
); *p
!= h
; ++p
)
2525 return p
- elf_sym_hashes (obj
) + elf_tdata (obj
)->symtab_hdr
.sh_info
;
2528 /* Allocate function descriptors. We can do these for every function
2529 in a main executable that is not exported. */
2532 allocate_fptr (dyn_i
, data
)
2533 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2536 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2538 if (dyn_i
->want_fptr
)
2540 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2543 while (h
->root
.type
== bfd_link_hash_indirect
2544 || h
->root
.type
== bfd_link_hash_warning
)
2545 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2547 if (!x
->info
->executable
2549 || ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
2550 || h
->root
.type
!= bfd_link_hash_undefweak
))
2552 if (h
&& h
->dynindx
== -1)
2554 BFD_ASSERT ((h
->root
.type
== bfd_link_hash_defined
)
2555 || (h
->root
.type
== bfd_link_hash_defweak
));
2557 if (!_bfd_elfNN_link_record_local_dynamic_symbol
2558 (x
->info
, h
->root
.u
.def
.section
->owner
,
2559 global_sym_index (h
)))
2563 dyn_i
->want_fptr
= 0;
2565 else if (h
== NULL
|| h
->dynindx
== -1)
2567 dyn_i
->fptr_offset
= x
->ofs
;
2571 dyn_i
->want_fptr
= 0;
2576 /* Allocate all the minimal PLT entries. */
2579 allocate_plt_entries (dyn_i
, data
)
2580 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2583 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2585 if (dyn_i
->want_plt
)
2587 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2590 while (h
->root
.type
== bfd_link_hash_indirect
2591 || h
->root
.type
== bfd_link_hash_warning
)
2592 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2594 /* ??? Versioned symbols seem to lose ELF_LINK_HASH_NEEDS_PLT. */
2595 if (elfNN_ia64_dynamic_symbol_p (h
, x
->info
, 0))
2597 bfd_size_type offset
= x
->ofs
;
2599 offset
= PLT_HEADER_SIZE
;
2600 dyn_i
->plt_offset
= offset
;
2601 x
->ofs
= offset
+ PLT_MIN_ENTRY_SIZE
;
2603 dyn_i
->want_pltoff
= 1;
2607 dyn_i
->want_plt
= 0;
2608 dyn_i
->want_plt2
= 0;
2614 /* Allocate all the full PLT entries. */
2617 allocate_plt2_entries (dyn_i
, data
)
2618 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2621 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2623 if (dyn_i
->want_plt2
)
2625 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2626 bfd_size_type ofs
= x
->ofs
;
2628 dyn_i
->plt2_offset
= ofs
;
2629 x
->ofs
= ofs
+ PLT_FULL_ENTRY_SIZE
;
2631 while (h
->root
.type
== bfd_link_hash_indirect
2632 || h
->root
.type
== bfd_link_hash_warning
)
2633 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2634 dyn_i
->h
->plt
.offset
= ofs
;
2639 /* Allocate all the PLTOFF entries requested by relocations and
2640 plt entries. We can't share space with allocated FPTR entries,
2641 because the latter are not necessarily addressable by the GP.
2642 ??? Relaxation might be able to determine that they are. */
2645 allocate_pltoff_entries (dyn_i
, data
)
2646 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2649 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2651 if (dyn_i
->want_pltoff
)
2653 dyn_i
->pltoff_offset
= x
->ofs
;
2659 /* Allocate dynamic relocations for those symbols that turned out
2663 allocate_dynrel_entries (dyn_i
, data
)
2664 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2667 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2668 struct elfNN_ia64_link_hash_table
*ia64_info
;
2669 struct elfNN_ia64_dyn_reloc_entry
*rent
;
2670 bfd_boolean dynamic_symbol
, shared
, resolved_zero
;
2672 ia64_info
= elfNN_ia64_hash_table (x
->info
);
2674 /* Note that this can't be used in relation to FPTR relocs below. */
2675 dynamic_symbol
= elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0);
2677 shared
= x
->info
->shared
;
2678 resolved_zero
= (dyn_i
->h
2679 && ELF_ST_VISIBILITY (dyn_i
->h
->other
)
2680 && dyn_i
->h
->root
.type
== bfd_link_hash_undefweak
);
2682 /* Take care of the normal data relocations. */
2684 for (rent
= dyn_i
->reloc_entries
; rent
; rent
= rent
->next
)
2686 int count
= rent
->count
;
2690 case R_IA64_FPTR64LSB
:
2691 /* Allocate one iff !want_fptr and not PIE, which by this point
2692 will be true only if we're actually allocating one statically
2693 in the main executable. Position independent executables
2694 need a relative reloc. */
2695 if (dyn_i
->want_fptr
&& !x
->info
->pie
)
2698 case R_IA64_PCREL64LSB
:
2699 if (!dynamic_symbol
)
2702 case R_IA64_DIR64LSB
:
2703 if (!dynamic_symbol
&& !shared
)
2706 case R_IA64_IPLTLSB
:
2707 if (!dynamic_symbol
&& !shared
)
2709 /* Use two REL relocations for IPLT relocations
2710 against local symbols. */
2711 if (!dynamic_symbol
)
2714 case R_IA64_TPREL64LSB
:
2715 case R_IA64_DTPREL64LSB
:
2716 case R_IA64_DTPMOD64LSB
:
2721 rent
->srel
->_raw_size
+= sizeof (ElfNN_External_Rela
) * count
;
2724 /* Take care of the GOT and PLT relocations. */
2727 && (dynamic_symbol
|| shared
)
2728 && (dyn_i
->want_got
|| dyn_i
->want_gotx
))
2729 || (dyn_i
->want_ltoff_fptr
2731 && dyn_i
->h
->dynindx
!= -1))
2733 if (!dyn_i
->want_ltoff_fptr
2736 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
2737 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2739 if ((dynamic_symbol
|| shared
) && dyn_i
->want_tprel
)
2740 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2741 if (dynamic_symbol
&& dyn_i
->want_dtpmod
)
2742 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2743 if (dynamic_symbol
&& dyn_i
->want_dtprel
)
2744 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2745 if (ia64_info
->rel_fptr_sec
&& dyn_i
->want_fptr
)
2747 if (dyn_i
->h
== NULL
|| dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
2748 ia64_info
->rel_fptr_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2751 if (!resolved_zero
&& dyn_i
->want_pltoff
)
2753 bfd_size_type t
= 0;
2755 /* Dynamic symbols get one IPLT relocation. Local symbols in
2756 shared libraries get two REL relocations. Local symbols in
2757 main applications get nothing. */
2759 t
= sizeof (ElfNN_External_Rela
);
2761 t
= 2 * sizeof (ElfNN_External_Rela
);
2763 ia64_info
->rel_pltoff_sec
->_raw_size
+= t
;
2770 elfNN_ia64_adjust_dynamic_symbol (info
, h
)
2771 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
2772 struct elf_link_hash_entry
*h
;
2774 /* ??? Undefined symbols with PLT entries should be re-defined
2775 to be the PLT entry. */
2777 /* If this is a weak symbol, and there is a real definition, the
2778 processor independent code will have arranged for us to see the
2779 real definition first, and we can just use the same value. */
2780 if (h
->weakdef
!= NULL
)
2782 BFD_ASSERT (h
->weakdef
->root
.type
== bfd_link_hash_defined
2783 || h
->weakdef
->root
.type
== bfd_link_hash_defweak
);
2784 h
->root
.u
.def
.section
= h
->weakdef
->root
.u
.def
.section
;
2785 h
->root
.u
.def
.value
= h
->weakdef
->root
.u
.def
.value
;
2789 /* If this is a reference to a symbol defined by a dynamic object which
2790 is not a function, we might allocate the symbol in our .dynbss section
2791 and allocate a COPY dynamic relocation.
2793 But IA-64 code is canonically PIC, so as a rule we can avoid this sort
2800 elfNN_ia64_size_dynamic_sections (output_bfd
, info
)
2801 bfd
*output_bfd ATTRIBUTE_UNUSED
;
2802 struct bfd_link_info
*info
;
2804 struct elfNN_ia64_allocate_data data
;
2805 struct elfNN_ia64_link_hash_table
*ia64_info
;
2808 bfd_boolean relplt
= FALSE
;
2810 dynobj
= elf_hash_table(info
)->dynobj
;
2811 ia64_info
= elfNN_ia64_hash_table (info
);
2812 ia64_info
->self_dtpmod_offset
= (bfd_vma
) -1;
2813 BFD_ASSERT(dynobj
!= NULL
);
2816 /* Set the contents of the .interp section to the interpreter. */
2817 if (ia64_info
->root
.dynamic_sections_created
2818 && info
->executable
)
2820 sec
= bfd_get_section_by_name (dynobj
, ".interp");
2821 BFD_ASSERT (sec
!= NULL
);
2822 sec
->contents
= (bfd_byte
*) ELF_DYNAMIC_INTERPRETER
;
2823 sec
->_raw_size
= strlen (ELF_DYNAMIC_INTERPRETER
) + 1;
2826 /* Allocate the GOT entries. */
2828 if (ia64_info
->got_sec
)
2831 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_data_got
, &data
);
2832 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_fptr_got
, &data
);
2833 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_local_got
, &data
);
2834 ia64_info
->got_sec
->_raw_size
= data
.ofs
;
2837 /* Allocate the FPTR entries. */
2839 if (ia64_info
->fptr_sec
)
2842 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_fptr
, &data
);
2843 ia64_info
->fptr_sec
->_raw_size
= data
.ofs
;
2846 /* Now that we've seen all of the input files, we can decide which
2847 symbols need plt entries. Allocate the minimal PLT entries first.
2848 We do this even though dynamic_sections_created may be FALSE, because
2849 this has the side-effect of clearing want_plt and want_plt2. */
2852 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_plt_entries
, &data
);
2854 ia64_info
->minplt_entries
= 0;
2857 ia64_info
->minplt_entries
2858 = (data
.ofs
- PLT_HEADER_SIZE
) / PLT_MIN_ENTRY_SIZE
;
2861 /* Align the pointer for the plt2 entries. */
2862 data
.ofs
= (data
.ofs
+ 31) & (bfd_vma
) -32;
2864 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_plt2_entries
, &data
);
2867 BFD_ASSERT (ia64_info
->root
.dynamic_sections_created
);
2869 ia64_info
->plt_sec
->_raw_size
= data
.ofs
;
2871 /* If we've got a .plt, we need some extra memory for the dynamic
2872 linker. We stuff these in .got.plt. */
2873 sec
= bfd_get_section_by_name (dynobj
, ".got.plt");
2874 sec
->_raw_size
= 8 * PLT_RESERVED_WORDS
;
2877 /* Allocate the PLTOFF entries. */
2879 if (ia64_info
->pltoff_sec
)
2882 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_pltoff_entries
, &data
);
2883 ia64_info
->pltoff_sec
->_raw_size
= data
.ofs
;
2886 if (ia64_info
->root
.dynamic_sections_created
)
2888 /* Allocate space for the dynamic relocations that turned out to be
2891 if (info
->shared
&& ia64_info
->self_dtpmod_offset
!= (bfd_vma
) -1)
2892 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2893 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_dynrel_entries
, &data
);
2896 /* We have now determined the sizes of the various dynamic sections.
2897 Allocate memory for them. */
2898 for (sec
= dynobj
->sections
; sec
!= NULL
; sec
= sec
->next
)
2902 if (!(sec
->flags
& SEC_LINKER_CREATED
))
2905 /* If we don't need this section, strip it from the output file.
2906 There were several sections primarily related to dynamic
2907 linking that must be create before the linker maps input
2908 sections to output sections. The linker does that before
2909 bfd_elf_size_dynamic_sections is called, and it is that
2910 function which decides whether anything needs to go into
2913 strip
= (sec
->_raw_size
== 0);
2915 if (sec
== ia64_info
->got_sec
)
2917 else if (sec
== ia64_info
->rel_got_sec
)
2920 ia64_info
->rel_got_sec
= NULL
;
2922 /* We use the reloc_count field as a counter if we need to
2923 copy relocs into the output file. */
2924 sec
->reloc_count
= 0;
2926 else if (sec
== ia64_info
->fptr_sec
)
2929 ia64_info
->fptr_sec
= NULL
;
2931 else if (sec
== ia64_info
->rel_fptr_sec
)
2934 ia64_info
->rel_fptr_sec
= NULL
;
2936 /* We use the reloc_count field as a counter if we need to
2937 copy relocs into the output file. */
2938 sec
->reloc_count
= 0;
2940 else if (sec
== ia64_info
->plt_sec
)
2943 ia64_info
->plt_sec
= NULL
;
2945 else if (sec
== ia64_info
->pltoff_sec
)
2948 ia64_info
->pltoff_sec
= NULL
;
2950 else if (sec
== ia64_info
->rel_pltoff_sec
)
2953 ia64_info
->rel_pltoff_sec
= NULL
;
2957 /* We use the reloc_count field as a counter if we need to
2958 copy relocs into the output file. */
2959 sec
->reloc_count
= 0;
2966 /* It's OK to base decisions on the section name, because none
2967 of the dynobj section names depend upon the input files. */
2968 name
= bfd_get_section_name (dynobj
, sec
);
2970 if (strcmp (name
, ".got.plt") == 0)
2972 else if (strncmp (name
, ".rel", 4) == 0)
2976 /* We use the reloc_count field as a counter if we need to
2977 copy relocs into the output file. */
2978 sec
->reloc_count
= 0;
2986 _bfd_strip_section_from_output (info
, sec
);
2989 /* Allocate memory for the section contents. */
2990 sec
->contents
= (bfd_byte
*) bfd_zalloc (dynobj
, sec
->_raw_size
);
2991 if (sec
->contents
== NULL
&& sec
->_raw_size
!= 0)
2996 if (elf_hash_table (info
)->dynamic_sections_created
)
2998 /* Add some entries to the .dynamic section. We fill in the values
2999 later (in finish_dynamic_sections) but we must add the entries now
3000 so that we get the correct size for the .dynamic section. */
3002 if (info
->executable
)
3004 /* The DT_DEBUG entry is filled in by the dynamic linker and used
3006 #define add_dynamic_entry(TAG, VAL) \
3007 bfd_elfNN_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
3009 if (!add_dynamic_entry (DT_DEBUG
, 0))
3013 if (!add_dynamic_entry (DT_IA_64_PLT_RESERVE
, 0))
3015 if (!add_dynamic_entry (DT_PLTGOT
, 0))
3020 if (!add_dynamic_entry (DT_PLTRELSZ
, 0)
3021 || !add_dynamic_entry (DT_PLTREL
, DT_RELA
)
3022 || !add_dynamic_entry (DT_JMPREL
, 0))
3026 if (!add_dynamic_entry (DT_RELA
, 0)
3027 || !add_dynamic_entry (DT_RELASZ
, 0)
3028 || !add_dynamic_entry (DT_RELAENT
, sizeof (ElfNN_External_Rela
)))
3031 if (ia64_info
->reltext
)
3033 if (!add_dynamic_entry (DT_TEXTREL
, 0))
3035 info
->flags
|= DF_TEXTREL
;
3039 /* ??? Perhaps force __gp local. */
3044 static bfd_reloc_status_type
3045 elfNN_ia64_install_value (abfd
, hit_addr
, v
, r_type
)
3049 unsigned int r_type
;
3051 const struct ia64_operand
*op
;
3052 int bigendian
= 0, shift
= 0;
3053 bfd_vma t0
, t1
, insn
, dword
;
3054 enum ia64_opnd opnd
;
3057 #ifdef BFD_HOST_U_64_BIT
3058 BFD_HOST_U_64_BIT val
= (BFD_HOST_U_64_BIT
) v
;
3063 opnd
= IA64_OPND_NIL
;
3068 return bfd_reloc_ok
;
3070 /* Instruction relocations. */
3073 case R_IA64_TPREL14
:
3074 case R_IA64_DTPREL14
:
3075 opnd
= IA64_OPND_IMM14
;
3078 case R_IA64_PCREL21F
: opnd
= IA64_OPND_TGT25
; break;
3079 case R_IA64_PCREL21M
: opnd
= IA64_OPND_TGT25b
; break;
3080 case R_IA64_PCREL60B
: opnd
= IA64_OPND_TGT64
; break;
3081 case R_IA64_PCREL21B
:
3082 case R_IA64_PCREL21BI
:
3083 opnd
= IA64_OPND_TGT25c
;
3087 case R_IA64_GPREL22
:
3088 case R_IA64_LTOFF22
:
3089 case R_IA64_LTOFF22X
:
3090 case R_IA64_PLTOFF22
:
3091 case R_IA64_PCREL22
:
3092 case R_IA64_LTOFF_FPTR22
:
3093 case R_IA64_TPREL22
:
3094 case R_IA64_DTPREL22
:
3095 case R_IA64_LTOFF_TPREL22
:
3096 case R_IA64_LTOFF_DTPMOD22
:
3097 case R_IA64_LTOFF_DTPREL22
:
3098 opnd
= IA64_OPND_IMM22
;
3102 case R_IA64_GPREL64I
:
3103 case R_IA64_LTOFF64I
:
3104 case R_IA64_PLTOFF64I
:
3105 case R_IA64_PCREL64I
:
3106 case R_IA64_FPTR64I
:
3107 case R_IA64_LTOFF_FPTR64I
:
3108 case R_IA64_TPREL64I
:
3109 case R_IA64_DTPREL64I
:
3110 opnd
= IA64_OPND_IMMU64
;
3113 /* Data relocations. */
3115 case R_IA64_DIR32MSB
:
3116 case R_IA64_GPREL32MSB
:
3117 case R_IA64_FPTR32MSB
:
3118 case R_IA64_PCREL32MSB
:
3119 case R_IA64_LTOFF_FPTR32MSB
:
3120 case R_IA64_SEGREL32MSB
:
3121 case R_IA64_SECREL32MSB
:
3122 case R_IA64_LTV32MSB
:
3123 case R_IA64_DTPREL32MSB
:
3124 size
= 4; bigendian
= 1;
3127 case R_IA64_DIR32LSB
:
3128 case R_IA64_GPREL32LSB
:
3129 case R_IA64_FPTR32LSB
:
3130 case R_IA64_PCREL32LSB
:
3131 case R_IA64_LTOFF_FPTR32LSB
:
3132 case R_IA64_SEGREL32LSB
:
3133 case R_IA64_SECREL32LSB
:
3134 case R_IA64_LTV32LSB
:
3135 case R_IA64_DTPREL32LSB
:
3136 size
= 4; bigendian
= 0;
3139 case R_IA64_DIR64MSB
:
3140 case R_IA64_GPREL64MSB
:
3141 case R_IA64_PLTOFF64MSB
:
3142 case R_IA64_FPTR64MSB
:
3143 case R_IA64_PCREL64MSB
:
3144 case R_IA64_LTOFF_FPTR64MSB
:
3145 case R_IA64_SEGREL64MSB
:
3146 case R_IA64_SECREL64MSB
:
3147 case R_IA64_LTV64MSB
:
3148 case R_IA64_TPREL64MSB
:
3149 case R_IA64_DTPMOD64MSB
:
3150 case R_IA64_DTPREL64MSB
:
3151 size
= 8; bigendian
= 1;
3154 case R_IA64_DIR64LSB
:
3155 case R_IA64_GPREL64LSB
:
3156 case R_IA64_PLTOFF64LSB
:
3157 case R_IA64_FPTR64LSB
:
3158 case R_IA64_PCREL64LSB
:
3159 case R_IA64_LTOFF_FPTR64LSB
:
3160 case R_IA64_SEGREL64LSB
:
3161 case R_IA64_SECREL64LSB
:
3162 case R_IA64_LTV64LSB
:
3163 case R_IA64_TPREL64LSB
:
3164 case R_IA64_DTPMOD64LSB
:
3165 case R_IA64_DTPREL64LSB
:
3166 size
= 8; bigendian
= 0;
3169 /* Unsupported / Dynamic relocations. */
3171 return bfd_reloc_notsupported
;
3176 case IA64_OPND_IMMU64
:
3177 hit_addr
-= (long) hit_addr
& 0x3;
3178 t0
= bfd_get_64 (abfd
, hit_addr
);
3179 t1
= bfd_get_64 (abfd
, hit_addr
+ 8);
3181 /* tmpl/s: bits 0.. 5 in t0
3182 slot 0: bits 5..45 in t0
3183 slot 1: bits 46..63 in t0, bits 0..22 in t1
3184 slot 2: bits 23..63 in t1 */
3186 /* First, clear the bits that form the 64 bit constant. */
3187 t0
&= ~(0x3ffffLL
<< 46);
3189 | (( (0x07fLL
<< 13) | (0x1ffLL
<< 27)
3190 | (0x01fLL
<< 22) | (0x001LL
<< 21)
3191 | (0x001LL
<< 36)) << 23));
3193 t0
|= ((val
>> 22) & 0x03ffffLL
) << 46; /* 18 lsbs of imm41 */
3194 t1
|= ((val
>> 40) & 0x7fffffLL
) << 0; /* 23 msbs of imm41 */
3195 t1
|= ( (((val
>> 0) & 0x07f) << 13) /* imm7b */
3196 | (((val
>> 7) & 0x1ff) << 27) /* imm9d */
3197 | (((val
>> 16) & 0x01f) << 22) /* imm5c */
3198 | (((val
>> 21) & 0x001) << 21) /* ic */
3199 | (((val
>> 63) & 0x001) << 36)) << 23; /* i */
3201 bfd_put_64 (abfd
, t0
, hit_addr
);
3202 bfd_put_64 (abfd
, t1
, hit_addr
+ 8);
3205 case IA64_OPND_TGT64
:
3206 hit_addr
-= (long) hit_addr
& 0x3;
3207 t0
= bfd_get_64 (abfd
, hit_addr
);
3208 t1
= bfd_get_64 (abfd
, hit_addr
+ 8);
3210 /* tmpl/s: bits 0.. 5 in t0
3211 slot 0: bits 5..45 in t0
3212 slot 1: bits 46..63 in t0, bits 0..22 in t1
3213 slot 2: bits 23..63 in t1 */
3215 /* First, clear the bits that form the 64 bit constant. */
3216 t0
&= ~(0x3ffffLL
<< 46);
3218 | ((1LL << 36 | 0xfffffLL
<< 13) << 23));
3221 t0
|= ((val
>> 20) & 0xffffLL
) << 2 << 46; /* 16 lsbs of imm39 */
3222 t1
|= ((val
>> 36) & 0x7fffffLL
) << 0; /* 23 msbs of imm39 */
3223 t1
|= ((((val
>> 0) & 0xfffffLL
) << 13) /* imm20b */
3224 | (((val
>> 59) & 0x1LL
) << 36)) << 23; /* i */
3226 bfd_put_64 (abfd
, t0
, hit_addr
);
3227 bfd_put_64 (abfd
, t1
, hit_addr
+ 8);
3231 switch ((long) hit_addr
& 0x3)
3233 case 0: shift
= 5; break;
3234 case 1: shift
= 14; hit_addr
+= 3; break;
3235 case 2: shift
= 23; hit_addr
+= 6; break;
3236 case 3: return bfd_reloc_notsupported
; /* shouldn't happen... */
3238 dword
= bfd_get_64 (abfd
, hit_addr
);
3239 insn
= (dword
>> shift
) & 0x1ffffffffffLL
;
3241 op
= elf64_ia64_operands
+ opnd
;
3242 err
= (*op
->insert
) (op
, val
, (ia64_insn
*)& insn
);
3244 return bfd_reloc_overflow
;
3246 dword
&= ~(0x1ffffffffffLL
<< shift
);
3247 dword
|= (insn
<< shift
);
3248 bfd_put_64 (abfd
, dword
, hit_addr
);
3252 /* A data relocation. */
3255 bfd_putb32 (val
, hit_addr
);
3257 bfd_putb64 (val
, hit_addr
);
3260 bfd_putl32 (val
, hit_addr
);
3262 bfd_putl64 (val
, hit_addr
);
3266 return bfd_reloc_ok
;
3270 elfNN_ia64_install_dyn_reloc (abfd
, info
, sec
, srel
, offset
, type
,
3273 struct bfd_link_info
*info
;
3281 Elf_Internal_Rela outrel
;
3284 BFD_ASSERT (dynindx
!= -1);
3285 outrel
.r_info
= ELFNN_R_INFO (dynindx
, type
);
3286 outrel
.r_addend
= addend
;
3287 outrel
.r_offset
= _bfd_elf_section_offset (abfd
, info
, sec
, offset
);
3288 if (outrel
.r_offset
>= (bfd_vma
) -2)
3290 /* Run for the hills. We shouldn't be outputting a relocation
3291 for this. So do what everyone else does and output a no-op. */
3292 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
3293 outrel
.r_addend
= 0;
3294 outrel
.r_offset
= 0;
3297 outrel
.r_offset
+= sec
->output_section
->vma
+ sec
->output_offset
;
3299 loc
= srel
->contents
;
3300 loc
+= srel
->reloc_count
++ * sizeof (ElfNN_External_Rela
);
3301 bfd_elfNN_swap_reloca_out (abfd
, &outrel
, loc
);
3302 BFD_ASSERT (sizeof (ElfNN_External_Rela
) * srel
->reloc_count
3303 <= srel
->_cooked_size
);
3306 /* Store an entry for target address TARGET_ADDR in the linkage table
3307 and return the gp-relative address of the linkage table entry. */
3310 set_got_entry (abfd
, info
, dyn_i
, dynindx
, addend
, value
, dyn_r_type
)
3312 struct bfd_link_info
*info
;
3313 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3317 unsigned int dyn_r_type
;
3319 struct elfNN_ia64_link_hash_table
*ia64_info
;
3324 ia64_info
= elfNN_ia64_hash_table (info
);
3325 got_sec
= ia64_info
->got_sec
;
3329 case R_IA64_TPREL64LSB
:
3330 done
= dyn_i
->tprel_done
;
3331 dyn_i
->tprel_done
= TRUE
;
3332 got_offset
= dyn_i
->tprel_offset
;
3334 case R_IA64_DTPMOD64LSB
:
3335 if (dyn_i
->dtpmod_offset
!= ia64_info
->self_dtpmod_offset
)
3337 done
= dyn_i
->dtpmod_done
;
3338 dyn_i
->dtpmod_done
= TRUE
;
3342 done
= ia64_info
->self_dtpmod_done
;
3343 ia64_info
->self_dtpmod_done
= TRUE
;
3346 got_offset
= dyn_i
->dtpmod_offset
;
3348 case R_IA64_DTPREL64LSB
:
3349 done
= dyn_i
->dtprel_done
;
3350 dyn_i
->dtprel_done
= TRUE
;
3351 got_offset
= dyn_i
->dtprel_offset
;
3354 done
= dyn_i
->got_done
;
3355 dyn_i
->got_done
= TRUE
;
3356 got_offset
= dyn_i
->got_offset
;
3360 BFD_ASSERT ((got_offset
& 7) == 0);
3364 /* Store the target address in the linkage table entry. */
3365 bfd_put_64 (abfd
, value
, got_sec
->contents
+ got_offset
);
3367 /* Install a dynamic relocation if needed. */
3370 || ELF_ST_VISIBILITY (dyn_i
->h
->other
) == STV_DEFAULT
3371 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
3372 && dyn_r_type
!= R_IA64_DTPREL64LSB
)
3373 || elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, info
, dyn_r_type
)
3374 || (dynindx
!= -1 && dyn_r_type
== R_IA64_FPTR64LSB
))
3375 && (!dyn_i
->want_ltoff_fptr
3378 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
))
3381 && dyn_r_type
!= R_IA64_TPREL64LSB
3382 && dyn_r_type
!= R_IA64_DTPMOD64LSB
3383 && dyn_r_type
!= R_IA64_DTPREL64LSB
)
3385 dyn_r_type
= R_IA64_REL64LSB
;
3390 if (bfd_big_endian (abfd
))
3394 case R_IA64_REL64LSB
:
3395 dyn_r_type
= R_IA64_REL64MSB
;
3397 case R_IA64_DIR64LSB
:
3398 dyn_r_type
= R_IA64_DIR64MSB
;
3400 case R_IA64_FPTR64LSB
:
3401 dyn_r_type
= R_IA64_FPTR64MSB
;
3403 case R_IA64_TPREL64LSB
:
3404 dyn_r_type
= R_IA64_TPREL64MSB
;
3406 case R_IA64_DTPMOD64LSB
:
3407 dyn_r_type
= R_IA64_DTPMOD64MSB
;
3409 case R_IA64_DTPREL64LSB
:
3410 dyn_r_type
= R_IA64_DTPREL64MSB
;
3418 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, got_sec
,
3419 ia64_info
->rel_got_sec
,
3420 got_offset
, dyn_r_type
,
3425 /* Return the address of the linkage table entry. */
3426 value
= (got_sec
->output_section
->vma
3427 + got_sec
->output_offset
3433 /* Fill in a function descriptor consisting of the function's code
3434 address and its global pointer. Return the descriptor's address. */
3437 set_fptr_entry (abfd
, info
, dyn_i
, value
)
3439 struct bfd_link_info
*info
;
3440 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3443 struct elfNN_ia64_link_hash_table
*ia64_info
;
3446 ia64_info
= elfNN_ia64_hash_table (info
);
3447 fptr_sec
= ia64_info
->fptr_sec
;
3449 if (!dyn_i
->fptr_done
)
3451 dyn_i
->fptr_done
= 1;
3453 /* Fill in the function descriptor. */
3454 bfd_put_64 (abfd
, value
, fptr_sec
->contents
+ dyn_i
->fptr_offset
);
3455 bfd_put_64 (abfd
, _bfd_get_gp_value (abfd
),
3456 fptr_sec
->contents
+ dyn_i
->fptr_offset
+ 8);
3457 if (ia64_info
->rel_fptr_sec
)
3459 Elf_Internal_Rela outrel
;
3462 if (bfd_little_endian (abfd
))
3463 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_IPLTLSB
);
3465 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_IPLTMSB
);
3466 outrel
.r_addend
= value
;
3467 outrel
.r_offset
= (fptr_sec
->output_section
->vma
3468 + fptr_sec
->output_offset
3469 + dyn_i
->fptr_offset
);
3470 loc
= ia64_info
->rel_fptr_sec
->contents
;
3471 loc
+= ia64_info
->rel_fptr_sec
->reloc_count
++
3472 * sizeof (ElfNN_External_Rela
);
3473 bfd_elfNN_swap_reloca_out (abfd
, &outrel
, loc
);
3477 /* Return the descriptor's address. */
3478 value
= (fptr_sec
->output_section
->vma
3479 + fptr_sec
->output_offset
3480 + dyn_i
->fptr_offset
);
3485 /* Fill in a PLTOFF entry consisting of the function's code address
3486 and its global pointer. Return the descriptor's address. */
3489 set_pltoff_entry (abfd
, info
, dyn_i
, value
, is_plt
)
3491 struct bfd_link_info
*info
;
3492 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3496 struct elfNN_ia64_link_hash_table
*ia64_info
;
3497 asection
*pltoff_sec
;
3499 ia64_info
= elfNN_ia64_hash_table (info
);
3500 pltoff_sec
= ia64_info
->pltoff_sec
;
3502 /* Don't do anything if this symbol uses a real PLT entry. In
3503 that case, we'll fill this in during finish_dynamic_symbol. */
3504 if ((! dyn_i
->want_plt
|| is_plt
)
3505 && !dyn_i
->pltoff_done
)
3507 bfd_vma gp
= _bfd_get_gp_value (abfd
);
3509 /* Fill in the function descriptor. */
3510 bfd_put_64 (abfd
, value
, pltoff_sec
->contents
+ dyn_i
->pltoff_offset
);
3511 bfd_put_64 (abfd
, gp
, pltoff_sec
->contents
+ dyn_i
->pltoff_offset
+ 8);
3513 /* Install dynamic relocations if needed. */
3517 || ELF_ST_VISIBILITY (dyn_i
->h
->other
) == STV_DEFAULT
3518 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
))
3520 unsigned int dyn_r_type
;
3522 if (bfd_big_endian (abfd
))
3523 dyn_r_type
= R_IA64_REL64MSB
;
3525 dyn_r_type
= R_IA64_REL64LSB
;
3527 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, pltoff_sec
,
3528 ia64_info
->rel_pltoff_sec
,
3529 dyn_i
->pltoff_offset
,
3530 dyn_r_type
, 0, value
);
3531 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, pltoff_sec
,
3532 ia64_info
->rel_pltoff_sec
,
3533 dyn_i
->pltoff_offset
+ 8,
3537 dyn_i
->pltoff_done
= 1;
3540 /* Return the descriptor's address. */
3541 value
= (pltoff_sec
->output_section
->vma
3542 + pltoff_sec
->output_offset
3543 + dyn_i
->pltoff_offset
);
3548 /* Return the base VMA address which should be subtracted from real addresses
3549 when resolving @tprel() relocation.
3550 Main program TLS (whose template starts at PT_TLS p_vaddr)
3551 is assigned offset round(16, PT_TLS p_align). */
3554 elfNN_ia64_tprel_base (info
)
3555 struct bfd_link_info
*info
;
3557 asection
*tls_sec
= elf_hash_table (info
)->tls_sec
;
3559 BFD_ASSERT (tls_sec
!= NULL
);
3560 return tls_sec
->vma
- align_power ((bfd_vma
) 16, tls_sec
->alignment_power
);
3563 /* Return the base VMA address which should be subtracted from real addresses
3564 when resolving @dtprel() relocation.
3565 This is PT_TLS segment p_vaddr. */
3568 elfNN_ia64_dtprel_base (info
)
3569 struct bfd_link_info
*info
;
3571 BFD_ASSERT (elf_hash_table (info
)->tls_sec
!= NULL
);
3572 return elf_hash_table (info
)->tls_sec
->vma
;
3575 /* Called through qsort to sort the .IA_64.unwind section during a
3576 non-relocatable link. Set elfNN_ia64_unwind_entry_compare_bfd
3577 to the output bfd so we can do proper endianness frobbing. */
3579 static bfd
*elfNN_ia64_unwind_entry_compare_bfd
;
3582 elfNN_ia64_unwind_entry_compare (a
, b
)
3588 av
= bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd
, a
);
3589 bv
= bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd
, b
);
3591 return (av
< bv
? -1 : av
> bv
? 1 : 0);
3594 /* Make sure we've got ourselves a nice fat __gp value. */
3596 elfNN_ia64_choose_gp (abfd
, info
)
3598 struct bfd_link_info
*info
;
3600 bfd_vma min_vma
= (bfd_vma
) -1, max_vma
= 0;
3601 bfd_vma min_short_vma
= min_vma
, max_short_vma
= 0;
3602 struct elf_link_hash_entry
*gp
;
3605 struct elfNN_ia64_link_hash_table
*ia64_info
;
3607 ia64_info
= elfNN_ia64_hash_table (info
);
3609 /* Find the min and max vma of all sections marked short. Also collect
3610 min and max vma of any type, for use in selecting a nice gp. */
3611 for (os
= abfd
->sections
; os
; os
= os
->next
)
3615 if ((os
->flags
& SEC_ALLOC
) == 0)
3619 hi
= os
->vma
+ os
->_raw_size
;
3627 if (os
->flags
& SEC_SMALL_DATA
)
3629 if (min_short_vma
> lo
)
3631 if (max_short_vma
< hi
)
3636 /* See if the user wants to force a value. */
3637 gp
= elf_link_hash_lookup (elf_hash_table (info
), "__gp", FALSE
,
3641 && (gp
->root
.type
== bfd_link_hash_defined
3642 || gp
->root
.type
== bfd_link_hash_defweak
))
3644 asection
*gp_sec
= gp
->root
.u
.def
.section
;
3645 gp_val
= (gp
->root
.u
.def
.value
3646 + gp_sec
->output_section
->vma
3647 + gp_sec
->output_offset
);
3651 /* Pick a sensible value. */
3653 asection
*got_sec
= ia64_info
->got_sec
;
3655 /* Start with just the address of the .got. */
3657 gp_val
= got_sec
->output_section
->vma
;
3658 else if (max_short_vma
!= 0)
3659 gp_val
= min_short_vma
;
3663 /* If it is possible to address the entire image, but we
3664 don't with the choice above, adjust. */
3665 if (max_vma
- min_vma
< 0x400000
3666 && max_vma
- gp_val
<= 0x200000
3667 && gp_val
- min_vma
> 0x200000)
3668 gp_val
= min_vma
+ 0x200000;
3669 else if (max_short_vma
!= 0)
3671 /* If we don't cover all the short data, adjust. */
3672 if (max_short_vma
- gp_val
>= 0x200000)
3673 gp_val
= min_short_vma
+ 0x200000;
3675 /* If we're addressing stuff past the end, adjust back. */
3676 if (gp_val
> max_vma
)
3677 gp_val
= max_vma
- 0x200000 + 8;
3681 /* Validate whether all SHF_IA_64_SHORT sections are within
3682 range of the chosen GP. */
3684 if (max_short_vma
!= 0)
3686 if (max_short_vma
- min_short_vma
>= 0x400000)
3688 (*_bfd_error_handler
)
3689 (_("%s: short data segment overflowed (0x%lx >= 0x400000)"),
3690 bfd_get_filename (abfd
),
3691 (unsigned long) (max_short_vma
- min_short_vma
));
3694 else if ((gp_val
> min_short_vma
3695 && gp_val
- min_short_vma
> 0x200000)
3696 || (gp_val
< max_short_vma
3697 && max_short_vma
- gp_val
>= 0x200000))
3699 (*_bfd_error_handler
)
3700 (_("%s: __gp does not cover short data segment"),
3701 bfd_get_filename (abfd
));
3706 _bfd_set_gp_value (abfd
, gp_val
);
3712 elfNN_ia64_final_link (abfd
, info
)
3714 struct bfd_link_info
*info
;
3716 struct elfNN_ia64_link_hash_table
*ia64_info
;
3717 asection
*unwind_output_sec
;
3719 ia64_info
= elfNN_ia64_hash_table (info
);
3721 /* Make sure we've got ourselves a nice fat __gp value. */
3722 if (!info
->relocatable
)
3724 bfd_vma gp_val
= _bfd_get_gp_value (abfd
);
3725 struct elf_link_hash_entry
*gp
;
3729 if (! elfNN_ia64_choose_gp (abfd
, info
))
3731 gp_val
= _bfd_get_gp_value (abfd
);
3734 gp
= elf_link_hash_lookup (elf_hash_table (info
), "__gp", FALSE
,
3738 gp
->root
.type
= bfd_link_hash_defined
;
3739 gp
->root
.u
.def
.value
= gp_val
;
3740 gp
->root
.u
.def
.section
= bfd_abs_section_ptr
;
3744 /* If we're producing a final executable, we need to sort the contents
3745 of the .IA_64.unwind section. Force this section to be relocated
3746 into memory rather than written immediately to the output file. */
3747 unwind_output_sec
= NULL
;
3748 if (!info
->relocatable
)
3750 asection
*s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_unwind
);
3753 unwind_output_sec
= s
->output_section
;
3754 unwind_output_sec
->contents
3755 = bfd_malloc (unwind_output_sec
->_raw_size
);
3756 if (unwind_output_sec
->contents
== NULL
)
3761 /* Invoke the regular ELF backend linker to do all the work. */
3762 if (!bfd_elfNN_bfd_final_link (abfd
, info
))
3765 if (unwind_output_sec
)
3767 elfNN_ia64_unwind_entry_compare_bfd
= abfd
;
3768 qsort (unwind_output_sec
->contents
,
3769 (size_t) (unwind_output_sec
->_raw_size
/ 24),
3771 elfNN_ia64_unwind_entry_compare
);
3773 if (! bfd_set_section_contents (abfd
, unwind_output_sec
,
3774 unwind_output_sec
->contents
, (bfd_vma
) 0,
3775 unwind_output_sec
->_raw_size
))
3783 elfNN_ia64_relocate_section (output_bfd
, info
, input_bfd
, input_section
,
3784 contents
, relocs
, local_syms
, local_sections
)
3786 struct bfd_link_info
*info
;
3788 asection
*input_section
;
3790 Elf_Internal_Rela
*relocs
;
3791 Elf_Internal_Sym
*local_syms
;
3792 asection
**local_sections
;
3794 struct elfNN_ia64_link_hash_table
*ia64_info
;
3795 Elf_Internal_Shdr
*symtab_hdr
;
3796 Elf_Internal_Rela
*rel
;
3797 Elf_Internal_Rela
*relend
;
3799 bfd_boolean ret_val
= TRUE
; /* for non-fatal errors */
3802 symtab_hdr
= &elf_tdata (input_bfd
)->symtab_hdr
;
3803 ia64_info
= elfNN_ia64_hash_table (info
);
3805 /* Infect various flags from the input section to the output section. */
3806 if (info
->relocatable
)
3810 flags
= elf_section_data(input_section
)->this_hdr
.sh_flags
;
3811 flags
&= SHF_IA_64_NORECOV
;
3813 elf_section_data(input_section
->output_section
)
3814 ->this_hdr
.sh_flags
|= flags
;
3818 gp_val
= _bfd_get_gp_value (output_bfd
);
3819 srel
= get_reloc_section (input_bfd
, ia64_info
, input_section
, FALSE
);
3822 relend
= relocs
+ input_section
->reloc_count
;
3823 for (; rel
< relend
; ++rel
)
3825 struct elf_link_hash_entry
*h
;
3826 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3827 bfd_reloc_status_type r
;
3828 reloc_howto_type
*howto
;
3829 unsigned long r_symndx
;
3830 Elf_Internal_Sym
*sym
;
3831 unsigned int r_type
;
3835 bfd_boolean dynamic_symbol_p
;
3836 bfd_boolean undef_weak_ref
;
3838 r_type
= ELFNN_R_TYPE (rel
->r_info
);
3839 if (r_type
> R_IA64_MAX_RELOC_CODE
)
3841 (*_bfd_error_handler
)
3842 (_("%s: unknown relocation type %d"),
3843 bfd_archive_filename (input_bfd
), (int)r_type
);
3844 bfd_set_error (bfd_error_bad_value
);
3849 howto
= lookup_howto (r_type
);
3850 r_symndx
= ELFNN_R_SYM (rel
->r_info
);
3854 undef_weak_ref
= FALSE
;
3856 if (r_symndx
< symtab_hdr
->sh_info
)
3858 /* Reloc against local symbol. */
3860 sym
= local_syms
+ r_symndx
;
3861 sym_sec
= local_sections
[r_symndx
];
3863 value
= _bfd_elf_rela_local_sym (output_bfd
, sym
, &msec
, rel
);
3864 if ((sym_sec
->flags
& SEC_MERGE
)
3865 && ELF_ST_TYPE (sym
->st_info
) == STT_SECTION
3866 && sym_sec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
3868 struct elfNN_ia64_local_hash_entry
*loc_h
;
3870 loc_h
= get_local_sym_hash (ia64_info
, input_bfd
, rel
, FALSE
);
3871 if (loc_h
&& ! loc_h
->sec_merge_done
)
3873 struct elfNN_ia64_dyn_sym_info
*dynent
;
3875 for (dynent
= loc_h
->info
; dynent
; dynent
= dynent
->next
)
3879 _bfd_merged_section_offset (output_bfd
, &msec
,
3880 elf_section_data (msec
)->
3885 dynent
->addend
-= sym
->st_value
;
3886 dynent
->addend
+= msec
->output_section
->vma
3887 + msec
->output_offset
3888 - sym_sec
->output_section
->vma
3889 - sym_sec
->output_offset
;
3891 loc_h
->sec_merge_done
= 1;
3897 bfd_boolean unresolved_reloc
;
3900 RELOC_FOR_GLOBAL_SYMBOL (h
, elf_sym_hashes (input_bfd
),
3902 symtab_hdr
, value
, sym_sec
,
3903 unresolved_reloc
, info
,
3906 if (h
->root
.type
== bfd_link_hash_undefweak
)
3907 undef_weak_ref
= TRUE
;
3912 hit_addr
= contents
+ rel
->r_offset
;
3913 value
+= rel
->r_addend
;
3914 dynamic_symbol_p
= elfNN_ia64_dynamic_symbol_p (h
, info
, r_type
);
3925 case R_IA64_DIR32MSB
:
3926 case R_IA64_DIR32LSB
:
3927 case R_IA64_DIR64MSB
:
3928 case R_IA64_DIR64LSB
:
3929 /* Install a dynamic relocation for this reloc. */
3930 if ((dynamic_symbol_p
|| info
->shared
)
3932 && (input_section
->flags
& SEC_ALLOC
) != 0)
3934 unsigned int dyn_r_type
;
3938 BFD_ASSERT (srel
!= NULL
);
3940 /* If we don't need dynamic symbol lookup, find a
3941 matching RELATIVE relocation. */
3942 dyn_r_type
= r_type
;
3943 if (dynamic_symbol_p
)
3945 dynindx
= h
->dynindx
;
3946 addend
= rel
->r_addend
;
3953 case R_IA64_DIR32MSB
:
3954 dyn_r_type
= R_IA64_REL32MSB
;
3956 case R_IA64_DIR32LSB
:
3957 dyn_r_type
= R_IA64_REL32LSB
;
3959 case R_IA64_DIR64MSB
:
3960 dyn_r_type
= R_IA64_REL64MSB
;
3962 case R_IA64_DIR64LSB
:
3963 dyn_r_type
= R_IA64_REL64LSB
;
3967 /* We can't represent this without a dynamic symbol.
3968 Adjust the relocation to be against an output
3969 section symbol, which are always present in the
3970 dynamic symbol table. */
3971 /* ??? People shouldn't be doing non-pic code in
3972 shared libraries. Hork. */
3973 (*_bfd_error_handler
)
3974 (_("%s: linking non-pic code in a shared library"),
3975 bfd_archive_filename (input_bfd
));
3983 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
3984 srel
, rel
->r_offset
, dyn_r_type
,
3989 case R_IA64_LTV32MSB
:
3990 case R_IA64_LTV32LSB
:
3991 case R_IA64_LTV64MSB
:
3992 case R_IA64_LTV64LSB
:
3993 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
3996 case R_IA64_GPREL22
:
3997 case R_IA64_GPREL64I
:
3998 case R_IA64_GPREL32MSB
:
3999 case R_IA64_GPREL32LSB
:
4000 case R_IA64_GPREL64MSB
:
4001 case R_IA64_GPREL64LSB
:
4002 if (dynamic_symbol_p
)
4004 (*_bfd_error_handler
)
4005 (_("%s: @gprel relocation against dynamic symbol %s"),
4006 bfd_archive_filename (input_bfd
), h
->root
.root
.string
);
4011 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4014 case R_IA64_LTOFF22
:
4015 case R_IA64_LTOFF22X
:
4016 case R_IA64_LTOFF64I
:
4017 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4018 value
= set_got_entry (input_bfd
, info
, dyn_i
, (h
? h
->dynindx
: -1),
4019 rel
->r_addend
, value
, R_IA64_DIR64LSB
);
4021 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4024 case R_IA64_PLTOFF22
:
4025 case R_IA64_PLTOFF64I
:
4026 case R_IA64_PLTOFF64MSB
:
4027 case R_IA64_PLTOFF64LSB
:
4028 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4029 value
= set_pltoff_entry (output_bfd
, info
, dyn_i
, value
, FALSE
);
4031 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4034 case R_IA64_FPTR64I
:
4035 case R_IA64_FPTR32MSB
:
4036 case R_IA64_FPTR32LSB
:
4037 case R_IA64_FPTR64MSB
:
4038 case R_IA64_FPTR64LSB
:
4039 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4040 if (dyn_i
->want_fptr
)
4042 if (!undef_weak_ref
)
4043 value
= set_fptr_entry (output_bfd
, info
, dyn_i
, value
);
4045 if (!dyn_i
->want_fptr
|| info
->pie
)
4048 unsigned int dyn_r_type
= r_type
;
4049 bfd_vma addend
= rel
->r_addend
;
4051 /* Otherwise, we expect the dynamic linker to create
4054 if (dyn_i
->want_fptr
)
4056 if (r_type
== R_IA64_FPTR64I
)
4058 /* We can't represent this without a dynamic symbol.
4059 Adjust the relocation to be against an output
4060 section symbol, which are always present in the
4061 dynamic symbol table. */
4062 /* ??? People shouldn't be doing non-pic code in
4063 shared libraries. Hork. */
4064 (*_bfd_error_handler
)
4065 (_("%s: linking non-pic code in a position independent executable"),
4066 bfd_archive_filename (input_bfd
));
4072 dyn_r_type
= r_type
+ R_IA64_REL64LSB
- R_IA64_FPTR64LSB
;
4076 if (h
->dynindx
!= -1)
4077 dynindx
= h
->dynindx
;
4079 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4080 (info
, h
->root
.u
.def
.section
->owner
,
4081 global_sym_index (h
)));
4086 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4087 (info
, input_bfd
, (long) r_symndx
));
4091 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4092 srel
, rel
->r_offset
, dyn_r_type
,
4096 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4099 case R_IA64_LTOFF_FPTR22
:
4100 case R_IA64_LTOFF_FPTR64I
:
4101 case R_IA64_LTOFF_FPTR32MSB
:
4102 case R_IA64_LTOFF_FPTR32LSB
:
4103 case R_IA64_LTOFF_FPTR64MSB
:
4104 case R_IA64_LTOFF_FPTR64LSB
:
4108 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4109 if (dyn_i
->want_fptr
)
4111 BFD_ASSERT (h
== NULL
|| h
->dynindx
== -1)
4112 if (!undef_weak_ref
)
4113 value
= set_fptr_entry (output_bfd
, info
, dyn_i
, value
);
4118 /* Otherwise, we expect the dynamic linker to create
4122 if (h
->dynindx
!= -1)
4123 dynindx
= h
->dynindx
;
4125 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4126 (info
, h
->root
.u
.def
.section
->owner
,
4127 global_sym_index (h
)));
4130 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4131 (info
, input_bfd
, (long) r_symndx
));
4135 value
= set_got_entry (output_bfd
, info
, dyn_i
, dynindx
,
4136 rel
->r_addend
, value
, R_IA64_FPTR64LSB
);
4138 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4142 case R_IA64_PCREL32MSB
:
4143 case R_IA64_PCREL32LSB
:
4144 case R_IA64_PCREL64MSB
:
4145 case R_IA64_PCREL64LSB
:
4146 /* Install a dynamic relocation for this reloc. */
4147 if (dynamic_symbol_p
&& r_symndx
!= 0)
4149 BFD_ASSERT (srel
!= NULL
);
4151 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4152 srel
, rel
->r_offset
, r_type
,
4153 h
->dynindx
, rel
->r_addend
);
4157 case R_IA64_PCREL21B
:
4158 case R_IA64_PCREL60B
:
4159 /* We should have created a PLT entry for any dynamic symbol. */
4162 dyn_i
= get_dyn_sym_info (ia64_info
, h
, NULL
, NULL
, FALSE
);
4164 if (dyn_i
&& dyn_i
->want_plt2
)
4166 /* Should have caught this earlier. */
4167 BFD_ASSERT (rel
->r_addend
== 0);
4169 value
= (ia64_info
->plt_sec
->output_section
->vma
4170 + ia64_info
->plt_sec
->output_offset
4171 + dyn_i
->plt2_offset
);
4175 /* Since there's no PLT entry, Validate that this is
4177 BFD_ASSERT (undef_weak_ref
|| sym_sec
->output_section
!= NULL
);
4179 /* If the symbol is undef_weak, we shouldn't be trying
4180 to call it. There's every chance that we'd wind up
4181 with an out-of-range fixup here. Don't bother setting
4182 any value at all. */
4188 case R_IA64_PCREL21BI
:
4189 case R_IA64_PCREL21F
:
4190 case R_IA64_PCREL21M
:
4191 case R_IA64_PCREL22
:
4192 case R_IA64_PCREL64I
:
4193 /* The PCREL21BI reloc is specifically not intended for use with
4194 dynamic relocs. PCREL21F and PCREL21M are used for speculation
4195 fixup code, and thus probably ought not be dynamic. The
4196 PCREL22 and PCREL64I relocs aren't emitted as dynamic relocs. */
4197 if (dynamic_symbol_p
)
4201 if (r_type
== R_IA64_PCREL21BI
)
4202 msg
= _("%s: @internal branch to dynamic symbol %s");
4203 else if (r_type
== R_IA64_PCREL21F
|| r_type
== R_IA64_PCREL21M
)
4204 msg
= _("%s: speculation fixup to dynamic symbol %s");
4206 msg
= _("%s: @pcrel relocation against dynamic symbol %s");
4207 (*_bfd_error_handler
) (msg
, bfd_archive_filename (input_bfd
),
4208 h
->root
.root
.string
);
4215 /* Make pc-relative. */
4216 value
-= (input_section
->output_section
->vma
4217 + input_section
->output_offset
4218 + rel
->r_offset
) & ~ (bfd_vma
) 0x3;
4219 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4222 case R_IA64_SEGREL32MSB
:
4223 case R_IA64_SEGREL32LSB
:
4224 case R_IA64_SEGREL64MSB
:
4225 case R_IA64_SEGREL64LSB
:
4228 /* If the input section was discarded from the output, then
4234 struct elf_segment_map
*m
;
4235 Elf_Internal_Phdr
*p
;
4237 /* Find the segment that contains the output_section. */
4238 for (m
= elf_tdata (output_bfd
)->segment_map
,
4239 p
= elf_tdata (output_bfd
)->phdr
;
4244 for (i
= m
->count
- 1; i
>= 0; i
--)
4245 if (m
->sections
[i
] == input_section
->output_section
)
4253 r
= bfd_reloc_notsupported
;
4257 /* The VMA of the segment is the vaddr of the associated
4259 if (value
> p
->p_vaddr
)
4260 value
-= p
->p_vaddr
;
4263 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
,
4269 case R_IA64_SECREL32MSB
:
4270 case R_IA64_SECREL32LSB
:
4271 case R_IA64_SECREL64MSB
:
4272 case R_IA64_SECREL64LSB
:
4273 /* Make output-section relative. */
4274 if (value
> input_section
->output_section
->vma
)
4275 value
-= input_section
->output_section
->vma
;
4278 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4281 case R_IA64_IPLTMSB
:
4282 case R_IA64_IPLTLSB
:
4283 /* Install a dynamic relocation for this reloc. */
4284 if ((dynamic_symbol_p
|| info
->shared
)
4285 && (input_section
->flags
& SEC_ALLOC
) != 0)
4287 BFD_ASSERT (srel
!= NULL
);
4289 /* If we don't need dynamic symbol lookup, install two
4290 RELATIVE relocations. */
4291 if (!dynamic_symbol_p
)
4293 unsigned int dyn_r_type
;
4295 if (r_type
== R_IA64_IPLTMSB
)
4296 dyn_r_type
= R_IA64_REL64MSB
;
4298 dyn_r_type
= R_IA64_REL64LSB
;
4300 elfNN_ia64_install_dyn_reloc (output_bfd
, info
,
4302 srel
, rel
->r_offset
,
4303 dyn_r_type
, 0, value
);
4304 elfNN_ia64_install_dyn_reloc (output_bfd
, info
,
4306 srel
, rel
->r_offset
+ 8,
4307 dyn_r_type
, 0, gp_val
);
4310 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4311 srel
, rel
->r_offset
, r_type
,
4312 h
->dynindx
, rel
->r_addend
);
4315 if (r_type
== R_IA64_IPLTMSB
)
4316 r_type
= R_IA64_DIR64MSB
;
4318 r_type
= R_IA64_DIR64LSB
;
4319 elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4320 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
+ 8, gp_val
,
4324 case R_IA64_TPREL14
:
4325 case R_IA64_TPREL22
:
4326 case R_IA64_TPREL64I
:
4327 value
-= elfNN_ia64_tprel_base (info
);
4328 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4331 case R_IA64_DTPREL14
:
4332 case R_IA64_DTPREL22
:
4333 case R_IA64_DTPREL64I
:
4334 case R_IA64_DTPREL64LSB
:
4335 case R_IA64_DTPREL64MSB
:
4336 value
-= elfNN_ia64_dtprel_base (info
);
4337 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4340 case R_IA64_LTOFF_TPREL22
:
4341 case R_IA64_LTOFF_DTPMOD22
:
4342 case R_IA64_LTOFF_DTPREL22
:
4345 long dynindx
= h
? h
->dynindx
: -1;
4346 bfd_vma r_addend
= rel
->r_addend
;
4351 case R_IA64_LTOFF_TPREL22
:
4352 if (!dynamic_symbol_p
)
4355 value
-= elfNN_ia64_tprel_base (info
);
4358 r_addend
+= value
- elfNN_ia64_dtprel_base (info
);
4362 got_r_type
= R_IA64_TPREL64LSB
;
4364 case R_IA64_LTOFF_DTPMOD22
:
4365 if (!dynamic_symbol_p
&& !info
->shared
)
4367 got_r_type
= R_IA64_DTPMOD64LSB
;
4369 case R_IA64_LTOFF_DTPREL22
:
4370 if (!dynamic_symbol_p
)
4371 value
-= elfNN_ia64_dtprel_base (info
);
4372 got_r_type
= R_IA64_DTPREL64LSB
;
4375 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4376 value
= set_got_entry (input_bfd
, info
, dyn_i
, dynindx
, r_addend
,
4379 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
,
4385 r
= bfd_reloc_notsupported
;
4394 case bfd_reloc_undefined
:
4395 /* This can happen for global table relative relocs if
4396 __gp is undefined. This is a panic situation so we
4397 don't try to continue. */
4398 (*info
->callbacks
->undefined_symbol
)
4399 (info
, "__gp", input_bfd
, input_section
, rel
->r_offset
, 1);
4402 case bfd_reloc_notsupported
:
4407 name
= h
->root
.root
.string
;
4410 name
= bfd_elf_string_from_elf_section (input_bfd
,
4411 symtab_hdr
->sh_link
,
4416 name
= bfd_section_name (input_bfd
, input_section
);
4418 if (!(*info
->callbacks
->warning
) (info
, _("unsupported reloc"),
4420 input_section
, rel
->r_offset
))
4426 case bfd_reloc_dangerous
:
4427 case bfd_reloc_outofrange
:
4428 case bfd_reloc_overflow
:
4434 name
= h
->root
.root
.string
;
4437 name
= bfd_elf_string_from_elf_section (input_bfd
,
4438 symtab_hdr
->sh_link
,
4443 name
= bfd_section_name (input_bfd
, input_section
);
4445 if (!(*info
->callbacks
->reloc_overflow
) (info
, name
,
4462 elfNN_ia64_finish_dynamic_symbol (output_bfd
, info
, h
, sym
)
4464 struct bfd_link_info
*info
;
4465 struct elf_link_hash_entry
*h
;
4466 Elf_Internal_Sym
*sym
;
4468 struct elfNN_ia64_link_hash_table
*ia64_info
;
4469 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
4471 ia64_info
= elfNN_ia64_hash_table (info
);
4472 dyn_i
= get_dyn_sym_info (ia64_info
, h
, NULL
, NULL
, FALSE
);
4474 /* Fill in the PLT data, if required. */
4475 if (dyn_i
&& dyn_i
->want_plt
)
4477 Elf_Internal_Rela outrel
;
4480 bfd_vma plt_addr
, pltoff_addr
, gp_val
, index
;
4482 gp_val
= _bfd_get_gp_value (output_bfd
);
4484 /* Initialize the minimal PLT entry. */
4486 index
= (dyn_i
->plt_offset
- PLT_HEADER_SIZE
) / PLT_MIN_ENTRY_SIZE
;
4487 plt_sec
= ia64_info
->plt_sec
;
4488 loc
= plt_sec
->contents
+ dyn_i
->plt_offset
;
4490 memcpy (loc
, plt_min_entry
, PLT_MIN_ENTRY_SIZE
);
4491 elfNN_ia64_install_value (output_bfd
, loc
, index
, R_IA64_IMM22
);
4492 elfNN_ia64_install_value (output_bfd
, loc
+2, -dyn_i
->plt_offset
,
4495 plt_addr
= (plt_sec
->output_section
->vma
4496 + plt_sec
->output_offset
4497 + dyn_i
->plt_offset
);
4498 pltoff_addr
= set_pltoff_entry (output_bfd
, info
, dyn_i
, plt_addr
, TRUE
);
4500 /* Initialize the FULL PLT entry, if needed. */
4501 if (dyn_i
->want_plt2
)
4503 loc
= plt_sec
->contents
+ dyn_i
->plt2_offset
;
4505 memcpy (loc
, plt_full_entry
, PLT_FULL_ENTRY_SIZE
);
4506 elfNN_ia64_install_value (output_bfd
, loc
, pltoff_addr
- gp_val
,
4509 /* Mark the symbol as undefined, rather than as defined in the
4510 plt section. Leave the value alone. */
4511 /* ??? We didn't redefine it in adjust_dynamic_symbol in the
4512 first place. But perhaps elflink.h did some for us. */
4513 if ((h
->elf_link_hash_flags
& ELF_LINK_HASH_DEF_REGULAR
) == 0)
4514 sym
->st_shndx
= SHN_UNDEF
;
4517 /* Create the dynamic relocation. */
4518 outrel
.r_offset
= pltoff_addr
;
4519 if (bfd_little_endian (output_bfd
))
4520 outrel
.r_info
= ELFNN_R_INFO (h
->dynindx
, R_IA64_IPLTLSB
);
4522 outrel
.r_info
= ELFNN_R_INFO (h
->dynindx
, R_IA64_IPLTMSB
);
4523 outrel
.r_addend
= 0;
4525 /* This is fun. In the .IA_64.pltoff section, we've got entries
4526 that correspond both to real PLT entries, and those that
4527 happened to resolve to local symbols but need to be created
4528 to satisfy @pltoff relocations. The .rela.IA_64.pltoff
4529 relocations for the real PLT should come at the end of the
4530 section, so that they can be indexed by plt entry at runtime.
4532 We emitted all of the relocations for the non-PLT @pltoff
4533 entries during relocate_section. So we can consider the
4534 existing sec->reloc_count to be the base of the array of
4537 loc
= ia64_info
->rel_pltoff_sec
->contents
;
4538 loc
+= ((ia64_info
->rel_pltoff_sec
->reloc_count
+ index
)
4539 * sizeof (ElfNN_External_Rela
));
4540 bfd_elfNN_swap_reloca_out (output_bfd
, &outrel
, loc
);
4543 /* Mark some specially defined symbols as absolute. */
4544 if (strcmp (h
->root
.root
.string
, "_DYNAMIC") == 0
4545 || strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0
4546 || strcmp (h
->root
.root
.string
, "_PROCEDURE_LINKAGE_TABLE_") == 0)
4547 sym
->st_shndx
= SHN_ABS
;
4553 elfNN_ia64_finish_dynamic_sections (abfd
, info
)
4555 struct bfd_link_info
*info
;
4557 struct elfNN_ia64_link_hash_table
*ia64_info
;
4560 ia64_info
= elfNN_ia64_hash_table (info
);
4561 dynobj
= ia64_info
->root
.dynobj
;
4563 if (elf_hash_table (info
)->dynamic_sections_created
)
4565 ElfNN_External_Dyn
*dyncon
, *dynconend
;
4566 asection
*sdyn
, *sgotplt
;
4569 sdyn
= bfd_get_section_by_name (dynobj
, ".dynamic");
4570 sgotplt
= bfd_get_section_by_name (dynobj
, ".got.plt");
4571 BFD_ASSERT (sdyn
!= NULL
);
4572 dyncon
= (ElfNN_External_Dyn
*) sdyn
->contents
;
4573 dynconend
= (ElfNN_External_Dyn
*) (sdyn
->contents
+ sdyn
->_raw_size
);
4575 gp_val
= _bfd_get_gp_value (abfd
);
4577 for (; dyncon
< dynconend
; dyncon
++)
4579 Elf_Internal_Dyn dyn
;
4581 bfd_elfNN_swap_dyn_in (dynobj
, dyncon
, &dyn
);
4586 dyn
.d_un
.d_ptr
= gp_val
;
4590 dyn
.d_un
.d_val
= (ia64_info
->minplt_entries
4591 * sizeof (ElfNN_External_Rela
));
4595 /* See the comment above in finish_dynamic_symbol. */
4596 dyn
.d_un
.d_ptr
= (ia64_info
->rel_pltoff_sec
->output_section
->vma
4597 + ia64_info
->rel_pltoff_sec
->output_offset
4598 + (ia64_info
->rel_pltoff_sec
->reloc_count
4599 * sizeof (ElfNN_External_Rela
)));
4602 case DT_IA_64_PLT_RESERVE
:
4603 dyn
.d_un
.d_ptr
= (sgotplt
->output_section
->vma
4604 + sgotplt
->output_offset
);
4608 /* Do not have RELASZ include JMPREL. This makes things
4609 easier on ld.so. This is not what the rest of BFD set up. */
4610 dyn
.d_un
.d_val
-= (ia64_info
->minplt_entries
4611 * sizeof (ElfNN_External_Rela
));
4615 bfd_elfNN_swap_dyn_out (abfd
, &dyn
, dyncon
);
4618 /* Initialize the PLT0 entry. */
4619 if (ia64_info
->plt_sec
)
4621 bfd_byte
*loc
= ia64_info
->plt_sec
->contents
;
4624 memcpy (loc
, plt_header
, PLT_HEADER_SIZE
);
4626 pltres
= (sgotplt
->output_section
->vma
4627 + sgotplt
->output_offset
4630 elfNN_ia64_install_value (abfd
, loc
+1, pltres
, R_IA64_GPREL22
);
4637 /* ELF file flag handling: */
4639 /* Function to keep IA-64 specific file flags. */
4641 elfNN_ia64_set_private_flags (abfd
, flags
)
4645 BFD_ASSERT (!elf_flags_init (abfd
)
4646 || elf_elfheader (abfd
)->e_flags
== flags
);
4648 elf_elfheader (abfd
)->e_flags
= flags
;
4649 elf_flags_init (abfd
) = TRUE
;
4653 /* Merge backend specific data from an object file to the output
4654 object file when linking. */
4656 elfNN_ia64_merge_private_bfd_data (ibfd
, obfd
)
4661 bfd_boolean ok
= TRUE
;
4663 /* Don't even pretend to support mixed-format linking. */
4664 if (bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
4665 || bfd_get_flavour (obfd
) != bfd_target_elf_flavour
)
4668 in_flags
= elf_elfheader (ibfd
)->e_flags
;
4669 out_flags
= elf_elfheader (obfd
)->e_flags
;
4671 if (! elf_flags_init (obfd
))
4673 elf_flags_init (obfd
) = TRUE
;
4674 elf_elfheader (obfd
)->e_flags
= in_flags
;
4676 if (bfd_get_arch (obfd
) == bfd_get_arch (ibfd
)
4677 && bfd_get_arch_info (obfd
)->the_default
)
4679 return bfd_set_arch_mach (obfd
, bfd_get_arch (ibfd
),
4680 bfd_get_mach (ibfd
));
4686 /* Check flag compatibility. */
4687 if (in_flags
== out_flags
)
4690 /* Output has EF_IA_64_REDUCEDFP set only if all inputs have it set. */
4691 if (!(in_flags
& EF_IA_64_REDUCEDFP
) && (out_flags
& EF_IA_64_REDUCEDFP
))
4692 elf_elfheader (obfd
)->e_flags
&= ~EF_IA_64_REDUCEDFP
;
4694 if ((in_flags
& EF_IA_64_TRAPNIL
) != (out_flags
& EF_IA_64_TRAPNIL
))
4696 (*_bfd_error_handler
)
4697 (_("%s: linking trap-on-NULL-dereference with non-trapping files"),
4698 bfd_archive_filename (ibfd
));
4700 bfd_set_error (bfd_error_bad_value
);
4703 if ((in_flags
& EF_IA_64_BE
) != (out_flags
& EF_IA_64_BE
))
4705 (*_bfd_error_handler
)
4706 (_("%s: linking big-endian files with little-endian files"),
4707 bfd_archive_filename (ibfd
));
4709 bfd_set_error (bfd_error_bad_value
);
4712 if ((in_flags
& EF_IA_64_ABI64
) != (out_flags
& EF_IA_64_ABI64
))
4714 (*_bfd_error_handler
)
4715 (_("%s: linking 64-bit files with 32-bit files"),
4716 bfd_archive_filename (ibfd
));
4718 bfd_set_error (bfd_error_bad_value
);
4721 if ((in_flags
& EF_IA_64_CONS_GP
) != (out_flags
& EF_IA_64_CONS_GP
))
4723 (*_bfd_error_handler
)
4724 (_("%s: linking constant-gp files with non-constant-gp files"),
4725 bfd_archive_filename (ibfd
));
4727 bfd_set_error (bfd_error_bad_value
);
4730 if ((in_flags
& EF_IA_64_NOFUNCDESC_CONS_GP
)
4731 != (out_flags
& EF_IA_64_NOFUNCDESC_CONS_GP
))
4733 (*_bfd_error_handler
)
4734 (_("%s: linking auto-pic files with non-auto-pic files"),
4735 bfd_archive_filename (ibfd
));
4737 bfd_set_error (bfd_error_bad_value
);
4745 elfNN_ia64_print_private_bfd_data (abfd
, ptr
)
4749 FILE *file
= (FILE *) ptr
;
4750 flagword flags
= elf_elfheader (abfd
)->e_flags
;
4752 BFD_ASSERT (abfd
!= NULL
&& ptr
!= NULL
);
4754 fprintf (file
, "private flags = %s%s%s%s%s%s%s%s\n",
4755 (flags
& EF_IA_64_TRAPNIL
) ? "TRAPNIL, " : "",
4756 (flags
& EF_IA_64_EXT
) ? "EXT, " : "",
4757 (flags
& EF_IA_64_BE
) ? "BE, " : "LE, ",
4758 (flags
& EF_IA_64_REDUCEDFP
) ? "REDUCEDFP, " : "",
4759 (flags
& EF_IA_64_CONS_GP
) ? "CONS_GP, " : "",
4760 (flags
& EF_IA_64_NOFUNCDESC_CONS_GP
) ? "NOFUNCDESC_CONS_GP, " : "",
4761 (flags
& EF_IA_64_ABSOLUTE
) ? "ABSOLUTE, " : "",
4762 (flags
& EF_IA_64_ABI64
) ? "ABI64" : "ABI32");
4764 _bfd_elf_print_private_bfd_data (abfd
, ptr
);
4768 static enum elf_reloc_type_class
4769 elfNN_ia64_reloc_type_class (rela
)
4770 const Elf_Internal_Rela
*rela
;
4772 switch ((int) ELFNN_R_TYPE (rela
->r_info
))
4774 case R_IA64_REL32MSB
:
4775 case R_IA64_REL32LSB
:
4776 case R_IA64_REL64MSB
:
4777 case R_IA64_REL64LSB
:
4778 return reloc_class_relative
;
4779 case R_IA64_IPLTMSB
:
4780 case R_IA64_IPLTLSB
:
4781 return reloc_class_plt
;
4783 return reloc_class_copy
;
4785 return reloc_class_normal
;
4789 static struct bfd_elf_special_section
const elfNN_ia64_special_sections
[]=
4791 { ".sbss", 5, -1, SHT_NOBITS
, SHF_ALLOC
+ SHF_WRITE
+ SHF_IA_64_SHORT
},
4792 { ".sdata", 6, -1, SHT_PROGBITS
, SHF_ALLOC
+ SHF_WRITE
+ SHF_IA_64_SHORT
},
4793 { NULL
, 0, 0, 0, 0 }
4797 elfNN_ia64_hpux_vec (const bfd_target
*vec
)
4799 extern const bfd_target bfd_elfNN_ia64_hpux_big_vec
;
4800 return (vec
== & bfd_elfNN_ia64_hpux_big_vec
);
4804 elfNN_hpux_post_process_headers (abfd
, info
)
4806 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
4808 Elf_Internal_Ehdr
*i_ehdrp
= elf_elfheader (abfd
);
4810 i_ehdrp
->e_ident
[EI_OSABI
] = ELFOSABI_HPUX
;
4811 i_ehdrp
->e_ident
[EI_ABIVERSION
] = 1;
4815 elfNN_hpux_backend_section_from_bfd_section (abfd
, sec
, retval
)
4816 bfd
*abfd ATTRIBUTE_UNUSED
;
4820 if (bfd_is_com_section (sec
))
4822 *retval
= SHN_IA_64_ANSI_COMMON
;
4829 elfNN_hpux_backend_symbol_processing (bfd
*abfd ATTRIBUTE_UNUSED
,
4832 elf_symbol_type
*elfsym
= (elf_symbol_type
*) asym
;;
4834 switch (elfsym
->internal_elf_sym
.st_shndx
)
4836 case SHN_IA_64_ANSI_COMMON
:
4837 asym
->section
= bfd_com_section_ptr
;
4838 asym
->value
= elfsym
->internal_elf_sym
.st_size
;
4839 asym
->flags
&= ~BSF_GLOBAL
;
4845 #define TARGET_LITTLE_SYM bfd_elfNN_ia64_little_vec
4846 #define TARGET_LITTLE_NAME "elfNN-ia64-little"
4847 #define TARGET_BIG_SYM bfd_elfNN_ia64_big_vec
4848 #define TARGET_BIG_NAME "elfNN-ia64-big"
4849 #define ELF_ARCH bfd_arch_ia64
4850 #define ELF_MACHINE_CODE EM_IA_64
4851 #define ELF_MACHINE_ALT1 1999 /* EAS2.3 */
4852 #define ELF_MACHINE_ALT2 1998 /* EAS2.2 */
4853 #define ELF_MAXPAGESIZE 0x10000 /* 64KB */
4855 #define elf_backend_section_from_shdr \
4856 elfNN_ia64_section_from_shdr
4857 #define elf_backend_section_flags \
4858 elfNN_ia64_section_flags
4859 #define elf_backend_fake_sections \
4860 elfNN_ia64_fake_sections
4861 #define elf_backend_final_write_processing \
4862 elfNN_ia64_final_write_processing
4863 #define elf_backend_add_symbol_hook \
4864 elfNN_ia64_add_symbol_hook
4865 #define elf_backend_additional_program_headers \
4866 elfNN_ia64_additional_program_headers
4867 #define elf_backend_modify_segment_map \
4868 elfNN_ia64_modify_segment_map
4869 #define elf_info_to_howto \
4870 elfNN_ia64_info_to_howto
4872 #define bfd_elfNN_bfd_reloc_type_lookup \
4873 elfNN_ia64_reloc_type_lookup
4874 #define bfd_elfNN_bfd_is_local_label_name \
4875 elfNN_ia64_is_local_label_name
4876 #define bfd_elfNN_bfd_relax_section \
4877 elfNN_ia64_relax_section
4879 /* Stuff for the BFD linker: */
4880 #define bfd_elfNN_bfd_link_hash_table_create \
4881 elfNN_ia64_hash_table_create
4882 #define bfd_elfNN_bfd_link_hash_table_free \
4883 elfNN_ia64_hash_table_free
4884 #define elf_backend_create_dynamic_sections \
4885 elfNN_ia64_create_dynamic_sections
4886 #define elf_backend_check_relocs \
4887 elfNN_ia64_check_relocs
4888 #define elf_backend_adjust_dynamic_symbol \
4889 elfNN_ia64_adjust_dynamic_symbol
4890 #define elf_backend_size_dynamic_sections \
4891 elfNN_ia64_size_dynamic_sections
4892 #define elf_backend_relocate_section \
4893 elfNN_ia64_relocate_section
4894 #define elf_backend_finish_dynamic_symbol \
4895 elfNN_ia64_finish_dynamic_symbol
4896 #define elf_backend_finish_dynamic_sections \
4897 elfNN_ia64_finish_dynamic_sections
4898 #define bfd_elfNN_bfd_final_link \
4899 elfNN_ia64_final_link
4901 #define bfd_elfNN_bfd_merge_private_bfd_data \
4902 elfNN_ia64_merge_private_bfd_data
4903 #define bfd_elfNN_bfd_set_private_flags \
4904 elfNN_ia64_set_private_flags
4905 #define bfd_elfNN_bfd_print_private_bfd_data \
4906 elfNN_ia64_print_private_bfd_data
4908 #define elf_backend_plt_readonly 1
4909 #define elf_backend_want_plt_sym 0
4910 #define elf_backend_plt_alignment 5
4911 #define elf_backend_got_header_size 0
4912 #define elf_backend_want_got_plt 1
4913 #define elf_backend_may_use_rel_p 1
4914 #define elf_backend_may_use_rela_p 1
4915 #define elf_backend_default_use_rela_p 1
4916 #define elf_backend_want_dynbss 0
4917 #define elf_backend_copy_indirect_symbol elfNN_ia64_hash_copy_indirect
4918 #define elf_backend_hide_symbol elfNN_ia64_hash_hide_symbol
4919 #define elf_backend_reloc_type_class elfNN_ia64_reloc_type_class
4920 #define elf_backend_rela_normal 1
4921 #define elf_backend_special_sections elfNN_ia64_special_sections
4923 #include "elfNN-target.h"
4925 /* HPUX-specific vectors. */
4927 #undef TARGET_LITTLE_SYM
4928 #undef TARGET_LITTLE_NAME
4929 #undef TARGET_BIG_SYM
4930 #define TARGET_BIG_SYM bfd_elfNN_ia64_hpux_big_vec
4931 #undef TARGET_BIG_NAME
4932 #define TARGET_BIG_NAME "elfNN-ia64-hpux-big"
4934 /* These are HP-UX specific functions. */
4936 #undef elf_backend_post_process_headers
4937 #define elf_backend_post_process_headers elfNN_hpux_post_process_headers
4939 #undef elf_backend_section_from_bfd_section
4940 #define elf_backend_section_from_bfd_section elfNN_hpux_backend_section_from_bfd_section
4942 #undef elf_backend_symbol_processing
4943 #define elf_backend_symbol_processing elfNN_hpux_backend_symbol_processing
4945 #undef elf_backend_want_p_paddr_set_to_zero
4946 #define elf_backend_want_p_paddr_set_to_zero 1
4948 #undef ELF_MAXPAGESIZE
4949 #define ELF_MAXPAGESIZE 0x1000 /* 1K */
4952 #define elfNN_bed elfNN_ia64_hpux_bed
4954 #include "elfNN-target.h"
4956 #undef elf_backend_want_p_paddr_set_to_zero