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"
28 /* THE RULES for all the stuff the linker creates --
30 GOT Entries created in response to LTOFF or LTOFF_FPTR
31 relocations. Dynamic relocs created for dynamic
32 symbols in an application; REL relocs for locals
35 FPTR The canonical function descriptor. Created for local
36 symbols in applications. Descriptors for dynamic symbols
37 and local symbols in shared libraries are created by
38 ld.so. Thus there are no dynamic relocs against these
39 objects. The FPTR relocs for such _are_ passed through
40 to the dynamic relocation tables.
42 FULL_PLT Created for a PCREL21B relocation against a dynamic symbol.
43 Requires the creation of a PLTOFF entry. This does not
44 require any dynamic relocations.
46 PLTOFF Created by PLTOFF relocations. For local symbols, this
47 is an alternate function descriptor, and in shared libraries
48 requires two REL relocations. Note that this cannot be
49 transformed into an FPTR relocation, since it must be in
50 range of the GP. For dynamic symbols, this is a function
51 descriptor for a MIN_PLT entry, and requires one IPLT reloc.
53 MIN_PLT Created by PLTOFF entries against dynamic symbols. This
54 does not reqire dynamic relocations. */
56 #define NELEMS(a) ((int) (sizeof (a) / sizeof ((a)[0])))
58 typedef struct bfd_hash_entry
*(*new_hash_entry_func
)
59 PARAMS ((struct bfd_hash_entry
*, struct bfd_hash_table
*, const char *));
61 /* In dynamically (linker-) created sections, we generally need to keep track
62 of the place a symbol or expression got allocated to. This is done via hash
63 tables that store entries of the following type. */
65 struct elfNN_ia64_dyn_sym_info
67 /* The addend for which this entry is relevant. */
70 /* Next addend in the list. */
71 struct elfNN_ia64_dyn_sym_info
*next
;
75 bfd_vma pltoff_offset
;
79 bfd_vma dtpmod_offset
;
80 bfd_vma dtprel_offset
;
82 /* The symbol table entry, if any, that this was derrived from. */
83 struct elf_link_hash_entry
*h
;
85 /* Used to count non-got, non-plt relocations for delayed sizing
86 of relocation sections. */
87 struct elfNN_ia64_dyn_reloc_entry
89 struct elfNN_ia64_dyn_reloc_entry
*next
;
95 /* TRUE when the section contents have been updated. */
96 unsigned got_done
: 1;
97 unsigned fptr_done
: 1;
98 unsigned pltoff_done
: 1;
99 unsigned tprel_done
: 1;
100 unsigned dtpmod_done
: 1;
101 unsigned dtprel_done
: 1;
103 /* TRUE for the different kinds of linker data we want created. */
104 unsigned want_got
: 1;
105 unsigned want_gotx
: 1;
106 unsigned want_fptr
: 1;
107 unsigned want_ltoff_fptr
: 1;
108 unsigned want_plt
: 1;
109 unsigned want_plt2
: 1;
110 unsigned want_pltoff
: 1;
111 unsigned want_tprel
: 1;
112 unsigned want_dtpmod
: 1;
113 unsigned want_dtprel
: 1;
116 struct elfNN_ia64_local_hash_entry
118 struct bfd_hash_entry root
;
119 struct elfNN_ia64_dyn_sym_info
*info
;
121 /* TRUE if this hash entry's addends was translated for
122 SHF_MERGE optimization. */
123 unsigned sec_merge_done
: 1;
126 struct elfNN_ia64_local_hash_table
128 struct bfd_hash_table root
;
129 /* No additional fields for now. */
132 struct elfNN_ia64_link_hash_entry
134 struct elf_link_hash_entry root
;
135 struct elfNN_ia64_dyn_sym_info
*info
;
138 struct elfNN_ia64_link_hash_table
140 /* The main hash table. */
141 struct elf_link_hash_table root
;
143 asection
*got_sec
; /* the linkage table section (or NULL) */
144 asection
*rel_got_sec
; /* dynamic relocation section for same */
145 asection
*fptr_sec
; /* function descriptor table (or NULL) */
146 asection
*rel_fptr_sec
; /* dynamic relocation section for same */
147 asection
*plt_sec
; /* the primary plt section (or NULL) */
148 asection
*pltoff_sec
; /* private descriptors for plt (or NULL) */
149 asection
*rel_pltoff_sec
; /* dynamic relocation section for same */
151 bfd_size_type minplt_entries
; /* number of minplt entries */
152 unsigned reltext
: 1; /* are there relocs against readonly sections? */
153 unsigned self_dtpmod_done
: 1;/* has self DTPMOD entry been finished? */
154 bfd_vma self_dtpmod_offset
; /* .got offset to self DTPMOD entry */
156 struct elfNN_ia64_local_hash_table loc_hash_table
;
159 struct elfNN_ia64_allocate_data
161 struct bfd_link_info
*info
;
165 #define elfNN_ia64_hash_table(p) \
166 ((struct elfNN_ia64_link_hash_table *) ((p)->hash))
168 static bfd_reloc_status_type elfNN_ia64_reloc
169 PARAMS ((bfd
*abfd
, arelent
*reloc
, asymbol
*sym
, PTR data
,
170 asection
*input_section
, bfd
*output_bfd
, char **error_message
));
171 static reloc_howto_type
* lookup_howto
172 PARAMS ((unsigned int rtype
));
173 static reloc_howto_type
*elfNN_ia64_reloc_type_lookup
174 PARAMS ((bfd
*abfd
, bfd_reloc_code_real_type bfd_code
));
175 static void elfNN_ia64_info_to_howto
176 PARAMS ((bfd
*abfd
, arelent
*bfd_reloc
, Elf_Internal_Rela
*elf_reloc
));
177 static bfd_boolean elfNN_ia64_relax_section
178 PARAMS((bfd
*abfd
, asection
*sec
, struct bfd_link_info
*link_info
,
179 bfd_boolean
*again
));
180 static void elfNN_ia64_relax_ldxmov
181 PARAMS((bfd
*abfd
, bfd_byte
*contents
, bfd_vma off
));
182 static bfd_boolean is_unwind_section_name
183 PARAMS ((bfd
*abfd
, const char *));
184 static bfd_boolean elfNN_ia64_section_from_shdr
185 PARAMS ((bfd
*, Elf_Internal_Shdr
*, const char *));
186 static bfd_boolean elfNN_ia64_section_flags
187 PARAMS ((flagword
*, Elf_Internal_Shdr
*));
188 static bfd_boolean elfNN_ia64_fake_sections
189 PARAMS ((bfd
*abfd
, Elf_Internal_Shdr
*hdr
, asection
*sec
));
190 static void elfNN_ia64_final_write_processing
191 PARAMS ((bfd
*abfd
, bfd_boolean linker
));
192 static bfd_boolean elfNN_ia64_add_symbol_hook
193 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, const Elf_Internal_Sym
*sym
,
194 const char **namep
, flagword
*flagsp
, asection
**secp
,
196 static int elfNN_ia64_additional_program_headers
197 PARAMS ((bfd
*abfd
));
198 static bfd_boolean elfNN_ia64_modify_segment_map
200 static bfd_boolean elfNN_ia64_is_local_label_name
201 PARAMS ((bfd
*abfd
, const char *name
));
202 static bfd_boolean elfNN_ia64_dynamic_symbol_p
203 PARAMS ((struct elf_link_hash_entry
*h
, struct bfd_link_info
*info
, int));
204 static bfd_boolean elfNN_ia64_local_hash_table_init
205 PARAMS ((struct elfNN_ia64_local_hash_table
*ht
, bfd
*abfd
,
206 new_hash_entry_func
new));
207 static struct bfd_hash_entry
*elfNN_ia64_new_loc_hash_entry
208 PARAMS ((struct bfd_hash_entry
*entry
, struct bfd_hash_table
*table
,
209 const char *string
));
210 static struct bfd_hash_entry
*elfNN_ia64_new_elf_hash_entry
211 PARAMS ((struct bfd_hash_entry
*entry
, struct bfd_hash_table
*table
,
212 const char *string
));
213 static void elfNN_ia64_hash_copy_indirect
214 PARAMS ((const struct elf_backend_data
*, struct elf_link_hash_entry
*,
215 struct elf_link_hash_entry
*));
216 static void elfNN_ia64_hash_hide_symbol
217 PARAMS ((struct bfd_link_info
*, struct elf_link_hash_entry
*, bfd_boolean
));
218 static struct bfd_link_hash_table
*elfNN_ia64_hash_table_create
219 PARAMS ((bfd
*abfd
));
220 static struct elfNN_ia64_local_hash_entry
*elfNN_ia64_local_hash_lookup
221 PARAMS ((struct elfNN_ia64_local_hash_table
*table
, const char *string
,
222 bfd_boolean create
, bfd_boolean copy
));
223 static bfd_boolean elfNN_ia64_global_dyn_sym_thunk
224 PARAMS ((struct bfd_hash_entry
*, PTR
));
225 static bfd_boolean elfNN_ia64_local_dyn_sym_thunk
226 PARAMS ((struct bfd_hash_entry
*, PTR
));
227 static void elfNN_ia64_dyn_sym_traverse
228 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
229 bfd_boolean (*func
) (struct elfNN_ia64_dyn_sym_info
*, PTR
),
231 static bfd_boolean elfNN_ia64_create_dynamic_sections
232 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
233 static struct elfNN_ia64_local_hash_entry
* get_local_sym_hash
234 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
235 bfd
*abfd
, const Elf_Internal_Rela
*rel
, bfd_boolean create
));
236 static struct elfNN_ia64_dyn_sym_info
* get_dyn_sym_info
237 PARAMS ((struct elfNN_ia64_link_hash_table
*ia64_info
,
238 struct elf_link_hash_entry
*h
,
239 bfd
*abfd
, const Elf_Internal_Rela
*rel
, bfd_boolean create
));
240 static asection
*get_got
241 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
242 struct elfNN_ia64_link_hash_table
*ia64_info
));
243 static asection
*get_fptr
244 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
245 struct elfNN_ia64_link_hash_table
*ia64_info
));
246 static asection
*get_pltoff
247 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
248 struct elfNN_ia64_link_hash_table
*ia64_info
));
249 static asection
*get_reloc_section
250 PARAMS ((bfd
*abfd
, struct elfNN_ia64_link_hash_table
*ia64_info
,
251 asection
*sec
, bfd_boolean create
));
252 static bfd_boolean count_dyn_reloc
253 PARAMS ((bfd
*abfd
, struct elfNN_ia64_dyn_sym_info
*dyn_i
,
254 asection
*srel
, int type
));
255 static bfd_boolean elfNN_ia64_check_relocs
256 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, asection
*sec
,
257 const Elf_Internal_Rela
*relocs
));
258 static bfd_boolean elfNN_ia64_adjust_dynamic_symbol
259 PARAMS ((struct bfd_link_info
*info
, struct elf_link_hash_entry
*h
));
260 static long global_sym_index
261 PARAMS ((struct elf_link_hash_entry
*h
));
262 static bfd_boolean allocate_fptr
263 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
264 static bfd_boolean allocate_global_data_got
265 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
266 static bfd_boolean allocate_global_fptr_got
267 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
268 static bfd_boolean allocate_local_got
269 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
270 static bfd_boolean allocate_pltoff_entries
271 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
272 static bfd_boolean allocate_plt_entries
273 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
274 static bfd_boolean allocate_plt2_entries
275 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
276 static bfd_boolean allocate_dynrel_entries
277 PARAMS ((struct elfNN_ia64_dyn_sym_info
*dyn_i
, PTR data
));
278 static bfd_boolean elfNN_ia64_size_dynamic_sections
279 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
));
280 static bfd_reloc_status_type elfNN_ia64_install_value
281 PARAMS ((bfd
*abfd
, bfd_byte
*hit_addr
, bfd_vma val
, unsigned int r_type
));
282 static void elfNN_ia64_install_dyn_reloc
283 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
, asection
*sec
,
284 asection
*srel
, bfd_vma offset
, unsigned int type
,
285 long dynindx
, bfd_vma addend
));
286 static bfd_vma set_got_entry
287 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
288 struct elfNN_ia64_dyn_sym_info
*dyn_i
, long dynindx
,
289 bfd_vma addend
, bfd_vma value
, unsigned int dyn_r_type
));
290 static bfd_vma set_fptr_entry
291 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
292 struct elfNN_ia64_dyn_sym_info
*dyn_i
,
294 static bfd_vma set_pltoff_entry
295 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
,
296 struct elfNN_ia64_dyn_sym_info
*dyn_i
,
297 bfd_vma value
, bfd_boolean
));
298 static bfd_vma elfNN_ia64_tprel_base
299 PARAMS ((struct bfd_link_info
*info
));
300 static bfd_vma elfNN_ia64_dtprel_base
301 PARAMS ((struct bfd_link_info
*info
));
302 static int elfNN_ia64_unwind_entry_compare
303 PARAMS ((const PTR
, const PTR
));
304 static bfd_boolean elfNN_ia64_choose_gp
305 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
306 static bfd_boolean elfNN_ia64_final_link
307 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
308 static bfd_boolean elfNN_ia64_relocate_section
309 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
, bfd
*input_bfd
,
310 asection
*input_section
, bfd_byte
*contents
,
311 Elf_Internal_Rela
*relocs
, Elf_Internal_Sym
*local_syms
,
312 asection
**local_sections
));
313 static bfd_boolean elfNN_ia64_finish_dynamic_symbol
314 PARAMS ((bfd
*output_bfd
, struct bfd_link_info
*info
,
315 struct elf_link_hash_entry
*h
, Elf_Internal_Sym
*sym
));
316 static bfd_boolean elfNN_ia64_finish_dynamic_sections
317 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
318 static bfd_boolean elfNN_ia64_set_private_flags
319 PARAMS ((bfd
*abfd
, flagword flags
));
320 static bfd_boolean elfNN_ia64_merge_private_bfd_data
321 PARAMS ((bfd
*ibfd
, bfd
*obfd
));
322 static bfd_boolean elfNN_ia64_print_private_bfd_data
323 PARAMS ((bfd
*abfd
, PTR ptr
));
324 static enum elf_reloc_type_class elfNN_ia64_reloc_type_class
325 PARAMS ((const Elf_Internal_Rela
*));
326 static bfd_boolean elfNN_ia64_hpux_vec
327 PARAMS ((const bfd_target
*vec
));
328 static void elfNN_hpux_post_process_headers
329 PARAMS ((bfd
*abfd
, struct bfd_link_info
*info
));
330 bfd_boolean elfNN_hpux_backend_section_from_bfd_section
331 PARAMS ((bfd
*abfd
, asection
*sec
, int *retval
));
333 /* ia64-specific relocation. */
335 /* Perform a relocation. Not much to do here as all the hard work is
336 done in elfNN_ia64_final_link_relocate. */
337 static bfd_reloc_status_type
338 elfNN_ia64_reloc (abfd
, reloc
, sym
, data
, input_section
,
339 output_bfd
, error_message
)
340 bfd
*abfd ATTRIBUTE_UNUSED
;
342 asymbol
*sym ATTRIBUTE_UNUSED
;
343 PTR data ATTRIBUTE_UNUSED
;
344 asection
*input_section
;
346 char **error_message
;
350 reloc
->address
+= input_section
->output_offset
;
354 if (input_section
->flags
& SEC_DEBUGGING
)
355 return bfd_reloc_continue
;
357 *error_message
= "Unsupported call to elfNN_ia64_reloc";
358 return bfd_reloc_notsupported
;
361 #define IA64_HOWTO(TYPE, NAME, SIZE, PCREL, IN) \
362 HOWTO (TYPE, 0, SIZE, 0, PCREL, 0, complain_overflow_signed, \
363 elfNN_ia64_reloc, NAME, FALSE, 0, -1, IN)
365 /* This table has to be sorted according to increasing number of the
367 static reloc_howto_type ia64_howto_table
[] =
369 IA64_HOWTO (R_IA64_NONE
, "NONE", 0, FALSE
, TRUE
),
371 IA64_HOWTO (R_IA64_IMM14
, "IMM14", 0, FALSE
, TRUE
),
372 IA64_HOWTO (R_IA64_IMM22
, "IMM22", 0, FALSE
, TRUE
),
373 IA64_HOWTO (R_IA64_IMM64
, "IMM64", 0, FALSE
, TRUE
),
374 IA64_HOWTO (R_IA64_DIR32MSB
, "DIR32MSB", 2, FALSE
, TRUE
),
375 IA64_HOWTO (R_IA64_DIR32LSB
, "DIR32LSB", 2, FALSE
, TRUE
),
376 IA64_HOWTO (R_IA64_DIR64MSB
, "DIR64MSB", 4, FALSE
, TRUE
),
377 IA64_HOWTO (R_IA64_DIR64LSB
, "DIR64LSB", 4, FALSE
, TRUE
),
379 IA64_HOWTO (R_IA64_GPREL22
, "GPREL22", 0, FALSE
, TRUE
),
380 IA64_HOWTO (R_IA64_GPREL64I
, "GPREL64I", 0, FALSE
, TRUE
),
381 IA64_HOWTO (R_IA64_GPREL32MSB
, "GPREL32MSB", 2, FALSE
, TRUE
),
382 IA64_HOWTO (R_IA64_GPREL32LSB
, "GPREL32LSB", 2, FALSE
, TRUE
),
383 IA64_HOWTO (R_IA64_GPREL64MSB
, "GPREL64MSB", 4, FALSE
, TRUE
),
384 IA64_HOWTO (R_IA64_GPREL64LSB
, "GPREL64LSB", 4, FALSE
, TRUE
),
386 IA64_HOWTO (R_IA64_LTOFF22
, "LTOFF22", 0, FALSE
, TRUE
),
387 IA64_HOWTO (R_IA64_LTOFF64I
, "LTOFF64I", 0, FALSE
, TRUE
),
389 IA64_HOWTO (R_IA64_PLTOFF22
, "PLTOFF22", 0, FALSE
, TRUE
),
390 IA64_HOWTO (R_IA64_PLTOFF64I
, "PLTOFF64I", 0, FALSE
, TRUE
),
391 IA64_HOWTO (R_IA64_PLTOFF64MSB
, "PLTOFF64MSB", 4, FALSE
, TRUE
),
392 IA64_HOWTO (R_IA64_PLTOFF64LSB
, "PLTOFF64LSB", 4, FALSE
, TRUE
),
394 IA64_HOWTO (R_IA64_FPTR64I
, "FPTR64I", 0, FALSE
, TRUE
),
395 IA64_HOWTO (R_IA64_FPTR32MSB
, "FPTR32MSB", 2, FALSE
, TRUE
),
396 IA64_HOWTO (R_IA64_FPTR32LSB
, "FPTR32LSB", 2, FALSE
, TRUE
),
397 IA64_HOWTO (R_IA64_FPTR64MSB
, "FPTR64MSB", 4, FALSE
, TRUE
),
398 IA64_HOWTO (R_IA64_FPTR64LSB
, "FPTR64LSB", 4, FALSE
, TRUE
),
400 IA64_HOWTO (R_IA64_PCREL60B
, "PCREL60B", 0, TRUE
, TRUE
),
401 IA64_HOWTO (R_IA64_PCREL21B
, "PCREL21B", 0, TRUE
, TRUE
),
402 IA64_HOWTO (R_IA64_PCREL21M
, "PCREL21M", 0, TRUE
, TRUE
),
403 IA64_HOWTO (R_IA64_PCREL21F
, "PCREL21F", 0, TRUE
, TRUE
),
404 IA64_HOWTO (R_IA64_PCREL32MSB
, "PCREL32MSB", 2, TRUE
, TRUE
),
405 IA64_HOWTO (R_IA64_PCREL32LSB
, "PCREL32LSB", 2, TRUE
, TRUE
),
406 IA64_HOWTO (R_IA64_PCREL64MSB
, "PCREL64MSB", 4, TRUE
, TRUE
),
407 IA64_HOWTO (R_IA64_PCREL64LSB
, "PCREL64LSB", 4, TRUE
, TRUE
),
409 IA64_HOWTO (R_IA64_LTOFF_FPTR22
, "LTOFF_FPTR22", 0, FALSE
, TRUE
),
410 IA64_HOWTO (R_IA64_LTOFF_FPTR64I
, "LTOFF_FPTR64I", 0, FALSE
, TRUE
),
411 IA64_HOWTO (R_IA64_LTOFF_FPTR32MSB
, "LTOFF_FPTR32MSB", 2, FALSE
, TRUE
),
412 IA64_HOWTO (R_IA64_LTOFF_FPTR32LSB
, "LTOFF_FPTR32LSB", 2, FALSE
, TRUE
),
413 IA64_HOWTO (R_IA64_LTOFF_FPTR64MSB
, "LTOFF_FPTR64MSB", 4, FALSE
, TRUE
),
414 IA64_HOWTO (R_IA64_LTOFF_FPTR64LSB
, "LTOFF_FPTR64LSB", 4, FALSE
, TRUE
),
416 IA64_HOWTO (R_IA64_SEGREL32MSB
, "SEGREL32MSB", 2, FALSE
, TRUE
),
417 IA64_HOWTO (R_IA64_SEGREL32LSB
, "SEGREL32LSB", 2, FALSE
, TRUE
),
418 IA64_HOWTO (R_IA64_SEGREL64MSB
, "SEGREL64MSB", 4, FALSE
, TRUE
),
419 IA64_HOWTO (R_IA64_SEGREL64LSB
, "SEGREL64LSB", 4, FALSE
, TRUE
),
421 IA64_HOWTO (R_IA64_SECREL32MSB
, "SECREL32MSB", 2, FALSE
, TRUE
),
422 IA64_HOWTO (R_IA64_SECREL32LSB
, "SECREL32LSB", 2, FALSE
, TRUE
),
423 IA64_HOWTO (R_IA64_SECREL64MSB
, "SECREL64MSB", 4, FALSE
, TRUE
),
424 IA64_HOWTO (R_IA64_SECREL64LSB
, "SECREL64LSB", 4, FALSE
, TRUE
),
426 IA64_HOWTO (R_IA64_REL32MSB
, "REL32MSB", 2, FALSE
, TRUE
),
427 IA64_HOWTO (R_IA64_REL32LSB
, "REL32LSB", 2, FALSE
, TRUE
),
428 IA64_HOWTO (R_IA64_REL64MSB
, "REL64MSB", 4, FALSE
, TRUE
),
429 IA64_HOWTO (R_IA64_REL64LSB
, "REL64LSB", 4, FALSE
, TRUE
),
431 IA64_HOWTO (R_IA64_LTV32MSB
, "LTV32MSB", 2, FALSE
, TRUE
),
432 IA64_HOWTO (R_IA64_LTV32LSB
, "LTV32LSB", 2, FALSE
, TRUE
),
433 IA64_HOWTO (R_IA64_LTV64MSB
, "LTV64MSB", 4, FALSE
, TRUE
),
434 IA64_HOWTO (R_IA64_LTV64LSB
, "LTV64LSB", 4, FALSE
, TRUE
),
436 IA64_HOWTO (R_IA64_PCREL21BI
, "PCREL21BI", 0, TRUE
, TRUE
),
437 IA64_HOWTO (R_IA64_PCREL22
, "PCREL22", 0, TRUE
, TRUE
),
438 IA64_HOWTO (R_IA64_PCREL64I
, "PCREL64I", 0, TRUE
, TRUE
),
440 IA64_HOWTO (R_IA64_IPLTMSB
, "IPLTMSB", 4, FALSE
, TRUE
),
441 IA64_HOWTO (R_IA64_IPLTLSB
, "IPLTLSB", 4, FALSE
, TRUE
),
442 IA64_HOWTO (R_IA64_COPY
, "COPY", 4, FALSE
, TRUE
),
443 IA64_HOWTO (R_IA64_LTOFF22X
, "LTOFF22X", 0, FALSE
, TRUE
),
444 IA64_HOWTO (R_IA64_LDXMOV
, "LDXMOV", 0, FALSE
, TRUE
),
446 IA64_HOWTO (R_IA64_TPREL14
, "TPREL14", 0, FALSE
, FALSE
),
447 IA64_HOWTO (R_IA64_TPREL22
, "TPREL22", 0, FALSE
, FALSE
),
448 IA64_HOWTO (R_IA64_TPREL64I
, "TPREL64I", 0, FALSE
, FALSE
),
449 IA64_HOWTO (R_IA64_TPREL64MSB
, "TPREL64MSB", 8, FALSE
, FALSE
),
450 IA64_HOWTO (R_IA64_TPREL64LSB
, "TPREL64LSB", 8, FALSE
, FALSE
),
451 IA64_HOWTO (R_IA64_LTOFF_TPREL22
, "LTOFF_TPREL22", 0, FALSE
, FALSE
),
453 IA64_HOWTO (R_IA64_DTPMOD64MSB
, "TPREL64MSB", 8, FALSE
, FALSE
),
454 IA64_HOWTO (R_IA64_DTPMOD64LSB
, "TPREL64LSB", 8, FALSE
, FALSE
),
455 IA64_HOWTO (R_IA64_LTOFF_DTPMOD22
, "LTOFF_DTPMOD22", 0, FALSE
, FALSE
),
457 IA64_HOWTO (R_IA64_DTPREL14
, "DTPREL14", 0, FALSE
, FALSE
),
458 IA64_HOWTO (R_IA64_DTPREL22
, "DTPREL22", 0, FALSE
, FALSE
),
459 IA64_HOWTO (R_IA64_DTPREL64I
, "DTPREL64I", 0, FALSE
, FALSE
),
460 IA64_HOWTO (R_IA64_DTPREL32MSB
, "DTPREL32MSB", 4, FALSE
, FALSE
),
461 IA64_HOWTO (R_IA64_DTPREL32LSB
, "DTPREL32LSB", 4, FALSE
, FALSE
),
462 IA64_HOWTO (R_IA64_DTPREL64MSB
, "DTPREL64MSB", 8, FALSE
, FALSE
),
463 IA64_HOWTO (R_IA64_DTPREL64LSB
, "DTPREL64LSB", 8, FALSE
, FALSE
),
464 IA64_HOWTO (R_IA64_LTOFF_DTPREL22
, "LTOFF_DTPREL22", 0, FALSE
, FALSE
),
467 static unsigned char elf_code_to_howto_index
[R_IA64_MAX_RELOC_CODE
+ 1];
469 /* Given a BFD reloc type, return the matching HOWTO structure. */
471 static reloc_howto_type
*
475 static int inited
= 0;
482 memset (elf_code_to_howto_index
, 0xff, sizeof (elf_code_to_howto_index
));
483 for (i
= 0; i
< NELEMS (ia64_howto_table
); ++i
)
484 elf_code_to_howto_index
[ia64_howto_table
[i
].type
] = i
;
487 BFD_ASSERT (rtype
<= R_IA64_MAX_RELOC_CODE
);
488 i
= elf_code_to_howto_index
[rtype
];
489 if (i
>= NELEMS (ia64_howto_table
))
491 return ia64_howto_table
+ i
;
494 static reloc_howto_type
*
495 elfNN_ia64_reloc_type_lookup (abfd
, bfd_code
)
496 bfd
*abfd ATTRIBUTE_UNUSED
;
497 bfd_reloc_code_real_type bfd_code
;
503 case BFD_RELOC_NONE
: rtype
= R_IA64_NONE
; break;
505 case BFD_RELOC_IA64_IMM14
: rtype
= R_IA64_IMM14
; break;
506 case BFD_RELOC_IA64_IMM22
: rtype
= R_IA64_IMM22
; break;
507 case BFD_RELOC_IA64_IMM64
: rtype
= R_IA64_IMM64
; break;
509 case BFD_RELOC_IA64_DIR32MSB
: rtype
= R_IA64_DIR32MSB
; break;
510 case BFD_RELOC_IA64_DIR32LSB
: rtype
= R_IA64_DIR32LSB
; break;
511 case BFD_RELOC_IA64_DIR64MSB
: rtype
= R_IA64_DIR64MSB
; break;
512 case BFD_RELOC_IA64_DIR64LSB
: rtype
= R_IA64_DIR64LSB
; break;
514 case BFD_RELOC_IA64_GPREL22
: rtype
= R_IA64_GPREL22
; break;
515 case BFD_RELOC_IA64_GPREL64I
: rtype
= R_IA64_GPREL64I
; break;
516 case BFD_RELOC_IA64_GPREL32MSB
: rtype
= R_IA64_GPREL32MSB
; break;
517 case BFD_RELOC_IA64_GPREL32LSB
: rtype
= R_IA64_GPREL32LSB
; break;
518 case BFD_RELOC_IA64_GPREL64MSB
: rtype
= R_IA64_GPREL64MSB
; break;
519 case BFD_RELOC_IA64_GPREL64LSB
: rtype
= R_IA64_GPREL64LSB
; break;
521 case BFD_RELOC_IA64_LTOFF22
: rtype
= R_IA64_LTOFF22
; break;
522 case BFD_RELOC_IA64_LTOFF64I
: rtype
= R_IA64_LTOFF64I
; break;
524 case BFD_RELOC_IA64_PLTOFF22
: rtype
= R_IA64_PLTOFF22
; break;
525 case BFD_RELOC_IA64_PLTOFF64I
: rtype
= R_IA64_PLTOFF64I
; break;
526 case BFD_RELOC_IA64_PLTOFF64MSB
: rtype
= R_IA64_PLTOFF64MSB
; break;
527 case BFD_RELOC_IA64_PLTOFF64LSB
: rtype
= R_IA64_PLTOFF64LSB
; break;
528 case BFD_RELOC_IA64_FPTR64I
: rtype
= R_IA64_FPTR64I
; break;
529 case BFD_RELOC_IA64_FPTR32MSB
: rtype
= R_IA64_FPTR32MSB
; break;
530 case BFD_RELOC_IA64_FPTR32LSB
: rtype
= R_IA64_FPTR32LSB
; break;
531 case BFD_RELOC_IA64_FPTR64MSB
: rtype
= R_IA64_FPTR64MSB
; break;
532 case BFD_RELOC_IA64_FPTR64LSB
: rtype
= R_IA64_FPTR64LSB
; break;
534 case BFD_RELOC_IA64_PCREL21B
: rtype
= R_IA64_PCREL21B
; break;
535 case BFD_RELOC_IA64_PCREL21BI
: rtype
= R_IA64_PCREL21BI
; break;
536 case BFD_RELOC_IA64_PCREL21M
: rtype
= R_IA64_PCREL21M
; break;
537 case BFD_RELOC_IA64_PCREL21F
: rtype
= R_IA64_PCREL21F
; break;
538 case BFD_RELOC_IA64_PCREL22
: rtype
= R_IA64_PCREL22
; break;
539 case BFD_RELOC_IA64_PCREL60B
: rtype
= R_IA64_PCREL60B
; break;
540 case BFD_RELOC_IA64_PCREL64I
: rtype
= R_IA64_PCREL64I
; break;
541 case BFD_RELOC_IA64_PCREL32MSB
: rtype
= R_IA64_PCREL32MSB
; break;
542 case BFD_RELOC_IA64_PCREL32LSB
: rtype
= R_IA64_PCREL32LSB
; break;
543 case BFD_RELOC_IA64_PCREL64MSB
: rtype
= R_IA64_PCREL64MSB
; break;
544 case BFD_RELOC_IA64_PCREL64LSB
: rtype
= R_IA64_PCREL64LSB
; break;
546 case BFD_RELOC_IA64_LTOFF_FPTR22
: rtype
= R_IA64_LTOFF_FPTR22
; break;
547 case BFD_RELOC_IA64_LTOFF_FPTR64I
: rtype
= R_IA64_LTOFF_FPTR64I
; break;
548 case BFD_RELOC_IA64_LTOFF_FPTR32MSB
: rtype
= R_IA64_LTOFF_FPTR32MSB
; break;
549 case BFD_RELOC_IA64_LTOFF_FPTR32LSB
: rtype
= R_IA64_LTOFF_FPTR32LSB
; break;
550 case BFD_RELOC_IA64_LTOFF_FPTR64MSB
: rtype
= R_IA64_LTOFF_FPTR64MSB
; break;
551 case BFD_RELOC_IA64_LTOFF_FPTR64LSB
: rtype
= R_IA64_LTOFF_FPTR64LSB
; break;
553 case BFD_RELOC_IA64_SEGREL32MSB
: rtype
= R_IA64_SEGREL32MSB
; break;
554 case BFD_RELOC_IA64_SEGREL32LSB
: rtype
= R_IA64_SEGREL32LSB
; break;
555 case BFD_RELOC_IA64_SEGREL64MSB
: rtype
= R_IA64_SEGREL64MSB
; break;
556 case BFD_RELOC_IA64_SEGREL64LSB
: rtype
= R_IA64_SEGREL64LSB
; break;
558 case BFD_RELOC_IA64_SECREL32MSB
: rtype
= R_IA64_SECREL32MSB
; break;
559 case BFD_RELOC_IA64_SECREL32LSB
: rtype
= R_IA64_SECREL32LSB
; break;
560 case BFD_RELOC_IA64_SECREL64MSB
: rtype
= R_IA64_SECREL64MSB
; break;
561 case BFD_RELOC_IA64_SECREL64LSB
: rtype
= R_IA64_SECREL64LSB
; break;
563 case BFD_RELOC_IA64_REL32MSB
: rtype
= R_IA64_REL32MSB
; break;
564 case BFD_RELOC_IA64_REL32LSB
: rtype
= R_IA64_REL32LSB
; break;
565 case BFD_RELOC_IA64_REL64MSB
: rtype
= R_IA64_REL64MSB
; break;
566 case BFD_RELOC_IA64_REL64LSB
: rtype
= R_IA64_REL64LSB
; break;
568 case BFD_RELOC_IA64_LTV32MSB
: rtype
= R_IA64_LTV32MSB
; break;
569 case BFD_RELOC_IA64_LTV32LSB
: rtype
= R_IA64_LTV32LSB
; break;
570 case BFD_RELOC_IA64_LTV64MSB
: rtype
= R_IA64_LTV64MSB
; break;
571 case BFD_RELOC_IA64_LTV64LSB
: rtype
= R_IA64_LTV64LSB
; break;
573 case BFD_RELOC_IA64_IPLTMSB
: rtype
= R_IA64_IPLTMSB
; break;
574 case BFD_RELOC_IA64_IPLTLSB
: rtype
= R_IA64_IPLTLSB
; break;
575 case BFD_RELOC_IA64_COPY
: rtype
= R_IA64_COPY
; break;
576 case BFD_RELOC_IA64_LTOFF22X
: rtype
= R_IA64_LTOFF22X
; break;
577 case BFD_RELOC_IA64_LDXMOV
: rtype
= R_IA64_LDXMOV
; break;
579 case BFD_RELOC_IA64_TPREL14
: rtype
= R_IA64_TPREL14
; break;
580 case BFD_RELOC_IA64_TPREL22
: rtype
= R_IA64_TPREL22
; break;
581 case BFD_RELOC_IA64_TPREL64I
: rtype
= R_IA64_TPREL64I
; break;
582 case BFD_RELOC_IA64_TPREL64MSB
: rtype
= R_IA64_TPREL64MSB
; break;
583 case BFD_RELOC_IA64_TPREL64LSB
: rtype
= R_IA64_TPREL64LSB
; break;
584 case BFD_RELOC_IA64_LTOFF_TPREL22
: rtype
= R_IA64_LTOFF_TPREL22
; break;
586 case BFD_RELOC_IA64_DTPMOD64MSB
: rtype
= R_IA64_DTPMOD64MSB
; break;
587 case BFD_RELOC_IA64_DTPMOD64LSB
: rtype
= R_IA64_DTPMOD64LSB
; break;
588 case BFD_RELOC_IA64_LTOFF_DTPMOD22
: rtype
= R_IA64_LTOFF_DTPMOD22
; break;
590 case BFD_RELOC_IA64_DTPREL14
: rtype
= R_IA64_DTPREL14
; break;
591 case BFD_RELOC_IA64_DTPREL22
: rtype
= R_IA64_DTPREL22
; break;
592 case BFD_RELOC_IA64_DTPREL64I
: rtype
= R_IA64_DTPREL64I
; break;
593 case BFD_RELOC_IA64_DTPREL32MSB
: rtype
= R_IA64_DTPREL32MSB
; break;
594 case BFD_RELOC_IA64_DTPREL32LSB
: rtype
= R_IA64_DTPREL32LSB
; break;
595 case BFD_RELOC_IA64_DTPREL64MSB
: rtype
= R_IA64_DTPREL64MSB
; break;
596 case BFD_RELOC_IA64_DTPREL64LSB
: rtype
= R_IA64_DTPREL64LSB
; break;
597 case BFD_RELOC_IA64_LTOFF_DTPREL22
: rtype
= R_IA64_LTOFF_DTPREL22
; break;
601 return lookup_howto (rtype
);
604 /* Given a ELF reloc, return the matching HOWTO structure. */
607 elfNN_ia64_info_to_howto (abfd
, bfd_reloc
, elf_reloc
)
608 bfd
*abfd ATTRIBUTE_UNUSED
;
610 Elf_Internal_Rela
*elf_reloc
;
613 = lookup_howto ((unsigned int) ELFNN_R_TYPE (elf_reloc
->r_info
));
616 #define PLT_HEADER_SIZE (3 * 16)
617 #define PLT_MIN_ENTRY_SIZE (1 * 16)
618 #define PLT_FULL_ENTRY_SIZE (2 * 16)
619 #define PLT_RESERVED_WORDS 3
621 static const bfd_byte plt_header
[PLT_HEADER_SIZE
] =
623 0x0b, 0x10, 0x00, 0x1c, 0x00, 0x21, /* [MMI] mov r2=r14;; */
624 0xe0, 0x00, 0x08, 0x00, 0x48, 0x00, /* addl r14=0,r2 */
625 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
626 0x0b, 0x80, 0x20, 0x1c, 0x18, 0x14, /* [MMI] ld8 r16=[r14],8;; */
627 0x10, 0x41, 0x38, 0x30, 0x28, 0x00, /* ld8 r17=[r14],8 */
628 0x00, 0x00, 0x04, 0x00, /* nop.i 0x0;; */
629 0x11, 0x08, 0x00, 0x1c, 0x18, 0x10, /* [MIB] ld8 r1=[r14] */
630 0x60, 0x88, 0x04, 0x80, 0x03, 0x00, /* mov b6=r17 */
631 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
634 static const bfd_byte plt_min_entry
[PLT_MIN_ENTRY_SIZE
] =
636 0x11, 0x78, 0x00, 0x00, 0x00, 0x24, /* [MIB] mov r15=0 */
637 0x00, 0x00, 0x00, 0x02, 0x00, 0x00, /* nop.i 0x0 */
638 0x00, 0x00, 0x00, 0x40 /* br.few 0 <PLT0>;; */
641 static const bfd_byte plt_full_entry
[PLT_FULL_ENTRY_SIZE
] =
643 0x0b, 0x78, 0x00, 0x02, 0x00, 0x24, /* [MMI] addl r15=0,r1;; */
644 0x00, 0x41, 0x3c, 0x30, 0x28, 0xc0, /* ld8 r16=[r15],8 */
645 0x01, 0x08, 0x00, 0x84, /* mov r14=r1;; */
646 0x11, 0x08, 0x00, 0x1e, 0x18, 0x10, /* [MIB] ld8 r1=[r15] */
647 0x60, 0x80, 0x04, 0x80, 0x03, 0x00, /* mov b6=r16 */
648 0x60, 0x00, 0x80, 0x00 /* br.few b6;; */
651 #define ELF_DYNAMIC_INTERPRETER "/usr/lib/ld.so.1"
653 static const bfd_byte oor_brl
[16] =
655 0x05, 0x00, 0x00, 0x00, 0x01, 0x00, /* [MLX] nop.m 0 */
656 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, /* brl.sptk.few tgt;; */
657 0x00, 0x00, 0x00, 0xc0
660 /* These functions do relaxation for IA-64 ELF. */
663 elfNN_ia64_relax_section (abfd
, sec
, link_info
, again
)
666 struct bfd_link_info
*link_info
;
671 struct one_fixup
*next
;
677 Elf_Internal_Shdr
*symtab_hdr
;
678 Elf_Internal_Rela
*internal_relocs
;
679 Elf_Internal_Rela
*irel
, *irelend
;
681 Elf_Internal_Sym
*isymbuf
= NULL
;
682 struct elfNN_ia64_link_hash_table
*ia64_info
;
683 struct one_fixup
*fixups
= NULL
;
684 bfd_boolean changed_contents
= FALSE
;
685 bfd_boolean changed_relocs
= FALSE
;
686 bfd_boolean changed_got
= FALSE
;
689 /* Assume we're not going to change any sizes, and we'll only need
693 /* Don't even try to relax for non-ELF outputs. */
694 if (link_info
->hash
->creator
->flavour
!= bfd_target_elf_flavour
)
697 /* Nothing to do if there are no relocations or there is no need for
698 the relax finalize pass. */
699 if ((sec
->flags
& SEC_RELOC
) == 0
700 || sec
->reloc_count
== 0
701 || (link_info
->relax_finalizing
702 && sec
->need_finalize_relax
== 0))
705 /* If this is the first time we have been called for this section,
706 initialize the cooked size. */
707 if (sec
->_cooked_size
== 0)
708 sec
->_cooked_size
= sec
->_raw_size
;
710 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
712 /* Load the relocations for this section. */
713 internal_relocs
= (_bfd_elf_link_read_relocs
714 (abfd
, sec
, (PTR
) NULL
, (Elf_Internal_Rela
*) NULL
,
715 link_info
->keep_memory
));
716 if (internal_relocs
== NULL
)
719 ia64_info
= elfNN_ia64_hash_table (link_info
);
720 irelend
= internal_relocs
+ sec
->reloc_count
;
722 /* Get the section contents. */
723 if (elf_section_data (sec
)->this_hdr
.contents
!= NULL
)
724 contents
= elf_section_data (sec
)->this_hdr
.contents
;
727 contents
= (bfd_byte
*) bfd_malloc (sec
->_raw_size
);
728 if (contents
== NULL
)
731 if (! bfd_get_section_contents (abfd
, sec
, contents
,
732 (file_ptr
) 0, sec
->_raw_size
))
736 for (irel
= internal_relocs
; irel
< irelend
; irel
++)
738 unsigned long r_type
= ELFNN_R_TYPE (irel
->r_info
);
739 bfd_vma symaddr
, reladdr
, trampoff
, toff
, roff
;
743 bfd_boolean is_branch
;
744 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
748 case R_IA64_PCREL21B
:
749 case R_IA64_PCREL21BI
:
750 case R_IA64_PCREL21M
:
751 case R_IA64_PCREL21F
:
752 if (link_info
->relax_finalizing
)
757 case R_IA64_LTOFF22X
:
759 if (!link_info
->relax_finalizing
)
761 sec
->need_finalize_relax
= 1;
771 /* Get the value of the symbol referred to by the reloc. */
772 if (ELFNN_R_SYM (irel
->r_info
) < symtab_hdr
->sh_info
)
774 /* A local symbol. */
775 Elf_Internal_Sym
*isym
;
777 /* Read this BFD's local symbols. */
780 isymbuf
= (Elf_Internal_Sym
*) symtab_hdr
->contents
;
782 isymbuf
= bfd_elf_get_elf_syms (abfd
, symtab_hdr
,
783 symtab_hdr
->sh_info
, 0,
789 isym
= isymbuf
+ ELFNN_R_SYM (irel
->r_info
);
790 if (isym
->st_shndx
== SHN_UNDEF
)
791 continue; /* We can't do anthing with undefined symbols. */
792 else if (isym
->st_shndx
== SHN_ABS
)
793 tsec
= bfd_abs_section_ptr
;
794 else if (isym
->st_shndx
== SHN_COMMON
)
795 tsec
= bfd_com_section_ptr
;
796 else if (isym
->st_shndx
== SHN_IA_64_ANSI_COMMON
)
797 tsec
= bfd_com_section_ptr
;
799 tsec
= bfd_section_from_elf_index (abfd
, isym
->st_shndx
);
801 toff
= isym
->st_value
;
802 dyn_i
= get_dyn_sym_info (ia64_info
, NULL
, abfd
, irel
, FALSE
);
807 struct elf_link_hash_entry
*h
;
809 indx
= ELFNN_R_SYM (irel
->r_info
) - symtab_hdr
->sh_info
;
810 h
= elf_sym_hashes (abfd
)[indx
];
811 BFD_ASSERT (h
!= NULL
);
813 while (h
->root
.type
== bfd_link_hash_indirect
814 || h
->root
.type
== bfd_link_hash_warning
)
815 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
817 dyn_i
= get_dyn_sym_info (ia64_info
, h
, abfd
, irel
, FALSE
);
819 /* For branches to dynamic symbols, we're interested instead
820 in a branch to the PLT entry. */
821 if (is_branch
&& dyn_i
&& dyn_i
->want_plt2
)
823 /* Internal branches shouldn't be sent to the PLT.
824 Leave this for now and we'll give an error later. */
825 if (r_type
!= R_IA64_PCREL21B
)
828 tsec
= ia64_info
->plt_sec
;
829 toff
= dyn_i
->plt2_offset
;
830 BFD_ASSERT (irel
->r_addend
== 0);
833 /* Can't do anything else with dynamic symbols. */
834 else if (elfNN_ia64_dynamic_symbol_p (h
, link_info
, r_type
))
839 /* We can't do anthing with undefined symbols. */
840 if (h
->root
.type
== bfd_link_hash_undefined
841 || h
->root
.type
== bfd_link_hash_undefweak
)
844 tsec
= h
->root
.u
.def
.section
;
845 toff
= h
->root
.u
.def
.value
;
849 if (tsec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
850 toff
= _bfd_merged_section_offset (abfd
, &tsec
,
851 elf_section_data (tsec
)->sec_info
,
852 toff
+ irel
->r_addend
,
855 toff
+= irel
->r_addend
;
857 symaddr
= tsec
->output_section
->vma
+ tsec
->output_offset
+ toff
;
859 roff
= irel
->r_offset
;
863 reladdr
= (sec
->output_section
->vma
865 + roff
) & (bfd_vma
) -4;
867 /* If the branch is in range, no need to do anything. */
868 if ((bfd_signed_vma
) (symaddr
- reladdr
) >= -0x1000000
869 && (bfd_signed_vma
) (symaddr
- reladdr
) <= 0x0FFFFF0)
872 /* If the branch and target are in the same section, you've
873 got one honking big section and we can't help you. You'll
874 get an error message later. */
878 /* Look for an existing fixup to this address. */
879 for (f
= fixups
; f
; f
= f
->next
)
880 if (f
->tsec
== tsec
&& f
->toff
== toff
)
885 /* Two alternatives: If it's a branch to a PLT entry, we can
886 make a copy of the FULL_PLT entry. Otherwise, we'll have
887 to use a `brl' insn to get where we're going. */
891 if (tsec
== ia64_info
->plt_sec
)
892 size
= sizeof (plt_full_entry
);
895 size
= sizeof (oor_brl
);
898 /* Resize the current section to make room for the new branch. */
899 trampoff
= (sec
->_cooked_size
+ 15) & (bfd_vma
) -16;
900 amt
= trampoff
+ size
;
901 contents
= (bfd_byte
*) bfd_realloc (contents
, amt
);
902 if (contents
== NULL
)
904 sec
->_cooked_size
= amt
;
906 if (tsec
== ia64_info
->plt_sec
)
908 memcpy (contents
+ trampoff
, plt_full_entry
, size
);
910 /* Hijack the old relocation for use as the PLTOFF reloc. */
911 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
913 irel
->r_offset
= trampoff
;
917 memcpy (contents
+ trampoff
, oor_brl
, size
);
918 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
920 irel
->r_offset
= trampoff
+ 2;
923 /* Record the fixup so we don't do it again this section. */
924 f
= (struct one_fixup
*)
925 bfd_malloc ((bfd_size_type
) sizeof (*f
));
929 f
->trampoff
= trampoff
;
934 /* Nop out the reloc, since we're finalizing things here. */
935 irel
->r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
938 /* Fix up the existing branch to hit the trampoline. Hope like
939 hell this doesn't overflow too. */
940 if (elfNN_ia64_install_value (abfd
, contents
+ roff
,
941 f
->trampoff
- (roff
& (bfd_vma
) -4),
942 r_type
) != bfd_reloc_ok
)
945 changed_contents
= TRUE
;
946 changed_relocs
= TRUE
;
953 bfd
*obfd
= sec
->output_section
->owner
;
954 gp
= _bfd_get_gp_value (obfd
);
957 if (!elfNN_ia64_choose_gp (obfd
, link_info
))
959 gp
= _bfd_get_gp_value (obfd
);
963 /* If the data is out of range, do nothing. */
964 if ((bfd_signed_vma
) (symaddr
- gp
) >= 0x200000
965 ||(bfd_signed_vma
) (symaddr
- gp
) < -0x200000)
968 if (r_type
== R_IA64_LTOFF22X
)
970 irel
->r_info
= ELFNN_R_INFO (ELFNN_R_SYM (irel
->r_info
),
972 changed_relocs
= TRUE
;
973 if (dyn_i
->want_gotx
)
975 dyn_i
->want_gotx
= 0;
976 changed_got
|= !dyn_i
->want_got
;
981 elfNN_ia64_relax_ldxmov (abfd
, contents
, roff
);
982 irel
->r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
983 changed_contents
= TRUE
;
984 changed_relocs
= TRUE
;
989 /* ??? If we created fixups, this may push the code segment large
990 enough that the data segment moves, which will change the GP.
991 Reset the GP so that we re-calculate next round. We need to
992 do this at the _beginning_ of the next round; now will not do. */
994 /* Clean up and go home. */
997 struct one_fixup
*f
= fixups
;
998 fixups
= fixups
->next
;
1003 && symtab_hdr
->contents
!= (unsigned char *) isymbuf
)
1005 if (! link_info
->keep_memory
)
1009 /* Cache the symbols for elf_link_input_bfd. */
1010 symtab_hdr
->contents
= (unsigned char *) isymbuf
;
1014 if (contents
!= NULL
1015 && elf_section_data (sec
)->this_hdr
.contents
!= contents
)
1017 if (!changed_contents
&& !link_info
->keep_memory
)
1021 /* Cache the section contents for elf_link_input_bfd. */
1022 elf_section_data (sec
)->this_hdr
.contents
= contents
;
1026 if (elf_section_data (sec
)->relocs
!= internal_relocs
)
1028 if (!changed_relocs
)
1029 free (internal_relocs
);
1031 elf_section_data (sec
)->relocs
= internal_relocs
;
1036 struct elfNN_ia64_allocate_data data
;
1037 data
.info
= link_info
;
1039 ia64_info
->self_dtpmod_offset
= (bfd_vma
) -1;
1041 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_data_got
, &data
);
1042 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_fptr_got
, &data
);
1043 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_local_got
, &data
);
1044 ia64_info
->got_sec
->_raw_size
= data
.ofs
;
1045 ia64_info
->got_sec
->_cooked_size
= data
.ofs
;
1047 /* ??? Resize .rela.got too. */
1050 if (link_info
->relax_finalizing
)
1051 sec
->need_finalize_relax
= 0;
1053 *again
= changed_contents
|| changed_relocs
;
1057 if (isymbuf
!= NULL
&& (unsigned char *) isymbuf
!= symtab_hdr
->contents
)
1059 if (contents
!= NULL
1060 && elf_section_data (sec
)->this_hdr
.contents
!= contents
)
1062 if (internal_relocs
!= NULL
1063 && elf_section_data (sec
)->relocs
!= internal_relocs
)
1064 free (internal_relocs
);
1069 elfNN_ia64_relax_ldxmov (abfd
, contents
, off
)
1075 bfd_vma dword
, insn
;
1077 switch ((int)off
& 0x3)
1079 case 0: shift
= 5; break;
1080 case 1: shift
= 14; off
+= 3; break;
1081 case 2: shift
= 23; off
+= 6; break;
1086 dword
= bfd_get_64 (abfd
, contents
+ off
);
1087 insn
= (dword
>> shift
) & 0x1ffffffffffLL
;
1089 r1
= (insn
>> 6) & 127;
1090 r3
= (insn
>> 20) & 127;
1092 insn
= 0x8000000; /* nop */
1094 insn
= (insn
& 0x7f01fff) | 0x10800000000LL
; /* (qp) mov r1 = r3 */
1096 dword
&= ~(0x1ffffffffffLL
<< shift
);
1097 dword
|= (insn
<< shift
);
1098 bfd_put_64 (abfd
, dword
, contents
+ off
);
1101 /* Return TRUE if NAME is an unwind table section name. */
1103 static inline bfd_boolean
1104 is_unwind_section_name (abfd
, name
)
1108 size_t len1
, len2
, len3
;
1110 if (elfNN_ia64_hpux_vec (abfd
->xvec
)
1111 && !strcmp (name
, ELF_STRING_ia64_unwind_hdr
))
1114 len1
= sizeof (ELF_STRING_ia64_unwind
) - 1;
1115 len2
= sizeof (ELF_STRING_ia64_unwind_info
) - 1;
1116 len3
= sizeof (ELF_STRING_ia64_unwind_once
) - 1;
1117 return ((strncmp (name
, ELF_STRING_ia64_unwind
, len1
) == 0
1118 && strncmp (name
, ELF_STRING_ia64_unwind_info
, len2
) != 0)
1119 || strncmp (name
, ELF_STRING_ia64_unwind_once
, len3
) == 0);
1122 /* Handle an IA-64 specific section when reading an object file. This
1123 is called when elfcode.h finds a section with an unknown type. */
1126 elfNN_ia64_section_from_shdr (abfd
, hdr
, name
)
1128 Elf_Internal_Shdr
*hdr
;
1133 /* There ought to be a place to keep ELF backend specific flags, but
1134 at the moment there isn't one. We just keep track of the
1135 sections by their name, instead. Fortunately, the ABI gives
1136 suggested names for all the MIPS specific sections, so we will
1137 probably get away with this. */
1138 switch (hdr
->sh_type
)
1140 case SHT_IA_64_UNWIND
:
1141 case SHT_IA_64_HP_OPT_ANOT
:
1145 if (strcmp (name
, ELF_STRING_ia64_archext
) != 0)
1153 if (! _bfd_elf_make_section_from_shdr (abfd
, hdr
, name
))
1155 newsect
= hdr
->bfd_section
;
1160 /* Convert IA-64 specific section flags to bfd internal section flags. */
1162 /* ??? There is no bfd internal flag equivalent to the SHF_IA_64_NORECOV
1166 elfNN_ia64_section_flags (flags
, hdr
)
1168 Elf_Internal_Shdr
*hdr
;
1170 if (hdr
->sh_flags
& SHF_IA_64_SHORT
)
1171 *flags
|= SEC_SMALL_DATA
;
1176 /* Set the correct type for an IA-64 ELF section. We do this by the
1177 section name, which is a hack, but ought to work. */
1180 elfNN_ia64_fake_sections (abfd
, hdr
, sec
)
1181 bfd
*abfd ATTRIBUTE_UNUSED
;
1182 Elf_Internal_Shdr
*hdr
;
1185 register const char *name
;
1187 name
= bfd_get_section_name (abfd
, sec
);
1189 if (is_unwind_section_name (abfd
, name
))
1191 /* We don't have the sections numbered at this point, so sh_info
1192 is set later, in elfNN_ia64_final_write_processing. */
1193 hdr
->sh_type
= SHT_IA_64_UNWIND
;
1194 hdr
->sh_flags
|= SHF_LINK_ORDER
;
1196 else if (strcmp (name
, ELF_STRING_ia64_archext
) == 0)
1197 hdr
->sh_type
= SHT_IA_64_EXT
;
1198 else if (strcmp (name
, ".HP.opt_annot") == 0)
1199 hdr
->sh_type
= SHT_IA_64_HP_OPT_ANOT
;
1200 else if (strcmp (name
, ".reloc") == 0)
1201 /* This is an ugly, but unfortunately necessary hack that is
1202 needed when producing EFI binaries on IA-64. It tells
1203 elf.c:elf_fake_sections() not to consider ".reloc" as a section
1204 containing ELF relocation info. We need this hack in order to
1205 be able to generate ELF binaries that can be translated into
1206 EFI applications (which are essentially COFF objects). Those
1207 files contain a COFF ".reloc" section inside an ELFNN object,
1208 which would normally cause BFD to segfault because it would
1209 attempt to interpret this section as containing relocation
1210 entries for section "oc". With this hack enabled, ".reloc"
1211 will be treated as a normal data section, which will avoid the
1212 segfault. However, you won't be able to create an ELFNN binary
1213 with a section named "oc" that needs relocations, but that's
1214 the kind of ugly side-effects you get when detecting section
1215 types based on their names... In practice, this limitation is
1216 unlikely to bite. */
1217 hdr
->sh_type
= SHT_PROGBITS
;
1219 if (sec
->flags
& SEC_SMALL_DATA
)
1220 hdr
->sh_flags
|= SHF_IA_64_SHORT
;
1225 /* The final processing done just before writing out an IA-64 ELF
1229 elfNN_ia64_final_write_processing (abfd
, linker
)
1231 bfd_boolean linker ATTRIBUTE_UNUSED
;
1233 Elf_Internal_Shdr
*hdr
;
1235 asection
*text_sect
, *s
;
1238 for (s
= abfd
->sections
; s
; s
= s
->next
)
1240 hdr
= &elf_section_data (s
)->this_hdr
;
1241 switch (hdr
->sh_type
)
1243 case SHT_IA_64_UNWIND
:
1244 /* See comments in gas/config/tc-ia64.c:dot_endp on why we
1246 sname
= bfd_get_section_name (abfd
, s
);
1247 len
= sizeof (ELF_STRING_ia64_unwind
) - 1;
1248 if (sname
&& strncmp (sname
, ELF_STRING_ia64_unwind
, len
) == 0)
1252 if (sname
[0] == '\0')
1253 /* .IA_64.unwind -> .text */
1254 text_sect
= bfd_get_section_by_name (abfd
, ".text");
1256 /* .IA_64.unwindFOO -> FOO */
1257 text_sect
= bfd_get_section_by_name (abfd
, sname
);
1260 && (len
= sizeof (ELF_STRING_ia64_unwind_once
) - 1,
1261 strncmp (sname
, ELF_STRING_ia64_unwind_once
, len
)) == 0)
1263 /* .gnu.linkonce.ia64unw.FOO -> .gnu.linkonce.t.FOO */
1264 size_t len2
= sizeof (".gnu.linkonce.t.") - 1;
1265 char *once_name
= bfd_malloc (len2
+ strlen (sname
+ len
) + 1);
1267 if (once_name
!= NULL
)
1269 memcpy (once_name
, ".gnu.linkonce.t.", len2
);
1270 strcpy (once_name
+ len2
, sname
+ len
);
1271 text_sect
= bfd_get_section_by_name (abfd
, once_name
);
1275 /* Should only happen if we run out of memory, in
1276 which case we're probably toast anyway. Try to
1277 cope by finding the section the slow way. */
1278 for (text_sect
= abfd
->sections
;
1280 text_sect
= text_sect
->next
)
1282 if (strncmp (bfd_section_name (abfd
, text_sect
),
1283 ".gnu.linkonce.t.", len2
) == 0
1284 && strcmp (bfd_section_name (abfd
, text_sect
) + len2
,
1290 /* last resort: fall back on .text */
1291 text_sect
= bfd_get_section_by_name (abfd
, ".text");
1295 /* The IA-64 processor-specific ABI requires setting
1296 sh_link to the unwind section, whereas HP-UX requires
1297 sh_info to do so. For maximum compatibility, we'll
1298 set both for now... */
1299 hdr
->sh_link
= elf_section_data (text_sect
)->this_idx
;
1300 hdr
->sh_info
= elf_section_data (text_sect
)->this_idx
;
1306 if (! elf_flags_init (abfd
))
1308 unsigned long flags
= 0;
1310 if (abfd
->xvec
->byteorder
== BFD_ENDIAN_BIG
)
1311 flags
|= EF_IA_64_BE
;
1312 if (bfd_get_mach (abfd
) == bfd_mach_ia64_elf64
)
1313 flags
|= EF_IA_64_ABI64
;
1315 elf_elfheader(abfd
)->e_flags
= flags
;
1316 elf_flags_init (abfd
) = TRUE
;
1320 /* Hook called by the linker routine which adds symbols from an object
1321 file. We use it to put .comm items in .sbss, and not .bss. */
1324 elfNN_ia64_add_symbol_hook (abfd
, info
, sym
, namep
, flagsp
, secp
, valp
)
1326 struct bfd_link_info
*info
;
1327 const Elf_Internal_Sym
*sym
;
1328 const char **namep ATTRIBUTE_UNUSED
;
1329 flagword
*flagsp ATTRIBUTE_UNUSED
;
1333 if (sym
->st_shndx
== SHN_COMMON
1334 && !info
->relocatable
1335 && sym
->st_size
<= elf_gp_size (abfd
))
1337 /* Common symbols less than or equal to -G nn bytes are
1338 automatically put into .sbss. */
1340 asection
*scomm
= bfd_get_section_by_name (abfd
, ".scommon");
1344 scomm
= bfd_make_section (abfd
, ".scommon");
1346 || !bfd_set_section_flags (abfd
, scomm
, (SEC_ALLOC
1348 | SEC_LINKER_CREATED
)))
1353 *valp
= sym
->st_size
;
1359 /* Return the number of additional phdrs we will need. */
1362 elfNN_ia64_additional_program_headers (abfd
)
1368 /* See if we need a PT_IA_64_ARCHEXT segment. */
1369 s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_archext
);
1370 if (s
&& (s
->flags
& SEC_LOAD
))
1373 /* Count how many PT_IA_64_UNWIND segments we need. */
1374 for (s
= abfd
->sections
; s
; s
= s
->next
)
1375 if (is_unwind_section_name (abfd
, s
->name
) && (s
->flags
& SEC_LOAD
))
1382 elfNN_ia64_modify_segment_map (abfd
)
1385 struct elf_segment_map
*m
, **pm
;
1386 Elf_Internal_Shdr
*hdr
;
1389 /* If we need a PT_IA_64_ARCHEXT segment, it must come before
1390 all PT_LOAD segments. */
1391 s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_archext
);
1392 if (s
&& (s
->flags
& SEC_LOAD
))
1394 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1395 if (m
->p_type
== PT_IA_64_ARCHEXT
)
1399 m
= ((struct elf_segment_map
*)
1400 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *m
));
1404 m
->p_type
= PT_IA_64_ARCHEXT
;
1408 /* We want to put it after the PHDR and INTERP segments. */
1409 pm
= &elf_tdata (abfd
)->segment_map
;
1411 && ((*pm
)->p_type
== PT_PHDR
1412 || (*pm
)->p_type
== PT_INTERP
))
1420 /* Install PT_IA_64_UNWIND segments, if needed. */
1421 for (s
= abfd
->sections
; s
; s
= s
->next
)
1423 hdr
= &elf_section_data (s
)->this_hdr
;
1424 if (hdr
->sh_type
!= SHT_IA_64_UNWIND
)
1427 if (s
&& (s
->flags
& SEC_LOAD
))
1429 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1430 if (m
->p_type
== PT_IA_64_UNWIND
)
1434 /* Look through all sections in the unwind segment
1435 for a match since there may be multiple sections
1437 for (i
= m
->count
- 1; i
>= 0; --i
)
1438 if (m
->sections
[i
] == s
)
1447 m
= ((struct elf_segment_map
*)
1448 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *m
));
1452 m
->p_type
= PT_IA_64_UNWIND
;
1457 /* We want to put it last. */
1458 pm
= &elf_tdata (abfd
)->segment_map
;
1466 /* Turn on PF_IA_64_NORECOV if needed. This involves traversing all of
1467 the input sections for each output section in the segment and testing
1468 for SHF_IA_64_NORECOV on each. */
1469 for (m
= elf_tdata (abfd
)->segment_map
; m
!= NULL
; m
= m
->next
)
1470 if (m
->p_type
== PT_LOAD
)
1473 for (i
= m
->count
- 1; i
>= 0; --i
)
1475 struct bfd_link_order
*order
= m
->sections
[i
]->link_order_head
;
1478 if (order
->type
== bfd_indirect_link_order
)
1480 asection
*is
= order
->u
.indirect
.section
;
1481 bfd_vma flags
= elf_section_data(is
)->this_hdr
.sh_flags
;
1482 if (flags
& SHF_IA_64_NORECOV
)
1484 m
->p_flags
|= PF_IA_64_NORECOV
;
1488 order
= order
->next
;
1497 /* According to the Tahoe assembler spec, all labels starting with a
1501 elfNN_ia64_is_local_label_name (abfd
, name
)
1502 bfd
*abfd ATTRIBUTE_UNUSED
;
1505 return name
[0] == '.';
1508 /* Should we do dynamic things to this symbol? */
1511 elfNN_ia64_dynamic_symbol_p (h
, info
, r_type
)
1512 struct elf_link_hash_entry
*h
;
1513 struct bfd_link_info
*info
;
1516 bfd_boolean ignore_protected
1517 = ((r_type
& 0xf8) == 0x40 /* FPTR relocs */
1518 || (r_type
& 0xf8) == 0x50); /* LTOFF_FPTR relocs */
1520 return _bfd_elf_dynamic_symbol_p (h
, info
, ignore_protected
);
1524 elfNN_ia64_local_hash_table_init (ht
, abfd
, new)
1525 struct elfNN_ia64_local_hash_table
*ht
;
1526 bfd
*abfd ATTRIBUTE_UNUSED
;
1527 new_hash_entry_func
new;
1529 memset (ht
, 0, sizeof (*ht
));
1530 return bfd_hash_table_init (&ht
->root
, new);
1533 static struct bfd_hash_entry
*
1534 elfNN_ia64_new_loc_hash_entry (entry
, table
, string
)
1535 struct bfd_hash_entry
*entry
;
1536 struct bfd_hash_table
*table
;
1539 struct elfNN_ia64_local_hash_entry
*ret
;
1540 ret
= (struct elfNN_ia64_local_hash_entry
*) entry
;
1542 /* Allocate the structure if it has not already been allocated by a
1545 ret
= bfd_hash_allocate (table
, sizeof (*ret
));
1550 /* Initialize our local data. All zeros, and definitely easier
1551 than setting a handful of bit fields. */
1552 memset (ret
, 0, sizeof (*ret
));
1554 /* Call the allocation method of the superclass. */
1555 ret
= ((struct elfNN_ia64_local_hash_entry
*)
1556 bfd_hash_newfunc ((struct bfd_hash_entry
*) ret
, table
, string
));
1558 return (struct bfd_hash_entry
*) ret
;
1561 static struct bfd_hash_entry
*
1562 elfNN_ia64_new_elf_hash_entry (entry
, table
, string
)
1563 struct bfd_hash_entry
*entry
;
1564 struct bfd_hash_table
*table
;
1567 struct elfNN_ia64_link_hash_entry
*ret
;
1568 ret
= (struct elfNN_ia64_link_hash_entry
*) entry
;
1570 /* Allocate the structure if it has not already been allocated by a
1573 ret
= bfd_hash_allocate (table
, sizeof (*ret
));
1578 /* Initialize our local data. All zeros, and definitely easier
1579 than setting a handful of bit fields. */
1580 memset (ret
, 0, sizeof (*ret
));
1582 /* Call the allocation method of the superclass. */
1583 ret
= ((struct elfNN_ia64_link_hash_entry
*)
1584 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry
*) ret
,
1587 return (struct bfd_hash_entry
*) ret
;
1591 elfNN_ia64_hash_copy_indirect (bed
, xdir
, xind
)
1592 const struct elf_backend_data
*bed ATTRIBUTE_UNUSED
;
1593 struct elf_link_hash_entry
*xdir
, *xind
;
1595 struct elfNN_ia64_link_hash_entry
*dir
, *ind
;
1597 dir
= (struct elfNN_ia64_link_hash_entry
*) xdir
;
1598 ind
= (struct elfNN_ia64_link_hash_entry
*) xind
;
1600 /* Copy down any references that we may have already seen to the
1601 symbol which just became indirect. */
1603 dir
->root
.elf_link_hash_flags
|=
1604 (ind
->root
.elf_link_hash_flags
1605 & (ELF_LINK_HASH_REF_DYNAMIC
1606 | ELF_LINK_HASH_REF_REGULAR
1607 | ELF_LINK_HASH_REF_REGULAR_NONWEAK
));
1609 if (ind
->root
.root
.type
!= bfd_link_hash_indirect
)
1612 /* Copy over the got and plt data. This would have been done
1615 if (dir
->info
== NULL
)
1617 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1619 dir
->info
= dyn_i
= ind
->info
;
1622 /* Fix up the dyn_sym_info pointers to the global symbol. */
1623 for (; dyn_i
; dyn_i
= dyn_i
->next
)
1624 dyn_i
->h
= &dir
->root
;
1626 BFD_ASSERT (ind
->info
== NULL
);
1628 /* Copy over the dynindx. */
1630 if (dir
->root
.dynindx
== -1)
1632 dir
->root
.dynindx
= ind
->root
.dynindx
;
1633 dir
->root
.dynstr_index
= ind
->root
.dynstr_index
;
1634 ind
->root
.dynindx
= -1;
1635 ind
->root
.dynstr_index
= 0;
1637 BFD_ASSERT (ind
->root
.dynindx
== -1);
1641 elfNN_ia64_hash_hide_symbol (info
, xh
, force_local
)
1642 struct bfd_link_info
*info
;
1643 struct elf_link_hash_entry
*xh
;
1644 bfd_boolean force_local
;
1646 struct elfNN_ia64_link_hash_entry
*h
;
1647 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1649 h
= (struct elfNN_ia64_link_hash_entry
*)xh
;
1651 _bfd_elf_link_hash_hide_symbol (info
, &h
->root
, force_local
);
1653 for (dyn_i
= h
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1655 dyn_i
->want_plt2
= 0;
1656 dyn_i
->want_plt
= 0;
1660 /* Create the derived linker hash table. The IA-64 ELF port uses this
1661 derived hash table to keep information specific to the IA-64 ElF
1662 linker (without using static variables). */
1664 static struct bfd_link_hash_table
*
1665 elfNN_ia64_hash_table_create (abfd
)
1668 struct elfNN_ia64_link_hash_table
*ret
;
1670 ret
= bfd_zmalloc ((bfd_size_type
) sizeof (*ret
));
1674 if (!_bfd_elf_link_hash_table_init (&ret
->root
, abfd
,
1675 elfNN_ia64_new_elf_hash_entry
))
1681 if (!elfNN_ia64_local_hash_table_init (&ret
->loc_hash_table
, abfd
,
1682 elfNN_ia64_new_loc_hash_entry
))
1688 return &ret
->root
.root
;
1691 /* Look up an entry in a Alpha ELF linker hash table. */
1693 static INLINE
struct elfNN_ia64_local_hash_entry
*
1694 elfNN_ia64_local_hash_lookup(table
, string
, create
, copy
)
1695 struct elfNN_ia64_local_hash_table
*table
;
1697 bfd_boolean create
, copy
;
1699 return ((struct elfNN_ia64_local_hash_entry
*)
1700 bfd_hash_lookup (&table
->root
, string
, create
, copy
));
1703 /* Traverse both local and global hash tables. */
1705 struct elfNN_ia64_dyn_sym_traverse_data
1707 bfd_boolean (*func
) PARAMS ((struct elfNN_ia64_dyn_sym_info
*, PTR
));
1712 elfNN_ia64_global_dyn_sym_thunk (xentry
, xdata
)
1713 struct bfd_hash_entry
*xentry
;
1716 struct elfNN_ia64_link_hash_entry
*entry
1717 = (struct elfNN_ia64_link_hash_entry
*) xentry
;
1718 struct elfNN_ia64_dyn_sym_traverse_data
*data
1719 = (struct elfNN_ia64_dyn_sym_traverse_data
*) xdata
;
1720 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1722 if (entry
->root
.root
.type
== bfd_link_hash_warning
)
1723 entry
= (struct elfNN_ia64_link_hash_entry
*) entry
->root
.root
.u
.i
.link
;
1725 for (dyn_i
= entry
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1726 if (! (*data
->func
) (dyn_i
, data
->data
))
1732 elfNN_ia64_local_dyn_sym_thunk (xentry
, xdata
)
1733 struct bfd_hash_entry
*xentry
;
1736 struct elfNN_ia64_local_hash_entry
*entry
1737 = (struct elfNN_ia64_local_hash_entry
*) xentry
;
1738 struct elfNN_ia64_dyn_sym_traverse_data
*data
1739 = (struct elfNN_ia64_dyn_sym_traverse_data
*) xdata
;
1740 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1742 for (dyn_i
= entry
->info
; dyn_i
; dyn_i
= dyn_i
->next
)
1743 if (! (*data
->func
) (dyn_i
, data
->data
))
1749 elfNN_ia64_dyn_sym_traverse (ia64_info
, func
, data
)
1750 struct elfNN_ia64_link_hash_table
*ia64_info
;
1751 bfd_boolean (*func
) PARAMS ((struct elfNN_ia64_dyn_sym_info
*, PTR
));
1754 struct elfNN_ia64_dyn_sym_traverse_data xdata
;
1759 elf_link_hash_traverse (&ia64_info
->root
,
1760 elfNN_ia64_global_dyn_sym_thunk
, &xdata
);
1761 bfd_hash_traverse (&ia64_info
->loc_hash_table
.root
,
1762 elfNN_ia64_local_dyn_sym_thunk
, &xdata
);
1766 elfNN_ia64_create_dynamic_sections (abfd
, info
)
1768 struct bfd_link_info
*info
;
1770 struct elfNN_ia64_link_hash_table
*ia64_info
;
1773 if (! _bfd_elf_create_dynamic_sections (abfd
, info
))
1776 ia64_info
= elfNN_ia64_hash_table (info
);
1778 ia64_info
->plt_sec
= bfd_get_section_by_name (abfd
, ".plt");
1779 ia64_info
->got_sec
= bfd_get_section_by_name (abfd
, ".got");
1782 flagword flags
= bfd_get_section_flags (abfd
, ia64_info
->got_sec
);
1783 bfd_set_section_flags (abfd
, ia64_info
->got_sec
, SEC_SMALL_DATA
| flags
);
1786 if (!get_pltoff (abfd
, info
, ia64_info
))
1789 s
= bfd_make_section(abfd
, ".rela.IA_64.pltoff");
1791 || !bfd_set_section_flags (abfd
, s
, (SEC_ALLOC
| SEC_LOAD
1794 | SEC_LINKER_CREATED
1796 || !bfd_set_section_alignment (abfd
, s
, 3))
1798 ia64_info
->rel_pltoff_sec
= s
;
1800 s
= bfd_make_section(abfd
, ".rela.got");
1802 || !bfd_set_section_flags (abfd
, s
, (SEC_ALLOC
| SEC_LOAD
1805 | SEC_LINKER_CREATED
1807 || !bfd_set_section_alignment (abfd
, s
, 3))
1809 ia64_info
->rel_got_sec
= s
;
1814 /* Find and/or create a hash entry for local symbol. */
1815 static struct elfNN_ia64_local_hash_entry
*
1816 get_local_sym_hash (ia64_info
, abfd
, rel
, create
)
1817 struct elfNN_ia64_link_hash_table
*ia64_info
;
1819 const Elf_Internal_Rela
*rel
;
1822 struct elfNN_ia64_local_hash_entry
*ret
;
1823 asection
*sec
= abfd
->sections
;
1824 char addr_name
[34];
1826 BFD_ASSERT ((sizeof (sec
->id
)*2 + 1 + sizeof (unsigned long)*2 + 1) <= 34);
1829 /* Construct a string for use in the elfNN_ia64_local_hash_table.
1830 name describes what was once anonymous memory. */
1832 sprintf (addr_name
, "%x:%lx",
1833 sec
->id
, (unsigned long) ELFNN_R_SYM (rel
->r_info
));
1835 /* Collect the canonical entry data for this address. */
1836 ret
= elfNN_ia64_local_hash_lookup (&ia64_info
->loc_hash_table
,
1837 addr_name
, create
, create
);
1841 /* Find and/or create a descriptor for dynamic symbol info. This will
1842 vary based on global or local symbol, and the addend to the reloc. */
1844 static struct elfNN_ia64_dyn_sym_info
*
1845 get_dyn_sym_info (ia64_info
, h
, abfd
, rel
, create
)
1846 struct elfNN_ia64_link_hash_table
*ia64_info
;
1847 struct elf_link_hash_entry
*h
;
1849 const Elf_Internal_Rela
*rel
;
1852 struct elfNN_ia64_dyn_sym_info
**pp
;
1853 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
1854 bfd_vma addend
= rel
? rel
->r_addend
: 0;
1857 pp
= &((struct elfNN_ia64_link_hash_entry
*)h
)->info
;
1860 struct elfNN_ia64_local_hash_entry
*loc_h
;
1862 loc_h
= get_local_sym_hash (ia64_info
, abfd
, rel
, create
);
1865 BFD_ASSERT (!create
);
1872 for (dyn_i
= *pp
; dyn_i
&& dyn_i
->addend
!= addend
; dyn_i
= *pp
)
1875 if (dyn_i
== NULL
&& create
)
1877 dyn_i
= ((struct elfNN_ia64_dyn_sym_info
*)
1878 bfd_zalloc (abfd
, (bfd_size_type
) sizeof *dyn_i
));
1880 dyn_i
->addend
= addend
;
1887 get_got (abfd
, info
, ia64_info
)
1889 struct bfd_link_info
*info
;
1890 struct elfNN_ia64_link_hash_table
*ia64_info
;
1895 got
= ia64_info
->got_sec
;
1900 dynobj
= ia64_info
->root
.dynobj
;
1902 ia64_info
->root
.dynobj
= dynobj
= abfd
;
1903 if (!_bfd_elf_create_got_section (dynobj
, info
))
1906 got
= bfd_get_section_by_name (dynobj
, ".got");
1908 ia64_info
->got_sec
= got
;
1910 /* The .got section is always aligned at 8 bytes. */
1911 if (!bfd_set_section_alignment (abfd
, got
, 3))
1914 flags
= bfd_get_section_flags (abfd
, got
);
1915 bfd_set_section_flags (abfd
, got
, SEC_SMALL_DATA
| flags
);
1921 /* Create function descriptor section (.opd). This section is called .opd
1922 because it contains "official prodecure descriptors". The "official"
1923 refers to the fact that these descriptors are used when taking the address
1924 of a procedure, thus ensuring a unique address for each procedure. */
1927 get_fptr (abfd
, info
, ia64_info
)
1929 struct bfd_link_info
*info
;
1930 struct elfNN_ia64_link_hash_table
*ia64_info
;
1935 fptr
= ia64_info
->fptr_sec
;
1938 dynobj
= ia64_info
->root
.dynobj
;
1940 ia64_info
->root
.dynobj
= dynobj
= abfd
;
1942 fptr
= bfd_make_section (dynobj
, ".opd");
1944 || !bfd_set_section_flags (dynobj
, fptr
,
1949 | (info
->pie
? 0 : SEC_READONLY
)
1950 | SEC_LINKER_CREATED
))
1951 || !bfd_set_section_alignment (abfd
, fptr
, 4))
1957 ia64_info
->fptr_sec
= fptr
;
1962 fptr_rel
= bfd_make_section(abfd
, ".rela.opd");
1963 if (fptr_rel
== NULL
1964 || !bfd_set_section_flags (abfd
, fptr_rel
,
1965 (SEC_ALLOC
| SEC_LOAD
1968 | SEC_LINKER_CREATED
1970 || !bfd_set_section_alignment (abfd
, fptr_rel
, 3))
1976 ia64_info
->rel_fptr_sec
= fptr_rel
;
1984 get_pltoff (abfd
, info
, ia64_info
)
1986 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
1987 struct elfNN_ia64_link_hash_table
*ia64_info
;
1992 pltoff
= ia64_info
->pltoff_sec
;
1995 dynobj
= ia64_info
->root
.dynobj
;
1997 ia64_info
->root
.dynobj
= dynobj
= abfd
;
1999 pltoff
= bfd_make_section (dynobj
, ELF_STRING_ia64_pltoff
);
2001 || !bfd_set_section_flags (dynobj
, pltoff
,
2007 | SEC_LINKER_CREATED
))
2008 || !bfd_set_section_alignment (abfd
, pltoff
, 4))
2014 ia64_info
->pltoff_sec
= pltoff
;
2021 get_reloc_section (abfd
, ia64_info
, sec
, create
)
2023 struct elfNN_ia64_link_hash_table
*ia64_info
;
2027 const char *srel_name
;
2031 srel_name
= (bfd_elf_string_from_elf_section
2032 (abfd
, elf_elfheader(abfd
)->e_shstrndx
,
2033 elf_section_data(sec
)->rel_hdr
.sh_name
));
2034 if (srel_name
== NULL
)
2037 BFD_ASSERT ((strncmp (srel_name
, ".rela", 5) == 0
2038 && strcmp (bfd_get_section_name (abfd
, sec
),
2040 || (strncmp (srel_name
, ".rel", 4) == 0
2041 && strcmp (bfd_get_section_name (abfd
, sec
),
2042 srel_name
+4) == 0));
2044 dynobj
= ia64_info
->root
.dynobj
;
2046 ia64_info
->root
.dynobj
= dynobj
= abfd
;
2048 srel
= bfd_get_section_by_name (dynobj
, srel_name
);
2049 if (srel
== NULL
&& create
)
2051 srel
= bfd_make_section (dynobj
, srel_name
);
2053 || !bfd_set_section_flags (dynobj
, srel
,
2058 | SEC_LINKER_CREATED
2060 || !bfd_set_section_alignment (dynobj
, srel
, 3))
2064 if (sec
->flags
& SEC_READONLY
)
2065 ia64_info
->reltext
= 1;
2071 count_dyn_reloc (abfd
, dyn_i
, srel
, type
)
2073 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2077 struct elfNN_ia64_dyn_reloc_entry
*rent
;
2079 for (rent
= dyn_i
->reloc_entries
; rent
; rent
= rent
->next
)
2080 if (rent
->srel
== srel
&& rent
->type
== type
)
2085 rent
= ((struct elfNN_ia64_dyn_reloc_entry
*)
2086 bfd_alloc (abfd
, (bfd_size_type
) sizeof (*rent
)));
2090 rent
->next
= dyn_i
->reloc_entries
;
2094 dyn_i
->reloc_entries
= rent
;
2102 elfNN_ia64_check_relocs (abfd
, info
, sec
, relocs
)
2104 struct bfd_link_info
*info
;
2106 const Elf_Internal_Rela
*relocs
;
2108 struct elfNN_ia64_link_hash_table
*ia64_info
;
2109 const Elf_Internal_Rela
*relend
;
2110 Elf_Internal_Shdr
*symtab_hdr
;
2111 const Elf_Internal_Rela
*rel
;
2112 asection
*got
, *fptr
, *srel
;
2114 if (info
->relocatable
)
2117 symtab_hdr
= &elf_tdata (abfd
)->symtab_hdr
;
2118 ia64_info
= elfNN_ia64_hash_table (info
);
2120 got
= fptr
= srel
= NULL
;
2122 relend
= relocs
+ sec
->reloc_count
;
2123 for (rel
= relocs
; rel
< relend
; ++rel
)
2133 NEED_LTOFF_FPTR
= 128,
2139 struct elf_link_hash_entry
*h
= NULL
;
2140 unsigned long r_symndx
= ELFNN_R_SYM (rel
->r_info
);
2141 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2143 bfd_boolean maybe_dynamic
;
2144 int dynrel_type
= R_IA64_NONE
;
2146 if (r_symndx
>= symtab_hdr
->sh_info
)
2148 /* We're dealing with a global symbol -- find its hash entry
2149 and mark it as being referenced. */
2150 long indx
= r_symndx
- symtab_hdr
->sh_info
;
2151 h
= elf_sym_hashes (abfd
)[indx
];
2152 while (h
->root
.type
== bfd_link_hash_indirect
2153 || h
->root
.type
== bfd_link_hash_warning
)
2154 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2156 h
->elf_link_hash_flags
|= ELF_LINK_HASH_REF_REGULAR
;
2159 /* We can only get preliminary data on whether a symbol is
2160 locally or externally defined, as not all of the input files
2161 have yet been processed. Do something with what we know, as
2162 this may help reduce memory usage and processing time later. */
2163 maybe_dynamic
= FALSE
;
2164 if (h
&& ((!info
->executable
2165 && (!info
->symbolic
|| info
->allow_shlib_undefined
))
2166 || ! (h
->elf_link_hash_flags
& ELF_LINK_HASH_DEF_REGULAR
)
2167 || h
->root
.type
== bfd_link_hash_defweak
))
2168 maybe_dynamic
= TRUE
;
2171 switch (ELFNN_R_TYPE (rel
->r_info
))
2173 case R_IA64_TPREL64MSB
:
2174 case R_IA64_TPREL64LSB
:
2175 if (info
->shared
|| maybe_dynamic
)
2176 need_entry
= NEED_DYNREL
;
2177 dynrel_type
= R_IA64_TPREL64LSB
;
2179 info
->flags
|= DF_STATIC_TLS
;
2182 case R_IA64_LTOFF_TPREL22
:
2183 need_entry
= NEED_TPREL
;
2185 info
->flags
|= DF_STATIC_TLS
;
2188 case R_IA64_DTPREL64MSB
:
2189 case R_IA64_DTPREL64LSB
:
2190 if (info
->shared
|| maybe_dynamic
)
2191 need_entry
= NEED_DYNREL
;
2192 dynrel_type
= R_IA64_DTPREL64LSB
;
2195 case R_IA64_LTOFF_DTPREL22
:
2196 need_entry
= NEED_DTPREL
;
2199 case R_IA64_DTPMOD64MSB
:
2200 case R_IA64_DTPMOD64LSB
:
2201 if (info
->shared
|| maybe_dynamic
)
2202 need_entry
= NEED_DYNREL
;
2203 dynrel_type
= R_IA64_DTPMOD64LSB
;
2206 case R_IA64_LTOFF_DTPMOD22
:
2207 need_entry
= NEED_DTPMOD
;
2210 case R_IA64_LTOFF_FPTR22
:
2211 case R_IA64_LTOFF_FPTR64I
:
2212 case R_IA64_LTOFF_FPTR32MSB
:
2213 case R_IA64_LTOFF_FPTR32LSB
:
2214 case R_IA64_LTOFF_FPTR64MSB
:
2215 case R_IA64_LTOFF_FPTR64LSB
:
2216 need_entry
= NEED_FPTR
| NEED_GOT
| NEED_LTOFF_FPTR
;
2219 case R_IA64_FPTR64I
:
2220 case R_IA64_FPTR32MSB
:
2221 case R_IA64_FPTR32LSB
:
2222 case R_IA64_FPTR64MSB
:
2223 case R_IA64_FPTR64LSB
:
2224 if (info
->shared
|| h
)
2225 need_entry
= NEED_FPTR
| NEED_DYNREL
;
2227 need_entry
= NEED_FPTR
;
2228 dynrel_type
= R_IA64_FPTR64LSB
;
2231 case R_IA64_LTOFF22
:
2232 case R_IA64_LTOFF64I
:
2233 need_entry
= NEED_GOT
;
2236 case R_IA64_LTOFF22X
:
2237 need_entry
= NEED_GOTX
;
2240 case R_IA64_PLTOFF22
:
2241 case R_IA64_PLTOFF64I
:
2242 case R_IA64_PLTOFF64MSB
:
2243 case R_IA64_PLTOFF64LSB
:
2244 need_entry
= NEED_PLTOFF
;
2248 need_entry
|= NEED_MIN_PLT
;
2252 (*info
->callbacks
->warning
)
2253 (info
, _("@pltoff reloc against local symbol"), 0,
2254 abfd
, 0, (bfd_vma
) 0);
2258 case R_IA64_PCREL21B
:
2259 case R_IA64_PCREL60B
:
2260 /* Depending on where this symbol is defined, we may or may not
2261 need a full plt entry. Only skip if we know we'll not need
2262 the entry -- static or symbolic, and the symbol definition
2263 has already been seen. */
2264 if (maybe_dynamic
&& rel
->r_addend
== 0)
2265 need_entry
= NEED_FULL_PLT
;
2271 case R_IA64_DIR32MSB
:
2272 case R_IA64_DIR32LSB
:
2273 case R_IA64_DIR64MSB
:
2274 case R_IA64_DIR64LSB
:
2275 /* Shared objects will always need at least a REL relocation. */
2276 if (info
->shared
|| maybe_dynamic
)
2277 need_entry
= NEED_DYNREL
;
2278 dynrel_type
= R_IA64_DIR64LSB
;
2281 case R_IA64_IPLTMSB
:
2282 case R_IA64_IPLTLSB
:
2283 /* Shared objects will always need at least a REL relocation. */
2284 if (info
->shared
|| maybe_dynamic
)
2285 need_entry
= NEED_DYNREL
;
2286 dynrel_type
= R_IA64_IPLTLSB
;
2289 case R_IA64_PCREL22
:
2290 case R_IA64_PCREL64I
:
2291 case R_IA64_PCREL32MSB
:
2292 case R_IA64_PCREL32LSB
:
2293 case R_IA64_PCREL64MSB
:
2294 case R_IA64_PCREL64LSB
:
2296 need_entry
= NEED_DYNREL
;
2297 dynrel_type
= R_IA64_PCREL64LSB
;
2304 if ((need_entry
& NEED_FPTR
) != 0
2307 (*info
->callbacks
->warning
)
2308 (info
, _("non-zero addend in @fptr reloc"), 0,
2309 abfd
, 0, (bfd_vma
) 0);
2312 dyn_i
= get_dyn_sym_info (ia64_info
, h
, abfd
, rel
, TRUE
);
2314 /* Record whether or not this is a local symbol. */
2317 /* Create what's needed. */
2318 if (need_entry
& (NEED_GOT
| NEED_GOTX
| NEED_TPREL
2319 | NEED_DTPMOD
| NEED_DTPREL
))
2323 got
= get_got (abfd
, info
, ia64_info
);
2327 if (need_entry
& NEED_GOT
)
2328 dyn_i
->want_got
= 1;
2329 if (need_entry
& NEED_GOTX
)
2330 dyn_i
->want_gotx
= 1;
2331 if (need_entry
& NEED_TPREL
)
2332 dyn_i
->want_tprel
= 1;
2333 if (need_entry
& NEED_DTPMOD
)
2334 dyn_i
->want_dtpmod
= 1;
2335 if (need_entry
& NEED_DTPREL
)
2336 dyn_i
->want_dtprel
= 1;
2338 if (need_entry
& NEED_FPTR
)
2342 fptr
= get_fptr (abfd
, info
, ia64_info
);
2347 /* FPTRs for shared libraries are allocated by the dynamic
2348 linker. Make sure this local symbol will appear in the
2349 dynamic symbol table. */
2350 if (!h
&& info
->shared
)
2352 if (! (_bfd_elfNN_link_record_local_dynamic_symbol
2353 (info
, abfd
, (long) r_symndx
)))
2357 dyn_i
->want_fptr
= 1;
2359 if (need_entry
& NEED_LTOFF_FPTR
)
2360 dyn_i
->want_ltoff_fptr
= 1;
2361 if (need_entry
& (NEED_MIN_PLT
| NEED_FULL_PLT
))
2363 if (!ia64_info
->root
.dynobj
)
2364 ia64_info
->root
.dynobj
= abfd
;
2365 h
->elf_link_hash_flags
|= ELF_LINK_HASH_NEEDS_PLT
;
2366 dyn_i
->want_plt
= 1;
2368 if (need_entry
& NEED_FULL_PLT
)
2369 dyn_i
->want_plt2
= 1;
2370 if (need_entry
& NEED_PLTOFF
)
2371 dyn_i
->want_pltoff
= 1;
2372 if ((need_entry
& NEED_DYNREL
) && (sec
->flags
& SEC_ALLOC
))
2376 srel
= get_reloc_section (abfd
, ia64_info
, sec
, TRUE
);
2380 if (!count_dyn_reloc (abfd
, dyn_i
, srel
, dynrel_type
))
2388 /* For cleanliness, and potentially faster dynamic loading, allocate
2389 external GOT entries first. */
2392 allocate_global_data_got (dyn_i
, data
)
2393 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2396 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2398 if ((dyn_i
->want_got
|| dyn_i
->want_gotx
)
2399 && ! dyn_i
->want_fptr
2400 && elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2402 dyn_i
->got_offset
= x
->ofs
;
2405 if (dyn_i
->want_tprel
)
2407 dyn_i
->tprel_offset
= x
->ofs
;
2410 if (dyn_i
->want_dtpmod
)
2412 if (elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2414 dyn_i
->dtpmod_offset
= x
->ofs
;
2419 struct elfNN_ia64_link_hash_table
*ia64_info
;
2421 ia64_info
= elfNN_ia64_hash_table (x
->info
);
2422 if (ia64_info
->self_dtpmod_offset
== (bfd_vma
) -1)
2424 ia64_info
->self_dtpmod_offset
= x
->ofs
;
2427 dyn_i
->dtpmod_offset
= ia64_info
->self_dtpmod_offset
;
2430 if (dyn_i
->want_dtprel
)
2432 dyn_i
->dtprel_offset
= x
->ofs
;
2438 /* Next, allocate all the GOT entries used by LTOFF_FPTR relocs. */
2441 allocate_global_fptr_got (dyn_i
, data
)
2442 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2445 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2449 && elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, R_IA64_FPTR64LSB
))
2451 dyn_i
->got_offset
= x
->ofs
;
2457 /* Lastly, allocate all the GOT entries for local data. */
2460 allocate_local_got (dyn_i
, data
)
2461 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2464 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2466 if ((dyn_i
->want_got
|| dyn_i
->want_gotx
)
2467 && !elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0))
2469 dyn_i
->got_offset
= x
->ofs
;
2475 /* Search for the index of a global symbol in it's defining object file. */
2478 global_sym_index (h
)
2479 struct elf_link_hash_entry
*h
;
2481 struct elf_link_hash_entry
**p
;
2484 BFD_ASSERT (h
->root
.type
== bfd_link_hash_defined
2485 || h
->root
.type
== bfd_link_hash_defweak
);
2487 obj
= h
->root
.u
.def
.section
->owner
;
2488 for (p
= elf_sym_hashes (obj
); *p
!= h
; ++p
)
2491 return p
- elf_sym_hashes (obj
) + elf_tdata (obj
)->symtab_hdr
.sh_info
;
2494 /* Allocate function descriptors. We can do these for every function
2495 in a main executable that is not exported. */
2498 allocate_fptr (dyn_i
, data
)
2499 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2502 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2504 if (dyn_i
->want_fptr
)
2506 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2509 while (h
->root
.type
== bfd_link_hash_indirect
2510 || h
->root
.type
== bfd_link_hash_warning
)
2511 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2513 if (!x
->info
->executable
2515 || ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
2516 || h
->root
.type
!= bfd_link_hash_undefweak
))
2518 if (h
&& h
->dynindx
== -1)
2520 BFD_ASSERT ((h
->root
.type
== bfd_link_hash_defined
)
2521 || (h
->root
.type
== bfd_link_hash_defweak
));
2523 if (!_bfd_elfNN_link_record_local_dynamic_symbol
2524 (x
->info
, h
->root
.u
.def
.section
->owner
,
2525 global_sym_index (h
)))
2529 dyn_i
->want_fptr
= 0;
2531 else if (h
== NULL
|| h
->dynindx
== -1)
2533 dyn_i
->fptr_offset
= x
->ofs
;
2537 dyn_i
->want_fptr
= 0;
2542 /* Allocate all the minimal PLT entries. */
2545 allocate_plt_entries (dyn_i
, data
)
2546 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2549 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2551 if (dyn_i
->want_plt
)
2553 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2556 while (h
->root
.type
== bfd_link_hash_indirect
2557 || h
->root
.type
== bfd_link_hash_warning
)
2558 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2560 /* ??? Versioned symbols seem to lose ELF_LINK_HASH_NEEDS_PLT. */
2561 if (elfNN_ia64_dynamic_symbol_p (h
, x
->info
, 0))
2563 bfd_size_type offset
= x
->ofs
;
2565 offset
= PLT_HEADER_SIZE
;
2566 dyn_i
->plt_offset
= offset
;
2567 x
->ofs
= offset
+ PLT_MIN_ENTRY_SIZE
;
2569 dyn_i
->want_pltoff
= 1;
2573 dyn_i
->want_plt
= 0;
2574 dyn_i
->want_plt2
= 0;
2580 /* Allocate all the full PLT entries. */
2583 allocate_plt2_entries (dyn_i
, data
)
2584 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2587 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2589 if (dyn_i
->want_plt2
)
2591 struct elf_link_hash_entry
*h
= dyn_i
->h
;
2592 bfd_size_type ofs
= x
->ofs
;
2594 dyn_i
->plt2_offset
= ofs
;
2595 x
->ofs
= ofs
+ PLT_FULL_ENTRY_SIZE
;
2597 while (h
->root
.type
== bfd_link_hash_indirect
2598 || h
->root
.type
== bfd_link_hash_warning
)
2599 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
2600 dyn_i
->h
->plt
.offset
= ofs
;
2605 /* Allocate all the PLTOFF entries requested by relocations and
2606 plt entries. We can't share space with allocated FPTR entries,
2607 because the latter are not necessarily addressable by the GP.
2608 ??? Relaxation might be able to determine that they are. */
2611 allocate_pltoff_entries (dyn_i
, data
)
2612 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2615 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2617 if (dyn_i
->want_pltoff
)
2619 dyn_i
->pltoff_offset
= x
->ofs
;
2625 /* Allocate dynamic relocations for those symbols that turned out
2629 allocate_dynrel_entries (dyn_i
, data
)
2630 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
2633 struct elfNN_ia64_allocate_data
*x
= (struct elfNN_ia64_allocate_data
*)data
;
2634 struct elfNN_ia64_link_hash_table
*ia64_info
;
2635 struct elfNN_ia64_dyn_reloc_entry
*rent
;
2636 bfd_boolean dynamic_symbol
, shared
, resolved_zero
;
2638 ia64_info
= elfNN_ia64_hash_table (x
->info
);
2640 /* Note that this can't be used in relation to FPTR relocs below. */
2641 dynamic_symbol
= elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, x
->info
, 0);
2643 shared
= x
->info
->shared
;
2644 resolved_zero
= (dyn_i
->h
2645 && ELF_ST_VISIBILITY (dyn_i
->h
->other
)
2646 && dyn_i
->h
->root
.type
== bfd_link_hash_undefweak
);
2648 /* Take care of the normal data relocations. */
2650 for (rent
= dyn_i
->reloc_entries
; rent
; rent
= rent
->next
)
2652 int count
= rent
->count
;
2656 case R_IA64_FPTR64LSB
:
2657 /* Allocate one iff !want_fptr and not PIE, which by this point
2658 will be true only if we're actually allocating one statically
2659 in the main executable. Position independent executables
2660 need a relative reloc. */
2661 if (dyn_i
->want_fptr
&& !x
->info
->pie
)
2664 case R_IA64_PCREL64LSB
:
2665 if (!dynamic_symbol
)
2668 case R_IA64_DIR64LSB
:
2669 if (!dynamic_symbol
&& !shared
)
2672 case R_IA64_IPLTLSB
:
2673 if (!dynamic_symbol
&& !shared
)
2675 /* Use two REL relocations for IPLT relocations
2676 against local symbols. */
2677 if (!dynamic_symbol
)
2680 case R_IA64_TPREL64LSB
:
2681 case R_IA64_DTPREL64LSB
:
2682 case R_IA64_DTPMOD64LSB
:
2687 rent
->srel
->_raw_size
+= sizeof (ElfNN_External_Rela
) * count
;
2690 /* Take care of the GOT and PLT relocations. */
2693 && (dynamic_symbol
|| shared
)
2694 && (dyn_i
->want_got
|| dyn_i
->want_gotx
))
2695 || (dyn_i
->want_ltoff_fptr
2697 && dyn_i
->h
->dynindx
!= -1))
2699 if (!dyn_i
->want_ltoff_fptr
2702 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
2703 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2705 if ((dynamic_symbol
|| shared
) && dyn_i
->want_tprel
)
2706 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2707 if (dynamic_symbol
&& dyn_i
->want_dtpmod
)
2708 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2709 if (dynamic_symbol
&& dyn_i
->want_dtprel
)
2710 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2711 if (ia64_info
->rel_fptr_sec
&& dyn_i
->want_fptr
)
2713 if (dyn_i
->h
== NULL
|| dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
2714 ia64_info
->rel_fptr_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2717 if (!resolved_zero
&& dyn_i
->want_pltoff
)
2719 bfd_size_type t
= 0;
2721 /* Dynamic symbols get one IPLT relocation. Local symbols in
2722 shared libraries get two REL relocations. Local symbols in
2723 main applications get nothing. */
2725 t
= sizeof (ElfNN_External_Rela
);
2727 t
= 2 * sizeof (ElfNN_External_Rela
);
2729 ia64_info
->rel_pltoff_sec
->_raw_size
+= t
;
2736 elfNN_ia64_adjust_dynamic_symbol (info
, h
)
2737 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
2738 struct elf_link_hash_entry
*h
;
2740 /* ??? Undefined symbols with PLT entries should be re-defined
2741 to be the PLT entry. */
2743 /* If this is a weak symbol, and there is a real definition, the
2744 processor independent code will have arranged for us to see the
2745 real definition first, and we can just use the same value. */
2746 if (h
->weakdef
!= NULL
)
2748 BFD_ASSERT (h
->weakdef
->root
.type
== bfd_link_hash_defined
2749 || h
->weakdef
->root
.type
== bfd_link_hash_defweak
);
2750 h
->root
.u
.def
.section
= h
->weakdef
->root
.u
.def
.section
;
2751 h
->root
.u
.def
.value
= h
->weakdef
->root
.u
.def
.value
;
2755 /* If this is a reference to a symbol defined by a dynamic object which
2756 is not a function, we might allocate the symbol in our .dynbss section
2757 and allocate a COPY dynamic relocation.
2759 But IA-64 code is canonically PIC, so as a rule we can avoid this sort
2766 elfNN_ia64_size_dynamic_sections (output_bfd
, info
)
2767 bfd
*output_bfd ATTRIBUTE_UNUSED
;
2768 struct bfd_link_info
*info
;
2770 struct elfNN_ia64_allocate_data data
;
2771 struct elfNN_ia64_link_hash_table
*ia64_info
;
2774 bfd_boolean relplt
= FALSE
;
2776 dynobj
= elf_hash_table(info
)->dynobj
;
2777 ia64_info
= elfNN_ia64_hash_table (info
);
2778 ia64_info
->self_dtpmod_offset
= (bfd_vma
) -1;
2779 BFD_ASSERT(dynobj
!= NULL
);
2782 /* Set the contents of the .interp section to the interpreter. */
2783 if (ia64_info
->root
.dynamic_sections_created
2784 && info
->executable
)
2786 sec
= bfd_get_section_by_name (dynobj
, ".interp");
2787 BFD_ASSERT (sec
!= NULL
);
2788 sec
->contents
= (bfd_byte
*) ELF_DYNAMIC_INTERPRETER
;
2789 sec
->_raw_size
= strlen (ELF_DYNAMIC_INTERPRETER
) + 1;
2792 /* Allocate the GOT entries. */
2794 if (ia64_info
->got_sec
)
2797 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_data_got
, &data
);
2798 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_global_fptr_got
, &data
);
2799 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_local_got
, &data
);
2800 ia64_info
->got_sec
->_raw_size
= data
.ofs
;
2803 /* Allocate the FPTR entries. */
2805 if (ia64_info
->fptr_sec
)
2808 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_fptr
, &data
);
2809 ia64_info
->fptr_sec
->_raw_size
= data
.ofs
;
2812 /* Now that we've seen all of the input files, we can decide which
2813 symbols need plt entries. Allocate the minimal PLT entries first.
2814 We do this even though dynamic_sections_created may be FALSE, because
2815 this has the side-effect of clearing want_plt and want_plt2. */
2818 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_plt_entries
, &data
);
2820 ia64_info
->minplt_entries
= 0;
2823 ia64_info
->minplt_entries
2824 = (data
.ofs
- PLT_HEADER_SIZE
) / PLT_MIN_ENTRY_SIZE
;
2827 /* Align the pointer for the plt2 entries. */
2828 data
.ofs
= (data
.ofs
+ 31) & (bfd_vma
) -32;
2830 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_plt2_entries
, &data
);
2833 BFD_ASSERT (ia64_info
->root
.dynamic_sections_created
);
2835 ia64_info
->plt_sec
->_raw_size
= data
.ofs
;
2837 /* If we've got a .plt, we need some extra memory for the dynamic
2838 linker. We stuff these in .got.plt. */
2839 sec
= bfd_get_section_by_name (dynobj
, ".got.plt");
2840 sec
->_raw_size
= 8 * PLT_RESERVED_WORDS
;
2843 /* Allocate the PLTOFF entries. */
2845 if (ia64_info
->pltoff_sec
)
2848 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_pltoff_entries
, &data
);
2849 ia64_info
->pltoff_sec
->_raw_size
= data
.ofs
;
2852 if (ia64_info
->root
.dynamic_sections_created
)
2854 /* Allocate space for the dynamic relocations that turned out to be
2857 if (info
->shared
&& ia64_info
->self_dtpmod_offset
!= (bfd_vma
) -1)
2858 ia64_info
->rel_got_sec
->_raw_size
+= sizeof (ElfNN_External_Rela
);
2859 elfNN_ia64_dyn_sym_traverse (ia64_info
, allocate_dynrel_entries
, &data
);
2862 /* We have now determined the sizes of the various dynamic sections.
2863 Allocate memory for them. */
2864 for (sec
= dynobj
->sections
; sec
!= NULL
; sec
= sec
->next
)
2868 if (!(sec
->flags
& SEC_LINKER_CREATED
))
2871 /* If we don't need this section, strip it from the output file.
2872 There were several sections primarily related to dynamic
2873 linking that must be create before the linker maps input
2874 sections to output sections. The linker does that before
2875 bfd_elf_size_dynamic_sections is called, and it is that
2876 function which decides whether anything needs to go into
2879 strip
= (sec
->_raw_size
== 0);
2881 if (sec
== ia64_info
->got_sec
)
2883 else if (sec
== ia64_info
->rel_got_sec
)
2886 ia64_info
->rel_got_sec
= NULL
;
2888 /* We use the reloc_count field as a counter if we need to
2889 copy relocs into the output file. */
2890 sec
->reloc_count
= 0;
2892 else if (sec
== ia64_info
->fptr_sec
)
2895 ia64_info
->fptr_sec
= NULL
;
2897 else if (sec
== ia64_info
->plt_sec
)
2900 ia64_info
->plt_sec
= NULL
;
2902 else if (sec
== ia64_info
->pltoff_sec
)
2905 ia64_info
->pltoff_sec
= NULL
;
2907 else if (sec
== ia64_info
->rel_pltoff_sec
)
2910 ia64_info
->rel_pltoff_sec
= NULL
;
2914 /* We use the reloc_count field as a counter if we need to
2915 copy relocs into the output file. */
2916 sec
->reloc_count
= 0;
2923 /* It's OK to base decisions on the section name, because none
2924 of the dynobj section names depend upon the input files. */
2925 name
= bfd_get_section_name (dynobj
, sec
);
2927 if (strcmp (name
, ".got.plt") == 0)
2929 else if (strncmp (name
, ".rel", 4) == 0)
2933 /* We use the reloc_count field as a counter if we need to
2934 copy relocs into the output file. */
2935 sec
->reloc_count
= 0;
2943 _bfd_strip_section_from_output (info
, sec
);
2946 /* Allocate memory for the section contents. */
2947 sec
->contents
= (bfd_byte
*) bfd_zalloc (dynobj
, sec
->_raw_size
);
2948 if (sec
->contents
== NULL
&& sec
->_raw_size
!= 0)
2953 if (elf_hash_table (info
)->dynamic_sections_created
)
2955 /* Add some entries to the .dynamic section. We fill in the values
2956 later (in finish_dynamic_sections) but we must add the entries now
2957 so that we get the correct size for the .dynamic section. */
2959 if (info
->executable
)
2961 /* The DT_DEBUG entry is filled in by the dynamic linker and used
2963 #define add_dynamic_entry(TAG, VAL) \
2964 bfd_elfNN_add_dynamic_entry (info, (bfd_vma) (TAG), (bfd_vma) (VAL))
2966 if (!add_dynamic_entry (DT_DEBUG
, 0))
2970 if (!add_dynamic_entry (DT_IA_64_PLT_RESERVE
, 0))
2972 if (!add_dynamic_entry (DT_PLTGOT
, 0))
2977 if (!add_dynamic_entry (DT_PLTRELSZ
, 0)
2978 || !add_dynamic_entry (DT_PLTREL
, DT_RELA
)
2979 || !add_dynamic_entry (DT_JMPREL
, 0))
2983 if (!add_dynamic_entry (DT_RELA
, 0)
2984 || !add_dynamic_entry (DT_RELASZ
, 0)
2985 || !add_dynamic_entry (DT_RELAENT
, sizeof (ElfNN_External_Rela
)))
2988 if (ia64_info
->reltext
)
2990 if (!add_dynamic_entry (DT_TEXTREL
, 0))
2992 info
->flags
|= DF_TEXTREL
;
2996 /* ??? Perhaps force __gp local. */
3001 static bfd_reloc_status_type
3002 elfNN_ia64_install_value (abfd
, hit_addr
, v
, r_type
)
3006 unsigned int r_type
;
3008 const struct ia64_operand
*op
;
3009 int bigendian
= 0, shift
= 0;
3010 bfd_vma t0
, t1
, insn
, dword
;
3011 enum ia64_opnd opnd
;
3014 #ifdef BFD_HOST_U_64_BIT
3015 BFD_HOST_U_64_BIT val
= (BFD_HOST_U_64_BIT
) v
;
3020 opnd
= IA64_OPND_NIL
;
3025 return bfd_reloc_ok
;
3027 /* Instruction relocations. */
3030 case R_IA64_TPREL14
:
3031 case R_IA64_DTPREL14
:
3032 opnd
= IA64_OPND_IMM14
;
3035 case R_IA64_PCREL21F
: opnd
= IA64_OPND_TGT25
; break;
3036 case R_IA64_PCREL21M
: opnd
= IA64_OPND_TGT25b
; break;
3037 case R_IA64_PCREL60B
: opnd
= IA64_OPND_TGT64
; break;
3038 case R_IA64_PCREL21B
:
3039 case R_IA64_PCREL21BI
:
3040 opnd
= IA64_OPND_TGT25c
;
3044 case R_IA64_GPREL22
:
3045 case R_IA64_LTOFF22
:
3046 case R_IA64_LTOFF22X
:
3047 case R_IA64_PLTOFF22
:
3048 case R_IA64_PCREL22
:
3049 case R_IA64_LTOFF_FPTR22
:
3050 case R_IA64_TPREL22
:
3051 case R_IA64_DTPREL22
:
3052 case R_IA64_LTOFF_TPREL22
:
3053 case R_IA64_LTOFF_DTPMOD22
:
3054 case R_IA64_LTOFF_DTPREL22
:
3055 opnd
= IA64_OPND_IMM22
;
3059 case R_IA64_GPREL64I
:
3060 case R_IA64_LTOFF64I
:
3061 case R_IA64_PLTOFF64I
:
3062 case R_IA64_PCREL64I
:
3063 case R_IA64_FPTR64I
:
3064 case R_IA64_LTOFF_FPTR64I
:
3065 case R_IA64_TPREL64I
:
3066 case R_IA64_DTPREL64I
:
3067 opnd
= IA64_OPND_IMMU64
;
3070 /* Data relocations. */
3072 case R_IA64_DIR32MSB
:
3073 case R_IA64_GPREL32MSB
:
3074 case R_IA64_FPTR32MSB
:
3075 case R_IA64_PCREL32MSB
:
3076 case R_IA64_LTOFF_FPTR32MSB
:
3077 case R_IA64_SEGREL32MSB
:
3078 case R_IA64_SECREL32MSB
:
3079 case R_IA64_LTV32MSB
:
3080 case R_IA64_DTPREL32MSB
:
3081 size
= 4; bigendian
= 1;
3084 case R_IA64_DIR32LSB
:
3085 case R_IA64_GPREL32LSB
:
3086 case R_IA64_FPTR32LSB
:
3087 case R_IA64_PCREL32LSB
:
3088 case R_IA64_LTOFF_FPTR32LSB
:
3089 case R_IA64_SEGREL32LSB
:
3090 case R_IA64_SECREL32LSB
:
3091 case R_IA64_LTV32LSB
:
3092 case R_IA64_DTPREL32LSB
:
3093 size
= 4; bigendian
= 0;
3096 case R_IA64_DIR64MSB
:
3097 case R_IA64_GPREL64MSB
:
3098 case R_IA64_PLTOFF64MSB
:
3099 case R_IA64_FPTR64MSB
:
3100 case R_IA64_PCREL64MSB
:
3101 case R_IA64_LTOFF_FPTR64MSB
:
3102 case R_IA64_SEGREL64MSB
:
3103 case R_IA64_SECREL64MSB
:
3104 case R_IA64_LTV64MSB
:
3105 case R_IA64_TPREL64MSB
:
3106 case R_IA64_DTPMOD64MSB
:
3107 case R_IA64_DTPREL64MSB
:
3108 size
= 8; bigendian
= 1;
3111 case R_IA64_DIR64LSB
:
3112 case R_IA64_GPREL64LSB
:
3113 case R_IA64_PLTOFF64LSB
:
3114 case R_IA64_FPTR64LSB
:
3115 case R_IA64_PCREL64LSB
:
3116 case R_IA64_LTOFF_FPTR64LSB
:
3117 case R_IA64_SEGREL64LSB
:
3118 case R_IA64_SECREL64LSB
:
3119 case R_IA64_LTV64LSB
:
3120 case R_IA64_TPREL64LSB
:
3121 case R_IA64_DTPMOD64LSB
:
3122 case R_IA64_DTPREL64LSB
:
3123 size
= 8; bigendian
= 0;
3126 /* Unsupported / Dynamic relocations. */
3128 return bfd_reloc_notsupported
;
3133 case IA64_OPND_IMMU64
:
3134 hit_addr
-= (long) hit_addr
& 0x3;
3135 t0
= bfd_get_64 (abfd
, hit_addr
);
3136 t1
= bfd_get_64 (abfd
, hit_addr
+ 8);
3138 /* tmpl/s: bits 0.. 5 in t0
3139 slot 0: bits 5..45 in t0
3140 slot 1: bits 46..63 in t0, bits 0..22 in t1
3141 slot 2: bits 23..63 in t1 */
3143 /* First, clear the bits that form the 64 bit constant. */
3144 t0
&= ~(0x3ffffLL
<< 46);
3146 | (( (0x07fLL
<< 13) | (0x1ffLL
<< 27)
3147 | (0x01fLL
<< 22) | (0x001LL
<< 21)
3148 | (0x001LL
<< 36)) << 23));
3150 t0
|= ((val
>> 22) & 0x03ffffLL
) << 46; /* 18 lsbs of imm41 */
3151 t1
|= ((val
>> 40) & 0x7fffffLL
) << 0; /* 23 msbs of imm41 */
3152 t1
|= ( (((val
>> 0) & 0x07f) << 13) /* imm7b */
3153 | (((val
>> 7) & 0x1ff) << 27) /* imm9d */
3154 | (((val
>> 16) & 0x01f) << 22) /* imm5c */
3155 | (((val
>> 21) & 0x001) << 21) /* ic */
3156 | (((val
>> 63) & 0x001) << 36)) << 23; /* i */
3158 bfd_put_64 (abfd
, t0
, hit_addr
);
3159 bfd_put_64 (abfd
, t1
, hit_addr
+ 8);
3162 case IA64_OPND_TGT64
:
3163 hit_addr
-= (long) hit_addr
& 0x3;
3164 t0
= bfd_get_64 (abfd
, hit_addr
);
3165 t1
= bfd_get_64 (abfd
, hit_addr
+ 8);
3167 /* tmpl/s: bits 0.. 5 in t0
3168 slot 0: bits 5..45 in t0
3169 slot 1: bits 46..63 in t0, bits 0..22 in t1
3170 slot 2: bits 23..63 in t1 */
3172 /* First, clear the bits that form the 64 bit constant. */
3173 t0
&= ~(0x3ffffLL
<< 46);
3175 | ((1LL << 36 | 0xfffffLL
<< 13) << 23));
3178 t0
|= ((val
>> 20) & 0xffffLL
) << 2 << 46; /* 16 lsbs of imm39 */
3179 t1
|= ((val
>> 36) & 0x7fffffLL
) << 0; /* 23 msbs of imm39 */
3180 t1
|= ((((val
>> 0) & 0xfffffLL
) << 13) /* imm20b */
3181 | (((val
>> 59) & 0x1LL
) << 36)) << 23; /* i */
3183 bfd_put_64 (abfd
, t0
, hit_addr
);
3184 bfd_put_64 (abfd
, t1
, hit_addr
+ 8);
3188 switch ((long) hit_addr
& 0x3)
3190 case 0: shift
= 5; break;
3191 case 1: shift
= 14; hit_addr
+= 3; break;
3192 case 2: shift
= 23; hit_addr
+= 6; break;
3193 case 3: return bfd_reloc_notsupported
; /* shouldn't happen... */
3195 dword
= bfd_get_64 (abfd
, hit_addr
);
3196 insn
= (dword
>> shift
) & 0x1ffffffffffLL
;
3198 op
= elf64_ia64_operands
+ opnd
;
3199 err
= (*op
->insert
) (op
, val
, (ia64_insn
*)& insn
);
3201 return bfd_reloc_overflow
;
3203 dword
&= ~(0x1ffffffffffLL
<< shift
);
3204 dword
|= (insn
<< shift
);
3205 bfd_put_64 (abfd
, dword
, hit_addr
);
3209 /* A data relocation. */
3212 bfd_putb32 (val
, hit_addr
);
3214 bfd_putb64 (val
, hit_addr
);
3217 bfd_putl32 (val
, hit_addr
);
3219 bfd_putl64 (val
, hit_addr
);
3223 return bfd_reloc_ok
;
3227 elfNN_ia64_install_dyn_reloc (abfd
, info
, sec
, srel
, offset
, type
,
3230 struct bfd_link_info
*info
;
3238 Elf_Internal_Rela outrel
;
3241 BFD_ASSERT (dynindx
!= -1);
3242 outrel
.r_info
= ELFNN_R_INFO (dynindx
, type
);
3243 outrel
.r_addend
= addend
;
3244 outrel
.r_offset
= _bfd_elf_section_offset (abfd
, info
, sec
, offset
);
3245 if (outrel
.r_offset
>= (bfd_vma
) -2)
3247 /* Run for the hills. We shouldn't be outputting a relocation
3248 for this. So do what everyone else does and output a no-op. */
3249 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_NONE
);
3250 outrel
.r_addend
= 0;
3251 outrel
.r_offset
= 0;
3254 outrel
.r_offset
+= sec
->output_section
->vma
+ sec
->output_offset
;
3256 loc
= srel
->contents
;
3257 loc
+= srel
->reloc_count
++ * sizeof (ElfNN_External_Rela
);
3258 bfd_elfNN_swap_reloca_out (abfd
, &outrel
, loc
);
3259 BFD_ASSERT (sizeof (ElfNN_External_Rela
) * srel
->reloc_count
3260 <= srel
->_cooked_size
);
3263 /* Store an entry for target address TARGET_ADDR in the linkage table
3264 and return the gp-relative address of the linkage table entry. */
3267 set_got_entry (abfd
, info
, dyn_i
, dynindx
, addend
, value
, dyn_r_type
)
3269 struct bfd_link_info
*info
;
3270 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3274 unsigned int dyn_r_type
;
3276 struct elfNN_ia64_link_hash_table
*ia64_info
;
3281 ia64_info
= elfNN_ia64_hash_table (info
);
3282 got_sec
= ia64_info
->got_sec
;
3286 case R_IA64_TPREL64LSB
:
3287 done
= dyn_i
->tprel_done
;
3288 dyn_i
->tprel_done
= TRUE
;
3289 got_offset
= dyn_i
->tprel_offset
;
3291 case R_IA64_DTPMOD64LSB
:
3292 if (dyn_i
->dtpmod_offset
!= ia64_info
->self_dtpmod_offset
)
3294 done
= dyn_i
->dtpmod_done
;
3295 dyn_i
->dtpmod_done
= TRUE
;
3299 done
= ia64_info
->self_dtpmod_done
;
3300 ia64_info
->self_dtpmod_done
= TRUE
;
3303 got_offset
= dyn_i
->dtpmod_offset
;
3305 case R_IA64_DTPREL64LSB
:
3306 done
= dyn_i
->dtprel_done
;
3307 dyn_i
->dtprel_done
= TRUE
;
3308 got_offset
= dyn_i
->dtprel_offset
;
3311 done
= dyn_i
->got_done
;
3312 dyn_i
->got_done
= TRUE
;
3313 got_offset
= dyn_i
->got_offset
;
3317 BFD_ASSERT ((got_offset
& 7) == 0);
3321 /* Store the target address in the linkage table entry. */
3322 bfd_put_64 (abfd
, value
, got_sec
->contents
+ got_offset
);
3324 /* Install a dynamic relocation if needed. */
3327 || ELF_ST_VISIBILITY (dyn_i
->h
->other
) == STV_DEFAULT
3328 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
)
3329 && dyn_r_type
!= R_IA64_DTPREL64LSB
)
3330 || elfNN_ia64_dynamic_symbol_p (dyn_i
->h
, info
, dyn_r_type
)
3331 || (dynindx
!= -1 && dyn_r_type
== R_IA64_FPTR64LSB
))
3332 && (!dyn_i
->want_ltoff_fptr
3335 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
))
3338 && dyn_r_type
!= R_IA64_TPREL64LSB
3339 && dyn_r_type
!= R_IA64_DTPMOD64LSB
3340 && dyn_r_type
!= R_IA64_DTPREL64LSB
)
3342 dyn_r_type
= R_IA64_REL64LSB
;
3347 if (bfd_big_endian (abfd
))
3351 case R_IA64_REL64LSB
:
3352 dyn_r_type
= R_IA64_REL64MSB
;
3354 case R_IA64_DIR64LSB
:
3355 dyn_r_type
= R_IA64_DIR64MSB
;
3357 case R_IA64_FPTR64LSB
:
3358 dyn_r_type
= R_IA64_FPTR64MSB
;
3360 case R_IA64_TPREL64LSB
:
3361 dyn_r_type
= R_IA64_TPREL64MSB
;
3363 case R_IA64_DTPMOD64LSB
:
3364 dyn_r_type
= R_IA64_DTPMOD64MSB
;
3366 case R_IA64_DTPREL64LSB
:
3367 dyn_r_type
= R_IA64_DTPREL64MSB
;
3375 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, got_sec
,
3376 ia64_info
->rel_got_sec
,
3377 got_offset
, dyn_r_type
,
3382 /* Return the address of the linkage table entry. */
3383 value
= (got_sec
->output_section
->vma
3384 + got_sec
->output_offset
3390 /* Fill in a function descriptor consisting of the function's code
3391 address and its global pointer. Return the descriptor's address. */
3394 set_fptr_entry (abfd
, info
, dyn_i
, value
)
3396 struct bfd_link_info
*info
;
3397 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3400 struct elfNN_ia64_link_hash_table
*ia64_info
;
3403 ia64_info
= elfNN_ia64_hash_table (info
);
3404 fptr_sec
= ia64_info
->fptr_sec
;
3406 if (!dyn_i
->fptr_done
)
3408 dyn_i
->fptr_done
= 1;
3410 /* Fill in the function descriptor. */
3411 bfd_put_64 (abfd
, value
, fptr_sec
->contents
+ dyn_i
->fptr_offset
);
3412 bfd_put_64 (abfd
, _bfd_get_gp_value (abfd
),
3413 fptr_sec
->contents
+ dyn_i
->fptr_offset
+ 8);
3414 if (ia64_info
->rel_fptr_sec
)
3416 Elf_Internal_Rela outrel
;
3419 if (bfd_little_endian (abfd
))
3420 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_IPLTLSB
);
3422 outrel
.r_info
= ELFNN_R_INFO (0, R_IA64_IPLTMSB
);
3423 outrel
.r_addend
= value
;
3424 outrel
.r_offset
= (fptr_sec
->output_section
->vma
3425 + fptr_sec
->output_offset
3426 + dyn_i
->fptr_offset
);
3427 loc
= ia64_info
->rel_fptr_sec
->contents
;
3428 loc
+= ia64_info
->rel_fptr_sec
->reloc_count
++
3429 * sizeof (ElfNN_External_Rela
);
3430 bfd_elfNN_swap_reloca_out (abfd
, &outrel
, loc
);
3434 /* Return the descriptor's address. */
3435 value
= (fptr_sec
->output_section
->vma
3436 + fptr_sec
->output_offset
3437 + dyn_i
->fptr_offset
);
3442 /* Fill in a PLTOFF entry consisting of the function's code address
3443 and its global pointer. Return the descriptor's address. */
3446 set_pltoff_entry (abfd
, info
, dyn_i
, value
, is_plt
)
3448 struct bfd_link_info
*info
;
3449 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3453 struct elfNN_ia64_link_hash_table
*ia64_info
;
3454 asection
*pltoff_sec
;
3456 ia64_info
= elfNN_ia64_hash_table (info
);
3457 pltoff_sec
= ia64_info
->pltoff_sec
;
3459 /* Don't do anything if this symbol uses a real PLT entry. In
3460 that case, we'll fill this in during finish_dynamic_symbol. */
3461 if ((! dyn_i
->want_plt
|| is_plt
)
3462 && !dyn_i
->pltoff_done
)
3464 bfd_vma gp
= _bfd_get_gp_value (abfd
);
3466 /* Fill in the function descriptor. */
3467 bfd_put_64 (abfd
, value
, pltoff_sec
->contents
+ dyn_i
->pltoff_offset
);
3468 bfd_put_64 (abfd
, gp
, pltoff_sec
->contents
+ dyn_i
->pltoff_offset
+ 8);
3470 /* Install dynamic relocations if needed. */
3474 || ELF_ST_VISIBILITY (dyn_i
->h
->other
) == STV_DEFAULT
3475 || dyn_i
->h
->root
.type
!= bfd_link_hash_undefweak
))
3477 unsigned int dyn_r_type
;
3479 if (bfd_big_endian (abfd
))
3480 dyn_r_type
= R_IA64_REL64MSB
;
3482 dyn_r_type
= R_IA64_REL64LSB
;
3484 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, pltoff_sec
,
3485 ia64_info
->rel_pltoff_sec
,
3486 dyn_i
->pltoff_offset
,
3487 dyn_r_type
, 0, value
);
3488 elfNN_ia64_install_dyn_reloc (abfd
, NULL
, pltoff_sec
,
3489 ia64_info
->rel_pltoff_sec
,
3490 dyn_i
->pltoff_offset
+ 8,
3494 dyn_i
->pltoff_done
= 1;
3497 /* Return the descriptor's address. */
3498 value
= (pltoff_sec
->output_section
->vma
3499 + pltoff_sec
->output_offset
3500 + dyn_i
->pltoff_offset
);
3505 /* Return the base VMA address which should be subtracted from real addresses
3506 when resolving @tprel() relocation.
3507 Main program TLS (whose template starts at PT_TLS p_vaddr)
3508 is assigned offset round(16, PT_TLS p_align). */
3511 elfNN_ia64_tprel_base (info
)
3512 struct bfd_link_info
*info
;
3514 struct elf_link_tls_segment
*tls_segment
3515 = elf_hash_table (info
)->tls_segment
;
3517 BFD_ASSERT (tls_segment
!= NULL
);
3518 return (tls_segment
->start
3519 - align_power ((bfd_vma
) 16, tls_segment
->align
));
3522 /* Return the base VMA address which should be subtracted from real addresses
3523 when resolving @dtprel() relocation.
3524 This is PT_TLS segment p_vaddr. */
3527 elfNN_ia64_dtprel_base (info
)
3528 struct bfd_link_info
*info
;
3530 BFD_ASSERT (elf_hash_table (info
)->tls_segment
!= NULL
);
3531 return elf_hash_table (info
)->tls_segment
->start
;
3534 /* Called through qsort to sort the .IA_64.unwind section during a
3535 non-relocatable link. Set elfNN_ia64_unwind_entry_compare_bfd
3536 to the output bfd so we can do proper endianness frobbing. */
3538 static bfd
*elfNN_ia64_unwind_entry_compare_bfd
;
3541 elfNN_ia64_unwind_entry_compare (a
, b
)
3547 av
= bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd
, a
);
3548 bv
= bfd_get_64 (elfNN_ia64_unwind_entry_compare_bfd
, b
);
3550 return (av
< bv
? -1 : av
> bv
? 1 : 0);
3553 /* Make sure we've got ourselves a nice fat __gp value. */
3555 elfNN_ia64_choose_gp (abfd
, info
)
3557 struct bfd_link_info
*info
;
3559 bfd_vma min_vma
= (bfd_vma
) -1, max_vma
= 0;
3560 bfd_vma min_short_vma
= min_vma
, max_short_vma
= 0;
3561 struct elf_link_hash_entry
*gp
;
3564 struct elfNN_ia64_link_hash_table
*ia64_info
;
3566 ia64_info
= elfNN_ia64_hash_table (info
);
3568 /* Find the min and max vma of all sections marked short. Also collect
3569 min and max vma of any type, for use in selecting a nice gp. */
3570 for (os
= abfd
->sections
; os
; os
= os
->next
)
3574 if ((os
->flags
& SEC_ALLOC
) == 0)
3578 hi
= os
->vma
+ os
->_raw_size
;
3586 if (os
->flags
& SEC_SMALL_DATA
)
3588 if (min_short_vma
> lo
)
3590 if (max_short_vma
< hi
)
3595 /* See if the user wants to force a value. */
3596 gp
= elf_link_hash_lookup (elf_hash_table (info
), "__gp", FALSE
,
3600 && (gp
->root
.type
== bfd_link_hash_defined
3601 || gp
->root
.type
== bfd_link_hash_defweak
))
3603 asection
*gp_sec
= gp
->root
.u
.def
.section
;
3604 gp_val
= (gp
->root
.u
.def
.value
3605 + gp_sec
->output_section
->vma
3606 + gp_sec
->output_offset
);
3610 /* Pick a sensible value. */
3612 asection
*got_sec
= ia64_info
->got_sec
;
3614 /* Start with just the address of the .got. */
3616 gp_val
= got_sec
->output_section
->vma
;
3617 else if (max_short_vma
!= 0)
3618 gp_val
= min_short_vma
;
3622 /* If it is possible to address the entire image, but we
3623 don't with the choice above, adjust. */
3624 if (max_vma
- min_vma
< 0x400000
3625 && max_vma
- gp_val
<= 0x200000
3626 && gp_val
- min_vma
> 0x200000)
3627 gp_val
= min_vma
+ 0x200000;
3628 else if (max_short_vma
!= 0)
3630 /* If we don't cover all the short data, adjust. */
3631 if (max_short_vma
- gp_val
>= 0x200000)
3632 gp_val
= min_short_vma
+ 0x200000;
3634 /* If we're addressing stuff past the end, adjust back. */
3635 if (gp_val
> max_vma
)
3636 gp_val
= max_vma
- 0x200000 + 8;
3640 /* Validate whether all SHF_IA_64_SHORT sections are within
3641 range of the chosen GP. */
3643 if (max_short_vma
!= 0)
3645 if (max_short_vma
- min_short_vma
>= 0x400000)
3647 (*_bfd_error_handler
)
3648 (_("%s: short data segment overflowed (0x%lx >= 0x400000)"),
3649 bfd_get_filename (abfd
),
3650 (unsigned long) (max_short_vma
- min_short_vma
));
3653 else if ((gp_val
> min_short_vma
3654 && gp_val
- min_short_vma
> 0x200000)
3655 || (gp_val
< max_short_vma
3656 && max_short_vma
- gp_val
>= 0x200000))
3658 (*_bfd_error_handler
)
3659 (_("%s: __gp does not cover short data segment"),
3660 bfd_get_filename (abfd
));
3665 _bfd_set_gp_value (abfd
, gp_val
);
3671 elfNN_ia64_final_link (abfd
, info
)
3673 struct bfd_link_info
*info
;
3675 struct elfNN_ia64_link_hash_table
*ia64_info
;
3676 asection
*unwind_output_sec
;
3678 ia64_info
= elfNN_ia64_hash_table (info
);
3680 /* Make sure we've got ourselves a nice fat __gp value. */
3681 if (!info
->relocatable
)
3683 bfd_vma gp_val
= _bfd_get_gp_value (abfd
);
3684 struct elf_link_hash_entry
*gp
;
3688 if (! elfNN_ia64_choose_gp (abfd
, info
))
3690 gp_val
= _bfd_get_gp_value (abfd
);
3693 gp
= elf_link_hash_lookup (elf_hash_table (info
), "__gp", FALSE
,
3697 gp
->root
.type
= bfd_link_hash_defined
;
3698 gp
->root
.u
.def
.value
= gp_val
;
3699 gp
->root
.u
.def
.section
= bfd_abs_section_ptr
;
3703 /* If we're producing a final executable, we need to sort the contents
3704 of the .IA_64.unwind section. Force this section to be relocated
3705 into memory rather than written immediately to the output file. */
3706 unwind_output_sec
= NULL
;
3707 if (!info
->relocatable
)
3709 asection
*s
= bfd_get_section_by_name (abfd
, ELF_STRING_ia64_unwind
);
3712 unwind_output_sec
= s
->output_section
;
3713 unwind_output_sec
->contents
3714 = bfd_malloc (unwind_output_sec
->_raw_size
);
3715 if (unwind_output_sec
->contents
== NULL
)
3720 /* Invoke the regular ELF backend linker to do all the work. */
3721 if (!bfd_elfNN_bfd_final_link (abfd
, info
))
3724 if (unwind_output_sec
)
3726 elfNN_ia64_unwind_entry_compare_bfd
= abfd
;
3727 qsort (unwind_output_sec
->contents
,
3728 (size_t) (unwind_output_sec
->_raw_size
/ 24),
3730 elfNN_ia64_unwind_entry_compare
);
3732 if (! bfd_set_section_contents (abfd
, unwind_output_sec
,
3733 unwind_output_sec
->contents
, (bfd_vma
) 0,
3734 unwind_output_sec
->_raw_size
))
3742 elfNN_ia64_relocate_section (output_bfd
, info
, input_bfd
, input_section
,
3743 contents
, relocs
, local_syms
, local_sections
)
3745 struct bfd_link_info
*info
;
3747 asection
*input_section
;
3749 Elf_Internal_Rela
*relocs
;
3750 Elf_Internal_Sym
*local_syms
;
3751 asection
**local_sections
;
3753 struct elfNN_ia64_link_hash_table
*ia64_info
;
3754 Elf_Internal_Shdr
*symtab_hdr
;
3755 Elf_Internal_Rela
*rel
;
3756 Elf_Internal_Rela
*relend
;
3758 bfd_boolean ret_val
= TRUE
; /* for non-fatal errors */
3761 symtab_hdr
= &elf_tdata (input_bfd
)->symtab_hdr
;
3762 ia64_info
= elfNN_ia64_hash_table (info
);
3764 /* Infect various flags from the input section to the output section. */
3765 if (info
->relocatable
)
3769 flags
= elf_section_data(input_section
)->this_hdr
.sh_flags
;
3770 flags
&= SHF_IA_64_NORECOV
;
3772 elf_section_data(input_section
->output_section
)
3773 ->this_hdr
.sh_flags
|= flags
;
3777 gp_val
= _bfd_get_gp_value (output_bfd
);
3778 srel
= get_reloc_section (input_bfd
, ia64_info
, input_section
, FALSE
);
3781 relend
= relocs
+ input_section
->reloc_count
;
3782 for (; rel
< relend
; ++rel
)
3784 struct elf_link_hash_entry
*h
;
3785 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
3786 bfd_reloc_status_type r
;
3787 reloc_howto_type
*howto
;
3788 unsigned long r_symndx
;
3789 Elf_Internal_Sym
*sym
;
3790 unsigned int r_type
;
3794 bfd_boolean dynamic_symbol_p
;
3795 bfd_boolean undef_weak_ref
;
3797 r_type
= ELFNN_R_TYPE (rel
->r_info
);
3798 if (r_type
> R_IA64_MAX_RELOC_CODE
)
3800 (*_bfd_error_handler
)
3801 (_("%s: unknown relocation type %d"),
3802 bfd_archive_filename (input_bfd
), (int)r_type
);
3803 bfd_set_error (bfd_error_bad_value
);
3808 howto
= lookup_howto (r_type
);
3809 r_symndx
= ELFNN_R_SYM (rel
->r_info
);
3813 undef_weak_ref
= FALSE
;
3815 if (r_symndx
< symtab_hdr
->sh_info
)
3817 /* Reloc against local symbol. */
3818 sym
= local_syms
+ r_symndx
;
3819 sym_sec
= local_sections
[r_symndx
];
3820 value
= _bfd_elf_rela_local_sym (output_bfd
, sym
, sym_sec
, rel
);
3821 if ((sym_sec
->flags
& SEC_MERGE
)
3822 && ELF_ST_TYPE (sym
->st_info
) == STT_SECTION
3823 && sym_sec
->sec_info_type
== ELF_INFO_TYPE_MERGE
)
3825 struct elfNN_ia64_local_hash_entry
*loc_h
;
3827 loc_h
= get_local_sym_hash (ia64_info
, input_bfd
, rel
, FALSE
);
3828 if (loc_h
&& ! loc_h
->sec_merge_done
)
3830 struct elfNN_ia64_dyn_sym_info
*dynent
;
3833 for (dynent
= loc_h
->info
; dynent
; dynent
= dynent
->next
)
3837 _bfd_merged_section_offset (output_bfd
, &msec
,
3838 elf_section_data (msec
)->
3843 dynent
->addend
-= sym
->st_value
;
3844 dynent
->addend
+= msec
->output_section
->vma
3845 + msec
->output_offset
3846 - sym_sec
->output_section
->vma
3847 - sym_sec
->output_offset
;
3849 loc_h
->sec_merge_done
= 1;
3857 /* Reloc against global symbol. */
3858 indx
= r_symndx
- symtab_hdr
->sh_info
;
3859 h
= elf_sym_hashes (input_bfd
)[indx
];
3860 while (h
->root
.type
== bfd_link_hash_indirect
3861 || h
->root
.type
== bfd_link_hash_warning
)
3862 h
= (struct elf_link_hash_entry
*) h
->root
.u
.i
.link
;
3865 if (h
->root
.type
== bfd_link_hash_defined
3866 || h
->root
.type
== bfd_link_hash_defweak
)
3868 sym_sec
= h
->root
.u
.def
.section
;
3870 /* Detect the cases that sym_sec->output_section is
3871 expected to be NULL -- all cases in which the symbol
3872 is defined in another shared module. This includes
3873 PLT relocs for which we've created a PLT entry and
3874 other relocs for which we're prepared to create
3875 dynamic relocations. */
3876 /* ??? Just accept it NULL and continue. */
3878 if (sym_sec
->output_section
!= NULL
)
3880 value
= (h
->root
.u
.def
.value
3881 + sym_sec
->output_section
->vma
3882 + sym_sec
->output_offset
);
3885 else if (h
->root
.type
== bfd_link_hash_undefweak
)
3886 undef_weak_ref
= TRUE
;
3887 else if (! info
->executable
3888 && !info
->no_undefined
3889 && ELF_ST_VISIBILITY (h
->other
) == STV_DEFAULT
)
3893 if (! ((*info
->callbacks
->undefined_symbol
)
3894 (info
, h
->root
.root
.string
, input_bfd
,
3895 input_section
, rel
->r_offset
,
3896 (!info
->shared
|| info
->no_undefined
3897 || ELF_ST_VISIBILITY (h
->other
)))))
3903 hit_addr
= contents
+ rel
->r_offset
;
3904 value
+= rel
->r_addend
;
3905 dynamic_symbol_p
= elfNN_ia64_dynamic_symbol_p (h
, info
, r_type
);
3916 case R_IA64_DIR32MSB
:
3917 case R_IA64_DIR32LSB
:
3918 case R_IA64_DIR64MSB
:
3919 case R_IA64_DIR64LSB
:
3920 /* Install a dynamic relocation for this reloc. */
3921 if ((dynamic_symbol_p
|| info
->shared
)
3923 && (input_section
->flags
& SEC_ALLOC
) != 0)
3925 unsigned int dyn_r_type
;
3929 BFD_ASSERT (srel
!= NULL
);
3931 /* If we don't need dynamic symbol lookup, find a
3932 matching RELATIVE relocation. */
3933 dyn_r_type
= r_type
;
3934 if (dynamic_symbol_p
)
3936 dynindx
= h
->dynindx
;
3937 addend
= rel
->r_addend
;
3944 case R_IA64_DIR32MSB
:
3945 dyn_r_type
= R_IA64_REL32MSB
;
3947 case R_IA64_DIR32LSB
:
3948 dyn_r_type
= R_IA64_REL32LSB
;
3950 case R_IA64_DIR64MSB
:
3951 dyn_r_type
= R_IA64_REL64MSB
;
3953 case R_IA64_DIR64LSB
:
3954 dyn_r_type
= R_IA64_REL64LSB
;
3958 /* We can't represent this without a dynamic symbol.
3959 Adjust the relocation to be against an output
3960 section symbol, which are always present in the
3961 dynamic symbol table. */
3962 /* ??? People shouldn't be doing non-pic code in
3963 shared libraries. Hork. */
3964 (*_bfd_error_handler
)
3965 (_("%s: linking non-pic code in a shared library"),
3966 bfd_archive_filename (input_bfd
));
3974 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
3975 srel
, rel
->r_offset
, dyn_r_type
,
3980 case R_IA64_LTV32MSB
:
3981 case R_IA64_LTV32LSB
:
3982 case R_IA64_LTV64MSB
:
3983 case R_IA64_LTV64LSB
:
3984 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
3987 case R_IA64_GPREL22
:
3988 case R_IA64_GPREL64I
:
3989 case R_IA64_GPREL32MSB
:
3990 case R_IA64_GPREL32LSB
:
3991 case R_IA64_GPREL64MSB
:
3992 case R_IA64_GPREL64LSB
:
3993 if (dynamic_symbol_p
)
3995 (*_bfd_error_handler
)
3996 (_("%s: @gprel relocation against dynamic symbol %s"),
3997 bfd_archive_filename (input_bfd
), h
->root
.root
.string
);
4002 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4005 case R_IA64_LTOFF22
:
4006 case R_IA64_LTOFF22X
:
4007 case R_IA64_LTOFF64I
:
4008 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4009 value
= set_got_entry (input_bfd
, info
, dyn_i
, (h
? h
->dynindx
: -1),
4010 rel
->r_addend
, value
, R_IA64_DIR64LSB
);
4012 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4015 case R_IA64_PLTOFF22
:
4016 case R_IA64_PLTOFF64I
:
4017 case R_IA64_PLTOFF64MSB
:
4018 case R_IA64_PLTOFF64LSB
:
4019 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4020 value
= set_pltoff_entry (output_bfd
, info
, dyn_i
, value
, FALSE
);
4022 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4025 case R_IA64_FPTR64I
:
4026 case R_IA64_FPTR32MSB
:
4027 case R_IA64_FPTR32LSB
:
4028 case R_IA64_FPTR64MSB
:
4029 case R_IA64_FPTR64LSB
:
4030 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4031 if (dyn_i
->want_fptr
)
4033 if (!undef_weak_ref
)
4034 value
= set_fptr_entry (output_bfd
, info
, dyn_i
, value
);
4036 if (!dyn_i
->want_fptr
|| info
->pie
)
4039 unsigned int dyn_r_type
= r_type
;
4040 bfd_vma addend
= rel
->r_addend
;
4042 /* Otherwise, we expect the dynamic linker to create
4045 if (dyn_i
->want_fptr
)
4047 if (r_type
== R_IA64_FPTR64I
)
4049 /* We can't represent this without a dynamic symbol.
4050 Adjust the relocation to be against an output
4051 section symbol, which are always present in the
4052 dynamic symbol table. */
4053 /* ??? People shouldn't be doing non-pic code in
4054 shared libraries. Hork. */
4055 (*_bfd_error_handler
)
4056 (_("%s: linking non-pic code in a position independent executable"),
4057 bfd_archive_filename (input_bfd
));
4063 dyn_r_type
= r_type
+ R_IA64_REL64LSB
- R_IA64_FPTR64LSB
;
4067 if (h
->dynindx
!= -1)
4068 dynindx
= h
->dynindx
;
4070 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4071 (info
, h
->root
.u
.def
.section
->owner
,
4072 global_sym_index (h
)));
4077 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4078 (info
, input_bfd
, (long) r_symndx
));
4082 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4083 srel
, rel
->r_offset
, dyn_r_type
,
4087 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4090 case R_IA64_LTOFF_FPTR22
:
4091 case R_IA64_LTOFF_FPTR64I
:
4092 case R_IA64_LTOFF_FPTR32MSB
:
4093 case R_IA64_LTOFF_FPTR32LSB
:
4094 case R_IA64_LTOFF_FPTR64MSB
:
4095 case R_IA64_LTOFF_FPTR64LSB
:
4099 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4100 if (dyn_i
->want_fptr
)
4102 BFD_ASSERT (h
== NULL
|| h
->dynindx
== -1)
4103 if (!undef_weak_ref
)
4104 value
= set_fptr_entry (output_bfd
, info
, dyn_i
, value
);
4109 /* Otherwise, we expect the dynamic linker to create
4113 if (h
->dynindx
!= -1)
4114 dynindx
= h
->dynindx
;
4116 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4117 (info
, h
->root
.u
.def
.section
->owner
,
4118 global_sym_index (h
)));
4121 dynindx
= (_bfd_elf_link_lookup_local_dynindx
4122 (info
, input_bfd
, (long) r_symndx
));
4126 value
= set_got_entry (output_bfd
, info
, dyn_i
, dynindx
,
4127 rel
->r_addend
, value
, R_IA64_FPTR64LSB
);
4129 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4133 case R_IA64_PCREL32MSB
:
4134 case R_IA64_PCREL32LSB
:
4135 case R_IA64_PCREL64MSB
:
4136 case R_IA64_PCREL64LSB
:
4137 /* Install a dynamic relocation for this reloc. */
4138 if (dynamic_symbol_p
&& r_symndx
!= 0)
4140 BFD_ASSERT (srel
!= NULL
);
4142 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4143 srel
, rel
->r_offset
, r_type
,
4144 h
->dynindx
, rel
->r_addend
);
4148 case R_IA64_PCREL21B
:
4149 case R_IA64_PCREL60B
:
4150 /* We should have created a PLT entry for any dynamic symbol. */
4153 dyn_i
= get_dyn_sym_info (ia64_info
, h
, NULL
, NULL
, FALSE
);
4155 if (dyn_i
&& dyn_i
->want_plt2
)
4157 /* Should have caught this earlier. */
4158 BFD_ASSERT (rel
->r_addend
== 0);
4160 value
= (ia64_info
->plt_sec
->output_section
->vma
4161 + ia64_info
->plt_sec
->output_offset
4162 + dyn_i
->plt2_offset
);
4166 /* Since there's no PLT entry, Validate that this is
4168 BFD_ASSERT (undef_weak_ref
|| sym_sec
->output_section
!= NULL
);
4170 /* If the symbol is undef_weak, we shouldn't be trying
4171 to call it. There's every chance that we'd wind up
4172 with an out-of-range fixup here. Don't bother setting
4173 any value at all. */
4179 case R_IA64_PCREL21BI
:
4180 case R_IA64_PCREL21F
:
4181 case R_IA64_PCREL21M
:
4182 case R_IA64_PCREL22
:
4183 case R_IA64_PCREL64I
:
4184 /* The PCREL21BI reloc is specifically not intended for use with
4185 dynamic relocs. PCREL21F and PCREL21M are used for speculation
4186 fixup code, and thus probably ought not be dynamic. The
4187 PCREL22 and PCREL64I relocs aren't emitted as dynamic relocs. */
4188 if (dynamic_symbol_p
)
4192 if (r_type
== R_IA64_PCREL21BI
)
4193 msg
= _("%s: @internal branch to dynamic symbol %s");
4194 else if (r_type
== R_IA64_PCREL21F
|| r_type
== R_IA64_PCREL21M
)
4195 msg
= _("%s: speculation fixup to dynamic symbol %s");
4197 msg
= _("%s: @pcrel relocation against dynamic symbol %s");
4198 (*_bfd_error_handler
) (msg
, bfd_archive_filename (input_bfd
),
4199 h
->root
.root
.string
);
4206 /* Make pc-relative. */
4207 value
-= (input_section
->output_section
->vma
4208 + input_section
->output_offset
4209 + rel
->r_offset
) & ~ (bfd_vma
) 0x3;
4210 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4213 case R_IA64_SEGREL32MSB
:
4214 case R_IA64_SEGREL32LSB
:
4215 case R_IA64_SEGREL64MSB
:
4216 case R_IA64_SEGREL64LSB
:
4219 /* If the input section was discarded from the output, then
4225 struct elf_segment_map
*m
;
4226 Elf_Internal_Phdr
*p
;
4228 /* Find the segment that contains the output_section. */
4229 for (m
= elf_tdata (output_bfd
)->segment_map
,
4230 p
= elf_tdata (output_bfd
)->phdr
;
4235 for (i
= m
->count
- 1; i
>= 0; i
--)
4236 if (m
->sections
[i
] == input_section
->output_section
)
4244 r
= bfd_reloc_notsupported
;
4248 /* The VMA of the segment is the vaddr of the associated
4250 if (value
> p
->p_vaddr
)
4251 value
-= p
->p_vaddr
;
4254 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
,
4260 case R_IA64_SECREL32MSB
:
4261 case R_IA64_SECREL32LSB
:
4262 case R_IA64_SECREL64MSB
:
4263 case R_IA64_SECREL64LSB
:
4264 /* Make output-section relative. */
4265 if (value
> input_section
->output_section
->vma
)
4266 value
-= input_section
->output_section
->vma
;
4269 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4272 case R_IA64_IPLTMSB
:
4273 case R_IA64_IPLTLSB
:
4274 /* Install a dynamic relocation for this reloc. */
4275 if ((dynamic_symbol_p
|| info
->shared
)
4276 && (input_section
->flags
& SEC_ALLOC
) != 0)
4278 BFD_ASSERT (srel
!= NULL
);
4280 /* If we don't need dynamic symbol lookup, install two
4281 RELATIVE relocations. */
4282 if (!dynamic_symbol_p
)
4284 unsigned int dyn_r_type
;
4286 if (r_type
== R_IA64_IPLTMSB
)
4287 dyn_r_type
= R_IA64_REL64MSB
;
4289 dyn_r_type
= R_IA64_REL64LSB
;
4291 elfNN_ia64_install_dyn_reloc (output_bfd
, info
,
4293 srel
, rel
->r_offset
,
4294 dyn_r_type
, 0, value
);
4295 elfNN_ia64_install_dyn_reloc (output_bfd
, info
,
4297 srel
, rel
->r_offset
+ 8,
4298 dyn_r_type
, 0, gp_val
);
4301 elfNN_ia64_install_dyn_reloc (output_bfd
, info
, input_section
,
4302 srel
, rel
->r_offset
, r_type
,
4303 h
->dynindx
, rel
->r_addend
);
4306 if (r_type
== R_IA64_IPLTMSB
)
4307 r_type
= R_IA64_DIR64MSB
;
4309 r_type
= R_IA64_DIR64LSB
;
4310 elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4311 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
+ 8, gp_val
,
4315 case R_IA64_TPREL14
:
4316 case R_IA64_TPREL22
:
4317 case R_IA64_TPREL64I
:
4318 value
-= elfNN_ia64_tprel_base (info
);
4319 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4322 case R_IA64_DTPREL14
:
4323 case R_IA64_DTPREL22
:
4324 case R_IA64_DTPREL64I
:
4325 case R_IA64_DTPREL64LSB
:
4326 case R_IA64_DTPREL64MSB
:
4327 value
-= elfNN_ia64_dtprel_base (info
);
4328 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
, r_type
);
4331 case R_IA64_LTOFF_TPREL22
:
4332 case R_IA64_LTOFF_DTPMOD22
:
4333 case R_IA64_LTOFF_DTPREL22
:
4336 long dynindx
= h
? h
->dynindx
: -1;
4337 bfd_vma r_addend
= rel
->r_addend
;
4342 case R_IA64_LTOFF_TPREL22
:
4343 if (!dynamic_symbol_p
)
4346 value
-= elfNN_ia64_tprel_base (info
);
4349 r_addend
+= value
- elfNN_ia64_dtprel_base (info
);
4353 got_r_type
= R_IA64_TPREL64LSB
;
4355 case R_IA64_LTOFF_DTPMOD22
:
4356 if (!dynamic_symbol_p
&& !info
->shared
)
4358 got_r_type
= R_IA64_DTPMOD64LSB
;
4360 case R_IA64_LTOFF_DTPREL22
:
4361 if (!dynamic_symbol_p
)
4362 value
-= elfNN_ia64_dtprel_base (info
);
4363 got_r_type
= R_IA64_DTPREL64LSB
;
4366 dyn_i
= get_dyn_sym_info (ia64_info
, h
, input_bfd
, rel
, FALSE
);
4367 value
= set_got_entry (input_bfd
, info
, dyn_i
, dynindx
, r_addend
,
4370 r
= elfNN_ia64_install_value (output_bfd
, hit_addr
, value
,
4376 r
= bfd_reloc_notsupported
;
4385 case bfd_reloc_undefined
:
4386 /* This can happen for global table relative relocs if
4387 __gp is undefined. This is a panic situation so we
4388 don't try to continue. */
4389 (*info
->callbacks
->undefined_symbol
)
4390 (info
, "__gp", input_bfd
, input_section
, rel
->r_offset
, 1);
4393 case bfd_reloc_notsupported
:
4398 name
= h
->root
.root
.string
;
4401 name
= bfd_elf_string_from_elf_section (input_bfd
,
4402 symtab_hdr
->sh_link
,
4407 name
= bfd_section_name (input_bfd
, input_section
);
4409 if (!(*info
->callbacks
->warning
) (info
, _("unsupported reloc"),
4411 input_section
, rel
->r_offset
))
4417 case bfd_reloc_dangerous
:
4418 case bfd_reloc_outofrange
:
4419 case bfd_reloc_overflow
:
4425 name
= h
->root
.root
.string
;
4428 name
= bfd_elf_string_from_elf_section (input_bfd
,
4429 symtab_hdr
->sh_link
,
4434 name
= bfd_section_name (input_bfd
, input_section
);
4436 if (!(*info
->callbacks
->reloc_overflow
) (info
, name
,
4453 elfNN_ia64_finish_dynamic_symbol (output_bfd
, info
, h
, sym
)
4455 struct bfd_link_info
*info
;
4456 struct elf_link_hash_entry
*h
;
4457 Elf_Internal_Sym
*sym
;
4459 struct elfNN_ia64_link_hash_table
*ia64_info
;
4460 struct elfNN_ia64_dyn_sym_info
*dyn_i
;
4462 ia64_info
= elfNN_ia64_hash_table (info
);
4463 dyn_i
= get_dyn_sym_info (ia64_info
, h
, NULL
, NULL
, FALSE
);
4465 /* Fill in the PLT data, if required. */
4466 if (dyn_i
&& dyn_i
->want_plt
)
4468 Elf_Internal_Rela outrel
;
4471 bfd_vma plt_addr
, pltoff_addr
, gp_val
, index
;
4473 gp_val
= _bfd_get_gp_value (output_bfd
);
4475 /* Initialize the minimal PLT entry. */
4477 index
= (dyn_i
->plt_offset
- PLT_HEADER_SIZE
) / PLT_MIN_ENTRY_SIZE
;
4478 plt_sec
= ia64_info
->plt_sec
;
4479 loc
= plt_sec
->contents
+ dyn_i
->plt_offset
;
4481 memcpy (loc
, plt_min_entry
, PLT_MIN_ENTRY_SIZE
);
4482 elfNN_ia64_install_value (output_bfd
, loc
, index
, R_IA64_IMM22
);
4483 elfNN_ia64_install_value (output_bfd
, loc
+2, -dyn_i
->plt_offset
,
4486 plt_addr
= (plt_sec
->output_section
->vma
4487 + plt_sec
->output_offset
4488 + dyn_i
->plt_offset
);
4489 pltoff_addr
= set_pltoff_entry (output_bfd
, info
, dyn_i
, plt_addr
, TRUE
);
4491 /* Initialize the FULL PLT entry, if needed. */
4492 if (dyn_i
->want_plt2
)
4494 loc
= plt_sec
->contents
+ dyn_i
->plt2_offset
;
4496 memcpy (loc
, plt_full_entry
, PLT_FULL_ENTRY_SIZE
);
4497 elfNN_ia64_install_value (output_bfd
, loc
, pltoff_addr
- gp_val
,
4500 /* Mark the symbol as undefined, rather than as defined in the
4501 plt section. Leave the value alone. */
4502 /* ??? We didn't redefine it in adjust_dynamic_symbol in the
4503 first place. But perhaps elflink.h did some for us. */
4504 if ((h
->elf_link_hash_flags
& ELF_LINK_HASH_DEF_REGULAR
) == 0)
4505 sym
->st_shndx
= SHN_UNDEF
;
4508 /* Create the dynamic relocation. */
4509 outrel
.r_offset
= pltoff_addr
;
4510 if (bfd_little_endian (output_bfd
))
4511 outrel
.r_info
= ELFNN_R_INFO (h
->dynindx
, R_IA64_IPLTLSB
);
4513 outrel
.r_info
= ELFNN_R_INFO (h
->dynindx
, R_IA64_IPLTMSB
);
4514 outrel
.r_addend
= 0;
4516 /* This is fun. In the .IA_64.pltoff section, we've got entries
4517 that correspond both to real PLT entries, and those that
4518 happened to resolve to local symbols but need to be created
4519 to satisfy @pltoff relocations. The .rela.IA_64.pltoff
4520 relocations for the real PLT should come at the end of the
4521 section, so that they can be indexed by plt entry at runtime.
4523 We emitted all of the relocations for the non-PLT @pltoff
4524 entries during relocate_section. So we can consider the
4525 existing sec->reloc_count to be the base of the array of
4528 loc
= ia64_info
->rel_pltoff_sec
->contents
;
4529 loc
+= ((ia64_info
->rel_pltoff_sec
->reloc_count
+ index
)
4530 * sizeof (ElfNN_External_Rela
));
4531 bfd_elfNN_swap_reloca_out (output_bfd
, &outrel
, loc
);
4534 /* Mark some specially defined symbols as absolute. */
4535 if (strcmp (h
->root
.root
.string
, "_DYNAMIC") == 0
4536 || strcmp (h
->root
.root
.string
, "_GLOBAL_OFFSET_TABLE_") == 0
4537 || strcmp (h
->root
.root
.string
, "_PROCEDURE_LINKAGE_TABLE_") == 0)
4538 sym
->st_shndx
= SHN_ABS
;
4544 elfNN_ia64_finish_dynamic_sections (abfd
, info
)
4546 struct bfd_link_info
*info
;
4548 struct elfNN_ia64_link_hash_table
*ia64_info
;
4551 ia64_info
= elfNN_ia64_hash_table (info
);
4552 dynobj
= ia64_info
->root
.dynobj
;
4554 if (elf_hash_table (info
)->dynamic_sections_created
)
4556 ElfNN_External_Dyn
*dyncon
, *dynconend
;
4557 asection
*sdyn
, *sgotplt
;
4560 sdyn
= bfd_get_section_by_name (dynobj
, ".dynamic");
4561 sgotplt
= bfd_get_section_by_name (dynobj
, ".got.plt");
4562 BFD_ASSERT (sdyn
!= NULL
);
4563 dyncon
= (ElfNN_External_Dyn
*) sdyn
->contents
;
4564 dynconend
= (ElfNN_External_Dyn
*) (sdyn
->contents
+ sdyn
->_raw_size
);
4566 gp_val
= _bfd_get_gp_value (abfd
);
4568 for (; dyncon
< dynconend
; dyncon
++)
4570 Elf_Internal_Dyn dyn
;
4572 bfd_elfNN_swap_dyn_in (dynobj
, dyncon
, &dyn
);
4577 dyn
.d_un
.d_ptr
= gp_val
;
4581 dyn
.d_un
.d_val
= (ia64_info
->minplt_entries
4582 * sizeof (ElfNN_External_Rela
));
4586 /* See the comment above in finish_dynamic_symbol. */
4587 dyn
.d_un
.d_ptr
= (ia64_info
->rel_pltoff_sec
->output_section
->vma
4588 + ia64_info
->rel_pltoff_sec
->output_offset
4589 + (ia64_info
->rel_pltoff_sec
->reloc_count
4590 * sizeof (ElfNN_External_Rela
)));
4593 case DT_IA_64_PLT_RESERVE
:
4594 dyn
.d_un
.d_ptr
= (sgotplt
->output_section
->vma
4595 + sgotplt
->output_offset
);
4599 /* Do not have RELASZ include JMPREL. This makes things
4600 easier on ld.so. This is not what the rest of BFD set up. */
4601 dyn
.d_un
.d_val
-= (ia64_info
->minplt_entries
4602 * sizeof (ElfNN_External_Rela
));
4606 bfd_elfNN_swap_dyn_out (abfd
, &dyn
, dyncon
);
4609 /* Initialize the PLT0 entry. */
4610 if (ia64_info
->plt_sec
)
4612 bfd_byte
*loc
= ia64_info
->plt_sec
->contents
;
4615 memcpy (loc
, plt_header
, PLT_HEADER_SIZE
);
4617 pltres
= (sgotplt
->output_section
->vma
4618 + sgotplt
->output_offset
4621 elfNN_ia64_install_value (abfd
, loc
+1, pltres
, R_IA64_GPREL22
);
4628 /* ELF file flag handling: */
4630 /* Function to keep IA-64 specific file flags. */
4632 elfNN_ia64_set_private_flags (abfd
, flags
)
4636 BFD_ASSERT (!elf_flags_init (abfd
)
4637 || elf_elfheader (abfd
)->e_flags
== flags
);
4639 elf_elfheader (abfd
)->e_flags
= flags
;
4640 elf_flags_init (abfd
) = TRUE
;
4644 /* Merge backend specific data from an object file to the output
4645 object file when linking. */
4647 elfNN_ia64_merge_private_bfd_data (ibfd
, obfd
)
4652 bfd_boolean ok
= TRUE
;
4654 /* Don't even pretend to support mixed-format linking. */
4655 if (bfd_get_flavour (ibfd
) != bfd_target_elf_flavour
4656 || bfd_get_flavour (obfd
) != bfd_target_elf_flavour
)
4659 in_flags
= elf_elfheader (ibfd
)->e_flags
;
4660 out_flags
= elf_elfheader (obfd
)->e_flags
;
4662 if (! elf_flags_init (obfd
))
4664 elf_flags_init (obfd
) = TRUE
;
4665 elf_elfheader (obfd
)->e_flags
= in_flags
;
4667 if (bfd_get_arch (obfd
) == bfd_get_arch (ibfd
)
4668 && bfd_get_arch_info (obfd
)->the_default
)
4670 return bfd_set_arch_mach (obfd
, bfd_get_arch (ibfd
),
4671 bfd_get_mach (ibfd
));
4677 /* Check flag compatibility. */
4678 if (in_flags
== out_flags
)
4681 /* Output has EF_IA_64_REDUCEDFP set only if all inputs have it set. */
4682 if (!(in_flags
& EF_IA_64_REDUCEDFP
) && (out_flags
& EF_IA_64_REDUCEDFP
))
4683 elf_elfheader (obfd
)->e_flags
&= ~EF_IA_64_REDUCEDFP
;
4685 if ((in_flags
& EF_IA_64_TRAPNIL
) != (out_flags
& EF_IA_64_TRAPNIL
))
4687 (*_bfd_error_handler
)
4688 (_("%s: linking trap-on-NULL-dereference with non-trapping files"),
4689 bfd_archive_filename (ibfd
));
4691 bfd_set_error (bfd_error_bad_value
);
4694 if ((in_flags
& EF_IA_64_BE
) != (out_flags
& EF_IA_64_BE
))
4696 (*_bfd_error_handler
)
4697 (_("%s: linking big-endian files with little-endian files"),
4698 bfd_archive_filename (ibfd
));
4700 bfd_set_error (bfd_error_bad_value
);
4703 if ((in_flags
& EF_IA_64_ABI64
) != (out_flags
& EF_IA_64_ABI64
))
4705 (*_bfd_error_handler
)
4706 (_("%s: linking 64-bit files with 32-bit files"),
4707 bfd_archive_filename (ibfd
));
4709 bfd_set_error (bfd_error_bad_value
);
4712 if ((in_flags
& EF_IA_64_CONS_GP
) != (out_flags
& EF_IA_64_CONS_GP
))
4714 (*_bfd_error_handler
)
4715 (_("%s: linking constant-gp files with non-constant-gp files"),
4716 bfd_archive_filename (ibfd
));
4718 bfd_set_error (bfd_error_bad_value
);
4721 if ((in_flags
& EF_IA_64_NOFUNCDESC_CONS_GP
)
4722 != (out_flags
& EF_IA_64_NOFUNCDESC_CONS_GP
))
4724 (*_bfd_error_handler
)
4725 (_("%s: linking auto-pic files with non-auto-pic files"),
4726 bfd_archive_filename (ibfd
));
4728 bfd_set_error (bfd_error_bad_value
);
4736 elfNN_ia64_print_private_bfd_data (abfd
, ptr
)
4740 FILE *file
= (FILE *) ptr
;
4741 flagword flags
= elf_elfheader (abfd
)->e_flags
;
4743 BFD_ASSERT (abfd
!= NULL
&& ptr
!= NULL
);
4745 fprintf (file
, "private flags = %s%s%s%s%s%s%s%s\n",
4746 (flags
& EF_IA_64_TRAPNIL
) ? "TRAPNIL, " : "",
4747 (flags
& EF_IA_64_EXT
) ? "EXT, " : "",
4748 (flags
& EF_IA_64_BE
) ? "BE, " : "LE, ",
4749 (flags
& EF_IA_64_REDUCEDFP
) ? "REDUCEDFP, " : "",
4750 (flags
& EF_IA_64_CONS_GP
) ? "CONS_GP, " : "",
4751 (flags
& EF_IA_64_NOFUNCDESC_CONS_GP
) ? "NOFUNCDESC_CONS_GP, " : "",
4752 (flags
& EF_IA_64_ABSOLUTE
) ? "ABSOLUTE, " : "",
4753 (flags
& EF_IA_64_ABI64
) ? "ABI64" : "ABI32");
4755 _bfd_elf_print_private_bfd_data (abfd
, ptr
);
4759 static enum elf_reloc_type_class
4760 elfNN_ia64_reloc_type_class (rela
)
4761 const Elf_Internal_Rela
*rela
;
4763 switch ((int) ELFNN_R_TYPE (rela
->r_info
))
4765 case R_IA64_REL32MSB
:
4766 case R_IA64_REL32LSB
:
4767 case R_IA64_REL64MSB
:
4768 case R_IA64_REL64LSB
:
4769 return reloc_class_relative
;
4770 case R_IA64_IPLTMSB
:
4771 case R_IA64_IPLTLSB
:
4772 return reloc_class_plt
;
4774 return reloc_class_copy
;
4776 return reloc_class_normal
;
4780 static struct bfd_elf_special_section
const elfNN_ia64_special_sections
[]=
4782 { ".sbss", 0, NULL
, 0,
4783 SHT_NOBITS
, SHF_ALLOC
+ SHF_WRITE
+ SHF_IA_64_SHORT
},
4784 { ".sdata", 0, NULL
, 0,
4785 SHT_PROGBITS
, SHF_ALLOC
+ SHF_WRITE
+ SHF_IA_64_SHORT
},
4791 elfNN_ia64_hpux_vec (const bfd_target
*vec
)
4793 extern const bfd_target bfd_elfNN_ia64_hpux_big_vec
;
4794 return (vec
== & bfd_elfNN_ia64_hpux_big_vec
);
4798 elfNN_hpux_post_process_headers (abfd
, info
)
4800 struct bfd_link_info
*info ATTRIBUTE_UNUSED
;
4802 Elf_Internal_Ehdr
*i_ehdrp
= elf_elfheader (abfd
);
4804 i_ehdrp
->e_ident
[EI_OSABI
] = ELFOSABI_HPUX
;
4805 i_ehdrp
->e_ident
[EI_ABIVERSION
] = 1;
4809 elfNN_hpux_backend_section_from_bfd_section (abfd
, sec
, retval
)
4810 bfd
*abfd ATTRIBUTE_UNUSED
;
4814 if (bfd_is_com_section (sec
))
4816 *retval
= SHN_IA_64_ANSI_COMMON
;
4822 #define TARGET_LITTLE_SYM bfd_elfNN_ia64_little_vec
4823 #define TARGET_LITTLE_NAME "elfNN-ia64-little"
4824 #define TARGET_BIG_SYM bfd_elfNN_ia64_big_vec
4825 #define TARGET_BIG_NAME "elfNN-ia64-big"
4826 #define ELF_ARCH bfd_arch_ia64
4827 #define ELF_MACHINE_CODE EM_IA_64
4828 #define ELF_MACHINE_ALT1 1999 /* EAS2.3 */
4829 #define ELF_MACHINE_ALT2 1998 /* EAS2.2 */
4830 #define ELF_MAXPAGESIZE 0x10000 /* 64KB */
4832 #define elf_backend_section_from_shdr \
4833 elfNN_ia64_section_from_shdr
4834 #define elf_backend_section_flags \
4835 elfNN_ia64_section_flags
4836 #define elf_backend_fake_sections \
4837 elfNN_ia64_fake_sections
4838 #define elf_backend_final_write_processing \
4839 elfNN_ia64_final_write_processing
4840 #define elf_backend_add_symbol_hook \
4841 elfNN_ia64_add_symbol_hook
4842 #define elf_backend_additional_program_headers \
4843 elfNN_ia64_additional_program_headers
4844 #define elf_backend_modify_segment_map \
4845 elfNN_ia64_modify_segment_map
4846 #define elf_info_to_howto \
4847 elfNN_ia64_info_to_howto
4849 #define bfd_elfNN_bfd_reloc_type_lookup \
4850 elfNN_ia64_reloc_type_lookup
4851 #define bfd_elfNN_bfd_is_local_label_name \
4852 elfNN_ia64_is_local_label_name
4853 #define bfd_elfNN_bfd_relax_section \
4854 elfNN_ia64_relax_section
4856 /* Stuff for the BFD linker: */
4857 #define bfd_elfNN_bfd_link_hash_table_create \
4858 elfNN_ia64_hash_table_create
4859 #define elf_backend_create_dynamic_sections \
4860 elfNN_ia64_create_dynamic_sections
4861 #define elf_backend_check_relocs \
4862 elfNN_ia64_check_relocs
4863 #define elf_backend_adjust_dynamic_symbol \
4864 elfNN_ia64_adjust_dynamic_symbol
4865 #define elf_backend_size_dynamic_sections \
4866 elfNN_ia64_size_dynamic_sections
4867 #define elf_backend_relocate_section \
4868 elfNN_ia64_relocate_section
4869 #define elf_backend_finish_dynamic_symbol \
4870 elfNN_ia64_finish_dynamic_symbol
4871 #define elf_backend_finish_dynamic_sections \
4872 elfNN_ia64_finish_dynamic_sections
4873 #define bfd_elfNN_bfd_final_link \
4874 elfNN_ia64_final_link
4876 #define bfd_elfNN_bfd_merge_private_bfd_data \
4877 elfNN_ia64_merge_private_bfd_data
4878 #define bfd_elfNN_bfd_set_private_flags \
4879 elfNN_ia64_set_private_flags
4880 #define bfd_elfNN_bfd_print_private_bfd_data \
4881 elfNN_ia64_print_private_bfd_data
4883 #define elf_backend_plt_readonly 1
4884 #define elf_backend_want_plt_sym 0
4885 #define elf_backend_plt_alignment 5
4886 #define elf_backend_got_header_size 0
4887 #define elf_backend_plt_header_size PLT_HEADER_SIZE
4888 #define elf_backend_want_got_plt 1
4889 #define elf_backend_may_use_rel_p 1
4890 #define elf_backend_may_use_rela_p 1
4891 #define elf_backend_default_use_rela_p 1
4892 #define elf_backend_want_dynbss 0
4893 #define elf_backend_copy_indirect_symbol elfNN_ia64_hash_copy_indirect
4894 #define elf_backend_hide_symbol elfNN_ia64_hash_hide_symbol
4895 #define elf_backend_reloc_type_class elfNN_ia64_reloc_type_class
4896 #define elf_backend_rela_normal 1
4897 #define elf_backend_special_sections elfNN_ia64_special_sections
4899 #include "elfNN-target.h"
4901 /* HPUX-specific vectors. */
4903 #undef TARGET_LITTLE_SYM
4904 #undef TARGET_LITTLE_NAME
4905 #undef TARGET_BIG_SYM
4906 #define TARGET_BIG_SYM bfd_elfNN_ia64_hpux_big_vec
4907 #undef TARGET_BIG_NAME
4908 #define TARGET_BIG_NAME "elfNN-ia64-hpux-big"
4910 /* These are HP-UX specific functions. */
4912 #undef elf_backend_post_process_headers
4913 #define elf_backend_post_process_headers elfNN_hpux_post_process_headers
4915 #undef elf_backend_section_from_bfd_section
4916 #define elf_backend_section_from_bfd_section elfNN_hpux_backend_section_from_bfd_section
4918 #undef elf_backend_want_p_paddr_set_to_zero
4919 #define elf_backend_want_p_paddr_set_to_zero 1
4921 #undef ELF_MAXPAGESIZE
4922 #define ELF_MAXPAGESIZE 0x1000 /* 1K */
4925 #define elfNN_bed elfNN_ia64_hpux_bed
4927 #include "elfNN-target.h"
4929 #undef elf_backend_want_p_paddr_set_to_zero