projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Fix ARI warning in rs6000-tdep.c::rs6000_gdbarch_init.
[deliverable/binutils-gdb.git] / bfd / elfnn-aarch64.c
CommitLineData
cec5225b 1/* AArch64-specific support for NN-bit ELF.
b90efa5b 2 Copyright (C) 2009-2015 Free Software Foundation, Inc.
a06ea964
NC		 3 Contributed by ARM Ltd.
4
5 This file is part of BFD, the Binary File Descriptor library.
6
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 3 of the License, or
10 (at your option) any later version.
11
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.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; see the file COPYING3. If not,
19 see <http://www.gnu.org/licenses/>. */
20
21/* Notes on implementation:
22
23 Thread Local Store (TLS)
24
25 Overview:
26
27 The implementation currently supports both traditional TLS and TLS
28 descriptors, but only general dynamic (GD).
29
30 For traditional TLS the assembler will present us with code
31 fragments of the form:
32
33 adrp x0, :tlsgd:foo
34 R_AARCH64_TLSGD_ADR_PAGE21(foo)
35 add x0, :tlsgd_lo12:foo
36 R_AARCH64_TLSGD_ADD_LO12_NC(foo)
37 bl __tls_get_addr
38 nop
39
40 For TLS descriptors the assembler will present us with code
41 fragments of the form:
42
418009c2 43 adrp x0, :tlsdesc:foo R_AARCH64_TLSDESC_ADR_PAGE21(foo)
a06ea964
NC		 44 ldr x1, [x0, #:tlsdesc_lo12:foo] R_AARCH64_TLSDESC_LD64_LO12(foo)
45 add x0, x0, #:tlsdesc_lo12:foo R_AARCH64_TLSDESC_ADD_LO12(foo)
46 .tlsdesccall foo
47 blr x1 R_AARCH64_TLSDESC_CALL(foo)
48
49 The relocations R_AARCH64_TLSGD_{ADR_PREL21,ADD_LO12_NC} against foo
50 indicate that foo is thread local and should be accessed via the
51 traditional TLS mechanims.
52
a6bb11b2 53 The relocations R_AARCH64_TLSDESC_{ADR_PAGE21,LD64_LO12_NC,ADD_LO12_NC}
a06ea964
NC		 54 against foo indicate that 'foo' is thread local and should be accessed
55 via a TLS descriptor mechanism.
56
57 The precise instruction sequence is only relevant from the
58 perspective of linker relaxation which is currently not implemented.
59
60 The static linker must detect that 'foo' is a TLS object and
61 allocate a double GOT entry. The GOT entry must be created for both
62 global and local TLS symbols. Note that this is different to none
63 TLS local objects which do not need a GOT entry.
64
65 In the traditional TLS mechanism, the double GOT entry is used to
66 provide the tls_index structure, containing module and offset
a6bb11b2 67 entries. The static linker places the relocation R_AARCH64_TLS_DTPMOD
a06ea964
NC		 68 on the module entry. The loader will subsequently fixup this
69 relocation with the module identity.
70
71 For global traditional TLS symbols the static linker places an
a6bb11b2 72 R_AARCH64_TLS_DTPREL relocation on the offset entry. The loader
a06ea964
NC		 73 will subsequently fixup the offset. For local TLS symbols the static
74 linker fixes up offset.
75
76 In the TLS descriptor mechanism the double GOT entry is used to
77 provide the descriptor. The static linker places the relocation
78 R_AARCH64_TLSDESC on the first GOT slot. The loader will
79 subsequently fix this up.
80
81 Implementation:
82
83 The handling of TLS symbols is implemented across a number of
84 different backend functions. The following is a top level view of
85 what processing is performed where.
86
87 The TLS implementation maintains state information for each TLS
88 symbol. The state information for local and global symbols is kept
89 in different places. Global symbols use generic BFD structures while
90 local symbols use backend specific structures that are allocated and
91 maintained entirely by the backend.
92
93 The flow:
94
cec5225b 95 elfNN_aarch64_check_relocs()
a06ea964
NC		 96
97 This function is invoked for each relocation.
98
99 The TLS relocations R_AARCH64_TLSGD_{ADR_PREL21,ADD_LO12_NC} and
a6bb11b2 100 R_AARCH64_TLSDESC_{ADR_PAGE21,LD64_LO12_NC,ADD_LO12_NC} are
a06ea964
NC		 101 spotted. One time creation of local symbol data structures are
102 created when the first local symbol is seen.
103
104 The reference count for a symbol is incremented. The GOT type for
105 each symbol is marked as general dynamic.
106
cec5225b 107 elfNN_aarch64_allocate_dynrelocs ()
a06ea964
NC		 108
109 For each global with positive reference count we allocate a double
110 GOT slot. For a traditional TLS symbol we allocate space for two
111 relocation entries on the GOT, for a TLS descriptor symbol we
112 allocate space for one relocation on the slot. Record the GOT offset
113 for this symbol.
114
cec5225b 115 elfNN_aarch64_size_dynamic_sections ()
a06ea964
NC		 116
117 Iterate all input BFDS, look for in the local symbol data structure
118 constructed earlier for local TLS symbols and allocate them double
119 GOT slots along with space for a single GOT relocation. Update the
120 local symbol structure to record the GOT offset allocated.
121
cec5225b 122 elfNN_aarch64_relocate_section ()
a06ea964 123
cec5225b 124 Calls elfNN_aarch64_final_link_relocate ()
a06ea964
NC		 125
126 Emit the relevant TLS relocations against the GOT for each TLS
127 symbol. For local TLS symbols emit the GOT offset directly. The GOT
128 relocations are emitted once the first time a TLS symbol is
129 encountered. The implementation uses the LSB of the GOT offset to
130 flag that the relevant GOT relocations for a symbol have been
131 emitted. All of the TLS code that uses the GOT offset needs to take
132 care to mask out this flag bit before using the offset.
133
cec5225b 134 elfNN_aarch64_final_link_relocate ()
a06ea964
NC		 135
136 Fixup the R_AARCH64_TLSGD_{ADR_PREL21, ADD_LO12_NC} relocations. */
137
138#include "sysdep.h"
139#include "bfd.h"
140#include "libiberty.h"
141#include "libbfd.h"
142#include "bfd_stdint.h"
143#include "elf-bfd.h"
144#include "bfdlink.h"
1419bbe5 145#include "objalloc.h"
a06ea964 146#include "elf/aarch64.h"
caed7120 147#include "elfxx-aarch64.h"
a06ea964 148
cec5225b
YZ		 149#define ARCH_SIZE NN
150
151#if ARCH_SIZE == 64
152#define AARCH64_R(NAME) R_AARCH64_ ## NAME
153#define AARCH64_R_STR(NAME) "R_AARCH64_" #NAME
a6bb11b2
YZ		 154#define HOWTO64(...) HOWTO (__VA_ARGS__)
155#define HOWTO32(...) EMPTY_HOWTO (0)
cec5225b
YZ		 156#define LOG_FILE_ALIGN 3
157#endif
158
159#if ARCH_SIZE == 32
160#define AARCH64_R(NAME) R_AARCH64_P32_ ## NAME
161#define AARCH64_R_STR(NAME) "R_AARCH64_P32_" #NAME
a6bb11b2
YZ		 162#define HOWTO64(...) EMPTY_HOWTO (0)
163#define HOWTO32(...) HOWTO (__VA_ARGS__)
cec5225b
YZ		 164#define LOG_FILE_ALIGN 2
165#endif
166
a6bb11b2
YZ		 167#define IS_AARCH64_TLS_RELOC(R_TYPE) \
168 ((R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21 \
169 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC \
170 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1 \
171 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC \
172 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21 \
173 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC \
174 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC \
175 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19 \
176 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12 \
177 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12 \
178 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC \
179 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2 \
180 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 \
181 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC \
182 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0 \
183 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC \
184 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_DTPMOD \
185 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_DTPREL \
186 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_TPREL \
a06ea964
NC		 187 || IS_AARCH64_TLSDESC_RELOC ((R_TYPE)))
188
a6bb11b2
YZ		 189#define IS_AARCH64_TLSDESC_RELOC(R_TYPE) \
190 ((R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD_PREL19 \
191 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21 \
192 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21 \
193 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD_LO12_NC \
194 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD64_LO12_NC \
195 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC \
196 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G1 \
197 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC \
198 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
199 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD \
200 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_CALL \
201 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC)
a06ea964
NC		 202
203#define ELIMINATE_COPY_RELOCS 0
204
a06ea964 205/* Return size of a relocation entry. HTAB is the bfd's
cec5225b
YZ		 206 elf_aarch64_link_hash_entry. */
207#define RELOC_SIZE(HTAB) (sizeof (ElfNN_External_Rela))
a06ea964 208
cec5225b
YZ		 209/* GOT Entry size - 8 bytes in ELF64 and 4 bytes in ELF32. */
210#define GOT_ENTRY_SIZE (ARCH_SIZE / 8)
a06ea964
NC		 211#define PLT_ENTRY_SIZE (32)
212#define PLT_SMALL_ENTRY_SIZE (16)
213#define PLT_TLSDESC_ENTRY_SIZE (32)
214
a06ea964
NC		 215/* Encoding of the nop instruction */
216#define INSN_NOP 0xd503201f
217
218#define aarch64_compute_jump_table_size(htab) \
219 (((htab)->root.srelplt == NULL) ? 0 \
220 : (htab)->root.srelplt->reloc_count * GOT_ENTRY_SIZE)
221
222/* The first entry in a procedure linkage table looks like this
223 if the distance between the PLTGOT and the PLT is < 4GB use
224 these PLT entries. Note that the dynamic linker gets &PLTGOT[2]
225 in x16 and needs to work out PLTGOT[1] by using an address of
cec5225b
YZ		 226 [x16,#-GOT_ENTRY_SIZE]. */
227static const bfd_byte elfNN_aarch64_small_plt0_entry[PLT_ENTRY_SIZE] =
a06ea964
NC		 228{
229 0xf0, 0x7b, 0xbf, 0xa9, /* stp x16, x30, [sp, #-16]! */
230 0x10, 0x00, 0x00, 0x90, /* adrp x16, (GOT+16) */
caed7120 231#if ARCH_SIZE == 64
a06ea964
NC		 232 0x11, 0x0A, 0x40, 0xf9, /* ldr x17, [x16, #PLT_GOT+0x10] */
233 0x10, 0x42, 0x00, 0x91, /* add x16, x16,#PLT_GOT+0x10 */
caed7120
YZ		 234#else
235 0x11, 0x0A, 0x40, 0xb9, /* ldr w17, [x16, #PLT_GOT+0x8] */
236 0x10, 0x22, 0x00, 0x11, /* add w16, w16,#PLT_GOT+0x8 */
237#endif
a06ea964
NC		 238 0x20, 0x02, 0x1f, 0xd6, /* br x17 */
239 0x1f, 0x20, 0x03, 0xd5, /* nop */
240 0x1f, 0x20, 0x03, 0xd5, /* nop */
241 0x1f, 0x20, 0x03, 0xd5, /* nop */
242};
243
244/* Per function entry in a procedure linkage table looks like this
245 if the distance between the PLTGOT and the PLT is < 4GB use
246 these PLT entries. */
cec5225b 247static const bfd_byte elfNN_aarch64_small_plt_entry[PLT_SMALL_ENTRY_SIZE] =
a06ea964
NC		 248{
249 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
caed7120 250#if ARCH_SIZE == 64
a06ea964
NC		 251 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
252 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
caed7120
YZ		 253#else
254 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
255 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
256#endif
a06ea964
NC		 257 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
258};
259
260static const bfd_byte
cec5225b 261elfNN_aarch64_tlsdesc_small_plt_entry[PLT_TLSDESC_ENTRY_SIZE] =
a06ea964
NC		 262{
263 0xe2, 0x0f, 0xbf, 0xa9, /* stp x2, x3, [sp, #-16]! */
264 0x02, 0x00, 0x00, 0x90, /* adrp x2, 0 */
265 0x03, 0x00, 0x00, 0x90, /* adrp x3, 0 */
caed7120
YZ		 266#if ARCH_SIZE == 64
267 0x42, 0x00, 0x40, 0xf9, /* ldr x2, [x2, #0] */
a06ea964 268 0x63, 0x00, 0x00, 0x91, /* add x3, x3, 0 */
caed7120
YZ		 269#else
270 0x42, 0x00, 0x40, 0xb9, /* ldr w2, [x2, #0] */
271 0x63, 0x00, 0x00, 0x11, /* add w3, w3, 0 */
272#endif
273 0x40, 0x00, 0x1f, 0xd6, /* br x2 */
a06ea964
NC		 274 0x1f, 0x20, 0x03, 0xd5, /* nop */
275 0x1f, 0x20, 0x03, 0xd5, /* nop */
276};
277
cec5225b
YZ		 278#define elf_info_to_howto elfNN_aarch64_info_to_howto
279#define elf_info_to_howto_rel elfNN_aarch64_info_to_howto
a06ea964
NC		 280
281#define AARCH64_ELF_ABI_VERSION 0
a06ea964
NC		 282
283/* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
284#define ALL_ONES (~ (bfd_vma) 0)
285
a6bb11b2
YZ		 286/* Indexed by the bfd interal reloc enumerators.
287 Therefore, the table needs to be synced with BFD_RELOC_AARCH64_*
288 in reloc.c. */
a06ea964 289
a6bb11b2 290static reloc_howto_type elfNN_aarch64_howto_table[] =
a06ea964 291{
a6bb11b2 292 EMPTY_HOWTO (0),
a06ea964 293
a6bb11b2 294 /* Basic data relocations. */
a06ea964 295
a6bb11b2
YZ		 296#if ARCH_SIZE == 64
297 HOWTO (R_AARCH64_NULL, /* type */
a06ea964 298 0, /* rightshift */
a6bb11b2
YZ		 299 0, /* size (0 = byte, 1 = short, 2 = long) */
300 0, /* bitsize */
a06ea964
NC		 301 FALSE, /* pc_relative */
302 0, /* bitpos */
303 complain_overflow_dont, /* complain_on_overflow */
304 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 305 "R_AARCH64_NULL", /* name */
a06ea964
NC		 306 FALSE, /* partial_inplace */
307 0, /* src_mask */
a6bb11b2 308 0, /* dst_mask */
a06ea964 309 FALSE), /* pcrel_offset */
a6bb11b2
YZ		 310#else
311 HOWTO (R_AARCH64_NONE, /* type */
a06ea964
NC		 312 0, /* rightshift */
313 0, /* size (0 = byte, 1 = short, 2 = long) */
314 0, /* bitsize */
315 FALSE, /* pc_relative */
316 0, /* bitpos */
317 complain_overflow_dont, /* complain_on_overflow */
318 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 319 "R_AARCH64_NONE", /* name */
a06ea964
NC		 320 FALSE, /* partial_inplace */
321 0, /* src_mask */
322 0, /* dst_mask */
323 FALSE), /* pcrel_offset */
a6bb11b2 324#endif
a06ea964
NC		 325
326 /* .xword: (S+A) */
a6bb11b2 327 HOWTO64 (AARCH64_R (ABS64), /* type */
a06ea964
NC		 328 0, /* rightshift */
329 4, /* size (4 = long long) */
330 64, /* bitsize */
331 FALSE, /* pc_relative */
332 0, /* bitpos */
333 complain_overflow_unsigned, /* complain_on_overflow */
334 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 335 AARCH64_R_STR (ABS64), /* name */
a06ea964
NC		 336 FALSE, /* partial_inplace */
337 ALL_ONES, /* src_mask */
338 ALL_ONES, /* dst_mask */
339 FALSE), /* pcrel_offset */
340
341 /* .word: (S+A) */
a6bb11b2 342 HOWTO (AARCH64_R (ABS32), /* type */
a06ea964
NC		 343 0, /* rightshift */
344 2, /* size (0 = byte, 1 = short, 2 = long) */
345 32, /* bitsize */
346 FALSE, /* pc_relative */
347 0, /* bitpos */
348 complain_overflow_unsigned, /* complain_on_overflow */
349 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 350 AARCH64_R_STR (ABS32), /* name */
a06ea964
NC		 351 FALSE, /* partial_inplace */
352 0xffffffff, /* src_mask */
353 0xffffffff, /* dst_mask */
354 FALSE), /* pcrel_offset */
355
356 /* .half: (S+A) */
a6bb11b2 357 HOWTO (AARCH64_R (ABS16), /* type */
a06ea964
NC		 358 0, /* rightshift */
359 1, /* size (0 = byte, 1 = short, 2 = long) */
360 16, /* bitsize */
361 FALSE, /* pc_relative */
362 0, /* bitpos */
363 complain_overflow_unsigned, /* complain_on_overflow */
364 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 365 AARCH64_R_STR (ABS16), /* name */
a06ea964
NC		 366 FALSE, /* partial_inplace */
367 0xffff, /* src_mask */
368 0xffff, /* dst_mask */
369 FALSE), /* pcrel_offset */
370
371 /* .xword: (S+A-P) */
a6bb11b2 372 HOWTO64 (AARCH64_R (PREL64), /* type */
a06ea964
NC		 373 0, /* rightshift */
374 4, /* size (4 = long long) */
375 64, /* bitsize */
376 TRUE, /* pc_relative */
377 0, /* bitpos */
378 complain_overflow_signed, /* complain_on_overflow */
379 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 380 AARCH64_R_STR (PREL64), /* name */
a06ea964
NC		 381 FALSE, /* partial_inplace */
382 ALL_ONES, /* src_mask */
383 ALL_ONES, /* dst_mask */
384 TRUE), /* pcrel_offset */
385
386 /* .word: (S+A-P) */
a6bb11b2 387 HOWTO (AARCH64_R (PREL32), /* type */
a06ea964
NC		 388 0, /* rightshift */
389 2, /* size (0 = byte, 1 = short, 2 = long) */
390 32, /* bitsize */
391 TRUE, /* pc_relative */
392 0, /* bitpos */
393 complain_overflow_signed, /* complain_on_overflow */
394 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 395 AARCH64_R_STR (PREL32), /* name */
a06ea964
NC		 396 FALSE, /* partial_inplace */
397 0xffffffff, /* src_mask */
398 0xffffffff, /* dst_mask */
399 TRUE), /* pcrel_offset */
400
401 /* .half: (S+A-P) */
a6bb11b2 402 HOWTO (AARCH64_R (PREL16), /* type */
a06ea964
NC		 403 0, /* rightshift */
404 1, /* size (0 = byte, 1 = short, 2 = long) */
405 16, /* bitsize */
406 TRUE, /* pc_relative */
407 0, /* bitpos */
408 complain_overflow_signed, /* complain_on_overflow */
409 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 410 AARCH64_R_STR (PREL16), /* name */
a06ea964
NC		 411 FALSE, /* partial_inplace */
412 0xffff, /* src_mask */
413 0xffff, /* dst_mask */
414 TRUE), /* pcrel_offset */
415
416 /* Group relocations to create a 16, 32, 48 or 64 bit
417 unsigned data or abs address inline. */
418
419 /* MOVZ: ((S+A) >> 0) & 0xffff */
a6bb11b2 420 HOWTO (AARCH64_R (MOVW_UABS_G0), /* type */
a06ea964
NC		 421 0, /* rightshift */
422 2, /* size (0 = byte, 1 = short, 2 = long) */
423 16, /* bitsize */
424 FALSE, /* pc_relative */
425 0, /* bitpos */
426 complain_overflow_unsigned, /* complain_on_overflow */
427 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 428 AARCH64_R_STR (MOVW_UABS_G0), /* name */
a06ea964
NC		 429 FALSE, /* partial_inplace */
430 0xffff, /* src_mask */
431 0xffff, /* dst_mask */
432 FALSE), /* pcrel_offset */
433
434 /* MOVK: ((S+A) >> 0) & 0xffff [no overflow check] */
a6bb11b2 435 HOWTO (AARCH64_R (MOVW_UABS_G0_NC), /* type */
a06ea964
NC		 436 0, /* rightshift */
437 2, /* size (0 = byte, 1 = short, 2 = long) */
438 16, /* bitsize */
439 FALSE, /* pc_relative */
440 0, /* bitpos */
441 complain_overflow_dont, /* complain_on_overflow */
442 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 443 AARCH64_R_STR (MOVW_UABS_G0_NC), /* name */
a06ea964
NC		 444 FALSE, /* partial_inplace */
445 0xffff, /* src_mask */
446 0xffff, /* dst_mask */
447 FALSE), /* pcrel_offset */
448
449 /* MOVZ: ((S+A) >> 16) & 0xffff */
a6bb11b2 450 HOWTO (AARCH64_R (MOVW_UABS_G1), /* type */
a06ea964
NC		 451 16, /* rightshift */
452 2, /* size (0 = byte, 1 = short, 2 = long) */
453 16, /* bitsize */
454 FALSE, /* pc_relative */
455 0, /* bitpos */
456 complain_overflow_unsigned, /* complain_on_overflow */
457 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 458 AARCH64_R_STR (MOVW_UABS_G1), /* name */
a06ea964
NC		 459 FALSE, /* partial_inplace */
460 0xffff, /* src_mask */
461 0xffff, /* dst_mask */
462 FALSE), /* pcrel_offset */
463
464 /* MOVK: ((S+A) >> 16) & 0xffff [no overflow check] */
a6bb11b2 465 HOWTO64 (AARCH64_R (MOVW_UABS_G1_NC), /* type */
a06ea964
NC		 466 16, /* rightshift */
467 2, /* size (0 = byte, 1 = short, 2 = long) */
468 16, /* bitsize */
469 FALSE, /* pc_relative */
470 0, /* bitpos */
471 complain_overflow_dont, /* complain_on_overflow */
472 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 473 AARCH64_R_STR (MOVW_UABS_G1_NC), /* name */
a06ea964
NC		 474 FALSE, /* partial_inplace */
475 0xffff, /* src_mask */
476 0xffff, /* dst_mask */
477 FALSE), /* pcrel_offset */
478
479 /* MOVZ: ((S+A) >> 32) & 0xffff */
a6bb11b2 480 HOWTO64 (AARCH64_R (MOVW_UABS_G2), /* type */
a06ea964
NC		 481 32, /* rightshift */
482 2, /* size (0 = byte, 1 = short, 2 = long) */
483 16, /* bitsize */
484 FALSE, /* pc_relative */
485 0, /* bitpos */
486 complain_overflow_unsigned, /* complain_on_overflow */
487 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 488 AARCH64_R_STR (MOVW_UABS_G2), /* name */
a06ea964
NC		 489 FALSE, /* partial_inplace */
490 0xffff, /* src_mask */
491 0xffff, /* dst_mask */
492 FALSE), /* pcrel_offset */
493
494 /* MOVK: ((S+A) >> 32) & 0xffff [no overflow check] */
a6bb11b2 495 HOWTO64 (AARCH64_R (MOVW_UABS_G2_NC), /* type */
a06ea964
NC		 496 32, /* rightshift */
497 2, /* size (0 = byte, 1 = short, 2 = long) */
498 16, /* bitsize */
499 FALSE, /* pc_relative */
500 0, /* bitpos */
501 complain_overflow_dont, /* complain_on_overflow */
502 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 503 AARCH64_R_STR (MOVW_UABS_G2_NC), /* name */
a06ea964
NC		 504 FALSE, /* partial_inplace */
505 0xffff, /* src_mask */
506 0xffff, /* dst_mask */
507 FALSE), /* pcrel_offset */
508
509 /* MOVZ: ((S+A) >> 48) & 0xffff */
a6bb11b2 510 HOWTO64 (AARCH64_R (MOVW_UABS_G3), /* type */
a06ea964
NC		 511 48, /* rightshift */
512 2, /* size (0 = byte, 1 = short, 2 = long) */
513 16, /* bitsize */
514 FALSE, /* pc_relative */
515 0, /* bitpos */
516 complain_overflow_unsigned, /* complain_on_overflow */
517 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 518 AARCH64_R_STR (MOVW_UABS_G3), /* name */
a06ea964
NC		 519 FALSE, /* partial_inplace */
520 0xffff, /* src_mask */
521 0xffff, /* dst_mask */
522 FALSE), /* pcrel_offset */
523
524 /* Group relocations to create high part of a 16, 32, 48 or 64 bit
525 signed data or abs address inline. Will change instruction
526 to MOVN or MOVZ depending on sign of calculated value. */
527
528 /* MOV[ZN]: ((S+A) >> 0) & 0xffff */
a6bb11b2 529 HOWTO (AARCH64_R (MOVW_SABS_G0), /* type */
a06ea964
NC		 530 0, /* rightshift */
531 2, /* size (0 = byte, 1 = short, 2 = long) */
532 16, /* bitsize */
533 FALSE, /* pc_relative */
534 0, /* bitpos */
535 complain_overflow_signed, /* complain_on_overflow */
536 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 537 AARCH64_R_STR (MOVW_SABS_G0), /* name */
a06ea964
NC		 538 FALSE, /* partial_inplace */
539 0xffff, /* src_mask */
540 0xffff, /* dst_mask */
541 FALSE), /* pcrel_offset */
542
543 /* MOV[ZN]: ((S+A) >> 16) & 0xffff */
a6bb11b2 544 HOWTO64 (AARCH64_R (MOVW_SABS_G1), /* type */
a06ea964
NC		 545 16, /* rightshift */
546 2, /* size (0 = byte, 1 = short, 2 = long) */
547 16, /* bitsize */
548 FALSE, /* pc_relative */
549 0, /* bitpos */
550 complain_overflow_signed, /* complain_on_overflow */
551 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 552 AARCH64_R_STR (MOVW_SABS_G1), /* name */
a06ea964
NC		 553 FALSE, /* partial_inplace */
554 0xffff, /* src_mask */
555 0xffff, /* dst_mask */
556 FALSE), /* pcrel_offset */
557
558 /* MOV[ZN]: ((S+A) >> 32) & 0xffff */
a6bb11b2 559 HOWTO64 (AARCH64_R (MOVW_SABS_G2), /* type */
a06ea964
NC		 560 32, /* rightshift */
561 2, /* size (0 = byte, 1 = short, 2 = long) */
562 16, /* bitsize */
563 FALSE, /* pc_relative */
564 0, /* bitpos */
565 complain_overflow_signed, /* complain_on_overflow */
566 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 567 AARCH64_R_STR (MOVW_SABS_G2), /* name */
a06ea964
NC		 568 FALSE, /* partial_inplace */
569 0xffff, /* src_mask */
570 0xffff, /* dst_mask */
571 FALSE), /* pcrel_offset */
572
573/* Relocations to generate 19, 21 and 33 bit PC-relative load/store
574 addresses: PG(x) is (x & ~0xfff). */
575
576 /* LD-lit: ((S+A-P) >> 2) & 0x7ffff */
a6bb11b2 577 HOWTO (AARCH64_R (LD_PREL_LO19), /* type */
a06ea964
NC		 578 2, /* rightshift */
579 2, /* size (0 = byte, 1 = short, 2 = long) */
580 19, /* bitsize */
581 TRUE, /* pc_relative */
582 0, /* bitpos */
583 complain_overflow_signed, /* complain_on_overflow */
584 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 585 AARCH64_R_STR (LD_PREL_LO19), /* name */
a06ea964
NC		 586 FALSE, /* partial_inplace */
587 0x7ffff, /* src_mask */
588 0x7ffff, /* dst_mask */
589 TRUE), /* pcrel_offset */
590
591 /* ADR: (S+A-P) & 0x1fffff */
a6bb11b2 592 HOWTO (AARCH64_R (ADR_PREL_LO21), /* type */
a06ea964
NC		 593 0, /* rightshift */
594 2, /* size (0 = byte, 1 = short, 2 = long) */
595 21, /* bitsize */
596 TRUE, /* pc_relative */
597 0, /* bitpos */
598 complain_overflow_signed, /* complain_on_overflow */
599 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 600 AARCH64_R_STR (ADR_PREL_LO21), /* name */
a06ea964
NC		 601 FALSE, /* partial_inplace */
602 0x1fffff, /* src_mask */
603 0x1fffff, /* dst_mask */
604 TRUE), /* pcrel_offset */
605
606 /* ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
a6bb11b2 607 HOWTO (AARCH64_R (ADR_PREL_PG_HI21), /* type */
a06ea964
NC		 608 12, /* rightshift */
609 2, /* size (0 = byte, 1 = short, 2 = long) */
610 21, /* bitsize */
611 TRUE, /* pc_relative */
612 0, /* bitpos */
613 complain_overflow_signed, /* complain_on_overflow */
614 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 615 AARCH64_R_STR (ADR_PREL_PG_HI21), /* name */
a06ea964
NC		 616 FALSE, /* partial_inplace */
617 0x1fffff, /* src_mask */
618 0x1fffff, /* dst_mask */
619 TRUE), /* pcrel_offset */
620
621 /* ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff [no overflow check] */
a6bb11b2 622 HOWTO64 (AARCH64_R (ADR_PREL_PG_HI21_NC), /* type */
a06ea964
NC		 623 12, /* rightshift */
624 2, /* size (0 = byte, 1 = short, 2 = long) */
625 21, /* bitsize */
626 TRUE, /* pc_relative */
627 0, /* bitpos */
628 complain_overflow_dont, /* complain_on_overflow */
629 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 630 AARCH64_R_STR (ADR_PREL_PG_HI21_NC), /* name */
a06ea964
NC		 631 FALSE, /* partial_inplace */
632 0x1fffff, /* src_mask */
633 0x1fffff, /* dst_mask */
634 TRUE), /* pcrel_offset */
635
636 /* ADD: (S+A) & 0xfff [no overflow check] */
a6bb11b2 637 HOWTO (AARCH64_R (ADD_ABS_LO12_NC), /* type */
a06ea964
NC		 638 0, /* rightshift */
639 2, /* size (0 = byte, 1 = short, 2 = long) */
640 12, /* bitsize */
641 FALSE, /* pc_relative */
642 10, /* bitpos */
643 complain_overflow_dont, /* complain_on_overflow */
644 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 645 AARCH64_R_STR (ADD_ABS_LO12_NC), /* name */
a06ea964
NC		 646 FALSE, /* partial_inplace */
647 0x3ffc00, /* src_mask */
648 0x3ffc00, /* dst_mask */
649 FALSE), /* pcrel_offset */
650
651 /* LD/ST8: (S+A) & 0xfff */
a6bb11b2 652 HOWTO (AARCH64_R (LDST8_ABS_LO12_NC), /* type */
a06ea964
NC		 653 0, /* rightshift */
654 2, /* size (0 = byte, 1 = short, 2 = long) */
655 12, /* bitsize */
656 FALSE, /* pc_relative */
657 0, /* bitpos */
658 complain_overflow_dont, /* complain_on_overflow */
659 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 660 AARCH64_R_STR (LDST8_ABS_LO12_NC), /* name */
a06ea964
NC		 661 FALSE, /* partial_inplace */
662 0xfff, /* src_mask */
663 0xfff, /* dst_mask */
664 FALSE), /* pcrel_offset */
665
666 /* Relocations for control-flow instructions. */
667
668 /* TBZ/NZ: ((S+A-P) >> 2) & 0x3fff */
a6bb11b2 669 HOWTO (AARCH64_R (TSTBR14), /* type */
a06ea964
NC		 670 2, /* rightshift */
671 2, /* size (0 = byte, 1 = short, 2 = long) */
672 14, /* bitsize */
673 TRUE, /* pc_relative */
674 0, /* bitpos */
675 complain_overflow_signed, /* complain_on_overflow */
676 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 677 AARCH64_R_STR (TSTBR14), /* name */
a06ea964
NC		 678 FALSE, /* partial_inplace */
679 0x3fff, /* src_mask */
680 0x3fff, /* dst_mask */
681 TRUE), /* pcrel_offset */
682
683 /* B.cond: ((S+A-P) >> 2) & 0x7ffff */
a6bb11b2 684 HOWTO (AARCH64_R (CONDBR19), /* type */
a06ea964
NC		 685 2, /* rightshift */
686 2, /* size (0 = byte, 1 = short, 2 = long) */
687 19, /* bitsize */
688 TRUE, /* pc_relative */
689 0, /* bitpos */
690 complain_overflow_signed, /* complain_on_overflow */
691 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 692 AARCH64_R_STR (CONDBR19), /* name */
a06ea964
NC		 693 FALSE, /* partial_inplace */
694 0x7ffff, /* src_mask */
695 0x7ffff, /* dst_mask */
696 TRUE), /* pcrel_offset */
697
a06ea964 698 /* B: ((S+A-P) >> 2) & 0x3ffffff */
a6bb11b2 699 HOWTO (AARCH64_R (JUMP26), /* type */
a06ea964
NC		 700 2, /* rightshift */
701 2, /* size (0 = byte, 1 = short, 2 = long) */
702 26, /* bitsize */
703 TRUE, /* pc_relative */
704 0, /* bitpos */
705 complain_overflow_signed, /* complain_on_overflow */
706 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 707 AARCH64_R_STR (JUMP26), /* name */
a06ea964
NC		 708 FALSE, /* partial_inplace */
709 0x3ffffff, /* src_mask */
710 0x3ffffff, /* dst_mask */
711 TRUE), /* pcrel_offset */
712
713 /* BL: ((S+A-P) >> 2) & 0x3ffffff */
a6bb11b2 714 HOWTO (AARCH64_R (CALL26), /* type */
a06ea964
NC		 715 2, /* rightshift */
716 2, /* size (0 = byte, 1 = short, 2 = long) */
717 26, /* bitsize */
718 TRUE, /* pc_relative */
719 0, /* bitpos */
720 complain_overflow_signed, /* complain_on_overflow */
721 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 722 AARCH64_R_STR (CALL26), /* name */
a06ea964
NC		 723 FALSE, /* partial_inplace */
724 0x3ffffff, /* src_mask */
725 0x3ffffff, /* dst_mask */
726 TRUE), /* pcrel_offset */
727
728 /* LD/ST16: (S+A) & 0xffe */
a6bb11b2 729 HOWTO (AARCH64_R (LDST16_ABS_LO12_NC), /* type */
a06ea964
NC		 730 1, /* rightshift */
731 2, /* size (0 = byte, 1 = short, 2 = long) */
732 12, /* bitsize */
733 FALSE, /* pc_relative */
734 0, /* bitpos */
735 complain_overflow_dont, /* complain_on_overflow */
736 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 737 AARCH64_R_STR (LDST16_ABS_LO12_NC), /* name */
a06ea964
NC		 738 FALSE, /* partial_inplace */
739 0xffe, /* src_mask */
740 0xffe, /* dst_mask */
741 FALSE), /* pcrel_offset */
742
743 /* LD/ST32: (S+A) & 0xffc */
a6bb11b2 744 HOWTO (AARCH64_R (LDST32_ABS_LO12_NC), /* type */
a06ea964
NC		 745 2, /* rightshift */
746 2, /* size (0 = byte, 1 = short, 2 = long) */
747 12, /* bitsize */
748 FALSE, /* pc_relative */
749 0, /* bitpos */
750 complain_overflow_dont, /* complain_on_overflow */
751 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 752 AARCH64_R_STR (LDST32_ABS_LO12_NC), /* name */
a06ea964
NC		 753 FALSE, /* partial_inplace */
754 0xffc, /* src_mask */
755 0xffc, /* dst_mask */
756 FALSE), /* pcrel_offset */
757
758 /* LD/ST64: (S+A) & 0xff8 */
a6bb11b2 759 HOWTO (AARCH64_R (LDST64_ABS_LO12_NC), /* type */
a06ea964
NC		 760 3, /* rightshift */
761 2, /* size (0 = byte, 1 = short, 2 = long) */
762 12, /* bitsize */
763 FALSE, /* pc_relative */
764 0, /* bitpos */
765 complain_overflow_dont, /* complain_on_overflow */
766 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 767 AARCH64_R_STR (LDST64_ABS_LO12_NC), /* name */
a06ea964
NC		 768 FALSE, /* partial_inplace */
769 0xff8, /* src_mask */
770 0xff8, /* dst_mask */
771 FALSE), /* pcrel_offset */
772
a06ea964 773 /* LD/ST128: (S+A) & 0xff0 */
a6bb11b2 774 HOWTO (AARCH64_R (LDST128_ABS_LO12_NC), /* type */
a06ea964
NC		 775 4, /* rightshift */
776 2, /* size (0 = byte, 1 = short, 2 = long) */
777 12, /* bitsize */
778 FALSE, /* pc_relative */
779 0, /* bitpos */
780 complain_overflow_dont, /* complain_on_overflow */
781 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 782 AARCH64_R_STR (LDST128_ABS_LO12_NC), /* name */
a06ea964
NC		 783 FALSE, /* partial_inplace */
784 0xff0, /* src_mask */
785 0xff0, /* dst_mask */
786 FALSE), /* pcrel_offset */
787
f41aef5f
RE		 788 /* Set a load-literal immediate field to bits
789 0x1FFFFC of G(S)-P */
a6bb11b2 790 HOWTO (AARCH64_R (GOT_LD_PREL19), /* type */
f41aef5f
RE		 791 2, /* rightshift */
792 2, /* size (0 = byte,1 = short,2 = long) */
793 19, /* bitsize */
794 TRUE, /* pc_relative */
795 0, /* bitpos */
796 complain_overflow_signed, /* complain_on_overflow */
797 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 798 AARCH64_R_STR (GOT_LD_PREL19), /* name */
f41aef5f
RE		 799 FALSE, /* partial_inplace */
800 0xffffe0, /* src_mask */
801 0xffffe0, /* dst_mask */
802 TRUE), /* pcrel_offset */
803
a06ea964
NC		 804 /* Get to the page for the GOT entry for the symbol
805 (G(S) - P) using an ADRP instruction. */
a6bb11b2 806 HOWTO (AARCH64_R (ADR_GOT_PAGE), /* type */
a06ea964
NC		 807 12, /* rightshift */
808 2, /* size (0 = byte, 1 = short, 2 = long) */
809 21, /* bitsize */
810 TRUE, /* pc_relative */
811 0, /* bitpos */
812 complain_overflow_dont, /* complain_on_overflow */
813 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 814 AARCH64_R_STR (ADR_GOT_PAGE), /* name */
a06ea964
NC		 815 FALSE, /* partial_inplace */
816 0x1fffff, /* src_mask */
817 0x1fffff, /* dst_mask */
818 TRUE), /* pcrel_offset */
819
a6bb11b2
YZ		 820 /* LD64: GOT offset G(S) & 0xff8 */
821 HOWTO64 (AARCH64_R (LD64_GOT_LO12_NC), /* type */
a06ea964
NC		 822 3, /* rightshift */
823 2, /* size (0 = byte, 1 = short, 2 = long) */
824 12, /* bitsize */
825 FALSE, /* pc_relative */
826 0, /* bitpos */
827 complain_overflow_dont, /* complain_on_overflow */
828 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 829 AARCH64_R_STR (LD64_GOT_LO12_NC), /* name */
a06ea964
NC		 830 FALSE, /* partial_inplace */
831 0xff8, /* src_mask */
832 0xff8, /* dst_mask */
a6bb11b2 833 FALSE), /* pcrel_offset */
a06ea964 834
a6bb11b2
YZ		 835 /* LD32: GOT offset G(S) & 0xffc */
836 HOWTO32 (AARCH64_R (LD32_GOT_LO12_NC), /* type */
837 2, /* rightshift */
838 2, /* size (0 = byte, 1 = short, 2 = long) */
839 12, /* bitsize */
840 FALSE, /* pc_relative */
841 0, /* bitpos */
842 complain_overflow_dont, /* complain_on_overflow */
843 bfd_elf_generic_reloc, /* special_function */
844 AARCH64_R_STR (LD32_GOT_LO12_NC), /* name */
845 FALSE, /* partial_inplace */
846 0xffc, /* src_mask */
847 0xffc, /* dst_mask */
848 FALSE), /* pcrel_offset */
a06ea964
NC		 849
850 /* Get to the page for the GOT entry for the symbol
851 (G(S) - P) using an ADRP instruction. */
a6bb11b2 852 HOWTO (AARCH64_R (TLSGD_ADR_PAGE21), /* type */
a06ea964
NC		 853 12, /* rightshift */
854 2, /* size (0 = byte, 1 = short, 2 = long) */
855 21, /* bitsize */
856 TRUE, /* pc_relative */
857 0, /* bitpos */
858 complain_overflow_dont, /* complain_on_overflow */
859 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 860 AARCH64_R_STR (TLSGD_ADR_PAGE21), /* name */
a06ea964
NC		 861 FALSE, /* partial_inplace */
862 0x1fffff, /* src_mask */
863 0x1fffff, /* dst_mask */
864 TRUE), /* pcrel_offset */
865
866 /* ADD: GOT offset G(S) & 0xff8 [no overflow check] */
a6bb11b2 867 HOWTO (AARCH64_R (TLSGD_ADD_LO12_NC), /* type */
a06ea964
NC		 868 0, /* rightshift */
869 2, /* size (0 = byte, 1 = short, 2 = long) */
870 12, /* bitsize */
871 FALSE, /* pc_relative */
872 0, /* bitpos */
873 complain_overflow_dont, /* complain_on_overflow */
874 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 875 AARCH64_R_STR (TLSGD_ADD_LO12_NC), /* name */
a06ea964
NC		 876 FALSE, /* partial_inplace */
877 0xfff, /* src_mask */
878 0xfff, /* dst_mask */
879 FALSE), /* pcrel_offset */
880
a6bb11b2 881 HOWTO64 (AARCH64_R (TLSIE_MOVW_GOTTPREL_G1), /* type */
a06ea964
NC		 882 16, /* rightshift */
883 2, /* size (0 = byte, 1 = short, 2 = long) */
884 16, /* bitsize */
885 FALSE, /* pc_relative */
886 0, /* bitpos */
887 complain_overflow_dont, /* complain_on_overflow */
888 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 889 AARCH64_R_STR (TLSIE_MOVW_GOTTPREL_G1), /* name */
a06ea964
NC		 890 FALSE, /* partial_inplace */
891 0xffff, /* src_mask */
892 0xffff, /* dst_mask */
893 FALSE), /* pcrel_offset */
894
a6bb11b2 895 HOWTO64 (AARCH64_R (TLSIE_MOVW_GOTTPREL_G0_NC), /* type */
a06ea964
NC		 896 0, /* rightshift */
897 2, /* size (0 = byte, 1 = short, 2 = long) */
898 32, /* bitsize */
899 FALSE, /* pc_relative */
900 0, /* bitpos */
901 complain_overflow_dont, /* complain_on_overflow */
902 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 903 AARCH64_R_STR (TLSIE_MOVW_GOTTPREL_G0_NC), /* name */
a06ea964
NC		 904 FALSE, /* partial_inplace */
905 0xffff, /* src_mask */
906 0xffff, /* dst_mask */
907 FALSE), /* pcrel_offset */
908
a6bb11b2 909 HOWTO (AARCH64_R (TLSIE_ADR_GOTTPREL_PAGE21), /* type */
a06ea964
NC		 910 12, /* rightshift */
911 2, /* size (0 = byte, 1 = short, 2 = long) */
912 21, /* bitsize */
913 FALSE, /* pc_relative */
914 0, /* bitpos */
915 complain_overflow_dont, /* complain_on_overflow */
916 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 917 AARCH64_R_STR (TLSIE_ADR_GOTTPREL_PAGE21), /* name */
a06ea964
NC		 918 FALSE, /* partial_inplace */
919 0x1fffff, /* src_mask */
920 0x1fffff, /* dst_mask */
921 FALSE), /* pcrel_offset */
922
a6bb11b2 923 HOWTO64 (AARCH64_R (TLSIE_LD64_GOTTPREL_LO12_NC), /* type */
a06ea964
NC		 924 3, /* rightshift */
925 2, /* size (0 = byte, 1 = short, 2 = long) */
926 12, /* bitsize */
927 FALSE, /* pc_relative */
928 0, /* bitpos */
929 complain_overflow_dont, /* complain_on_overflow */
930 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 931 AARCH64_R_STR (TLSIE_LD64_GOTTPREL_LO12_NC), /* name */
a06ea964
NC		 932 FALSE, /* partial_inplace */
933 0xff8, /* src_mask */
934 0xff8, /* dst_mask */
935 FALSE), /* pcrel_offset */
936
a6bb11b2
YZ		 937 HOWTO32 (AARCH64_R (TLSIE_LD32_GOTTPREL_LO12_NC), /* type */
938 2, /* rightshift */
939 2, /* size (0 = byte, 1 = short, 2 = long) */
940 12, /* bitsize */
941 FALSE, /* pc_relative */
942 0, /* bitpos */
943 complain_overflow_dont, /* complain_on_overflow */
944 bfd_elf_generic_reloc, /* special_function */
945 AARCH64_R_STR (TLSIE_LD32_GOTTPREL_LO12_NC), /* name */
946 FALSE, /* partial_inplace */
947 0xffc, /* src_mask */
948 0xffc, /* dst_mask */
949 FALSE), /* pcrel_offset */
950
951 HOWTO (AARCH64_R (TLSIE_LD_GOTTPREL_PREL19), /* type */
bb3f9ed8 952 2, /* rightshift */
a06ea964
NC		 953 2, /* size (0 = byte, 1 = short, 2 = long) */
954 21, /* bitsize */
955 FALSE, /* pc_relative */
956 0, /* bitpos */
957 complain_overflow_dont, /* complain_on_overflow */
958 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 959 AARCH64_R_STR (TLSIE_LD_GOTTPREL_PREL19), /* name */
a06ea964
NC		 960 FALSE, /* partial_inplace */
961 0x1ffffc, /* src_mask */
962 0x1ffffc, /* dst_mask */
963 FALSE), /* pcrel_offset */
964
a6bb11b2 965 HOWTO64 (AARCH64_R (TLSLE_MOVW_TPREL_G2), /* type */
bb3f9ed8 966 32, /* rightshift */
a06ea964
NC		 967 2, /* size (0 = byte, 1 = short, 2 = long) */
968 12, /* bitsize */
969 FALSE, /* pc_relative */
970 0, /* bitpos */
0172429c 971 complain_overflow_unsigned, /* complain_on_overflow */
a06ea964 972 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 973 AARCH64_R_STR (TLSLE_MOVW_TPREL_G2), /* name */
a06ea964
NC		 974 FALSE, /* partial_inplace */
975 0xffff, /* src_mask */
976 0xffff, /* dst_mask */
977 FALSE), /* pcrel_offset */
978
a6bb11b2 979 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G1), /* type */
bb3f9ed8 980 16, /* rightshift */
a06ea964
NC		 981 2, /* size (0 = byte, 1 = short, 2 = long) */
982 12, /* bitsize */
983 FALSE, /* pc_relative */
984 0, /* bitpos */
985 complain_overflow_dont, /* complain_on_overflow */
986 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 987 AARCH64_R_STR (TLSLE_MOVW_TPREL_G1), /* name */
a06ea964
NC		 988 FALSE, /* partial_inplace */
989 0xffff, /* src_mask */
990 0xffff, /* dst_mask */
991 FALSE), /* pcrel_offset */
992
a6bb11b2 993 HOWTO64 (AARCH64_R (TLSLE_MOVW_TPREL_G1_NC), /* type */
bb3f9ed8 994 16, /* rightshift */
a06ea964
NC		 995 2, /* size (0 = byte, 1 = short, 2 = long) */
996 12, /* bitsize */
997 FALSE, /* pc_relative */
998 0, /* bitpos */
999 complain_overflow_dont, /* complain_on_overflow */
1000 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1001 AARCH64_R_STR (TLSLE_MOVW_TPREL_G1_NC), /* name */
a06ea964
NC		 1002 FALSE, /* partial_inplace */
1003 0xffff, /* src_mask */
1004 0xffff, /* dst_mask */
1005 FALSE), /* pcrel_offset */
1006
a6bb11b2 1007 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G0), /* type */
a06ea964
NC		 1008 0, /* rightshift */
1009 2, /* size (0 = byte, 1 = short, 2 = long) */
1010 12, /* bitsize */
1011 FALSE, /* pc_relative */
1012 0, /* bitpos */
1013 complain_overflow_dont, /* complain_on_overflow */
1014 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1015 AARCH64_R_STR (TLSLE_MOVW_TPREL_G0), /* name */
a06ea964
NC		 1016 FALSE, /* partial_inplace */
1017 0xffff, /* src_mask */
1018 0xffff, /* dst_mask */
1019 FALSE), /* pcrel_offset */
1020
a6bb11b2 1021 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G0_NC), /* type */
a06ea964
NC		 1022 0, /* rightshift */
1023 2, /* size (0 = byte, 1 = short, 2 = long) */
1024 12, /* bitsize */
1025 FALSE, /* pc_relative */
1026 0, /* bitpos */
1027 complain_overflow_dont, /* complain_on_overflow */
1028 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1029 AARCH64_R_STR (TLSLE_MOVW_TPREL_G0_NC), /* name */
a06ea964
NC		 1030 FALSE, /* partial_inplace */
1031 0xffff, /* src_mask */
1032 0xffff, /* dst_mask */
1033 FALSE), /* pcrel_offset */
1034
a6bb11b2 1035 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_HI12), /* type */
bb3f9ed8 1036 12, /* rightshift */
a06ea964
NC		 1037 2, /* size (0 = byte, 1 = short, 2 = long) */
1038 12, /* bitsize */
1039 FALSE, /* pc_relative */
1040 0, /* bitpos */
bab91cce 1041 complain_overflow_unsigned, /* complain_on_overflow */
a06ea964 1042 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1043 AARCH64_R_STR (TLSLE_ADD_TPREL_HI12), /* name */
a06ea964
NC		 1044 FALSE, /* partial_inplace */
1045 0xfff, /* src_mask */
1046 0xfff, /* dst_mask */
1047 FALSE), /* pcrel_offset */
1048
a6bb11b2 1049 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_LO12), /* type */
a06ea964
NC		 1050 0, /* rightshift */
1051 2, /* size (0 = byte, 1 = short, 2 = long) */
1052 12, /* bitsize */
1053 FALSE, /* pc_relative */
1054 0, /* bitpos */
1055 complain_overflow_dont, /* complain_on_overflow */
1056 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1057 AARCH64_R_STR (TLSLE_ADD_TPREL_LO12), /* name */
a06ea964
NC		 1058 FALSE, /* partial_inplace */
1059 0xfff, /* src_mask */
1060 0xfff, /* dst_mask */
1061 FALSE), /* pcrel_offset */
1062
a6bb11b2 1063 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_LO12_NC), /* type */
a06ea964
NC		 1064 0, /* rightshift */
1065 2, /* size (0 = byte, 1 = short, 2 = long) */
1066 12, /* bitsize */
1067 FALSE, /* pc_relative */
1068 0, /* bitpos */
1069 complain_overflow_dont, /* complain_on_overflow */
1070 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1071 AARCH64_R_STR (TLSLE_ADD_TPREL_LO12_NC), /* name */
a06ea964
NC		 1072 FALSE, /* partial_inplace */
1073 0xfff, /* src_mask */
1074 0xfff, /* dst_mask */
1075 FALSE), /* pcrel_offset */
a06ea964 1076
a6bb11b2 1077 HOWTO (AARCH64_R (TLSDESC_LD_PREL19), /* type */
bb3f9ed8 1078 2, /* rightshift */
a06ea964
NC		 1079 2, /* size (0 = byte, 1 = short, 2 = long) */
1080 21, /* bitsize */
1081 TRUE, /* pc_relative */
1082 0, /* bitpos */
1083 complain_overflow_dont, /* complain_on_overflow */
1084 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1085 AARCH64_R_STR (TLSDESC_LD_PREL19), /* name */
a06ea964
NC		 1086 FALSE, /* partial_inplace */
1087 0x1ffffc, /* src_mask */
1088 0x1ffffc, /* dst_mask */
1089 TRUE), /* pcrel_offset */
1090
a6bb11b2 1091 HOWTO (AARCH64_R (TLSDESC_ADR_PREL21), /* type */
a06ea964
NC		 1092 0, /* rightshift */
1093 2, /* size (0 = byte, 1 = short, 2 = long) */
1094 21, /* bitsize */
1095 TRUE, /* pc_relative */
1096 0, /* bitpos */
1097 complain_overflow_dont, /* complain_on_overflow */
1098 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1099 AARCH64_R_STR (TLSDESC_ADR_PREL21), /* name */
a06ea964
NC		 1100 FALSE, /* partial_inplace */
1101 0x1fffff, /* src_mask */
1102 0x1fffff, /* dst_mask */
1103 TRUE), /* pcrel_offset */
1104
1105 /* Get to the page for the GOT entry for the symbol
1106 (G(S) - P) using an ADRP instruction. */
a6bb11b2 1107 HOWTO (AARCH64_R (TLSDESC_ADR_PAGE21), /* type */
a06ea964
NC		 1108 12, /* rightshift */
1109 2, /* size (0 = byte, 1 = short, 2 = long) */
1110 21, /* bitsize */
1111 TRUE, /* pc_relative */
1112 0, /* bitpos */
1113 complain_overflow_dont, /* complain_on_overflow */
1114 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1115 AARCH64_R_STR (TLSDESC_ADR_PAGE21), /* name */
a06ea964
NC		 1116 FALSE, /* partial_inplace */
1117 0x1fffff, /* src_mask */
1118 0x1fffff, /* dst_mask */
1119 TRUE), /* pcrel_offset */
1120
a6bb11b2
YZ		 1121 /* LD64: GOT offset G(S) & 0xff8. */
1122 HOWTO64 (AARCH64_R (TLSDESC_LD64_LO12_NC), /* type */
a06ea964
NC		 1123 3, /* rightshift */
1124 2, /* size (0 = byte, 1 = short, 2 = long) */
1125 12, /* bitsize */
1126 FALSE, /* pc_relative */
1127 0, /* bitpos */
1128 complain_overflow_dont, /* complain_on_overflow */
1129 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1130 AARCH64_R_STR (TLSDESC_LD64_LO12_NC), /* name */
a06ea964 1131 FALSE, /* partial_inplace */
a6bb11b2
YZ		 1132 0xff8, /* src_mask */
1133 0xff8, /* dst_mask */
1134 FALSE), /* pcrel_offset */
1135
1136 /* LD32: GOT offset G(S) & 0xffc. */
1137 HOWTO32 (AARCH64_R (TLSDESC_LD32_LO12_NC), /* type */
1138 2, /* rightshift */
1139 2, /* size (0 = byte, 1 = short, 2 = long) */
1140 12, /* bitsize */
1141 FALSE, /* pc_relative */
1142 0, /* bitpos */
1143 complain_overflow_dont, /* complain_on_overflow */
1144 bfd_elf_generic_reloc, /* special_function */
1145 AARCH64_R_STR (TLSDESC_LD32_LO12_NC), /* name */
1146 FALSE, /* partial_inplace */
1147 0xffc, /* src_mask */
1148 0xffc, /* dst_mask */
a06ea964
NC		 1149 FALSE), /* pcrel_offset */
1150
1151 /* ADD: GOT offset G(S) & 0xfff. */
a6bb11b2 1152 HOWTO (AARCH64_R (TLSDESC_ADD_LO12_NC), /* type */
a06ea964
NC		 1153 0, /* rightshift */
1154 2, /* size (0 = byte, 1 = short, 2 = long) */
1155 12, /* bitsize */
1156 FALSE, /* pc_relative */
1157 0, /* bitpos */
1158 complain_overflow_dont, /* complain_on_overflow */
1159 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1160 AARCH64_R_STR (TLSDESC_ADD_LO12_NC), /* name */
a06ea964
NC		 1161 FALSE, /* partial_inplace */
1162 0xfff, /* src_mask */
1163 0xfff, /* dst_mask */
1164 FALSE), /* pcrel_offset */
1165
a6bb11b2 1166 HOWTO64 (AARCH64_R (TLSDESC_OFF_G1), /* type */
bb3f9ed8 1167 16, /* rightshift */
a06ea964
NC		 1168 2, /* size (0 = byte, 1 = short, 2 = long) */
1169 12, /* bitsize */
1170 FALSE, /* pc_relative */
1171 0, /* bitpos */
1172 complain_overflow_dont, /* complain_on_overflow */
1173 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1174 AARCH64_R_STR (TLSDESC_OFF_G1), /* name */
a06ea964
NC		 1175 FALSE, /* partial_inplace */
1176 0xffff, /* src_mask */
1177 0xffff, /* dst_mask */
1178 FALSE), /* pcrel_offset */
1179
a6bb11b2 1180 HOWTO64 (AARCH64_R (TLSDESC_OFF_G0_NC), /* type */
a06ea964
NC		 1181 0, /* rightshift */
1182 2, /* size (0 = byte, 1 = short, 2 = long) */
1183 12, /* bitsize */
1184 FALSE, /* pc_relative */
1185 0, /* bitpos */
1186 complain_overflow_dont, /* complain_on_overflow */
1187 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1188 AARCH64_R_STR (TLSDESC_OFF_G0_NC), /* name */
a06ea964
NC		 1189 FALSE, /* partial_inplace */
1190 0xffff, /* src_mask */
1191 0xffff, /* dst_mask */
1192 FALSE), /* pcrel_offset */
1193
a6bb11b2 1194 HOWTO64 (AARCH64_R (TLSDESC_LDR), /* type */
a06ea964
NC		 1195 0, /* rightshift */
1196 2, /* size (0 = byte, 1 = short, 2 = long) */
1197 12, /* bitsize */
1198 FALSE, /* pc_relative */
1199 0, /* bitpos */
1200 complain_overflow_dont, /* complain_on_overflow */
1201 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1202 AARCH64_R_STR (TLSDESC_LDR), /* name */
a06ea964
NC		 1203 FALSE, /* partial_inplace */
1204 0x0, /* src_mask */
1205 0x0, /* dst_mask */
1206 FALSE), /* pcrel_offset */
1207
a6bb11b2 1208 HOWTO64 (AARCH64_R (TLSDESC_ADD), /* type */
a06ea964
NC		 1209 0, /* rightshift */
1210 2, /* size (0 = byte, 1 = short, 2 = long) */
1211 12, /* bitsize */
1212 FALSE, /* pc_relative */
1213 0, /* bitpos */
1214 complain_overflow_dont, /* complain_on_overflow */
1215 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1216 AARCH64_R_STR (TLSDESC_ADD), /* name */
a06ea964
NC		 1217 FALSE, /* partial_inplace */
1218 0x0, /* src_mask */
1219 0x0, /* dst_mask */
1220 FALSE), /* pcrel_offset */
1221
a6bb11b2 1222 HOWTO (AARCH64_R (TLSDESC_CALL), /* type */
a06ea964
NC		 1223 0, /* rightshift */
1224 2, /* size (0 = byte, 1 = short, 2 = long) */
1225 12, /* bitsize */
1226 FALSE, /* pc_relative */
1227 0, /* bitpos */
1228 complain_overflow_dont, /* complain_on_overflow */
1229 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1230 AARCH64_R_STR (TLSDESC_CALL), /* name */
a06ea964
NC		 1231 FALSE, /* partial_inplace */
1232 0x0, /* src_mask */
1233 0x0, /* dst_mask */
1234 FALSE), /* pcrel_offset */
a6bb11b2
YZ		 1235
1236 HOWTO (AARCH64_R (COPY), /* type */
1237 0, /* rightshift */
1238 2, /* size (0 = byte, 1 = short, 2 = long) */
1239 64, /* bitsize */
1240 FALSE, /* pc_relative */
1241 0, /* bitpos */
1242 complain_overflow_bitfield, /* complain_on_overflow */
1243 bfd_elf_generic_reloc, /* special_function */
1244 AARCH64_R_STR (COPY), /* name */
1245 TRUE, /* partial_inplace */
1246 0xffffffff, /* src_mask */
1247 0xffffffff, /* dst_mask */
1248 FALSE), /* pcrel_offset */
1249
1250 HOWTO (AARCH64_R (GLOB_DAT), /* type */
1251 0, /* rightshift */
1252 2, /* size (0 = byte, 1 = short, 2 = long) */
1253 64, /* bitsize */
1254 FALSE, /* pc_relative */
1255 0, /* bitpos */
1256 complain_overflow_bitfield, /* complain_on_overflow */
1257 bfd_elf_generic_reloc, /* special_function */
1258 AARCH64_R_STR (GLOB_DAT), /* name */
1259 TRUE, /* partial_inplace */
1260 0xffffffff, /* src_mask */
1261 0xffffffff, /* dst_mask */
1262 FALSE), /* pcrel_offset */
1263
1264 HOWTO (AARCH64_R (JUMP_SLOT), /* type */
1265 0, /* rightshift */
1266 2, /* size (0 = byte, 1 = short, 2 = long) */
1267 64, /* bitsize */
1268 FALSE, /* pc_relative */
1269 0, /* bitpos */
1270 complain_overflow_bitfield, /* complain_on_overflow */
1271 bfd_elf_generic_reloc, /* special_function */
1272 AARCH64_R_STR (JUMP_SLOT), /* name */
1273 TRUE, /* partial_inplace */
1274 0xffffffff, /* src_mask */
1275 0xffffffff, /* dst_mask */
1276 FALSE), /* pcrel_offset */
1277
1278 HOWTO (AARCH64_R (RELATIVE), /* type */
1279 0, /* rightshift */
1280 2, /* size (0 = byte, 1 = short, 2 = long) */
1281 64, /* bitsize */
1282 FALSE, /* pc_relative */
1283 0, /* bitpos */
1284 complain_overflow_bitfield, /* complain_on_overflow */
1285 bfd_elf_generic_reloc, /* special_function */
1286 AARCH64_R_STR (RELATIVE), /* name */
1287 TRUE, /* partial_inplace */
1288 ALL_ONES, /* src_mask */
1289 ALL_ONES, /* dst_mask */
1290 FALSE), /* pcrel_offset */
1291
1292 HOWTO (AARCH64_R (TLS_DTPMOD), /* type */
1293 0, /* rightshift */
1294 2, /* size (0 = byte, 1 = short, 2 = long) */
1295 64, /* bitsize */
1296 FALSE, /* pc_relative */
1297 0, /* bitpos */
1298 complain_overflow_dont, /* complain_on_overflow */
1299 bfd_elf_generic_reloc, /* special_function */
da0781dc
YZ		 1300#if ARCH_SIZE == 64
1301 AARCH64_R_STR (TLS_DTPMOD64), /* name */
1302#else
a6bb11b2 1303 AARCH64_R_STR (TLS_DTPMOD), /* name */
da0781dc 1304#endif
a6bb11b2
YZ		 1305 FALSE, /* partial_inplace */
1306 0, /* src_mask */
1307 ALL_ONES, /* dst_mask */
1308 FALSE), /* pc_reloffset */
1309
1310 HOWTO (AARCH64_R (TLS_DTPREL), /* type */
1311 0, /* rightshift */
1312 2, /* size (0 = byte, 1 = short, 2 = long) */
1313 64, /* bitsize */
1314 FALSE, /* pc_relative */
1315 0, /* bitpos */
1316 complain_overflow_dont, /* complain_on_overflow */
1317 bfd_elf_generic_reloc, /* special_function */
da0781dc
YZ		 1318#if ARCH_SIZE == 64
1319 AARCH64_R_STR (TLS_DTPREL64), /* name */
1320#else
a6bb11b2 1321 AARCH64_R_STR (TLS_DTPREL), /* name */
da0781dc 1322#endif
a6bb11b2
YZ		 1323 FALSE, /* partial_inplace */
1324 0, /* src_mask */
1325 ALL_ONES, /* dst_mask */
1326 FALSE), /* pcrel_offset */
1327
1328 HOWTO (AARCH64_R (TLS_TPREL), /* type */
1329 0, /* rightshift */
1330 2, /* size (0 = byte, 1 = short, 2 = long) */
1331 64, /* bitsize */
1332 FALSE, /* pc_relative */
1333 0, /* bitpos */
1334 complain_overflow_dont, /* complain_on_overflow */
1335 bfd_elf_generic_reloc, /* special_function */
da0781dc
YZ		 1336#if ARCH_SIZE == 64
1337 AARCH64_R_STR (TLS_TPREL64), /* name */
1338#else
a6bb11b2 1339 AARCH64_R_STR (TLS_TPREL), /* name */
da0781dc 1340#endif
a6bb11b2
YZ		 1341 FALSE, /* partial_inplace */
1342 0, /* src_mask */
1343 ALL_ONES, /* dst_mask */
1344 FALSE), /* pcrel_offset */
1345
1346 HOWTO (AARCH64_R (TLSDESC), /* type */
1347 0, /* rightshift */
1348 2, /* size (0 = byte, 1 = short, 2 = long) */
1349 64, /* bitsize */
1350 FALSE, /* pc_relative */
1351 0, /* bitpos */
1352 complain_overflow_dont, /* complain_on_overflow */
1353 bfd_elf_generic_reloc, /* special_function */
1354 AARCH64_R_STR (TLSDESC), /* name */
1355 FALSE, /* partial_inplace */
1356 0, /* src_mask */
1357 ALL_ONES, /* dst_mask */
1358 FALSE), /* pcrel_offset */
1359
1360 HOWTO (AARCH64_R (IRELATIVE), /* type */
1361 0, /* rightshift */
1362 2, /* size (0 = byte, 1 = short, 2 = long) */
1363 64, /* bitsize */
1364 FALSE, /* pc_relative */
1365 0, /* bitpos */
1366 complain_overflow_bitfield, /* complain_on_overflow */
1367 bfd_elf_generic_reloc, /* special_function */
1368 AARCH64_R_STR (IRELATIVE), /* name */
1369 FALSE, /* partial_inplace */
1370 0, /* src_mask */
1371 ALL_ONES, /* dst_mask */
1372 FALSE), /* pcrel_offset */
1373
1374 EMPTY_HOWTO (0),
a06ea964
NC		 1375};
1376
a6bb11b2
YZ		 1377static reloc_howto_type elfNN_aarch64_howto_none =
1378 HOWTO (R_AARCH64_NONE, /* type */
1379 0, /* rightshift */
1380 0, /* size (0 = byte, 1 = short, 2 = long) */
1381 0, /* bitsize */
1382 FALSE, /* pc_relative */
1383 0, /* bitpos */
1384 complain_overflow_dont,/* complain_on_overflow */
1385 bfd_elf_generic_reloc, /* special_function */
1386 "R_AARCH64_NONE", /* name */
1387 FALSE, /* partial_inplace */
1388 0, /* src_mask */
1389 0, /* dst_mask */
1390 FALSE); /* pcrel_offset */
1391
1392/* Given HOWTO, return the bfd internal relocation enumerator. */
1393
1394static bfd_reloc_code_real_type
1395elfNN_aarch64_bfd_reloc_from_howto (reloc_howto_type *howto)
1396{
1397 const int size
1398 = (int) ARRAY_SIZE (elfNN_aarch64_howto_table);
1399 const ptrdiff_t offset
1400 = howto - elfNN_aarch64_howto_table;
1401
1402 if (offset > 0 && offset < size - 1)
1403 return BFD_RELOC_AARCH64_RELOC_START + offset;
1404
1405 if (howto == &elfNN_aarch64_howto_none)
1406 return BFD_RELOC_AARCH64_NONE;
1407
1408 return BFD_RELOC_AARCH64_RELOC_START;
1409}
1410
1411/* Given R_TYPE, return the bfd internal relocation enumerator. */
1412
1413static bfd_reloc_code_real_type
1414elfNN_aarch64_bfd_reloc_from_type (unsigned int r_type)
1415{
1416 static bfd_boolean initialized_p = FALSE;
1417 /* Indexed by R_TYPE, values are offsets in the howto_table. */
1418 static unsigned int offsets[R_AARCH64_end];
1419
1420 if (initialized_p == FALSE)
1421 {
1422 unsigned int i;
1423
1424 for (i = 1; i < ARRAY_SIZE (elfNN_aarch64_howto_table) - 1; ++i)
1425 if (elfNN_aarch64_howto_table[i].type != 0)
1426 offsets[elfNN_aarch64_howto_table[i].type] = i;
1427
1428 initialized_p = TRUE;
1429 }
1430
1431 if (r_type == R_AARCH64_NONE || r_type == R_AARCH64_NULL)
1432 return BFD_RELOC_AARCH64_NONE;
1433
5860e3f8
NC		 1434 /* PR 17512: file: b371e70a. */
1435 if (r_type >= R_AARCH64_end)
1436 {
1437 _bfd_error_handler (_("Invalid AArch64 reloc number: %d"), r_type);
1438 bfd_set_error (bfd_error_bad_value);
1439 return BFD_RELOC_AARCH64_NONE;
1440 }
1441
a6bb11b2
YZ		 1442 return BFD_RELOC_AARCH64_RELOC_START + offsets[r_type];
1443}
1444
1445struct elf_aarch64_reloc_map
1446{
1447 bfd_reloc_code_real_type from;
1448 bfd_reloc_code_real_type to;
1449};
1450
1451/* Map bfd generic reloc to AArch64-specific reloc. */
1452static const struct elf_aarch64_reloc_map elf_aarch64_reloc_map[] =
1453{
1454 {BFD_RELOC_NONE, BFD_RELOC_AARCH64_NONE},
1455
1456 /* Basic data relocations. */
1457 {BFD_RELOC_CTOR, BFD_RELOC_AARCH64_NN},
1458 {BFD_RELOC_64, BFD_RELOC_AARCH64_64},
1459 {BFD_RELOC_32, BFD_RELOC_AARCH64_32},
1460 {BFD_RELOC_16, BFD_RELOC_AARCH64_16},
1461 {BFD_RELOC_64_PCREL, BFD_RELOC_AARCH64_64_PCREL},
1462 {BFD_RELOC_32_PCREL, BFD_RELOC_AARCH64_32_PCREL},
1463 {BFD_RELOC_16_PCREL, BFD_RELOC_AARCH64_16_PCREL},
1464};
1465
1466/* Given the bfd internal relocation enumerator in CODE, return the
1467 corresponding howto entry. */
1468
1469static reloc_howto_type *
1470elfNN_aarch64_howto_from_bfd_reloc (bfd_reloc_code_real_type code)
1471{
1472 unsigned int i;
1473
1474 /* Convert bfd generic reloc to AArch64-specific reloc. */
1475 if (code < BFD_RELOC_AARCH64_RELOC_START
1476 || code > BFD_RELOC_AARCH64_RELOC_END)
1477 for (i = 0; i < ARRAY_SIZE (elf_aarch64_reloc_map); i++)
1478 if (elf_aarch64_reloc_map[i].from == code)
1479 {
1480 code = elf_aarch64_reloc_map[i].to;
1481 break;
1482 }
1483
1484 if (code > BFD_RELOC_AARCH64_RELOC_START
1485 && code < BFD_RELOC_AARCH64_RELOC_END)
1486 if (elfNN_aarch64_howto_table[code - BFD_RELOC_AARCH64_RELOC_START].type)
1487 return &elfNN_aarch64_howto_table[code - BFD_RELOC_AARCH64_RELOC_START];
1488
54757ed1
AP		 1489 if (code == BFD_RELOC_AARCH64_NONE)
1490 return &elfNN_aarch64_howto_none;
1491
a6bb11b2
YZ		 1492 return NULL;
1493}
1494
a06ea964 1495static reloc_howto_type *
cec5225b 1496elfNN_aarch64_howto_from_type (unsigned int r_type)
a06ea964 1497{
a6bb11b2
YZ		 1498 bfd_reloc_code_real_type val;
1499 reloc_howto_type *howto;
1500
cec5225b
YZ		 1501#if ARCH_SIZE == 32
1502 if (r_type > 256)
1503 {
1504 bfd_set_error (bfd_error_bad_value);
1505 return NULL;
1506 }
1507#endif
1508
a6bb11b2
YZ		 1509 if (r_type == R_AARCH64_NONE)
1510 return &elfNN_aarch64_howto_none;
a06ea964 1511
a6bb11b2
YZ		 1512 val = elfNN_aarch64_bfd_reloc_from_type (r_type);
1513 howto = elfNN_aarch64_howto_from_bfd_reloc (val);
a06ea964 1514
a6bb11b2
YZ		 1515 if (howto != NULL)
1516 return howto;
a06ea964 1517
a06ea964
NC		 1518 bfd_set_error (bfd_error_bad_value);
1519 return NULL;
1520}
1521
1522static void
cec5225b 1523elfNN_aarch64_info_to_howto (bfd *abfd ATTRIBUTE_UNUSED, arelent *bfd_reloc,
a06ea964
NC		 1524 Elf_Internal_Rela *elf_reloc)
1525{
1526 unsigned int r_type;
1527
cec5225b
YZ		 1528 r_type = ELFNN_R_TYPE (elf_reloc->r_info);
1529 bfd_reloc->howto = elfNN_aarch64_howto_from_type (r_type);
a06ea964
NC		 1530}
1531
a06ea964 1532static reloc_howto_type *
cec5225b 1533elfNN_aarch64_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
a06ea964
NC		 1534 bfd_reloc_code_real_type code)
1535{
a6bb11b2 1536 reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (code);
a06ea964 1537
a6bb11b2
YZ		 1538 if (howto != NULL)
1539 return howto;
a06ea964
NC		 1540
1541 bfd_set_error (bfd_error_bad_value);
1542 return NULL;
1543}
1544
1545static reloc_howto_type *
cec5225b 1546elfNN_aarch64_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
a06ea964
NC		 1547 const char *r_name)
1548{
1549 unsigned int i;
1550
a6bb11b2
YZ		 1551 for (i = 1; i < ARRAY_SIZE (elfNN_aarch64_howto_table) - 1; ++i)
1552 if (elfNN_aarch64_howto_table[i].name != NULL
1553 && strcasecmp (elfNN_aarch64_howto_table[i].name, r_name) == 0)
1554 return &elfNN_aarch64_howto_table[i];
a06ea964
NC		 1555
1556 return NULL;
1557}
1558
6d00b590 1559#define TARGET_LITTLE_SYM aarch64_elfNN_le_vec
cec5225b 1560#define TARGET_LITTLE_NAME "elfNN-littleaarch64"
6d00b590 1561#define TARGET_BIG_SYM aarch64_elfNN_be_vec
cec5225b 1562#define TARGET_BIG_NAME "elfNN-bigaarch64"
a06ea964 1563
a06ea964
NC		 1564/* The linker script knows the section names for placement.
1565 The entry_names are used to do simple name mangling on the stubs.
1566 Given a function name, and its type, the stub can be found. The
1567 name can be changed. The only requirement is the %s be present. */
1568#define STUB_ENTRY_NAME "__%s_veneer"
1569
1570/* The name of the dynamic interpreter. This is put in the .interp
1571 section. */
1572#define ELF_DYNAMIC_INTERPRETER "/lib/ld.so.1"
1573
1574#define AARCH64_MAX_FWD_BRANCH_OFFSET \
1575 (((1 << 25) - 1) << 2)
1576#define AARCH64_MAX_BWD_BRANCH_OFFSET \
1577 (-((1 << 25) << 2))
1578
1579#define AARCH64_MAX_ADRP_IMM ((1 << 20) - 1)
1580#define AARCH64_MIN_ADRP_IMM (-(1 << 20))
1581
1582static int
1583aarch64_valid_for_adrp_p (bfd_vma value, bfd_vma place)
1584{
1585 bfd_signed_vma offset = (bfd_signed_vma) (PG (value) - PG (place)) >> 12;
1586 return offset <= AARCH64_MAX_ADRP_IMM && offset >= AARCH64_MIN_ADRP_IMM;
1587}
1588
1589static int
1590aarch64_valid_branch_p (bfd_vma value, bfd_vma place)
1591{
1592 bfd_signed_vma offset = (bfd_signed_vma) (value - place);
1593 return (offset <= AARCH64_MAX_FWD_BRANCH_OFFSET
1594 && offset >= AARCH64_MAX_BWD_BRANCH_OFFSET);
1595}
1596
1597static const uint32_t aarch64_adrp_branch_stub [] =
1598{
1599 0x90000010, /* adrp ip0, X */
1600 /* R_AARCH64_ADR_HI21_PCREL(X) */
1601 0x91000210, /* add ip0, ip0, :lo12:X */
1602 /* R_AARCH64_ADD_ABS_LO12_NC(X) */
1603 0xd61f0200, /* br ip0 */
1604};
1605
1606static const uint32_t aarch64_long_branch_stub[] =
1607{
cec5225b 1608#if ARCH_SIZE == 64
a06ea964 1609 0x58000090, /* ldr ip0, 1f */
cec5225b
YZ		 1610#else
1611 0x18000090, /* ldr wip0, 1f */
1612#endif
a06ea964
NC		 1613 0x10000011, /* adr ip1, #0 */
1614 0x8b110210, /* add ip0, ip0, ip1 */
1615 0xd61f0200, /* br ip0 */
cec5225b
YZ		 1616 0x00000000, /* 1: .xword or .word
1617 R_AARCH64_PRELNN(X) + 12
a06ea964
NC		 1618 */
1619 0x00000000,
1620};
1621
68fcca92
JW		 1622static const uint32_t aarch64_erratum_835769_stub[] =
1623{
1624 0x00000000, /* Placeholder for multiply accumulate. */
1625 0x14000000, /* b <label> */
1626};
1627
a06ea964
NC		 1628/* Section name for stubs is the associated section name plus this
1629 string. */
1630#define STUB_SUFFIX ".stub"
1631
cec5225b 1632enum elf_aarch64_stub_type
a06ea964
NC		 1633{
1634 aarch64_stub_none,
1635 aarch64_stub_adrp_branch,
1636 aarch64_stub_long_branch,
68fcca92 1637 aarch64_stub_erratum_835769_veneer,
a06ea964
NC		 1638};
1639
cec5225b 1640struct elf_aarch64_stub_hash_entry
a06ea964
NC		 1641{
1642 /* Base hash table entry structure. */
1643 struct bfd_hash_entry root;
1644
1645 /* The stub section. */
1646 asection *stub_sec;
1647
1648 /* Offset within stub_sec of the beginning of this stub. */
1649 bfd_vma stub_offset;
1650
1651 /* Given the symbol's value and its section we can determine its final
1652 value when building the stubs (so the stub knows where to jump). */
1653 bfd_vma target_value;
1654 asection *target_section;
1655
cec5225b 1656 enum elf_aarch64_stub_type stub_type;
a06ea964
NC		 1657
1658 /* The symbol table entry, if any, that this was derived from. */
cec5225b 1659 struct elf_aarch64_link_hash_entry *h;
a06ea964
NC		 1660
1661 /* Destination symbol type */
1662 unsigned char st_type;
1663
1664 /* Where this stub is being called from, or, in the case of combined
1665 stub sections, the first input section in the group. */
1666 asection *id_sec;
1667
1668 /* The name for the local symbol at the start of this stub. The
1669 stub name in the hash table has to be unique; this does not, so
1670 it can be friendlier. */
1671 char *output_name;
68fcca92
JW		 1672
1673 /* The instruction which caused this stub to be generated (only valid for
1674 erratum 835769 workaround stubs at present). */
1675 uint32_t veneered_insn;
a06ea964
NC		 1676};
1677
1678/* Used to build a map of a section. This is required for mixed-endian
1679 code/data. */
1680
cec5225b 1681typedef struct elf_elf_section_map
a06ea964
NC		 1682{
1683 bfd_vma vma;
1684 char type;
1685}
cec5225b 1686elf_aarch64_section_map;
a06ea964
NC		 1687
1688
1689typedef struct _aarch64_elf_section_data
1690{
1691 struct bfd_elf_section_data elf;
1692 unsigned int mapcount;
1693 unsigned int mapsize;
cec5225b 1694 elf_aarch64_section_map *map;
a06ea964
NC		 1695}
1696_aarch64_elf_section_data;
1697
cec5225b 1698#define elf_aarch64_section_data(sec) \
a06ea964
NC		 1699 ((_aarch64_elf_section_data *) elf_section_data (sec))
1700
68fcca92
JW		 1701/* A fix-descriptor for erratum 835769. */
1702struct aarch64_erratum_835769_fix
1703{
1704 bfd *input_bfd;
1705 asection *section;
1706 bfd_vma offset;
1707 uint32_t veneered_insn;
1708 char *stub_name;
1709 enum elf_aarch64_stub_type stub_type;
1710};
1711
4e8516b2
AP		 1712/* The size of the thread control block which is defined to be two pointers. */
1713#define TCB_SIZE (ARCH_SIZE/8)*2
a06ea964
NC		 1714
1715struct elf_aarch64_local_symbol
1716{
1717 unsigned int got_type;
1718 bfd_signed_vma got_refcount;
1719 bfd_vma got_offset;
1720
1721 /* Offset of the GOTPLT entry reserved for the TLS descriptor. The
1722 offset is from the end of the jump table and reserved entries
1723 within the PLTGOT.
1724
1725 The magic value (bfd_vma) -1 indicates that an offset has not be
1726 allocated. */
1727 bfd_vma tlsdesc_got_jump_table_offset;
1728};
1729
1730struct elf_aarch64_obj_tdata
1731{
1732 struct elf_obj_tdata root;
1733
1734 /* local symbol descriptors */
1735 struct elf_aarch64_local_symbol *locals;
1736
1737 /* Zero to warn when linking objects with incompatible enum sizes. */
1738 int no_enum_size_warning;
1739
1740 /* Zero to warn when linking objects with incompatible wchar_t sizes. */
1741 int no_wchar_size_warning;
1742};
1743
1744#define elf_aarch64_tdata(bfd) \
1745 ((struct elf_aarch64_obj_tdata *) (bfd)->tdata.any)
1746
cec5225b 1747#define elf_aarch64_locals(bfd) (elf_aarch64_tdata (bfd)->locals)
a06ea964
NC		 1748
1749#define is_aarch64_elf(bfd) \
1750 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
1751 && elf_tdata (bfd) != NULL \
1752 && elf_object_id (bfd) == AARCH64_ELF_DATA)
1753
1754static bfd_boolean
cec5225b 1755elfNN_aarch64_mkobject (bfd *abfd)
a06ea964
NC		 1756{
1757 return bfd_elf_allocate_object (abfd, sizeof (struct elf_aarch64_obj_tdata),
1758 AARCH64_ELF_DATA);
1759}
1760
cec5225b
YZ		 1761#define elf_aarch64_hash_entry(ent) \
1762 ((struct elf_aarch64_link_hash_entry *)(ent))
a06ea964
NC		 1763
1764#define GOT_UNKNOWN 0
1765#define GOT_NORMAL 1
1766#define GOT_TLS_GD 2
1767#define GOT_TLS_IE 4
1768#define GOT_TLSDESC_GD 8
1769
1770#define GOT_TLS_GD_ANY_P(type) ((type & GOT_TLS_GD) || (type & GOT_TLSDESC_GD))
1771
1772/* AArch64 ELF linker hash entry. */
cec5225b 1773struct elf_aarch64_link_hash_entry
a06ea964
NC		 1774{
1775 struct elf_link_hash_entry root;
1776
1777 /* Track dynamic relocs copied for this symbol. */
1778 struct elf_dyn_relocs *dyn_relocs;
1779
a06ea964
NC		 1780 /* Since PLT entries have variable size, we need to record the
1781 index into .got.plt instead of recomputing it from the PLT
1782 offset. */
1783 bfd_signed_vma plt_got_offset;
1784
1785 /* Bit mask representing the type of GOT entry(s) if any required by
1786 this symbol. */
1787 unsigned int got_type;
1788
1789 /* A pointer to the most recently used stub hash entry against this
1790 symbol. */
cec5225b 1791 struct elf_aarch64_stub_hash_entry *stub_cache;
a06ea964
NC		 1792
1793 /* Offset of the GOTPLT entry reserved for the TLS descriptor. The offset
1794 is from the end of the jump table and reserved entries within the PLTGOT.
1795
1796 The magic value (bfd_vma) -1 indicates that an offset has not
1797 be allocated. */
1798 bfd_vma tlsdesc_got_jump_table_offset;
1799};
1800
1801static unsigned int
cec5225b 1802elfNN_aarch64_symbol_got_type (struct elf_link_hash_entry *h,
a06ea964
NC		 1803 bfd *abfd,
1804 unsigned long r_symndx)
1805{
1806 if (h)
cec5225b 1807 return elf_aarch64_hash_entry (h)->got_type;
a06ea964 1808
cec5225b 1809 if (! elf_aarch64_locals (abfd))
a06ea964
NC		 1810 return GOT_UNKNOWN;
1811
cec5225b 1812 return elf_aarch64_locals (abfd)[r_symndx].got_type;
a06ea964
NC		 1813}
1814
a06ea964 1815/* Get the AArch64 elf linker hash table from a link_info structure. */
cec5225b
YZ		 1816#define elf_aarch64_hash_table(info) \
1817 ((struct elf_aarch64_link_hash_table *) ((info)->hash))
a06ea964
NC		 1818
1819#define aarch64_stub_hash_lookup(table, string, create, copy) \
cec5225b 1820 ((struct elf_aarch64_stub_hash_entry *) \
a06ea964
NC		 1821 bfd_hash_lookup ((table), (string), (create), (copy)))
1822
1823/* AArch64 ELF linker hash table. */
cec5225b 1824struct elf_aarch64_link_hash_table
a06ea964
NC		 1825{
1826 /* The main hash table. */
1827 struct elf_link_hash_table root;
1828
1829 /* Nonzero to force PIC branch veneers. */
1830 int pic_veneer;
1831
68fcca92
JW		 1832 /* Fix erratum 835769. */
1833 int fix_erratum_835769;
1834
1835 /* A table of fix locations for erratum 835769. This holds erratum
1836 fix locations between elfNN_aarch64_size_stubs() and
1837 elfNN_aarch64_write_section(). */
1838 struct aarch64_erratum_835769_fix *aarch64_erratum_835769_fixes;
1839 unsigned int num_aarch64_erratum_835769_fixes;
1840
a06ea964
NC		 1841 /* The number of bytes in the initial entry in the PLT. */
1842 bfd_size_type plt_header_size;
1843
1844 /* The number of bytes in the subsequent PLT etries. */
1845 bfd_size_type plt_entry_size;
1846
1847 /* Short-cuts to get to dynamic linker sections. */
1848 asection *sdynbss;
1849 asection *srelbss;
1850
1851 /* Small local sym cache. */
1852 struct sym_cache sym_cache;
1853
1854 /* For convenience in allocate_dynrelocs. */
1855 bfd *obfd;
1856
1857 /* The amount of space used by the reserved portion of the sgotplt
1858 section, plus whatever space is used by the jump slots. */
1859 bfd_vma sgotplt_jump_table_size;
1860
1861 /* The stub hash table. */
1862 struct bfd_hash_table stub_hash_table;
1863
1864 /* Linker stub bfd. */
1865 bfd *stub_bfd;
1866
1867 /* Linker call-backs. */
1868 asection *(*add_stub_section) (const char *, asection *);
1869 void (*layout_sections_again) (void);
1870
1871 /* Array to keep track of which stub sections have been created, and
1872 information on stub grouping. */
1873 struct map_stub
1874 {
1875 /* This is the section to which stubs in the group will be
1876 attached. */
1877 asection *link_sec;
1878 /* The stub section. */
1879 asection *stub_sec;
1880 } *stub_group;
1881
cec5225b 1882 /* Assorted information used by elfNN_aarch64_size_stubs. */
a06ea964
NC		 1883 unsigned int bfd_count;
1884 int top_index;
1885 asection **input_list;
1886
1887 /* The offset into splt of the PLT entry for the TLS descriptor
1888 resolver. Special values are 0, if not necessary (or not found
1889 to be necessary yet), and -1 if needed but not determined
1890 yet. */
1891 bfd_vma tlsdesc_plt;
1892
1893 /* The GOT offset for the lazy trampoline. Communicated to the
1894 loader via DT_TLSDESC_GOT. The magic value (bfd_vma) -1
1895 indicates an offset is not allocated. */
1896 bfd_vma dt_tlsdesc_got;
1419bbe5
WN		 1897
1898 /* Used by local STT_GNU_IFUNC symbols. */
1899 htab_t loc_hash_table;
1900 void * loc_hash_memory;
a06ea964
NC		 1901};
1902
a06ea964
NC		 1903/* Create an entry in an AArch64 ELF linker hash table. */
1904
1905static struct bfd_hash_entry *
cec5225b 1906elfNN_aarch64_link_hash_newfunc (struct bfd_hash_entry *entry,
a06ea964
NC		 1907 struct bfd_hash_table *table,
1908 const char *string)
1909{
cec5225b
YZ		 1910 struct elf_aarch64_link_hash_entry *ret =
1911 (struct elf_aarch64_link_hash_entry *) entry;
a06ea964
NC		 1912
1913 /* Allocate the structure if it has not already been allocated by a
1914 subclass. */
1915 if (ret == NULL)
1916 ret = bfd_hash_allocate (table,
cec5225b 1917 sizeof (struct elf_aarch64_link_hash_entry));
a06ea964
NC		 1918 if (ret == NULL)
1919 return (struct bfd_hash_entry *) ret;
1920
1921 /* Call the allocation method of the superclass. */
cec5225b 1922 ret = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC		 1923 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
1924 table, string));
1925 if (ret != NULL)
1926 {
1927 ret->dyn_relocs = NULL;
a06ea964
NC		 1928 ret->got_type = GOT_UNKNOWN;
1929 ret->plt_got_offset = (bfd_vma) - 1;
1930 ret->stub_cache = NULL;
1931 ret->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
1932 }
1933
1934 return (struct bfd_hash_entry *) ret;
1935}
1936
1937/* Initialize an entry in the stub hash table. */
1938
1939static struct bfd_hash_entry *
1940stub_hash_newfunc (struct bfd_hash_entry *entry,
1941 struct bfd_hash_table *table, const char *string)
1942{
1943 /* Allocate the structure if it has not already been allocated by a
1944 subclass. */
1945 if (entry == NULL)
1946 {
1947 entry = bfd_hash_allocate (table,
1948 sizeof (struct
cec5225b 1949 elf_aarch64_stub_hash_entry));
a06ea964
NC		 1950 if (entry == NULL)
1951 return entry;
1952 }
1953
1954 /* Call the allocation method of the superclass. */
1955 entry = bfd_hash_newfunc (entry, table, string);
1956 if (entry != NULL)
1957 {
cec5225b 1958 struct elf_aarch64_stub_hash_entry *eh;
a06ea964
NC		 1959
1960 /* Initialize the local fields. */
cec5225b 1961 eh = (struct elf_aarch64_stub_hash_entry *) entry;
a06ea964
NC		 1962 eh->stub_sec = NULL;
1963 eh->stub_offset = 0;
1964 eh->target_value = 0;
1965 eh->target_section = NULL;
1966 eh->stub_type = aarch64_stub_none;
1967 eh->h = NULL;
1968 eh->id_sec = NULL;
1969 }
1970
1971 return entry;
1972}
1973
1419bbe5
WN		 1974/* Compute a hash of a local hash entry. We use elf_link_hash_entry
1975 for local symbol so that we can handle local STT_GNU_IFUNC symbols
1976 as global symbol. We reuse indx and dynstr_index for local symbol
1977 hash since they aren't used by global symbols in this backend. */
1978
1979static hashval_t
1980elfNN_aarch64_local_htab_hash (const void *ptr)
1981{
1982 struct elf_link_hash_entry *h
1983 = (struct elf_link_hash_entry *) ptr;
1984 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
1985}
1986
1987/* Compare local hash entries. */
1988
1989static int
1990elfNN_aarch64_local_htab_eq (const void *ptr1, const void *ptr2)
1991{
1992 struct elf_link_hash_entry *h1
1993 = (struct elf_link_hash_entry *) ptr1;
1994 struct elf_link_hash_entry *h2
1995 = (struct elf_link_hash_entry *) ptr2;
1996
1997 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
1998}
1999
2000/* Find and/or create a hash entry for local symbol. */
2001
2002static struct elf_link_hash_entry *
2003elfNN_aarch64_get_local_sym_hash (struct elf_aarch64_link_hash_table *htab,
2004 bfd *abfd, const Elf_Internal_Rela *rel,
2005 bfd_boolean create)
2006{
2007 struct elf_aarch64_link_hash_entry e, *ret;
2008 asection *sec = abfd->sections;
2009 hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id,
2010 ELFNN_R_SYM (rel->r_info));
2011 void **slot;
2012
2013 e.root.indx = sec->id;
2014 e.root.dynstr_index = ELFNN_R_SYM (rel->r_info);
2015 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
2016 create ? INSERT : NO_INSERT);
2017
2018 if (!slot)
2019 return NULL;
2020
2021 if (*slot)
2022 {
2023 ret = (struct elf_aarch64_link_hash_entry *) *slot;
2024 return &ret->root;
2025 }
2026
2027 ret = (struct elf_aarch64_link_hash_entry *)
2028 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
2029 sizeof (struct elf_aarch64_link_hash_entry));
2030 if (ret)
2031 {
2032 memset (ret, 0, sizeof (*ret));
2033 ret->root.indx = sec->id;
2034 ret->root.dynstr_index = ELFNN_R_SYM (rel->r_info);
2035 ret->root.dynindx = -1;
2036 *slot = ret;
2037 }
2038 return &ret->root;
2039}
a06ea964
NC		 2040
2041/* Copy the extra info we tack onto an elf_link_hash_entry. */
2042
2043static void
cec5225b 2044elfNN_aarch64_copy_indirect_symbol (struct bfd_link_info *info,
a06ea964
NC		 2045 struct elf_link_hash_entry *dir,
2046 struct elf_link_hash_entry *ind)
2047{
cec5225b 2048 struct elf_aarch64_link_hash_entry *edir, *eind;
a06ea964 2049
cec5225b
YZ		 2050 edir = (struct elf_aarch64_link_hash_entry *) dir;
2051 eind = (struct elf_aarch64_link_hash_entry *) ind;
a06ea964
NC		 2052
2053 if (eind->dyn_relocs != NULL)
2054 {
2055 if (edir->dyn_relocs != NULL)
2056 {
2057 struct elf_dyn_relocs **pp;
2058 struct elf_dyn_relocs *p;
2059
2060 /* Add reloc counts against the indirect sym to the direct sym
2061 list. Merge any entries against the same section. */
2062 for (pp = &eind->dyn_relocs; (p = *pp) != NULL;)
2063 {
2064 struct elf_dyn_relocs *q;
2065
2066 for (q = edir->dyn_relocs; q != NULL; q = q->next)
2067 if (q->sec == p->sec)
2068 {
2069 q->pc_count += p->pc_count;
2070 q->count += p->count;
2071 *pp = p->next;
2072 break;
2073 }
2074 if (q == NULL)
2075 pp = &p->next;
2076 }
2077 *pp = edir->dyn_relocs;
2078 }
2079
2080 edir->dyn_relocs = eind->dyn_relocs;
2081 eind->dyn_relocs = NULL;
2082 }
2083
a06ea964
NC		 2084 if (ind->root.type == bfd_link_hash_indirect)
2085 {
2086 /* Copy over PLT info. */
2087 if (dir->got.refcount <= 0)
2088 {
2089 edir->got_type = eind->got_type;
2090 eind->got_type = GOT_UNKNOWN;
2091 }
2092 }
2093
2094 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2095}
2096
68faa637
AM		 2097/* Destroy an AArch64 elf linker hash table. */
2098
2099static void
d495ab0d 2100elfNN_aarch64_link_hash_table_free (bfd *obfd)
68faa637
AM		 2101{
2102 struct elf_aarch64_link_hash_table *ret
d495ab0d 2103 = (struct elf_aarch64_link_hash_table *) obfd->link.hash;
68faa637
AM		 2104
2105 if (ret->loc_hash_table)
2106 htab_delete (ret->loc_hash_table);
2107 if (ret->loc_hash_memory)
2108 objalloc_free ((struct objalloc *) ret->loc_hash_memory);
2109
2110 bfd_hash_table_free (&ret->stub_hash_table);
d495ab0d 2111 _bfd_elf_link_hash_table_free (obfd);
68faa637
AM		 2112}
2113
a06ea964
NC		 2114/* Create an AArch64 elf linker hash table. */
2115
2116static struct bfd_link_hash_table *
cec5225b 2117elfNN_aarch64_link_hash_table_create (bfd *abfd)
a06ea964 2118{
cec5225b
YZ		 2119 struct elf_aarch64_link_hash_table *ret;
2120 bfd_size_type amt = sizeof (struct elf_aarch64_link_hash_table);
a06ea964 2121
7bf52ea2 2122 ret = bfd_zmalloc (amt);
a06ea964
NC		 2123 if (ret == NULL)
2124 return NULL;
2125
2126 if (!_bfd_elf_link_hash_table_init
cec5225b
YZ		 2127 (&ret->root, abfd, elfNN_aarch64_link_hash_newfunc,
2128 sizeof (struct elf_aarch64_link_hash_entry), AARCH64_ELF_DATA))
a06ea964
NC		 2129 {
2130 free (ret);
2131 return NULL;
2132 }
2133
a06ea964
NC		 2134 ret->plt_header_size = PLT_ENTRY_SIZE;
2135 ret->plt_entry_size = PLT_SMALL_ENTRY_SIZE;
a06ea964 2136 ret->obfd = abfd;
a06ea964
NC		 2137 ret->dt_tlsdesc_got = (bfd_vma) - 1;
2138
2139 if (!bfd_hash_table_init (&ret->stub_hash_table, stub_hash_newfunc,
cec5225b 2140 sizeof (struct elf_aarch64_stub_hash_entry)))
a06ea964 2141 {
d495ab0d 2142 _bfd_elf_link_hash_table_free (abfd);
a06ea964
NC		 2143 return NULL;
2144 }
2145
1419bbe5
WN		 2146 ret->loc_hash_table = htab_try_create (1024,
2147 elfNN_aarch64_local_htab_hash,
2148 elfNN_aarch64_local_htab_eq,
2149 NULL);
2150 ret->loc_hash_memory = objalloc_create ();
2151 if (!ret->loc_hash_table || !ret->loc_hash_memory)
2152 {
d495ab0d 2153 elfNN_aarch64_link_hash_table_free (abfd);
1419bbe5
WN		 2154 return NULL;
2155 }
d495ab0d 2156 ret->root.root.hash_table_free = elfNN_aarch64_link_hash_table_free;
1419bbe5 2157
a06ea964
NC		 2158 return &ret->root.root;
2159}
2160
a06ea964
NC		 2161static bfd_boolean
2162aarch64_relocate (unsigned int r_type, bfd *input_bfd, asection *input_section,
2163 bfd_vma offset, bfd_vma value)
2164{
2165 reloc_howto_type *howto;
2166 bfd_vma place;
2167
cec5225b 2168 howto = elfNN_aarch64_howto_from_type (r_type);
a06ea964
NC		 2169 place = (input_section->output_section->vma + input_section->output_offset
2170 + offset);
caed7120
YZ		 2171
2172 r_type = elfNN_aarch64_bfd_reloc_from_type (r_type);
2173 value = _bfd_aarch64_elf_resolve_relocation (r_type, place, value, 0, FALSE);
2174 return _bfd_aarch64_elf_put_addend (input_bfd,
2175 input_section->contents + offset, r_type,
2176 howto, value);
a06ea964
NC		 2177}
2178
cec5225b 2179static enum elf_aarch64_stub_type
a06ea964
NC		 2180aarch64_select_branch_stub (bfd_vma value, bfd_vma place)
2181{
2182 if (aarch64_valid_for_adrp_p (value, place))
2183 return aarch64_stub_adrp_branch;
2184 return aarch64_stub_long_branch;
2185}
2186
2187/* Determine the type of stub needed, if any, for a call. */
2188
cec5225b 2189static enum elf_aarch64_stub_type
a06ea964
NC		 2190aarch64_type_of_stub (struct bfd_link_info *info,
2191 asection *input_sec,
2192 const Elf_Internal_Rela *rel,
2193 unsigned char st_type,
cec5225b 2194 struct elf_aarch64_link_hash_entry *hash,
a06ea964
NC		 2195 bfd_vma destination)
2196{
2197 bfd_vma location;
2198 bfd_signed_vma branch_offset;
2199 unsigned int r_type;
cec5225b
YZ		 2200 struct elf_aarch64_link_hash_table *globals;
2201 enum elf_aarch64_stub_type stub_type = aarch64_stub_none;
a06ea964
NC		 2202 bfd_boolean via_plt_p;
2203
2204 if (st_type != STT_FUNC)
2205 return stub_type;
2206
cec5225b 2207 globals = elf_aarch64_hash_table (info);
a06ea964
NC		 2208 via_plt_p = (globals->root.splt != NULL && hash != NULL
2209 && hash->root.plt.offset != (bfd_vma) - 1);
2210
2211 if (via_plt_p)
2212 return stub_type;
2213
2214 /* Determine where the call point is. */
2215 location = (input_sec->output_offset
2216 + input_sec->output_section->vma + rel->r_offset);
2217
2218 branch_offset = (bfd_signed_vma) (destination - location);
2219
cec5225b 2220 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC		 2221
2222 /* We don't want to redirect any old unconditional jump in this way,
2223 only one which is being used for a sibcall, where it is
2224 acceptable for the IP0 and IP1 registers to be clobbered. */
a6bb11b2 2225 if ((r_type == AARCH64_R (CALL26) || r_type == AARCH64_R (JUMP26))
a06ea964
NC		 2226 && (branch_offset > AARCH64_MAX_FWD_BRANCH_OFFSET
2227 || branch_offset < AARCH64_MAX_BWD_BRANCH_OFFSET))
2228 {
2229 stub_type = aarch64_stub_long_branch;
2230 }
2231
2232 return stub_type;
2233}
2234
2235/* Build a name for an entry in the stub hash table. */
2236
2237static char *
cec5225b 2238elfNN_aarch64_stub_name (const asection *input_section,
a06ea964 2239 const asection *sym_sec,
cec5225b 2240 const struct elf_aarch64_link_hash_entry *hash,
a06ea964
NC		 2241 const Elf_Internal_Rela *rel)
2242{
2243 char *stub_name;
2244 bfd_size_type len;
2245
2246 if (hash)
2247 {
2248 len = 8 + 1 + strlen (hash->root.root.root.string) + 1 + 16 + 1;
2249 stub_name = bfd_malloc (len);
2250 if (stub_name != NULL)
2251 snprintf (stub_name, len, "%08x_%s+%" BFD_VMA_FMT "x",
2252 (unsigned int) input_section->id,
2253 hash->root.root.root.string,
2254 rel->r_addend);
2255 }
2256 else
2257 {
2258 len = 8 + 1 + 8 + 1 + 8 + 1 + 16 + 1;
2259 stub_name = bfd_malloc (len);
2260 if (stub_name != NULL)
2261 snprintf (stub_name, len, "%08x_%x:%x+%" BFD_VMA_FMT "x",
2262 (unsigned int) input_section->id,
2263 (unsigned int) sym_sec->id,
cec5225b 2264 (unsigned int) ELFNN_R_SYM (rel->r_info),
a06ea964
NC		 2265 rel->r_addend);
2266 }
2267
2268 return stub_name;
2269}
2270
2271/* Look up an entry in the stub hash. Stub entries are cached because
2272 creating the stub name takes a bit of time. */
2273
cec5225b
YZ		 2274static struct elf_aarch64_stub_hash_entry *
2275elfNN_aarch64_get_stub_entry (const asection *input_section,
a06ea964
NC		 2276 const asection *sym_sec,
2277 struct elf_link_hash_entry *hash,
2278 const Elf_Internal_Rela *rel,
cec5225b 2279 struct elf_aarch64_link_hash_table *htab)
a06ea964 2280{
cec5225b
YZ		 2281 struct elf_aarch64_stub_hash_entry *stub_entry;
2282 struct elf_aarch64_link_hash_entry *h =
2283 (struct elf_aarch64_link_hash_entry *) hash;
a06ea964
NC		 2284 const asection *id_sec;
2285
2286 if ((input_section->flags & SEC_CODE) == 0)
2287 return NULL;
2288
2289 /* If this input section is part of a group of sections sharing one
2290 stub section, then use the id of the first section in the group.
2291 Stub names need to include a section id, as there may well be
2292 more than one stub used to reach say, printf, and we need to
2293 distinguish between them. */
2294 id_sec = htab->stub_group[input_section->id].link_sec;
2295
2296 if (h != NULL && h->stub_cache != NULL
2297 && h->stub_cache->h == h && h->stub_cache->id_sec == id_sec)
2298 {
2299 stub_entry = h->stub_cache;
2300 }
2301 else
2302 {
2303 char *stub_name;
2304
cec5225b 2305 stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, h, rel);
a06ea964
NC		 2306 if (stub_name == NULL)
2307 return NULL;
2308
2309 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table,
2310 stub_name, FALSE, FALSE);
2311 if (h != NULL)
2312 h->stub_cache = stub_entry;
2313
2314 free (stub_name);
2315 }
2316
2317 return stub_entry;
2318}
2319
2320/* Add a new stub entry to the stub hash. Not all fields of the new
2321 stub entry are initialised. */
2322
cec5225b
YZ		 2323static struct elf_aarch64_stub_hash_entry *
2324elfNN_aarch64_add_stub (const char *stub_name,
a06ea964 2325 asection *section,
cec5225b 2326 struct elf_aarch64_link_hash_table *htab)
a06ea964
NC		 2327{
2328 asection *link_sec;
2329 asection *stub_sec;
cec5225b 2330 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC		 2331
2332 link_sec = htab->stub_group[section->id].link_sec;
2333 stub_sec = htab->stub_group[section->id].stub_sec;
2334 if (stub_sec == NULL)
2335 {
2336 stub_sec = htab->stub_group[link_sec->id].stub_sec;
2337 if (stub_sec == NULL)
2338 {
2339 size_t namelen;
2340 bfd_size_type len;
2341 char *s_name;
2342
2343 namelen = strlen (link_sec->name);
2344 len = namelen + sizeof (STUB_SUFFIX);
2345 s_name = bfd_alloc (htab->stub_bfd, len);
2346 if (s_name == NULL)
2347 return NULL;
2348
2349 memcpy (s_name, link_sec->name, namelen);
2350 memcpy (s_name + namelen, STUB_SUFFIX, sizeof (STUB_SUFFIX));
2351 stub_sec = (*htab->add_stub_section) (s_name, link_sec);
2352 if (stub_sec == NULL)
2353 return NULL;
2354 htab->stub_group[link_sec->id].stub_sec = stub_sec;
2355 }
2356 htab->stub_group[section->id].stub_sec = stub_sec;
2357 }
2358
2359 /* Enter this entry into the linker stub hash table. */
2360 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
2361 TRUE, FALSE);
2362 if (stub_entry == NULL)
2363 {
2364 (*_bfd_error_handler) (_("%s: cannot create stub entry %s"),
2365 section->owner, stub_name);
2366 return NULL;
2367 }
2368
2369 stub_entry->stub_sec = stub_sec;
2370 stub_entry->stub_offset = 0;
2371 stub_entry->id_sec = link_sec;
2372
2373 return stub_entry;
2374}
2375
2376static bfd_boolean
2377aarch64_build_one_stub (struct bfd_hash_entry *gen_entry,
2378 void *in_arg ATTRIBUTE_UNUSED)
2379{
cec5225b 2380 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC		 2381 asection *stub_sec;
2382 bfd *stub_bfd;
2383 bfd_byte *loc;
2384 bfd_vma sym_value;
68fcca92
JW		 2385 bfd_vma veneered_insn_loc;
2386 bfd_vma veneer_entry_loc;
2387 bfd_signed_vma branch_offset = 0;
a06ea964
NC		 2388 unsigned int template_size;
2389 const uint32_t *template;
2390 unsigned int i;
2391
2392 /* Massage our args to the form they really have. */
cec5225b 2393 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
a06ea964
NC		 2394
2395 stub_sec = stub_entry->stub_sec;
2396
2397 /* Make a note of the offset within the stubs for this entry. */
2398 stub_entry->stub_offset = stub_sec->size;
2399 loc = stub_sec->contents + stub_entry->stub_offset;
2400
2401 stub_bfd = stub_sec->owner;
2402
2403 /* This is the address of the stub destination. */
2404 sym_value = (stub_entry->target_value
2405 + stub_entry->target_section->output_offset
2406 + stub_entry->target_section->output_section->vma);
2407
2408 if (stub_entry->stub_type == aarch64_stub_long_branch)
2409 {
2410 bfd_vma place = (stub_entry->stub_offset + stub_sec->output_section->vma
2411 + stub_sec->output_offset);
2412
2413 /* See if we can relax the stub. */
2414 if (aarch64_valid_for_adrp_p (sym_value, place))
2415 stub_entry->stub_type = aarch64_select_branch_stub (sym_value, place);
2416 }
2417
2418 switch (stub_entry->stub_type)
2419 {
2420 case aarch64_stub_adrp_branch:
2421 template = aarch64_adrp_branch_stub;
2422 template_size = sizeof (aarch64_adrp_branch_stub);
2423 break;
2424 case aarch64_stub_long_branch:
2425 template = aarch64_long_branch_stub;
2426 template_size = sizeof (aarch64_long_branch_stub);
2427 break;
68fcca92
JW		 2428 case aarch64_stub_erratum_835769_veneer:
2429 template = aarch64_erratum_835769_stub;
2430 template_size = sizeof (aarch64_erratum_835769_stub);
2431 break;
a06ea964
NC		 2432 default:
2433 BFD_FAIL ();
2434 return FALSE;
2435 }
2436
2437 for (i = 0; i < (template_size / sizeof template[0]); i++)
2438 {
2439 bfd_putl32 (template[i], loc);
2440 loc += 4;
2441 }
2442
2443 template_size = (template_size + 7) & ~7;
2444 stub_sec->size += template_size;
2445
2446 switch (stub_entry->stub_type)
2447 {
2448 case aarch64_stub_adrp_branch:
a6bb11b2 2449 if (aarch64_relocate (AARCH64_R (ADR_PREL_PG_HI21), stub_bfd, stub_sec,
a06ea964
NC		 2450 stub_entry->stub_offset, sym_value))
2451 /* The stub would not have been relaxed if the offset was out
2452 of range. */
2453 BFD_FAIL ();
2454
2455 _bfd_final_link_relocate
a6bb11b2 2456 (elfNN_aarch64_howto_from_type (AARCH64_R (ADD_ABS_LO12_NC)),
a06ea964
NC		 2457 stub_bfd,
2458 stub_sec,
2459 stub_sec->contents,
2460 stub_entry->stub_offset + 4,
2461 sym_value,
2462 0);
2463 break;
2464
2465 case aarch64_stub_long_branch:
2466 /* We want the value relative to the address 12 bytes back from the
2467 value itself. */
cec5225b 2468 _bfd_final_link_relocate (elfNN_aarch64_howto_from_type
a6bb11b2 2469 (AARCH64_R (PRELNN)), stub_bfd, stub_sec,
a06ea964
NC		 2470 stub_sec->contents,
2471 stub_entry->stub_offset + 16,
2472 sym_value + 12, 0);
2473 break;
68fcca92
JW		 2474
2475 case aarch64_stub_erratum_835769_veneer:
2476 veneered_insn_loc = stub_entry->target_section->output_section->vma
2477 + stub_entry->target_section->output_offset
2478 + stub_entry->target_value;
2479 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
2480 + stub_entry->stub_sec->output_offset
2481 + stub_entry->stub_offset;
2482 branch_offset = veneered_insn_loc - veneer_entry_loc;
2483 branch_offset >>= 2;
2484 branch_offset &= 0x3ffffff;
2485 bfd_putl32 (stub_entry->veneered_insn,
2486 stub_sec->contents + stub_entry->stub_offset);
2487 bfd_putl32 (template[1] | branch_offset,
2488 stub_sec->contents + stub_entry->stub_offset + 4);
2489 break;
2490
a06ea964
NC		 2491 default:
2492 break;
2493 }
2494
2495 return TRUE;
2496}
2497
2498/* As above, but don't actually build the stub. Just bump offset so
2499 we know stub section sizes. */
2500
2501static bfd_boolean
2502aarch64_size_one_stub (struct bfd_hash_entry *gen_entry,
2503 void *in_arg ATTRIBUTE_UNUSED)
2504{
cec5225b 2505 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC		 2506 int size;
2507
2508 /* Massage our args to the form they really have. */
cec5225b 2509 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
a06ea964
NC		 2510
2511 switch (stub_entry->stub_type)
2512 {
2513 case aarch64_stub_adrp_branch:
2514 size = sizeof (aarch64_adrp_branch_stub);
2515 break;
2516 case aarch64_stub_long_branch:
2517 size = sizeof (aarch64_long_branch_stub);
2518 break;
68fcca92
JW		 2519 case aarch64_stub_erratum_835769_veneer:
2520 size = sizeof (aarch64_erratum_835769_stub);
2521 break;
a06ea964
NC		 2522 default:
2523 BFD_FAIL ();
2524 return FALSE;
2525 break;
2526 }
2527
2528 size = (size + 7) & ~7;
2529 stub_entry->stub_sec->size += size;
2530 return TRUE;
2531}
2532
2533/* External entry points for sizing and building linker stubs. */
2534
2535/* Set up various things so that we can make a list of input sections
2536 for each output section included in the link. Returns -1 on error,
2537 0 when no stubs will be needed, and 1 on success. */
2538
2539int
cec5225b 2540elfNN_aarch64_setup_section_lists (bfd *output_bfd,
a06ea964
NC		 2541 struct bfd_link_info *info)
2542{
2543 bfd *input_bfd;
2544 unsigned int bfd_count;
2545 int top_id, top_index;
2546 asection *section;
2547 asection **input_list, **list;
2548 bfd_size_type amt;
cec5225b
YZ		 2549 struct elf_aarch64_link_hash_table *htab =
2550 elf_aarch64_hash_table (info);
a06ea964
NC		 2551
2552 if (!is_elf_hash_table (htab))
2553 return 0;
2554
2555 /* Count the number of input BFDs and find the top input section id. */
2556 for (input_bfd = info->input_bfds, bfd_count = 0, top_id = 0;
c72f2fb2 2557 input_bfd != NULL; input_bfd = input_bfd->link.next)
a06ea964
NC		 2558 {
2559 bfd_count += 1;
2560 for (section = input_bfd->sections;
2561 section != NULL; section = section->next)
2562 {
2563 if (top_id < section->id)
2564 top_id = section->id;
2565 }
2566 }
2567 htab->bfd_count = bfd_count;
2568
2569 amt = sizeof (struct map_stub) * (top_id + 1);
2570 htab->stub_group = bfd_zmalloc (amt);
2571 if (htab->stub_group == NULL)
2572 return -1;
2573
2574 /* We can't use output_bfd->section_count here to find the top output
2575 section index as some sections may have been removed, and
2576 _bfd_strip_section_from_output doesn't renumber the indices. */
2577 for (section = output_bfd->sections, top_index = 0;
2578 section != NULL; section = section->next)
2579 {
2580 if (top_index < section->index)
2581 top_index = section->index;
2582 }
2583
2584 htab->top_index = top_index;
2585 amt = sizeof (asection *) * (top_index + 1);
2586 input_list = bfd_malloc (amt);
2587 htab->input_list = input_list;
2588 if (input_list == NULL)
2589 return -1;
2590
2591 /* For sections we aren't interested in, mark their entries with a
2592 value we can check later. */
2593 list = input_list + top_index;
2594 do
2595 *list = bfd_abs_section_ptr;
2596 while (list-- != input_list);
2597
2598 for (section = output_bfd->sections;
2599 section != NULL; section = section->next)
2600 {
2601 if ((section->flags & SEC_CODE) != 0)
2602 input_list[section->index] = NULL;
2603 }
2604
2605 return 1;
2606}
2607
cec5225b 2608/* Used by elfNN_aarch64_next_input_section and group_sections. */
a06ea964
NC		 2609#define PREV_SEC(sec) (htab->stub_group[(sec)->id].link_sec)
2610
2611/* The linker repeatedly calls this function for each input section,
2612 in the order that input sections are linked into output sections.
2613 Build lists of input sections to determine groupings between which
2614 we may insert linker stubs. */
2615
2616void
cec5225b 2617elfNN_aarch64_next_input_section (struct bfd_link_info *info, asection *isec)
a06ea964 2618{
cec5225b
YZ		 2619 struct elf_aarch64_link_hash_table *htab =
2620 elf_aarch64_hash_table (info);
a06ea964
NC		 2621
2622 if (isec->output_section->index <= htab->top_index)
2623 {
2624 asection **list = htab->input_list + isec->output_section->index;
2625
2626 if (*list != bfd_abs_section_ptr)
2627 {
2628 /* Steal the link_sec pointer for our list. */
2629 /* This happens to make the list in reverse order,
2630 which is what we want. */
2631 PREV_SEC (isec) = *list;
2632 *list = isec;
2633 }
2634 }
2635}
2636
2637/* See whether we can group stub sections together. Grouping stub
2638 sections may result in fewer stubs. More importantly, we need to
2639 put all .init* and .fini* stubs at the beginning of the .init or
2640 .fini output sections respectively, because glibc splits the
2641 _init and _fini functions into multiple parts. Putting a stub in
2642 the middle of a function is not a good idea. */
2643
2644static void
cec5225b 2645group_sections (struct elf_aarch64_link_hash_table *htab,
a06ea964
NC		 2646 bfd_size_type stub_group_size,
2647 bfd_boolean stubs_always_before_branch)
2648{
2649 asection **list = htab->input_list + htab->top_index;
2650
2651 do
2652 {
2653 asection *tail = *list;
2654
2655 if (tail == bfd_abs_section_ptr)
2656 continue;
2657
2658 while (tail != NULL)
2659 {
2660 asection *curr;
2661 asection *prev;
2662 bfd_size_type total;
2663
2664 curr = tail;
2665 total = tail->size;
2666 while ((prev = PREV_SEC (curr)) != NULL
2667 && ((total += curr->output_offset - prev->output_offset)
2668 < stub_group_size))
2669 curr = prev;
2670
2671 /* OK, the size from the start of CURR to the end is less
2672 than stub_group_size and thus can be handled by one stub
2673 section. (Or the tail section is itself larger than
2674 stub_group_size, in which case we may be toast.)
2675 We should really be keeping track of the total size of
2676 stubs added here, as stubs contribute to the final output
2677 section size. */
2678 do
2679 {
2680 prev = PREV_SEC (tail);
2681 /* Set up this stub group. */
2682 htab->stub_group[tail->id].link_sec = curr;
2683 }
2684 while (tail != curr && (tail = prev) != NULL);
2685
2686 /* But wait, there's more! Input sections up to stub_group_size
2687 bytes before the stub section can be handled by it too. */
2688 if (!stubs_always_before_branch)
2689 {
2690 total = 0;
2691 while (prev != NULL
2692 && ((total += tail->output_offset - prev->output_offset)
2693 < stub_group_size))
2694 {
2695 tail = prev;
2696 prev = PREV_SEC (tail);
2697 htab->stub_group[tail->id].link_sec = curr;
2698 }
2699 }
2700 tail = prev;
2701 }
2702 }
2703 while (list-- != htab->input_list);
2704
2705 free (htab->input_list);
2706}
2707
2708#undef PREV_SEC
2709
68fcca92
JW		 2710#define AARCH64_BITS(x, pos, n) (((x) >> (pos)) & ((1 << (n)) - 1))
2711
2712#define AARCH64_RT(insn) AARCH64_BITS (insn, 0, 5)
2713#define AARCH64_RT2(insn) AARCH64_BITS (insn, 10, 5)
2714#define AARCH64_RA(insn) AARCH64_BITS (insn, 10, 5)
2715#define AARCH64_RD(insn) AARCH64_BITS (insn, 0, 5)
2716#define AARCH64_RN(insn) AARCH64_BITS (insn, 5, 5)
2717#define AARCH64_RM(insn) AARCH64_BITS (insn, 16, 5)
2718
2719#define AARCH64_MAC(insn) (((insn) & 0xff000000) == 0x9b000000)
2720#define AARCH64_BIT(insn, n) AARCH64_BITS (insn, n, 1)
2721#define AARCH64_OP31(insn) AARCH64_BITS (insn, 21, 3)
2722#define AARCH64_ZR 0x1f
2723
2724/* All ld/st ops. See C4-182 of the ARM ARM. The encoding space for
2725 LD_PCREL, LDST_RO, LDST_UI and LDST_UIMM cover prefetch ops. */
2726
2727#define AARCH64_LD(insn) (AARCH64_BIT (insn, 22) == 1)
2728#define AARCH64_LDST(insn) (((insn) & 0x0a000000) == 0x08000000)
2729#define AARCH64_LDST_EX(insn) (((insn) & 0x3f000000) == 0x08000000)
2730#define AARCH64_LDST_PCREL(insn) (((insn) & 0x3b000000) == 0x18000000)
2731#define AARCH64_LDST_NAP(insn) (((insn) & 0x3b800000) == 0x28000000)
2732#define AARCH64_LDSTP_PI(insn) (((insn) & 0x3b800000) == 0x28800000)
2733#define AARCH64_LDSTP_O(insn) (((insn) & 0x3b800000) == 0x29000000)
2734#define AARCH64_LDSTP_PRE(insn) (((insn) & 0x3b800000) == 0x29800000)
2735#define AARCH64_LDST_UI(insn) (((insn) & 0x3b200c00) == 0x38000000)
2736#define AARCH64_LDST_PIIMM(insn) (((insn) & 0x3b200c00) == 0x38000400)
2737#define AARCH64_LDST_U(insn) (((insn) & 0x3b200c00) == 0x38000800)
2738#define AARCH64_LDST_PREIMM(insn) (((insn) & 0x3b200c00) == 0x38000c00)
2739#define AARCH64_LDST_RO(insn) (((insn) & 0x3b200c00) == 0x38200800)
2740#define AARCH64_LDST_UIMM(insn) (((insn) & 0x3b000000) == 0x39000000)
2741#define AARCH64_LDST_SIMD_M(insn) (((insn) & 0xbfbf0000) == 0x0c000000)
2742#define AARCH64_LDST_SIMD_M_PI(insn) (((insn) & 0xbfa00000) == 0x0c800000)
2743#define AARCH64_LDST_SIMD_S(insn) (((insn) & 0xbf9f0000) == 0x0d000000)
2744#define AARCH64_LDST_SIMD_S_PI(insn) (((insn) & 0xbf800000) == 0x0d800000)
2745
2746/* Classify an INSN if it is indeed a load/store. Return TRUE if INSN
2747 is a load/store along with the Rt and Rtn. Return FALSE if not a
2748 load/store. */
2749
2750static bfd_boolean
2751aarch64_mem_op_p (uint32_t insn, unsigned int *rt, unsigned int *rtn,
2752 bfd_boolean *pair, bfd_boolean *load)
2753{
2754 uint32_t opcode;
2755 unsigned int r;
2756 uint32_t opc = 0;
2757 uint32_t v = 0;
2758 uint32_t opc_v = 0;
2759
2760 /* Bail out quickly if INSN doesn't fall into the the load-store
2761 encoding space. */
2762 if (!AARCH64_LDST (insn))
2763 return FALSE;
2764
2765 *pair = FALSE;
2766 *load = FALSE;
2767 if (AARCH64_LDST_EX (insn))
2768 {
2769 *rt = AARCH64_RT (insn);
2770 *rtn = *rt;
2771 if (AARCH64_BIT (insn, 21) == 1)
2772 {
2773 *pair = TRUE;
2774 *rtn = AARCH64_RT2 (insn);
2775 }
2776 *load = AARCH64_LD (insn);
2777 return TRUE;
2778 }
2779 else if (AARCH64_LDST_NAP (insn)
2780 || AARCH64_LDSTP_PI (insn)
2781 || AARCH64_LDSTP_O (insn)
2782 || AARCH64_LDSTP_PRE (insn))
2783 {
2784 *pair = TRUE;
2785 *rt = AARCH64_RT (insn);
2786 *rtn = AARCH64_RT2 (insn);
2787 *load = AARCH64_LD (insn);
2788 return TRUE;
2789 }
2790 else if (AARCH64_LDST_PCREL (insn)
2791 || AARCH64_LDST_UI (insn)
2792 || AARCH64_LDST_PIIMM (insn)
2793 || AARCH64_LDST_U (insn)
2794 || AARCH64_LDST_PREIMM (insn)
2795 || AARCH64_LDST_RO (insn)
2796 || AARCH64_LDST_UIMM (insn))
2797 {
2798 *rt = AARCH64_RT (insn);
2799 *rtn = *rt;
2800 if (AARCH64_LDST_PCREL (insn))
2801 *load = TRUE;
2802 opc = AARCH64_BITS (insn, 22, 2);
2803 v = AARCH64_BIT (insn, 26);
2804 opc_v = opc | (v << 2);
2805 *load = (opc_v == 1 || opc_v == 2 || opc_v == 3
2806 || opc_v == 5 || opc_v == 7);
2807 return TRUE;
2808 }
2809 else if (AARCH64_LDST_SIMD_M (insn)
2810 || AARCH64_LDST_SIMD_M_PI (insn))
2811 {
2812 *rt = AARCH64_RT (insn);
2813 *load = AARCH64_BIT (insn, 22);
2814 opcode = (insn >> 12) & 0xf;
2815 switch (opcode)
2816 {
2817 case 0:
2818 case 2:
2819 *rtn = *rt + 3;
2820 break;
2821
2822 case 4:
2823 case 6:
2824 *rtn = *rt + 2;
2825 break;
2826
2827 case 7:
2828 *rtn = *rt;
2829 break;
2830
2831 case 8:
2832 case 10:
2833 *rtn = *rt + 1;
2834 break;
2835
2836 default:
2837 return FALSE;
2838 }
2839 return TRUE;
2840 }
2841 else if (AARCH64_LDST_SIMD_S (insn)
2842 || AARCH64_LDST_SIMD_S_PI (insn))
2843 {
2844 *rt = AARCH64_RT (insn);
2845 r = (insn >> 21) & 1;
2846 *load = AARCH64_BIT (insn, 22);
2847 opcode = (insn >> 13) & 0x7;
2848 switch (opcode)
2849 {
2850 case 0:
2851 case 2:
2852 case 4:
2853 *rtn = *rt + r;
2854 break;
2855
2856 case 1:
2857 case 3:
2858 case 5:
2859 *rtn = *rt + (r == 0 ? 2 : 3);
2860 break;
2861
2862 case 6:
2863 *rtn = *rt + r;
2864 break;
2865
2866 case 7:
2867 *rtn = *rt + (r == 0 ? 2 : 3);
2868 break;
2869
2870 default:
2871 return FALSE;
2872 }
2873 return TRUE;
2874 }
2875
2876 return FALSE;
2877}
2878
2879/* Return TRUE if INSN is multiply-accumulate. */
2880
2881static bfd_boolean
2882aarch64_mlxl_p (uint32_t insn)
2883{
2884 uint32_t op31 = AARCH64_OP31 (insn);
2885
2886 if (AARCH64_MAC (insn)
2887 && (op31 == 0 || op31 == 1 || op31 == 5)
2888 /* Exclude MUL instructions which are encoded as a multiple accumulate
2889 with RA = XZR. */
2890 && AARCH64_RA (insn) != AARCH64_ZR)
2891 return TRUE;
2892
2893 return FALSE;
2894}
2895
2896/* Some early revisions of the Cortex-A53 have an erratum (835769) whereby
2897 it is possible for a 64-bit multiply-accumulate instruction to generate an
2898 incorrect result. The details are quite complex and hard to
2899 determine statically, since branches in the code may exist in some
2900 circumstances, but all cases end with a memory (load, store, or
2901 prefetch) instruction followed immediately by the multiply-accumulate
2902 operation. We employ a linker patching technique, by moving the potentially
2903 affected multiply-accumulate instruction into a patch region and replacing
2904 the original instruction with a branch to the patch. This function checks
2905 if INSN_1 is the memory operation followed by a multiply-accumulate
2906 operation (INSN_2). Return TRUE if an erratum sequence is found, FALSE
2907 if INSN_1 and INSN_2 are safe. */
2908
2909static bfd_boolean
2910aarch64_erratum_sequence (uint32_t insn_1, uint32_t insn_2)
2911{
2912 uint32_t rt;
2913 uint32_t rtn;
2914 uint32_t rn;
2915 uint32_t rm;
2916 uint32_t ra;
2917 bfd_boolean pair;
2918 bfd_boolean load;
2919
2920 if (aarch64_mlxl_p (insn_2)
2921 && aarch64_mem_op_p (insn_1, &rt, &rtn, &pair, &load))
2922 {
2923 /* Any SIMD memory op is independent of the subsequent MLA
2924 by definition of the erratum. */
2925 if (AARCH64_BIT (insn_1, 26))
2926 return TRUE;
2927
2928 /* If not SIMD, check for integer memory ops and MLA relationship. */
2929 rn = AARCH64_RN (insn_2);
2930 ra = AARCH64_RA (insn_2);
2931 rm = AARCH64_RM (insn_2);
2932
2933 /* If this is a load and there's a true(RAW) dependency, we are safe
2934 and this is not an erratum sequence. */
2935 if (load &&
2936 (rt == rn || rt == rm || rt == ra
2937 || (pair && (rtn == rn || rtn == rm || rtn == ra))))
2938 return FALSE;
2939
2940 /* We conservatively put out stubs for all other cases (including
2941 writebacks). */
2942 return TRUE;
2943 }
2944
2945 return FALSE;
2946}
2947
520c7b56
JW		 2948/* Used to order a list of mapping symbols by address. */
2949
2950static int
2951elf_aarch64_compare_mapping (const void *a, const void *b)
2952{
2953 const elf_aarch64_section_map *amap = (const elf_aarch64_section_map *) a;
2954 const elf_aarch64_section_map *bmap = (const elf_aarch64_section_map *) b;
2955
2956 if (amap->vma > bmap->vma)
2957 return 1;
2958 else if (amap->vma < bmap->vma)
2959 return -1;
2960 else if (amap->type > bmap->type)
2961 /* Ensure results do not depend on the host qsort for objects with
2962 multiple mapping symbols at the same address by sorting on type
2963 after vma. */
2964 return 1;
2965 else if (amap->type < bmap->type)
2966 return -1;
2967 else
2968 return 0;
2969}
2970
68fcca92
JW		 2971static bfd_boolean
2972erratum_835769_scan (bfd *input_bfd,
2973 struct bfd_link_info *info,
2974 struct aarch64_erratum_835769_fix **fixes_p,
2975 unsigned int *num_fixes_p,
2976 unsigned int *fix_table_size_p)
2977{
2978 asection *section;
2979 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
2980 struct aarch64_erratum_835769_fix *fixes = *fixes_p;
2981 unsigned int num_fixes = *num_fixes_p;
2982 unsigned int fix_table_size = *fix_table_size_p;
2983
2984 if (htab == NULL)
2985 return FALSE;
2986
2987 for (section = input_bfd->sections;
2988 section != NULL;
2989 section = section->next)
2990 {
2991 bfd_byte *contents = NULL;
2992 struct _aarch64_elf_section_data *sec_data;
2993 unsigned int span;
2994
2995 if (elf_section_type (section) != SHT_PROGBITS
2996 || (elf_section_flags (section) & SHF_EXECINSTR) == 0
2997 || (section->flags & SEC_EXCLUDE) != 0
2998 || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
2999 || (section->output_section == bfd_abs_section_ptr))
3000 continue;
3001
3002 if (elf_section_data (section)->this_hdr.contents != NULL)
3003 contents = elf_section_data (section)->this_hdr.contents;
3004 else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
3005 return TRUE;
3006
3007 sec_data = elf_aarch64_section_data (section);
520c7b56
JW		 3008
3009 qsort (sec_data->map, sec_data->mapcount,
3010 sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
3011
68fcca92
JW		 3012 for (span = 0; span < sec_data->mapcount; span++)
3013 {
3014 unsigned int span_start = sec_data->map[span].vma;
3015 unsigned int span_end = ((span == sec_data->mapcount - 1)
3016 ? sec_data->map[0].vma + section->size
3017 : sec_data->map[span + 1].vma);
3018 unsigned int i;
3019 char span_type = sec_data->map[span].type;
3020
3021 if (span_type == 'd')
3022 continue;
3023
3024 for (i = span_start; i + 4 < span_end; i += 4)
3025 {
3026 uint32_t insn_1 = bfd_getl32 (contents + i);
3027 uint32_t insn_2 = bfd_getl32 (contents + i + 4);
3028
3029 if (aarch64_erratum_sequence (insn_1, insn_2))
3030 {
3031 char *stub_name = NULL;
3032 stub_name = (char *) bfd_malloc
3033 (strlen ("__erratum_835769_veneer_") + 16);
3034 if (stub_name != NULL)
3035 sprintf
3036 (stub_name,"__erratum_835769_veneer_%d", num_fixes);
3037 else
3038 return TRUE;
3039
3040 if (num_fixes == fix_table_size)
3041 {
3042 fix_table_size *= 2;
3043 fixes =
3044 (struct aarch64_erratum_835769_fix *)
3045 bfd_realloc (fixes,
3046 sizeof (struct aarch64_erratum_835769_fix)
3047 * fix_table_size);
3048 if (fixes == NULL)
3049 return TRUE;
3050 }
3051
3052 fixes[num_fixes].input_bfd = input_bfd;
3053 fixes[num_fixes].section = section;
3054 fixes[num_fixes].offset = i + 4;
3055 fixes[num_fixes].veneered_insn = insn_2;
3056 fixes[num_fixes].stub_name = stub_name;
3057 fixes[num_fixes].stub_type = aarch64_stub_erratum_835769_veneer;
3058 num_fixes++;
3059 }
3060 }
3061 }
3062 if (elf_section_data (section)->this_hdr.contents == NULL)
3063 free (contents);
3064 }
3065
3066 *fixes_p = fixes;
3067 *num_fixes_p = num_fixes;
3068 *fix_table_size_p = fix_table_size;
3069 return FALSE;
3070}
3071
3072/* Find or create a stub section. Returns a pointer to the stub section, and
3073 the section to which the stub section will be attached (in *LINK_SEC_P).
3074 LINK_SEC_P may be NULL. */
3075
3076static asection *
3077elf_aarch64_create_or_find_stub_sec (asection **link_sec_p, asection *section,
3078 struct elf_aarch64_link_hash_table *htab)
3079{
3080 asection *link_sec;
3081 asection *stub_sec;
3082
3083 link_sec = htab->stub_group[section->id].link_sec;
3084 BFD_ASSERT (link_sec != NULL);
3085 stub_sec = htab->stub_group[section->id].stub_sec;
3086
3087 if (stub_sec == NULL)
3088 {
3089 stub_sec = htab->stub_group[link_sec->id].stub_sec;
3090 if (stub_sec == NULL)
3091 {
3092 size_t namelen;
3093 bfd_size_type len;
3094 char *s_name;
3095
3096 namelen = strlen (link_sec->name);
3097 len = namelen + sizeof (STUB_SUFFIX);
3098 s_name = (char *) bfd_alloc (htab->stub_bfd, len);
3099 if (s_name == NULL)
3100 return NULL;
3101
3102 memcpy (s_name, link_sec->name, namelen);
3103 memcpy (s_name + namelen, STUB_SUFFIX, sizeof (STUB_SUFFIX));
3104 stub_sec = (*htab->add_stub_section) (s_name, link_sec);
3105
3106 if (stub_sec == NULL)
3107 return NULL;
3108 htab->stub_group[link_sec->id].stub_sec = stub_sec;
3109 }
3110 htab->stub_group[section->id].stub_sec = stub_sec;
3111 }
3112
3113 if (link_sec_p)
3114 *link_sec_p = link_sec;
3115
3116 return stub_sec;
3117}
3118
a06ea964
NC		 3119/* Determine and set the size of the stub section for a final link.
3120
3121 The basic idea here is to examine all the relocations looking for
3122 PC-relative calls to a target that is unreachable with a "bl"
3123 instruction. */
3124
3125bfd_boolean
cec5225b 3126elfNN_aarch64_size_stubs (bfd *output_bfd,
a06ea964
NC		 3127 bfd *stub_bfd,
3128 struct bfd_link_info *info,
3129 bfd_signed_vma group_size,
3130 asection * (*add_stub_section) (const char *,
3131 asection *),
3132 void (*layout_sections_again) (void))
3133{
3134 bfd_size_type stub_group_size;
3135 bfd_boolean stubs_always_before_branch;
3136 bfd_boolean stub_changed = 0;
cec5225b 3137 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
68fcca92
JW		 3138 struct aarch64_erratum_835769_fix *erratum_835769_fixes = NULL;
3139 unsigned int num_erratum_835769_fixes = 0;
3140 unsigned int erratum_835769_fix_table_size = 10;
3141 unsigned int i;
3142
3143 if (htab->fix_erratum_835769)
3144 {
3145 erratum_835769_fixes
3146 = (struct aarch64_erratum_835769_fix *)
3147 bfd_zmalloc
3148 (sizeof (struct aarch64_erratum_835769_fix) *
3149 erratum_835769_fix_table_size);
3150 if (erratum_835769_fixes == NULL)
3151 goto error_ret_free_local;
3152 }
a06ea964
NC		 3153
3154 /* Propagate mach to stub bfd, because it may not have been
3155 finalized when we created stub_bfd. */
3156 bfd_set_arch_mach (stub_bfd, bfd_get_arch (output_bfd),
3157 bfd_get_mach (output_bfd));
3158
3159 /* Stash our params away. */
3160 htab->stub_bfd = stub_bfd;
3161 htab->add_stub_section = add_stub_section;
3162 htab->layout_sections_again = layout_sections_again;
3163 stubs_always_before_branch = group_size < 0;
3164 if (group_size < 0)
3165 stub_group_size = -group_size;
3166 else
3167 stub_group_size = group_size;
3168
3169 if (stub_group_size == 1)
3170 {
3171 /* Default values. */
b9eead84 3172 /* AArch64 branch range is +-128MB. The value used is 1MB less. */
a06ea964
NC		 3173 stub_group_size = 127 * 1024 * 1024;
3174 }
3175
3176 group_sections (htab, stub_group_size, stubs_always_before_branch);
3177
3178 while (1)
3179 {
3180 bfd *input_bfd;
3181 unsigned int bfd_indx;
3182 asection *stub_sec;
68fcca92 3183 unsigned prev_num_erratum_835769_fixes = num_erratum_835769_fixes;
a06ea964 3184
68fcca92 3185 num_erratum_835769_fixes = 0;
a06ea964 3186 for (input_bfd = info->input_bfds, bfd_indx = 0;
c72f2fb2 3187 input_bfd != NULL; input_bfd = input_bfd->link.next, bfd_indx++)
a06ea964
NC		 3188 {
3189 Elf_Internal_Shdr *symtab_hdr;
3190 asection *section;
3191 Elf_Internal_Sym *local_syms = NULL;
3192
3193 /* We'll need the symbol table in a second. */
3194 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
3195 if (symtab_hdr->sh_info == 0)
3196 continue;
3197
3198 /* Walk over each section attached to the input bfd. */
3199 for (section = input_bfd->sections;
3200 section != NULL; section = section->next)
3201 {
3202 Elf_Internal_Rela *internal_relocs, *irelaend, *irela;
3203
3204 /* If there aren't any relocs, then there's nothing more
3205 to do. */
3206 if ((section->flags & SEC_RELOC) == 0
3207 || section->reloc_count == 0
3208 || (section->flags & SEC_CODE) == 0)
3209 continue;
3210
3211 /* If this section is a link-once section that will be
3212 discarded, then don't create any stubs. */
3213 if (section->output_section == NULL
3214 || section->output_section->owner != output_bfd)
3215 continue;
3216
3217 /* Get the relocs. */
3218 internal_relocs
3219 = _bfd_elf_link_read_relocs (input_bfd, section, NULL,
3220 NULL, info->keep_memory);
3221 if (internal_relocs == NULL)
3222 goto error_ret_free_local;
3223
3224 /* Now examine each relocation. */
3225 irela = internal_relocs;
3226 irelaend = irela + section->reloc_count;
3227 for (; irela < irelaend; irela++)
3228 {
3229 unsigned int r_type, r_indx;
cec5225b
YZ		 3230 enum elf_aarch64_stub_type stub_type;
3231 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC		 3232 asection *sym_sec;
3233 bfd_vma sym_value;
3234 bfd_vma destination;
cec5225b 3235 struct elf_aarch64_link_hash_entry *hash;
a06ea964
NC		 3236 const char *sym_name;
3237 char *stub_name;
3238 const asection *id_sec;
3239 unsigned char st_type;
3240 bfd_size_type len;
3241
cec5225b
YZ		 3242 r_type = ELFNN_R_TYPE (irela->r_info);
3243 r_indx = ELFNN_R_SYM (irela->r_info);
a06ea964
NC		 3244
3245 if (r_type >= (unsigned int) R_AARCH64_end)
3246 {
3247 bfd_set_error (bfd_error_bad_value);
3248 error_ret_free_internal:
3249 if (elf_section_data (section)->relocs == NULL)
3250 free (internal_relocs);
3251 goto error_ret_free_local;
3252 }
3253
3254 /* Only look for stubs on unconditional branch and
3255 branch and link instructions. */
a6bb11b2
YZ		 3256 if (r_type != (unsigned int) AARCH64_R (CALL26)
3257 && r_type != (unsigned int) AARCH64_R (JUMP26))
a06ea964
NC		 3258 continue;
3259
3260 /* Now determine the call target, its name, value,
3261 section. */
3262 sym_sec = NULL;
3263 sym_value = 0;
3264 destination = 0;
3265 hash = NULL;
3266 sym_name = NULL;
3267 if (r_indx < symtab_hdr->sh_info)
3268 {
3269 /* It's a local symbol. */
3270 Elf_Internal_Sym *sym;
3271 Elf_Internal_Shdr *hdr;
3272
3273 if (local_syms == NULL)
3274 {
3275 local_syms
3276 = (Elf_Internal_Sym *) symtab_hdr->contents;
3277 if (local_syms == NULL)
3278 local_syms
3279 = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
3280 symtab_hdr->sh_info, 0,
3281 NULL, NULL, NULL);
3282 if (local_syms == NULL)
3283 goto error_ret_free_internal;
3284 }
3285
3286 sym = local_syms + r_indx;
3287 hdr = elf_elfsections (input_bfd)[sym->st_shndx];
3288 sym_sec = hdr->bfd_section;
3289 if (!sym_sec)
3290 /* This is an undefined symbol. It can never
3291 be resolved. */
3292 continue;
3293
3294 if (ELF_ST_TYPE (sym->st_info) != STT_SECTION)
3295 sym_value = sym->st_value;
3296 destination = (sym_value + irela->r_addend
3297 + sym_sec->output_offset
3298 + sym_sec->output_section->vma);
3299 st_type = ELF_ST_TYPE (sym->st_info);
3300 sym_name
3301 = bfd_elf_string_from_elf_section (input_bfd,
3302 symtab_hdr->sh_link,
3303 sym->st_name);
3304 }
3305 else
3306 {
3307 int e_indx;
3308
3309 e_indx = r_indx - symtab_hdr->sh_info;
cec5225b 3310 hash = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC		 3311 elf_sym_hashes (input_bfd)[e_indx]);
3312
3313 while (hash->root.root.type == bfd_link_hash_indirect
3314 || hash->root.root.type == bfd_link_hash_warning)
cec5225b 3315 hash = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC		 3316 hash->root.root.u.i.link);
3317
3318 if (hash->root.root.type == bfd_link_hash_defined
3319 || hash->root.root.type == bfd_link_hash_defweak)
3320 {
cec5225b
YZ		 3321 struct elf_aarch64_link_hash_table *globals =
3322 elf_aarch64_hash_table (info);
a06ea964
NC		 3323 sym_sec = hash->root.root.u.def.section;
3324 sym_value = hash->root.root.u.def.value;
3325 /* For a destination in a shared library,
3326 use the PLT stub as target address to
3327 decide whether a branch stub is
3328 needed. */
3329 if (globals->root.splt != NULL && hash != NULL
3330 && hash->root.plt.offset != (bfd_vma) - 1)
3331 {
3332 sym_sec = globals->root.splt;
3333 sym_value = hash->root.plt.offset;
3334 if (sym_sec->output_section != NULL)
3335 destination = (sym_value
3336 + sym_sec->output_offset
3337 +
3338 sym_sec->output_section->vma);
3339 }
3340 else if (sym_sec->output_section != NULL)
3341 destination = (sym_value + irela->r_addend
3342 + sym_sec->output_offset
3343 + sym_sec->output_section->vma);
3344 }
3345 else if (hash->root.root.type == bfd_link_hash_undefined
3346 || (hash->root.root.type
3347 == bfd_link_hash_undefweak))
3348 {
3349 /* For a shared library, use the PLT stub as
3350 target address to decide whether a long
3351 branch stub is needed.
3352 For absolute code, they cannot be handled. */
cec5225b
YZ		 3353 struct elf_aarch64_link_hash_table *globals =
3354 elf_aarch64_hash_table (info);
a06ea964
NC		 3355
3356 if (globals->root.splt != NULL && hash != NULL
3357 && hash->root.plt.offset != (bfd_vma) - 1)
3358 {
3359 sym_sec = globals->root.splt;
3360 sym_value = hash->root.plt.offset;
3361 if (sym_sec->output_section != NULL)
3362 destination = (sym_value
3363 + sym_sec->output_offset
3364 +
3365 sym_sec->output_section->vma);
3366 }
3367 else
3368 continue;
3369 }
3370 else
3371 {
3372 bfd_set_error (bfd_error_bad_value);
3373 goto error_ret_free_internal;
3374 }
3375 st_type = ELF_ST_TYPE (hash->root.type);
3376 sym_name = hash->root.root.root.string;
3377 }
3378
3379 /* Determine what (if any) linker stub is needed. */
3380 stub_type = aarch64_type_of_stub
3381 (info, section, irela, st_type, hash, destination);
3382 if (stub_type == aarch64_stub_none)
3383 continue;
3384
3385 /* Support for grouping stub sections. */
3386 id_sec = htab->stub_group[section->id].link_sec;
3387
3388 /* Get the name of this stub. */
cec5225b 3389 stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, hash,
a06ea964
NC		 3390 irela);
3391 if (!stub_name)
3392 goto error_ret_free_internal;
3393
3394 stub_entry =
3395 aarch64_stub_hash_lookup (&htab->stub_hash_table,
3396 stub_name, FALSE, FALSE);
3397 if (stub_entry != NULL)
3398 {
3399 /* The proper stub has already been created. */
3400 free (stub_name);
3401 continue;
3402 }
3403
cec5225b 3404 stub_entry = elfNN_aarch64_add_stub (stub_name, section,
a06ea964
NC		 3405 htab);
3406 if (stub_entry == NULL)
3407 {
3408 free (stub_name);
3409 goto error_ret_free_internal;
3410 }
3411
3412 stub_entry->target_value = sym_value;
3413 stub_entry->target_section = sym_sec;
3414 stub_entry->stub_type = stub_type;
3415 stub_entry->h = hash;
3416 stub_entry->st_type = st_type;
3417
3418 if (sym_name == NULL)
3419 sym_name = "unnamed";
3420 len = sizeof (STUB_ENTRY_NAME) + strlen (sym_name);
3421 stub_entry->output_name = bfd_alloc (htab->stub_bfd, len);
3422 if (stub_entry->output_name == NULL)
3423 {
3424 free (stub_name);
3425 goto error_ret_free_internal;
3426 }
3427
3428 snprintf (stub_entry->output_name, len, STUB_ENTRY_NAME,
3429 sym_name);
3430
3431 stub_changed = TRUE;
3432 }
3433
3434 /* We're done with the internal relocs, free them. */
3435 if (elf_section_data (section)->relocs == NULL)
3436 free (internal_relocs);
3437 }
68fcca92
JW		 3438
3439 if (htab->fix_erratum_835769)
3440 {
3441 /* Scan for sequences which might trigger erratum 835769. */
3442 if (erratum_835769_scan (input_bfd, info, &erratum_835769_fixes,
3443 &num_erratum_835769_fixes,
3444 &erratum_835769_fix_table_size) != 0)
3445 goto error_ret_free_local;
3446 }
a06ea964
NC		 3447 }
3448
68fcca92
JW		 3449 if (prev_num_erratum_835769_fixes != num_erratum_835769_fixes)
3450 stub_changed = TRUE;
3451
a06ea964
NC		 3452 if (!stub_changed)
3453 break;
3454
3455 /* OK, we've added some stubs. Find out the new size of the
3456 stub sections. */
3457 for (stub_sec = htab->stub_bfd->sections;
3458 stub_sec != NULL; stub_sec = stub_sec->next)
68fcca92
JW		 3459 {
3460 /* Ignore non-stub sections. */
3461 if (!strstr (stub_sec->name, STUB_SUFFIX))
3462 continue;
3463 stub_sec->size = 0;
3464 }
a06ea964
NC		 3465
3466 bfd_hash_traverse (&htab->stub_hash_table, aarch64_size_one_stub, htab);
3467
68fcca92
JW		 3468 /* Add erratum 835769 veneers to stub section sizes too. */
3469 if (htab->fix_erratum_835769)
3470 for (i = 0; i < num_erratum_835769_fixes; i++)
3471 {
3472 stub_sec = elf_aarch64_create_or_find_stub_sec (NULL,
3473 erratum_835769_fixes[i].section, htab);
3474
3475 if (stub_sec == NULL)
3476 goto error_ret_free_local;
3477
3478 stub_sec->size += 8;
3479 }
3480
a06ea964
NC		 3481 /* Ask the linker to do its stuff. */
3482 (*htab->layout_sections_again) ();
3483 stub_changed = FALSE;
3484 }
3485
68fcca92
JW		 3486 /* Add stubs for erratum 835769 fixes now. */
3487 if (htab->fix_erratum_835769)
3488 {
3489 for (i = 0; i < num_erratum_835769_fixes; i++)
3490 {
3491 struct elf_aarch64_stub_hash_entry *stub_entry;
3492 char *stub_name = erratum_835769_fixes[i].stub_name;
3493 asection *section = erratum_835769_fixes[i].section;
3494 unsigned int section_id = erratum_835769_fixes[i].section->id;
3495 asection *link_sec = htab->stub_group[section_id].link_sec;
3496 asection *stub_sec = htab->stub_group[section_id].stub_sec;
3497
3498 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table,
3499 stub_name, TRUE, FALSE);
3500 if (stub_entry == NULL)
3501 {
3502 (*_bfd_error_handler) (_("%s: cannot create stub entry %s"),
3503 section->owner,
3504 stub_name);
3505 return FALSE;
3506 }
3507
3508 stub_entry->stub_sec = stub_sec;
3509 stub_entry->stub_offset = 0;
3510 stub_entry->id_sec = link_sec;
3511 stub_entry->stub_type = erratum_835769_fixes[i].stub_type;
3512 stub_entry->target_section = section;
3513 stub_entry->target_value = erratum_835769_fixes[i].offset;
3514 stub_entry->veneered_insn = erratum_835769_fixes[i].veneered_insn;
3515 stub_entry->output_name = erratum_835769_fixes[i].stub_name;
3516 }
3517
3518 /* Stash the erratum 835769 fix array for use later in
3519 elfNN_aarch64_write_section(). */
3520 htab->aarch64_erratum_835769_fixes = erratum_835769_fixes;
3521 htab->num_aarch64_erratum_835769_fixes = num_erratum_835769_fixes;
3522 }
3523 else
3524 {
3525 htab->aarch64_erratum_835769_fixes = NULL;
3526 htab->num_aarch64_erratum_835769_fixes = 0;
3527 }
3528
a06ea964
NC		 3529 return TRUE;
3530
3531error_ret_free_local:
3532 return FALSE;
3533}
3534
3535/* Build all the stubs associated with the current output file. The
3536 stubs are kept in a hash table attached to the main linker hash
3537 table. We also set up the .plt entries for statically linked PIC
3538 functions here. This function is called via aarch64_elf_finish in the
3539 linker. */
3540
3541bfd_boolean
cec5225b 3542elfNN_aarch64_build_stubs (struct bfd_link_info *info)
a06ea964
NC		 3543{
3544 asection *stub_sec;
3545 struct bfd_hash_table *table;
cec5225b 3546 struct elf_aarch64_link_hash_table *htab;
a06ea964 3547
cec5225b 3548 htab = elf_aarch64_hash_table (info);
a06ea964
NC		 3549
3550 for (stub_sec = htab->stub_bfd->sections;
3551 stub_sec != NULL; stub_sec = stub_sec->next)
3552 {
3553 bfd_size_type size;
3554
3555 /* Ignore non-stub sections. */
3556 if (!strstr (stub_sec->name, STUB_SUFFIX))
3557 continue;
3558
3559 /* Allocate memory to hold the linker stubs. */
3560 size = stub_sec->size;
3561 stub_sec->contents = bfd_zalloc (htab->stub_bfd, size);
3562 if (stub_sec->contents == NULL && size != 0)
3563 return FALSE;
3564 stub_sec->size = 0;
3565 }
3566
3567 /* Build the stubs as directed by the stub hash table. */
3568 table = &htab->stub_hash_table;
3569 bfd_hash_traverse (table, aarch64_build_one_stub, info);
3570
3571 return TRUE;
3572}
3573
3574
3575/* Add an entry to the code/data map for section SEC. */
3576
3577static void
cec5225b 3578elfNN_aarch64_section_map_add (asection *sec, char type, bfd_vma vma)
a06ea964
NC		 3579{
3580 struct _aarch64_elf_section_data *sec_data =
cec5225b 3581 elf_aarch64_section_data (sec);
a06ea964
NC		 3582 unsigned int newidx;
3583
3584 if (sec_data->map == NULL)
3585 {
cec5225b 3586 sec_data->map = bfd_malloc (sizeof (elf_aarch64_section_map));
a06ea964
NC		 3587 sec_data->mapcount = 0;
3588 sec_data->mapsize = 1;
3589 }
3590
3591 newidx = sec_data->mapcount++;
3592
3593 if (sec_data->mapcount > sec_data->mapsize)
3594 {
3595 sec_data->mapsize *= 2;
3596 sec_data->map = bfd_realloc_or_free
cec5225b 3597 (sec_data->map, sec_data->mapsize * sizeof (elf_aarch64_section_map));
a06ea964
NC		 3598 }
3599
3600 if (sec_data->map)
3601 {
3602 sec_data->map[newidx].vma = vma;
3603 sec_data->map[newidx].type = type;
3604 }
3605}
3606
3607
3608/* Initialise maps of insn/data for input BFDs. */
3609void
cec5225b 3610bfd_elfNN_aarch64_init_maps (bfd *abfd)
a06ea964
NC		 3611{
3612 Elf_Internal_Sym *isymbuf;
3613 Elf_Internal_Shdr *hdr;
3614 unsigned int i, localsyms;
3615
3616 /* Make sure that we are dealing with an AArch64 elf binary. */
3617 if (!is_aarch64_elf (abfd))
3618 return;
3619
3620 if ((abfd->flags & DYNAMIC) != 0)
68fcca92 3621 return;
a06ea964
NC		 3622
3623 hdr = &elf_symtab_hdr (abfd);
3624 localsyms = hdr->sh_info;
3625
3626 /* Obtain a buffer full of symbols for this BFD. The hdr->sh_info field
3627 should contain the number of local symbols, which should come before any
3628 global symbols. Mapping symbols are always local. */
3629 isymbuf = bfd_elf_get_elf_syms (abfd, hdr, localsyms, 0, NULL, NULL, NULL);
3630
3631 /* No internal symbols read? Skip this BFD. */
3632 if (isymbuf == NULL)
3633 return;
3634
3635 for (i = 0; i < localsyms; i++)
3636 {
3637 Elf_Internal_Sym *isym = &isymbuf[i];
3638 asection *sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
3639 const char *name;
3640
3641 if (sec != NULL && ELF_ST_BIND (isym->st_info) == STB_LOCAL)
3642 {
3643 name = bfd_elf_string_from_elf_section (abfd,
3644 hdr->sh_link,
3645 isym->st_name);
3646
3647 if (bfd_is_aarch64_special_symbol_name
3648 (name, BFD_AARCH64_SPECIAL_SYM_TYPE_MAP))
cec5225b 3649 elfNN_aarch64_section_map_add (sec, name[1], isym->st_value);
a06ea964
NC		 3650 }
3651 }
3652}
3653
3654/* Set option values needed during linking. */
3655void
cec5225b 3656bfd_elfNN_aarch64_set_options (struct bfd *output_bfd,
a06ea964
NC		 3657 struct bfd_link_info *link_info,
3658 int no_enum_warn,
68fcca92
JW		 3659 int no_wchar_warn, int pic_veneer,
3660 int fix_erratum_835769)
a06ea964 3661{
cec5225b 3662 struct elf_aarch64_link_hash_table *globals;
a06ea964 3663
cec5225b 3664 globals = elf_aarch64_hash_table (link_info);
a06ea964 3665 globals->pic_veneer = pic_veneer;
68fcca92 3666 globals->fix_erratum_835769 = fix_erratum_835769;
a06ea964
NC		 3667
3668 BFD_ASSERT (is_aarch64_elf (output_bfd));
3669 elf_aarch64_tdata (output_bfd)->no_enum_size_warning = no_enum_warn;
3670 elf_aarch64_tdata (output_bfd)->no_wchar_size_warning = no_wchar_warn;
3671}
3672
a06ea964
NC		 3673static bfd_vma
3674aarch64_calculate_got_entry_vma (struct elf_link_hash_entry *h,
cec5225b 3675 struct elf_aarch64_link_hash_table
a06ea964
NC		 3676 *globals, struct bfd_link_info *info,
3677 bfd_vma value, bfd *output_bfd,
3678 bfd_boolean *unresolved_reloc_p)
3679{
3680 bfd_vma off = (bfd_vma) - 1;
3681 asection *basegot = globals->root.sgot;
3682 bfd_boolean dyn = globals->root.dynamic_sections_created;
3683
3684 if (h != NULL)
3685 {
a6bb11b2 3686 BFD_ASSERT (basegot != NULL);
a06ea964
NC		 3687 off = h->got.offset;
3688 BFD_ASSERT (off != (bfd_vma) - 1);
3689 if (!WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, info->shared, h)
3690 || (info->shared
3691 && SYMBOL_REFERENCES_LOCAL (info, h))
3692 || (ELF_ST_VISIBILITY (h->other)
3693 && h->root.type == bfd_link_hash_undefweak))
3694 {
3695 /* This is actually a static link, or it is a -Bsymbolic link
3696 and the symbol is defined locally. We must initialize this
3697 entry in the global offset table. Since the offset must
a6bb11b2
YZ		 3698 always be a multiple of 8 (4 in the case of ILP32), we use
3699 the least significant bit to record whether we have
3700 initialized it already.
a06ea964
NC		 3701 When doing a dynamic link, we create a .rel(a).got relocation
3702 entry to initialize the value. This is done in the
3703 finish_dynamic_symbol routine. */
3704 if ((off & 1) != 0)
3705 off &= ~1;
3706 else
3707 {
cec5225b 3708 bfd_put_NN (output_bfd, value, basegot->contents + off);
a06ea964
NC		 3709 h->got.offset |= 1;
3710 }
3711 }
3712 else
3713 *unresolved_reloc_p = FALSE;
3714
3715 off = off + basegot->output_section->vma + basegot->output_offset;
3716 }
3717
3718 return off;
3719}
3720
3721/* Change R_TYPE to a more efficient access model where possible,
3722 return the new reloc type. */
3723
a6bb11b2
YZ		 3724static bfd_reloc_code_real_type
3725aarch64_tls_transition_without_check (bfd_reloc_code_real_type r_type,
a06ea964
NC		 3726 struct elf_link_hash_entry *h)
3727{
3728 bfd_boolean is_local = h == NULL;
a6bb11b2 3729
a06ea964
NC		 3730 switch (r_type)
3731 {
a6bb11b2
YZ		 3732 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3733 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
3734 return (is_local
3735 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
3736 : BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21);
3737
3738 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
3739 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
3740 return (is_local
3741 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
3742 : BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC);
3743
3744 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
3745 return is_local ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 : r_type;
3746
3747 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
3748 return is_local ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC : r_type;
3749
3750 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12_NC:
3751 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a06ea964 3752 /* Instructions with these relocations will become NOPs. */
a6bb11b2
YZ		 3753 return BFD_RELOC_AARCH64_NONE;
3754
3755 default:
3756 break;
a06ea964
NC		 3757 }
3758
3759 return r_type;
3760}
3761
3762static unsigned int
a6bb11b2 3763aarch64_reloc_got_type (bfd_reloc_code_real_type r_type)
a06ea964
NC		 3764{
3765 switch (r_type)
3766 {
a6bb11b2
YZ		 3767 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
3768 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
3769 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
3770 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
a06ea964
NC		 3771 return GOT_NORMAL;
3772
a6bb11b2
YZ		 3773 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3774 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a06ea964
NC		 3775 return GOT_TLS_GD;
3776
a6bb11b2
YZ		 3777 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12_NC:
3778 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
3779 case BFD_RELOC_AARCH64_TLSDESC_CALL:
3780 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12_NC:
3781 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
a06ea964
NC		 3782 return GOT_TLSDESC_GD;
3783
a6bb11b2
YZ		 3784 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
3785 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
3786 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
a06ea964
NC		 3787 return GOT_TLS_IE;
3788
a6bb11b2
YZ		 3789 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
3790 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
3791 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
3792 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
3793 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
3794 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
3795 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
3796 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
a06ea964 3797 return GOT_UNKNOWN;
a6bb11b2
YZ		 3798
3799 default:
3800 break;
a06ea964
NC		 3801 }
3802 return GOT_UNKNOWN;
3803}
3804
3805static bfd_boolean
3806aarch64_can_relax_tls (bfd *input_bfd,
3807 struct bfd_link_info *info,
a6bb11b2 3808 bfd_reloc_code_real_type r_type,
a06ea964
NC		 3809 struct elf_link_hash_entry *h,
3810 unsigned long r_symndx)
3811{
3812 unsigned int symbol_got_type;
3813 unsigned int reloc_got_type;
3814
3815 if (! IS_AARCH64_TLS_RELOC (r_type))
3816 return FALSE;
3817
cec5225b 3818 symbol_got_type = elfNN_aarch64_symbol_got_type (h, input_bfd, r_symndx);
a06ea964
NC		 3819 reloc_got_type = aarch64_reloc_got_type (r_type);
3820
3821 if (symbol_got_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (reloc_got_type))
3822 return TRUE;
3823
3824 if (info->shared)
3825 return FALSE;
3826
3827 if (h && h->root.type == bfd_link_hash_undefweak)
3828 return FALSE;
3829
3830 return TRUE;
3831}
3832
a6bb11b2
YZ		 3833/* Given the relocation code R_TYPE, return the relaxed bfd reloc
3834 enumerator. */
3835
3836static bfd_reloc_code_real_type
a06ea964
NC		 3837aarch64_tls_transition (bfd *input_bfd,
3838 struct bfd_link_info *info,
3839 unsigned int r_type,
3840 struct elf_link_hash_entry *h,
3841 unsigned long r_symndx)
3842{
a6bb11b2
YZ		 3843 bfd_reloc_code_real_type bfd_r_type
3844 = elfNN_aarch64_bfd_reloc_from_type (r_type);
a06ea964 3845
a6bb11b2
YZ		 3846 if (! aarch64_can_relax_tls (input_bfd, info, bfd_r_type, h, r_symndx))
3847 return bfd_r_type;
3848
3849 return aarch64_tls_transition_without_check (bfd_r_type, h);
a06ea964
NC		 3850}
3851
3852/* Return the base VMA address which should be subtracted from real addresses
a6bb11b2 3853 when resolving R_AARCH64_TLS_DTPREL relocation. */
a06ea964
NC		 3854
3855static bfd_vma
3856dtpoff_base (struct bfd_link_info *info)
3857{
3858 /* If tls_sec is NULL, we should have signalled an error already. */
3859 BFD_ASSERT (elf_hash_table (info)->tls_sec != NULL);
3860 return elf_hash_table (info)->tls_sec->vma;
3861}
3862
a06ea964
NC		 3863/* Return the base VMA address which should be subtracted from real addresses
3864 when resolving R_AARCH64_TLS_GOTTPREL64 relocations. */
3865
3866static bfd_vma
3867tpoff_base (struct bfd_link_info *info)
3868{
3869 struct elf_link_hash_table *htab = elf_hash_table (info);
3870
3871 /* If tls_sec is NULL, we should have signalled an error already. */
ac21917f 3872 BFD_ASSERT (htab->tls_sec != NULL);
a06ea964
NC		 3873
3874 bfd_vma base = align_power ((bfd_vma) TCB_SIZE,
3875 htab->tls_sec->alignment_power);
3876 return htab->tls_sec->vma - base;
3877}
3878
3879static bfd_vma *
3880symbol_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
3881 unsigned long r_symndx)
3882{
3883 /* Calculate the address of the GOT entry for symbol
3884 referred to in h. */
3885 if (h != NULL)
3886 return &h->got.offset;
3887 else
3888 {
3889 /* local symbol */
3890 struct elf_aarch64_local_symbol *l;
3891
cec5225b 3892 l = elf_aarch64_locals (input_bfd);
a06ea964
NC		 3893 return &l[r_symndx].got_offset;
3894 }
3895}
3896
3897static void
3898symbol_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
3899 unsigned long r_symndx)
3900{
3901 bfd_vma *p;
3902 p = symbol_got_offset_ref (input_bfd, h, r_symndx);
3903 *p |= 1;
3904}
3905
3906static int
3907symbol_got_offset_mark_p (bfd *input_bfd, struct elf_link_hash_entry *h,
3908 unsigned long r_symndx)
3909{
3910 bfd_vma value;
3911 value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
3912 return value & 1;
3913}
3914
3915static bfd_vma
3916symbol_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
3917 unsigned long r_symndx)
3918{
3919 bfd_vma value;
3920 value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
3921 value &= ~1;
3922 return value;
3923}
3924
3925static bfd_vma *
3926symbol_tlsdesc_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
3927 unsigned long r_symndx)
3928{
3929 /* Calculate the address of the GOT entry for symbol
3930 referred to in h. */
3931 if (h != NULL)
3932 {
cec5225b
YZ		 3933 struct elf_aarch64_link_hash_entry *eh;
3934 eh = (struct elf_aarch64_link_hash_entry *) h;
a06ea964
NC		 3935 return &eh->tlsdesc_got_jump_table_offset;
3936 }
3937 else
3938 {
3939 /* local symbol */
3940 struct elf_aarch64_local_symbol *l;
3941
cec5225b 3942 l = elf_aarch64_locals (input_bfd);
a06ea964
NC		 3943 return &l[r_symndx].tlsdesc_got_jump_table_offset;
3944 }
3945}
3946
3947static void
3948symbol_tlsdesc_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
3949 unsigned long r_symndx)
3950{
3951 bfd_vma *p;
3952 p = symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
3953 *p |= 1;
3954}
3955
3956static int
3957symbol_tlsdesc_got_offset_mark_p (bfd *input_bfd,
3958 struct elf_link_hash_entry *h,
3959 unsigned long r_symndx)
3960{
3961 bfd_vma value;
3962 value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
3963 return value & 1;
3964}
3965
3966static bfd_vma
3967symbol_tlsdesc_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
3968 unsigned long r_symndx)
3969{
3970 bfd_vma value;
3971 value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
3972 value &= ~1;
3973 return value;
3974}
3975
68fcca92
JW		 3976/* Data for make_branch_to_erratum_835769_stub(). */
3977
3978struct erratum_835769_branch_to_stub_data
3979{
3980 asection *output_section;
3981 bfd_byte *contents;
3982};
3983
3984/* Helper to insert branches to erratum 835769 stubs in the right
3985 places for a particular section. */
3986
3987static bfd_boolean
3988make_branch_to_erratum_835769_stub (struct bfd_hash_entry *gen_entry,
3989 void *in_arg)
3990{
3991 struct elf_aarch64_stub_hash_entry *stub_entry;
3992 struct erratum_835769_branch_to_stub_data *data;
3993 bfd_byte *contents;
3994 unsigned long branch_insn = 0;
3995 bfd_vma veneered_insn_loc, veneer_entry_loc;
3996 bfd_signed_vma branch_offset;
3997 unsigned int target;
3998 bfd *abfd;
3999
4000 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
4001 data = (struct erratum_835769_branch_to_stub_data *) in_arg;
4002
4003 if (stub_entry->target_section != data->output_section
4004 || stub_entry->stub_type != aarch64_stub_erratum_835769_veneer)
4005 return TRUE;
4006
4007 contents = data->contents;
4008 veneered_insn_loc = stub_entry->target_section->output_section->vma
4009 + stub_entry->target_section->output_offset
4010 + stub_entry->target_value;
4011 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
4012 + stub_entry->stub_sec->output_offset
4013 + stub_entry->stub_offset;
4014 branch_offset = veneer_entry_loc - veneered_insn_loc;
4015
4016 abfd = stub_entry->target_section->owner;
4017 if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
4018 (*_bfd_error_handler)
4019 (_("%B: error: Erratum 835769 stub out "
4020 "of range (input file too large)"), abfd);
4021
4022 target = stub_entry->target_value;
4023 branch_insn = 0x14000000;
4024 branch_offset >>= 2;
4025 branch_offset &= 0x3ffffff;
4026 branch_insn |= branch_offset;
4027 bfd_putl32 (branch_insn, &contents[target]);
4028
4029 return TRUE;
4030}
4031
4032static bfd_boolean
4033elfNN_aarch64_write_section (bfd *output_bfd ATTRIBUTE_UNUSED,
4034 struct bfd_link_info *link_info,
4035 asection *sec,
4036 bfd_byte *contents)
4037
4038{
4039 struct elf_aarch64_link_hash_table *globals =
4040 elf_aarch64_hash_table (link_info);
4041
4042 if (globals == NULL)
4043 return FALSE;
4044
4045 /* Fix code to point to erratum 835769 stubs. */
4046 if (globals->fix_erratum_835769)
4047 {
4048 struct erratum_835769_branch_to_stub_data data;
4049
4050 data.output_section = sec;
4051 data.contents = contents;
4052 bfd_hash_traverse (&globals->stub_hash_table,
4053 make_branch_to_erratum_835769_stub, &data);
4054 }
4055
4056 return FALSE;
4057}
4058
a06ea964
NC		 4059/* Perform a relocation as part of a final link. */
4060static bfd_reloc_status_type
cec5225b 4061elfNN_aarch64_final_link_relocate (reloc_howto_type *howto,
a06ea964
NC		 4062 bfd *input_bfd,
4063 bfd *output_bfd,
4064 asection *input_section,
4065 bfd_byte *contents,
4066 Elf_Internal_Rela *rel,
4067 bfd_vma value,
4068 struct bfd_link_info *info,
4069 asection *sym_sec,
4070 struct elf_link_hash_entry *h,
4071 bfd_boolean *unresolved_reloc_p,
4072 bfd_boolean save_addend,
1419bbe5
WN		 4073 bfd_vma *saved_addend,
4074 Elf_Internal_Sym *sym)
a06ea964 4075{
1419bbe5 4076 Elf_Internal_Shdr *symtab_hdr;
a06ea964 4077 unsigned int r_type = howto->type;
a6bb11b2
YZ		 4078 bfd_reloc_code_real_type bfd_r_type
4079 = elfNN_aarch64_bfd_reloc_from_howto (howto);
4080 bfd_reloc_code_real_type new_bfd_r_type;
a06ea964
NC		 4081 unsigned long r_symndx;
4082 bfd_byte *hit_data = contents + rel->r_offset;
4083 bfd_vma place;
4084 bfd_signed_vma signed_addend;
cec5225b 4085 struct elf_aarch64_link_hash_table *globals;
a06ea964
NC		 4086 bfd_boolean weak_undef_p;
4087
cec5225b 4088 globals = elf_aarch64_hash_table (info);
a06ea964 4089
1419bbe5
WN		 4090 symtab_hdr = &elf_symtab_hdr (input_bfd);
4091
a06ea964
NC		 4092 BFD_ASSERT (is_aarch64_elf (input_bfd));
4093
cec5225b 4094 r_symndx = ELFNN_R_SYM (rel->r_info);
a06ea964
NC		 4095
4096 /* It is possible to have linker relaxations on some TLS access
4097 models. Update our information here. */
a6bb11b2
YZ		 4098 new_bfd_r_type = aarch64_tls_transition (input_bfd, info, r_type, h, r_symndx);
4099 if (new_bfd_r_type != bfd_r_type)
4100 {
4101 bfd_r_type = new_bfd_r_type;
4102 howto = elfNN_aarch64_howto_from_bfd_reloc (bfd_r_type);
4103 BFD_ASSERT (howto != NULL);
4104 r_type = howto->type;
4105 }
a06ea964
NC		 4106
4107 place = input_section->output_section->vma
4108 + input_section->output_offset + rel->r_offset;
4109
4110 /* Get addend, accumulating the addend for consecutive relocs
4111 which refer to the same offset. */
4112 signed_addend = saved_addend ? *saved_addend : 0;
4113 signed_addend += rel->r_addend;
4114
4115 weak_undef_p = (h ? h->root.type == bfd_link_hash_undefweak
4116 : bfd_is_und_section (sym_sec));
a6bb11b2 4117
1419bbe5
WN		 4118 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
4119 it here if it is defined in a non-shared object. */
4120 if (h != NULL
4121 && h->type == STT_GNU_IFUNC
4122 && h->def_regular)
4123 {
4124 asection *plt;
4125 const char *name;
4126 asection *base_got;
4127 bfd_vma off;
4128
4129 if ((input_section->flags & SEC_ALLOC) == 0
4130 || h->plt.offset == (bfd_vma) -1)
4131 abort ();
4132
4133 /* STT_GNU_IFUNC symbol must go through PLT. */
4134 plt = globals->root.splt ? globals->root.splt : globals->root.iplt;
4135 value = (plt->output_section->vma + plt->output_offset + h->plt.offset);
4136
4137 switch (bfd_r_type)
4138 {
4139 default:
4140 if (h->root.root.string)
4141 name = h->root.root.string;
4142 else
4143 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
4144 NULL);
4145 (*_bfd_error_handler)
4146 (_("%B: relocation %s against STT_GNU_IFUNC "
4147 "symbol `%s' isn't handled by %s"), input_bfd,
4148 howto->name, name, __FUNCTION__);
4149 bfd_set_error (bfd_error_bad_value);
4150 return FALSE;
4151
4152 case BFD_RELOC_AARCH64_NN:
4153 if (rel->r_addend != 0)
4154 {
4155 if (h->root.root.string)
4156 name = h->root.root.string;
4157 else
4158 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
4159 sym, NULL);
4160 (*_bfd_error_handler)
4161 (_("%B: relocation %s against STT_GNU_IFUNC "
4162 "symbol `%s' has non-zero addend: %d"),
4163 input_bfd, howto->name, name, rel->r_addend);
4164 bfd_set_error (bfd_error_bad_value);
4165 return FALSE;
4166 }
4167
4168 /* Generate dynamic relocation only when there is a
4169 non-GOT reference in a shared object. */
4170 if (info->shared && h->non_got_ref)
4171 {
4172 Elf_Internal_Rela outrel;
4173 asection *sreloc;
4174
4175 /* Need a dynamic relocation to get the real function
4176 address. */
4177 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
4178 info,
4179 input_section,
4180 rel->r_offset);
4181 if (outrel.r_offset == (bfd_vma) -1
4182 || outrel.r_offset == (bfd_vma) -2)
4183 abort ();
4184
4185 outrel.r_offset += (input_section->output_section->vma
4186 + input_section->output_offset);
4187
4188 if (h->dynindx == -1
4189 || h->forced_local
4190 || info->executable)
4191 {
4192 /* This symbol is resolved locally. */
4193 outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
4194 outrel.r_addend = (h->root.u.def.value
4195 + h->root.u.def.section->output_section->vma
4196 + h->root.u.def.section->output_offset);
4197 }
4198 else
4199 {
4200 outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
4201 outrel.r_addend = 0;
4202 }
4203
4204 sreloc = globals->root.irelifunc;
4205 elf_append_rela (output_bfd, sreloc, &outrel);
4206
4207 /* If this reloc is against an external symbol, we
4208 do not want to fiddle with the addend. Otherwise,
4209 we need to include the symbol value so that it
4210 becomes an addend for the dynamic reloc. For an
4211 internal symbol, we have updated addend. */
4212 return bfd_reloc_ok;
4213 }
4214 /* FALLTHROUGH */
4215 case BFD_RELOC_AARCH64_JUMP26:
4216 case BFD_RELOC_AARCH64_CALL26:
4217 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
4218 signed_addend,
4219 weak_undef_p);
4220 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
4221 howto, value);
4222 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
4223 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
4224 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
4225 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
4226 base_got = globals->root.sgot;
4227 off = h->got.offset;
4228
4229 if (base_got == NULL)
4230 abort ();
4231
4232 if (off == (bfd_vma) -1)
4233 {
4234 bfd_vma plt_index;
4235
4236 /* We can't use h->got.offset here to save state, or
4237 even just remember the offset, as finish_dynamic_symbol
4238 would use that as offset into .got. */
4239
4240 if (globals->root.splt != NULL)
4241 {
b1ee0cc4
WN		 4242 plt_index = ((h->plt.offset - globals->plt_header_size) /
4243 globals->plt_entry_size);
1419bbe5
WN		 4244 off = (plt_index + 3) * GOT_ENTRY_SIZE;
4245 base_got = globals->root.sgotplt;
4246 }
4247 else
4248 {
4249 plt_index = h->plt.offset / globals->plt_entry_size;
4250 off = plt_index * GOT_ENTRY_SIZE;
4251 base_got = globals->root.igotplt;
4252 }
4253
4254 if (h->dynindx == -1
4255 || h->forced_local
4256 || info->symbolic)
4257 {
4258 /* This references the local definition. We must
4259 initialize this entry in the global offset table.
4260 Since the offset must always be a multiple of 8,
4261 we use the least significant bit to record
4262 whether we have initialized it already.
4263
4264 When doing a dynamic link, we create a .rela.got
4265 relocation entry to initialize the value. This
4266 is done in the finish_dynamic_symbol routine. */
4267 if ((off & 1) != 0)
4268 off &= ~1;
4269 else
4270 {
4271 bfd_put_NN (output_bfd, value,
4272 base_got->contents + off);
4273 /* Note that this is harmless as -1 | 1 still is -1. */
4274 h->got.offset |= 1;
4275 }
4276 }
4277 value = (base_got->output_section->vma
4278 + base_got->output_offset + off);
4279 }
4280 else
4281 value = aarch64_calculate_got_entry_vma (h, globals, info,
4282 value, output_bfd,
4283 unresolved_reloc_p);
4284 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
4285 0, weak_undef_p);
4286 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type, howto, value);
4287 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
4288 case BFD_RELOC_AARCH64_ADD_LO12:
4289 break;
4290 }
4291 }
4292
a6bb11b2 4293 switch (bfd_r_type)
a06ea964 4294 {
a6bb11b2
YZ		 4295 case BFD_RELOC_AARCH64_NONE:
4296 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a06ea964
NC		 4297 *unresolved_reloc_p = FALSE;
4298 return bfd_reloc_ok;
4299
a6bb11b2 4300 case BFD_RELOC_AARCH64_NN:
a06ea964
NC		 4301
4302 /* When generating a shared object or relocatable executable, these
4303 relocations are copied into the output file to be resolved at
4304 run time. */
4305 if (((info->shared == TRUE) || globals->root.is_relocatable_executable)
4306 && (input_section->flags & SEC_ALLOC)
4307 && (h == NULL
4308 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4309 || h->root.type != bfd_link_hash_undefweak))
4310 {
4311 Elf_Internal_Rela outrel;
4312 bfd_byte *loc;
4313 bfd_boolean skip, relocate;
4314 asection *sreloc;
4315
4316 *unresolved_reloc_p = FALSE;
4317
a06ea964
NC		 4318 skip = FALSE;
4319 relocate = FALSE;
4320
4321 outrel.r_addend = signed_addend;
4322 outrel.r_offset =
4323 _bfd_elf_section_offset (output_bfd, info, input_section,
4324 rel->r_offset);
4325 if (outrel.r_offset == (bfd_vma) - 1)
4326 skip = TRUE;
4327 else if (outrel.r_offset == (bfd_vma) - 2)
4328 {
4329 skip = TRUE;
4330 relocate = TRUE;
4331 }
4332
4333 outrel.r_offset += (input_section->output_section->vma
4334 + input_section->output_offset);
4335
4336 if (skip)
4337 memset (&outrel, 0, sizeof outrel);
4338 else if (h != NULL
4339 && h->dynindx != -1
0941db69 4340 && (!info->shared || !SYMBOLIC_BIND (info, h) || !h->def_regular))
cec5225b 4341 outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
a06ea964
NC		 4342 else
4343 {
4344 int symbol;
4345
4346 /* On SVR4-ish systems, the dynamic loader cannot
4347 relocate the text and data segments independently,
4348 so the symbol does not matter. */
4349 symbol = 0;
a6bb11b2 4350 outrel.r_info = ELFNN_R_INFO (symbol, AARCH64_R (RELATIVE));
a06ea964
NC		 4351 outrel.r_addend += value;
4352 }
4353
1419bbe5
WN		 4354 sreloc = elf_section_data (input_section)->sreloc;
4355 if (sreloc == NULL || sreloc->contents == NULL)
4356 return bfd_reloc_notsupported;
4357
4358 loc = sreloc->contents + sreloc->reloc_count++ * RELOC_SIZE (globals);
cec5225b 4359 bfd_elfNN_swap_reloca_out (output_bfd, &outrel, loc);
a06ea964 4360
1419bbe5 4361 if (sreloc->reloc_count * RELOC_SIZE (globals) > sreloc->size)
a06ea964
NC		 4362 {
4363 /* Sanity to check that we have previously allocated
4364 sufficient space in the relocation section for the
4365 number of relocations we actually want to emit. */
4366 abort ();
4367 }
4368
4369 /* If this reloc is against an external symbol, we do not want to
4370 fiddle with the addend. Otherwise, we need to include the symbol
4371 value so that it becomes an addend for the dynamic reloc. */
4372 if (!relocate)
4373 return bfd_reloc_ok;
4374
4375 return _bfd_final_link_relocate (howto, input_bfd, input_section,
4376 contents, rel->r_offset, value,
4377 signed_addend);
4378 }
4379 else
4380 value += signed_addend;
4381 break;
4382
a6bb11b2
YZ		 4383 case BFD_RELOC_AARCH64_JUMP26:
4384 case BFD_RELOC_AARCH64_CALL26:
a06ea964
NC		 4385 {
4386 asection *splt = globals->root.splt;
4387 bfd_boolean via_plt_p =
4388 splt != NULL && h != NULL && h->plt.offset != (bfd_vma) - 1;
4389
4390 /* A call to an undefined weak symbol is converted to a jump to
4391 the next instruction unless a PLT entry will be created.
4392 The jump to the next instruction is optimized as a NOP.
4393 Do the same for local undefined symbols. */
4394 if (weak_undef_p && ! via_plt_p)
4395 {
4396 bfd_putl32 (INSN_NOP, hit_data);
4397 return bfd_reloc_ok;
4398 }
4399
4400 /* If the call goes through a PLT entry, make sure to
4401 check distance to the right destination address. */
4402 if (via_plt_p)
4403 {
4404 value = (splt->output_section->vma
4405 + splt->output_offset + h->plt.offset);
4406 *unresolved_reloc_p = FALSE;
4407 }
4408
4409 /* If the target symbol is global and marked as a function the
4410 relocation applies a function call or a tail call. In this
4411 situation we can veneer out of range branches. The veneers
4412 use IP0 and IP1 hence cannot be used arbitrary out of range
4413 branches that occur within the body of a function. */
4414 if (h && h->type == STT_FUNC)
4415 {
4416 /* Check if a stub has to be inserted because the destination
4417 is too far away. */
4418 if (! aarch64_valid_branch_p (value, place))
4419 {
4420 /* The target is out of reach, so redirect the branch to
4421 the local stub for this function. */
cec5225b
YZ		 4422 struct elf_aarch64_stub_hash_entry *stub_entry;
4423 stub_entry = elfNN_aarch64_get_stub_entry (input_section,
a06ea964
NC		 4424 sym_sec, h,
4425 rel, globals);
4426 if (stub_entry != NULL)
4427 value = (stub_entry->stub_offset
4428 + stub_entry->stub_sec->output_offset
4429 + stub_entry->stub_sec->output_section->vma);
4430 }
4431 }
4432 }
caed7120
YZ		 4433 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
4434 signed_addend, weak_undef_p);
a06ea964
NC		 4435 break;
4436
a6bb11b2
YZ		 4437 case BFD_RELOC_AARCH64_16:
4438#if ARCH_SIZE == 64
4439 case BFD_RELOC_AARCH64_32:
4440#endif
4441 case BFD_RELOC_AARCH64_ADD_LO12:
4442 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
4443 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
4444 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
4445 case BFD_RELOC_AARCH64_BRANCH19:
4446 case BFD_RELOC_AARCH64_LD_LO19_PCREL:
4447 case BFD_RELOC_AARCH64_LDST8_LO12:
4448 case BFD_RELOC_AARCH64_LDST16_LO12:
4449 case BFD_RELOC_AARCH64_LDST32_LO12:
4450 case BFD_RELOC_AARCH64_LDST64_LO12:
4451 case BFD_RELOC_AARCH64_LDST128_LO12:
4452 case BFD_RELOC_AARCH64_MOVW_G0_S:
4453 case BFD_RELOC_AARCH64_MOVW_G1_S:
4454 case BFD_RELOC_AARCH64_MOVW_G2_S:
4455 case BFD_RELOC_AARCH64_MOVW_G0:
4456 case BFD_RELOC_AARCH64_MOVW_G0_NC:
4457 case BFD_RELOC_AARCH64_MOVW_G1:
4458 case BFD_RELOC_AARCH64_MOVW_G1_NC:
4459 case BFD_RELOC_AARCH64_MOVW_G2:
4460 case BFD_RELOC_AARCH64_MOVW_G2_NC:
4461 case BFD_RELOC_AARCH64_MOVW_G3:
4462 case BFD_RELOC_AARCH64_16_PCREL:
4463 case BFD_RELOC_AARCH64_32_PCREL:
4464 case BFD_RELOC_AARCH64_64_PCREL:
4465 case BFD_RELOC_AARCH64_TSTBR14:
caed7120
YZ		 4466 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
4467 signed_addend, weak_undef_p);
a06ea964
NC		 4468 break;
4469
a6bb11b2
YZ		 4470 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
4471 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
4472 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
4473 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
a06ea964
NC		 4474 if (globals->root.sgot == NULL)
4475 BFD_ASSERT (h != NULL);
4476
4477 if (h != NULL)
4478 {
4479 value = aarch64_calculate_got_entry_vma (h, globals, info, value,
4480 output_bfd,
4481 unresolved_reloc_p);
caed7120
YZ		 4482 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
4483 0, weak_undef_p);
a06ea964
NC		 4484 }
4485 break;
4486
a6bb11b2
YZ		 4487 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
4488 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
4489 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
4490 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
4491 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
a06ea964
NC		 4492 if (globals->root.sgot == NULL)
4493 return bfd_reloc_notsupported;
4494
4495 value = (symbol_got_offset (input_bfd, h, r_symndx)
4496 + globals->root.sgot->output_section->vma
f44a1f8e 4497 + globals->root.sgot->output_offset);
a06ea964 4498
caed7120
YZ		 4499 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
4500 0, weak_undef_p);
a06ea964
NC		 4501 *unresolved_reloc_p = FALSE;
4502 break;
4503
a6bb11b2
YZ		 4504 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
4505 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
4506 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
4507 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
4508 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
4509 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
4510 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
4511 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
caed7120
YZ		 4512 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
4513 signed_addend - tpoff_base (info),
4514 weak_undef_p);
a06ea964
NC		 4515 *unresolved_reloc_p = FALSE;
4516 break;
4517
7bcccb57
MS		 4518 case BFD_RELOC_AARCH64_TLSDESC_ADD:
4519 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12_NC:
a6bb11b2 4520 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
a6bb11b2 4521 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
7bcccb57 4522 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12_NC:
a6bb11b2 4523 case BFD_RELOC_AARCH64_TLSDESC_LDR:
a06ea964
NC		 4524 if (globals->root.sgot == NULL)
4525 return bfd_reloc_notsupported;
a06ea964
NC		 4526 value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
4527 + globals->root.sgotplt->output_section->vma
f44a1f8e 4528 + globals->root.sgotplt->output_offset
a06ea964
NC		 4529 + globals->sgotplt_jump_table_size);
4530
caed7120
YZ		 4531 value = _bfd_aarch64_elf_resolve_relocation (bfd_r_type, place, value,
4532 0, weak_undef_p);
a06ea964
NC		 4533 *unresolved_reloc_p = FALSE;
4534 break;
4535
4536 default:
4537 return bfd_reloc_notsupported;
4538 }
4539
4540 if (saved_addend)
4541 *saved_addend = value;
4542
4543 /* Only apply the final relocation in a sequence. */
4544 if (save_addend)
4545 return bfd_reloc_continue;
4546
caed7120
YZ		 4547 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
4548 howto, value);
a06ea964
NC		 4549}
4550
4551/* Handle TLS relaxations. Relaxing is possible for symbols that use
4552 R_AARCH64_TLSDESC_ADR_{PAGE, LD64_LO12_NC, ADD_LO12_NC} during a static
4553 link.
4554
4555 Return bfd_reloc_ok if we're done, bfd_reloc_continue if the caller
4556 is to then call final_link_relocate. Return other values in the
4557 case of error. */
4558
4559static bfd_reloc_status_type
cec5225b 4560elfNN_aarch64_tls_relax (struct elf_aarch64_link_hash_table *globals,
a06ea964
NC		 4561 bfd *input_bfd, bfd_byte *contents,
4562 Elf_Internal_Rela *rel, struct elf_link_hash_entry *h)
4563{
4564 bfd_boolean is_local = h == NULL;
cec5225b 4565 unsigned int r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC		 4566 unsigned long insn;
4567
4568 BFD_ASSERT (globals && input_bfd && contents && rel);
4569
a6bb11b2 4570 switch (elfNN_aarch64_bfd_reloc_from_type (r_type))
a06ea964 4571 {
a6bb11b2
YZ		 4572 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
4573 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
a06ea964
NC		 4574 if (is_local)
4575 {
4576 /* GD->LE relaxation:
4577 adrp x0, :tlsgd:var => movz x0, :tprel_g1:var
4578 or
4579 adrp x0, :tlsdesc:var => movz x0, :tprel_g1:var
4580 */
4581 bfd_putl32 (0xd2a00000, contents + rel->r_offset);
4582 return bfd_reloc_continue;
4583 }
4584 else
4585 {
4586 /* GD->IE relaxation:
4587 adrp x0, :tlsgd:var => adrp x0, :gottprel:var
4588 or
4589 adrp x0, :tlsdesc:var => adrp x0, :gottprel:var
4590 */
a06ea964
NC		 4591 return bfd_reloc_continue;
4592 }
4593
a6bb11b2 4594 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
a06ea964
NC		 4595 if (is_local)
4596 {
4597 /* GD->LE relaxation:
4598 ldr xd, [x0, #:tlsdesc_lo12:var] => movk x0, :tprel_g0_nc:var
4599 */
4600 bfd_putl32 (0xf2800000, contents + rel->r_offset);
4601 return bfd_reloc_continue;
4602 }
4603 else
4604 {
4605 /* GD->IE relaxation:
4606 ldr xd, [x0, #:tlsdesc_lo12:var] => ldr x0, [x0, #:gottprel_lo12:var]
4607 */
4608 insn = bfd_getl32 (contents + rel->r_offset);
fa85fb9a 4609 insn &= 0xffffffe0;
a06ea964
NC		 4610 bfd_putl32 (insn, contents + rel->r_offset);
4611 return bfd_reloc_continue;
4612 }
4613
a6bb11b2 4614 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a06ea964
NC		 4615 if (is_local)
4616 {
4617 /* GD->LE relaxation
4618 add x0, #:tlsgd_lo12:var => movk x0, :tprel_g0_nc:var
4619 bl __tls_get_addr => mrs x1, tpidr_el0
4620 nop => add x0, x1, x0
4621 */
4622
4623 /* First kill the tls_get_addr reloc on the bl instruction. */
4624 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
cec5225b 4625 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
a06ea964
NC		 4626
4627 bfd_putl32 (0xf2800000, contents + rel->r_offset);
4628 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
4629 bfd_putl32 (0x8b000020, contents + rel->r_offset + 8);
4630 return bfd_reloc_continue;
4631 }
4632 else
4633 {
4634 /* GD->IE relaxation
4635 ADD x0, #:tlsgd_lo12:var => ldr x0, [x0, #:gottprel_lo12:var]
4636 BL __tls_get_addr => mrs x1, tpidr_el0
4637 R_AARCH64_CALL26
4638 NOP => add x0, x1, x0
4639 */
4640
a6bb11b2 4641 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
a06ea964
NC		 4642
4643 /* Remove the relocation on the BL instruction. */
cec5225b 4644 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
a06ea964
NC		 4645
4646 bfd_putl32 (0xf9400000, contents + rel->r_offset);
4647
4648 /* We choose to fixup the BL and NOP instructions using the
4649 offset from the second relocation to allow flexibility in
4650 scheduling instructions between the ADD and BL. */
4651 bfd_putl32 (0xd53bd041, contents + rel[1].r_offset);
4652 bfd_putl32 (0x8b000020, contents + rel[1].r_offset + 4);
4653 return bfd_reloc_continue;
4654 }
4655
a6bb11b2
YZ		 4656 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12_NC:
4657 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a06ea964
NC		 4658 /* GD->IE/LE relaxation:
4659 add x0, x0, #:tlsdesc_lo12:var => nop
4660 blr xd => nop
4661 */
4662 bfd_putl32 (INSN_NOP, contents + rel->r_offset);
4663 return bfd_reloc_ok;
4664
a6bb11b2 4665 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a06ea964
NC		 4666 /* IE->LE relaxation:
4667 adrp xd, :gottprel:var => movz xd, :tprel_g1:var
4668 */
4669 if (is_local)
4670 {
4671 insn = bfd_getl32 (contents + rel->r_offset);
4672 bfd_putl32 (0xd2a00000 | (insn & 0x1f), contents + rel->r_offset);
4673 }
4674 return bfd_reloc_continue;
4675
a6bb11b2 4676 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
a06ea964
NC		 4677 /* IE->LE relaxation:
4678 ldr xd, [xm, #:gottprel_lo12:var] => movk xd, :tprel_g0_nc:var
4679 */
4680 if (is_local)
4681 {
4682 insn = bfd_getl32 (contents + rel->r_offset);
4683 bfd_putl32 (0xf2800000 | (insn & 0x1f), contents + rel->r_offset);
4684 }
4685 return bfd_reloc_continue;
4686
4687 default:
4688 return bfd_reloc_continue;
4689 }
4690
4691 return bfd_reloc_ok;
4692}
4693
4694/* Relocate an AArch64 ELF section. */
4695
4696static bfd_boolean
cec5225b 4697elfNN_aarch64_relocate_section (bfd *output_bfd,
a06ea964
NC		 4698 struct bfd_link_info *info,
4699 bfd *input_bfd,
4700 asection *input_section,
4701 bfd_byte *contents,
4702 Elf_Internal_Rela *relocs,
4703 Elf_Internal_Sym *local_syms,
4704 asection **local_sections)
4705{
4706 Elf_Internal_Shdr *symtab_hdr;
4707 struct elf_link_hash_entry **sym_hashes;
4708 Elf_Internal_Rela *rel;
4709 Elf_Internal_Rela *relend;
4710 const char *name;
cec5225b 4711 struct elf_aarch64_link_hash_table *globals;
a06ea964
NC		 4712 bfd_boolean save_addend = FALSE;
4713 bfd_vma addend = 0;
4714
cec5225b 4715 globals = elf_aarch64_hash_table (info);
a06ea964
NC		 4716
4717 symtab_hdr = &elf_symtab_hdr (input_bfd);
4718 sym_hashes = elf_sym_hashes (input_bfd);
4719
4720 rel = relocs;
4721 relend = relocs + input_section->reloc_count;
4722 for (; rel < relend; rel++)
4723 {
4724 unsigned int r_type;
a6bb11b2
YZ		 4725 bfd_reloc_code_real_type bfd_r_type;
4726 bfd_reloc_code_real_type relaxed_bfd_r_type;
a06ea964
NC		 4727 reloc_howto_type *howto;
4728 unsigned long r_symndx;
4729 Elf_Internal_Sym *sym;
4730 asection *sec;
4731 struct elf_link_hash_entry *h;
4732 bfd_vma relocation;
4733 bfd_reloc_status_type r;
4734 arelent bfd_reloc;
4735 char sym_type;
4736 bfd_boolean unresolved_reloc = FALSE;
4737 char *error_message = NULL;
4738
cec5225b
YZ		 4739 r_symndx = ELFNN_R_SYM (rel->r_info);
4740 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964 4741
cec5225b 4742 bfd_reloc.howto = elfNN_aarch64_howto_from_type (r_type);
a06ea964
NC		 4743 howto = bfd_reloc.howto;
4744
7fcfd62d
NC		 4745 if (howto == NULL)
4746 {
4747 (*_bfd_error_handler)
4748 (_("%B: unrecognized relocation (0x%x) in section `%A'"),
4749 input_bfd, input_section, r_type);
4750 return FALSE;
4751 }
a6bb11b2 4752 bfd_r_type = elfNN_aarch64_bfd_reloc_from_howto (howto);
7fcfd62d 4753
a06ea964
NC		 4754 h = NULL;
4755 sym = NULL;
4756 sec = NULL;
4757
4758 if (r_symndx < symtab_hdr->sh_info)
4759 {
4760 sym = local_syms + r_symndx;
cec5225b 4761 sym_type = ELFNN_ST_TYPE (sym->st_info);
a06ea964
NC		 4762 sec = local_sections[r_symndx];
4763
4764 /* An object file might have a reference to a local
4765 undefined symbol. This is a daft object file, but we
4766 should at least do something about it. */
4767 if (r_type != R_AARCH64_NONE && r_type != R_AARCH64_NULL
4768 && bfd_is_und_section (sec)
4769 && ELF_ST_BIND (sym->st_info) != STB_WEAK)
4770 {
4771 if (!info->callbacks->undefined_symbol
4772 (info, bfd_elf_string_from_elf_section
4773 (input_bfd, symtab_hdr->sh_link, sym->st_name),
4774 input_bfd, input_section, rel->r_offset, TRUE))
4775 return FALSE;
4776 }
4777
a06ea964 4778 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
1419bbe5
WN		 4779
4780 /* Relocate against local STT_GNU_IFUNC symbol. */
4781 if (!info->relocatable
4782 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
4783 {
4784 h = elfNN_aarch64_get_local_sym_hash (globals, input_bfd,
4785 rel, FALSE);
4786 if (h == NULL)
4787 abort ();
4788
4789 /* Set STT_GNU_IFUNC symbol value. */
4790 h->root.u.def.value = sym->st_value;
4791 h->root.u.def.section = sec;
4792 }
a06ea964
NC		 4793 }
4794 else
4795 {
62d887d4 4796 bfd_boolean warned, ignored;
a06ea964
NC		 4797
4798 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
4799 r_symndx, symtab_hdr, sym_hashes,
4800 h, sec, relocation,
62d887d4 4801 unresolved_reloc, warned, ignored);
a06ea964
NC		 4802
4803 sym_type = h->type;
4804 }
4805
4806 if (sec != NULL && discarded_section (sec))
4807 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
4808 rel, 1, relend, howto, 0, contents);
4809
4810 if (info->relocatable)
2e0488d3 4811 continue;
a06ea964
NC		 4812
4813 if (h != NULL)
4814 name = h->root.root.string;
4815 else
4816 {
4817 name = (bfd_elf_string_from_elf_section
4818 (input_bfd, symtab_hdr->sh_link, sym->st_name));
4819 if (name == NULL || *name == '\0')
4820 name = bfd_section_name (input_bfd, sec);
4821 }
4822
4823 if (r_symndx != 0
4824 && r_type != R_AARCH64_NONE
4825 && r_type != R_AARCH64_NULL
4826 && (h == NULL
4827 || h->root.type == bfd_link_hash_defined
4828 || h->root.type == bfd_link_hash_defweak)
a6bb11b2 4829 && IS_AARCH64_TLS_RELOC (bfd_r_type) != (sym_type == STT_TLS))
a06ea964
NC		 4830 {
4831 (*_bfd_error_handler)
4832 ((sym_type == STT_TLS
4833 ? _("%B(%A+0x%lx): %s used with TLS symbol %s")
4834 : _("%B(%A+0x%lx): %s used with non-TLS symbol %s")),
4835 input_bfd,
4836 input_section, (long) rel->r_offset, howto->name, name);
4837 }
4838
a06ea964
NC		 4839 /* We relax only if we can see that there can be a valid transition
4840 from a reloc type to another.
cec5225b 4841 We call elfNN_aarch64_final_link_relocate unless we're completely
a06ea964
NC		 4842 done, i.e., the relaxation produced the final output we want. */
4843
a6bb11b2
YZ		 4844 relaxed_bfd_r_type = aarch64_tls_transition (input_bfd, info, r_type,
4845 h, r_symndx);
4846 if (relaxed_bfd_r_type != bfd_r_type)
a06ea964 4847 {
a6bb11b2
YZ		 4848 bfd_r_type = relaxed_bfd_r_type;
4849 howto = elfNN_aarch64_howto_from_bfd_reloc (bfd_r_type);
4850 BFD_ASSERT (howto != NULL);
4851 r_type = howto->type;
cec5225b 4852 r = elfNN_aarch64_tls_relax (globals, input_bfd, contents, rel, h);
a06ea964
NC		 4853 unresolved_reloc = 0;
4854 }
4855 else
4856 r = bfd_reloc_continue;
4857
4858 /* There may be multiple consecutive relocations for the
4859 same offset. In that case we are supposed to treat the
4860 output of each relocation as the addend for the next. */
4861 if (rel + 1 < relend
4862 && rel->r_offset == rel[1].r_offset
cec5225b
YZ		 4863 && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NONE
4864 && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NULL)
a06ea964
NC		 4865 save_addend = TRUE;
4866 else
4867 save_addend = FALSE;
4868
4869 if (r == bfd_reloc_continue)
cec5225b 4870 r = elfNN_aarch64_final_link_relocate (howto, input_bfd, output_bfd,
a06ea964
NC		 4871 input_section, contents, rel,
4872 relocation, info, sec,
4873 h, &unresolved_reloc,
1419bbe5 4874 save_addend, &addend, sym);
a06ea964 4875
a6bb11b2 4876 switch (elfNN_aarch64_bfd_reloc_from_type (r_type))
a06ea964 4877 {
a6bb11b2
YZ		 4878 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
4879 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a06ea964
NC		 4880 if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
4881 {
4882 bfd_boolean need_relocs = FALSE;
4883 bfd_byte *loc;
4884 int indx;
4885 bfd_vma off;
4886
4887 off = symbol_got_offset (input_bfd, h, r_symndx);
4888 indx = h && h->dynindx != -1 ? h->dynindx : 0;
4889
4890 need_relocs =
4891 (info->shared || indx != 0) &&
4892 (h == NULL
4893 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4894 || h->root.type != bfd_link_hash_undefweak);
4895
4896 BFD_ASSERT (globals->root.srelgot != NULL);
4897
4898 if (need_relocs)
4899 {
4900 Elf_Internal_Rela rela;
a6bb11b2 4901 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPMOD));
a06ea964
NC		 4902 rela.r_addend = 0;
4903 rela.r_offset = globals->root.sgot->output_section->vma +
4904 globals->root.sgot->output_offset + off;
4905
4906
4907 loc = globals->root.srelgot->contents;
4908 loc += globals->root.srelgot->reloc_count++
4909 * RELOC_SIZE (htab);
cec5225b 4910 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC		 4911
4912 if (indx == 0)
4913 {
cec5225b 4914 bfd_put_NN (output_bfd,
a06ea964
NC		 4915 relocation - dtpoff_base (info),
4916 globals->root.sgot->contents + off
4917 + GOT_ENTRY_SIZE);
4918 }
4919 else
4920 {
4921 /* This TLS symbol is global. We emit a
4922 relocation to fixup the tls offset at load
4923 time. */
4924 rela.r_info =
a6bb11b2 4925 ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPREL));
a06ea964
NC		 4926 rela.r_addend = 0;
4927 rela.r_offset =
4928 (globals->root.sgot->output_section->vma
4929 + globals->root.sgot->output_offset + off
4930 + GOT_ENTRY_SIZE);
4931
4932 loc = globals->root.srelgot->contents;
4933 loc += globals->root.srelgot->reloc_count++
4934 * RELOC_SIZE (globals);
cec5225b
YZ		 4935 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
4936 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC		 4937 globals->root.sgot->contents + off
4938 + GOT_ENTRY_SIZE);
4939 }
4940 }
4941 else
4942 {
cec5225b 4943 bfd_put_NN (output_bfd, (bfd_vma) 1,
a06ea964 4944 globals->root.sgot->contents + off);
cec5225b 4945 bfd_put_NN (output_bfd,
a06ea964
NC		 4946 relocation - dtpoff_base (info),
4947 globals->root.sgot->contents + off
4948 + GOT_ENTRY_SIZE);
4949 }
4950
4951 symbol_got_offset_mark (input_bfd, h, r_symndx);
4952 }
4953 break;
4954
a6bb11b2
YZ		 4955 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
4956 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
a06ea964
NC		 4957 if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
4958 {
4959 bfd_boolean need_relocs = FALSE;
4960 bfd_byte *loc;
4961 int indx;
4962 bfd_vma off;
4963
4964 off = symbol_got_offset (input_bfd, h, r_symndx);
4965
4966 indx = h && h->dynindx != -1 ? h->dynindx : 0;
4967
4968 need_relocs =
4969 (info->shared || indx != 0) &&
4970 (h == NULL
4971 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
4972 || h->root.type != bfd_link_hash_undefweak);
4973
4974 BFD_ASSERT (globals->root.srelgot != NULL);
4975
4976 if (need_relocs)
4977 {
4978 Elf_Internal_Rela rela;
4979
4980 if (indx == 0)
4981 rela.r_addend = relocation - dtpoff_base (info);
4982 else
4983 rela.r_addend = 0;
4984
a6bb11b2 4985 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_TPREL));
a06ea964
NC		 4986 rela.r_offset = globals->root.sgot->output_section->vma +
4987 globals->root.sgot->output_offset + off;
4988
4989 loc = globals->root.srelgot->contents;
4990 loc += globals->root.srelgot->reloc_count++
4991 * RELOC_SIZE (htab);
4992
cec5225b 4993 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964 4994
cec5225b 4995 bfd_put_NN (output_bfd, rela.r_addend,
a06ea964
NC		 4996 globals->root.sgot->contents + off);
4997 }
4998 else
cec5225b 4999 bfd_put_NN (output_bfd, relocation - tpoff_base (info),
a06ea964
NC		 5000 globals->root.sgot->contents + off);
5001
5002 symbol_got_offset_mark (input_bfd, h, r_symndx);
5003 }
5004 break;
5005
a6bb11b2
YZ		 5006 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
5007 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
5008 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
5009 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
5010 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
5011 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
5012 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
5013 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
a06ea964
NC		 5014 break;
5015
7bcccb57 5016 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12_NC:
a6bb11b2
YZ		 5017 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
5018 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
a06ea964
NC		 5019 if (! symbol_tlsdesc_got_offset_mark_p (input_bfd, h, r_symndx))
5020 {
5021 bfd_boolean need_relocs = FALSE;
5022 int indx = h && h->dynindx != -1 ? h->dynindx : 0;
5023 bfd_vma off = symbol_tlsdesc_got_offset (input_bfd, h, r_symndx);
5024
5025 need_relocs = (h == NULL
5026 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
5027 || h->root.type != bfd_link_hash_undefweak);
5028
5029 BFD_ASSERT (globals->root.srelgot != NULL);
5030 BFD_ASSERT (globals->root.sgot != NULL);
5031
5032 if (need_relocs)
5033 {
5034 bfd_byte *loc;
5035 Elf_Internal_Rela rela;
a6bb11b2
YZ		 5036 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLSDESC));
5037
a06ea964
NC		 5038 rela.r_addend = 0;
5039 rela.r_offset = (globals->root.sgotplt->output_section->vma
5040 + globals->root.sgotplt->output_offset
5041 + off + globals->sgotplt_jump_table_size);
5042
5043 if (indx == 0)
5044 rela.r_addend = relocation - dtpoff_base (info);
5045
5046 /* Allocate the next available slot in the PLT reloc
5047 section to hold our R_AARCH64_TLSDESC, the next
5048 available slot is determined from reloc_count,
5049 which we step. But note, reloc_count was
5050 artifically moved down while allocating slots for
5051 real PLT relocs such that all of the PLT relocs
5052 will fit above the initial reloc_count and the
5053 extra stuff will fit below. */
5054 loc = globals->root.srelplt->contents;
5055 loc += globals->root.srelplt->reloc_count++
5056 * RELOC_SIZE (globals);
5057
cec5225b 5058 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964 5059
cec5225b 5060 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC		 5061 globals->root.sgotplt->contents + off +
5062 globals->sgotplt_jump_table_size);
cec5225b 5063 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC		 5064 globals->root.sgotplt->contents + off +
5065 globals->sgotplt_jump_table_size +
5066 GOT_ENTRY_SIZE);
5067 }
5068
5069 symbol_tlsdesc_got_offset_mark (input_bfd, h, r_symndx);
5070 }
5071 break;
a6bb11b2
YZ		 5072 default:
5073 break;
a06ea964
NC		 5074 }
5075
5076 if (!save_addend)
5077 addend = 0;
5078
5079
5080 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
5081 because such sections are not SEC_ALLOC and thus ld.so will
5082 not process them. */
5083 if (unresolved_reloc
5084 && !((input_section->flags & SEC_DEBUGGING) != 0
5085 && h->def_dynamic)
5086 && _bfd_elf_section_offset (output_bfd, info, input_section,
5087 +rel->r_offset) != (bfd_vma) - 1)
5088 {
5089 (*_bfd_error_handler)
5090 (_
5091 ("%B(%A+0x%lx): unresolvable %s relocation against symbol `%s'"),
5092 input_bfd, input_section, (long) rel->r_offset, howto->name,
5093 h->root.root.string);
5094 return FALSE;
5095 }
5096
5097 if (r != bfd_reloc_ok && r != bfd_reloc_continue)
5098 {
5099 switch (r)
5100 {
5101 case bfd_reloc_overflow:
5102 /* If the overflowing reloc was to an undefined symbol,
5103 we have already printed one error message and there
5104 is no point complaining again. */
5105 if ((!h ||
5106 h->root.type != bfd_link_hash_undefined)
5107 && (!((*info->callbacks->reloc_overflow)
5108 (info, (h ? &h->root : NULL), name, howto->name,
5109 (bfd_vma) 0, input_bfd, input_section,
5110 rel->r_offset))))
5111 return FALSE;
5112 break;
5113
5114 case bfd_reloc_undefined:
5115 if (!((*info->callbacks->undefined_symbol)
5116 (info, name, input_bfd, input_section,
5117 rel->r_offset, TRUE)))
5118 return FALSE;
5119 break;
5120
5121 case bfd_reloc_outofrange:
5122 error_message = _("out of range");
5123 goto common_error;
5124
5125 case bfd_reloc_notsupported:
5126 error_message = _("unsupported relocation");
5127 goto common_error;
5128
5129 case bfd_reloc_dangerous:
5130 /* error_message should already be set. */
5131 goto common_error;
5132
5133 default:
5134 error_message = _("unknown error");
5135 /* Fall through. */
5136
5137 common_error:
5138 BFD_ASSERT (error_message != NULL);
5139 if (!((*info->callbacks->reloc_dangerous)
5140 (info, error_message, input_bfd, input_section,
5141 rel->r_offset)))
5142 return FALSE;
5143 break;
5144 }
5145 }
5146 }
5147
5148 return TRUE;
5149}
5150
5151/* Set the right machine number. */
5152
5153static bfd_boolean
cec5225b 5154elfNN_aarch64_object_p (bfd *abfd)
a06ea964 5155{
cec5225b
YZ		 5156#if ARCH_SIZE == 32
5157 bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64_ilp32);
5158#else
a06ea964 5159 bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64);
cec5225b 5160#endif
a06ea964
NC		 5161 return TRUE;
5162}
5163
5164/* Function to keep AArch64 specific flags in the ELF header. */
5165
5166static bfd_boolean
cec5225b 5167elfNN_aarch64_set_private_flags (bfd *abfd, flagword flags)
a06ea964
NC		 5168{
5169 if (elf_flags_init (abfd) && elf_elfheader (abfd)->e_flags != flags)
5170 {
5171 }
5172 else
5173 {
5174 elf_elfheader (abfd)->e_flags = flags;
5175 elf_flags_init (abfd) = TRUE;
5176 }
5177
5178 return TRUE;
5179}
5180
a06ea964
NC		 5181/* Merge backend specific data from an object file to the output
5182 object file when linking. */
5183
5184static bfd_boolean
cec5225b 5185elfNN_aarch64_merge_private_bfd_data (bfd *ibfd, bfd *obfd)
a06ea964
NC		 5186{
5187 flagword out_flags;
5188 flagword in_flags;
5189 bfd_boolean flags_compatible = TRUE;
5190 asection *sec;
5191
5192 /* Check if we have the same endianess. */
5193 if (!_bfd_generic_verify_endian_match (ibfd, obfd))
5194 return FALSE;
5195
5196 if (!is_aarch64_elf (ibfd) || !is_aarch64_elf (obfd))
5197 return TRUE;
5198
5199 /* The input BFD must have had its flags initialised. */
5200 /* The following seems bogus to me -- The flags are initialized in
5201 the assembler but I don't think an elf_flags_init field is
5202 written into the object. */
5203 /* BFD_ASSERT (elf_flags_init (ibfd)); */
5204
5205 in_flags = elf_elfheader (ibfd)->e_flags;
5206 out_flags = elf_elfheader (obfd)->e_flags;
5207
5208 if (!elf_flags_init (obfd))
5209 {
5210 /* If the input is the default architecture and had the default
5211 flags then do not bother setting the flags for the output
5212 architecture, instead allow future merges to do this. If no
5213 future merges ever set these flags then they will retain their
5214 uninitialised values, which surprise surprise, correspond
5215 to the default values. */
5216 if (bfd_get_arch_info (ibfd)->the_default
5217 && elf_elfheader (ibfd)->e_flags == 0)
5218 return TRUE;
5219
5220 elf_flags_init (obfd) = TRUE;
5221 elf_elfheader (obfd)->e_flags = in_flags;
5222
5223 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
5224 && bfd_get_arch_info (obfd)->the_default)
5225 return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd),
5226 bfd_get_mach (ibfd));
5227
5228 return TRUE;
5229 }
5230
5231 /* Identical flags must be compatible. */
5232 if (in_flags == out_flags)
5233 return TRUE;
5234
5235 /* Check to see if the input BFD actually contains any sections. If
5236 not, its flags may not have been initialised either, but it
5237 cannot actually cause any incompatiblity. Do not short-circuit
5238 dynamic objects; their section list may be emptied by
5239 elf_link_add_object_symbols.
5240
5241 Also check to see if there are no code sections in the input.
5242 In this case there is no need to check for code specific flags.
5243 XXX - do we need to worry about floating-point format compatability
5244 in data sections ? */
5245 if (!(ibfd->flags & DYNAMIC))
5246 {
5247 bfd_boolean null_input_bfd = TRUE;
5248 bfd_boolean only_data_sections = TRUE;
5249
5250 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
5251 {
5252 if ((bfd_get_section_flags (ibfd, sec)
5253 & (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
5254 == (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
5255 only_data_sections = FALSE;
5256
5257 null_input_bfd = FALSE;
5258 break;
5259 }
5260
5261 if (null_input_bfd || only_data_sections)
5262 return TRUE;
5263 }
5264
5265 return flags_compatible;
5266}
5267
5268/* Display the flags field. */
5269
5270static bfd_boolean
cec5225b 5271elfNN_aarch64_print_private_bfd_data (bfd *abfd, void *ptr)
a06ea964
NC		 5272{
5273 FILE *file = (FILE *) ptr;
5274 unsigned long flags;
5275
5276 BFD_ASSERT (abfd != NULL && ptr != NULL);
5277
5278 /* Print normal ELF private data. */
5279 _bfd_elf_print_private_bfd_data (abfd, ptr);
5280
5281 flags = elf_elfheader (abfd)->e_flags;
5282 /* Ignore init flag - it may not be set, despite the flags field
5283 containing valid data. */
5284
5285 /* xgettext:c-format */
5286 fprintf (file, _("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
5287
5288 if (flags)
5289 fprintf (file, _("<Unrecognised flag bits set>"));
5290
5291 fputc ('\n', file);
5292
5293 return TRUE;
5294}
5295
5296/* Update the got entry reference counts for the section being removed. */
5297
5298static bfd_boolean
cec5225b 5299elfNN_aarch64_gc_sweep_hook (bfd *abfd,
cb8af559
NC		 5300 struct bfd_link_info *info,
5301 asection *sec,
5302 const Elf_Internal_Rela * relocs)
a06ea964 5303{
cec5225b 5304 struct elf_aarch64_link_hash_table *htab;
59c108f7
NC		 5305 Elf_Internal_Shdr *symtab_hdr;
5306 struct elf_link_hash_entry **sym_hashes;
cb8af559 5307 struct elf_aarch64_local_symbol *locals;
59c108f7
NC		 5308 const Elf_Internal_Rela *rel, *relend;
5309
5310 if (info->relocatable)
5311 return TRUE;
5312
cec5225b 5313 htab = elf_aarch64_hash_table (info);
59c108f7
NC		 5314
5315 if (htab == NULL)
5316 return FALSE;
5317
5318 elf_section_data (sec)->local_dynrel = NULL;
5319
5320 symtab_hdr = &elf_symtab_hdr (abfd);
5321 sym_hashes = elf_sym_hashes (abfd);
5322
cec5225b 5323 locals = elf_aarch64_locals (abfd);
59c108f7
NC		 5324
5325 relend = relocs + sec->reloc_count;
5326 for (rel = relocs; rel < relend; rel++)
5327 {
5328 unsigned long r_symndx;
5329 unsigned int r_type;
5330 struct elf_link_hash_entry *h = NULL;
5331
cec5225b 5332 r_symndx = ELFNN_R_SYM (rel->r_info);
8847944f 5333
59c108f7
NC		 5334 if (r_symndx >= symtab_hdr->sh_info)
5335 {
8847944f 5336
59c108f7
NC		 5337 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
5338 while (h->root.type == bfd_link_hash_indirect
5339 || h->root.type == bfd_link_hash_warning)
5340 h = (struct elf_link_hash_entry *) h->root.u.i.link;
59c108f7
NC		 5341 }
5342 else
5343 {
5344 Elf_Internal_Sym *isym;
5345
8847944f 5346 /* A local symbol. */
59c108f7
NC		 5347 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
5348 abfd, r_symndx);
1419bbe5
WN		 5349
5350 /* Check relocation against local STT_GNU_IFUNC symbol. */
5351 if (isym != NULL
5352 && ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
5353 {
5354 h = elfNN_aarch64_get_local_sym_hash (htab, abfd, rel, FALSE);
5355 if (h == NULL)
5356 abort ();
5357 }
5358 }
5359
5360 if (h)
5361 {
5362 struct elf_aarch64_link_hash_entry *eh;
5363 struct elf_dyn_relocs **pp;
5364 struct elf_dyn_relocs *p;
5365
5366 eh = (struct elf_aarch64_link_hash_entry *) h;
5367
5368 for (pp = &eh->dyn_relocs; (p = *pp) != NULL; pp = &p->next)
5369 if (p->sec == sec)
5370 {
5371 /* Everything must go for SEC. */
5372 *pp = p->next;
5373 break;
5374 }
59c108f7
NC		 5375 }
5376
cec5225b 5377 r_type = ELFNN_R_TYPE (rel->r_info);
a6bb11b2 5378 switch (aarch64_tls_transition (abfd,info, r_type, h ,r_symndx))
59c108f7 5379 {
a6bb11b2 5380 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
7bcccb57
MS		 5381 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
5382 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
5383 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
5384 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12_NC:
5385 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
5386 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
5387 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12_NC:
a6bb11b2 5388 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
7bcccb57 5389 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
a6bb11b2 5390 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a6bb11b2 5391 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
7bcccb57 5392 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
a6bb11b2 5393 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
7bcccb57 5394 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
a6bb11b2 5395 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
a6bb11b2
YZ		 5396 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
5397 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
7bcccb57
MS		 5398 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
5399 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
5400 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
a6bb11b2 5401 if (h != NULL)
59c108f7
NC		 5402 {
5403 if (h->got.refcount > 0)
5404 h->got.refcount -= 1;
1419bbe5
WN		 5405
5406 if (h->type == STT_GNU_IFUNC)
5407 {
5408 if (h->plt.refcount > 0)
5409 h->plt.refcount -= 1;
5410 }
59c108f7 5411 }
cb8af559 5412 else if (locals != NULL)
59c108f7 5413 {
cb8af559
NC		 5414 if (locals[r_symndx].got_refcount > 0)
5415 locals[r_symndx].got_refcount -= 1;
59c108f7
NC		 5416 }
5417 break;
5418
a6bb11b2
YZ		 5419 case BFD_RELOC_AARCH64_CALL26:
5420 case BFD_RELOC_AARCH64_JUMP26:
5421 /* If this is a local symbol then we resolve it
5422 directly without creating a PLT entry. */
59c108f7
NC		 5423 if (h == NULL)
5424 continue;
5425
5426 if (h->plt.refcount > 0)
5427 h->plt.refcount -= 1;
5428 break;
5429
614b09ce
JW		 5430 case BFD_RELOC_AARCH64_MOVW_G0_NC:
5431 case BFD_RELOC_AARCH64_MOVW_G1_NC:
5432 case BFD_RELOC_AARCH64_MOVW_G2_NC:
5433 case BFD_RELOC_AARCH64_MOVW_G3:
5434 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
5435 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
5436 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
a6bb11b2 5437 case BFD_RELOC_AARCH64_NN:
8847944f 5438 if (h != NULL && info->executable)
59c108f7
NC		 5439 {
5440 if (h->plt.refcount > 0)
5441 h->plt.refcount -= 1;
5442 }
5443 break;
cec5225b 5444
59c108f7
NC		 5445 default:
5446 break;
5447 }
5448 }
5449
a06ea964
NC		 5450 return TRUE;
5451}
5452
5453/* Adjust a symbol defined by a dynamic object and referenced by a
5454 regular object. The current definition is in some section of the
5455 dynamic object, but we're not including those sections. We have to
5456 change the definition to something the rest of the link can
5457 understand. */
5458
5459static bfd_boolean
cec5225b 5460elfNN_aarch64_adjust_dynamic_symbol (struct bfd_link_info *info,
a06ea964
NC		 5461 struct elf_link_hash_entry *h)
5462{
cec5225b 5463 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC		 5464 asection *s;
5465
5466 /* If this is a function, put it in the procedure linkage table. We
5467 will fill in the contents of the procedure linkage table later,
5468 when we know the address of the .got section. */
1419bbe5 5469 if (h->type == STT_FUNC || h->type == STT_GNU_IFUNC || h->needs_plt)
a06ea964
NC		 5470 {
5471 if (h->plt.refcount <= 0
1419bbe5
WN		 5472 || (h->type != STT_GNU_IFUNC
5473 && (SYMBOL_CALLS_LOCAL (info, h)
5474 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
5475 && h->root.type == bfd_link_hash_undefweak))))
a06ea964
NC		 5476 {
5477 /* This case can occur if we saw a CALL26 reloc in
5478 an input file, but the symbol wasn't referred to
5479 by a dynamic object or all references were
5480 garbage collected. In which case we can end up
5481 resolving. */
5482 h->plt.offset = (bfd_vma) - 1;
5483 h->needs_plt = 0;
5484 }
5485
5486 return TRUE;
5487 }
5488 else
5489 /* It's possible that we incorrectly decided a .plt reloc was
5490 needed for an R_X86_64_PC32 reloc to a non-function sym in
5491 check_relocs. We can't decide accurately between function and
5492 non-function syms in check-relocs; Objects loaded later in
5493 the link may change h->type. So fix it now. */
5494 h->plt.offset = (bfd_vma) - 1;
5495
5496
5497 /* If this is a weak symbol, and there is a real definition, the
5498 processor independent code will have arranged for us to see the
5499 real definition first, and we can just use the same value. */
5500 if (h->u.weakdef != NULL)
5501 {
5502 BFD_ASSERT (h->u.weakdef->root.type == bfd_link_hash_defined
5503 || h->u.weakdef->root.type == bfd_link_hash_defweak);
5504 h->root.u.def.section = h->u.weakdef->root.u.def.section;
5505 h->root.u.def.value = h->u.weakdef->root.u.def.value;
5506 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
5507 h->non_got_ref = h->u.weakdef->non_got_ref;
5508 return TRUE;
5509 }
5510
5511 /* If we are creating a shared library, we must presume that the
5512 only references to the symbol are via the global offset table.
5513 For such cases we need not do anything here; the relocations will
5514 be handled correctly by relocate_section. */
5515 if (info->shared)
5516 return TRUE;
5517
5518 /* If there are no references to this symbol that do not use the
5519 GOT, we don't need to generate a copy reloc. */
5520 if (!h->non_got_ref)
5521 return TRUE;
5522
5523 /* If -z nocopyreloc was given, we won't generate them either. */
5524 if (info->nocopyreloc)
5525 {
5526 h->non_got_ref = 0;
5527 return TRUE;
5528 }
5529
5530 /* We must allocate the symbol in our .dynbss section, which will
5531 become part of the .bss section of the executable. There will be
5532 an entry for this symbol in the .dynsym section. The dynamic
5533 object will contain position independent code, so all references
5534 from the dynamic object to this symbol will go through the global
5535 offset table. The dynamic linker will use the .dynsym entry to
5536 determine the address it must put in the global offset table, so
5537 both the dynamic object and the regular object will refer to the
5538 same memory location for the variable. */
5539
cec5225b 5540 htab = elf_aarch64_hash_table (info);
a06ea964
NC		 5541
5542 /* We must generate a R_AARCH64_COPY reloc to tell the dynamic linker
5543 to copy the initial value out of the dynamic object and into the
5544 runtime process image. */
5545 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
5546 {
5547 htab->srelbss->size += RELOC_SIZE (htab);
5548 h->needs_copy = 1;
5549 }
5550
5551 s = htab->sdynbss;
5552
6cabe1ea 5553 return _bfd_elf_adjust_dynamic_copy (info, h, s);
a06ea964
NC		 5554
5555}
5556
5557static bfd_boolean
cec5225b 5558elfNN_aarch64_allocate_local_symbols (bfd *abfd, unsigned number)
a06ea964
NC		 5559{
5560 struct elf_aarch64_local_symbol *locals;
cec5225b 5561 locals = elf_aarch64_locals (abfd);
a06ea964
NC		 5562 if (locals == NULL)
5563 {
5564 locals = (struct elf_aarch64_local_symbol *)
5565 bfd_zalloc (abfd, number * sizeof (struct elf_aarch64_local_symbol));
5566 if (locals == NULL)
5567 return FALSE;
cec5225b 5568 elf_aarch64_locals (abfd) = locals;
a06ea964
NC		 5569 }
5570 return TRUE;
5571}
5572
cc0efaa8
MS		 5573/* Create the .got section to hold the global offset table. */
5574
5575static bfd_boolean
5576aarch64_elf_create_got_section (bfd *abfd, struct bfd_link_info *info)
5577{
5578 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
5579 flagword flags;
5580 asection *s;
5581 struct elf_link_hash_entry *h;
5582 struct elf_link_hash_table *htab = elf_hash_table (info);
5583
5584 /* This function may be called more than once. */
5585 s = bfd_get_linker_section (abfd, ".got");
5586 if (s != NULL)
5587 return TRUE;
5588
5589 flags = bed->dynamic_sec_flags;
5590
5591 s = bfd_make_section_anyway_with_flags (abfd,
5592 (bed->rela_plts_and_copies_p
5593 ? ".rela.got" : ".rel.got"),
5594 (bed->dynamic_sec_flags
5595 | SEC_READONLY));
5596 if (s == NULL
5597 || ! bfd_set_section_alignment (abfd, s, bed->s->log_file_align))
5598 return FALSE;
5599 htab->srelgot = s;
5600
5601 s = bfd_make_section_anyway_with_flags (abfd, ".got", flags);
5602 if (s == NULL
5603 || !bfd_set_section_alignment (abfd, s, bed->s->log_file_align))
5604 return FALSE;
5605 htab->sgot = s;
5606 htab->sgot->size += GOT_ENTRY_SIZE;
5607
5608 if (bed->want_got_sym)
5609 {
5610 /* Define the symbol _GLOBAL_OFFSET_TABLE_ at the start of the .got
5611 (or .got.plt) section. We don't do this in the linker script
5612 because we don't want to define the symbol if we are not creating
5613 a global offset table. */
5614 h = _bfd_elf_define_linkage_sym (abfd, info, s,
5615 "_GLOBAL_OFFSET_TABLE_");
5616 elf_hash_table (info)->hgot = h;
5617 if (h == NULL)
5618 return FALSE;
5619 }
5620
5621 if (bed->want_got_plt)
5622 {
5623 s = bfd_make_section_anyway_with_flags (abfd, ".got.plt", flags);
5624 if (s == NULL
5625 || !bfd_set_section_alignment (abfd, s,
5626 bed->s->log_file_align))
5627 return FALSE;
5628 htab->sgotplt = s;
5629 }
5630
5631 /* The first bit of the global offset table is the header. */
5632 s->size += bed->got_header_size;
5633
5634 return TRUE;
5635}
5636
a06ea964
NC		 5637/* Look through the relocs for a section during the first phase. */
5638
5639static bfd_boolean
cec5225b 5640elfNN_aarch64_check_relocs (bfd *abfd, struct bfd_link_info *info,
a06ea964
NC		 5641 asection *sec, const Elf_Internal_Rela *relocs)
5642{
5643 Elf_Internal_Shdr *symtab_hdr;
5644 struct elf_link_hash_entry **sym_hashes;
5645 const Elf_Internal_Rela *rel;
5646 const Elf_Internal_Rela *rel_end;
5647 asection *sreloc;
5648
cec5225b 5649 struct elf_aarch64_link_hash_table *htab;
a06ea964 5650
a06ea964
NC		 5651 if (info->relocatable)
5652 return TRUE;
5653
5654 BFD_ASSERT (is_aarch64_elf (abfd));
5655
cec5225b 5656 htab = elf_aarch64_hash_table (info);
a06ea964
NC		 5657 sreloc = NULL;
5658
5659 symtab_hdr = &elf_symtab_hdr (abfd);
5660 sym_hashes = elf_sym_hashes (abfd);
a06ea964
NC		 5661
5662 rel_end = relocs + sec->reloc_count;
5663 for (rel = relocs; rel < rel_end; rel++)
5664 {
5665 struct elf_link_hash_entry *h;
5666 unsigned long r_symndx;
5667 unsigned int r_type;
a6bb11b2 5668 bfd_reloc_code_real_type bfd_r_type;
1419bbe5 5669 Elf_Internal_Sym *isym;
a06ea964 5670
cec5225b
YZ		 5671 r_symndx = ELFNN_R_SYM (rel->r_info);
5672 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC		 5673
5674 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
5675 {
5676 (*_bfd_error_handler) (_("%B: bad symbol index: %d"), abfd,
5677 r_symndx);
5678 return FALSE;
5679 }
5680
ed5acf27 5681 if (r_symndx < symtab_hdr->sh_info)
1419bbe5
WN		 5682 {
5683 /* A local symbol. */
5684 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
5685 abfd, r_symndx);
5686 if (isym == NULL)
5687 return FALSE;
5688
5689 /* Check relocation against local STT_GNU_IFUNC symbol. */
5690 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
5691 {
5692 h = elfNN_aarch64_get_local_sym_hash (htab, abfd, rel,
5693 TRUE);
5694 if (h == NULL)
5695 return FALSE;
5696
5697 /* Fake a STT_GNU_IFUNC symbol. */
5698 h->type = STT_GNU_IFUNC;
5699 h->def_regular = 1;
5700 h->ref_regular = 1;
5701 h->forced_local = 1;
5702 h->root.type = bfd_link_hash_defined;
5703 }
5704 else
5705 h = NULL;
5706 }
a06ea964
NC		 5707 else
5708 {
5709 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
5710 while (h->root.type == bfd_link_hash_indirect
5711 || h->root.type == bfd_link_hash_warning)
5712 h = (struct elf_link_hash_entry *) h->root.u.i.link;
81fbe831
AM		 5713
5714 /* PR15323, ref flags aren't set for references in the same
5715 object. */
5716 h->root.non_ir_ref = 1;
a06ea964
NC		 5717 }
5718
5719 /* Could be done earlier, if h were already available. */
a6bb11b2 5720 bfd_r_type = aarch64_tls_transition (abfd, info, r_type, h, r_symndx);
a06ea964 5721
1419bbe5
WN		 5722 if (h != NULL)
5723 {
5724 /* Create the ifunc sections for static executables. If we
5725 never see an indirect function symbol nor we are building
5726 a static executable, those sections will be empty and
5727 won't appear in output. */
5728 switch (bfd_r_type)
5729 {
5730 default:
5731 break;
5732
5733 case BFD_RELOC_AARCH64_NN:
5734 case BFD_RELOC_AARCH64_CALL26:
5735 case BFD_RELOC_AARCH64_JUMP26:
5736 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
5737 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
5738 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
5739 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
5740 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
5741 case BFD_RELOC_AARCH64_ADD_LO12:
5742 if (htab->root.dynobj == NULL)
5743 htab->root.dynobj = abfd;
5744 if (!_bfd_elf_create_ifunc_sections (htab->root.dynobj, info))
5745 return FALSE;
5746 break;
5747 }
5748
5749 /* It is referenced by a non-shared object. */
5750 h->ref_regular = 1;
5751 h->root.non_ir_ref = 1;
5752 }
5753
a6bb11b2 5754 switch (bfd_r_type)
a06ea964 5755 {
a6bb11b2 5756 case BFD_RELOC_AARCH64_NN:
a06ea964
NC		 5757
5758 /* We don't need to handle relocs into sections not going into
5759 the "real" output. */
5760 if ((sec->flags & SEC_ALLOC) == 0)
5761 break;
5762
5763 if (h != NULL)
5764 {
5765 if (!info->shared)
5766 h->non_got_ref = 1;
5767
5768 h->plt.refcount += 1;
5769 h->pointer_equality_needed = 1;
5770 }
5771
5772 /* No need to do anything if we're not creating a shared
5773 object. */
5774 if (! info->shared)
5775 break;
5776
5777 {
5778 struct elf_dyn_relocs *p;
5779 struct elf_dyn_relocs **head;
5780
5781 /* We must copy these reloc types into the output file.
5782 Create a reloc section in dynobj and make room for
5783 this reloc. */
5784 if (sreloc == NULL)
5785 {
5786 if (htab->root.dynobj == NULL)
5787 htab->root.dynobj = abfd;
5788
5789 sreloc = _bfd_elf_make_dynamic_reloc_section
0608afa7 5790 (sec, htab->root.dynobj, LOG_FILE_ALIGN, abfd, /*rela? */ TRUE);
a06ea964
NC		 5791
5792 if (sreloc == NULL)
5793 return FALSE;
5794 }
5795
5796 /* If this is a global symbol, we count the number of
5797 relocations we need for this symbol. */
5798 if (h != NULL)
5799 {
cec5225b
YZ		 5800 struct elf_aarch64_link_hash_entry *eh;
5801 eh = (struct elf_aarch64_link_hash_entry *) h;
a06ea964
NC		 5802 head = &eh->dyn_relocs;
5803 }
5804 else
5805 {
5806 /* Track dynamic relocs needed for local syms too.
5807 We really need local syms available to do this
5808 easily. Oh well. */
5809
5810 asection *s;
5811 void **vpp;
a06ea964
NC		 5812
5813 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
5814 abfd, r_symndx);
5815 if (isym == NULL)
5816 return FALSE;
5817
5818 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
5819 if (s == NULL)
5820 s = sec;
5821
5822 /* Beware of type punned pointers vs strict aliasing
5823 rules. */
5824 vpp = &(elf_section_data (s)->local_dynrel);
5825 head = (struct elf_dyn_relocs **) vpp;
5826 }
5827
5828 p = *head;
5829 if (p == NULL || p->sec != sec)
5830 {
5831 bfd_size_type amt = sizeof *p;
5832 p = ((struct elf_dyn_relocs *)
5833 bfd_zalloc (htab->root.dynobj, amt));
5834 if (p == NULL)
5835 return FALSE;
5836 p->next = *head;
5837 *head = p;
5838 p->sec = sec;
5839 }
5840
5841 p->count += 1;
5842
5843 }
5844 break;
5845
5846 /* RR: We probably want to keep a consistency check that
5847 there are no dangling GOT_PAGE relocs. */
a6bb11b2 5848 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
7bcccb57
MS		 5849 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
5850 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
5851 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
5852 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12_NC:
5853 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
5854 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
5855 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12_NC:
a6bb11b2 5856 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
7bcccb57 5857 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
a6bb11b2 5858 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a6bb11b2 5859 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
7bcccb57 5860 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
a6bb11b2 5861 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
7bcccb57 5862 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
a6bb11b2 5863 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
a6bb11b2
YZ		 5864 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
5865 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
7bcccb57
MS		 5866 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
5867 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
5868 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
a06ea964
NC		 5869 {
5870 unsigned got_type;
5871 unsigned old_got_type;
5872
a6bb11b2 5873 got_type = aarch64_reloc_got_type (bfd_r_type);
a06ea964
NC		 5874
5875 if (h)
5876 {
5877 h->got.refcount += 1;
cec5225b 5878 old_got_type = elf_aarch64_hash_entry (h)->got_type;
a06ea964
NC		 5879 }
5880 else
5881 {
5882 struct elf_aarch64_local_symbol *locals;
5883
cec5225b 5884 if (!elfNN_aarch64_allocate_local_symbols
a06ea964
NC		 5885 (abfd, symtab_hdr->sh_info))
5886 return FALSE;
5887
cec5225b 5888 locals = elf_aarch64_locals (abfd);
a06ea964
NC		 5889 BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
5890 locals[r_symndx].got_refcount += 1;
5891 old_got_type = locals[r_symndx].got_type;
5892 }
5893
5894 /* If a variable is accessed with both general dynamic TLS
5895 methods, two slots may be created. */
5896 if (GOT_TLS_GD_ANY_P (old_got_type) && GOT_TLS_GD_ANY_P (got_type))
5897 got_type |= old_got_type;
5898
5899 /* We will already have issued an error message if there
5900 is a TLS/non-TLS mismatch, based on the symbol type.
5901 So just combine any TLS types needed. */
5902 if (old_got_type != GOT_UNKNOWN && old_got_type != GOT_NORMAL
5903 && got_type != GOT_NORMAL)
5904 got_type |= old_got_type;
5905
5906 /* If the symbol is accessed by both IE and GD methods, we
5907 are able to relax. Turn off the GD flag, without
5908 messing up with any other kind of TLS types that may be
5909 involved. */
5910 if ((got_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (got_type))
5911 got_type &= ~ (GOT_TLSDESC_GD | GOT_TLS_GD);
5912
5913 if (old_got_type != got_type)
5914 {
5915 if (h != NULL)
cec5225b 5916 elf_aarch64_hash_entry (h)->got_type = got_type;
a06ea964
NC		 5917 else
5918 {
5919 struct elf_aarch64_local_symbol *locals;
cec5225b 5920 locals = elf_aarch64_locals (abfd);
a06ea964
NC		 5921 BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
5922 locals[r_symndx].got_type = got_type;
5923 }
5924 }
5925
cc0efaa8
MS		 5926 if (htab->root.dynobj == NULL)
5927 htab->root.dynobj = abfd;
5928 if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
5929 return FALSE;
a06ea964
NC		 5930 break;
5931 }
5932
614b09ce
JW		 5933 case BFD_RELOC_AARCH64_MOVW_G0_NC:
5934 case BFD_RELOC_AARCH64_MOVW_G1_NC:
5935 case BFD_RELOC_AARCH64_MOVW_G2_NC:
5936 case BFD_RELOC_AARCH64_MOVW_G3:
5937 if (info->shared)
5938 {
5939 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
5940 (*_bfd_error_handler)
5941 (_("%B: relocation %s against `%s' can not be used when making "
5942 "a shared object; recompile with -fPIC"),
5943 abfd, elfNN_aarch64_howto_table[howto_index].name,
5944 (h) ? h->root.root.string : "a local symbol");
5945 bfd_set_error (bfd_error_bad_value);
5946 return FALSE;
5947 }
5948
a6bb11b2
YZ		 5949 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
5950 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
5951 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
a06ea964
NC		 5952 if (h != NULL && info->executable)
5953 {
5954 /* If this reloc is in a read-only section, we might
5955 need a copy reloc. We can't check reliably at this
5956 stage whether the section is read-only, as input
5957 sections have not yet been mapped to output sections.
5958 Tentatively set the flag for now, and correct in
5959 adjust_dynamic_symbol. */
5960 h->non_got_ref = 1;
5961 h->plt.refcount += 1;
5962 h->pointer_equality_needed = 1;
5963 }
5964 /* FIXME:: RR need to handle these in shared libraries
5965 and essentially bomb out as these being non-PIC
5966 relocations in shared libraries. */
5967 break;
5968
a6bb11b2
YZ		 5969 case BFD_RELOC_AARCH64_CALL26:
5970 case BFD_RELOC_AARCH64_JUMP26:
a06ea964
NC		 5971 /* If this is a local symbol then we resolve it
5972 directly without creating a PLT entry. */
5973 if (h == NULL)
5974 continue;
5975
5976 h->needs_plt = 1;
1419bbe5
WN		 5977 if (h->plt.refcount <= 0)
5978 h->plt.refcount = 1;
5979 else
5980 h->plt.refcount += 1;
a06ea964 5981 break;
a6bb11b2
YZ		 5982
5983 default:
5984 break;
a06ea964
NC		 5985 }
5986 }
a6bb11b2 5987
a06ea964
NC		 5988 return TRUE;
5989}
5990
5991/* Treat mapping symbols as special target symbols. */
5992
5993static bfd_boolean
cec5225b 5994elfNN_aarch64_is_target_special_symbol (bfd *abfd ATTRIBUTE_UNUSED,
a06ea964
NC		 5995 asymbol *sym)
5996{
5997 return bfd_is_aarch64_special_symbol_name (sym->name,
5998 BFD_AARCH64_SPECIAL_SYM_TYPE_ANY);
5999}
6000
6001/* This is a copy of elf_find_function () from elf.c except that
6002 AArch64 mapping symbols are ignored when looking for function names. */
6003
6004static bfd_boolean
6005aarch64_elf_find_function (bfd *abfd ATTRIBUTE_UNUSED,
a06ea964 6006 asymbol **symbols,
fb167eb2 6007 asection *section,
a06ea964
NC		 6008 bfd_vma offset,
6009 const char **filename_ptr,
6010 const char **functionname_ptr)
6011{
6012 const char *filename = NULL;
6013 asymbol *func = NULL;
6014 bfd_vma low_func = 0;
6015 asymbol **p;
6016
6017 for (p = symbols; *p != NULL; p++)
6018 {
6019 elf_symbol_type *q;
6020
6021 q = (elf_symbol_type *) * p;
6022
6023 switch (ELF_ST_TYPE (q->internal_elf_sym.st_info))
6024 {
6025 default:
6026 break;
6027 case STT_FILE:
6028 filename = bfd_asymbol_name (&q->symbol);
6029 break;
6030 case STT_FUNC:
6031 case STT_NOTYPE:
6032 /* Skip mapping symbols. */
6033 if ((q->symbol.flags & BSF_LOCAL)
6034 && (bfd_is_aarch64_special_symbol_name
6035 (q->symbol.name, BFD_AARCH64_SPECIAL_SYM_TYPE_ANY)))
6036 continue;
6037 /* Fall through. */
6038 if (bfd_get_section (&q->symbol) == section
6039 && q->symbol.value >= low_func && q->symbol.value <= offset)
6040 {
6041 func = (asymbol *) q;
6042 low_func = q->symbol.value;
6043 }
6044 break;
6045 }
6046 }
6047
6048 if (func == NULL)
6049 return FALSE;
6050
6051 if (filename_ptr)
6052 *filename_ptr = filename;
6053 if (functionname_ptr)
6054 *functionname_ptr = bfd_asymbol_name (func);
6055
6056 return TRUE;
6057}
6058
6059
6060/* Find the nearest line to a particular section and offset, for error
6061 reporting. This code is a duplicate of the code in elf.c, except
6062 that it uses aarch64_elf_find_function. */
6063
6064static bfd_boolean
cec5225b 6065elfNN_aarch64_find_nearest_line (bfd *abfd,
a06ea964 6066 asymbol **symbols,
fb167eb2 6067 asection *section,
a06ea964
NC		 6068 bfd_vma offset,
6069 const char **filename_ptr,
6070 const char **functionname_ptr,
fb167eb2
AM		 6071 unsigned int *line_ptr,
6072 unsigned int *discriminator_ptr)
a06ea964
NC		 6073{
6074 bfd_boolean found = FALSE;
6075
fb167eb2 6076 if (_bfd_dwarf2_find_nearest_line (abfd, symbols, NULL, section, offset,
a06ea964 6077 filename_ptr, functionname_ptr,
fb167eb2
AM		 6078 line_ptr, discriminator_ptr,
6079 dwarf_debug_sections, 0,
a06ea964
NC		 6080 &elf_tdata (abfd)->dwarf2_find_line_info))
6081 {
6082 if (!*functionname_ptr)
fb167eb2 6083 aarch64_elf_find_function (abfd, symbols, section, offset,
a06ea964
NC		 6084 *filename_ptr ? NULL : filename_ptr,
6085 functionname_ptr);
6086
6087 return TRUE;
6088 }
6089
fb167eb2
AM		 6090 /* Skip _bfd_dwarf1_find_nearest_line since no known AArch64
6091 toolchain uses DWARF1. */
6092
a06ea964
NC		 6093 if (!_bfd_stab_section_find_nearest_line (abfd, symbols, section, offset,
6094 &found, filename_ptr,
6095 functionname_ptr, line_ptr,
6096 &elf_tdata (abfd)->line_info))
6097 return FALSE;
6098
6099 if (found && (*functionname_ptr || *line_ptr))
6100 return TRUE;
6101
6102 if (symbols == NULL)
6103 return FALSE;
6104
fb167eb2 6105 if (!aarch64_elf_find_function (abfd, symbols, section, offset,
a06ea964
NC		 6106 filename_ptr, functionname_ptr))
6107 return FALSE;
6108
6109 *line_ptr = 0;
6110 return TRUE;
6111}
6112
6113static bfd_boolean
cec5225b 6114elfNN_aarch64_find_inliner_info (bfd *abfd,
a06ea964
NC		 6115 const char **filename_ptr,
6116 const char **functionname_ptr,
6117 unsigned int *line_ptr)
6118{
6119 bfd_boolean found;
6120 found = _bfd_dwarf2_find_inliner_info
6121 (abfd, filename_ptr,
6122 functionname_ptr, line_ptr, &elf_tdata (abfd)->dwarf2_find_line_info);
6123 return found;
6124}
6125
6126
6127static void
cec5225b 6128elfNN_aarch64_post_process_headers (bfd *abfd,
1419bbe5 6129 struct bfd_link_info *link_info)
a06ea964
NC		 6130{
6131 Elf_Internal_Ehdr *i_ehdrp; /* ELF file header, internal form. */
6132
6133 i_ehdrp = elf_elfheader (abfd);
a06ea964 6134 i_ehdrp->e_ident[EI_ABIVERSION] = AARCH64_ELF_ABI_VERSION;
1419bbe5 6135
78245035 6136 _bfd_elf_post_process_headers (abfd, link_info);
a06ea964
NC		 6137}
6138
6139static enum elf_reloc_type_class
cec5225b 6140elfNN_aarch64_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
7e612e98
AM		 6141 const asection *rel_sec ATTRIBUTE_UNUSED,
6142 const Elf_Internal_Rela *rela)
a06ea964 6143{
cec5225b 6144 switch ((int) ELFNN_R_TYPE (rela->r_info))
a06ea964 6145 {
a6bb11b2 6146 case AARCH64_R (RELATIVE):
a06ea964 6147 return reloc_class_relative;
a6bb11b2 6148 case AARCH64_R (JUMP_SLOT):
a06ea964 6149 return reloc_class_plt;
a6bb11b2 6150 case AARCH64_R (COPY):
a06ea964
NC		 6151 return reloc_class_copy;
6152 default:
6153 return reloc_class_normal;
6154 }
6155}
6156
a06ea964
NC		 6157/* Handle an AArch64 specific section when reading an object file. This is
6158 called when bfd_section_from_shdr finds a section with an unknown
6159 type. */
6160
6161static bfd_boolean
cec5225b 6162elfNN_aarch64_section_from_shdr (bfd *abfd,
a06ea964
NC		 6163 Elf_Internal_Shdr *hdr,
6164 const char *name, int shindex)
6165{
6166 /* There ought to be a place to keep ELF backend specific flags, but
6167 at the moment there isn't one. We just keep track of the
6168 sections by their name, instead. Fortunately, the ABI gives
6169 names for all the AArch64 specific sections, so we will probably get
6170 away with this. */
6171 switch (hdr->sh_type)
6172 {
6173 case SHT_AARCH64_ATTRIBUTES:
6174 break;
6175
6176 default:
6177 return FALSE;
6178 }
6179
6180 if (!_bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
6181 return FALSE;
6182
6183 return TRUE;
6184}
6185
6186/* A structure used to record a list of sections, independently
6187 of the next and prev fields in the asection structure. */
6188typedef struct section_list
6189{
6190 asection *sec;
6191 struct section_list *next;
6192 struct section_list *prev;
6193}
6194section_list;
6195
6196/* Unfortunately we need to keep a list of sections for which
6197 an _aarch64_elf_section_data structure has been allocated. This
cec5225b 6198 is because it is possible for functions like elfNN_aarch64_write_section
a06ea964
NC		 6199 to be called on a section which has had an elf_data_structure
6200 allocated for it (and so the used_by_bfd field is valid) but
6201 for which the AArch64 extended version of this structure - the
6202 _aarch64_elf_section_data structure - has not been allocated. */
6203static section_list *sections_with_aarch64_elf_section_data = NULL;
6204
6205static void
6206record_section_with_aarch64_elf_section_data (asection *sec)
6207{
6208 struct section_list *entry;
6209
6210 entry = bfd_malloc (sizeof (*entry));
6211 if (entry == NULL)
6212 return;
6213 entry->sec = sec;
6214 entry->next = sections_with_aarch64_elf_section_data;
6215 entry->prev = NULL;
6216 if (entry->next != NULL)
6217 entry->next->prev = entry;
6218 sections_with_aarch64_elf_section_data = entry;
6219}
6220
6221static struct section_list *
6222find_aarch64_elf_section_entry (asection *sec)
6223{
6224 struct section_list *entry;
6225 static struct section_list *last_entry = NULL;
6226
6227 /* This is a short cut for the typical case where the sections are added
6228 to the sections_with_aarch64_elf_section_data list in forward order and
6229 then looked up here in backwards order. This makes a real difference
6230 to the ld-srec/sec64k.exp linker test. */
6231 entry = sections_with_aarch64_elf_section_data;
6232 if (last_entry != NULL)
6233 {
6234 if (last_entry->sec == sec)
6235 entry = last_entry;
6236 else if (last_entry->next != NULL && last_entry->next->sec == sec)
6237 entry = last_entry->next;
6238 }
6239
6240 for (; entry; entry = entry->next)
6241 if (entry->sec == sec)
6242 break;
6243
6244 if (entry)
6245 /* Record the entry prior to this one - it is the entry we are
6246 most likely to want to locate next time. Also this way if we
6247 have been called from
6248 unrecord_section_with_aarch64_elf_section_data () we will not
6249 be caching a pointer that is about to be freed. */
6250 last_entry = entry->prev;
6251
6252 return entry;
6253}
6254
6255static void
6256unrecord_section_with_aarch64_elf_section_data (asection *sec)
6257{
6258 struct section_list *entry;
6259
6260 entry = find_aarch64_elf_section_entry (sec);
6261
6262 if (entry)
6263 {
6264 if (entry->prev != NULL)
6265 entry->prev->next = entry->next;
6266 if (entry->next != NULL)
6267 entry->next->prev = entry->prev;
6268 if (entry == sections_with_aarch64_elf_section_data)
6269 sections_with_aarch64_elf_section_data = entry->next;
6270 free (entry);
6271 }
6272}
6273
6274
6275typedef struct
6276{
6277 void *finfo;
6278 struct bfd_link_info *info;
6279 asection *sec;
6280 int sec_shndx;
6281 int (*func) (void *, const char *, Elf_Internal_Sym *,
6282 asection *, struct elf_link_hash_entry *);
6283} output_arch_syminfo;
6284
6285enum map_symbol_type
6286{
6287 AARCH64_MAP_INSN,
6288 AARCH64_MAP_DATA
6289};
6290
6291
6292/* Output a single mapping symbol. */
6293
6294static bfd_boolean
cec5225b 6295elfNN_aarch64_output_map_sym (output_arch_syminfo *osi,
a06ea964
NC		 6296 enum map_symbol_type type, bfd_vma offset)
6297{
6298 static const char *names[2] = { "$x", "$d" };
6299 Elf_Internal_Sym sym;
6300
6301 sym.st_value = (osi->sec->output_section->vma
6302 + osi->sec->output_offset + offset);
6303 sym.st_size = 0;
6304 sym.st_other = 0;
6305 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_NOTYPE);
6306 sym.st_shndx = osi->sec_shndx;
6307 return osi->func (osi->finfo, names[type], &sym, osi->sec, NULL) == 1;
6308}
6309
6310
6311
6312/* Output mapping symbols for PLT entries associated with H. */
6313
6314static bfd_boolean
cec5225b 6315elfNN_aarch64_output_plt_map (struct elf_link_hash_entry *h, void *inf)
a06ea964
NC		 6316{
6317 output_arch_syminfo *osi = (output_arch_syminfo *) inf;
6318 bfd_vma addr;
6319
6320 if (h->root.type == bfd_link_hash_indirect)
6321 return TRUE;
6322
6323 if (h->root.type == bfd_link_hash_warning)
6324 /* When warning symbols are created, they **replace** the "real"
6325 entry in the hash table, thus we never get to see the real
6326 symbol in a hash traversal. So look at it now. */
6327 h = (struct elf_link_hash_entry *) h->root.u.i.link;
6328
6329 if (h->plt.offset == (bfd_vma) - 1)
6330 return TRUE;
6331
6332 addr = h->plt.offset;
6333 if (addr == 32)
6334 {
cec5225b 6335 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
a06ea964
NC		 6336 return FALSE;
6337 }
6338 return TRUE;
6339}
6340
6341
6342/* Output a single local symbol for a generated stub. */
6343
6344static bfd_boolean
cec5225b 6345elfNN_aarch64_output_stub_sym (output_arch_syminfo *osi, const char *name,
a06ea964
NC		 6346 bfd_vma offset, bfd_vma size)
6347{
6348 Elf_Internal_Sym sym;
6349
6350 sym.st_value = (osi->sec->output_section->vma
6351 + osi->sec->output_offset + offset);
6352 sym.st_size = size;
6353 sym.st_other = 0;
6354 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
6355 sym.st_shndx = osi->sec_shndx;
6356 return osi->func (osi->finfo, name, &sym, osi->sec, NULL) == 1;
6357}
6358
6359static bfd_boolean
6360aarch64_map_one_stub (struct bfd_hash_entry *gen_entry, void *in_arg)
6361{
cec5225b 6362 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC		 6363 asection *stub_sec;
6364 bfd_vma addr;
6365 char *stub_name;
6366 output_arch_syminfo *osi;
6367
6368 /* Massage our args to the form they really have. */
cec5225b 6369 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
a06ea964
NC		 6370 osi = (output_arch_syminfo *) in_arg;
6371
6372 stub_sec = stub_entry->stub_sec;
6373
6374 /* Ensure this stub is attached to the current section being
6375 processed. */
6376 if (stub_sec != osi->sec)
6377 return TRUE;
6378
6379 addr = (bfd_vma) stub_entry->stub_offset;
6380
6381 stub_name = stub_entry->output_name;
6382
6383 switch (stub_entry->stub_type)
6384 {
6385 case aarch64_stub_adrp_branch:
cec5225b 6386 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
a06ea964
NC		 6387 sizeof (aarch64_adrp_branch_stub)))
6388 return FALSE;
cec5225b 6389 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
a06ea964
NC		 6390 return FALSE;
6391 break;
6392 case aarch64_stub_long_branch:
cec5225b 6393 if (!elfNN_aarch64_output_stub_sym
a06ea964
NC		 6394 (osi, stub_name, addr, sizeof (aarch64_long_branch_stub)))
6395 return FALSE;
cec5225b 6396 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
a06ea964 6397 return FALSE;
cec5225b 6398 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_DATA, addr + 16))
a06ea964
NC		 6399 return FALSE;
6400 break;
68fcca92
JW		 6401 case aarch64_stub_erratum_835769_veneer:
6402 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
6403 sizeof (aarch64_erratum_835769_stub)))
6404 return FALSE;
6405 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
6406 return FALSE;
6407 break;
a06ea964
NC		 6408 default:
6409 BFD_FAIL ();
6410 }
6411
6412 return TRUE;
6413}
6414
6415/* Output mapping symbols for linker generated sections. */
6416
6417static bfd_boolean
cec5225b 6418elfNN_aarch64_output_arch_local_syms (bfd *output_bfd,
a06ea964
NC		 6419 struct bfd_link_info *info,
6420 void *finfo,
6421 int (*func) (void *, const char *,
6422 Elf_Internal_Sym *,
6423 asection *,
6424 struct elf_link_hash_entry
6425 *))
6426{
6427 output_arch_syminfo osi;
cec5225b 6428 struct elf_aarch64_link_hash_table *htab;
a06ea964 6429
cec5225b 6430 htab = elf_aarch64_hash_table (info);
a06ea964
NC		 6431
6432 osi.finfo = finfo;
6433 osi.info = info;
6434 osi.func = func;
6435
6436 /* Long calls stubs. */
6437 if (htab->stub_bfd && htab->stub_bfd->sections)
6438 {
6439 asection *stub_sec;
6440
6441 for (stub_sec = htab->stub_bfd->sections;
6442 stub_sec != NULL; stub_sec = stub_sec->next)
6443 {
6444 /* Ignore non-stub sections. */
6445 if (!strstr (stub_sec->name, STUB_SUFFIX))
6446 continue;
6447
6448 osi.sec = stub_sec;
6449
6450 osi.sec_shndx = _bfd_elf_section_from_bfd_section
6451 (output_bfd, osi.sec->output_section);
6452
6453 bfd_hash_traverse (&htab->stub_hash_table, aarch64_map_one_stub,
6454 &osi);
6455 }
6456 }
6457
6458 /* Finally, output mapping symbols for the PLT. */
6459 if (!htab->root.splt || htab->root.splt->size == 0)
6460 return TRUE;
6461
6462 /* For now live without mapping symbols for the plt. */
6463 osi.sec_shndx = _bfd_elf_section_from_bfd_section
6464 (output_bfd, htab->root.splt->output_section);
6465 osi.sec = htab->root.splt;
6466
cec5225b 6467 elf_link_hash_traverse (&htab->root, elfNN_aarch64_output_plt_map,
a06ea964
NC		 6468 (void *) &osi);
6469
6470 return TRUE;
6471
6472}
6473
6474/* Allocate target specific section data. */
6475
6476static bfd_boolean
cec5225b 6477elfNN_aarch64_new_section_hook (bfd *abfd, asection *sec)
a06ea964
NC		 6478{
6479 if (!sec->used_by_bfd)
6480 {
6481 _aarch64_elf_section_data *sdata;
6482 bfd_size_type amt = sizeof (*sdata);
6483
6484 sdata = bfd_zalloc (abfd, amt);
6485 if (sdata == NULL)
6486 return FALSE;
6487 sec->used_by_bfd = sdata;
6488 }
6489
6490 record_section_with_aarch64_elf_section_data (sec);
6491
6492 return _bfd_elf_new_section_hook (abfd, sec);
6493}
6494
6495
6496static void
6497unrecord_section_via_map_over_sections (bfd *abfd ATTRIBUTE_UNUSED,
6498 asection *sec,
6499 void *ignore ATTRIBUTE_UNUSED)
6500{
6501 unrecord_section_with_aarch64_elf_section_data (sec);
6502}
6503
6504static bfd_boolean
cec5225b 6505elfNN_aarch64_close_and_cleanup (bfd *abfd)
a06ea964
NC		 6506{
6507 if (abfd->sections)
6508 bfd_map_over_sections (abfd,
6509 unrecord_section_via_map_over_sections, NULL);
6510
6511 return _bfd_elf_close_and_cleanup (abfd);
6512}
6513
6514static bfd_boolean
cec5225b 6515elfNN_aarch64_bfd_free_cached_info (bfd *abfd)
a06ea964
NC		 6516{
6517 if (abfd->sections)
6518 bfd_map_over_sections (abfd,
6519 unrecord_section_via_map_over_sections, NULL);
6520
6521 return _bfd_free_cached_info (abfd);
6522}
6523
a06ea964
NC		 6524/* Create dynamic sections. This is different from the ARM backend in that
6525 the got, plt, gotplt and their relocation sections are all created in the
6526 standard part of the bfd elf backend. */
6527
6528static bfd_boolean
cec5225b 6529elfNN_aarch64_create_dynamic_sections (bfd *dynobj,
a06ea964
NC		 6530 struct bfd_link_info *info)
6531{
cec5225b 6532 struct elf_aarch64_link_hash_table *htab;
cc0efaa8
MS		 6533
6534 /* We need to create .got section. */
6535 if (!aarch64_elf_create_got_section (dynobj, info))
6536 return FALSE;
a06ea964
NC		 6537
6538 if (!_bfd_elf_create_dynamic_sections (dynobj, info))
6539 return FALSE;
6540
cec5225b 6541 htab = elf_aarch64_hash_table (info);
a06ea964
NC		 6542 htab->sdynbss = bfd_get_linker_section (dynobj, ".dynbss");
6543 if (!info->shared)
6544 htab->srelbss = bfd_get_linker_section (dynobj, ".rela.bss");
6545
6546 if (!htab->sdynbss || (!info->shared && !htab->srelbss))
6547 abort ();
6548
a06ea964
NC		 6549 return TRUE;
6550}
6551
6552
6553/* Allocate space in .plt, .got and associated reloc sections for
6554 dynamic relocs. */
6555
6556static bfd_boolean
cec5225b 6557elfNN_aarch64_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
a06ea964
NC		 6558{
6559 struct bfd_link_info *info;
cec5225b
YZ		 6560 struct elf_aarch64_link_hash_table *htab;
6561 struct elf_aarch64_link_hash_entry *eh;
a06ea964
NC		 6562 struct elf_dyn_relocs *p;
6563
6564 /* An example of a bfd_link_hash_indirect symbol is versioned
6565 symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
6566 -> __gxx_personality_v0(bfd_link_hash_defined)
6567
6568 There is no need to process bfd_link_hash_indirect symbols here
6569 because we will also be presented with the concrete instance of
cec5225b 6570 the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
a06ea964
NC		 6571 called to copy all relevant data from the generic to the concrete
6572 symbol instance.
6573 */
6574 if (h->root.type == bfd_link_hash_indirect)
6575 return TRUE;
6576
6577 if (h->root.type == bfd_link_hash_warning)
6578 h = (struct elf_link_hash_entry *) h->root.u.i.link;
6579
6580 info = (struct bfd_link_info *) inf;
cec5225b 6581 htab = elf_aarch64_hash_table (info);
a06ea964 6582
1419bbe5
WN		 6583 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
6584 here if it is defined and referenced in a non-shared object. */
6585 if (h->type == STT_GNU_IFUNC
6586 && h->def_regular)
6587 return TRUE;
6588 else if (htab->root.dynamic_sections_created && h->plt.refcount > 0)
a06ea964
NC		 6589 {
6590 /* Make sure this symbol is output as a dynamic symbol.
6591 Undefined weak syms won't yet be marked as dynamic. */
6592 if (h->dynindx == -1 && !h->forced_local)
6593 {
6594 if (!bfd_elf_link_record_dynamic_symbol (info, h))
6595 return FALSE;
6596 }
6597
6598 if (info->shared || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
6599 {
6600 asection *s = htab->root.splt;
6601
6602 /* If this is the first .plt entry, make room for the special
6603 first entry. */
6604 if (s->size == 0)
6605 s->size += htab->plt_header_size;
6606
6607 h->plt.offset = s->size;
6608
6609 /* If this symbol is not defined in a regular file, and we are
6610 not generating a shared library, then set the symbol to this
6611 location in the .plt. This is required to make function
6612 pointers compare as equal between the normal executable and
6613 the shared library. */
6614 if (!info->shared && !h->def_regular)
6615 {
6616 h->root.u.def.section = s;
6617 h->root.u.def.value = h->plt.offset;
6618 }
6619
6620 /* Make room for this entry. For now we only create the
6621 small model PLT entries. We later need to find a way
6622 of relaxing into these from the large model PLT entries. */
6623 s->size += PLT_SMALL_ENTRY_SIZE;
6624
6625 /* We also need to make an entry in the .got.plt section, which
6626 will be placed in the .got section by the linker script. */
6627 htab->root.sgotplt->size += GOT_ENTRY_SIZE;
6628
6629 /* We also need to make an entry in the .rela.plt section. */
6630 htab->root.srelplt->size += RELOC_SIZE (htab);
6631
6632 /* We need to ensure that all GOT entries that serve the PLT
6633 are consecutive with the special GOT slots [0] [1] and
6634 [2]. Any addtional relocations, such as
6635 R_AARCH64_TLSDESC, must be placed after the PLT related
6636 entries. We abuse the reloc_count such that during
6637 sizing we adjust reloc_count to indicate the number of
6638 PLT related reserved entries. In subsequent phases when
6639 filling in the contents of the reloc entries, PLT related
6640 entries are placed by computing their PLT index (0
6641 .. reloc_count). While other none PLT relocs are placed
6642 at the slot indicated by reloc_count and reloc_count is
6643 updated. */
6644
6645 htab->root.srelplt->reloc_count++;
6646 }
6647 else
6648 {
6649 h->plt.offset = (bfd_vma) - 1;
6650 h->needs_plt = 0;
6651 }
6652 }
6653 else
6654 {
6655 h->plt.offset = (bfd_vma) - 1;
6656 h->needs_plt = 0;
6657 }
6658
cec5225b 6659 eh = (struct elf_aarch64_link_hash_entry *) h;
a06ea964
NC		 6660 eh->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
6661
6662 if (h->got.refcount > 0)
6663 {
6664 bfd_boolean dyn;
cec5225b 6665 unsigned got_type = elf_aarch64_hash_entry (h)->got_type;
a06ea964
NC		 6666
6667 h->got.offset = (bfd_vma) - 1;
6668
6669 dyn = htab->root.dynamic_sections_created;
6670
6671 /* Make sure this symbol is output as a dynamic symbol.
6672 Undefined weak syms won't yet be marked as dynamic. */
6673 if (dyn && h->dynindx == -1 && !h->forced_local)
6674 {
6675 if (!bfd_elf_link_record_dynamic_symbol (info, h))
6676 return FALSE;
6677 }
6678
6679 if (got_type == GOT_UNKNOWN)
6680 {
6681 }
6682 else if (got_type == GOT_NORMAL)
6683 {
6684 h->got.offset = htab->root.sgot->size;
6685 htab->root.sgot->size += GOT_ENTRY_SIZE;
6686 if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6687 || h->root.type != bfd_link_hash_undefweak)
6688 && (info->shared
6689 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
6690 {
6691 htab->root.srelgot->size += RELOC_SIZE (htab);
6692 }
6693 }
6694 else
6695 {
6696 int indx;
6697 if (got_type & GOT_TLSDESC_GD)
6698 {
6699 eh->tlsdesc_got_jump_table_offset =
6700 (htab->root.sgotplt->size
6701 - aarch64_compute_jump_table_size (htab));
6702 htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
6703 h->got.offset = (bfd_vma) - 2;
6704 }
6705
6706 if (got_type & GOT_TLS_GD)
6707 {
6708 h->got.offset = htab->root.sgot->size;
6709 htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
6710 }
6711
6712 if (got_type & GOT_TLS_IE)
6713 {
6714 h->got.offset = htab->root.sgot->size;
6715 htab->root.sgot->size += GOT_ENTRY_SIZE;
6716 }
6717
6718 indx = h && h->dynindx != -1 ? h->dynindx : 0;
6719 if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6720 || h->root.type != bfd_link_hash_undefweak)
6721 && (info->shared
6722 || indx != 0
6723 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
6724 {
6725 if (got_type & GOT_TLSDESC_GD)
6726 {
6727 htab->root.srelplt->size += RELOC_SIZE (htab);
6728 /* Note reloc_count not incremented here! We have
6729 already adjusted reloc_count for this relocation
6730 type. */
6731
6732 /* TLSDESC PLT is now needed, but not yet determined. */
6733 htab->tlsdesc_plt = (bfd_vma) - 1;
6734 }
6735
6736 if (got_type & GOT_TLS_GD)
6737 htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
6738
6739 if (got_type & GOT_TLS_IE)
6740 htab->root.srelgot->size += RELOC_SIZE (htab);
6741 }
6742 }
6743 }
6744 else
6745 {
6746 h->got.offset = (bfd_vma) - 1;
6747 }
6748
6749 if (eh->dyn_relocs == NULL)
6750 return TRUE;
6751
6752 /* In the shared -Bsymbolic case, discard space allocated for
6753 dynamic pc-relative relocs against symbols which turn out to be
6754 defined in regular objects. For the normal shared case, discard
6755 space for pc-relative relocs that have become local due to symbol
6756 visibility changes. */
6757
6758 if (info->shared)
6759 {
6760 /* Relocs that use pc_count are those that appear on a call
6761 insn, or certain REL relocs that can generated via assembly.
6762 We want calls to protected symbols to resolve directly to the
6763 function rather than going via the plt. If people want
6764 function pointer comparisons to work as expected then they
6765 should avoid writing weird assembly. */
6766 if (SYMBOL_CALLS_LOCAL (info, h))
6767 {
6768 struct elf_dyn_relocs **pp;
6769
6770 for (pp = &eh->dyn_relocs; (p = *pp) != NULL;)
6771 {
6772 p->count -= p->pc_count;
6773 p->pc_count = 0;
6774 if (p->count == 0)
6775 *pp = p->next;
6776 else
6777 pp = &p->next;
6778 }
6779 }
6780
6781 /* Also discard relocs on undefined weak syms with non-default
6782 visibility. */
6783 if (eh->dyn_relocs != NULL && h->root.type == bfd_link_hash_undefweak)
6784 {
6785 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
6786 eh->dyn_relocs = NULL;
6787
6788 /* Make sure undefined weak symbols are output as a dynamic
6789 symbol in PIEs. */
6790 else if (h->dynindx == -1
6791 && !h->forced_local
6792 && !bfd_elf_link_record_dynamic_symbol (info, h))
6793 return FALSE;
6794 }
6795
6796 }
6797 else if (ELIMINATE_COPY_RELOCS)
6798 {
6799 /* For the non-shared case, discard space for relocs against
6800 symbols which turn out to need copy relocs or are not
6801 dynamic. */
6802
6803 if (!h->non_got_ref
6804 && ((h->def_dynamic
6805 && !h->def_regular)
6806 || (htab->root.dynamic_sections_created
6807 && (h->root.type == bfd_link_hash_undefweak
6808 || h->root.type == bfd_link_hash_undefined))))
6809 {
6810 /* Make sure this symbol is output as a dynamic symbol.
6811 Undefined weak syms won't yet be marked as dynamic. */
6812 if (h->dynindx == -1
6813 && !h->forced_local
6814 && !bfd_elf_link_record_dynamic_symbol (info, h))
6815 return FALSE;
6816
6817 /* If that succeeded, we know we'll be keeping all the
6818 relocs. */
6819 if (h->dynindx != -1)
6820 goto keep;
6821 }
6822
6823 eh->dyn_relocs = NULL;
6824
6825 keep:;
6826 }
6827
6828 /* Finally, allocate space. */
6829 for (p = eh->dyn_relocs; p != NULL; p = p->next)
6830 {
6831 asection *sreloc;
6832
6833 sreloc = elf_section_data (p->sec)->sreloc;
6834
6835 BFD_ASSERT (sreloc != NULL);
6836
6837 sreloc->size += p->count * RELOC_SIZE (htab);
6838 }
6839
6840 return TRUE;
6841}
6842
1419bbe5
WN		 6843/* Allocate space in .plt, .got and associated reloc sections for
6844 ifunc dynamic relocs. */
6845
6846static bfd_boolean
6847elfNN_aarch64_allocate_ifunc_dynrelocs (struct elf_link_hash_entry *h,
6848 void *inf)
6849{
6850 struct bfd_link_info *info;
6851 struct elf_aarch64_link_hash_table *htab;
6852 struct elf_aarch64_link_hash_entry *eh;
6853
6854 /* An example of a bfd_link_hash_indirect symbol is versioned
6855 symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
6856 -> __gxx_personality_v0(bfd_link_hash_defined)
6857
6858 There is no need to process bfd_link_hash_indirect symbols here
6859 because we will also be presented with the concrete instance of
6860 the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
6861 called to copy all relevant data from the generic to the concrete
6862 symbol instance.
6863 */
6864 if (h->root.type == bfd_link_hash_indirect)
6865 return TRUE;
6866
6867 if (h->root.type == bfd_link_hash_warning)
6868 h = (struct elf_link_hash_entry *) h->root.u.i.link;
6869
6870 info = (struct bfd_link_info *) inf;
6871 htab = elf_aarch64_hash_table (info);
6872
6873 eh = (struct elf_aarch64_link_hash_entry *) h;
6874
6875 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
6876 here if it is defined and referenced in a non-shared object. */
6877 if (h->type == STT_GNU_IFUNC
6878 && h->def_regular)
6879 return _bfd_elf_allocate_ifunc_dyn_relocs (info, h,
6880 &eh->dyn_relocs,
6881 htab->plt_entry_size,
6882 htab->plt_header_size,
6883 GOT_ENTRY_SIZE);
6884 return TRUE;
6885}
6886
6887/* Allocate space in .plt, .got and associated reloc sections for
6888 local dynamic relocs. */
6889
6890static bfd_boolean
6891elfNN_aarch64_allocate_local_dynrelocs (void **slot, void *inf)
6892{
6893 struct elf_link_hash_entry *h
6894 = (struct elf_link_hash_entry *) *slot;
6895
6896 if (h->type != STT_GNU_IFUNC
6897 || !h->def_regular
6898 || !h->ref_regular
6899 || !h->forced_local
6900 || h->root.type != bfd_link_hash_defined)
6901 abort ();
6902
6903 return elfNN_aarch64_allocate_dynrelocs (h, inf);
6904}
6905
6906/* Allocate space in .plt, .got and associated reloc sections for
6907 local ifunc dynamic relocs. */
6908
6909static bfd_boolean
6910elfNN_aarch64_allocate_local_ifunc_dynrelocs (void **slot, void *inf)
6911{
6912 struct elf_link_hash_entry *h
6913 = (struct elf_link_hash_entry *) *slot;
6914
6915 if (h->type != STT_GNU_IFUNC
6916 || !h->def_regular
6917 || !h->ref_regular
6918 || !h->forced_local
6919 || h->root.type != bfd_link_hash_defined)
6920 abort ();
6921
6922 return elfNN_aarch64_allocate_ifunc_dynrelocs (h, inf);
6923}
a06ea964 6924
a06ea964
NC		 6925/* This is the most important function of all . Innocuosly named
6926 though ! */
6927static bfd_boolean
cec5225b 6928elfNN_aarch64_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
a06ea964
NC		 6929 struct bfd_link_info *info)
6930{
cec5225b 6931 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC		 6932 bfd *dynobj;
6933 asection *s;
6934 bfd_boolean relocs;
6935 bfd *ibfd;
6936
cec5225b 6937 htab = elf_aarch64_hash_table ((info));
a06ea964
NC		 6938 dynobj = htab->root.dynobj;
6939
6940 BFD_ASSERT (dynobj != NULL);
6941
6942 if (htab->root.dynamic_sections_created)
6943 {
6944 if (info->executable)
6945 {
6946 s = bfd_get_linker_section (dynobj, ".interp");
6947 if (s == NULL)
6948 abort ();
6949 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
6950 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
6951 }
6952 }
6953
6954 /* Set up .got offsets for local syms, and space for local dynamic
6955 relocs. */
c72f2fb2 6956 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
a06ea964
NC		 6957 {
6958 struct elf_aarch64_local_symbol *locals = NULL;
6959 Elf_Internal_Shdr *symtab_hdr;
6960 asection *srel;
6961 unsigned int i;
6962
6963 if (!is_aarch64_elf (ibfd))
6964 continue;
6965
6966 for (s = ibfd->sections; s != NULL; s = s->next)
6967 {
6968 struct elf_dyn_relocs *p;
6969
6970 for (p = (struct elf_dyn_relocs *)
6971 (elf_section_data (s)->local_dynrel); p != NULL; p = p->next)
6972 {
6973 if (!bfd_is_abs_section (p->sec)
6974 && bfd_is_abs_section (p->sec->output_section))
6975 {
6976 /* Input section has been discarded, either because
6977 it is a copy of a linkonce section or due to
6978 linker script /DISCARD/, so we'll be discarding
6979 the relocs too. */
6980 }
6981 else if (p->count != 0)
6982 {
6983 srel = elf_section_data (p->sec)->sreloc;
6984 srel->size += p->count * RELOC_SIZE (htab);
6985 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
6986 info->flags |= DF_TEXTREL;
6987 }
6988 }
6989 }
6990
cec5225b 6991 locals = elf_aarch64_locals (ibfd);
a06ea964
NC		 6992 if (!locals)
6993 continue;
6994
6995 symtab_hdr = &elf_symtab_hdr (ibfd);
6996 srel = htab->root.srelgot;
6997 for (i = 0; i < symtab_hdr->sh_info; i++)
6998 {
6999 locals[i].got_offset = (bfd_vma) - 1;
7000 locals[i].tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
7001 if (locals[i].got_refcount > 0)
7002 {
7003 unsigned got_type = locals[i].got_type;
7004 if (got_type & GOT_TLSDESC_GD)
7005 {
7006 locals[i].tlsdesc_got_jump_table_offset =
7007 (htab->root.sgotplt->size
7008 - aarch64_compute_jump_table_size (htab));
7009 htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
7010 locals[i].got_offset = (bfd_vma) - 2;
7011 }
7012
7013 if (got_type & GOT_TLS_GD)
7014 {
7015 locals[i].got_offset = htab->root.sgot->size;
7016 htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
7017 }
7018
7019 if (got_type & GOT_TLS_IE)
7020 {
7021 locals[i].got_offset = htab->root.sgot->size;
7022 htab->root.sgot->size += GOT_ENTRY_SIZE;
7023 }
7024
7025 if (got_type == GOT_UNKNOWN)
7026 {
7027 }
7028
7029 if (got_type == GOT_NORMAL)
7030 {
7031 }
7032
7033 if (info->shared)
7034 {
7035 if (got_type & GOT_TLSDESC_GD)
7036 {
7037 htab->root.srelplt->size += RELOC_SIZE (htab);
7038 /* Note RELOC_COUNT not incremented here! */
7039 htab->tlsdesc_plt = (bfd_vma) - 1;
7040 }
7041
7042 if (got_type & GOT_TLS_GD)
7043 htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
7044
7045 if (got_type & GOT_TLS_IE)
7046 htab->root.srelgot->size += RELOC_SIZE (htab);
7047 }
7048 }
7049 else
7050 {
7051 locals[i].got_refcount = (bfd_vma) - 1;
7052 }
7053 }
7054 }
7055
7056
7057 /* Allocate global sym .plt and .got entries, and space for global
7058 sym dynamic relocs. */
cec5225b 7059 elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_dynrelocs,
a06ea964
NC		 7060 info);
7061
1419bbe5
WN		 7062 /* Allocate global ifunc sym .plt and .got entries, and space for global
7063 ifunc sym dynamic relocs. */
7064 elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_ifunc_dynrelocs,
7065 info);
7066
7067 /* Allocate .plt and .got entries, and space for local symbols. */
7068 htab_traverse (htab->loc_hash_table,
7069 elfNN_aarch64_allocate_local_dynrelocs,
7070 info);
7071
7072 /* Allocate .plt and .got entries, and space for local ifunc symbols. */
7073 htab_traverse (htab->loc_hash_table,
7074 elfNN_aarch64_allocate_local_ifunc_dynrelocs,
7075 info);
a06ea964
NC		 7076
7077 /* For every jump slot reserved in the sgotplt, reloc_count is
7078 incremented. However, when we reserve space for TLS descriptors,
7079 it's not incremented, so in order to compute the space reserved
7080 for them, it suffices to multiply the reloc count by the jump
7081 slot size. */
7082
7083 if (htab->root.srelplt)
8847944f 7084 htab->sgotplt_jump_table_size = aarch64_compute_jump_table_size (htab);
a06ea964
NC		 7085
7086 if (htab->tlsdesc_plt)
7087 {
7088 if (htab->root.splt->size == 0)
7089 htab->root.splt->size += PLT_ENTRY_SIZE;
7090
7091 htab->tlsdesc_plt = htab->root.splt->size;
7092 htab->root.splt->size += PLT_TLSDESC_ENTRY_SIZE;
7093
7094 /* If we're not using lazy TLS relocations, don't generate the
7095 GOT entry required. */
7096 if (!(info->flags & DF_BIND_NOW))
7097 {
7098 htab->dt_tlsdesc_got = htab->root.sgot->size;
7099 htab->root.sgot->size += GOT_ENTRY_SIZE;
7100 }
7101 }
7102
68fcca92
JW		 7103 /* Init mapping symbols information to use later to distingush between
7104 code and data while scanning for erratam 835769. */
7105 if (htab->fix_erratum_835769)
7106 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
7107 {
7108 if (!is_aarch64_elf (ibfd))
7109 continue;
7110 bfd_elfNN_aarch64_init_maps (ibfd);
7111 }
7112
a06ea964
NC		 7113 /* We now have determined the sizes of the various dynamic sections.
7114 Allocate memory for them. */
7115 relocs = FALSE;
7116 for (s = dynobj->sections; s != NULL; s = s->next)
7117 {
7118 if ((s->flags & SEC_LINKER_CREATED) == 0)
7119 continue;
7120
7121 if (s == htab->root.splt
7122 || s == htab->root.sgot
7123 || s == htab->root.sgotplt
7124 || s == htab->root.iplt
7125 || s == htab->root.igotplt || s == htab->sdynbss)
7126 {
7127 /* Strip this section if we don't need it; see the
7128 comment below. */
7129 }
7130 else if (CONST_STRNEQ (bfd_get_section_name (dynobj, s), ".rela"))
7131 {
7132 if (s->size != 0 && s != htab->root.srelplt)
7133 relocs = TRUE;
7134
7135 /* We use the reloc_count field as a counter if we need
7136 to copy relocs into the output file. */
7137 if (s != htab->root.srelplt)
7138 s->reloc_count = 0;
7139 }
7140 else
7141 {
7142 /* It's not one of our sections, so don't allocate space. */
7143 continue;
7144 }
7145
7146 if (s->size == 0)
7147 {
7148 /* If we don't need this section, strip it from the
7149 output file. This is mostly to handle .rela.bss and
7150 .rela.plt. We must create both sections in
7151 create_dynamic_sections, because they must be created
7152 before the linker maps input sections to output
7153 sections. The linker does that before
7154 adjust_dynamic_symbol is called, and it is that
7155 function which decides whether anything needs to go
7156 into these sections. */
7157
7158 s->flags |= SEC_EXCLUDE;
7159 continue;
7160 }
7161
7162 if ((s->flags & SEC_HAS_CONTENTS) == 0)
7163 continue;
7164
7165 /* Allocate memory for the section contents. We use bfd_zalloc
7166 here in case unused entries are not reclaimed before the
7167 section's contents are written out. This should not happen,
7168 but this way if it does, we get a R_AARCH64_NONE reloc instead
7169 of garbage. */
7170 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
7171 if (s->contents == NULL)
7172 return FALSE;
7173 }
7174
7175 if (htab->root.dynamic_sections_created)
7176 {
7177 /* Add some entries to the .dynamic section. We fill in the
cec5225b 7178 values later, in elfNN_aarch64_finish_dynamic_sections, but we
a06ea964
NC		 7179 must add the entries now so that we get the correct size for
7180 the .dynamic section. The DT_DEBUG entry is filled in by the
7181 dynamic linker and used by the debugger. */
7182#define add_dynamic_entry(TAG, VAL) \
7183 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
7184
7185 if (info->executable)
7186 {
7187 if (!add_dynamic_entry (DT_DEBUG, 0))
7188 return FALSE;
7189 }
7190
7191 if (htab->root.splt->size != 0)
7192 {
7193 if (!add_dynamic_entry (DT_PLTGOT, 0)
7194 || !add_dynamic_entry (DT_PLTRELSZ, 0)
7195 || !add_dynamic_entry (DT_PLTREL, DT_RELA)
7196 || !add_dynamic_entry (DT_JMPREL, 0))
7197 return FALSE;
7198
7199 if (htab->tlsdesc_plt
7200 && (!add_dynamic_entry (DT_TLSDESC_PLT, 0)
7201 || !add_dynamic_entry (DT_TLSDESC_GOT, 0)))
7202 return FALSE;
7203 }
7204
7205 if (relocs)
7206 {
7207 if (!add_dynamic_entry (DT_RELA, 0)
7208 || !add_dynamic_entry (DT_RELASZ, 0)
7209 || !add_dynamic_entry (DT_RELAENT, RELOC_SIZE (htab)))
7210 return FALSE;
7211
7212 /* If any dynamic relocs apply to a read-only section,
7213 then we need a DT_TEXTREL entry. */
7214 if ((info->flags & DF_TEXTREL) != 0)
7215 {
7216 if (!add_dynamic_entry (DT_TEXTREL, 0))
7217 return FALSE;
7218 }
7219 }
7220 }
7221#undef add_dynamic_entry
7222
7223 return TRUE;
a06ea964
NC		 7224}
7225
7226static inline void
caed7120
YZ		 7227elf_aarch64_update_plt_entry (bfd *output_bfd,
7228 bfd_reloc_code_real_type r_type,
7229 bfd_byte *plt_entry, bfd_vma value)
a06ea964 7230{
caed7120
YZ		 7231 reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (r_type);
7232
7233 _bfd_aarch64_elf_put_addend (output_bfd, plt_entry, r_type, howto, value);
a06ea964
NC		 7234}
7235
7236static void
cec5225b
YZ		 7237elfNN_aarch64_create_small_pltn_entry (struct elf_link_hash_entry *h,
7238 struct elf_aarch64_link_hash_table
1419bbe5
WN		 7239 *htab, bfd *output_bfd,
7240 struct bfd_link_info *info)
a06ea964
NC		 7241{
7242 bfd_byte *plt_entry;
7243 bfd_vma plt_index;
7244 bfd_vma got_offset;
7245 bfd_vma gotplt_entry_address;
7246 bfd_vma plt_entry_address;
7247 Elf_Internal_Rela rela;
7248 bfd_byte *loc;
1419bbe5
WN		 7249 asection *plt, *gotplt, *relplt;
7250
7251 /* When building a static executable, use .iplt, .igot.plt and
7252 .rela.iplt sections for STT_GNU_IFUNC symbols. */
7253 if (htab->root.splt != NULL)
7254 {
7255 plt = htab->root.splt;
7256 gotplt = htab->root.sgotplt;
7257 relplt = htab->root.srelplt;
7258 }
7259 else
7260 {
7261 plt = htab->root.iplt;
7262 gotplt = htab->root.igotplt;
7263 relplt = htab->root.irelplt;
7264 }
7265
7266 /* Get the index in the procedure linkage table which
7267 corresponds to this symbol. This is the index of this symbol
7268 in all the symbols for which we are making plt entries. The
7269 first entry in the procedure linkage table is reserved.
a06ea964 7270
1419bbe5
WN		 7271 Get the offset into the .got table of the entry that
7272 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
7273 bytes. The first three are reserved for the dynamic linker.
692e2b8b 7274
1419bbe5
WN		 7275 For static executables, we don't reserve anything. */
7276
7277 if (plt == htab->root.splt)
7278 {
7279 plt_index = (h->plt.offset - htab->plt_header_size) / htab->plt_entry_size;
7280 got_offset = (plt_index + 3) * GOT_ENTRY_SIZE;
7281 }
7282 else
7283 {
7284 plt_index = h->plt.offset / htab->plt_entry_size;
7285 got_offset = plt_index * GOT_ENTRY_SIZE;
7286 }
7287
7288 plt_entry = plt->contents + h->plt.offset;
7289 plt_entry_address = plt->output_section->vma
f44a1f8e 7290 + plt->output_offset + h->plt.offset;
1419bbe5
WN		 7291 gotplt_entry_address = gotplt->output_section->vma +
7292 gotplt->output_offset + got_offset;
a06ea964
NC		 7293
7294 /* Copy in the boiler-plate for the PLTn entry. */
cec5225b 7295 memcpy (plt_entry, elfNN_aarch64_small_plt_entry, PLT_SMALL_ENTRY_SIZE);
a06ea964
NC		 7296
7297 /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
7298 ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
caed7120
YZ		 7299 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
7300 plt_entry,
7301 PG (gotplt_entry_address) -
7302 PG (plt_entry_address));
a06ea964
NC		 7303
7304 /* Fill in the lo12 bits for the load from the pltgot. */
caed7120
YZ		 7305 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
7306 plt_entry + 4,
7307 PG_OFFSET (gotplt_entry_address));
a06ea964 7308
9aff4b7a 7309 /* Fill in the lo12 bits for the add from the pltgot entry. */
caed7120
YZ		 7310 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
7311 plt_entry + 8,
7312 PG_OFFSET (gotplt_entry_address));
a06ea964
NC		 7313
7314 /* All the GOTPLT Entries are essentially initialized to PLT0. */
cec5225b 7315 bfd_put_NN (output_bfd,
1419bbe5
WN		 7316 plt->output_section->vma + plt->output_offset,
7317 gotplt->contents + got_offset);
a06ea964 7318
a06ea964 7319 rela.r_offset = gotplt_entry_address;
1419bbe5
WN		 7320
7321 if (h->dynindx == -1
7322 || ((info->executable
7323 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
7324 && h->def_regular
7325 && h->type == STT_GNU_IFUNC))
7326 {
7327 /* If an STT_GNU_IFUNC symbol is locally defined, generate
7328 R_AARCH64_IRELATIVE instead of R_AARCH64_JUMP_SLOT. */
7329 rela.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
7330 rela.r_addend = (h->root.u.def.value
7331 + h->root.u.def.section->output_section->vma
7332 + h->root.u.def.section->output_offset);
7333 }
7334 else
7335 {
7336 /* Fill in the entry in the .rela.plt section. */
7337 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (JUMP_SLOT));
7338 rela.r_addend = 0;
7339 }
a06ea964
NC		 7340
7341 /* Compute the relocation entry to used based on PLT index and do
7342 not adjust reloc_count. The reloc_count has already been adjusted
7343 to account for this entry. */
1419bbe5 7344 loc = relplt->contents + plt_index * RELOC_SIZE (htab);
cec5225b 7345 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC		 7346}
7347
7348/* Size sections even though they're not dynamic. We use it to setup
7349 _TLS_MODULE_BASE_, if needed. */
7350
7351static bfd_boolean
cec5225b 7352elfNN_aarch64_always_size_sections (bfd *output_bfd,
a06ea964
NC		 7353 struct bfd_link_info *info)
7354{
7355 asection *tls_sec;
7356
7357 if (info->relocatable)
7358 return TRUE;
7359
7360 tls_sec = elf_hash_table (info)->tls_sec;
7361
7362 if (tls_sec)
7363 {
7364 struct elf_link_hash_entry *tlsbase;
7365
7366 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
7367 "_TLS_MODULE_BASE_", TRUE, TRUE, FALSE);
7368
7369 if (tlsbase)
7370 {
7371 struct bfd_link_hash_entry *h = NULL;
7372 const struct elf_backend_data *bed =
7373 get_elf_backend_data (output_bfd);
7374
7375 if (!(_bfd_generic_link_add_one_symbol
7376 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
7377 tls_sec, 0, NULL, FALSE, bed->collect, &h)))
7378 return FALSE;
7379
7380 tlsbase->type = STT_TLS;
7381 tlsbase = (struct elf_link_hash_entry *) h;
7382 tlsbase->def_regular = 1;
7383 tlsbase->other = STV_HIDDEN;
7384 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
7385 }
7386 }
7387
7388 return TRUE;
7389}
7390
7391/* Finish up dynamic symbol handling. We set the contents of various
7392 dynamic sections here. */
7393static bfd_boolean
cec5225b 7394elfNN_aarch64_finish_dynamic_symbol (bfd *output_bfd,
a06ea964
NC		 7395 struct bfd_link_info *info,
7396 struct elf_link_hash_entry *h,
7397 Elf_Internal_Sym *sym)
7398{
cec5225b
YZ		 7399 struct elf_aarch64_link_hash_table *htab;
7400 htab = elf_aarch64_hash_table (info);
a06ea964
NC		 7401
7402 if (h->plt.offset != (bfd_vma) - 1)
7403 {
1419bbe5
WN		 7404 asection *plt, *gotplt, *relplt;
7405
a06ea964
NC		 7406 /* This symbol has an entry in the procedure linkage table. Set
7407 it up. */
7408
1419bbe5
WN		 7409 /* When building a static executable, use .iplt, .igot.plt and
7410 .rela.iplt sections for STT_GNU_IFUNC symbols. */
7411 if (htab->root.splt != NULL)
7412 {
7413 plt = htab->root.splt;
7414 gotplt = htab->root.sgotplt;
7415 relplt = htab->root.srelplt;
7416 }
7417 else
7418 {
7419 plt = htab->root.iplt;
7420 gotplt = htab->root.igotplt;
7421 relplt = htab->root.irelplt;
7422 }
7423
7424 /* This symbol has an entry in the procedure linkage table. Set
7425 it up. */
7426 if ((h->dynindx == -1
7427 && !((h->forced_local || info->executable)
7428 && h->def_regular
7429 && h->type == STT_GNU_IFUNC))
7430 || plt == NULL
7431 || gotplt == NULL
7432 || relplt == NULL)
a06ea964
NC		 7433 abort ();
7434
1419bbe5 7435 elfNN_aarch64_create_small_pltn_entry (h, htab, output_bfd, info);
a06ea964
NC		 7436 if (!h->def_regular)
7437 {
7438 /* Mark the symbol as undefined, rather than as defined in
7439 the .plt section. Leave the value alone. This is a clue
7440 for the dynamic linker, to make function pointer
7441 comparisons work between an application and shared
7442 library. */
7443 sym->st_shndx = SHN_UNDEF;
7444 }
7445 }
7446
7447 if (h->got.offset != (bfd_vma) - 1
cec5225b 7448 && elf_aarch64_hash_entry (h)->got_type == GOT_NORMAL)
a06ea964
NC		 7449 {
7450 Elf_Internal_Rela rela;
7451 bfd_byte *loc;
7452
7453 /* This symbol has an entry in the global offset table. Set it
7454 up. */
7455 if (htab->root.sgot == NULL || htab->root.srelgot == NULL)
7456 abort ();
7457
7458 rela.r_offset = (htab->root.sgot->output_section->vma
7459 + htab->root.sgot->output_offset
7460 + (h->got.offset & ~(bfd_vma) 1));
7461
49206388
WN		 7462 if (h->def_regular
7463 && h->type == STT_GNU_IFUNC)
7464 {
7465 if (info->shared)
7466 {
7467 /* Generate R_AARCH64_GLOB_DAT. */
7468 goto do_glob_dat;
7469 }
7470 else
7471 {
7472 asection *plt;
7473
7474 if (!h->pointer_equality_needed)
7475 abort ();
7476
7477 /* For non-shared object, we can't use .got.plt, which
7478 contains the real function address if we need pointer
7479 equality. We load the GOT entry with the PLT entry. */
7480 plt = htab->root.splt ? htab->root.splt : htab->root.iplt;
7481 bfd_put_NN (output_bfd, (plt->output_section->vma
7482 + plt->output_offset
7483 + h->plt.offset),
7484 htab->root.sgot->contents
7485 + (h->got.offset & ~(bfd_vma) 1));
7486 return TRUE;
7487 }
7488 }
7489 else if (info->shared && SYMBOL_REFERENCES_LOCAL (info, h))
a06ea964
NC		 7490 {
7491 if (!h->def_regular)
7492 return FALSE;
7493
7494 BFD_ASSERT ((h->got.offset & 1) != 0);
a6bb11b2 7495 rela.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
a06ea964
NC		 7496 rela.r_addend = (h->root.u.def.value
7497 + h->root.u.def.section->output_section->vma
7498 + h->root.u.def.section->output_offset);
7499 }
7500 else
7501 {
49206388 7502do_glob_dat:
a06ea964 7503 BFD_ASSERT ((h->got.offset & 1) == 0);
cec5225b 7504 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964 7505 htab->root.sgot->contents + h->got.offset);
a6bb11b2 7506 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (GLOB_DAT));
a06ea964
NC		 7507 rela.r_addend = 0;
7508 }
7509
7510 loc = htab->root.srelgot->contents;
7511 loc += htab->root.srelgot->reloc_count++ * RELOC_SIZE (htab);
cec5225b 7512 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC		 7513 }
7514
7515 if (h->needs_copy)
7516 {
7517 Elf_Internal_Rela rela;
7518 bfd_byte *loc;
7519
7520 /* This symbol needs a copy reloc. Set it up. */
7521
7522 if (h->dynindx == -1
7523 || (h->root.type != bfd_link_hash_defined
7524 && h->root.type != bfd_link_hash_defweak)
7525 || htab->srelbss == NULL)
7526 abort ();
7527
7528 rela.r_offset = (h->root.u.def.value
7529 + h->root.u.def.section->output_section->vma
7530 + h->root.u.def.section->output_offset);
a6bb11b2 7531 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (COPY));
a06ea964
NC		 7532 rela.r_addend = 0;
7533 loc = htab->srelbss->contents;
7534 loc += htab->srelbss->reloc_count++ * RELOC_SIZE (htab);
cec5225b 7535 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC		 7536 }
7537
7538 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. SYM may
7539 be NULL for local symbols. */
7540 if (sym != NULL
9637f6ef 7541 && (h == elf_hash_table (info)->hdynamic
a06ea964
NC		 7542 || h == elf_hash_table (info)->hgot))
7543 sym->st_shndx = SHN_ABS;
7544
7545 return TRUE;
7546}
7547
1419bbe5
WN		 7548/* Finish up local dynamic symbol handling. We set the contents of
7549 various dynamic sections here. */
7550
7551static bfd_boolean
7552elfNN_aarch64_finish_local_dynamic_symbol (void **slot, void *inf)
7553{
7554 struct elf_link_hash_entry *h
7555 = (struct elf_link_hash_entry *) *slot;
7556 struct bfd_link_info *info
7557 = (struct bfd_link_info *) inf;
7558
7559 return elfNN_aarch64_finish_dynamic_symbol (info->output_bfd,
7560 info, h, NULL);
7561}
7562
a06ea964 7563static void
cec5225b
YZ		 7564elfNN_aarch64_init_small_plt0_entry (bfd *output_bfd ATTRIBUTE_UNUSED,
7565 struct elf_aarch64_link_hash_table
a06ea964
NC		 7566 *htab)
7567{
7568 /* Fill in PLT0. Fixme:RR Note this doesn't distinguish between
7569 small and large plts and at the minute just generates
7570 the small PLT. */
7571
cec5225b 7572 /* PLT0 of the small PLT looks like this in ELF64 -
a06ea964
NC		 7573 stp x16, x30, [sp, #-16]! // Save the reloc and lr on stack.
7574 adrp x16, PLT_GOT + 16 // Get the page base of the GOTPLT
7575 ldr x17, [x16, #:lo12:PLT_GOT+16] // Load the address of the
7576 // symbol resolver
7577 add x16, x16, #:lo12:PLT_GOT+16 // Load the lo12 bits of the
7578 // GOTPLT entry for this.
7579 br x17
cec5225b
YZ		 7580 PLT0 will be slightly different in ELF32 due to different got entry
7581 size.
a06ea964 7582 */
caed7120 7583 bfd_vma plt_got_2nd_ent; /* Address of GOT[2]. */
a06ea964
NC		 7584 bfd_vma plt_base;
7585
7586
cec5225b 7587 memcpy (htab->root.splt->contents, elfNN_aarch64_small_plt0_entry,
a06ea964
NC		 7588 PLT_ENTRY_SIZE);
7589 elf_section_data (htab->root.splt->output_section)->this_hdr.sh_entsize =
7590 PLT_ENTRY_SIZE;
7591
caed7120
YZ		 7592 plt_got_2nd_ent = (htab->root.sgotplt->output_section->vma
7593 + htab->root.sgotplt->output_offset
7594 + GOT_ENTRY_SIZE * 2);
a06ea964
NC		 7595
7596 plt_base = htab->root.splt->output_section->vma +
f44a1f8e 7597 htab->root.splt->output_offset;
a06ea964
NC		 7598
7599 /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
7600 ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
caed7120
YZ		 7601 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
7602 htab->root.splt->contents + 4,
7603 PG (plt_got_2nd_ent) - PG (plt_base + 4));
a06ea964 7604
caed7120
YZ		 7605 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
7606 htab->root.splt->contents + 8,
7607 PG_OFFSET (plt_got_2nd_ent));
a06ea964 7608
caed7120
YZ		 7609 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
7610 htab->root.splt->contents + 12,
7611 PG_OFFSET (plt_got_2nd_ent));
a06ea964
NC		 7612}
7613
7614static bfd_boolean
cec5225b 7615elfNN_aarch64_finish_dynamic_sections (bfd *output_bfd,
a06ea964
NC		 7616 struct bfd_link_info *info)
7617{
cec5225b 7618 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC		 7619 bfd *dynobj;
7620 asection *sdyn;
7621
cec5225b 7622 htab = elf_aarch64_hash_table (info);
a06ea964
NC		 7623 dynobj = htab->root.dynobj;
7624 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
7625
7626 if (htab->root.dynamic_sections_created)
7627 {
cec5225b 7628 ElfNN_External_Dyn *dyncon, *dynconend;
a06ea964
NC		 7629
7630 if (sdyn == NULL || htab->root.sgot == NULL)
7631 abort ();
7632
cec5225b
YZ		 7633 dyncon = (ElfNN_External_Dyn *) sdyn->contents;
7634 dynconend = (ElfNN_External_Dyn *) (sdyn->contents + sdyn->size);
a06ea964
NC		 7635 for (; dyncon < dynconend; dyncon++)
7636 {
7637 Elf_Internal_Dyn dyn;
7638 asection *s;
7639
cec5225b 7640 bfd_elfNN_swap_dyn_in (dynobj, dyncon, &dyn);
a06ea964
NC		 7641
7642 switch (dyn.d_tag)
7643 {
7644 default:
7645 continue;
7646
7647 case DT_PLTGOT:
7648 s = htab->root.sgotplt;
7649 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
7650 break;
7651
7652 case DT_JMPREL:
7653 dyn.d_un.d_ptr = htab->root.srelplt->output_section->vma;
7654 break;
7655
7656 case DT_PLTRELSZ:
c955de36 7657 s = htab->root.srelplt;
a06ea964
NC		 7658 dyn.d_un.d_val = s->size;
7659 break;
7660
7661 case DT_RELASZ:
7662 /* The procedure linkage table relocs (DT_JMPREL) should
7663 not be included in the overall relocs (DT_RELA).
7664 Therefore, we override the DT_RELASZ entry here to
7665 make it not include the JMPREL relocs. Since the
7666 linker script arranges for .rela.plt to follow all
7667 other relocation sections, we don't have to worry
7668 about changing the DT_RELA entry. */
7669 if (htab->root.srelplt != NULL)
7670 {
c955de36 7671 s = htab->root.srelplt;
a06ea964
NC		 7672 dyn.d_un.d_val -= s->size;
7673 }
7674 break;
7675
7676 case DT_TLSDESC_PLT:
7677 s = htab->root.splt;
7678 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
7679 + htab->tlsdesc_plt;
7680 break;
7681
7682 case DT_TLSDESC_GOT:
7683 s = htab->root.sgot;
7684 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
7685 + htab->dt_tlsdesc_got;
7686 break;
7687 }
7688
cec5225b 7689 bfd_elfNN_swap_dyn_out (output_bfd, &dyn, dyncon);
a06ea964
NC		 7690 }
7691
7692 }
7693
7694 /* Fill in the special first entry in the procedure linkage table. */
7695 if (htab->root.splt && htab->root.splt->size > 0)
7696 {
cec5225b 7697 elfNN_aarch64_init_small_plt0_entry (output_bfd, htab);
a06ea964
NC		 7698
7699 elf_section_data (htab->root.splt->output_section)->
7700 this_hdr.sh_entsize = htab->plt_entry_size;
7701
7702
7703 if (htab->tlsdesc_plt)
7704 {
cec5225b 7705 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC		 7706 htab->root.sgot->contents + htab->dt_tlsdesc_got);
7707
7708 memcpy (htab->root.splt->contents + htab->tlsdesc_plt,
cec5225b
YZ		 7709 elfNN_aarch64_tlsdesc_small_plt_entry,
7710 sizeof (elfNN_aarch64_tlsdesc_small_plt_entry));
a06ea964
NC		 7711
7712 {
7713 bfd_vma adrp1_addr =
7714 htab->root.splt->output_section->vma
7715 + htab->root.splt->output_offset + htab->tlsdesc_plt + 4;
7716
caed7120 7717 bfd_vma adrp2_addr = adrp1_addr + 4;
a06ea964
NC		 7718
7719 bfd_vma got_addr =
7720 htab->root.sgot->output_section->vma
7721 + htab->root.sgot->output_offset;
7722
7723 bfd_vma pltgot_addr =
7724 htab->root.sgotplt->output_section->vma
7725 + htab->root.sgotplt->output_offset;
7726
7727 bfd_vma dt_tlsdesc_got = got_addr + htab->dt_tlsdesc_got;
caed7120
YZ		 7728
7729 bfd_byte *plt_entry =
7730 htab->root.splt->contents + htab->tlsdesc_plt;
a06ea964
NC		 7731
7732 /* adrp x2, DT_TLSDESC_GOT */
caed7120
YZ		 7733 elf_aarch64_update_plt_entry (output_bfd,
7734 BFD_RELOC_AARCH64_ADR_HI21_PCREL,
7735 plt_entry + 4,
7736 (PG (dt_tlsdesc_got)
7737 - PG (adrp1_addr)));
a06ea964
NC		 7738
7739 /* adrp x3, 0 */
caed7120
YZ		 7740 elf_aarch64_update_plt_entry (output_bfd,
7741 BFD_RELOC_AARCH64_ADR_HI21_PCREL,
7742 plt_entry + 8,
7743 (PG (pltgot_addr)
7744 - PG (adrp2_addr)));
a06ea964
NC		 7745
7746 /* ldr x2, [x2, #0] */
caed7120
YZ		 7747 elf_aarch64_update_plt_entry (output_bfd,
7748 BFD_RELOC_AARCH64_LDSTNN_LO12,
7749 plt_entry + 12,
7750 PG_OFFSET (dt_tlsdesc_got));
a06ea964
NC		 7751
7752 /* add x3, x3, 0 */
caed7120
YZ		 7753 elf_aarch64_update_plt_entry (output_bfd,
7754 BFD_RELOC_AARCH64_ADD_LO12,
7755 plt_entry + 16,
7756 PG_OFFSET (pltgot_addr));
a06ea964
NC		 7757 }
7758 }
7759 }
7760
7761 if (htab->root.sgotplt)
7762 {
7763 if (bfd_is_abs_section (htab->root.sgotplt->output_section))
7764 {
7765 (*_bfd_error_handler)
7766 (_("discarded output section: `%A'"), htab->root.sgotplt);
7767 return FALSE;
7768 }
7769
7770 /* Fill in the first three entries in the global offset table. */
7771 if (htab->root.sgotplt->size > 0)
7772 {
8db339a6
MS		 7773 bfd_put_NN (output_bfd, (bfd_vma) 0, htab->root.sgotplt->contents);
7774
a06ea964 7775 /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
cec5225b 7776 bfd_put_NN (output_bfd,
a06ea964
NC		 7777 (bfd_vma) 0,
7778 htab->root.sgotplt->contents + GOT_ENTRY_SIZE);
cec5225b 7779 bfd_put_NN (output_bfd,
a06ea964
NC		 7780 (bfd_vma) 0,
7781 htab->root.sgotplt->contents + GOT_ENTRY_SIZE * 2);
7782 }
7783
8db339a6
MS		 7784 if (htab->root.sgot)
7785 {
7786 if (htab->root.sgot->size > 0)
7787 {
7788 bfd_vma addr =
7789 sdyn ? sdyn->output_section->vma + sdyn->output_offset : 0;
7790 bfd_put_NN (output_bfd, addr, htab->root.sgot->contents);
7791 }
7792 }
7793
a06ea964
NC		 7794 elf_section_data (htab->root.sgotplt->output_section)->
7795 this_hdr.sh_entsize = GOT_ENTRY_SIZE;
7796 }
7797
7798 if (htab->root.sgot && htab->root.sgot->size > 0)
7799 elf_section_data (htab->root.sgot->output_section)->this_hdr.sh_entsize
7800 = GOT_ENTRY_SIZE;
7801
1419bbe5
WN		 7802 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
7803 htab_traverse (htab->loc_hash_table,
7804 elfNN_aarch64_finish_local_dynamic_symbol,
7805 info);
7806
a06ea964
NC		 7807 return TRUE;
7808}
7809
7810/* Return address for Ith PLT stub in section PLT, for relocation REL
7811 or (bfd_vma) -1 if it should not be included. */
7812
7813static bfd_vma
cec5225b 7814elfNN_aarch64_plt_sym_val (bfd_vma i, const asection *plt,
a06ea964
NC		 7815 const arelent *rel ATTRIBUTE_UNUSED)
7816{
7817 return plt->vma + PLT_ENTRY_SIZE + i * PLT_SMALL_ENTRY_SIZE;
7818}
7819
7820
7821/* We use this so we can override certain functions
7822 (though currently we don't). */
7823
cec5225b 7824const struct elf_size_info elfNN_aarch64_size_info =
a06ea964 7825{
cec5225b
YZ		 7826 sizeof (ElfNN_External_Ehdr),
7827 sizeof (ElfNN_External_Phdr),
7828 sizeof (ElfNN_External_Shdr),
7829 sizeof (ElfNN_External_Rel),
7830 sizeof (ElfNN_External_Rela),
7831 sizeof (ElfNN_External_Sym),
7832 sizeof (ElfNN_External_Dyn),
a06ea964
NC		 7833 sizeof (Elf_External_Note),
7834 4, /* Hash table entry size. */
7835 1, /* Internal relocs per external relocs. */
cec5225b
YZ		 7836 ARCH_SIZE, /* Arch size. */
7837 LOG_FILE_ALIGN, /* Log_file_align. */
7838 ELFCLASSNN, EV_CURRENT,
7839 bfd_elfNN_write_out_phdrs,
7840 bfd_elfNN_write_shdrs_and_ehdr,
7841 bfd_elfNN_checksum_contents,
7842 bfd_elfNN_write_relocs,
7843 bfd_elfNN_swap_symbol_in,
7844 bfd_elfNN_swap_symbol_out,
7845 bfd_elfNN_slurp_reloc_table,
7846 bfd_elfNN_slurp_symbol_table,
7847 bfd_elfNN_swap_dyn_in,
7848 bfd_elfNN_swap_dyn_out,
7849 bfd_elfNN_swap_reloc_in,
7850 bfd_elfNN_swap_reloc_out,
7851 bfd_elfNN_swap_reloca_in,
7852 bfd_elfNN_swap_reloca_out
a06ea964
NC		 7853};
7854
7855#define ELF_ARCH bfd_arch_aarch64
7856#define ELF_MACHINE_CODE EM_AARCH64
7857#define ELF_MAXPAGESIZE 0x10000
7858#define ELF_MINPAGESIZE 0x1000
7859#define ELF_COMMONPAGESIZE 0x1000
7860
cec5225b
YZ		 7861#define bfd_elfNN_close_and_cleanup \
7862 elfNN_aarch64_close_and_cleanup
a06ea964 7863
cec5225b
YZ		 7864#define bfd_elfNN_bfd_free_cached_info \
7865 elfNN_aarch64_bfd_free_cached_info
a06ea964 7866
cec5225b
YZ		 7867#define bfd_elfNN_bfd_is_target_special_symbol \
7868 elfNN_aarch64_is_target_special_symbol
a06ea964 7869
cec5225b
YZ		 7870#define bfd_elfNN_bfd_link_hash_table_create \
7871 elfNN_aarch64_link_hash_table_create
a06ea964 7872
cec5225b
YZ		 7873#define bfd_elfNN_bfd_merge_private_bfd_data \
7874 elfNN_aarch64_merge_private_bfd_data
a06ea964 7875
cec5225b
YZ		 7876#define bfd_elfNN_bfd_print_private_bfd_data \
7877 elfNN_aarch64_print_private_bfd_data
a06ea964 7878
cec5225b
YZ		 7879#define bfd_elfNN_bfd_reloc_type_lookup \
7880 elfNN_aarch64_reloc_type_lookup
a06ea964 7881
cec5225b
YZ		 7882#define bfd_elfNN_bfd_reloc_name_lookup \
7883 elfNN_aarch64_reloc_name_lookup
a06ea964 7884
cec5225b
YZ		 7885#define bfd_elfNN_bfd_set_private_flags \
7886 elfNN_aarch64_set_private_flags
a06ea964 7887
cec5225b
YZ		 7888#define bfd_elfNN_find_inliner_info \
7889 elfNN_aarch64_find_inliner_info
a06ea964 7890
cec5225b
YZ		 7891#define bfd_elfNN_find_nearest_line \
7892 elfNN_aarch64_find_nearest_line
a06ea964 7893
cec5225b
YZ		 7894#define bfd_elfNN_mkobject \
7895 elfNN_aarch64_mkobject
a06ea964 7896
cec5225b
YZ		 7897#define bfd_elfNN_new_section_hook \
7898 elfNN_aarch64_new_section_hook
a06ea964
NC		 7899
7900#define elf_backend_adjust_dynamic_symbol \
cec5225b 7901 elfNN_aarch64_adjust_dynamic_symbol
a06ea964
NC		 7902
7903#define elf_backend_always_size_sections \
cec5225b 7904 elfNN_aarch64_always_size_sections
a06ea964
NC		 7905
7906#define elf_backend_check_relocs \
cec5225b 7907 elfNN_aarch64_check_relocs
a06ea964
NC		 7908
7909#define elf_backend_copy_indirect_symbol \
cec5225b 7910 elfNN_aarch64_copy_indirect_symbol
a06ea964
NC		 7911
7912/* Create .dynbss, and .rela.bss sections in DYNOBJ, and set up shortcuts
7913 to them in our hash. */
7914#define elf_backend_create_dynamic_sections \
cec5225b 7915 elfNN_aarch64_create_dynamic_sections
a06ea964
NC		 7916
7917#define elf_backend_init_index_section \
7918 _bfd_elf_init_2_index_sections
7919
a06ea964 7920#define elf_backend_finish_dynamic_sections \
cec5225b 7921 elfNN_aarch64_finish_dynamic_sections
a06ea964
NC		 7922
7923#define elf_backend_finish_dynamic_symbol \
cec5225b 7924 elfNN_aarch64_finish_dynamic_symbol
a06ea964
NC		 7925
7926#define elf_backend_gc_sweep_hook \
cec5225b 7927 elfNN_aarch64_gc_sweep_hook
a06ea964
NC		 7928
7929#define elf_backend_object_p \
cec5225b 7930 elfNN_aarch64_object_p
a06ea964
NC		 7931
7932#define elf_backend_output_arch_local_syms \
cec5225b 7933 elfNN_aarch64_output_arch_local_syms
a06ea964
NC		 7934
7935#define elf_backend_plt_sym_val \
cec5225b 7936 elfNN_aarch64_plt_sym_val
a06ea964
NC		 7937
7938#define elf_backend_post_process_headers \
cec5225b 7939 elfNN_aarch64_post_process_headers
a06ea964
NC		 7940
7941#define elf_backend_relocate_section \
cec5225b 7942 elfNN_aarch64_relocate_section
a06ea964
NC		 7943
7944#define elf_backend_reloc_type_class \
cec5225b 7945 elfNN_aarch64_reloc_type_class
a06ea964 7946
a06ea964 7947#define elf_backend_section_from_shdr \
cec5225b 7948 elfNN_aarch64_section_from_shdr
a06ea964
NC		 7949
7950#define elf_backend_size_dynamic_sections \
cec5225b 7951 elfNN_aarch64_size_dynamic_sections
a06ea964
NC		 7952
7953#define elf_backend_size_info \
cec5225b 7954 elfNN_aarch64_size_info
a06ea964 7955
68fcca92
JW		 7956#define elf_backend_write_section \
7957 elfNN_aarch64_write_section
7958
a06ea964 7959#define elf_backend_can_refcount 1
59c108f7 7960#define elf_backend_can_gc_sections 1
a06ea964
NC		 7961#define elf_backend_plt_readonly 1
7962#define elf_backend_want_got_plt 1
7963#define elf_backend_want_plt_sym 0
7964#define elf_backend_may_use_rel_p 0
7965#define elf_backend_may_use_rela_p 1
7966#define elf_backend_default_use_rela_p 1
2e0488d3 7967#define elf_backend_rela_normal 1
a06ea964 7968#define elf_backend_got_header_size (GOT_ENTRY_SIZE * 3)
c495064d 7969#define elf_backend_default_execstack 0
a06ea964
NC		 7970
7971#undef elf_backend_obj_attrs_section
7972#define elf_backend_obj_attrs_section ".ARM.attributes"
7973
cec5225b 7974#include "elfNN-target.h"
GDB Binutils - Deliverables
This page took 0.552744 seconds and 4 git commands to generate.