[gdb/testsuite] Fix gdb.fortran/info-modules.exp with gcc-4.8
[deliverable/binutils-gdb.git] / bfd / elfnn-aarch64.c
CommitLineData
cec5225b 1/* AArch64-specific support for NN-bit ELF.
b3adc24a 2 Copyright (C) 2009-2020 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
07d6d2b8 34 R_AARCH64_TLSGD_ADR_PAGE21(foo)
a06ea964 35 add x0, :tlsgd_lo12:foo
07d6d2b8 36 R_AARCH64_TLSGD_ADD_LO12_NC(foo)
a06ea964
NC
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
07d6d2b8
AM
43 adrp x0, :tlsdesc:foo R_AARCH64_TLSDESC_ADR_PAGE21(foo)
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)
a06ea964 46 .tlsdesccall foo
07d6d2b8 47 blr x1 R_AARCH64_TLSDESC_CALL(foo)
a06ea964
NC
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"
a06ea964
NC
142#include "elf-bfd.h"
143#include "bfdlink.h"
1419bbe5 144#include "objalloc.h"
a06ea964 145#include "elf/aarch64.h"
caed7120 146#include "elfxx-aarch64.h"
a8bfaadb 147#include "cpu-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 156#define LOG_FILE_ALIGN 3
f955cccf 157#define BFD_RELOC_AARCH64_TLSDESC_LD64_LO12_NC BFD_RELOC_AARCH64_TLSDESC_LD64_LO12
cec5225b
YZ
158#endif
159
160#if ARCH_SIZE == 32
161#define AARCH64_R(NAME) R_AARCH64_P32_ ## NAME
162#define AARCH64_R_STR(NAME) "R_AARCH64_P32_" #NAME
a6bb11b2
YZ
163#define HOWTO64(...) EMPTY_HOWTO (0)
164#define HOWTO32(...) HOWTO (__VA_ARGS__)
cec5225b 165#define LOG_FILE_ALIGN 2
07d6d2b8
AM
166#define BFD_RELOC_AARCH64_TLSDESC_LD32_LO12 BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC
167#define R_AARCH64_P32_TLSDESC_ADD_LO12 R_AARCH64_P32_TLSDESC_ADD_LO12_NC
cec5225b
YZ
168#endif
169
a6bb11b2 170#define IS_AARCH64_TLS_RELOC(R_TYPE) \
4c0a9a6f
JW
171 ((R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC \
172 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21 \
3c12b054 173 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PREL21 \
3e8286c0 174 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC \
1aa66fb1 175 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G1 \
a6bb11b2 176 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21 \
a6bb11b2 177 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC \
4c0a9a6f 178 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC \
a6bb11b2 179 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19 \
4c0a9a6f
JW
180 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC \
181 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1 \
6ffe9a1b 182 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12 \
40fbed84 183 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12 \
753999c1 184 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC \
73f925cc 185 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC \
f69e4920 186 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21 \
77a69ff8 187 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21 \
07c9aa07
JW
188 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12 \
189 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC \
190 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12 \
191 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC \
192 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12 \
193 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC \
194 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12 \
195 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC \
6ffe9a1b
JW
196 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0 \
197 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC \
198 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1 \
199 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC \
200 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2 \
a6bb11b2 201 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12 \
4c0a9a6f 202 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12 \
a6bb11b2 203 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC \
e04ef022
RL
204 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12 \
205 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12_NC \
206 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12 \
207 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12_NC \
208 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12 \
209 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12_NC \
210 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12 \
211 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12_NC \
a6bb11b2
YZ
212 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0 \
213 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC \
4c0a9a6f
JW
214 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 \
215 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC \
216 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2 \
a6bb11b2
YZ
217 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_DTPMOD \
218 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_DTPREL \
219 || (R_TYPE) == BFD_RELOC_AARCH64_TLS_TPREL \
a06ea964
NC
220 || IS_AARCH64_TLSDESC_RELOC ((R_TYPE)))
221
9331eea1 222#define IS_AARCH64_TLS_RELAX_RELOC(R_TYPE) \
f955cccf
NC
223 ((R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD \
224 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD_LO12 \
4af68b9c
JW
225 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21 \
226 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21 \
227 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_CALL \
228 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD_PREL19 \
229 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC \
0484b454
RL
230 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
231 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC \
232 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G1 \
233 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
4af68b9c 234 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21 \
9331eea1
JW
235 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PREL21 \
236 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC \
ac734732
RL
237 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC \
238 || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G1 \
9331eea1
JW
239 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21 \
240 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19 \
241 || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC \
259364ad
JW
242 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC \
243 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21 \
4af68b9c 244 || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21)
9331eea1 245
a6bb11b2 246#define IS_AARCH64_TLSDESC_RELOC(R_TYPE) \
4c0a9a6f
JW
247 ((R_TYPE) == BFD_RELOC_AARCH64_TLSDESC \
248 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD \
f955cccf 249 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD_LO12 \
a6bb11b2 250 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21 \
389b8029 251 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21 \
4c0a9a6f 252 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_CALL \
a6bb11b2 253 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC \
f955cccf 254 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD64_LO12 \
a6bb11b2 255 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
4c0a9a6f
JW
256 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD_PREL19 \
257 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC \
258 || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G1)
a06ea964 259
6353d82b 260#define ELIMINATE_COPY_RELOCS 1
a06ea964 261
a06ea964 262/* Return size of a relocation entry. HTAB is the bfd's
cec5225b
YZ
263 elf_aarch64_link_hash_entry. */
264#define RELOC_SIZE(HTAB) (sizeof (ElfNN_External_Rela))
a06ea964 265
cec5225b 266/* GOT Entry size - 8 bytes in ELF64 and 4 bytes in ELF32. */
07d6d2b8
AM
267#define GOT_ENTRY_SIZE (ARCH_SIZE / 8)
268#define PLT_ENTRY_SIZE (32)
269#define PLT_SMALL_ENTRY_SIZE (16)
270#define PLT_TLSDESC_ENTRY_SIZE (32)
37c18eed 271/* PLT sizes with BTI insn. */
68bb0359 272#define PLT_BTI_SMALL_ENTRY_SIZE (24)
1dbade74 273/* PLT sizes with PAC insn. */
68bb0359 274#define PLT_PAC_SMALL_ENTRY_SIZE (24)
1dbade74 275/* PLT sizes with BTI and PAC insn. */
1dbade74 276#define PLT_BTI_PAC_SMALL_ENTRY_SIZE (24)
a06ea964 277
2d0ca824 278/* Encoding of the nop instruction. */
a06ea964
NC
279#define INSN_NOP 0xd503201f
280
281#define aarch64_compute_jump_table_size(htab) \
282 (((htab)->root.srelplt == NULL) ? 0 \
283 : (htab)->root.srelplt->reloc_count * GOT_ENTRY_SIZE)
284
285/* The first entry in a procedure linkage table looks like this
286 if the distance between the PLTGOT and the PLT is < 4GB use
287 these PLT entries. Note that the dynamic linker gets &PLTGOT[2]
288 in x16 and needs to work out PLTGOT[1] by using an address of
cec5225b
YZ
289 [x16,#-GOT_ENTRY_SIZE]. */
290static const bfd_byte elfNN_aarch64_small_plt0_entry[PLT_ENTRY_SIZE] =
a06ea964
NC
291{
292 0xf0, 0x7b, 0xbf, 0xa9, /* stp x16, x30, [sp, #-16]! */
293 0x10, 0x00, 0x00, 0x90, /* adrp x16, (GOT+16) */
caed7120 294#if ARCH_SIZE == 64
a06ea964
NC
295 0x11, 0x0A, 0x40, 0xf9, /* ldr x17, [x16, #PLT_GOT+0x10] */
296 0x10, 0x42, 0x00, 0x91, /* add x16, x16,#PLT_GOT+0x10 */
caed7120
YZ
297#else
298 0x11, 0x0A, 0x40, 0xb9, /* ldr w17, [x16, #PLT_GOT+0x8] */
299 0x10, 0x22, 0x00, 0x11, /* add w16, w16,#PLT_GOT+0x8 */
300#endif
a06ea964
NC
301 0x20, 0x02, 0x1f, 0xd6, /* br x17 */
302 0x1f, 0x20, 0x03, 0xd5, /* nop */
303 0x1f, 0x20, 0x03, 0xd5, /* nop */
304 0x1f, 0x20, 0x03, 0xd5, /* nop */
305};
306
68bb0359 307static const bfd_byte elfNN_aarch64_small_plt0_bti_entry[PLT_ENTRY_SIZE] =
37c18eed
SD
308{
309 0x5f, 0x24, 0x03, 0xd5, /* bti c. */
310 0xf0, 0x7b, 0xbf, 0xa9, /* stp x16, x30, [sp, #-16]! */
311 0x10, 0x00, 0x00, 0x90, /* adrp x16, (GOT+16) */
312#if ARCH_SIZE == 64
313 0x11, 0x0A, 0x40, 0xf9, /* ldr x17, [x16, #PLT_GOT+0x10] */
314 0x10, 0x42, 0x00, 0x91, /* add x16, x16,#PLT_GOT+0x10 */
315#else
316 0x11, 0x0A, 0x40, 0xb9, /* ldr w17, [x16, #PLT_GOT+0x8] */
317 0x10, 0x22, 0x00, 0x11, /* add w16, w16,#PLT_GOT+0x8 */
318#endif
319 0x20, 0x02, 0x1f, 0xd6, /* br x17 */
320 0x1f, 0x20, 0x03, 0xd5, /* nop */
321 0x1f, 0x20, 0x03, 0xd5, /* nop */
1dbade74
SD
322};
323
a06ea964
NC
324/* Per function entry in a procedure linkage table looks like this
325 if the distance between the PLTGOT and the PLT is < 4GB use
37c18eed 326 these PLT entries. Use BTI versions of the PLTs when enabled. */
cec5225b 327static const bfd_byte elfNN_aarch64_small_plt_entry[PLT_SMALL_ENTRY_SIZE] =
a06ea964
NC
328{
329 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
caed7120 330#if ARCH_SIZE == 64
a06ea964
NC
331 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
332 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
caed7120
YZ
333#else
334 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
335 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
336#endif
a06ea964
NC
337 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
338};
339
37c18eed
SD
340static const bfd_byte
341elfNN_aarch64_small_plt_bti_entry[PLT_BTI_SMALL_ENTRY_SIZE] =
342{
343 0x5f, 0x24, 0x03, 0xd5, /* bti c. */
344 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
345#if ARCH_SIZE == 64
346 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
347 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
348#else
349 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
350 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
351#endif
352 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
68bb0359 353 0x1f, 0x20, 0x03, 0xd5, /* nop */
37c18eed
SD
354};
355
1dbade74
SD
356static const bfd_byte
357elfNN_aarch64_small_plt_pac_entry[PLT_PAC_SMALL_ENTRY_SIZE] =
358{
359 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
360#if ARCH_SIZE == 64
361 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
362 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
363#else
364 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
365 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
366#endif
367 0x9f, 0x21, 0x03, 0xd5, /* autia1716 */
368 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
68bb0359 369 0x1f, 0x20, 0x03, 0xd5, /* nop */
1dbade74
SD
370};
371
372static const bfd_byte
373elfNN_aarch64_small_plt_bti_pac_entry[PLT_BTI_PAC_SMALL_ENTRY_SIZE] =
374{
375 0x5f, 0x24, 0x03, 0xd5, /* bti c. */
376 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
377#if ARCH_SIZE == 64
378 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
379 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
380#else
381 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
382 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
383#endif
384 0x9f, 0x21, 0x03, 0xd5, /* autia1716 */
385 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
386};
387
a06ea964 388static const bfd_byte
cec5225b 389elfNN_aarch64_tlsdesc_small_plt_entry[PLT_TLSDESC_ENTRY_SIZE] =
a06ea964
NC
390{
391 0xe2, 0x0f, 0xbf, 0xa9, /* stp x2, x3, [sp, #-16]! */
392 0x02, 0x00, 0x00, 0x90, /* adrp x2, 0 */
393 0x03, 0x00, 0x00, 0x90, /* adrp x3, 0 */
caed7120
YZ
394#if ARCH_SIZE == 64
395 0x42, 0x00, 0x40, 0xf9, /* ldr x2, [x2, #0] */
a06ea964 396 0x63, 0x00, 0x00, 0x91, /* add x3, x3, 0 */
caed7120
YZ
397#else
398 0x42, 0x00, 0x40, 0xb9, /* ldr w2, [x2, #0] */
399 0x63, 0x00, 0x00, 0x11, /* add w3, w3, 0 */
400#endif
401 0x40, 0x00, 0x1f, 0xd6, /* br x2 */
a06ea964
NC
402 0x1f, 0x20, 0x03, 0xd5, /* nop */
403 0x1f, 0x20, 0x03, 0xd5, /* nop */
404};
405
37c18eed 406static const bfd_byte
68bb0359 407elfNN_aarch64_tlsdesc_small_plt_bti_entry[PLT_TLSDESC_ENTRY_SIZE] =
37c18eed
SD
408{
409 0x5f, 0x24, 0x03, 0xd5, /* bti c. */
410 0xe2, 0x0f, 0xbf, 0xa9, /* stp x2, x3, [sp, #-16]! */
411 0x02, 0x00, 0x00, 0x90, /* adrp x2, 0 */
412 0x03, 0x00, 0x00, 0x90, /* adrp x3, 0 */
413#if ARCH_SIZE == 64
414 0x42, 0x00, 0x40, 0xf9, /* ldr x2, [x2, #0] */
415 0x63, 0x00, 0x00, 0x91, /* add x3, x3, 0 */
416#else
417 0x42, 0x00, 0x40, 0xb9, /* ldr w2, [x2, #0] */
418 0x63, 0x00, 0x00, 0x11, /* add w3, w3, 0 */
419#endif
420 0x40, 0x00, 0x1f, 0xd6, /* br x2 */
421 0x1f, 0x20, 0x03, 0xd5, /* nop */
37c18eed
SD
422};
423
07d6d2b8
AM
424#define elf_info_to_howto elfNN_aarch64_info_to_howto
425#define elf_info_to_howto_rel elfNN_aarch64_info_to_howto
a06ea964
NC
426
427#define AARCH64_ELF_ABI_VERSION 0
a06ea964
NC
428
429/* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
430#define ALL_ONES (~ (bfd_vma) 0)
431
a6bb11b2
YZ
432/* Indexed by the bfd interal reloc enumerators.
433 Therefore, the table needs to be synced with BFD_RELOC_AARCH64_*
434 in reloc.c. */
a06ea964 435
a6bb11b2 436static reloc_howto_type elfNN_aarch64_howto_table[] =
a06ea964 437{
a6bb11b2 438 EMPTY_HOWTO (0),
a06ea964 439
a6bb11b2 440 /* Basic data relocations. */
a06ea964 441
b7f28d87
JW
442 /* Deprecated, but retained for backwards compatibility. */
443 HOWTO64 (R_AARCH64_NULL, /* type */
a06ea964 444 0, /* rightshift */
6346d5ca 445 3, /* size (0 = byte, 1 = short, 2 = long) */
a6bb11b2 446 0, /* bitsize */
a06ea964
NC
447 FALSE, /* pc_relative */
448 0, /* bitpos */
449 complain_overflow_dont, /* complain_on_overflow */
450 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 451 "R_AARCH64_NULL", /* name */
a06ea964
NC
452 FALSE, /* partial_inplace */
453 0, /* src_mask */
a6bb11b2 454 0, /* dst_mask */
a06ea964 455 FALSE), /* pcrel_offset */
a6bb11b2 456 HOWTO (R_AARCH64_NONE, /* type */
a06ea964 457 0, /* rightshift */
6346d5ca 458 3, /* size (0 = byte, 1 = short, 2 = long) */
a06ea964
NC
459 0, /* bitsize */
460 FALSE, /* pc_relative */
461 0, /* bitpos */
462 complain_overflow_dont, /* complain_on_overflow */
463 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 464 "R_AARCH64_NONE", /* name */
a06ea964
NC
465 FALSE, /* partial_inplace */
466 0, /* src_mask */
467 0, /* dst_mask */
468 FALSE), /* pcrel_offset */
469
470 /* .xword: (S+A) */
a6bb11b2 471 HOWTO64 (AARCH64_R (ABS64), /* type */
a06ea964
NC
472 0, /* rightshift */
473 4, /* size (4 = long long) */
474 64, /* bitsize */
475 FALSE, /* pc_relative */
476 0, /* bitpos */
477 complain_overflow_unsigned, /* complain_on_overflow */
478 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 479 AARCH64_R_STR (ABS64), /* name */
a06ea964
NC
480 FALSE, /* partial_inplace */
481 ALL_ONES, /* src_mask */
482 ALL_ONES, /* dst_mask */
483 FALSE), /* pcrel_offset */
484
485 /* .word: (S+A) */
a6bb11b2 486 HOWTO (AARCH64_R (ABS32), /* type */
a06ea964
NC
487 0, /* rightshift */
488 2, /* size (0 = byte, 1 = short, 2 = long) */
489 32, /* bitsize */
490 FALSE, /* pc_relative */
491 0, /* bitpos */
492 complain_overflow_unsigned, /* complain_on_overflow */
493 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 494 AARCH64_R_STR (ABS32), /* name */
a06ea964
NC
495 FALSE, /* partial_inplace */
496 0xffffffff, /* src_mask */
497 0xffffffff, /* dst_mask */
498 FALSE), /* pcrel_offset */
499
500 /* .half: (S+A) */
a6bb11b2 501 HOWTO (AARCH64_R (ABS16), /* type */
a06ea964
NC
502 0, /* rightshift */
503 1, /* size (0 = byte, 1 = short, 2 = long) */
504 16, /* bitsize */
505 FALSE, /* pc_relative */
506 0, /* bitpos */
507 complain_overflow_unsigned, /* complain_on_overflow */
508 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 509 AARCH64_R_STR (ABS16), /* name */
a06ea964
NC
510 FALSE, /* partial_inplace */
511 0xffff, /* src_mask */
512 0xffff, /* dst_mask */
513 FALSE), /* pcrel_offset */
514
515 /* .xword: (S+A-P) */
a6bb11b2 516 HOWTO64 (AARCH64_R (PREL64), /* type */
a06ea964
NC
517 0, /* rightshift */
518 4, /* size (4 = long long) */
519 64, /* bitsize */
520 TRUE, /* pc_relative */
521 0, /* bitpos */
522 complain_overflow_signed, /* complain_on_overflow */
523 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 524 AARCH64_R_STR (PREL64), /* name */
a06ea964
NC
525 FALSE, /* partial_inplace */
526 ALL_ONES, /* src_mask */
527 ALL_ONES, /* dst_mask */
528 TRUE), /* pcrel_offset */
529
530 /* .word: (S+A-P) */
a6bb11b2 531 HOWTO (AARCH64_R (PREL32), /* type */
a06ea964
NC
532 0, /* rightshift */
533 2, /* size (0 = byte, 1 = short, 2 = long) */
534 32, /* bitsize */
535 TRUE, /* pc_relative */
536 0, /* bitpos */
537 complain_overflow_signed, /* complain_on_overflow */
538 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 539 AARCH64_R_STR (PREL32), /* name */
a06ea964
NC
540 FALSE, /* partial_inplace */
541 0xffffffff, /* src_mask */
542 0xffffffff, /* dst_mask */
543 TRUE), /* pcrel_offset */
544
545 /* .half: (S+A-P) */
a6bb11b2 546 HOWTO (AARCH64_R (PREL16), /* type */
a06ea964
NC
547 0, /* rightshift */
548 1, /* size (0 = byte, 1 = short, 2 = long) */
549 16, /* bitsize */
550 TRUE, /* pc_relative */
551 0, /* bitpos */
552 complain_overflow_signed, /* complain_on_overflow */
553 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 554 AARCH64_R_STR (PREL16), /* name */
a06ea964
NC
555 FALSE, /* partial_inplace */
556 0xffff, /* src_mask */
557 0xffff, /* dst_mask */
558 TRUE), /* pcrel_offset */
559
560 /* Group relocations to create a 16, 32, 48 or 64 bit
561 unsigned data or abs address inline. */
562
563 /* MOVZ: ((S+A) >> 0) & 0xffff */
a6bb11b2 564 HOWTO (AARCH64_R (MOVW_UABS_G0), /* type */
a06ea964
NC
565 0, /* rightshift */
566 2, /* size (0 = byte, 1 = short, 2 = long) */
567 16, /* bitsize */
568 FALSE, /* pc_relative */
569 0, /* bitpos */
570 complain_overflow_unsigned, /* complain_on_overflow */
571 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 572 AARCH64_R_STR (MOVW_UABS_G0), /* name */
a06ea964
NC
573 FALSE, /* partial_inplace */
574 0xffff, /* src_mask */
575 0xffff, /* dst_mask */
576 FALSE), /* pcrel_offset */
577
578 /* MOVK: ((S+A) >> 0) & 0xffff [no overflow check] */
a6bb11b2 579 HOWTO (AARCH64_R (MOVW_UABS_G0_NC), /* type */
a06ea964
NC
580 0, /* rightshift */
581 2, /* size (0 = byte, 1 = short, 2 = long) */
582 16, /* bitsize */
583 FALSE, /* pc_relative */
584 0, /* bitpos */
585 complain_overflow_dont, /* complain_on_overflow */
586 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 587 AARCH64_R_STR (MOVW_UABS_G0_NC), /* name */
a06ea964
NC
588 FALSE, /* partial_inplace */
589 0xffff, /* src_mask */
590 0xffff, /* dst_mask */
591 FALSE), /* pcrel_offset */
592
593 /* MOVZ: ((S+A) >> 16) & 0xffff */
a6bb11b2 594 HOWTO (AARCH64_R (MOVW_UABS_G1), /* type */
a06ea964
NC
595 16, /* rightshift */
596 2, /* size (0 = byte, 1 = short, 2 = long) */
597 16, /* bitsize */
598 FALSE, /* pc_relative */
599 0, /* bitpos */
600 complain_overflow_unsigned, /* complain_on_overflow */
601 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 602 AARCH64_R_STR (MOVW_UABS_G1), /* name */
a06ea964
NC
603 FALSE, /* partial_inplace */
604 0xffff, /* src_mask */
605 0xffff, /* dst_mask */
606 FALSE), /* pcrel_offset */
607
608 /* MOVK: ((S+A) >> 16) & 0xffff [no overflow check] */
a6bb11b2 609 HOWTO64 (AARCH64_R (MOVW_UABS_G1_NC), /* type */
a06ea964
NC
610 16, /* rightshift */
611 2, /* size (0 = byte, 1 = short, 2 = long) */
612 16, /* bitsize */
613 FALSE, /* pc_relative */
614 0, /* bitpos */
615 complain_overflow_dont, /* complain_on_overflow */
616 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 617 AARCH64_R_STR (MOVW_UABS_G1_NC), /* name */
a06ea964
NC
618 FALSE, /* partial_inplace */
619 0xffff, /* src_mask */
620 0xffff, /* dst_mask */
621 FALSE), /* pcrel_offset */
622
623 /* MOVZ: ((S+A) >> 32) & 0xffff */
a6bb11b2 624 HOWTO64 (AARCH64_R (MOVW_UABS_G2), /* type */
a06ea964
NC
625 32, /* rightshift */
626 2, /* size (0 = byte, 1 = short, 2 = long) */
627 16, /* bitsize */
628 FALSE, /* pc_relative */
629 0, /* bitpos */
630 complain_overflow_unsigned, /* complain_on_overflow */
631 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 632 AARCH64_R_STR (MOVW_UABS_G2), /* name */
a06ea964
NC
633 FALSE, /* partial_inplace */
634 0xffff, /* src_mask */
635 0xffff, /* dst_mask */
636 FALSE), /* pcrel_offset */
637
638 /* MOVK: ((S+A) >> 32) & 0xffff [no overflow check] */
a6bb11b2 639 HOWTO64 (AARCH64_R (MOVW_UABS_G2_NC), /* type */
a06ea964
NC
640 32, /* rightshift */
641 2, /* size (0 = byte, 1 = short, 2 = long) */
642 16, /* bitsize */
643 FALSE, /* pc_relative */
644 0, /* bitpos */
645 complain_overflow_dont, /* complain_on_overflow */
646 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 647 AARCH64_R_STR (MOVW_UABS_G2_NC), /* name */
a06ea964
NC
648 FALSE, /* partial_inplace */
649 0xffff, /* src_mask */
650 0xffff, /* dst_mask */
651 FALSE), /* pcrel_offset */
652
653 /* MOVZ: ((S+A) >> 48) & 0xffff */
a6bb11b2 654 HOWTO64 (AARCH64_R (MOVW_UABS_G3), /* type */
a06ea964
NC
655 48, /* rightshift */
656 2, /* size (0 = byte, 1 = short, 2 = long) */
657 16, /* bitsize */
658 FALSE, /* pc_relative */
659 0, /* bitpos */
660 complain_overflow_unsigned, /* complain_on_overflow */
661 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 662 AARCH64_R_STR (MOVW_UABS_G3), /* name */
a06ea964
NC
663 FALSE, /* partial_inplace */
664 0xffff, /* src_mask */
665 0xffff, /* dst_mask */
666 FALSE), /* pcrel_offset */
667
668 /* Group relocations to create high part of a 16, 32, 48 or 64 bit
669 signed data or abs address inline. Will change instruction
670 to MOVN or MOVZ depending on sign of calculated value. */
671
672 /* MOV[ZN]: ((S+A) >> 0) & 0xffff */
a6bb11b2 673 HOWTO (AARCH64_R (MOVW_SABS_G0), /* type */
a06ea964
NC
674 0, /* rightshift */
675 2, /* size (0 = byte, 1 = short, 2 = long) */
c5e3a364 676 17, /* bitsize */
a06ea964
NC
677 FALSE, /* pc_relative */
678 0, /* bitpos */
679 complain_overflow_signed, /* complain_on_overflow */
680 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 681 AARCH64_R_STR (MOVW_SABS_G0), /* name */
a06ea964
NC
682 FALSE, /* partial_inplace */
683 0xffff, /* src_mask */
684 0xffff, /* dst_mask */
685 FALSE), /* pcrel_offset */
686
687 /* MOV[ZN]: ((S+A) >> 16) & 0xffff */
a6bb11b2 688 HOWTO64 (AARCH64_R (MOVW_SABS_G1), /* type */
a06ea964
NC
689 16, /* rightshift */
690 2, /* size (0 = byte, 1 = short, 2 = long) */
c5e3a364 691 17, /* bitsize */
a06ea964
NC
692 FALSE, /* pc_relative */
693 0, /* bitpos */
694 complain_overflow_signed, /* complain_on_overflow */
695 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 696 AARCH64_R_STR (MOVW_SABS_G1), /* name */
a06ea964
NC
697 FALSE, /* partial_inplace */
698 0xffff, /* src_mask */
699 0xffff, /* dst_mask */
700 FALSE), /* pcrel_offset */
701
702 /* MOV[ZN]: ((S+A) >> 32) & 0xffff */
a6bb11b2 703 HOWTO64 (AARCH64_R (MOVW_SABS_G2), /* type */
a06ea964
NC
704 32, /* rightshift */
705 2, /* size (0 = byte, 1 = short, 2 = long) */
c5e3a364 706 17, /* bitsize */
a06ea964
NC
707 FALSE, /* pc_relative */
708 0, /* bitpos */
709 complain_overflow_signed, /* complain_on_overflow */
710 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 711 AARCH64_R_STR (MOVW_SABS_G2), /* name */
a06ea964
NC
712 FALSE, /* partial_inplace */
713 0xffff, /* src_mask */
714 0xffff, /* dst_mask */
715 FALSE), /* pcrel_offset */
716
32247401
RL
717 /* Group relocations to create a 16, 32, 48 or 64 bit
718 PC relative address inline. */
719
720 /* MOV[NZ]: ((S+A-P) >> 0) & 0xffff */
e30d1fa1 721 HOWTO (AARCH64_R (MOVW_PREL_G0), /* type */
32247401
RL
722 0, /* rightshift */
723 2, /* size (0 = byte, 1 = short, 2 = long) */
724 17, /* bitsize */
725 TRUE, /* pc_relative */
726 0, /* bitpos */
727 complain_overflow_signed, /* complain_on_overflow */
728 bfd_elf_generic_reloc, /* special_function */
729 AARCH64_R_STR (MOVW_PREL_G0), /* name */
730 FALSE, /* partial_inplace */
731 0xffff, /* src_mask */
732 0xffff, /* dst_mask */
733 TRUE), /* pcrel_offset */
734
735 /* MOVK: ((S+A-P) >> 0) & 0xffff [no overflow check] */
e30d1fa1 736 HOWTO (AARCH64_R (MOVW_PREL_G0_NC), /* type */
32247401
RL
737 0, /* rightshift */
738 2, /* size (0 = byte, 1 = short, 2 = long) */
739 16, /* bitsize */
740 TRUE, /* pc_relative */
741 0, /* bitpos */
742 complain_overflow_dont, /* complain_on_overflow */
743 bfd_elf_generic_reloc, /* special_function */
744 AARCH64_R_STR (MOVW_PREL_G0_NC), /* name */
745 FALSE, /* partial_inplace */
746 0xffff, /* src_mask */
747 0xffff, /* dst_mask */
748 TRUE), /* pcrel_offset */
749
750 /* MOV[NZ]: ((S+A-P) >> 16) & 0xffff */
e30d1fa1 751 HOWTO (AARCH64_R (MOVW_PREL_G1), /* type */
32247401
RL
752 16, /* rightshift */
753 2, /* size (0 = byte, 1 = short, 2 = long) */
754 17, /* bitsize */
755 TRUE, /* pc_relative */
756 0, /* bitpos */
757 complain_overflow_signed, /* complain_on_overflow */
758 bfd_elf_generic_reloc, /* special_function */
759 AARCH64_R_STR (MOVW_PREL_G1), /* name */
760 FALSE, /* partial_inplace */
761 0xffff, /* src_mask */
762 0xffff, /* dst_mask */
763 TRUE), /* pcrel_offset */
764
765 /* MOVK: ((S+A-P) >> 16) & 0xffff [no overflow check] */
766 HOWTO64 (AARCH64_R (MOVW_PREL_G1_NC), /* type */
767 16, /* rightshift */
768 2, /* size (0 = byte, 1 = short, 2 = long) */
769 16, /* bitsize */
770 TRUE, /* pc_relative */
771 0, /* bitpos */
772 complain_overflow_dont, /* complain_on_overflow */
773 bfd_elf_generic_reloc, /* special_function */
774 AARCH64_R_STR (MOVW_PREL_G1_NC), /* name */
775 FALSE, /* partial_inplace */
776 0xffff, /* src_mask */
777 0xffff, /* dst_mask */
778 TRUE), /* pcrel_offset */
779
780 /* MOV[NZ]: ((S+A-P) >> 32) & 0xffff */
781 HOWTO64 (AARCH64_R (MOVW_PREL_G2), /* type */
782 32, /* rightshift */
783 2, /* size (0 = byte, 1 = short, 2 = long) */
784 17, /* bitsize */
785 TRUE, /* pc_relative */
786 0, /* bitpos */
787 complain_overflow_signed, /* complain_on_overflow */
788 bfd_elf_generic_reloc, /* special_function */
789 AARCH64_R_STR (MOVW_PREL_G2), /* name */
790 FALSE, /* partial_inplace */
791 0xffff, /* src_mask */
792 0xffff, /* dst_mask */
793 TRUE), /* pcrel_offset */
794
795 /* MOVK: ((S+A-P) >> 32) & 0xffff [no overflow check] */
796 HOWTO64 (AARCH64_R (MOVW_PREL_G2_NC), /* type */
797 32, /* rightshift */
798 2, /* size (0 = byte, 1 = short, 2 = long) */
799 16, /* bitsize */
800 TRUE, /* pc_relative */
801 0, /* bitpos */
802 complain_overflow_dont, /* complain_on_overflow */
803 bfd_elf_generic_reloc, /* special_function */
804 AARCH64_R_STR (MOVW_PREL_G2_NC), /* name */
805 FALSE, /* partial_inplace */
806 0xffff, /* src_mask */
807 0xffff, /* dst_mask */
808 TRUE), /* pcrel_offset */
809
810 /* MOV[NZ]: ((S+A-P) >> 48) & 0xffff */
811 HOWTO64 (AARCH64_R (MOVW_PREL_G3), /* type */
812 48, /* rightshift */
813 2, /* size (0 = byte, 1 = short, 2 = long) */
814 16, /* bitsize */
815 TRUE, /* pc_relative */
816 0, /* bitpos */
817 complain_overflow_dont, /* complain_on_overflow */
818 bfd_elf_generic_reloc, /* special_function */
819 AARCH64_R_STR (MOVW_PREL_G3), /* name */
820 FALSE, /* partial_inplace */
821 0xffff, /* src_mask */
822 0xffff, /* dst_mask */
823 TRUE), /* pcrel_offset */
824
a06ea964
NC
825/* Relocations to generate 19, 21 and 33 bit PC-relative load/store
826 addresses: PG(x) is (x & ~0xfff). */
827
828 /* LD-lit: ((S+A-P) >> 2) & 0x7ffff */
a6bb11b2 829 HOWTO (AARCH64_R (LD_PREL_LO19), /* type */
a06ea964
NC
830 2, /* rightshift */
831 2, /* size (0 = byte, 1 = short, 2 = long) */
832 19, /* bitsize */
833 TRUE, /* pc_relative */
834 0, /* bitpos */
835 complain_overflow_signed, /* complain_on_overflow */
836 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 837 AARCH64_R_STR (LD_PREL_LO19), /* name */
a06ea964
NC
838 FALSE, /* partial_inplace */
839 0x7ffff, /* src_mask */
840 0x7ffff, /* dst_mask */
841 TRUE), /* pcrel_offset */
842
843 /* ADR: (S+A-P) & 0x1fffff */
a6bb11b2 844 HOWTO (AARCH64_R (ADR_PREL_LO21), /* type */
a06ea964
NC
845 0, /* rightshift */
846 2, /* size (0 = byte, 1 = short, 2 = long) */
847 21, /* bitsize */
848 TRUE, /* pc_relative */
849 0, /* bitpos */
850 complain_overflow_signed, /* complain_on_overflow */
851 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 852 AARCH64_R_STR (ADR_PREL_LO21), /* name */
a06ea964
NC
853 FALSE, /* partial_inplace */
854 0x1fffff, /* src_mask */
855 0x1fffff, /* dst_mask */
856 TRUE), /* pcrel_offset */
857
858 /* ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
a6bb11b2 859 HOWTO (AARCH64_R (ADR_PREL_PG_HI21), /* type */
a06ea964
NC
860 12, /* rightshift */
861 2, /* size (0 = byte, 1 = short, 2 = long) */
862 21, /* bitsize */
863 TRUE, /* pc_relative */
864 0, /* bitpos */
865 complain_overflow_signed, /* complain_on_overflow */
866 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 867 AARCH64_R_STR (ADR_PREL_PG_HI21), /* name */
a06ea964
NC
868 FALSE, /* partial_inplace */
869 0x1fffff, /* src_mask */
870 0x1fffff, /* dst_mask */
871 TRUE), /* pcrel_offset */
872
873 /* ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff [no overflow check] */
a6bb11b2 874 HOWTO64 (AARCH64_R (ADR_PREL_PG_HI21_NC), /* type */
a06ea964
NC
875 12, /* rightshift */
876 2, /* size (0 = byte, 1 = short, 2 = long) */
877 21, /* bitsize */
878 TRUE, /* pc_relative */
879 0, /* bitpos */
880 complain_overflow_dont, /* complain_on_overflow */
881 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 882 AARCH64_R_STR (ADR_PREL_PG_HI21_NC), /* name */
a06ea964
NC
883 FALSE, /* partial_inplace */
884 0x1fffff, /* src_mask */
885 0x1fffff, /* dst_mask */
886 TRUE), /* pcrel_offset */
887
888 /* ADD: (S+A) & 0xfff [no overflow check] */
a6bb11b2 889 HOWTO (AARCH64_R (ADD_ABS_LO12_NC), /* type */
a06ea964
NC
890 0, /* rightshift */
891 2, /* size (0 = byte, 1 = short, 2 = long) */
892 12, /* bitsize */
893 FALSE, /* pc_relative */
894 10, /* bitpos */
895 complain_overflow_dont, /* complain_on_overflow */
896 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 897 AARCH64_R_STR (ADD_ABS_LO12_NC), /* name */
a06ea964
NC
898 FALSE, /* partial_inplace */
899 0x3ffc00, /* src_mask */
900 0x3ffc00, /* dst_mask */
901 FALSE), /* pcrel_offset */
902
903 /* LD/ST8: (S+A) & 0xfff */
a6bb11b2 904 HOWTO (AARCH64_R (LDST8_ABS_LO12_NC), /* type */
a06ea964
NC
905 0, /* rightshift */
906 2, /* size (0 = byte, 1 = short, 2 = long) */
907 12, /* bitsize */
908 FALSE, /* pc_relative */
909 0, /* bitpos */
910 complain_overflow_dont, /* complain_on_overflow */
911 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 912 AARCH64_R_STR (LDST8_ABS_LO12_NC), /* name */
a06ea964
NC
913 FALSE, /* partial_inplace */
914 0xfff, /* src_mask */
915 0xfff, /* dst_mask */
916 FALSE), /* pcrel_offset */
917
918 /* Relocations for control-flow instructions. */
919
920 /* TBZ/NZ: ((S+A-P) >> 2) & 0x3fff */
a6bb11b2 921 HOWTO (AARCH64_R (TSTBR14), /* type */
a06ea964
NC
922 2, /* rightshift */
923 2, /* size (0 = byte, 1 = short, 2 = long) */
924 14, /* bitsize */
925 TRUE, /* pc_relative */
926 0, /* bitpos */
927 complain_overflow_signed, /* complain_on_overflow */
928 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 929 AARCH64_R_STR (TSTBR14), /* name */
a06ea964
NC
930 FALSE, /* partial_inplace */
931 0x3fff, /* src_mask */
932 0x3fff, /* dst_mask */
933 TRUE), /* pcrel_offset */
934
935 /* B.cond: ((S+A-P) >> 2) & 0x7ffff */
a6bb11b2 936 HOWTO (AARCH64_R (CONDBR19), /* type */
a06ea964
NC
937 2, /* rightshift */
938 2, /* size (0 = byte, 1 = short, 2 = long) */
939 19, /* bitsize */
940 TRUE, /* pc_relative */
941 0, /* bitpos */
942 complain_overflow_signed, /* complain_on_overflow */
943 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 944 AARCH64_R_STR (CONDBR19), /* name */
a06ea964
NC
945 FALSE, /* partial_inplace */
946 0x7ffff, /* src_mask */
947 0x7ffff, /* dst_mask */
948 TRUE), /* pcrel_offset */
949
a06ea964 950 /* B: ((S+A-P) >> 2) & 0x3ffffff */
a6bb11b2 951 HOWTO (AARCH64_R (JUMP26), /* type */
a06ea964
NC
952 2, /* rightshift */
953 2, /* size (0 = byte, 1 = short, 2 = long) */
954 26, /* bitsize */
955 TRUE, /* pc_relative */
956 0, /* bitpos */
957 complain_overflow_signed, /* complain_on_overflow */
958 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 959 AARCH64_R_STR (JUMP26), /* name */
a06ea964
NC
960 FALSE, /* partial_inplace */
961 0x3ffffff, /* src_mask */
962 0x3ffffff, /* dst_mask */
963 TRUE), /* pcrel_offset */
964
965 /* BL: ((S+A-P) >> 2) & 0x3ffffff */
a6bb11b2 966 HOWTO (AARCH64_R (CALL26), /* type */
a06ea964
NC
967 2, /* rightshift */
968 2, /* size (0 = byte, 1 = short, 2 = long) */
969 26, /* bitsize */
970 TRUE, /* pc_relative */
971 0, /* bitpos */
972 complain_overflow_signed, /* complain_on_overflow */
973 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 974 AARCH64_R_STR (CALL26), /* name */
a06ea964
NC
975 FALSE, /* partial_inplace */
976 0x3ffffff, /* src_mask */
977 0x3ffffff, /* dst_mask */
978 TRUE), /* pcrel_offset */
979
980 /* LD/ST16: (S+A) & 0xffe */
a6bb11b2 981 HOWTO (AARCH64_R (LDST16_ABS_LO12_NC), /* type */
a06ea964
NC
982 1, /* rightshift */
983 2, /* size (0 = byte, 1 = short, 2 = long) */
984 12, /* bitsize */
985 FALSE, /* pc_relative */
986 0, /* bitpos */
987 complain_overflow_dont, /* complain_on_overflow */
988 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 989 AARCH64_R_STR (LDST16_ABS_LO12_NC), /* name */
a06ea964
NC
990 FALSE, /* partial_inplace */
991 0xffe, /* src_mask */
992 0xffe, /* dst_mask */
993 FALSE), /* pcrel_offset */
994
995 /* LD/ST32: (S+A) & 0xffc */
a6bb11b2 996 HOWTO (AARCH64_R (LDST32_ABS_LO12_NC), /* type */
a06ea964
NC
997 2, /* rightshift */
998 2, /* size (0 = byte, 1 = short, 2 = long) */
999 12, /* bitsize */
1000 FALSE, /* pc_relative */
1001 0, /* bitpos */
1002 complain_overflow_dont, /* complain_on_overflow */
1003 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1004 AARCH64_R_STR (LDST32_ABS_LO12_NC), /* name */
a06ea964
NC
1005 FALSE, /* partial_inplace */
1006 0xffc, /* src_mask */
1007 0xffc, /* dst_mask */
1008 FALSE), /* pcrel_offset */
1009
1010 /* LD/ST64: (S+A) & 0xff8 */
a6bb11b2 1011 HOWTO (AARCH64_R (LDST64_ABS_LO12_NC), /* type */
a06ea964
NC
1012 3, /* rightshift */
1013 2, /* size (0 = byte, 1 = short, 2 = long) */
1014 12, /* bitsize */
1015 FALSE, /* pc_relative */
1016 0, /* bitpos */
1017 complain_overflow_dont, /* complain_on_overflow */
1018 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1019 AARCH64_R_STR (LDST64_ABS_LO12_NC), /* name */
a06ea964
NC
1020 FALSE, /* partial_inplace */
1021 0xff8, /* src_mask */
1022 0xff8, /* dst_mask */
1023 FALSE), /* pcrel_offset */
1024
a06ea964 1025 /* LD/ST128: (S+A) & 0xff0 */
a6bb11b2 1026 HOWTO (AARCH64_R (LDST128_ABS_LO12_NC), /* type */
a06ea964
NC
1027 4, /* rightshift */
1028 2, /* size (0 = byte, 1 = short, 2 = long) */
1029 12, /* bitsize */
1030 FALSE, /* pc_relative */
1031 0, /* bitpos */
1032 complain_overflow_dont, /* complain_on_overflow */
1033 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1034 AARCH64_R_STR (LDST128_ABS_LO12_NC), /* name */
a06ea964
NC
1035 FALSE, /* partial_inplace */
1036 0xff0, /* src_mask */
1037 0xff0, /* dst_mask */
1038 FALSE), /* pcrel_offset */
1039
f41aef5f
RE
1040 /* Set a load-literal immediate field to bits
1041 0x1FFFFC of G(S)-P */
a6bb11b2 1042 HOWTO (AARCH64_R (GOT_LD_PREL19), /* type */
f41aef5f
RE
1043 2, /* rightshift */
1044 2, /* size (0 = byte,1 = short,2 = long) */
1045 19, /* bitsize */
1046 TRUE, /* pc_relative */
1047 0, /* bitpos */
1048 complain_overflow_signed, /* complain_on_overflow */
1049 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1050 AARCH64_R_STR (GOT_LD_PREL19), /* name */
f41aef5f
RE
1051 FALSE, /* partial_inplace */
1052 0xffffe0, /* src_mask */
1053 0xffffe0, /* dst_mask */
1054 TRUE), /* pcrel_offset */
1055
a06ea964
NC
1056 /* Get to the page for the GOT entry for the symbol
1057 (G(S) - P) using an ADRP instruction. */
a6bb11b2 1058 HOWTO (AARCH64_R (ADR_GOT_PAGE), /* type */
a06ea964
NC
1059 12, /* rightshift */
1060 2, /* size (0 = byte, 1 = short, 2 = long) */
1061 21, /* bitsize */
1062 TRUE, /* pc_relative */
1063 0, /* bitpos */
1064 complain_overflow_dont, /* complain_on_overflow */
1065 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1066 AARCH64_R_STR (ADR_GOT_PAGE), /* name */
a06ea964
NC
1067 FALSE, /* partial_inplace */
1068 0x1fffff, /* src_mask */
1069 0x1fffff, /* dst_mask */
1070 TRUE), /* pcrel_offset */
1071
a6bb11b2
YZ
1072 /* LD64: GOT offset G(S) & 0xff8 */
1073 HOWTO64 (AARCH64_R (LD64_GOT_LO12_NC), /* type */
a06ea964
NC
1074 3, /* rightshift */
1075 2, /* size (0 = byte, 1 = short, 2 = long) */
1076 12, /* bitsize */
1077 FALSE, /* pc_relative */
1078 0, /* bitpos */
1079 complain_overflow_dont, /* complain_on_overflow */
1080 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1081 AARCH64_R_STR (LD64_GOT_LO12_NC), /* name */
a06ea964
NC
1082 FALSE, /* partial_inplace */
1083 0xff8, /* src_mask */
1084 0xff8, /* dst_mask */
a6bb11b2 1085 FALSE), /* pcrel_offset */
a06ea964 1086
a6bb11b2
YZ
1087 /* LD32: GOT offset G(S) & 0xffc */
1088 HOWTO32 (AARCH64_R (LD32_GOT_LO12_NC), /* type */
1089 2, /* rightshift */
1090 2, /* size (0 = byte, 1 = short, 2 = long) */
1091 12, /* bitsize */
1092 FALSE, /* pc_relative */
1093 0, /* bitpos */
1094 complain_overflow_dont, /* complain_on_overflow */
1095 bfd_elf_generic_reloc, /* special_function */
1096 AARCH64_R_STR (LD32_GOT_LO12_NC), /* name */
1097 FALSE, /* partial_inplace */
1098 0xffc, /* src_mask */
1099 0xffc, /* dst_mask */
1100 FALSE), /* pcrel_offset */
a06ea964 1101
ca632371
RL
1102 /* Lower 16 bits of GOT offset for the symbol. */
1103 HOWTO64 (AARCH64_R (MOVW_GOTOFF_G0_NC), /* type */
1104 0, /* rightshift */
1105 2, /* size (0 = byte, 1 = short, 2 = long) */
1106 16, /* bitsize */
1107 FALSE, /* pc_relative */
1108 0, /* bitpos */
1109 complain_overflow_dont, /* complain_on_overflow */
1110 bfd_elf_generic_reloc, /* special_function */
1111 AARCH64_R_STR (MOVW_GOTOFF_G0_NC), /* name */
1112 FALSE, /* partial_inplace */
1113 0xffff, /* src_mask */
1114 0xffff, /* dst_mask */
1115 FALSE), /* pcrel_offset */
1116
654248e7
RL
1117 /* Higher 16 bits of GOT offset for the symbol. */
1118 HOWTO64 (AARCH64_R (MOVW_GOTOFF_G1), /* type */
1119 16, /* rightshift */
1120 2, /* size (0 = byte, 1 = short, 2 = long) */
1121 16, /* bitsize */
1122 FALSE, /* pc_relative */
1123 0, /* bitpos */
1124 complain_overflow_unsigned, /* complain_on_overflow */
1125 bfd_elf_generic_reloc, /* special_function */
1126 AARCH64_R_STR (MOVW_GOTOFF_G1), /* name */
1127 FALSE, /* partial_inplace */
1128 0xffff, /* src_mask */
1129 0xffff, /* dst_mask */
1130 FALSE), /* pcrel_offset */
1131
87f5fbcc
RL
1132 /* LD64: GOT offset for the symbol. */
1133 HOWTO64 (AARCH64_R (LD64_GOTOFF_LO15), /* type */
1134 3, /* rightshift */
1135 2, /* size (0 = byte, 1 = short, 2 = long) */
1136 12, /* bitsize */
1137 FALSE, /* pc_relative */
1138 0, /* bitpos */
1139 complain_overflow_unsigned, /* complain_on_overflow */
1140 bfd_elf_generic_reloc, /* special_function */
1141 AARCH64_R_STR (LD64_GOTOFF_LO15), /* name */
1142 FALSE, /* partial_inplace */
1143 0x7ff8, /* src_mask */
1144 0x7ff8, /* dst_mask */
1145 FALSE), /* pcrel_offset */
1146
3d715ce4
JW
1147 /* LD32: GOT offset to the page address of GOT table.
1148 (G(S) - PAGE (_GLOBAL_OFFSET_TABLE_)) & 0x5ffc. */
1149 HOWTO32 (AARCH64_R (LD32_GOTPAGE_LO14), /* type */
1150 2, /* rightshift */
1151 2, /* size (0 = byte, 1 = short, 2 = long) */
1152 12, /* bitsize */
1153 FALSE, /* pc_relative */
1154 0, /* bitpos */
1155 complain_overflow_unsigned, /* complain_on_overflow */
1156 bfd_elf_generic_reloc, /* special_function */
1157 AARCH64_R_STR (LD32_GOTPAGE_LO14), /* name */
1158 FALSE, /* partial_inplace */
1159 0x5ffc, /* src_mask */
1160 0x5ffc, /* dst_mask */
1161 FALSE), /* pcrel_offset */
1162
a921b5bd
JW
1163 /* LD64: GOT offset to the page address of GOT table.
1164 (G(S) - PAGE (_GLOBAL_OFFSET_TABLE_)) & 0x7ff8. */
1165 HOWTO64 (AARCH64_R (LD64_GOTPAGE_LO15), /* type */
1166 3, /* rightshift */
1167 2, /* size (0 = byte, 1 = short, 2 = long) */
1168 12, /* bitsize */
1169 FALSE, /* pc_relative */
1170 0, /* bitpos */
1171 complain_overflow_unsigned, /* complain_on_overflow */
1172 bfd_elf_generic_reloc, /* special_function */
1173 AARCH64_R_STR (LD64_GOTPAGE_LO15), /* name */
1174 FALSE, /* partial_inplace */
1175 0x7ff8, /* src_mask */
1176 0x7ff8, /* dst_mask */
1177 FALSE), /* pcrel_offset */
1178
a06ea964
NC
1179 /* Get to the page for the GOT entry for the symbol
1180 (G(S) - P) using an ADRP instruction. */
a6bb11b2 1181 HOWTO (AARCH64_R (TLSGD_ADR_PAGE21), /* type */
a06ea964
NC
1182 12, /* rightshift */
1183 2, /* size (0 = byte, 1 = short, 2 = long) */
1184 21, /* bitsize */
1185 TRUE, /* pc_relative */
1186 0, /* bitpos */
1187 complain_overflow_dont, /* complain_on_overflow */
1188 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1189 AARCH64_R_STR (TLSGD_ADR_PAGE21), /* name */
a06ea964
NC
1190 FALSE, /* partial_inplace */
1191 0x1fffff, /* src_mask */
1192 0x1fffff, /* dst_mask */
1193 TRUE), /* pcrel_offset */
1194
3c12b054
MS
1195 HOWTO (AARCH64_R (TLSGD_ADR_PREL21), /* type */
1196 0, /* rightshift */
1197 2, /* size (0 = byte, 1 = short, 2 = long) */
1198 21, /* bitsize */
1199 TRUE, /* pc_relative */
1200 0, /* bitpos */
1201 complain_overflow_dont, /* complain_on_overflow */
1202 bfd_elf_generic_reloc, /* special_function */
1203 AARCH64_R_STR (TLSGD_ADR_PREL21), /* name */
1204 FALSE, /* partial_inplace */
1205 0x1fffff, /* src_mask */
1206 0x1fffff, /* dst_mask */
1207 TRUE), /* pcrel_offset */
1208
a06ea964 1209 /* ADD: GOT offset G(S) & 0xff8 [no overflow check] */
a6bb11b2 1210 HOWTO (AARCH64_R (TLSGD_ADD_LO12_NC), /* type */
a06ea964
NC
1211 0, /* rightshift */
1212 2, /* size (0 = byte, 1 = short, 2 = long) */
1213 12, /* bitsize */
1214 FALSE, /* pc_relative */
1215 0, /* bitpos */
1216 complain_overflow_dont, /* complain_on_overflow */
1217 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1218 AARCH64_R_STR (TLSGD_ADD_LO12_NC), /* name */
a06ea964
NC
1219 FALSE, /* partial_inplace */
1220 0xfff, /* src_mask */
1221 0xfff, /* dst_mask */
1222 FALSE), /* pcrel_offset */
1223
3e8286c0
RL
1224 /* Lower 16 bits of GOT offset to tls_index. */
1225 HOWTO64 (AARCH64_R (TLSGD_MOVW_G0_NC), /* type */
1226 0, /* rightshift */
1227 2, /* size (0 = byte, 1 = short, 2 = long) */
1228 16, /* bitsize */
1229 FALSE, /* pc_relative */
1230 0, /* bitpos */
1231 complain_overflow_dont, /* complain_on_overflow */
1232 bfd_elf_generic_reloc, /* special_function */
1233 AARCH64_R_STR (TLSGD_MOVW_G0_NC), /* name */
1234 FALSE, /* partial_inplace */
1235 0xffff, /* src_mask */
1236 0xffff, /* dst_mask */
1237 FALSE), /* pcrel_offset */
1238
1aa66fb1
RL
1239 /* Higher 16 bits of GOT offset to tls_index. */
1240 HOWTO64 (AARCH64_R (TLSGD_MOVW_G1), /* type */
1241 16, /* rightshift */
1242 2, /* size (0 = byte, 1 = short, 2 = long) */
1243 16, /* bitsize */
1244 FALSE, /* pc_relative */
1245 0, /* bitpos */
1246 complain_overflow_unsigned, /* complain_on_overflow */
1247 bfd_elf_generic_reloc, /* special_function */
1248 AARCH64_R_STR (TLSGD_MOVW_G1), /* name */
1249 FALSE, /* partial_inplace */
1250 0xffff, /* src_mask */
1251 0xffff, /* dst_mask */
1252 FALSE), /* pcrel_offset */
1253
a6bb11b2 1254 HOWTO (AARCH64_R (TLSIE_ADR_GOTTPREL_PAGE21), /* type */
a06ea964
NC
1255 12, /* rightshift */
1256 2, /* size (0 = byte, 1 = short, 2 = long) */
1257 21, /* bitsize */
1258 FALSE, /* pc_relative */
1259 0, /* bitpos */
1260 complain_overflow_dont, /* complain_on_overflow */
1261 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1262 AARCH64_R_STR (TLSIE_ADR_GOTTPREL_PAGE21), /* name */
a06ea964
NC
1263 FALSE, /* partial_inplace */
1264 0x1fffff, /* src_mask */
1265 0x1fffff, /* dst_mask */
1266 FALSE), /* pcrel_offset */
1267
a6bb11b2 1268 HOWTO64 (AARCH64_R (TLSIE_LD64_GOTTPREL_LO12_NC), /* type */
a06ea964
NC
1269 3, /* rightshift */
1270 2, /* size (0 = byte, 1 = short, 2 = long) */
1271 12, /* bitsize */
1272 FALSE, /* pc_relative */
1273 0, /* bitpos */
1274 complain_overflow_dont, /* complain_on_overflow */
1275 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1276 AARCH64_R_STR (TLSIE_LD64_GOTTPREL_LO12_NC), /* name */
a06ea964
NC
1277 FALSE, /* partial_inplace */
1278 0xff8, /* src_mask */
1279 0xff8, /* dst_mask */
1280 FALSE), /* pcrel_offset */
1281
a6bb11b2
YZ
1282 HOWTO32 (AARCH64_R (TLSIE_LD32_GOTTPREL_LO12_NC), /* type */
1283 2, /* rightshift */
1284 2, /* size (0 = byte, 1 = short, 2 = long) */
1285 12, /* bitsize */
1286 FALSE, /* pc_relative */
1287 0, /* bitpos */
1288 complain_overflow_dont, /* complain_on_overflow */
1289 bfd_elf_generic_reloc, /* special_function */
1290 AARCH64_R_STR (TLSIE_LD32_GOTTPREL_LO12_NC), /* name */
1291 FALSE, /* partial_inplace */
1292 0xffc, /* src_mask */
1293 0xffc, /* dst_mask */
1294 FALSE), /* pcrel_offset */
1295
1296 HOWTO (AARCH64_R (TLSIE_LD_GOTTPREL_PREL19), /* type */
bb3f9ed8 1297 2, /* rightshift */
a06ea964 1298 2, /* size (0 = byte, 1 = short, 2 = long) */
043bf05a 1299 19, /* bitsize */
a06ea964
NC
1300 FALSE, /* pc_relative */
1301 0, /* bitpos */
1302 complain_overflow_dont, /* complain_on_overflow */
1303 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1304 AARCH64_R_STR (TLSIE_LD_GOTTPREL_PREL19), /* name */
a06ea964
NC
1305 FALSE, /* partial_inplace */
1306 0x1ffffc, /* src_mask */
1307 0x1ffffc, /* dst_mask */
1308 FALSE), /* pcrel_offset */
1309
3b957e5b
RL
1310 HOWTO64 (AARCH64_R (TLSIE_MOVW_GOTTPREL_G0_NC), /* type */
1311 0, /* rightshift */
1312 2, /* size (0 = byte, 1 = short, 2 = long) */
1313 16, /* bitsize */
1314 FALSE, /* pc_relative */
1315 0, /* bitpos */
1316 complain_overflow_dont, /* complain_on_overflow */
1317 bfd_elf_generic_reloc, /* special_function */
1318 AARCH64_R_STR (TLSIE_MOVW_GOTTPREL_G0_NC), /* name */
1319 FALSE, /* partial_inplace */
1320 0xffff, /* src_mask */
1321 0xffff, /* dst_mask */
1322 FALSE), /* pcrel_offset */
1323
1324 HOWTO64 (AARCH64_R (TLSIE_MOVW_GOTTPREL_G1), /* type */
1325 16, /* rightshift */
1326 2, /* size (0 = byte, 1 = short, 2 = long) */
1327 16, /* bitsize */
1328 FALSE, /* pc_relative */
1329 0, /* bitpos */
1330 complain_overflow_unsigned, /* complain_on_overflow */
1331 bfd_elf_generic_reloc, /* special_function */
1332 AARCH64_R_STR (TLSIE_MOVW_GOTTPREL_G1), /* name */
1333 FALSE, /* partial_inplace */
1334 0xffff, /* src_mask */
1335 0xffff, /* dst_mask */
1336 FALSE), /* pcrel_offset */
1337
49df5539
JW
1338 /* ADD: bit[23:12] of byte offset to module TLS base address. */
1339 HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_HI12), /* type */
1340 12, /* rightshift */
1341 2, /* size (0 = byte, 1 = short, 2 = long) */
1342 12, /* bitsize */
1343 FALSE, /* pc_relative */
1344 0, /* bitpos */
1345 complain_overflow_unsigned, /* complain_on_overflow */
1346 bfd_elf_generic_reloc, /* special_function */
1347 AARCH64_R_STR (TLSLD_ADD_DTPREL_HI12), /* name */
1348 FALSE, /* partial_inplace */
1349 0xfff, /* src_mask */
1350 0xfff, /* dst_mask */
1351 FALSE), /* pcrel_offset */
1352
70151fb5
JW
1353 /* Unsigned 12 bit byte offset to module TLS base address. */
1354 HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_LO12), /* type */
1355 0, /* rightshift */
1356 2, /* size (0 = byte, 1 = short, 2 = long) */
1357 12, /* bitsize */
1358 FALSE, /* pc_relative */
1359 0, /* bitpos */
1360 complain_overflow_unsigned, /* complain_on_overflow */
1361 bfd_elf_generic_reloc, /* special_function */
1362 AARCH64_R_STR (TLSLD_ADD_DTPREL_LO12), /* name */
1363 FALSE, /* partial_inplace */
1364 0xfff, /* src_mask */
1365 0xfff, /* dst_mask */
1366 FALSE), /* pcrel_offset */
13289c10
JW
1367
1368 /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12. */
1369 HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_LO12_NC), /* type */
1370 0, /* rightshift */
1371 2, /* size (0 = byte, 1 = short, 2 = long) */
1372 12, /* bitsize */
1373 FALSE, /* pc_relative */
1374 0, /* bitpos */
1375 complain_overflow_dont, /* complain_on_overflow */
1376 bfd_elf_generic_reloc, /* special_function */
1377 AARCH64_R_STR (TLSLD_ADD_DTPREL_LO12_NC), /* name */
1378 FALSE, /* partial_inplace */
1379 0xfff, /* src_mask */
1380 0xfff, /* dst_mask */
1381 FALSE), /* pcrel_offset */
70151fb5 1382
a12fad50
JW
1383 /* ADD: GOT offset G(S) & 0xff8 [no overflow check] */
1384 HOWTO (AARCH64_R (TLSLD_ADD_LO12_NC), /* type */
1385 0, /* rightshift */
1386 2, /* size (0 = byte, 1 = short, 2 = long) */
1387 12, /* bitsize */
1388 FALSE, /* pc_relative */
1389 0, /* bitpos */
1390 complain_overflow_dont, /* complain_on_overflow */
1391 bfd_elf_generic_reloc, /* special_function */
1392 AARCH64_R_STR (TLSLD_ADD_LO12_NC), /* name */
1393 FALSE, /* partial_inplace */
1394 0xfff, /* src_mask */
1395 0xfff, /* dst_mask */
1396 FALSE), /* pcrel_offset */
1397
1107e076
JW
1398 /* Get to the page for the GOT entry for the symbol
1399 (G(S) - P) using an ADRP instruction. */
1400 HOWTO (AARCH64_R (TLSLD_ADR_PAGE21), /* type */
1401 12, /* rightshift */
1402 2, /* size (0 = byte, 1 = short, 2 = long) */
1403 21, /* bitsize */
1404 TRUE, /* pc_relative */
1405 0, /* bitpos */
1406 complain_overflow_signed, /* complain_on_overflow */
1407 bfd_elf_generic_reloc, /* special_function */
1408 AARCH64_R_STR (TLSLD_ADR_PAGE21), /* name */
1409 FALSE, /* partial_inplace */
1410 0x1fffff, /* src_mask */
1411 0x1fffff, /* dst_mask */
1412 TRUE), /* pcrel_offset */
1413
6c37fedc
JW
1414 HOWTO (AARCH64_R (TLSLD_ADR_PREL21), /* type */
1415 0, /* rightshift */
1416 2, /* size (0 = byte, 1 = short, 2 = long) */
1417 21, /* bitsize */
1418 TRUE, /* pc_relative */
1419 0, /* bitpos */
1420 complain_overflow_signed, /* complain_on_overflow */
1421 bfd_elf_generic_reloc, /* special_function */
1422 AARCH64_R_STR (TLSLD_ADR_PREL21), /* name */
1423 FALSE, /* partial_inplace */
1424 0x1fffff, /* src_mask */
1425 0x1fffff, /* dst_mask */
1426 TRUE), /* pcrel_offset */
1427
4c562523
JW
1428 /* LD/ST16: bit[11:1] of byte offset to module TLS base address. */
1429 HOWTO64 (AARCH64_R (TLSLD_LDST16_DTPREL_LO12), /* type */
1430 1, /* rightshift */
1431 2, /* size (0 = byte, 1 = short, 2 = long) */
1432 11, /* bitsize */
1433 FALSE, /* pc_relative */
1434 10, /* bitpos */
1435 complain_overflow_unsigned, /* complain_on_overflow */
1436 bfd_elf_generic_reloc, /* special_function */
1437 AARCH64_R_STR (TLSLD_LDST16_DTPREL_LO12), /* name */
1438 FALSE, /* partial_inplace */
1439 0x1ffc00, /* src_mask */
1440 0x1ffc00, /* dst_mask */
1441 FALSE), /* pcrel_offset */
1442
1443 /* Same as BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12, but no overflow check. */
1444 HOWTO64 (AARCH64_R (TLSLD_LDST16_DTPREL_LO12_NC), /* type */
1445 1, /* rightshift */
1446 2, /* size (0 = byte, 1 = short, 2 = long) */
1447 11, /* bitsize */
1448 FALSE, /* pc_relative */
1449 10, /* bitpos */
1450 complain_overflow_dont, /* complain_on_overflow */
1451 bfd_elf_generic_reloc, /* special_function */
1452 AARCH64_R_STR (TLSLD_LDST16_DTPREL_LO12_NC), /* name */
1453 FALSE, /* partial_inplace */
1454 0x1ffc00, /* src_mask */
1455 0x1ffc00, /* dst_mask */
1456 FALSE), /* pcrel_offset */
1457
1458 /* LD/ST32: bit[11:2] of byte offset to module TLS base address. */
1459 HOWTO64 (AARCH64_R (TLSLD_LDST32_DTPREL_LO12), /* type */
1460 2, /* rightshift */
1461 2, /* size (0 = byte, 1 = short, 2 = long) */
1462 10, /* bitsize */
1463 FALSE, /* pc_relative */
1464 10, /* bitpos */
1465 complain_overflow_unsigned, /* complain_on_overflow */
1466 bfd_elf_generic_reloc, /* special_function */
1467 AARCH64_R_STR (TLSLD_LDST32_DTPREL_LO12), /* name */
1468 FALSE, /* partial_inplace */
1469 0x3ffc00, /* src_mask */
1470 0x3ffc00, /* dst_mask */
1471 FALSE), /* pcrel_offset */
1472
1473 /* Same as BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12, but no overflow check. */
1474 HOWTO64 (AARCH64_R (TLSLD_LDST32_DTPREL_LO12_NC), /* type */
1475 2, /* rightshift */
1476 2, /* size (0 = byte, 1 = short, 2 = long) */
1477 10, /* bitsize */
1478 FALSE, /* pc_relative */
1479 10, /* bitpos */
1480 complain_overflow_dont, /* complain_on_overflow */
1481 bfd_elf_generic_reloc, /* special_function */
1482 AARCH64_R_STR (TLSLD_LDST32_DTPREL_LO12_NC), /* name */
1483 FALSE, /* partial_inplace */
1484 0xffc00, /* src_mask */
1485 0xffc00, /* dst_mask */
1486 FALSE), /* pcrel_offset */
1487
1488 /* LD/ST64: bit[11:3] of byte offset to module TLS base address. */
1489 HOWTO64 (AARCH64_R (TLSLD_LDST64_DTPREL_LO12), /* type */
1490 3, /* rightshift */
1491 2, /* size (0 = byte, 1 = short, 2 = long) */
1492 9, /* bitsize */
1493 FALSE, /* pc_relative */
1494 10, /* bitpos */
1495 complain_overflow_unsigned, /* complain_on_overflow */
1496 bfd_elf_generic_reloc, /* special_function */
1497 AARCH64_R_STR (TLSLD_LDST64_DTPREL_LO12), /* name */
1498 FALSE, /* partial_inplace */
1499 0x3ffc00, /* src_mask */
1500 0x3ffc00, /* dst_mask */
1501 FALSE), /* pcrel_offset */
1502
1503 /* Same as BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12, but no overflow check. */
1504 HOWTO64 (AARCH64_R (TLSLD_LDST64_DTPREL_LO12_NC), /* type */
1505 3, /* rightshift */
1506 2, /* size (0 = byte, 1 = short, 2 = long) */
1507 9, /* bitsize */
1508 FALSE, /* pc_relative */
1509 10, /* bitpos */
1510 complain_overflow_dont, /* complain_on_overflow */
1511 bfd_elf_generic_reloc, /* special_function */
1512 AARCH64_R_STR (TLSLD_LDST64_DTPREL_LO12_NC), /* name */
1513 FALSE, /* partial_inplace */
1514 0x7fc00, /* src_mask */
1515 0x7fc00, /* dst_mask */
1516 FALSE), /* pcrel_offset */
1517
1518 /* LD/ST8: bit[11:0] of byte offset to module TLS base address. */
1519 HOWTO64 (AARCH64_R (TLSLD_LDST8_DTPREL_LO12), /* type */
1520 0, /* rightshift */
1521 2, /* size (0 = byte, 1 = short, 2 = long) */
1522 12, /* bitsize */
1523 FALSE, /* pc_relative */
1524 10, /* bitpos */
1525 complain_overflow_unsigned, /* complain_on_overflow */
1526 bfd_elf_generic_reloc, /* special_function */
1527 AARCH64_R_STR (TLSLD_LDST8_DTPREL_LO12), /* name */
1528 FALSE, /* partial_inplace */
1529 0x3ffc00, /* src_mask */
1530 0x3ffc00, /* dst_mask */
1531 FALSE), /* pcrel_offset */
1532
1533 /* Same as BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12, but no overflow check. */
1534 HOWTO64 (AARCH64_R (TLSLD_LDST8_DTPREL_LO12_NC), /* type */
1535 0, /* rightshift */
1536 2, /* size (0 = byte, 1 = short, 2 = long) */
1537 12, /* bitsize */
1538 FALSE, /* pc_relative */
1539 10, /* bitpos */
1540 complain_overflow_dont, /* complain_on_overflow */
1541 bfd_elf_generic_reloc, /* special_function */
1542 AARCH64_R_STR (TLSLD_LDST8_DTPREL_LO12_NC), /* name */
1543 FALSE, /* partial_inplace */
1544 0x3ffc00, /* src_mask */
1545 0x3ffc00, /* dst_mask */
1546 FALSE), /* pcrel_offset */
1547
49df5539
JW
1548 /* MOVZ: bit[15:0] of byte offset to module TLS base address. */
1549 HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G0), /* type */
1550 0, /* rightshift */
1551 2, /* size (0 = byte, 1 = short, 2 = long) */
1552 16, /* bitsize */
1553 FALSE, /* pc_relative */
1554 0, /* bitpos */
1555 complain_overflow_unsigned, /* complain_on_overflow */
1556 bfd_elf_generic_reloc, /* special_function */
1557 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G0), /* name */
1558 FALSE, /* partial_inplace */
1559 0xffff, /* src_mask */
1560 0xffff, /* dst_mask */
1561 FALSE), /* pcrel_offset */
1562
1563 /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0. */
1564 HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G0_NC), /* type */
1565 0, /* rightshift */
1566 2, /* size (0 = byte, 1 = short, 2 = long) */
1567 16, /* bitsize */
1568 FALSE, /* pc_relative */
1569 0, /* bitpos */
1570 complain_overflow_dont, /* complain_on_overflow */
1571 bfd_elf_generic_reloc, /* special_function */
1572 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G0_NC), /* name */
1573 FALSE, /* partial_inplace */
1574 0xffff, /* src_mask */
1575 0xffff, /* dst_mask */
1576 FALSE), /* pcrel_offset */
1577
1578 /* MOVZ: bit[31:16] of byte offset to module TLS base address. */
1579 HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G1), /* type */
1580 16, /* rightshift */
1581 2, /* size (0 = byte, 1 = short, 2 = long) */
1582 16, /* bitsize */
1583 FALSE, /* pc_relative */
1584 0, /* bitpos */
1585 complain_overflow_unsigned, /* complain_on_overflow */
1586 bfd_elf_generic_reloc, /* special_function */
1587 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G1), /* name */
1588 FALSE, /* partial_inplace */
1589 0xffff, /* src_mask */
1590 0xffff, /* dst_mask */
1591 FALSE), /* pcrel_offset */
1592
1593 /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1. */
1594 HOWTO64 (AARCH64_R (TLSLD_MOVW_DTPREL_G1_NC), /* type */
1595 16, /* rightshift */
1596 2, /* size (0 = byte, 1 = short, 2 = long) */
1597 16, /* bitsize */
1598 FALSE, /* pc_relative */
1599 0, /* bitpos */
1600 complain_overflow_dont, /* complain_on_overflow */
1601 bfd_elf_generic_reloc, /* special_function */
1602 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G1_NC), /* name */
1603 FALSE, /* partial_inplace */
1604 0xffff, /* src_mask */
1605 0xffff, /* dst_mask */
1606 FALSE), /* pcrel_offset */
1607
1608 /* MOVZ: bit[47:32] of byte offset to module TLS base address. */
1609 HOWTO64 (AARCH64_R (TLSLD_MOVW_DTPREL_G2), /* type */
1610 32, /* rightshift */
1611 2, /* size (0 = byte, 1 = short, 2 = long) */
1612 16, /* bitsize */
1613 FALSE, /* pc_relative */
1614 0, /* bitpos */
1615 complain_overflow_unsigned, /* complain_on_overflow */
1616 bfd_elf_generic_reloc, /* special_function */
1617 AARCH64_R_STR (TLSLD_MOVW_DTPREL_G2), /* name */
1618 FALSE, /* partial_inplace */
1619 0xffff, /* src_mask */
1620 0xffff, /* dst_mask */
1621 FALSE), /* pcrel_offset */
1622
a6bb11b2 1623 HOWTO64 (AARCH64_R (TLSLE_MOVW_TPREL_G2), /* type */
bb3f9ed8 1624 32, /* rightshift */
a06ea964 1625 2, /* size (0 = byte, 1 = short, 2 = long) */
07875fbc 1626 16, /* bitsize */
a06ea964
NC
1627 FALSE, /* pc_relative */
1628 0, /* bitpos */
0172429c 1629 complain_overflow_unsigned, /* complain_on_overflow */
a06ea964 1630 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1631 AARCH64_R_STR (TLSLE_MOVW_TPREL_G2), /* name */
a06ea964
NC
1632 FALSE, /* partial_inplace */
1633 0xffff, /* src_mask */
1634 0xffff, /* dst_mask */
1635 FALSE), /* pcrel_offset */
1636
a6bb11b2 1637 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G1), /* type */
bb3f9ed8 1638 16, /* rightshift */
a06ea964 1639 2, /* size (0 = byte, 1 = short, 2 = long) */
07875fbc 1640 16, /* bitsize */
a06ea964
NC
1641 FALSE, /* pc_relative */
1642 0, /* bitpos */
1643 complain_overflow_dont, /* complain_on_overflow */
1644 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1645 AARCH64_R_STR (TLSLE_MOVW_TPREL_G1), /* name */
a06ea964
NC
1646 FALSE, /* partial_inplace */
1647 0xffff, /* src_mask */
1648 0xffff, /* dst_mask */
1649 FALSE), /* pcrel_offset */
1650
a6bb11b2 1651 HOWTO64 (AARCH64_R (TLSLE_MOVW_TPREL_G1_NC), /* type */
bb3f9ed8 1652 16, /* rightshift */
a06ea964 1653 2, /* size (0 = byte, 1 = short, 2 = long) */
07875fbc 1654 16, /* bitsize */
a06ea964
NC
1655 FALSE, /* pc_relative */
1656 0, /* bitpos */
1657 complain_overflow_dont, /* complain_on_overflow */
1658 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1659 AARCH64_R_STR (TLSLE_MOVW_TPREL_G1_NC), /* name */
a06ea964
NC
1660 FALSE, /* partial_inplace */
1661 0xffff, /* src_mask */
1662 0xffff, /* dst_mask */
1663 FALSE), /* pcrel_offset */
1664
a6bb11b2 1665 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G0), /* type */
a06ea964
NC
1666 0, /* rightshift */
1667 2, /* size (0 = byte, 1 = short, 2 = long) */
07875fbc 1668 16, /* bitsize */
a06ea964
NC
1669 FALSE, /* pc_relative */
1670 0, /* bitpos */
1671 complain_overflow_dont, /* complain_on_overflow */
1672 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1673 AARCH64_R_STR (TLSLE_MOVW_TPREL_G0), /* name */
a06ea964
NC
1674 FALSE, /* partial_inplace */
1675 0xffff, /* src_mask */
1676 0xffff, /* dst_mask */
1677 FALSE), /* pcrel_offset */
1678
a6bb11b2 1679 HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G0_NC), /* type */
a06ea964
NC
1680 0, /* rightshift */
1681 2, /* size (0 = byte, 1 = short, 2 = long) */
07875fbc 1682 16, /* bitsize */
a06ea964
NC
1683 FALSE, /* pc_relative */
1684 0, /* bitpos */
1685 complain_overflow_dont, /* complain_on_overflow */
1686 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1687 AARCH64_R_STR (TLSLE_MOVW_TPREL_G0_NC), /* name */
a06ea964
NC
1688 FALSE, /* partial_inplace */
1689 0xffff, /* src_mask */
1690 0xffff, /* dst_mask */
1691 FALSE), /* pcrel_offset */
1692
a6bb11b2 1693 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_HI12), /* type */
bb3f9ed8 1694 12, /* rightshift */
a06ea964
NC
1695 2, /* size (0 = byte, 1 = short, 2 = long) */
1696 12, /* bitsize */
1697 FALSE, /* pc_relative */
1698 0, /* bitpos */
bab91cce 1699 complain_overflow_unsigned, /* complain_on_overflow */
a06ea964 1700 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1701 AARCH64_R_STR (TLSLE_ADD_TPREL_HI12), /* name */
a06ea964
NC
1702 FALSE, /* partial_inplace */
1703 0xfff, /* src_mask */
1704 0xfff, /* dst_mask */
1705 FALSE), /* pcrel_offset */
1706
a6bb11b2 1707 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_LO12), /* type */
a06ea964
NC
1708 0, /* rightshift */
1709 2, /* size (0 = byte, 1 = short, 2 = long) */
1710 12, /* bitsize */
1711 FALSE, /* pc_relative */
1712 0, /* bitpos */
36e6c140 1713 complain_overflow_unsigned, /* complain_on_overflow */
a06ea964 1714 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1715 AARCH64_R_STR (TLSLE_ADD_TPREL_LO12), /* name */
a06ea964
NC
1716 FALSE, /* partial_inplace */
1717 0xfff, /* src_mask */
1718 0xfff, /* dst_mask */
1719 FALSE), /* pcrel_offset */
1720
a6bb11b2 1721 HOWTO (AARCH64_R (TLSLE_ADD_TPREL_LO12_NC), /* type */
a06ea964
NC
1722 0, /* rightshift */
1723 2, /* size (0 = byte, 1 = short, 2 = long) */
1724 12, /* bitsize */
1725 FALSE, /* pc_relative */
1726 0, /* bitpos */
1727 complain_overflow_dont, /* complain_on_overflow */
1728 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1729 AARCH64_R_STR (TLSLE_ADD_TPREL_LO12_NC), /* name */
a06ea964
NC
1730 FALSE, /* partial_inplace */
1731 0xfff, /* src_mask */
1732 0xfff, /* dst_mask */
1733 FALSE), /* pcrel_offset */
a06ea964 1734
84f1b9fb
RL
1735 /* LD/ST16: bit[11:1] of byte offset to module TLS base address. */
1736 HOWTO (AARCH64_R (TLSLE_LDST16_TPREL_LO12), /* type */
1737 1, /* rightshift */
1738 2, /* size (0 = byte, 1 = short, 2 = long) */
1739 11, /* bitsize */
1740 FALSE, /* pc_relative */
1741 10, /* bitpos */
1742 complain_overflow_unsigned, /* complain_on_overflow */
1743 bfd_elf_generic_reloc, /* special_function */
1744 AARCH64_R_STR (TLSLE_LDST16_TPREL_LO12), /* name */
1745 FALSE, /* partial_inplace */
1746 0x1ffc00, /* src_mask */
1747 0x1ffc00, /* dst_mask */
1748 FALSE), /* pcrel_offset */
1749
1750 /* Same as BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12, but no overflow check. */
1751 HOWTO (AARCH64_R (TLSLE_LDST16_TPREL_LO12_NC), /* type */
1752 1, /* rightshift */
1753 2, /* size (0 = byte, 1 = short, 2 = long) */
1754 11, /* bitsize */
1755 FALSE, /* pc_relative */
1756 10, /* bitpos */
1757 complain_overflow_dont, /* complain_on_overflow */
1758 bfd_elf_generic_reloc, /* special_function */
1759 AARCH64_R_STR (TLSLE_LDST16_TPREL_LO12_NC), /* name */
1760 FALSE, /* partial_inplace */
1761 0x1ffc00, /* src_mask */
1762 0x1ffc00, /* dst_mask */
1763 FALSE), /* pcrel_offset */
1764
1765 /* LD/ST32: bit[11:2] of byte offset to module TLS base address. */
1766 HOWTO (AARCH64_R (TLSLE_LDST32_TPREL_LO12), /* type */
1767 2, /* rightshift */
1768 2, /* size (0 = byte, 1 = short, 2 = long) */
1769 10, /* bitsize */
1770 FALSE, /* pc_relative */
1771 10, /* bitpos */
1772 complain_overflow_unsigned, /* complain_on_overflow */
1773 bfd_elf_generic_reloc, /* special_function */
1774 AARCH64_R_STR (TLSLE_LDST32_TPREL_LO12), /* name */
1775 FALSE, /* partial_inplace */
1776 0xffc00, /* src_mask */
1777 0xffc00, /* dst_mask */
1778 FALSE), /* pcrel_offset */
1779
1780 /* Same as BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12, but no overflow check. */
1781 HOWTO (AARCH64_R (TLSLE_LDST32_TPREL_LO12_NC), /* type */
1782 2, /* rightshift */
1783 2, /* size (0 = byte, 1 = short, 2 = long) */
1784 10, /* bitsize */
1785 FALSE, /* pc_relative */
1786 10, /* bitpos */
1787 complain_overflow_dont, /* complain_on_overflow */
1788 bfd_elf_generic_reloc, /* special_function */
1789 AARCH64_R_STR (TLSLE_LDST32_TPREL_LO12_NC), /* name */
1790 FALSE, /* partial_inplace */
1791 0xffc00, /* src_mask */
1792 0xffc00, /* dst_mask */
1793 FALSE), /* pcrel_offset */
1794
1795 /* LD/ST64: bit[11:3] of byte offset to module TLS base address. */
1796 HOWTO (AARCH64_R (TLSLE_LDST64_TPREL_LO12), /* type */
1797 3, /* rightshift */
1798 2, /* size (0 = byte, 1 = short, 2 = long) */
1799 9, /* bitsize */
1800 FALSE, /* pc_relative */
1801 10, /* bitpos */
1802 complain_overflow_unsigned, /* complain_on_overflow */
1803 bfd_elf_generic_reloc, /* special_function */
1804 AARCH64_R_STR (TLSLE_LDST64_TPREL_LO12), /* name */
1805 FALSE, /* partial_inplace */
1806 0x7fc00, /* src_mask */
1807 0x7fc00, /* dst_mask */
1808 FALSE), /* pcrel_offset */
1809
1810 /* Same as BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12, but no overflow check. */
1811 HOWTO (AARCH64_R (TLSLE_LDST64_TPREL_LO12_NC), /* type */
1812 3, /* rightshift */
1813 2, /* size (0 = byte, 1 = short, 2 = long) */
1814 9, /* bitsize */
1815 FALSE, /* pc_relative */
1816 10, /* bitpos */
1817 complain_overflow_dont, /* complain_on_overflow */
1818 bfd_elf_generic_reloc, /* special_function */
1819 AARCH64_R_STR (TLSLE_LDST64_TPREL_LO12_NC), /* name */
1820 FALSE, /* partial_inplace */
1821 0x7fc00, /* src_mask */
1822 0x7fc00, /* dst_mask */
1823 FALSE), /* pcrel_offset */
1824
1825 /* LD/ST8: bit[11:0] of byte offset to module TLS base address. */
1826 HOWTO (AARCH64_R (TLSLE_LDST8_TPREL_LO12), /* type */
1827 0, /* rightshift */
1828 2, /* size (0 = byte, 1 = short, 2 = long) */
1829 12, /* bitsize */
1830 FALSE, /* pc_relative */
1831 10, /* bitpos */
1832 complain_overflow_unsigned, /* complain_on_overflow */
1833 bfd_elf_generic_reloc, /* special_function */
1834 AARCH64_R_STR (TLSLE_LDST8_TPREL_LO12), /* name */
1835 FALSE, /* partial_inplace */
1836 0x3ffc00, /* src_mask */
1837 0x3ffc00, /* dst_mask */
1838 FALSE), /* pcrel_offset */
1839
1840 /* Same as BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12, but no overflow check. */
1841 HOWTO (AARCH64_R (TLSLE_LDST8_TPREL_LO12_NC), /* type */
1842 0, /* rightshift */
1843 2, /* size (0 = byte, 1 = short, 2 = long) */
1844 12, /* bitsize */
1845 FALSE, /* pc_relative */
1846 10, /* bitpos */
1847 complain_overflow_dont, /* complain_on_overflow */
1848 bfd_elf_generic_reloc, /* special_function */
1849 AARCH64_R_STR (TLSLE_LDST8_TPREL_LO12_NC), /* name */
1850 FALSE, /* partial_inplace */
1851 0x3ffc00, /* src_mask */
1852 0x3ffc00, /* dst_mask */
1853 FALSE), /* pcrel_offset */
1854
a6bb11b2 1855 HOWTO (AARCH64_R (TLSDESC_LD_PREL19), /* type */
bb3f9ed8 1856 2, /* rightshift */
a06ea964 1857 2, /* size (0 = byte, 1 = short, 2 = long) */
1ada945d 1858 19, /* bitsize */
a06ea964
NC
1859 TRUE, /* pc_relative */
1860 0, /* bitpos */
1861 complain_overflow_dont, /* complain_on_overflow */
1862 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1863 AARCH64_R_STR (TLSDESC_LD_PREL19), /* name */
a06ea964 1864 FALSE, /* partial_inplace */
1ada945d
MS
1865 0x0ffffe0, /* src_mask */
1866 0x0ffffe0, /* dst_mask */
a06ea964
NC
1867 TRUE), /* pcrel_offset */
1868
a6bb11b2 1869 HOWTO (AARCH64_R (TLSDESC_ADR_PREL21), /* type */
a06ea964
NC
1870 0, /* rightshift */
1871 2, /* size (0 = byte, 1 = short, 2 = long) */
1872 21, /* bitsize */
1873 TRUE, /* pc_relative */
1874 0, /* bitpos */
1875 complain_overflow_dont, /* complain_on_overflow */
1876 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1877 AARCH64_R_STR (TLSDESC_ADR_PREL21), /* name */
a06ea964
NC
1878 FALSE, /* partial_inplace */
1879 0x1fffff, /* src_mask */
1880 0x1fffff, /* dst_mask */
1881 TRUE), /* pcrel_offset */
1882
1883 /* Get to the page for the GOT entry for the symbol
1884 (G(S) - P) using an ADRP instruction. */
a6bb11b2 1885 HOWTO (AARCH64_R (TLSDESC_ADR_PAGE21), /* type */
a06ea964
NC
1886 12, /* rightshift */
1887 2, /* size (0 = byte, 1 = short, 2 = long) */
1888 21, /* bitsize */
1889 TRUE, /* pc_relative */
1890 0, /* bitpos */
1891 complain_overflow_dont, /* complain_on_overflow */
1892 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1893 AARCH64_R_STR (TLSDESC_ADR_PAGE21), /* name */
a06ea964
NC
1894 FALSE, /* partial_inplace */
1895 0x1fffff, /* src_mask */
1896 0x1fffff, /* dst_mask */
1897 TRUE), /* pcrel_offset */
1898
a6bb11b2 1899 /* LD64: GOT offset G(S) & 0xff8. */
f955cccf 1900 HOWTO64 (AARCH64_R (TLSDESC_LD64_LO12), /* type */
a06ea964
NC
1901 3, /* rightshift */
1902 2, /* size (0 = byte, 1 = short, 2 = long) */
1903 12, /* bitsize */
1904 FALSE, /* pc_relative */
1905 0, /* bitpos */
1906 complain_overflow_dont, /* complain_on_overflow */
1907 bfd_elf_generic_reloc, /* special_function */
f955cccf 1908 AARCH64_R_STR (TLSDESC_LD64_LO12), /* name */
a06ea964 1909 FALSE, /* partial_inplace */
a6bb11b2
YZ
1910 0xff8, /* src_mask */
1911 0xff8, /* dst_mask */
1912 FALSE), /* pcrel_offset */
1913
1914 /* LD32: GOT offset G(S) & 0xffc. */
1915 HOWTO32 (AARCH64_R (TLSDESC_LD32_LO12_NC), /* type */
1916 2, /* rightshift */
1917 2, /* size (0 = byte, 1 = short, 2 = long) */
1918 12, /* bitsize */
1919 FALSE, /* pc_relative */
1920 0, /* bitpos */
1921 complain_overflow_dont, /* complain_on_overflow */
1922 bfd_elf_generic_reloc, /* special_function */
1923 AARCH64_R_STR (TLSDESC_LD32_LO12_NC), /* name */
1924 FALSE, /* partial_inplace */
1925 0xffc, /* src_mask */
1926 0xffc, /* dst_mask */
a06ea964
NC
1927 FALSE), /* pcrel_offset */
1928
1929 /* ADD: GOT offset G(S) & 0xfff. */
f955cccf 1930 HOWTO (AARCH64_R (TLSDESC_ADD_LO12), /* type */
a06ea964
NC
1931 0, /* rightshift */
1932 2, /* size (0 = byte, 1 = short, 2 = long) */
1933 12, /* bitsize */
1934 FALSE, /* pc_relative */
1935 0, /* bitpos */
f955cccf 1936 complain_overflow_dont,/* complain_on_overflow */
a06ea964 1937 bfd_elf_generic_reloc, /* special_function */
f955cccf 1938 AARCH64_R_STR (TLSDESC_ADD_LO12), /* name */
a06ea964
NC
1939 FALSE, /* partial_inplace */
1940 0xfff, /* src_mask */
1941 0xfff, /* dst_mask */
1942 FALSE), /* pcrel_offset */
1943
a6bb11b2 1944 HOWTO64 (AARCH64_R (TLSDESC_OFF_G1), /* type */
bb3f9ed8 1945 16, /* rightshift */
a06ea964
NC
1946 2, /* size (0 = byte, 1 = short, 2 = long) */
1947 12, /* bitsize */
1948 FALSE, /* pc_relative */
1949 0, /* bitpos */
43a357f9 1950 complain_overflow_unsigned, /* complain_on_overflow */
a06ea964 1951 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1952 AARCH64_R_STR (TLSDESC_OFF_G1), /* name */
a06ea964
NC
1953 FALSE, /* partial_inplace */
1954 0xffff, /* src_mask */
1955 0xffff, /* dst_mask */
1956 FALSE), /* pcrel_offset */
1957
a6bb11b2 1958 HOWTO64 (AARCH64_R (TLSDESC_OFF_G0_NC), /* type */
a06ea964
NC
1959 0, /* rightshift */
1960 2, /* size (0 = byte, 1 = short, 2 = long) */
1961 12, /* bitsize */
1962 FALSE, /* pc_relative */
1963 0, /* bitpos */
1964 complain_overflow_dont, /* complain_on_overflow */
1965 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1966 AARCH64_R_STR (TLSDESC_OFF_G0_NC), /* name */
a06ea964
NC
1967 FALSE, /* partial_inplace */
1968 0xffff, /* src_mask */
1969 0xffff, /* dst_mask */
1970 FALSE), /* pcrel_offset */
1971
a6bb11b2 1972 HOWTO64 (AARCH64_R (TLSDESC_LDR), /* type */
a06ea964
NC
1973 0, /* rightshift */
1974 2, /* size (0 = byte, 1 = short, 2 = long) */
1975 12, /* bitsize */
1976 FALSE, /* pc_relative */
1977 0, /* bitpos */
1978 complain_overflow_dont, /* complain_on_overflow */
1979 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1980 AARCH64_R_STR (TLSDESC_LDR), /* name */
a06ea964
NC
1981 FALSE, /* partial_inplace */
1982 0x0, /* src_mask */
1983 0x0, /* dst_mask */
1984 FALSE), /* pcrel_offset */
1985
a6bb11b2 1986 HOWTO64 (AARCH64_R (TLSDESC_ADD), /* type */
a06ea964
NC
1987 0, /* rightshift */
1988 2, /* size (0 = byte, 1 = short, 2 = long) */
1989 12, /* bitsize */
1990 FALSE, /* pc_relative */
1991 0, /* bitpos */
1992 complain_overflow_dont, /* complain_on_overflow */
1993 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 1994 AARCH64_R_STR (TLSDESC_ADD), /* name */
a06ea964
NC
1995 FALSE, /* partial_inplace */
1996 0x0, /* src_mask */
1997 0x0, /* dst_mask */
1998 FALSE), /* pcrel_offset */
1999
a6bb11b2 2000 HOWTO (AARCH64_R (TLSDESC_CALL), /* type */
a06ea964
NC
2001 0, /* rightshift */
2002 2, /* size (0 = byte, 1 = short, 2 = long) */
7366006f 2003 0, /* bitsize */
a06ea964
NC
2004 FALSE, /* pc_relative */
2005 0, /* bitpos */
2006 complain_overflow_dont, /* complain_on_overflow */
2007 bfd_elf_generic_reloc, /* special_function */
a6bb11b2 2008 AARCH64_R_STR (TLSDESC_CALL), /* name */
a06ea964
NC
2009 FALSE, /* partial_inplace */
2010 0x0, /* src_mask */
2011 0x0, /* dst_mask */
2012 FALSE), /* pcrel_offset */
a6bb11b2
YZ
2013
2014 HOWTO (AARCH64_R (COPY), /* type */
2015 0, /* rightshift */
2016 2, /* size (0 = byte, 1 = short, 2 = long) */
2017 64, /* bitsize */
2018 FALSE, /* pc_relative */
2019 0, /* bitpos */
2020 complain_overflow_bitfield, /* complain_on_overflow */
2021 bfd_elf_generic_reloc, /* special_function */
2022 AARCH64_R_STR (COPY), /* name */
2023 TRUE, /* partial_inplace */
2024 0xffffffff, /* src_mask */
2025 0xffffffff, /* dst_mask */
2026 FALSE), /* pcrel_offset */
2027
2028 HOWTO (AARCH64_R (GLOB_DAT), /* type */
2029 0, /* rightshift */
2030 2, /* size (0 = byte, 1 = short, 2 = long) */
2031 64, /* bitsize */
2032 FALSE, /* pc_relative */
2033 0, /* bitpos */
2034 complain_overflow_bitfield, /* complain_on_overflow */
2035 bfd_elf_generic_reloc, /* special_function */
2036 AARCH64_R_STR (GLOB_DAT), /* name */
2037 TRUE, /* partial_inplace */
2038 0xffffffff, /* src_mask */
2039 0xffffffff, /* dst_mask */
2040 FALSE), /* pcrel_offset */
2041
2042 HOWTO (AARCH64_R (JUMP_SLOT), /* type */
2043 0, /* rightshift */
2044 2, /* size (0 = byte, 1 = short, 2 = long) */
2045 64, /* bitsize */
2046 FALSE, /* pc_relative */
2047 0, /* bitpos */
2048 complain_overflow_bitfield, /* complain_on_overflow */
2049 bfd_elf_generic_reloc, /* special_function */
2050 AARCH64_R_STR (JUMP_SLOT), /* name */
2051 TRUE, /* partial_inplace */
2052 0xffffffff, /* src_mask */
2053 0xffffffff, /* dst_mask */
2054 FALSE), /* pcrel_offset */
2055
2056 HOWTO (AARCH64_R (RELATIVE), /* type */
2057 0, /* rightshift */
2058 2, /* size (0 = byte, 1 = short, 2 = long) */
2059 64, /* bitsize */
2060 FALSE, /* pc_relative */
2061 0, /* bitpos */
2062 complain_overflow_bitfield, /* complain_on_overflow */
2063 bfd_elf_generic_reloc, /* special_function */
2064 AARCH64_R_STR (RELATIVE), /* name */
2065 TRUE, /* partial_inplace */
2066 ALL_ONES, /* src_mask */
2067 ALL_ONES, /* dst_mask */
2068 FALSE), /* pcrel_offset */
2069
2070 HOWTO (AARCH64_R (TLS_DTPMOD), /* type */
2071 0, /* rightshift */
2072 2, /* size (0 = byte, 1 = short, 2 = long) */
2073 64, /* bitsize */
2074 FALSE, /* pc_relative */
2075 0, /* bitpos */
2076 complain_overflow_dont, /* complain_on_overflow */
2077 bfd_elf_generic_reloc, /* special_function */
da0781dc
YZ
2078#if ARCH_SIZE == 64
2079 AARCH64_R_STR (TLS_DTPMOD64), /* name */
2080#else
a6bb11b2 2081 AARCH64_R_STR (TLS_DTPMOD), /* name */
da0781dc 2082#endif
a6bb11b2
YZ
2083 FALSE, /* partial_inplace */
2084 0, /* src_mask */
2085 ALL_ONES, /* dst_mask */
2086 FALSE), /* pc_reloffset */
2087
2088 HOWTO (AARCH64_R (TLS_DTPREL), /* type */
2089 0, /* rightshift */
2090 2, /* size (0 = byte, 1 = short, 2 = long) */
2091 64, /* bitsize */
2092 FALSE, /* pc_relative */
2093 0, /* bitpos */
2094 complain_overflow_dont, /* complain_on_overflow */
2095 bfd_elf_generic_reloc, /* special_function */
da0781dc
YZ
2096#if ARCH_SIZE == 64
2097 AARCH64_R_STR (TLS_DTPREL64), /* name */
2098#else
a6bb11b2 2099 AARCH64_R_STR (TLS_DTPREL), /* name */
da0781dc 2100#endif
a6bb11b2
YZ
2101 FALSE, /* partial_inplace */
2102 0, /* src_mask */
2103 ALL_ONES, /* dst_mask */
2104 FALSE), /* pcrel_offset */
2105
2106 HOWTO (AARCH64_R (TLS_TPREL), /* type */
2107 0, /* rightshift */
2108 2, /* size (0 = byte, 1 = short, 2 = long) */
2109 64, /* bitsize */
2110 FALSE, /* pc_relative */
2111 0, /* bitpos */
2112 complain_overflow_dont, /* complain_on_overflow */
2113 bfd_elf_generic_reloc, /* special_function */
da0781dc
YZ
2114#if ARCH_SIZE == 64
2115 AARCH64_R_STR (TLS_TPREL64), /* name */
2116#else
a6bb11b2 2117 AARCH64_R_STR (TLS_TPREL), /* name */
da0781dc 2118#endif
a6bb11b2
YZ
2119 FALSE, /* partial_inplace */
2120 0, /* src_mask */
2121 ALL_ONES, /* dst_mask */
2122 FALSE), /* pcrel_offset */
2123
2124 HOWTO (AARCH64_R (TLSDESC), /* type */
2125 0, /* rightshift */
2126 2, /* size (0 = byte, 1 = short, 2 = long) */
2127 64, /* bitsize */
2128 FALSE, /* pc_relative */
2129 0, /* bitpos */
2130 complain_overflow_dont, /* complain_on_overflow */
2131 bfd_elf_generic_reloc, /* special_function */
2132 AARCH64_R_STR (TLSDESC), /* name */
2133 FALSE, /* partial_inplace */
2134 0, /* src_mask */
2135 ALL_ONES, /* dst_mask */
2136 FALSE), /* pcrel_offset */
2137
2138 HOWTO (AARCH64_R (IRELATIVE), /* type */
2139 0, /* rightshift */
2140 2, /* size (0 = byte, 1 = short, 2 = long) */
2141 64, /* bitsize */
2142 FALSE, /* pc_relative */
2143 0, /* bitpos */
2144 complain_overflow_bitfield, /* complain_on_overflow */
2145 bfd_elf_generic_reloc, /* special_function */
2146 AARCH64_R_STR (IRELATIVE), /* name */
2147 FALSE, /* partial_inplace */
2148 0, /* src_mask */
2149 ALL_ONES, /* dst_mask */
2150 FALSE), /* pcrel_offset */
2151
2152 EMPTY_HOWTO (0),
a06ea964
NC
2153};
2154
a6bb11b2
YZ
2155static reloc_howto_type elfNN_aarch64_howto_none =
2156 HOWTO (R_AARCH64_NONE, /* type */
2157 0, /* rightshift */
6346d5ca 2158 3, /* size (0 = byte, 1 = short, 2 = long) */
a6bb11b2
YZ
2159 0, /* bitsize */
2160 FALSE, /* pc_relative */
2161 0, /* bitpos */
2162 complain_overflow_dont,/* complain_on_overflow */
2163 bfd_elf_generic_reloc, /* special_function */
2164 "R_AARCH64_NONE", /* name */
2165 FALSE, /* partial_inplace */
2166 0, /* src_mask */
2167 0, /* dst_mask */
2168 FALSE); /* pcrel_offset */
2169
2170/* Given HOWTO, return the bfd internal relocation enumerator. */
2171
2172static bfd_reloc_code_real_type
2173elfNN_aarch64_bfd_reloc_from_howto (reloc_howto_type *howto)
2174{
2175 const int size
2176 = (int) ARRAY_SIZE (elfNN_aarch64_howto_table);
2177 const ptrdiff_t offset
2178 = howto - elfNN_aarch64_howto_table;
2179
2180 if (offset > 0 && offset < size - 1)
2181 return BFD_RELOC_AARCH64_RELOC_START + offset;
2182
2183 if (howto == &elfNN_aarch64_howto_none)
2184 return BFD_RELOC_AARCH64_NONE;
2185
2186 return BFD_RELOC_AARCH64_RELOC_START;
2187}
2188
2189/* Given R_TYPE, return the bfd internal relocation enumerator. */
2190
2191static bfd_reloc_code_real_type
0aa13fee 2192elfNN_aarch64_bfd_reloc_from_type (bfd *abfd, unsigned int r_type)
a6bb11b2
YZ
2193{
2194 static bfd_boolean initialized_p = FALSE;
2195 /* Indexed by R_TYPE, values are offsets in the howto_table. */
2196 static unsigned int offsets[R_AARCH64_end];
2197
535b785f 2198 if (!initialized_p)
a6bb11b2
YZ
2199 {
2200 unsigned int i;
2201
2202 for (i = 1; i < ARRAY_SIZE (elfNN_aarch64_howto_table) - 1; ++i)
2203 if (elfNN_aarch64_howto_table[i].type != 0)
2204 offsets[elfNN_aarch64_howto_table[i].type] = i;
2205
2206 initialized_p = TRUE;
2207 }
2208
2209 if (r_type == R_AARCH64_NONE || r_type == R_AARCH64_NULL)
2210 return BFD_RELOC_AARCH64_NONE;
2211
5860e3f8
NC
2212 /* PR 17512: file: b371e70a. */
2213 if (r_type >= R_AARCH64_end)
2214 {
0aa13fee
AM
2215 _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
2216 abfd, r_type);
5860e3f8
NC
2217 bfd_set_error (bfd_error_bad_value);
2218 return BFD_RELOC_AARCH64_NONE;
2219 }
2220
a6bb11b2
YZ
2221 return BFD_RELOC_AARCH64_RELOC_START + offsets[r_type];
2222}
2223
2224struct elf_aarch64_reloc_map
2225{
2226 bfd_reloc_code_real_type from;
2227 bfd_reloc_code_real_type to;
2228};
2229
2230/* Map bfd generic reloc to AArch64-specific reloc. */
2231static const struct elf_aarch64_reloc_map elf_aarch64_reloc_map[] =
2232{
2233 {BFD_RELOC_NONE, BFD_RELOC_AARCH64_NONE},
2234
2235 /* Basic data relocations. */
2236 {BFD_RELOC_CTOR, BFD_RELOC_AARCH64_NN},
2237 {BFD_RELOC_64, BFD_RELOC_AARCH64_64},
2238 {BFD_RELOC_32, BFD_RELOC_AARCH64_32},
2239 {BFD_RELOC_16, BFD_RELOC_AARCH64_16},
2240 {BFD_RELOC_64_PCREL, BFD_RELOC_AARCH64_64_PCREL},
2241 {BFD_RELOC_32_PCREL, BFD_RELOC_AARCH64_32_PCREL},
2242 {BFD_RELOC_16_PCREL, BFD_RELOC_AARCH64_16_PCREL},
2243};
2244
2245/* Given the bfd internal relocation enumerator in CODE, return the
2246 corresponding howto entry. */
2247
2248static reloc_howto_type *
2249elfNN_aarch64_howto_from_bfd_reloc (bfd_reloc_code_real_type code)
2250{
2251 unsigned int i;
2252
2253 /* Convert bfd generic reloc to AArch64-specific reloc. */
2254 if (code < BFD_RELOC_AARCH64_RELOC_START
2255 || code > BFD_RELOC_AARCH64_RELOC_END)
2256 for (i = 0; i < ARRAY_SIZE (elf_aarch64_reloc_map); i++)
2257 if (elf_aarch64_reloc_map[i].from == code)
2258 {
2259 code = elf_aarch64_reloc_map[i].to;
2260 break;
2261 }
2262
2263 if (code > BFD_RELOC_AARCH64_RELOC_START
2264 && code < BFD_RELOC_AARCH64_RELOC_END)
2265 if (elfNN_aarch64_howto_table[code - BFD_RELOC_AARCH64_RELOC_START].type)
2266 return &elfNN_aarch64_howto_table[code - BFD_RELOC_AARCH64_RELOC_START];
2267
54757ed1
AP
2268 if (code == BFD_RELOC_AARCH64_NONE)
2269 return &elfNN_aarch64_howto_none;
2270
a6bb11b2
YZ
2271 return NULL;
2272}
2273
a06ea964 2274static reloc_howto_type *
0aa13fee 2275elfNN_aarch64_howto_from_type (bfd *abfd, unsigned int r_type)
a06ea964 2276{
a6bb11b2
YZ
2277 bfd_reloc_code_real_type val;
2278 reloc_howto_type *howto;
2279
cec5225b
YZ
2280#if ARCH_SIZE == 32
2281 if (r_type > 256)
2282 {
2283 bfd_set_error (bfd_error_bad_value);
2284 return NULL;
2285 }
2286#endif
2287
a6bb11b2
YZ
2288 if (r_type == R_AARCH64_NONE)
2289 return &elfNN_aarch64_howto_none;
a06ea964 2290
0aa13fee 2291 val = elfNN_aarch64_bfd_reloc_from_type (abfd, r_type);
a6bb11b2 2292 howto = elfNN_aarch64_howto_from_bfd_reloc (val);
a06ea964 2293
a6bb11b2
YZ
2294 if (howto != NULL)
2295 return howto;
a06ea964 2296
a06ea964
NC
2297 bfd_set_error (bfd_error_bad_value);
2298 return NULL;
2299}
2300
f3185997 2301static bfd_boolean
0aa13fee 2302elfNN_aarch64_info_to_howto (bfd *abfd, arelent *bfd_reloc,
a06ea964
NC
2303 Elf_Internal_Rela *elf_reloc)
2304{
2305 unsigned int r_type;
2306
cec5225b 2307 r_type = ELFNN_R_TYPE (elf_reloc->r_info);
0aa13fee 2308 bfd_reloc->howto = elfNN_aarch64_howto_from_type (abfd, r_type);
f3185997
NC
2309
2310 if (bfd_reloc->howto == NULL)
2311 {
2312 /* xgettext:c-format */
2313 _bfd_error_handler (_("%pB: unsupported relocation type %#x"), abfd, r_type);
2314 return FALSE;
2315 }
2316 return TRUE;
a06ea964
NC
2317}
2318
a06ea964 2319static reloc_howto_type *
cec5225b 2320elfNN_aarch64_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
a06ea964
NC
2321 bfd_reloc_code_real_type code)
2322{
a6bb11b2 2323 reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (code);
a06ea964 2324
a6bb11b2
YZ
2325 if (howto != NULL)
2326 return howto;
a06ea964
NC
2327
2328 bfd_set_error (bfd_error_bad_value);
2329 return NULL;
2330}
2331
2332static reloc_howto_type *
cec5225b 2333elfNN_aarch64_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
a06ea964
NC
2334 const char *r_name)
2335{
2336 unsigned int i;
2337
a6bb11b2
YZ
2338 for (i = 1; i < ARRAY_SIZE (elfNN_aarch64_howto_table) - 1; ++i)
2339 if (elfNN_aarch64_howto_table[i].name != NULL
2340 && strcasecmp (elfNN_aarch64_howto_table[i].name, r_name) == 0)
2341 return &elfNN_aarch64_howto_table[i];
a06ea964
NC
2342
2343 return NULL;
2344}
2345
07d6d2b8
AM
2346#define TARGET_LITTLE_SYM aarch64_elfNN_le_vec
2347#define TARGET_LITTLE_NAME "elfNN-littleaarch64"
2348#define TARGET_BIG_SYM aarch64_elfNN_be_vec
2349#define TARGET_BIG_NAME "elfNN-bigaarch64"
a06ea964 2350
a06ea964
NC
2351/* The linker script knows the section names for placement.
2352 The entry_names are used to do simple name mangling on the stubs.
2353 Given a function name, and its type, the stub can be found. The
2354 name can be changed. The only requirement is the %s be present. */
2355#define STUB_ENTRY_NAME "__%s_veneer"
2356
2357/* The name of the dynamic interpreter. This is put in the .interp
2358 section. */
2359#define ELF_DYNAMIC_INTERPRETER "/lib/ld.so.1"
2360
2361#define AARCH64_MAX_FWD_BRANCH_OFFSET \
2362 (((1 << 25) - 1) << 2)
2363#define AARCH64_MAX_BWD_BRANCH_OFFSET \
2364 (-((1 << 25) << 2))
2365
2366#define AARCH64_MAX_ADRP_IMM ((1 << 20) - 1)
2367#define AARCH64_MIN_ADRP_IMM (-(1 << 20))
2368
2369static int
2370aarch64_valid_for_adrp_p (bfd_vma value, bfd_vma place)
2371{
2372 bfd_signed_vma offset = (bfd_signed_vma) (PG (value) - PG (place)) >> 12;
2373 return offset <= AARCH64_MAX_ADRP_IMM && offset >= AARCH64_MIN_ADRP_IMM;
2374}
2375
2376static int
2377aarch64_valid_branch_p (bfd_vma value, bfd_vma place)
2378{
2379 bfd_signed_vma offset = (bfd_signed_vma) (value - place);
2380 return (offset <= AARCH64_MAX_FWD_BRANCH_OFFSET
2381 && offset >= AARCH64_MAX_BWD_BRANCH_OFFSET);
2382}
2383
2384static const uint32_t aarch64_adrp_branch_stub [] =
2385{
2386 0x90000010, /* adrp ip0, X */
2387 /* R_AARCH64_ADR_HI21_PCREL(X) */
2388 0x91000210, /* add ip0, ip0, :lo12:X */
2389 /* R_AARCH64_ADD_ABS_LO12_NC(X) */
2390 0xd61f0200, /* br ip0 */
2391};
2392
2393static const uint32_t aarch64_long_branch_stub[] =
2394{
cec5225b 2395#if ARCH_SIZE == 64
a06ea964 2396 0x58000090, /* ldr ip0, 1f */
cec5225b
YZ
2397#else
2398 0x18000090, /* ldr wip0, 1f */
2399#endif
a06ea964
NC
2400 0x10000011, /* adr ip1, #0 */
2401 0x8b110210, /* add ip0, ip0, ip1 */
2402 0xd61f0200, /* br ip0 */
cec5225b
YZ
2403 0x00000000, /* 1: .xword or .word
2404 R_AARCH64_PRELNN(X) + 12
a06ea964
NC
2405 */
2406 0x00000000,
2407};
2408
68fcca92
JW
2409static const uint32_t aarch64_erratum_835769_stub[] =
2410{
2411 0x00000000, /* Placeholder for multiply accumulate. */
2412 0x14000000, /* b <label> */
2413};
2414
4106101c
MS
2415static const uint32_t aarch64_erratum_843419_stub[] =
2416{
2417 0x00000000, /* Placeholder for LDR instruction. */
2418 0x14000000, /* b <label> */
2419};
2420
a06ea964
NC
2421/* Section name for stubs is the associated section name plus this
2422 string. */
2423#define STUB_SUFFIX ".stub"
2424
cec5225b 2425enum elf_aarch64_stub_type
a06ea964
NC
2426{
2427 aarch64_stub_none,
2428 aarch64_stub_adrp_branch,
2429 aarch64_stub_long_branch,
68fcca92 2430 aarch64_stub_erratum_835769_veneer,
4106101c 2431 aarch64_stub_erratum_843419_veneer,
a06ea964
NC
2432};
2433
cec5225b 2434struct elf_aarch64_stub_hash_entry
a06ea964
NC
2435{
2436 /* Base hash table entry structure. */
2437 struct bfd_hash_entry root;
2438
2439 /* The stub section. */
2440 asection *stub_sec;
2441
2442 /* Offset within stub_sec of the beginning of this stub. */
2443 bfd_vma stub_offset;
2444
2445 /* Given the symbol's value and its section we can determine its final
2446 value when building the stubs (so the stub knows where to jump). */
2447 bfd_vma target_value;
2448 asection *target_section;
2449
cec5225b 2450 enum elf_aarch64_stub_type stub_type;
a06ea964
NC
2451
2452 /* The symbol table entry, if any, that this was derived from. */
cec5225b 2453 struct elf_aarch64_link_hash_entry *h;
a06ea964
NC
2454
2455 /* Destination symbol type */
2456 unsigned char st_type;
2457
2458 /* Where this stub is being called from, or, in the case of combined
2459 stub sections, the first input section in the group. */
2460 asection *id_sec;
2461
2462 /* The name for the local symbol at the start of this stub. The
2463 stub name in the hash table has to be unique; this does not, so
2464 it can be friendlier. */
2465 char *output_name;
68fcca92
JW
2466
2467 /* The instruction which caused this stub to be generated (only valid for
2468 erratum 835769 workaround stubs at present). */
2469 uint32_t veneered_insn;
4106101c
MS
2470
2471 /* In an erratum 843419 workaround stub, the ADRP instruction offset. */
2472 bfd_vma adrp_offset;
a06ea964
NC
2473};
2474
2475/* Used to build a map of a section. This is required for mixed-endian
2476 code/data. */
2477
cec5225b 2478typedef struct elf_elf_section_map
a06ea964
NC
2479{
2480 bfd_vma vma;
2481 char type;
2482}
cec5225b 2483elf_aarch64_section_map;
a06ea964
NC
2484
2485
2486typedef struct _aarch64_elf_section_data
2487{
2488 struct bfd_elf_section_data elf;
2489 unsigned int mapcount;
2490 unsigned int mapsize;
cec5225b 2491 elf_aarch64_section_map *map;
a06ea964
NC
2492}
2493_aarch64_elf_section_data;
2494
cec5225b 2495#define elf_aarch64_section_data(sec) \
a06ea964
NC
2496 ((_aarch64_elf_section_data *) elf_section_data (sec))
2497
4e8516b2
AP
2498/* The size of the thread control block which is defined to be two pointers. */
2499#define TCB_SIZE (ARCH_SIZE/8)*2
a06ea964
NC
2500
2501struct elf_aarch64_local_symbol
2502{
2503 unsigned int got_type;
2504 bfd_signed_vma got_refcount;
2505 bfd_vma got_offset;
2506
2507 /* Offset of the GOTPLT entry reserved for the TLS descriptor. The
2508 offset is from the end of the jump table and reserved entries
2509 within the PLTGOT.
2510
2511 The magic value (bfd_vma) -1 indicates that an offset has not be
2512 allocated. */
2513 bfd_vma tlsdesc_got_jump_table_offset;
2514};
2515
2516struct elf_aarch64_obj_tdata
2517{
2518 struct elf_obj_tdata root;
2519
2520 /* local symbol descriptors */
2521 struct elf_aarch64_local_symbol *locals;
2522
2523 /* Zero to warn when linking objects with incompatible enum sizes. */
2524 int no_enum_size_warning;
2525
2526 /* Zero to warn when linking objects with incompatible wchar_t sizes. */
2527 int no_wchar_size_warning;
cd702818
SD
2528
2529 /* All GNU_PROPERTY_AARCH64_FEATURE_1_AND properties. */
2530 uint32_t gnu_and_prop;
37c18eed
SD
2531
2532 /* Zero to warn when linking objects with incompatible
2533 GNU_PROPERTY_AARCH64_FEATURE_1_BTI. */
2534 int no_bti_warn;
2535
2536 /* PLT type based on security. */
2537 aarch64_plt_type plt_type;
a06ea964
NC
2538};
2539
2540#define elf_aarch64_tdata(bfd) \
2541 ((struct elf_aarch64_obj_tdata *) (bfd)->tdata.any)
2542
cec5225b 2543#define elf_aarch64_locals(bfd) (elf_aarch64_tdata (bfd)->locals)
a06ea964
NC
2544
2545#define is_aarch64_elf(bfd) \
2546 (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
2547 && elf_tdata (bfd) != NULL \
2548 && elf_object_id (bfd) == AARCH64_ELF_DATA)
2549
2550static bfd_boolean
cec5225b 2551elfNN_aarch64_mkobject (bfd *abfd)
a06ea964
NC
2552{
2553 return bfd_elf_allocate_object (abfd, sizeof (struct elf_aarch64_obj_tdata),
2554 AARCH64_ELF_DATA);
2555}
2556
cec5225b
YZ
2557#define elf_aarch64_hash_entry(ent) \
2558 ((struct elf_aarch64_link_hash_entry *)(ent))
a06ea964
NC
2559
2560#define GOT_UNKNOWN 0
2561#define GOT_NORMAL 1
2562#define GOT_TLS_GD 2
2563#define GOT_TLS_IE 4
2564#define GOT_TLSDESC_GD 8
2565
2566#define GOT_TLS_GD_ANY_P(type) ((type & GOT_TLS_GD) || (type & GOT_TLSDESC_GD))
2567
2568/* AArch64 ELF linker hash entry. */
cec5225b 2569struct elf_aarch64_link_hash_entry
a06ea964
NC
2570{
2571 struct elf_link_hash_entry root;
2572
a06ea964
NC
2573 /* Since PLT entries have variable size, we need to record the
2574 index into .got.plt instead of recomputing it from the PLT
2575 offset. */
2576 bfd_signed_vma plt_got_offset;
2577
2578 /* Bit mask representing the type of GOT entry(s) if any required by
2579 this symbol. */
2580 unsigned int got_type;
2581
2582 /* A pointer to the most recently used stub hash entry against this
2583 symbol. */
cec5225b 2584 struct elf_aarch64_stub_hash_entry *stub_cache;
a06ea964
NC
2585
2586 /* Offset of the GOTPLT entry reserved for the TLS descriptor. The offset
2587 is from the end of the jump table and reserved entries within the PLTGOT.
2588
2589 The magic value (bfd_vma) -1 indicates that an offset has not
2590 be allocated. */
2591 bfd_vma tlsdesc_got_jump_table_offset;
2592};
2593
2594static unsigned int
cec5225b 2595elfNN_aarch64_symbol_got_type (struct elf_link_hash_entry *h,
a06ea964
NC
2596 bfd *abfd,
2597 unsigned long r_symndx)
2598{
2599 if (h)
cec5225b 2600 return elf_aarch64_hash_entry (h)->got_type;
a06ea964 2601
cec5225b 2602 if (! elf_aarch64_locals (abfd))
a06ea964
NC
2603 return GOT_UNKNOWN;
2604
cec5225b 2605 return elf_aarch64_locals (abfd)[r_symndx].got_type;
a06ea964
NC
2606}
2607
a06ea964 2608/* Get the AArch64 elf linker hash table from a link_info structure. */
cec5225b
YZ
2609#define elf_aarch64_hash_table(info) \
2610 ((struct elf_aarch64_link_hash_table *) ((info)->hash))
a06ea964
NC
2611
2612#define aarch64_stub_hash_lookup(table, string, create, copy) \
cec5225b 2613 ((struct elf_aarch64_stub_hash_entry *) \
a06ea964
NC
2614 bfd_hash_lookup ((table), (string), (create), (copy)))
2615
2616/* AArch64 ELF linker hash table. */
cec5225b 2617struct elf_aarch64_link_hash_table
a06ea964
NC
2618{
2619 /* The main hash table. */
2620 struct elf_link_hash_table root;
2621
2622 /* Nonzero to force PIC branch veneers. */
2623 int pic_veneer;
2624
68fcca92
JW
2625 /* Fix erratum 835769. */
2626 int fix_erratum_835769;
2627
4106101c 2628 /* Fix erratum 843419. */
739b5c9c 2629 erratum_84319_opts fix_erratum_843419;
4106101c 2630
1f56df9d
JW
2631 /* Don't apply link-time values for dynamic relocations. */
2632 int no_apply_dynamic_relocs;
2633
a06ea964
NC
2634 /* The number of bytes in the initial entry in the PLT. */
2635 bfd_size_type plt_header_size;
2636
37c18eed
SD
2637 /* The bytes of the initial PLT entry. */
2638 const bfd_byte *plt0_entry;
2639
2640 /* The number of bytes in the subsequent PLT entries. */
a06ea964
NC
2641 bfd_size_type plt_entry_size;
2642
37c18eed
SD
2643 /* The bytes of the subsequent PLT entry. */
2644 const bfd_byte *plt_entry;
2645
a06ea964
NC
2646 /* For convenience in allocate_dynrelocs. */
2647 bfd *obfd;
2648
2649 /* The amount of space used by the reserved portion of the sgotplt
2650 section, plus whatever space is used by the jump slots. */
2651 bfd_vma sgotplt_jump_table_size;
2652
2653 /* The stub hash table. */
2654 struct bfd_hash_table stub_hash_table;
2655
2656 /* Linker stub bfd. */
2657 bfd *stub_bfd;
2658
2659 /* Linker call-backs. */
2660 asection *(*add_stub_section) (const char *, asection *);
2661 void (*layout_sections_again) (void);
2662
2663 /* Array to keep track of which stub sections have been created, and
2664 information on stub grouping. */
2665 struct map_stub
2666 {
2667 /* This is the section to which stubs in the group will be
2668 attached. */
2669 asection *link_sec;
2670 /* The stub section. */
2671 asection *stub_sec;
2672 } *stub_group;
2673
cec5225b 2674 /* Assorted information used by elfNN_aarch64_size_stubs. */
a06ea964 2675 unsigned int bfd_count;
7292b3ac 2676 unsigned int top_index;
a06ea964
NC
2677 asection **input_list;
2678
823710d5
SN
2679 /* JUMP_SLOT relocs for variant PCS symbols may be present. */
2680 int variant_pcs;
2681
37c18eed
SD
2682 /* The number of bytes in the PLT enty for the TLS descriptor. */
2683 bfd_size_type tlsdesc_plt_entry_size;
2684
1419bbe5
WN
2685 /* Used by local STT_GNU_IFUNC symbols. */
2686 htab_t loc_hash_table;
2687 void * loc_hash_memory;
a06ea964
NC
2688};
2689
a06ea964
NC
2690/* Create an entry in an AArch64 ELF linker hash table. */
2691
2692static struct bfd_hash_entry *
cec5225b 2693elfNN_aarch64_link_hash_newfunc (struct bfd_hash_entry *entry,
a06ea964
NC
2694 struct bfd_hash_table *table,
2695 const char *string)
2696{
cec5225b
YZ
2697 struct elf_aarch64_link_hash_entry *ret =
2698 (struct elf_aarch64_link_hash_entry *) entry;
a06ea964
NC
2699
2700 /* Allocate the structure if it has not already been allocated by a
2701 subclass. */
2702 if (ret == NULL)
2703 ret = bfd_hash_allocate (table,
cec5225b 2704 sizeof (struct elf_aarch64_link_hash_entry));
a06ea964
NC
2705 if (ret == NULL)
2706 return (struct bfd_hash_entry *) ret;
2707
2708 /* Call the allocation method of the superclass. */
cec5225b 2709 ret = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC
2710 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
2711 table, string));
2712 if (ret != NULL)
2713 {
a06ea964
NC
2714 ret->got_type = GOT_UNKNOWN;
2715 ret->plt_got_offset = (bfd_vma) - 1;
2716 ret->stub_cache = NULL;
2717 ret->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
2718 }
2719
2720 return (struct bfd_hash_entry *) ret;
2721}
2722
2723/* Initialize an entry in the stub hash table. */
2724
2725static struct bfd_hash_entry *
2726stub_hash_newfunc (struct bfd_hash_entry *entry,
2727 struct bfd_hash_table *table, const char *string)
2728{
2729 /* Allocate the structure if it has not already been allocated by a
2730 subclass. */
2731 if (entry == NULL)
2732 {
2733 entry = bfd_hash_allocate (table,
2734 sizeof (struct
cec5225b 2735 elf_aarch64_stub_hash_entry));
a06ea964
NC
2736 if (entry == NULL)
2737 return entry;
2738 }
2739
2740 /* Call the allocation method of the superclass. */
2741 entry = bfd_hash_newfunc (entry, table, string);
2742 if (entry != NULL)
2743 {
cec5225b 2744 struct elf_aarch64_stub_hash_entry *eh;
a06ea964
NC
2745
2746 /* Initialize the local fields. */
cec5225b 2747 eh = (struct elf_aarch64_stub_hash_entry *) entry;
4106101c 2748 eh->adrp_offset = 0;
a06ea964
NC
2749 eh->stub_sec = NULL;
2750 eh->stub_offset = 0;
2751 eh->target_value = 0;
2752 eh->target_section = NULL;
2753 eh->stub_type = aarch64_stub_none;
2754 eh->h = NULL;
2755 eh->id_sec = NULL;
2756 }
2757
2758 return entry;
2759}
2760
1419bbe5
WN
2761/* Compute a hash of a local hash entry. We use elf_link_hash_entry
2762 for local symbol so that we can handle local STT_GNU_IFUNC symbols
2763 as global symbol. We reuse indx and dynstr_index for local symbol
2764 hash since they aren't used by global symbols in this backend. */
2765
2766static hashval_t
2767elfNN_aarch64_local_htab_hash (const void *ptr)
2768{
2769 struct elf_link_hash_entry *h
2770 = (struct elf_link_hash_entry *) ptr;
2771 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
2772}
2773
2774/* Compare local hash entries. */
2775
2776static int
2777elfNN_aarch64_local_htab_eq (const void *ptr1, const void *ptr2)
2778{
2779 struct elf_link_hash_entry *h1
2780 = (struct elf_link_hash_entry *) ptr1;
2781 struct elf_link_hash_entry *h2
2782 = (struct elf_link_hash_entry *) ptr2;
2783
2784 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
2785}
2786
2787/* Find and/or create a hash entry for local symbol. */
2788
2789static struct elf_link_hash_entry *
2790elfNN_aarch64_get_local_sym_hash (struct elf_aarch64_link_hash_table *htab,
2791 bfd *abfd, const Elf_Internal_Rela *rel,
2792 bfd_boolean create)
2793{
2794 struct elf_aarch64_link_hash_entry e, *ret;
2795 asection *sec = abfd->sections;
2796 hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id,
2797 ELFNN_R_SYM (rel->r_info));
2798 void **slot;
2799
2800 e.root.indx = sec->id;
2801 e.root.dynstr_index = ELFNN_R_SYM (rel->r_info);
2802 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
2803 create ? INSERT : NO_INSERT);
2804
2805 if (!slot)
2806 return NULL;
2807
2808 if (*slot)
2809 {
2810 ret = (struct elf_aarch64_link_hash_entry *) *slot;
2811 return &ret->root;
2812 }
2813
2814 ret = (struct elf_aarch64_link_hash_entry *)
2815 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
2816 sizeof (struct elf_aarch64_link_hash_entry));
2817 if (ret)
2818 {
2819 memset (ret, 0, sizeof (*ret));
2820 ret->root.indx = sec->id;
2821 ret->root.dynstr_index = ELFNN_R_SYM (rel->r_info);
2822 ret->root.dynindx = -1;
2823 *slot = ret;
2824 }
2825 return &ret->root;
2826}
a06ea964
NC
2827
2828/* Copy the extra info we tack onto an elf_link_hash_entry. */
2829
2830static void
cec5225b 2831elfNN_aarch64_copy_indirect_symbol (struct bfd_link_info *info,
a06ea964
NC
2832 struct elf_link_hash_entry *dir,
2833 struct elf_link_hash_entry *ind)
2834{
cec5225b 2835 struct elf_aarch64_link_hash_entry *edir, *eind;
a06ea964 2836
cec5225b
YZ
2837 edir = (struct elf_aarch64_link_hash_entry *) dir;
2838 eind = (struct elf_aarch64_link_hash_entry *) ind;
a06ea964 2839
a06ea964
NC
2840 if (ind->root.type == bfd_link_hash_indirect)
2841 {
2842 /* Copy over PLT info. */
2843 if (dir->got.refcount <= 0)
2844 {
2845 edir->got_type = eind->got_type;
2846 eind->got_type = GOT_UNKNOWN;
2847 }
2848 }
2849
2850 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2851}
2852
823710d5
SN
2853/* Merge non-visibility st_other attributes. */
2854
2855static void
2856elfNN_aarch64_merge_symbol_attribute (struct elf_link_hash_entry *h,
2857 const Elf_Internal_Sym *isym,
2858 bfd_boolean definition ATTRIBUTE_UNUSED,
2859 bfd_boolean dynamic ATTRIBUTE_UNUSED)
2860{
2861 unsigned int isym_sto = isym->st_other & ~ELF_ST_VISIBILITY (-1);
2862 unsigned int h_sto = h->other & ~ELF_ST_VISIBILITY (-1);
2863
2864 if (isym_sto == h_sto)
2865 return;
2866
2867 if (isym_sto & ~STO_AARCH64_VARIANT_PCS)
2868 /* Not fatal, this callback cannot fail. */
2869 _bfd_error_handler (_("unknown attribute for symbol `%s': 0x%02x"),
2870 h->root.root.string, isym_sto);
2871
2872 /* Note: Ideally we would warn about any attribute mismatch, but
2873 this api does not allow that without substantial changes. */
2874 if (isym_sto & STO_AARCH64_VARIANT_PCS)
2875 h->other |= STO_AARCH64_VARIANT_PCS;
2876}
2877
68faa637
AM
2878/* Destroy an AArch64 elf linker hash table. */
2879
2880static void
d495ab0d 2881elfNN_aarch64_link_hash_table_free (bfd *obfd)
68faa637
AM
2882{
2883 struct elf_aarch64_link_hash_table *ret
d495ab0d 2884 = (struct elf_aarch64_link_hash_table *) obfd->link.hash;
68faa637
AM
2885
2886 if (ret->loc_hash_table)
2887 htab_delete (ret->loc_hash_table);
2888 if (ret->loc_hash_memory)
2889 objalloc_free ((struct objalloc *) ret->loc_hash_memory);
2890
2891 bfd_hash_table_free (&ret->stub_hash_table);
d495ab0d 2892 _bfd_elf_link_hash_table_free (obfd);
68faa637
AM
2893}
2894
a06ea964
NC
2895/* Create an AArch64 elf linker hash table. */
2896
2897static struct bfd_link_hash_table *
cec5225b 2898elfNN_aarch64_link_hash_table_create (bfd *abfd)
a06ea964 2899{
cec5225b 2900 struct elf_aarch64_link_hash_table *ret;
986f0783 2901 size_t amt = sizeof (struct elf_aarch64_link_hash_table);
a06ea964 2902
7bf52ea2 2903 ret = bfd_zmalloc (amt);
a06ea964
NC
2904 if (ret == NULL)
2905 return NULL;
2906
2907 if (!_bfd_elf_link_hash_table_init
cec5225b
YZ
2908 (&ret->root, abfd, elfNN_aarch64_link_hash_newfunc,
2909 sizeof (struct elf_aarch64_link_hash_entry), AARCH64_ELF_DATA))
a06ea964
NC
2910 {
2911 free (ret);
2912 return NULL;
2913 }
2914
a06ea964 2915 ret->plt_header_size = PLT_ENTRY_SIZE;
37c18eed 2916 ret->plt0_entry = elfNN_aarch64_small_plt0_entry;
a06ea964 2917 ret->plt_entry_size = PLT_SMALL_ENTRY_SIZE;
37c18eed
SD
2918 ret->plt_entry = elfNN_aarch64_small_plt_entry;
2919 ret->tlsdesc_plt_entry_size = PLT_TLSDESC_ENTRY_SIZE;
a06ea964 2920 ret->obfd = abfd;
9bcc30e4 2921 ret->root.tlsdesc_got = (bfd_vma) - 1;
a06ea964
NC
2922
2923 if (!bfd_hash_table_init (&ret->stub_hash_table, stub_hash_newfunc,
cec5225b 2924 sizeof (struct elf_aarch64_stub_hash_entry)))
a06ea964 2925 {
d495ab0d 2926 _bfd_elf_link_hash_table_free (abfd);
a06ea964
NC
2927 return NULL;
2928 }
2929
1419bbe5
WN
2930 ret->loc_hash_table = htab_try_create (1024,
2931 elfNN_aarch64_local_htab_hash,
2932 elfNN_aarch64_local_htab_eq,
2933 NULL);
2934 ret->loc_hash_memory = objalloc_create ();
2935 if (!ret->loc_hash_table || !ret->loc_hash_memory)
2936 {
d495ab0d 2937 elfNN_aarch64_link_hash_table_free (abfd);
1419bbe5
WN
2938 return NULL;
2939 }
d495ab0d 2940 ret->root.root.hash_table_free = elfNN_aarch64_link_hash_table_free;
1419bbe5 2941
a06ea964
NC
2942 return &ret->root.root;
2943}
2944
1d75a8e2
NC
2945/* Perform relocation R_TYPE. Returns TRUE upon success, FALSE otherwise. */
2946
a06ea964
NC
2947static bfd_boolean
2948aarch64_relocate (unsigned int r_type, bfd *input_bfd, asection *input_section,
2949 bfd_vma offset, bfd_vma value)
2950{
2951 reloc_howto_type *howto;
2952 bfd_vma place;
2953
0aa13fee 2954 howto = elfNN_aarch64_howto_from_type (input_bfd, r_type);
a06ea964
NC
2955 place = (input_section->output_section->vma + input_section->output_offset
2956 + offset);
caed7120 2957
0aa13fee 2958 r_type = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
652afeef
TC
2959 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, r_type, place,
2960 value, 0, FALSE);
caed7120
YZ
2961 return _bfd_aarch64_elf_put_addend (input_bfd,
2962 input_section->contents + offset, r_type,
1d75a8e2 2963 howto, value) == bfd_reloc_ok;
a06ea964
NC
2964}
2965
cec5225b 2966static enum elf_aarch64_stub_type
a06ea964
NC
2967aarch64_select_branch_stub (bfd_vma value, bfd_vma place)
2968{
2969 if (aarch64_valid_for_adrp_p (value, place))
2970 return aarch64_stub_adrp_branch;
2971 return aarch64_stub_long_branch;
2972}
2973
2974/* Determine the type of stub needed, if any, for a call. */
2975
cec5225b 2976static enum elf_aarch64_stub_type
9a228467 2977aarch64_type_of_stub (asection *input_sec,
a06ea964 2978 const Elf_Internal_Rela *rel,
f678ded7 2979 asection *sym_sec,
a06ea964 2980 unsigned char st_type,
a06ea964
NC
2981 bfd_vma destination)
2982{
2983 bfd_vma location;
2984 bfd_signed_vma branch_offset;
2985 unsigned int r_type;
cec5225b 2986 enum elf_aarch64_stub_type stub_type = aarch64_stub_none;
a06ea964 2987
f678ded7 2988 if (st_type != STT_FUNC
2f340668 2989 && (sym_sec == input_sec))
a06ea964
NC
2990 return stub_type;
2991
a06ea964
NC
2992 /* Determine where the call point is. */
2993 location = (input_sec->output_offset
2994 + input_sec->output_section->vma + rel->r_offset);
2995
2996 branch_offset = (bfd_signed_vma) (destination - location);
2997
cec5225b 2998 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC
2999
3000 /* We don't want to redirect any old unconditional jump in this way,
3001 only one which is being used for a sibcall, where it is
3002 acceptable for the IP0 and IP1 registers to be clobbered. */
a6bb11b2 3003 if ((r_type == AARCH64_R (CALL26) || r_type == AARCH64_R (JUMP26))
a06ea964
NC
3004 && (branch_offset > AARCH64_MAX_FWD_BRANCH_OFFSET
3005 || branch_offset < AARCH64_MAX_BWD_BRANCH_OFFSET))
3006 {
3007 stub_type = aarch64_stub_long_branch;
3008 }
3009
3010 return stub_type;
3011}
3012
3013/* Build a name for an entry in the stub hash table. */
3014
3015static char *
cec5225b 3016elfNN_aarch64_stub_name (const asection *input_section,
a06ea964 3017 const asection *sym_sec,
cec5225b 3018 const struct elf_aarch64_link_hash_entry *hash,
a06ea964
NC
3019 const Elf_Internal_Rela *rel)
3020{
3021 char *stub_name;
3022 bfd_size_type len;
3023
3024 if (hash)
3025 {
3026 len = 8 + 1 + strlen (hash->root.root.root.string) + 1 + 16 + 1;
3027 stub_name = bfd_malloc (len);
3028 if (stub_name != NULL)
3029 snprintf (stub_name, len, "%08x_%s+%" BFD_VMA_FMT "x",
3030 (unsigned int) input_section->id,
3031 hash->root.root.root.string,
3032 rel->r_addend);
3033 }
3034 else
3035 {
3036 len = 8 + 1 + 8 + 1 + 8 + 1 + 16 + 1;
3037 stub_name = bfd_malloc (len);
3038 if (stub_name != NULL)
3039 snprintf (stub_name, len, "%08x_%x:%x+%" BFD_VMA_FMT "x",
3040 (unsigned int) input_section->id,
3041 (unsigned int) sym_sec->id,
cec5225b 3042 (unsigned int) ELFNN_R_SYM (rel->r_info),
a06ea964
NC
3043 rel->r_addend);
3044 }
3045
3046 return stub_name;
3047}
3048
7f784814
JW
3049/* Return TRUE if symbol H should be hashed in the `.gnu.hash' section. For
3050 executable PLT slots where the executable never takes the address of those
3051 functions, the function symbols are not added to the hash table. */
3052
3053static bfd_boolean
3054elf_aarch64_hash_symbol (struct elf_link_hash_entry *h)
3055{
3056 if (h->plt.offset != (bfd_vma) -1
3057 && !h->def_regular
3058 && !h->pointer_equality_needed)
3059 return FALSE;
3060
3061 return _bfd_elf_hash_symbol (h);
3062}
3063
3064
a06ea964
NC
3065/* Look up an entry in the stub hash. Stub entries are cached because
3066 creating the stub name takes a bit of time. */
3067
cec5225b
YZ
3068static struct elf_aarch64_stub_hash_entry *
3069elfNN_aarch64_get_stub_entry (const asection *input_section,
a06ea964
NC
3070 const asection *sym_sec,
3071 struct elf_link_hash_entry *hash,
3072 const Elf_Internal_Rela *rel,
cec5225b 3073 struct elf_aarch64_link_hash_table *htab)
a06ea964 3074{
cec5225b
YZ
3075 struct elf_aarch64_stub_hash_entry *stub_entry;
3076 struct elf_aarch64_link_hash_entry *h =
3077 (struct elf_aarch64_link_hash_entry *) hash;
a06ea964
NC
3078 const asection *id_sec;
3079
3080 if ((input_section->flags & SEC_CODE) == 0)
3081 return NULL;
3082
3083 /* If this input section is part of a group of sections sharing one
3084 stub section, then use the id of the first section in the group.
3085 Stub names need to include a section id, as there may well be
3086 more than one stub used to reach say, printf, and we need to
3087 distinguish between them. */
3088 id_sec = htab->stub_group[input_section->id].link_sec;
3089
3090 if (h != NULL && h->stub_cache != NULL
3091 && h->stub_cache->h == h && h->stub_cache->id_sec == id_sec)
3092 {
3093 stub_entry = h->stub_cache;
3094 }
3095 else
3096 {
3097 char *stub_name;
3098
cec5225b 3099 stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, h, rel);
a06ea964
NC
3100 if (stub_name == NULL)
3101 return NULL;
3102
3103 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table,
3104 stub_name, FALSE, FALSE);
3105 if (h != NULL)
3106 h->stub_cache = stub_entry;
3107
3108 free (stub_name);
3109 }
3110
3111 return stub_entry;
3112}
3113
a06ea964 3114
66585675
MS
3115/* Create a stub section. */
3116
3117static asection *
3118_bfd_aarch64_create_stub_section (asection *section,
3119 struct elf_aarch64_link_hash_table *htab)
3120{
3121 size_t namelen;
3122 bfd_size_type len;
3123 char *s_name;
3124
3125 namelen = strlen (section->name);
3126 len = namelen + sizeof (STUB_SUFFIX);
3127 s_name = bfd_alloc (htab->stub_bfd, len);
3128 if (s_name == NULL)
3129 return NULL;
3130
3131 memcpy (s_name, section->name, namelen);
3132 memcpy (s_name + namelen, STUB_SUFFIX, sizeof (STUB_SUFFIX));
3133 return (*htab->add_stub_section) (s_name, section);
3134}
3135
3136
fc6d53be
MS
3137/* Find or create a stub section for a link section.
3138
3139 Fix or create the stub section used to collect stubs attached to
3140 the specified link section. */
3141
3142static asection *
3143_bfd_aarch64_get_stub_for_link_section (asection *link_section,
3144 struct elf_aarch64_link_hash_table *htab)
3145{
3146 if (htab->stub_group[link_section->id].stub_sec == NULL)
3147 htab->stub_group[link_section->id].stub_sec
3148 = _bfd_aarch64_create_stub_section (link_section, htab);
3149 return htab->stub_group[link_section->id].stub_sec;
3150}
3151
3152
ef857521
MS
3153/* Find or create a stub section in the stub group for an input
3154 section. */
3155
3156static asection *
3157_bfd_aarch64_create_or_find_stub_sec (asection *section,
3158 struct elf_aarch64_link_hash_table *htab)
a06ea964 3159{
fc6d53be
MS
3160 asection *link_sec = htab->stub_group[section->id].link_sec;
3161 return _bfd_aarch64_get_stub_for_link_section (link_sec, htab);
ef857521
MS
3162}
3163
3164
3165/* Add a new stub entry in the stub group associated with an input
3166 section to the stub hash. Not all fields of the new stub entry are
3167 initialised. */
3168
3169static struct elf_aarch64_stub_hash_entry *
3170_bfd_aarch64_add_stub_entry_in_group (const char *stub_name,
3171 asection *section,
3172 struct elf_aarch64_link_hash_table *htab)
3173{
3174 asection *link_sec;
3175 asection *stub_sec;
3176 struct elf_aarch64_stub_hash_entry *stub_entry;
3177
3178 link_sec = htab->stub_group[section->id].link_sec;
3179 stub_sec = _bfd_aarch64_create_or_find_stub_sec (section, htab);
3180
a06ea964
NC
3181 /* Enter this entry into the linker stub hash table. */
3182 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
3183 TRUE, FALSE);
3184 if (stub_entry == NULL)
3185 {
695344c0 3186 /* xgettext:c-format */
871b3ab2 3187 _bfd_error_handler (_("%pB: cannot create stub entry %s"),
4eca0228 3188 section->owner, stub_name);
a06ea964
NC
3189 return NULL;
3190 }
3191
3192 stub_entry->stub_sec = stub_sec;
3193 stub_entry->stub_offset = 0;
3194 stub_entry->id_sec = link_sec;
3195
3196 return stub_entry;
3197}
3198
4106101c
MS
3199/* Add a new stub entry in the final stub section to the stub hash.
3200 Not all fields of the new stub entry are initialised. */
3201
3202static struct elf_aarch64_stub_hash_entry *
3203_bfd_aarch64_add_stub_entry_after (const char *stub_name,
3204 asection *link_section,
3205 struct elf_aarch64_link_hash_table *htab)
3206{
3207 asection *stub_sec;
3208 struct elf_aarch64_stub_hash_entry *stub_entry;
3209
739b5c9c
TC
3210 stub_sec = NULL;
3211 /* Only create the actual stub if we will end up needing it. */
3212 if (htab->fix_erratum_843419 & ERRAT_ADRP)
3213 stub_sec = _bfd_aarch64_get_stub_for_link_section (link_section, htab);
4106101c
MS
3214 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
3215 TRUE, FALSE);
3216 if (stub_entry == NULL)
3217 {
4eca0228 3218 _bfd_error_handler (_("cannot create stub entry %s"), stub_name);
4106101c
MS
3219 return NULL;
3220 }
3221
3222 stub_entry->stub_sec = stub_sec;
3223 stub_entry->stub_offset = 0;
3224 stub_entry->id_sec = link_section;
3225
3226 return stub_entry;
3227}
3228
3229
a06ea964
NC
3230static bfd_boolean
3231aarch64_build_one_stub (struct bfd_hash_entry *gen_entry,
abf874aa 3232 void *in_arg)
a06ea964 3233{
cec5225b 3234 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC
3235 asection *stub_sec;
3236 bfd *stub_bfd;
3237 bfd_byte *loc;
3238 bfd_vma sym_value;
68fcca92
JW
3239 bfd_vma veneered_insn_loc;
3240 bfd_vma veneer_entry_loc;
3241 bfd_signed_vma branch_offset = 0;
a06ea964
NC
3242 unsigned int template_size;
3243 const uint32_t *template;
3244 unsigned int i;
abf874aa 3245 struct bfd_link_info *info;
a06ea964
NC
3246
3247 /* Massage our args to the form they really have. */
cec5225b 3248 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
a06ea964 3249
abf874aa
CL
3250 info = (struct bfd_link_info *) in_arg;
3251
3252 /* Fail if the target section could not be assigned to an output
3253 section. The user should fix his linker script. */
3254 if (stub_entry->target_section->output_section == NULL
3255 && info->non_contiguous_regions)
53215f21
CL
3256 info->callbacks->einfo (_("%F%P: Could not assign '%pA' to an output section. "
3257 "Retry without "
3258 "--enable-non-contiguous-regions.\n"),
3259 stub_entry->target_section);
abf874aa 3260
a06ea964
NC
3261 stub_sec = stub_entry->stub_sec;
3262
3263 /* Make a note of the offset within the stubs for this entry. */
3264 stub_entry->stub_offset = stub_sec->size;
3265 loc = stub_sec->contents + stub_entry->stub_offset;
3266
3267 stub_bfd = stub_sec->owner;
3268
3269 /* This is the address of the stub destination. */
3270 sym_value = (stub_entry->target_value
3271 + stub_entry->target_section->output_offset
3272 + stub_entry->target_section->output_section->vma);
3273
3274 if (stub_entry->stub_type == aarch64_stub_long_branch)
3275 {
3276 bfd_vma place = (stub_entry->stub_offset + stub_sec->output_section->vma
3277 + stub_sec->output_offset);
3278
3279 /* See if we can relax the stub. */
3280 if (aarch64_valid_for_adrp_p (sym_value, place))
3281 stub_entry->stub_type = aarch64_select_branch_stub (sym_value, place);
3282 }
3283
3284 switch (stub_entry->stub_type)
3285 {
3286 case aarch64_stub_adrp_branch:
3287 template = aarch64_adrp_branch_stub;
3288 template_size = sizeof (aarch64_adrp_branch_stub);
3289 break;
3290 case aarch64_stub_long_branch:
3291 template = aarch64_long_branch_stub;
3292 template_size = sizeof (aarch64_long_branch_stub);
3293 break;
68fcca92
JW
3294 case aarch64_stub_erratum_835769_veneer:
3295 template = aarch64_erratum_835769_stub;
3296 template_size = sizeof (aarch64_erratum_835769_stub);
3297 break;
4106101c
MS
3298 case aarch64_stub_erratum_843419_veneer:
3299 template = aarch64_erratum_843419_stub;
3300 template_size = sizeof (aarch64_erratum_843419_stub);
3301 break;
a06ea964 3302 default:
8e2fe09f 3303 abort ();
a06ea964
NC
3304 }
3305
3306 for (i = 0; i < (template_size / sizeof template[0]); i++)
3307 {
3308 bfd_putl32 (template[i], loc);
3309 loc += 4;
3310 }
3311
3312 template_size = (template_size + 7) & ~7;
3313 stub_sec->size += template_size;
3314
3315 switch (stub_entry->stub_type)
3316 {
3317 case aarch64_stub_adrp_branch:
1d75a8e2
NC
3318 if (!aarch64_relocate (AARCH64_R (ADR_PREL_PG_HI21), stub_bfd, stub_sec,
3319 stub_entry->stub_offset, sym_value))
a06ea964
NC
3320 /* The stub would not have been relaxed if the offset was out
3321 of range. */
3322 BFD_FAIL ();
3323
1d75a8e2
NC
3324 if (!aarch64_relocate (AARCH64_R (ADD_ABS_LO12_NC), stub_bfd, stub_sec,
3325 stub_entry->stub_offset + 4, sym_value))
93ca8569 3326 BFD_FAIL ();
a06ea964
NC
3327 break;
3328
3329 case aarch64_stub_long_branch:
3330 /* We want the value relative to the address 12 bytes back from the
07d6d2b8 3331 value itself. */
1d75a8e2
NC
3332 if (!aarch64_relocate (AARCH64_R (PRELNN), stub_bfd, stub_sec,
3333 stub_entry->stub_offset + 16, sym_value + 12))
93ca8569 3334 BFD_FAIL ();
a06ea964 3335 break;
68fcca92
JW
3336
3337 case aarch64_stub_erratum_835769_veneer:
3338 veneered_insn_loc = stub_entry->target_section->output_section->vma
3339 + stub_entry->target_section->output_offset
3340 + stub_entry->target_value;
3341 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
3342 + stub_entry->stub_sec->output_offset
3343 + stub_entry->stub_offset;
3344 branch_offset = veneered_insn_loc - veneer_entry_loc;
3345 branch_offset >>= 2;
3346 branch_offset &= 0x3ffffff;
3347 bfd_putl32 (stub_entry->veneered_insn,
3348 stub_sec->contents + stub_entry->stub_offset);
3349 bfd_putl32 (template[1] | branch_offset,
3350 stub_sec->contents + stub_entry->stub_offset + 4);
3351 break;
3352
4106101c 3353 case aarch64_stub_erratum_843419_veneer:
1d75a8e2
NC
3354 if (!aarch64_relocate (AARCH64_R (JUMP26), stub_bfd, stub_sec,
3355 stub_entry->stub_offset + 4, sym_value + 4))
4106101c
MS
3356 BFD_FAIL ();
3357 break;
3358
a06ea964 3359 default:
8e2fe09f 3360 abort ();
a06ea964
NC
3361 }
3362
3363 return TRUE;
3364}
3365
3366/* As above, but don't actually build the stub. Just bump offset so
3367 we know stub section sizes. */
3368
3369static bfd_boolean
739b5c9c 3370aarch64_size_one_stub (struct bfd_hash_entry *gen_entry, void *in_arg)
a06ea964 3371{
cec5225b 3372 struct elf_aarch64_stub_hash_entry *stub_entry;
739b5c9c 3373 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC
3374 int size;
3375
3376 /* Massage our args to the form they really have. */
cec5225b 3377 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
739b5c9c 3378 htab = (struct elf_aarch64_link_hash_table *) in_arg;
a06ea964
NC
3379
3380 switch (stub_entry->stub_type)
3381 {
3382 case aarch64_stub_adrp_branch:
3383 size = sizeof (aarch64_adrp_branch_stub);
3384 break;
3385 case aarch64_stub_long_branch:
3386 size = sizeof (aarch64_long_branch_stub);
3387 break;
68fcca92
JW
3388 case aarch64_stub_erratum_835769_veneer:
3389 size = sizeof (aarch64_erratum_835769_stub);
3390 break;
4106101c 3391 case aarch64_stub_erratum_843419_veneer:
739b5c9c
TC
3392 {
3393 if (htab->fix_erratum_843419 == ERRAT_ADR)
3394 return TRUE;
3395 size = sizeof (aarch64_erratum_843419_stub);
3396 }
4106101c 3397 break;
a06ea964 3398 default:
8e2fe09f 3399 abort ();
a06ea964
NC
3400 }
3401
3402 size = (size + 7) & ~7;
3403 stub_entry->stub_sec->size += size;
3404 return TRUE;
3405}
3406
3407/* External entry points for sizing and building linker stubs. */
3408
3409/* Set up various things so that we can make a list of input sections
3410 for each output section included in the link. Returns -1 on error,
3411 0 when no stubs will be needed, and 1 on success. */
3412
3413int
cec5225b 3414elfNN_aarch64_setup_section_lists (bfd *output_bfd,
a06ea964
NC
3415 struct bfd_link_info *info)
3416{
3417 bfd *input_bfd;
3418 unsigned int bfd_count;
7292b3ac 3419 unsigned int top_id, top_index;
a06ea964
NC
3420 asection *section;
3421 asection **input_list, **list;
986f0783 3422 size_t amt;
cec5225b
YZ
3423 struct elf_aarch64_link_hash_table *htab =
3424 elf_aarch64_hash_table (info);
a06ea964
NC
3425
3426 if (!is_elf_hash_table (htab))
3427 return 0;
3428
3429 /* Count the number of input BFDs and find the top input section id. */
3430 for (input_bfd = info->input_bfds, bfd_count = 0, top_id = 0;
c72f2fb2 3431 input_bfd != NULL; input_bfd = input_bfd->link.next)
a06ea964
NC
3432 {
3433 bfd_count += 1;
3434 for (section = input_bfd->sections;
3435 section != NULL; section = section->next)
3436 {
3437 if (top_id < section->id)
3438 top_id = section->id;
3439 }
3440 }
3441 htab->bfd_count = bfd_count;
3442
3443 amt = sizeof (struct map_stub) * (top_id + 1);
3444 htab->stub_group = bfd_zmalloc (amt);
3445 if (htab->stub_group == NULL)
3446 return -1;
3447
3448 /* We can't use output_bfd->section_count here to find the top output
3449 section index as some sections may have been removed, and
3450 _bfd_strip_section_from_output doesn't renumber the indices. */
3451 for (section = output_bfd->sections, top_index = 0;
3452 section != NULL; section = section->next)
3453 {
3454 if (top_index < section->index)
3455 top_index = section->index;
3456 }
3457
3458 htab->top_index = top_index;
3459 amt = sizeof (asection *) * (top_index + 1);
3460 input_list = bfd_malloc (amt);
3461 htab->input_list = input_list;
3462 if (input_list == NULL)
3463 return -1;
3464
3465 /* For sections we aren't interested in, mark their entries with a
3466 value we can check later. */
3467 list = input_list + top_index;
3468 do
3469 *list = bfd_abs_section_ptr;
3470 while (list-- != input_list);
3471
3472 for (section = output_bfd->sections;
3473 section != NULL; section = section->next)
3474 {
3475 if ((section->flags & SEC_CODE) != 0)
3476 input_list[section->index] = NULL;
3477 }
3478
3479 return 1;
3480}
3481
cec5225b 3482/* Used by elfNN_aarch64_next_input_section and group_sections. */
a06ea964
NC
3483#define PREV_SEC(sec) (htab->stub_group[(sec)->id].link_sec)
3484
3485/* The linker repeatedly calls this function for each input section,
3486 in the order that input sections are linked into output sections.
3487 Build lists of input sections to determine groupings between which
3488 we may insert linker stubs. */
3489
3490void
cec5225b 3491elfNN_aarch64_next_input_section (struct bfd_link_info *info, asection *isec)
a06ea964 3492{
cec5225b
YZ
3493 struct elf_aarch64_link_hash_table *htab =
3494 elf_aarch64_hash_table (info);
a06ea964
NC
3495
3496 if (isec->output_section->index <= htab->top_index)
3497 {
3498 asection **list = htab->input_list + isec->output_section->index;
3499
cff69cf4 3500 if (*list != bfd_abs_section_ptr && (isec->flags & SEC_CODE) != 0)
a06ea964
NC
3501 {
3502 /* Steal the link_sec pointer for our list. */
3503 /* This happens to make the list in reverse order,
3504 which is what we want. */
3505 PREV_SEC (isec) = *list;
3506 *list = isec;
3507 }
3508 }
3509}
3510
3511/* See whether we can group stub sections together. Grouping stub
3512 sections may result in fewer stubs. More importantly, we need to
3513 put all .init* and .fini* stubs at the beginning of the .init or
3514 .fini output sections respectively, because glibc splits the
3515 _init and _fini functions into multiple parts. Putting a stub in
3516 the middle of a function is not a good idea. */
3517
3518static void
cec5225b 3519group_sections (struct elf_aarch64_link_hash_table *htab,
a06ea964 3520 bfd_size_type stub_group_size,
cff69cf4 3521 bfd_boolean stubs_always_after_branch)
a06ea964 3522{
cff69cf4 3523 asection **list = htab->input_list;
a06ea964
NC
3524
3525 do
3526 {
3527 asection *tail = *list;
cff69cf4 3528 asection *head;
a06ea964
NC
3529
3530 if (tail == bfd_abs_section_ptr)
3531 continue;
3532
cff69cf4
WD
3533 /* Reverse the list: we must avoid placing stubs at the
3534 beginning of the section because the beginning of the text
3535 section may be required for an interrupt vector in bare metal
3536 code. */
3537#define NEXT_SEC PREV_SEC
3538 head = NULL;
a06ea964 3539 while (tail != NULL)
cff69cf4
WD
3540 {
3541 /* Pop from tail. */
3542 asection *item = tail;
3543 tail = PREV_SEC (item);
3544
3545 /* Push on head. */
3546 NEXT_SEC (item) = head;
3547 head = item;
3548 }
3549
3550 while (head != NULL)
a06ea964
NC
3551 {
3552 asection *curr;
cff69cf4
WD
3553 asection *next;
3554 bfd_vma stub_group_start = head->output_offset;
3555 bfd_vma end_of_next;
a06ea964 3556
cff69cf4
WD
3557 curr = head;
3558 while (NEXT_SEC (curr) != NULL)
3559 {
3560 next = NEXT_SEC (curr);
3561 end_of_next = next->output_offset + next->size;
3562 if (end_of_next - stub_group_start >= stub_group_size)
3563 /* End of NEXT is too far from start, so stop. */
3564 break;
3565 /* Add NEXT to the group. */
3566 curr = next;
3567 }
a06ea964 3568
cff69cf4 3569 /* OK, the size from the start to the start of CURR is less
a06ea964 3570 than stub_group_size and thus can be handled by one stub
cff69cf4 3571 section. (Or the head section is itself larger than
a06ea964
NC
3572 stub_group_size, in which case we may be toast.)
3573 We should really be keeping track of the total size of
3574 stubs added here, as stubs contribute to the final output
3575 section size. */
3576 do
3577 {
cff69cf4 3578 next = NEXT_SEC (head);
a06ea964 3579 /* Set up this stub group. */
cff69cf4 3580 htab->stub_group[head->id].link_sec = curr;
a06ea964 3581 }
cff69cf4 3582 while (head != curr && (head = next) != NULL);
a06ea964
NC
3583
3584 /* But wait, there's more! Input sections up to stub_group_size
cff69cf4
WD
3585 bytes after the stub section can be handled by it too. */
3586 if (!stubs_always_after_branch)
a06ea964 3587 {
cff69cf4
WD
3588 stub_group_start = curr->output_offset + curr->size;
3589
3590 while (next != NULL)
a06ea964 3591 {
cff69cf4
WD
3592 end_of_next = next->output_offset + next->size;
3593 if (end_of_next - stub_group_start >= stub_group_size)
3594 /* End of NEXT is too far from stubs, so stop. */
3595 break;
3596 /* Add NEXT to the stub group. */
3597 head = next;
3598 next = NEXT_SEC (head);
3599 htab->stub_group[head->id].link_sec = curr;
a06ea964
NC
3600 }
3601 }
cff69cf4 3602 head = next;
a06ea964
NC
3603 }
3604 }
cff69cf4 3605 while (list++ != htab->input_list + htab->top_index);
a06ea964
NC
3606
3607 free (htab->input_list);
3608}
3609
cff69cf4 3610#undef PREV_SEC
a06ea964
NC
3611#undef PREV_SEC
3612
68fcca92
JW
3613#define AARCH64_BITS(x, pos, n) (((x) >> (pos)) & ((1 << (n)) - 1))
3614
3615#define AARCH64_RT(insn) AARCH64_BITS (insn, 0, 5)
3616#define AARCH64_RT2(insn) AARCH64_BITS (insn, 10, 5)
3617#define AARCH64_RA(insn) AARCH64_BITS (insn, 10, 5)
3618#define AARCH64_RD(insn) AARCH64_BITS (insn, 0, 5)
3619#define AARCH64_RN(insn) AARCH64_BITS (insn, 5, 5)
3620#define AARCH64_RM(insn) AARCH64_BITS (insn, 16, 5)
3621
3622#define AARCH64_MAC(insn) (((insn) & 0xff000000) == 0x9b000000)
3623#define AARCH64_BIT(insn, n) AARCH64_BITS (insn, n, 1)
3624#define AARCH64_OP31(insn) AARCH64_BITS (insn, 21, 3)
3625#define AARCH64_ZR 0x1f
3626
3627/* All ld/st ops. See C4-182 of the ARM ARM. The encoding space for
3628 LD_PCREL, LDST_RO, LDST_UI and LDST_UIMM cover prefetch ops. */
3629
3630#define AARCH64_LD(insn) (AARCH64_BIT (insn, 22) == 1)
3631#define AARCH64_LDST(insn) (((insn) & 0x0a000000) == 0x08000000)
3632#define AARCH64_LDST_EX(insn) (((insn) & 0x3f000000) == 0x08000000)
3633#define AARCH64_LDST_PCREL(insn) (((insn) & 0x3b000000) == 0x18000000)
3634#define AARCH64_LDST_NAP(insn) (((insn) & 0x3b800000) == 0x28000000)
3635#define AARCH64_LDSTP_PI(insn) (((insn) & 0x3b800000) == 0x28800000)
3636#define AARCH64_LDSTP_O(insn) (((insn) & 0x3b800000) == 0x29000000)
3637#define AARCH64_LDSTP_PRE(insn) (((insn) & 0x3b800000) == 0x29800000)
3638#define AARCH64_LDST_UI(insn) (((insn) & 0x3b200c00) == 0x38000000)
3639#define AARCH64_LDST_PIIMM(insn) (((insn) & 0x3b200c00) == 0x38000400)
3640#define AARCH64_LDST_U(insn) (((insn) & 0x3b200c00) == 0x38000800)
3641#define AARCH64_LDST_PREIMM(insn) (((insn) & 0x3b200c00) == 0x38000c00)
3642#define AARCH64_LDST_RO(insn) (((insn) & 0x3b200c00) == 0x38200800)
3643#define AARCH64_LDST_UIMM(insn) (((insn) & 0x3b000000) == 0x39000000)
3644#define AARCH64_LDST_SIMD_M(insn) (((insn) & 0xbfbf0000) == 0x0c000000)
3645#define AARCH64_LDST_SIMD_M_PI(insn) (((insn) & 0xbfa00000) == 0x0c800000)
3646#define AARCH64_LDST_SIMD_S(insn) (((insn) & 0xbf9f0000) == 0x0d000000)
3647#define AARCH64_LDST_SIMD_S_PI(insn) (((insn) & 0xbf800000) == 0x0d800000)
3648
3d14faea
MS
3649/* Classify an INSN if it is indeed a load/store.
3650
3651 Return TRUE if INSN is a LD/ST instruction otherwise return FALSE.
3652
3653 For scalar LD/ST instructions PAIR is FALSE, RT is returned and RT2
3654 is set equal to RT.
3655
2d0ca824 3656 For LD/ST pair instructions PAIR is TRUE, RT and RT2 are returned. */
68fcca92
JW
3657
3658static bfd_boolean
3d14faea 3659aarch64_mem_op_p (uint32_t insn, unsigned int *rt, unsigned int *rt2,
68fcca92
JW
3660 bfd_boolean *pair, bfd_boolean *load)
3661{
3662 uint32_t opcode;
3663 unsigned int r;
3664 uint32_t opc = 0;
3665 uint32_t v = 0;
3666 uint32_t opc_v = 0;
3667
de194d85 3668 /* Bail out quickly if INSN doesn't fall into the load-store
68fcca92
JW
3669 encoding space. */
3670 if (!AARCH64_LDST (insn))
3671 return FALSE;
3672
3673 *pair = FALSE;
3674 *load = FALSE;
3675 if (AARCH64_LDST_EX (insn))
3676 {
3677 *rt = AARCH64_RT (insn);
3d14faea 3678 *rt2 = *rt;
68fcca92 3679 if (AARCH64_BIT (insn, 21) == 1)
07d6d2b8 3680 {
68fcca92 3681 *pair = TRUE;
3d14faea 3682 *rt2 = AARCH64_RT2 (insn);
68fcca92
JW
3683 }
3684 *load = AARCH64_LD (insn);
3685 return TRUE;
3686 }
3687 else if (AARCH64_LDST_NAP (insn)
3688 || AARCH64_LDSTP_PI (insn)
3689 || AARCH64_LDSTP_O (insn)
3690 || AARCH64_LDSTP_PRE (insn))
3691 {
3692 *pair = TRUE;
3693 *rt = AARCH64_RT (insn);
3d14faea 3694 *rt2 = AARCH64_RT2 (insn);
68fcca92
JW
3695 *load = AARCH64_LD (insn);
3696 return TRUE;
3697 }
3698 else if (AARCH64_LDST_PCREL (insn)
3699 || AARCH64_LDST_UI (insn)
3700 || AARCH64_LDST_PIIMM (insn)
3701 || AARCH64_LDST_U (insn)
3702 || AARCH64_LDST_PREIMM (insn)
3703 || AARCH64_LDST_RO (insn)
3704 || AARCH64_LDST_UIMM (insn))
3705 {
3706 *rt = AARCH64_RT (insn);
3d14faea 3707 *rt2 = *rt;
68fcca92
JW
3708 if (AARCH64_LDST_PCREL (insn))
3709 *load = TRUE;
3710 opc = AARCH64_BITS (insn, 22, 2);
3711 v = AARCH64_BIT (insn, 26);
3712 opc_v = opc | (v << 2);
3713 *load = (opc_v == 1 || opc_v == 2 || opc_v == 3
3714 || opc_v == 5 || opc_v == 7);
3715 return TRUE;
3716 }
3717 else if (AARCH64_LDST_SIMD_M (insn)
3718 || AARCH64_LDST_SIMD_M_PI (insn))
3719 {
3720 *rt = AARCH64_RT (insn);
3721 *load = AARCH64_BIT (insn, 22);
3722 opcode = (insn >> 12) & 0xf;
3723 switch (opcode)
3724 {
3725 case 0:
3726 case 2:
3d14faea 3727 *rt2 = *rt + 3;
68fcca92
JW
3728 break;
3729
3730 case 4:
3731 case 6:
3d14faea 3732 *rt2 = *rt + 2;
68fcca92
JW
3733 break;
3734
3735 case 7:
3d14faea 3736 *rt2 = *rt;
68fcca92
JW
3737 break;
3738
3739 case 8:
3740 case 10:
3d14faea 3741 *rt2 = *rt + 1;
68fcca92
JW
3742 break;
3743
3744 default:
3745 return FALSE;
3746 }
3747 return TRUE;
3748 }
3749 else if (AARCH64_LDST_SIMD_S (insn)
3750 || AARCH64_LDST_SIMD_S_PI (insn))
3751 {
3752 *rt = AARCH64_RT (insn);
3753 r = (insn >> 21) & 1;
3754 *load = AARCH64_BIT (insn, 22);
3755 opcode = (insn >> 13) & 0x7;
3756 switch (opcode)
3757 {
3758 case 0:
3759 case 2:
3760 case 4:
3d14faea 3761 *rt2 = *rt + r;
68fcca92
JW
3762 break;
3763
3764 case 1:
3765 case 3:
3766 case 5:
3d14faea 3767 *rt2 = *rt + (r == 0 ? 2 : 3);
68fcca92
JW
3768 break;
3769
3770 case 6:
3d14faea 3771 *rt2 = *rt + r;
68fcca92
JW
3772 break;
3773
3774 case 7:
3d14faea 3775 *rt2 = *rt + (r == 0 ? 2 : 3);
68fcca92
JW
3776 break;
3777
3778 default:
3779 return FALSE;
3780 }
3781 return TRUE;
3782 }
3783
3784 return FALSE;
3785}
3786
3787/* Return TRUE if INSN is multiply-accumulate. */
3788
3789static bfd_boolean
3790aarch64_mlxl_p (uint32_t insn)
3791{
3792 uint32_t op31 = AARCH64_OP31 (insn);
3793
3794 if (AARCH64_MAC (insn)
3795 && (op31 == 0 || op31 == 1 || op31 == 5)
3796 /* Exclude MUL instructions which are encoded as a multiple accumulate
3797 with RA = XZR. */
3798 && AARCH64_RA (insn) != AARCH64_ZR)
3799 return TRUE;
3800
3801 return FALSE;
3802}
3803
3804/* Some early revisions of the Cortex-A53 have an erratum (835769) whereby
3805 it is possible for a 64-bit multiply-accumulate instruction to generate an
3806 incorrect result. The details are quite complex and hard to
3807 determine statically, since branches in the code may exist in some
3808 circumstances, but all cases end with a memory (load, store, or
3809 prefetch) instruction followed immediately by the multiply-accumulate
3810 operation. We employ a linker patching technique, by moving the potentially
3811 affected multiply-accumulate instruction into a patch region and replacing
3812 the original instruction with a branch to the patch. This function checks
3813 if INSN_1 is the memory operation followed by a multiply-accumulate
3814 operation (INSN_2). Return TRUE if an erratum sequence is found, FALSE
3815 if INSN_1 and INSN_2 are safe. */
3816
3817static bfd_boolean
3818aarch64_erratum_sequence (uint32_t insn_1, uint32_t insn_2)
3819{
3820 uint32_t rt;
3d14faea 3821 uint32_t rt2;
68fcca92
JW
3822 uint32_t rn;
3823 uint32_t rm;
3824 uint32_t ra;
3825 bfd_boolean pair;
3826 bfd_boolean load;
3827
3828 if (aarch64_mlxl_p (insn_2)
3d14faea 3829 && aarch64_mem_op_p (insn_1, &rt, &rt2, &pair, &load))
68fcca92
JW
3830 {
3831 /* Any SIMD memory op is independent of the subsequent MLA
3832 by definition of the erratum. */
3833 if (AARCH64_BIT (insn_1, 26))
3834 return TRUE;
3835
3836 /* If not SIMD, check for integer memory ops and MLA relationship. */
3837 rn = AARCH64_RN (insn_2);
3838 ra = AARCH64_RA (insn_2);
3839 rm = AARCH64_RM (insn_2);
3840
3841 /* If this is a load and there's a true(RAW) dependency, we are safe
3842 and this is not an erratum sequence. */
3843 if (load &&
3844 (rt == rn || rt == rm || rt == ra
3d14faea 3845 || (pair && (rt2 == rn || rt2 == rm || rt2 == ra))))
68fcca92
JW
3846 return FALSE;
3847
3848 /* We conservatively put out stubs for all other cases (including
3849 writebacks). */
3850 return TRUE;
3851 }
3852
3853 return FALSE;
3854}
3855
520c7b56
JW
3856/* Used to order a list of mapping symbols by address. */
3857
3858static int
3859elf_aarch64_compare_mapping (const void *a, const void *b)
3860{
3861 const elf_aarch64_section_map *amap = (const elf_aarch64_section_map *) a;
3862 const elf_aarch64_section_map *bmap = (const elf_aarch64_section_map *) b;
3863
3864 if (amap->vma > bmap->vma)
3865 return 1;
3866 else if (amap->vma < bmap->vma)
3867 return -1;
3868 else if (amap->type > bmap->type)
3869 /* Ensure results do not depend on the host qsort for objects with
3870 multiple mapping symbols at the same address by sorting on type
3871 after vma. */
3872 return 1;
3873 else if (amap->type < bmap->type)
3874 return -1;
3875 else
3876 return 0;
3877}
3878
2144188d 3879
35fee8b7
MS
3880static char *
3881_bfd_aarch64_erratum_835769_stub_name (unsigned num_fixes)
3882{
3883 char *stub_name = (char *) bfd_malloc
3884 (strlen ("__erratum_835769_veneer_") + 16);
bb69498c
NC
3885 if (stub_name != NULL)
3886 sprintf (stub_name,"__erratum_835769_veneer_%d", num_fixes);
35fee8b7
MS
3887 return stub_name;
3888}
3889
4106101c 3890/* Scan for Cortex-A53 erratum 835769 sequence.
2144188d
MS
3891
3892 Return TRUE else FALSE on abnormal termination. */
3893
68fcca92 3894static bfd_boolean
5421cc6e
MS
3895_bfd_aarch64_erratum_835769_scan (bfd *input_bfd,
3896 struct bfd_link_info *info,
3897 unsigned int *num_fixes_p)
68fcca92
JW
3898{
3899 asection *section;
3900 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
68fcca92 3901 unsigned int num_fixes = *num_fixes_p;
68fcca92
JW
3902
3903 if (htab == NULL)
2144188d 3904 return TRUE;
68fcca92
JW
3905
3906 for (section = input_bfd->sections;
3907 section != NULL;
3908 section = section->next)
3909 {
3910 bfd_byte *contents = NULL;
3911 struct _aarch64_elf_section_data *sec_data;
3912 unsigned int span;
3913
3914 if (elf_section_type (section) != SHT_PROGBITS
3915 || (elf_section_flags (section) & SHF_EXECINSTR) == 0
3916 || (section->flags & SEC_EXCLUDE) != 0
3917 || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
3918 || (section->output_section == bfd_abs_section_ptr))
3919 continue;
3920
3921 if (elf_section_data (section)->this_hdr.contents != NULL)
3922 contents = elf_section_data (section)->this_hdr.contents;
3923 else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
2144188d 3924 return FALSE;
68fcca92
JW
3925
3926 sec_data = elf_aarch64_section_data (section);
520c7b56
JW
3927
3928 qsort (sec_data->map, sec_data->mapcount,
3929 sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
3930
68fcca92
JW
3931 for (span = 0; span < sec_data->mapcount; span++)
3932 {
3933 unsigned int span_start = sec_data->map[span].vma;
3934 unsigned int span_end = ((span == sec_data->mapcount - 1)
3935 ? sec_data->map[0].vma + section->size
3936 : sec_data->map[span + 1].vma);
3937 unsigned int i;
3938 char span_type = sec_data->map[span].type;
3939
3940 if (span_type == 'd')
3941 continue;
3942
3943 for (i = span_start; i + 4 < span_end; i += 4)
3944 {
3945 uint32_t insn_1 = bfd_getl32 (contents + i);
3946 uint32_t insn_2 = bfd_getl32 (contents + i + 4);
3947
3948 if (aarch64_erratum_sequence (insn_1, insn_2))
3949 {
5421cc6e 3950 struct elf_aarch64_stub_hash_entry *stub_entry;
35fee8b7
MS
3951 char *stub_name = _bfd_aarch64_erratum_835769_stub_name (num_fixes);
3952 if (! stub_name)
2144188d 3953 return FALSE;
68fcca92 3954
5421cc6e
MS
3955 stub_entry = _bfd_aarch64_add_stub_entry_in_group (stub_name,
3956 section,
3957 htab);
3958 if (! stub_entry)
3959 return FALSE;
68fcca92 3960
5421cc6e
MS
3961 stub_entry->stub_type = aarch64_stub_erratum_835769_veneer;
3962 stub_entry->target_section = section;
3963 stub_entry->target_value = i + 4;
3964 stub_entry->veneered_insn = insn_2;
3965 stub_entry->output_name = stub_name;
68fcca92
JW
3966 num_fixes++;
3967 }
3968 }
3969 }
3970 if (elf_section_data (section)->this_hdr.contents == NULL)
3971 free (contents);
3972 }
3973
357d1523
MS
3974 *num_fixes_p = num_fixes;
3975
2144188d 3976 return TRUE;
68fcca92
JW
3977}
3978
13f622ec 3979
4106101c
MS
3980/* Test if instruction INSN is ADRP. */
3981
3982static bfd_boolean
3983_bfd_aarch64_adrp_p (uint32_t insn)
3984{
9fca35fc 3985 return ((insn & AARCH64_ADRP_OP_MASK) == AARCH64_ADRP_OP);
4106101c
MS
3986}
3987
3988
3989/* Helper predicate to look for cortex-a53 erratum 843419 sequence 1. */
3990
3991static bfd_boolean
3992_bfd_aarch64_erratum_843419_sequence_p (uint32_t insn_1, uint32_t insn_2,
3993 uint32_t insn_3)
3994{
3995 uint32_t rt;
3996 uint32_t rt2;
3997 bfd_boolean pair;
3998 bfd_boolean load;
3999
4000 return (aarch64_mem_op_p (insn_2, &rt, &rt2, &pair, &load)
4001 && (!pair
4002 || (pair && !load))
4003 && AARCH64_LDST_UIMM (insn_3)
4004 && AARCH64_RN (insn_3) == AARCH64_RD (insn_1));
4005}
4006
4007
4008/* Test for the presence of Cortex-A53 erratum 843419 instruction sequence.
4009
4010 Return TRUE if section CONTENTS at offset I contains one of the
4011 erratum 843419 sequences, otherwise return FALSE. If a sequence is
4012 seen set P_VENEER_I to the offset of the final LOAD/STORE
4013 instruction in the sequence.
4014 */
4015
4016static bfd_boolean
4017_bfd_aarch64_erratum_843419_p (bfd_byte *contents, bfd_vma vma,
4018 bfd_vma i, bfd_vma span_end,
4019 bfd_vma *p_veneer_i)
4020{
4021 uint32_t insn_1 = bfd_getl32 (contents + i);
4022
4023 if (!_bfd_aarch64_adrp_p (insn_1))
4024 return FALSE;
4025
4026 if (span_end < i + 12)
4027 return FALSE;
4028
4029 uint32_t insn_2 = bfd_getl32 (contents + i + 4);
4030 uint32_t insn_3 = bfd_getl32 (contents + i + 8);
4031
4032 if ((vma & 0xfff) != 0xff8 && (vma & 0xfff) != 0xffc)
4033 return FALSE;
4034
4035 if (_bfd_aarch64_erratum_843419_sequence_p (insn_1, insn_2, insn_3))
4036 {
4037 *p_veneer_i = i + 8;
4038 return TRUE;
4039 }
4040
4041 if (span_end < i + 16)
4042 return FALSE;
4043
4044 uint32_t insn_4 = bfd_getl32 (contents + i + 12);
4045
4046 if (_bfd_aarch64_erratum_843419_sequence_p (insn_1, insn_2, insn_4))
4047 {
4048 *p_veneer_i = i + 12;
4049 return TRUE;
4050 }
4051
4052 return FALSE;
4053}
4054
4055
13f622ec
MS
4056/* Resize all stub sections. */
4057
4058static void
4059_bfd_aarch64_resize_stubs (struct elf_aarch64_link_hash_table *htab)
4060{
4061 asection *section;
4062
4063 /* OK, we've added some stubs. Find out the new size of the
4064 stub sections. */
4065 for (section = htab->stub_bfd->sections;
4066 section != NULL; section = section->next)
4067 {
4068 /* Ignore non-stub sections. */
4069 if (!strstr (section->name, STUB_SUFFIX))
4070 continue;
4071 section->size = 0;
4072 }
4073
4074 bfd_hash_traverse (&htab->stub_hash_table, aarch64_size_one_stub, htab);
13f622ec 4075
61865519
MS
4076 for (section = htab->stub_bfd->sections;
4077 section != NULL; section = section->next)
4078 {
4079 if (!strstr (section->name, STUB_SUFFIX))
4080 continue;
4081
9a2ebffd
JW
4082 /* Add space for a branch. Add 8 bytes to keep section 8 byte aligned,
4083 as long branch stubs contain a 64-bit address. */
61865519 4084 if (section->size)
9a2ebffd 4085 section->size += 8;
4106101c
MS
4086
4087 /* Ensure all stub sections have a size which is a multiple of
4088 4096. This is important in order to ensure that the insertion
4089 of stub sections does not in itself move existing code around
739b5c9c
TC
4090 in such a way that new errata sequences are created. We only do this
4091 when the ADRP workaround is enabled. If only the ADR workaround is
4092 enabled then the stubs workaround won't ever be used. */
4093 if (htab->fix_erratum_843419 & ERRAT_ADRP)
4106101c
MS
4094 if (section->size)
4095 section->size = BFD_ALIGN (section->size, 0x1000);
4096 }
4097}
4098
9a2ebffd 4099/* Construct an erratum 843419 workaround stub name. */
4106101c
MS
4100
4101static char *
4102_bfd_aarch64_erratum_843419_stub_name (asection *input_section,
4103 bfd_vma offset)
4104{
4105 const bfd_size_type len = 8 + 4 + 1 + 8 + 1 + 16 + 1;
4106 char *stub_name = bfd_malloc (len);
4107
4108 if (stub_name != NULL)
4109 snprintf (stub_name, len, "e843419@%04x_%08x_%" BFD_VMA_FMT "x",
4110 input_section->owner->id,
4111 input_section->id,
4112 offset);
4113 return stub_name;
4114}
4115
4116/* Build a stub_entry structure describing an 843419 fixup.
4117
4118 The stub_entry constructed is populated with the bit pattern INSN
4119 of the instruction located at OFFSET within input SECTION.
4120
4121 Returns TRUE on success. */
4122
4123static bfd_boolean
4124_bfd_aarch64_erratum_843419_fixup (uint32_t insn,
4125 bfd_vma adrp_offset,
4126 bfd_vma ldst_offset,
4127 asection *section,
4128 struct bfd_link_info *info)
4129{
4130 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
4131 char *stub_name;
4132 struct elf_aarch64_stub_hash_entry *stub_entry;
4133
4134 stub_name = _bfd_aarch64_erratum_843419_stub_name (section, ldst_offset);
bb69498c
NC
4135 if (stub_name == NULL)
4136 return FALSE;
4106101c
MS
4137 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
4138 FALSE, FALSE);
4139 if (stub_entry)
4140 {
4141 free (stub_name);
4142 return TRUE;
4143 }
4144
4145 /* We always place an 843419 workaround veneer in the stub section
4146 attached to the input section in which an erratum sequence has
4147 been found. This ensures that later in the link process (in
4148 elfNN_aarch64_write_section) when we copy the veneered
4149 instruction from the input section into the stub section the
4150 copied instruction will have had any relocations applied to it.
4151 If we placed workaround veneers in any other stub section then we
4152 could not assume that all relocations have been processed on the
4153 corresponding input section at the point we output the stub
bb69498c 4154 section. */
4106101c
MS
4155
4156 stub_entry = _bfd_aarch64_add_stub_entry_after (stub_name, section, htab);
4157 if (stub_entry == NULL)
4158 {
4159 free (stub_name);
4160 return FALSE;
4161 }
4162
4163 stub_entry->adrp_offset = adrp_offset;
4164 stub_entry->target_value = ldst_offset;
4165 stub_entry->target_section = section;
4166 stub_entry->stub_type = aarch64_stub_erratum_843419_veneer;
4167 stub_entry->veneered_insn = insn;
4168 stub_entry->output_name = stub_name;
4169
4170 return TRUE;
4171}
4172
4173
4174/* Scan an input section looking for the signature of erratum 843419.
4175
4176 Scans input SECTION in INPUT_BFD looking for erratum 843419
4177 signatures, for each signature found a stub_entry is created
4178 describing the location of the erratum for subsequent fixup.
4179
4180 Return TRUE on successful scan, FALSE on failure to scan.
4181 */
4182
4183static bfd_boolean
4184_bfd_aarch64_erratum_843419_scan (bfd *input_bfd, asection *section,
4185 struct bfd_link_info *info)
4186{
4187 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
4188
4189 if (htab == NULL)
4190 return TRUE;
4191
4192 if (elf_section_type (section) != SHT_PROGBITS
4193 || (elf_section_flags (section) & SHF_EXECINSTR) == 0
4194 || (section->flags & SEC_EXCLUDE) != 0
4195 || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
4196 || (section->output_section == bfd_abs_section_ptr))
4197 return TRUE;
4198
4199 do
4200 {
4201 bfd_byte *contents = NULL;
4202 struct _aarch64_elf_section_data *sec_data;
4203 unsigned int span;
4204
4205 if (elf_section_data (section)->this_hdr.contents != NULL)
4206 contents = elf_section_data (section)->this_hdr.contents;
4207 else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
4208 return FALSE;
4209
4210 sec_data = elf_aarch64_section_data (section);
4211
4212 qsort (sec_data->map, sec_data->mapcount,
4213 sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
4214
4215 for (span = 0; span < sec_data->mapcount; span++)
4216 {
4217 unsigned int span_start = sec_data->map[span].vma;
4218 unsigned int span_end = ((span == sec_data->mapcount - 1)
4219 ? sec_data->map[0].vma + section->size
4220 : sec_data->map[span + 1].vma);
4221 unsigned int i;
4222 char span_type = sec_data->map[span].type;
4223
4224 if (span_type == 'd')
4225 continue;
4226
4227 for (i = span_start; i + 8 < span_end; i += 4)
4228 {
4229 bfd_vma vma = (section->output_section->vma
4230 + section->output_offset
4231 + i);
4232 bfd_vma veneer_i;
4233
4234 if (_bfd_aarch64_erratum_843419_p
4235 (contents, vma, i, span_end, &veneer_i))
4236 {
4237 uint32_t insn = bfd_getl32 (contents + veneer_i);
4238
4239 if (!_bfd_aarch64_erratum_843419_fixup (insn, i, veneer_i,
4240 section, info))
4241 return FALSE;
4242 }
4243 }
4244 }
4245
4246 if (elf_section_data (section)->this_hdr.contents == NULL)
4247 free (contents);
61865519 4248 }
4106101c
MS
4249 while (0);
4250
4251 return TRUE;
61865519 4252}
13f622ec 4253
4106101c 4254
a06ea964
NC
4255/* Determine and set the size of the stub section for a final link.
4256
4257 The basic idea here is to examine all the relocations looking for
4258 PC-relative calls to a target that is unreachable with a "bl"
4259 instruction. */
4260
4261bfd_boolean
cec5225b 4262elfNN_aarch64_size_stubs (bfd *output_bfd,
a06ea964
NC
4263 bfd *stub_bfd,
4264 struct bfd_link_info *info,
4265 bfd_signed_vma group_size,
4266 asection * (*add_stub_section) (const char *,
4267 asection *),
4268 void (*layout_sections_again) (void))
4269{
4270 bfd_size_type stub_group_size;
4271 bfd_boolean stubs_always_before_branch;
5421cc6e 4272 bfd_boolean stub_changed = FALSE;
cec5225b 4273 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
68fcca92 4274 unsigned int num_erratum_835769_fixes = 0;
a06ea964
NC
4275
4276 /* Propagate mach to stub bfd, because it may not have been
4277 finalized when we created stub_bfd. */
4278 bfd_set_arch_mach (stub_bfd, bfd_get_arch (output_bfd),
4279 bfd_get_mach (output_bfd));
4280
4281 /* Stash our params away. */
4282 htab->stub_bfd = stub_bfd;
4283 htab->add_stub_section = add_stub_section;
4284 htab->layout_sections_again = layout_sections_again;
4285 stubs_always_before_branch = group_size < 0;
4286 if (group_size < 0)
4287 stub_group_size = -group_size;
4288 else
4289 stub_group_size = group_size;
4290
4291 if (stub_group_size == 1)
4292 {
4293 /* Default values. */
b9eead84 4294 /* AArch64 branch range is +-128MB. The value used is 1MB less. */
a06ea964
NC
4295 stub_group_size = 127 * 1024 * 1024;
4296 }
4297
4298 group_sections (htab, stub_group_size, stubs_always_before_branch);
4299
4106101c
MS
4300 (*htab->layout_sections_again) ();
4301
5421cc6e
MS
4302 if (htab->fix_erratum_835769)
4303 {
4304 bfd *input_bfd;
4305
4306 for (input_bfd = info->input_bfds;
4307 input_bfd != NULL; input_bfd = input_bfd->link.next)
8c803a2d
AM
4308 {
4309 if (!is_aarch64_elf (input_bfd)
4310 || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
4311 continue;
4312
4313 if (!_bfd_aarch64_erratum_835769_scan (input_bfd, info,
4314 &num_erratum_835769_fixes))
4315 return FALSE;
4316 }
5421cc6e 4317
4106101c
MS
4318 _bfd_aarch64_resize_stubs (htab);
4319 (*htab->layout_sections_again) ();
4320 }
4321
739b5c9c 4322 if (htab->fix_erratum_843419 != ERRAT_NONE)
4106101c
MS
4323 {
4324 bfd *input_bfd;
4325
4326 for (input_bfd = info->input_bfds;
4327 input_bfd != NULL;
4328 input_bfd = input_bfd->link.next)
4329 {
4330 asection *section;
4331
8c803a2d
AM
4332 if (!is_aarch64_elf (input_bfd)
4333 || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
4334 continue;
4335
4106101c
MS
4336 for (section = input_bfd->sections;
4337 section != NULL;
4338 section = section->next)
4339 if (!_bfd_aarch64_erratum_843419_scan (input_bfd, section, info))
4340 return FALSE;
4341 }
4342
4343 _bfd_aarch64_resize_stubs (htab);
4344 (*htab->layout_sections_again) ();
5421cc6e
MS
4345 }
4346
a06ea964
NC
4347 while (1)
4348 {
4349 bfd *input_bfd;
a06ea964 4350
9b9971aa
MS
4351 for (input_bfd = info->input_bfds;
4352 input_bfd != NULL; input_bfd = input_bfd->link.next)
a06ea964
NC
4353 {
4354 Elf_Internal_Shdr *symtab_hdr;
4355 asection *section;
4356 Elf_Internal_Sym *local_syms = NULL;
4357
8c803a2d
AM
4358 if (!is_aarch64_elf (input_bfd)
4359 || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
4360 continue;
4361
a06ea964
NC
4362 /* We'll need the symbol table in a second. */
4363 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
4364 if (symtab_hdr->sh_info == 0)
4365 continue;
4366
4367 /* Walk over each section attached to the input bfd. */
4368 for (section = input_bfd->sections;
4369 section != NULL; section = section->next)
4370 {
4371 Elf_Internal_Rela *internal_relocs, *irelaend, *irela;
4372
4373 /* If there aren't any relocs, then there's nothing more
4374 to do. */
4375 if ((section->flags & SEC_RELOC) == 0
4376 || section->reloc_count == 0
4377 || (section->flags & SEC_CODE) == 0)
4378 continue;
4379
4380 /* If this section is a link-once section that will be
4381 discarded, then don't create any stubs. */
4382 if (section->output_section == NULL
4383 || section->output_section->owner != output_bfd)
4384 continue;
4385
4386 /* Get the relocs. */
4387 internal_relocs
4388 = _bfd_elf_link_read_relocs (input_bfd, section, NULL,
4389 NULL, info->keep_memory);
4390 if (internal_relocs == NULL)
4391 goto error_ret_free_local;
4392
4393 /* Now examine each relocation. */
4394 irela = internal_relocs;
4395 irelaend = irela + section->reloc_count;
4396 for (; irela < irelaend; irela++)
4397 {
4398 unsigned int r_type, r_indx;
cec5225b
YZ
4399 enum elf_aarch64_stub_type stub_type;
4400 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC
4401 asection *sym_sec;
4402 bfd_vma sym_value;
4403 bfd_vma destination;
cec5225b 4404 struct elf_aarch64_link_hash_entry *hash;
a06ea964
NC
4405 const char *sym_name;
4406 char *stub_name;
4407 const asection *id_sec;
4408 unsigned char st_type;
4409 bfd_size_type len;
4410
cec5225b
YZ
4411 r_type = ELFNN_R_TYPE (irela->r_info);
4412 r_indx = ELFNN_R_SYM (irela->r_info);
a06ea964
NC
4413
4414 if (r_type >= (unsigned int) R_AARCH64_end)
4415 {
4416 bfd_set_error (bfd_error_bad_value);
4417 error_ret_free_internal:
4418 if (elf_section_data (section)->relocs == NULL)
4419 free (internal_relocs);
4420 goto error_ret_free_local;
4421 }
4422
4423 /* Only look for stubs on unconditional branch and
4424 branch and link instructions. */
a6bb11b2
YZ
4425 if (r_type != (unsigned int) AARCH64_R (CALL26)
4426 && r_type != (unsigned int) AARCH64_R (JUMP26))
a06ea964
NC
4427 continue;
4428
4429 /* Now determine the call target, its name, value,
4430 section. */
4431 sym_sec = NULL;
4432 sym_value = 0;
4433 destination = 0;
4434 hash = NULL;
4435 sym_name = NULL;
4436 if (r_indx < symtab_hdr->sh_info)
4437 {
4438 /* It's a local symbol. */
4439 Elf_Internal_Sym *sym;
4440 Elf_Internal_Shdr *hdr;
4441
4442 if (local_syms == NULL)
4443 {
4444 local_syms
4445 = (Elf_Internal_Sym *) symtab_hdr->contents;
4446 if (local_syms == NULL)
4447 local_syms
4448 = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
4449 symtab_hdr->sh_info, 0,
4450 NULL, NULL, NULL);
4451 if (local_syms == NULL)
4452 goto error_ret_free_internal;
4453 }
4454
4455 sym = local_syms + r_indx;
4456 hdr = elf_elfsections (input_bfd)[sym->st_shndx];
4457 sym_sec = hdr->bfd_section;
4458 if (!sym_sec)
4459 /* This is an undefined symbol. It can never
4460 be resolved. */
4461 continue;
4462
4463 if (ELF_ST_TYPE (sym->st_info) != STT_SECTION)
4464 sym_value = sym->st_value;
4465 destination = (sym_value + irela->r_addend
4466 + sym_sec->output_offset
4467 + sym_sec->output_section->vma);
4468 st_type = ELF_ST_TYPE (sym->st_info);
4469 sym_name
4470 = bfd_elf_string_from_elf_section (input_bfd,
4471 symtab_hdr->sh_link,
4472 sym->st_name);
4473 }
4474 else
4475 {
4476 int e_indx;
4477
4478 e_indx = r_indx - symtab_hdr->sh_info;
cec5225b 4479 hash = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC
4480 elf_sym_hashes (input_bfd)[e_indx]);
4481
4482 while (hash->root.root.type == bfd_link_hash_indirect
4483 || hash->root.root.type == bfd_link_hash_warning)
cec5225b 4484 hash = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC
4485 hash->root.root.u.i.link);
4486
4487 if (hash->root.root.type == bfd_link_hash_defined
4488 || hash->root.root.type == bfd_link_hash_defweak)
4489 {
cec5225b
YZ
4490 struct elf_aarch64_link_hash_table *globals =
4491 elf_aarch64_hash_table (info);
a06ea964
NC
4492 sym_sec = hash->root.root.u.def.section;
4493 sym_value = hash->root.root.u.def.value;
4494 /* For a destination in a shared library,
4495 use the PLT stub as target address to
4496 decide whether a branch stub is
4497 needed. */
4498 if (globals->root.splt != NULL && hash != NULL
4499 && hash->root.plt.offset != (bfd_vma) - 1)
4500 {
4501 sym_sec = globals->root.splt;
4502 sym_value = hash->root.plt.offset;
4503 if (sym_sec->output_section != NULL)
4504 destination = (sym_value
4505 + sym_sec->output_offset
4506 +
4507 sym_sec->output_section->vma);
4508 }
4509 else if (sym_sec->output_section != NULL)
4510 destination = (sym_value + irela->r_addend
4511 + sym_sec->output_offset
4512 + sym_sec->output_section->vma);
4513 }
4514 else if (hash->root.root.type == bfd_link_hash_undefined
4515 || (hash->root.root.type
4516 == bfd_link_hash_undefweak))
4517 {
4518 /* For a shared library, use the PLT stub as
4519 target address to decide whether a long
4520 branch stub is needed.
4521 For absolute code, they cannot be handled. */
cec5225b
YZ
4522 struct elf_aarch64_link_hash_table *globals =
4523 elf_aarch64_hash_table (info);
a06ea964
NC
4524
4525 if (globals->root.splt != NULL && hash != NULL
4526 && hash->root.plt.offset != (bfd_vma) - 1)
4527 {
4528 sym_sec = globals->root.splt;
4529 sym_value = hash->root.plt.offset;
4530 if (sym_sec->output_section != NULL)
4531 destination = (sym_value
4532 + sym_sec->output_offset
4533 +
4534 sym_sec->output_section->vma);
4535 }
4536 else
4537 continue;
4538 }
4539 else
4540 {
4541 bfd_set_error (bfd_error_bad_value);
4542 goto error_ret_free_internal;
4543 }
4544 st_type = ELF_ST_TYPE (hash->root.type);
4545 sym_name = hash->root.root.root.string;
4546 }
4547
4548 /* Determine what (if any) linker stub is needed. */
9a228467
JW
4549 stub_type = aarch64_type_of_stub (section, irela, sym_sec,
4550 st_type, destination);
a06ea964
NC
4551 if (stub_type == aarch64_stub_none)
4552 continue;
4553
4554 /* Support for grouping stub sections. */
4555 id_sec = htab->stub_group[section->id].link_sec;
4556
4557 /* Get the name of this stub. */
cec5225b 4558 stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, hash,
a06ea964
NC
4559 irela);
4560 if (!stub_name)
4561 goto error_ret_free_internal;
4562
4563 stub_entry =
4564 aarch64_stub_hash_lookup (&htab->stub_hash_table,
4565 stub_name, FALSE, FALSE);
4566 if (stub_entry != NULL)
4567 {
4568 /* The proper stub has already been created. */
4569 free (stub_name);
3da64fe4
RA
4570 /* Always update this stub's target since it may have
4571 changed after layout. */
4572 stub_entry->target_value = sym_value + irela->r_addend;
a06ea964
NC
4573 continue;
4574 }
4575
ef857521
MS
4576 stub_entry = _bfd_aarch64_add_stub_entry_in_group
4577 (stub_name, section, htab);
a06ea964
NC
4578 if (stub_entry == NULL)
4579 {
4580 free (stub_name);
4581 goto error_ret_free_internal;
4582 }
4583
2f340668 4584 stub_entry->target_value = sym_value + irela->r_addend;
a06ea964
NC
4585 stub_entry->target_section = sym_sec;
4586 stub_entry->stub_type = stub_type;
4587 stub_entry->h = hash;
4588 stub_entry->st_type = st_type;
4589
4590 if (sym_name == NULL)
4591 sym_name = "unnamed";
4592 len = sizeof (STUB_ENTRY_NAME) + strlen (sym_name);
4593 stub_entry->output_name = bfd_alloc (htab->stub_bfd, len);
4594 if (stub_entry->output_name == NULL)
4595 {
4596 free (stub_name);
4597 goto error_ret_free_internal;
4598 }
4599
4600 snprintf (stub_entry->output_name, len, STUB_ENTRY_NAME,
4601 sym_name);
4602
4603 stub_changed = TRUE;
4604 }
4605
4606 /* We're done with the internal relocs, free them. */
4607 if (elf_section_data (section)->relocs == NULL)
4608 free (internal_relocs);
4609 }
4610 }
4611
4612 if (!stub_changed)
4613 break;
4614
13f622ec 4615 _bfd_aarch64_resize_stubs (htab);
a06ea964
NC
4616
4617 /* Ask the linker to do its stuff. */
4618 (*htab->layout_sections_again) ();
4619 stub_changed = FALSE;
4620 }
4621
4622 return TRUE;
4623
dc1e8a47 4624 error_ret_free_local:
a06ea964
NC
4625 return FALSE;
4626}
4627
4628/* Build all the stubs associated with the current output file. The
4629 stubs are kept in a hash table attached to the main linker hash
4630 table. We also set up the .plt entries for statically linked PIC
4631 functions here. This function is called via aarch64_elf_finish in the
4632 linker. */
4633
4634bfd_boolean
cec5225b 4635elfNN_aarch64_build_stubs (struct bfd_link_info *info)
a06ea964
NC
4636{
4637 asection *stub_sec;
4638 struct bfd_hash_table *table;
cec5225b 4639 struct elf_aarch64_link_hash_table *htab;
a06ea964 4640
cec5225b 4641 htab = elf_aarch64_hash_table (info);
a06ea964
NC
4642
4643 for (stub_sec = htab->stub_bfd->sections;
4644 stub_sec != NULL; stub_sec = stub_sec->next)
4645 {
4646 bfd_size_type size;
4647
4648 /* Ignore non-stub sections. */
4649 if (!strstr (stub_sec->name, STUB_SUFFIX))
4650 continue;
4651
4652 /* Allocate memory to hold the linker stubs. */
4653 size = stub_sec->size;
4654 stub_sec->contents = bfd_zalloc (htab->stub_bfd, size);
4655 if (stub_sec->contents == NULL && size != 0)
4656 return FALSE;
4657 stub_sec->size = 0;
61865519 4658
9a2ebffd
JW
4659 /* Add a branch around the stub section, and a nop, to keep it 8 byte
4660 aligned, as long branch stubs contain a 64-bit address. */
61865519 4661 bfd_putl32 (0x14000000 | (size >> 2), stub_sec->contents);
9a2ebffd
JW
4662 bfd_putl32 (INSN_NOP, stub_sec->contents + 4);
4663 stub_sec->size += 8;
a06ea964
NC
4664 }
4665
4666 /* Build the stubs as directed by the stub hash table. */
4667 table = &htab->stub_hash_table;
4668 bfd_hash_traverse (table, aarch64_build_one_stub, info);
4669
4670 return TRUE;
4671}
4672
4673
4674/* Add an entry to the code/data map for section SEC. */
4675
4676static void
cec5225b 4677elfNN_aarch64_section_map_add (asection *sec, char type, bfd_vma vma)
a06ea964
NC
4678{
4679 struct _aarch64_elf_section_data *sec_data =
cec5225b 4680 elf_aarch64_section_data (sec);
a06ea964
NC
4681 unsigned int newidx;
4682
4683 if (sec_data->map == NULL)
4684 {
cec5225b 4685 sec_data->map = bfd_malloc (sizeof (elf_aarch64_section_map));
a06ea964
NC
4686 sec_data->mapcount = 0;
4687 sec_data->mapsize = 1;
4688 }
4689
4690 newidx = sec_data->mapcount++;
4691
4692 if (sec_data->mapcount > sec_data->mapsize)
4693 {
4694 sec_data->mapsize *= 2;
4695 sec_data->map = bfd_realloc_or_free
cec5225b 4696 (sec_data->map, sec_data->mapsize * sizeof (elf_aarch64_section_map));
a06ea964
NC
4697 }
4698
4699 if (sec_data->map)
4700 {
4701 sec_data->map[newidx].vma = vma;
4702 sec_data->map[newidx].type = type;
4703 }
4704}
4705
4706
4707/* Initialise maps of insn/data for input BFDs. */
4708void
cec5225b 4709bfd_elfNN_aarch64_init_maps (bfd *abfd)
a06ea964
NC
4710{
4711 Elf_Internal_Sym *isymbuf;
4712 Elf_Internal_Shdr *hdr;
4713 unsigned int i, localsyms;
4714
4715 /* Make sure that we are dealing with an AArch64 elf binary. */
4716 if (!is_aarch64_elf (abfd))
4717 return;
4718
4719 if ((abfd->flags & DYNAMIC) != 0)
68fcca92 4720 return;
a06ea964
NC
4721
4722 hdr = &elf_symtab_hdr (abfd);
4723 localsyms = hdr->sh_info;
4724
4725 /* Obtain a buffer full of symbols for this BFD. The hdr->sh_info field
4726 should contain the number of local symbols, which should come before any
4727 global symbols. Mapping symbols are always local. */
4728 isymbuf = bfd_elf_get_elf_syms (abfd, hdr, localsyms, 0, NULL, NULL, NULL);
4729
4730 /* No internal symbols read? Skip this BFD. */
4731 if (isymbuf == NULL)
4732 return;
4733
4734 for (i = 0; i < localsyms; i++)
4735 {
4736 Elf_Internal_Sym *isym = &isymbuf[i];
4737 asection *sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
4738 const char *name;
4739
4740 if (sec != NULL && ELF_ST_BIND (isym->st_info) == STB_LOCAL)
4741 {
4742 name = bfd_elf_string_from_elf_section (abfd,
4743 hdr->sh_link,
4744 isym->st_name);
4745
4746 if (bfd_is_aarch64_special_symbol_name
4747 (name, BFD_AARCH64_SPECIAL_SYM_TYPE_MAP))
cec5225b 4748 elfNN_aarch64_section_map_add (sec, name[1], isym->st_value);
a06ea964
NC
4749 }
4750 }
4751}
4752
37c18eed
SD
4753static void
4754setup_plt_values (struct bfd_link_info *link_info,
4755 aarch64_plt_type plt_type)
4756{
4757 struct elf_aarch64_link_hash_table *globals;
4758 globals = elf_aarch64_hash_table (link_info);
4759
1dbade74
SD
4760 if (plt_type == PLT_BTI_PAC)
4761 {
68bb0359 4762 globals->plt0_entry = elfNN_aarch64_small_plt0_bti_entry;
1dbade74
SD
4763
4764 /* Only in ET_EXEC we need PLTn with BTI. */
4765 if (bfd_link_pde (link_info))
4766 {
4767 globals->plt_entry_size = PLT_BTI_PAC_SMALL_ENTRY_SIZE;
4768 globals->plt_entry = elfNN_aarch64_small_plt_bti_pac_entry;
4769 }
4770 else
4771 {
4772 globals->plt_entry_size = PLT_PAC_SMALL_ENTRY_SIZE;
4773 globals->plt_entry = elfNN_aarch64_small_plt_pac_entry;
4774 }
4775 }
4776 else if (plt_type == PLT_BTI)
37c18eed 4777 {
37c18eed 4778 globals->plt0_entry = elfNN_aarch64_small_plt0_bti_entry;
37c18eed
SD
4779
4780 /* Only in ET_EXEC we need PLTn with BTI. */
4781 if (bfd_link_pde (link_info))
4782 {
4783 globals->plt_entry_size = PLT_BTI_SMALL_ENTRY_SIZE;
4784 globals->plt_entry = elfNN_aarch64_small_plt_bti_entry;
4785 }
4786 }
1dbade74
SD
4787 else if (plt_type == PLT_PAC)
4788 {
1dbade74
SD
4789 globals->plt_entry_size = PLT_PAC_SMALL_ENTRY_SIZE;
4790 globals->plt_entry = elfNN_aarch64_small_plt_pac_entry;
4791 }
37c18eed
SD
4792}
4793
a06ea964
NC
4794/* Set option values needed during linking. */
4795void
cec5225b 4796bfd_elfNN_aarch64_set_options (struct bfd *output_bfd,
a06ea964
NC
4797 struct bfd_link_info *link_info,
4798 int no_enum_warn,
68fcca92 4799 int no_wchar_warn, int pic_veneer,
4106101c 4800 int fix_erratum_835769,
739b5c9c 4801 erratum_84319_opts fix_erratum_843419,
37c18eed
SD
4802 int no_apply_dynamic_relocs,
4803 aarch64_bti_pac_info bp_info)
a06ea964 4804{
cec5225b 4805 struct elf_aarch64_link_hash_table *globals;
a06ea964 4806
cec5225b 4807 globals = elf_aarch64_hash_table (link_info);
a06ea964 4808 globals->pic_veneer = pic_veneer;
68fcca92 4809 globals->fix_erratum_835769 = fix_erratum_835769;
739b5c9c
TC
4810 /* If the default options are used, then ERRAT_ADR will be set by default
4811 which will enable the ADRP->ADR workaround for the erratum 843419
4812 workaround. */
4106101c 4813 globals->fix_erratum_843419 = fix_erratum_843419;
1f56df9d 4814 globals->no_apply_dynamic_relocs = no_apply_dynamic_relocs;
a06ea964
NC
4815
4816 BFD_ASSERT (is_aarch64_elf (output_bfd));
4817 elf_aarch64_tdata (output_bfd)->no_enum_size_warning = no_enum_warn;
4818 elf_aarch64_tdata (output_bfd)->no_wchar_size_warning = no_wchar_warn;
37c18eed
SD
4819
4820 switch (bp_info.bti_type)
4821 {
4822 case BTI_WARN:
4823 elf_aarch64_tdata (output_bfd)->no_bti_warn = 0;
4824 elf_aarch64_tdata (output_bfd)->gnu_and_prop
4825 |= GNU_PROPERTY_AARCH64_FEATURE_1_BTI;
4826 break;
4827
4828 default:
4829 break;
4830 }
4831 elf_aarch64_tdata (output_bfd)->plt_type = bp_info.plt_type;
4832 setup_plt_values (link_info, bp_info.plt_type);
a06ea964
NC
4833}
4834
a06ea964
NC
4835static bfd_vma
4836aarch64_calculate_got_entry_vma (struct elf_link_hash_entry *h,
cec5225b 4837 struct elf_aarch64_link_hash_table
a06ea964
NC
4838 *globals, struct bfd_link_info *info,
4839 bfd_vma value, bfd *output_bfd,
4840 bfd_boolean *unresolved_reloc_p)
4841{
4842 bfd_vma off = (bfd_vma) - 1;
4843 asection *basegot = globals->root.sgot;
4844 bfd_boolean dyn = globals->root.dynamic_sections_created;
4845
4846 if (h != NULL)
4847 {
a6bb11b2 4848 BFD_ASSERT (basegot != NULL);
a06ea964
NC
4849 off = h->got.offset;
4850 BFD_ASSERT (off != (bfd_vma) - 1);
0e1862bb
L
4851 if (!WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)
4852 || (bfd_link_pic (info)
a06ea964
NC
4853 && SYMBOL_REFERENCES_LOCAL (info, h))
4854 || (ELF_ST_VISIBILITY (h->other)
4855 && h->root.type == bfd_link_hash_undefweak))
4856 {
4857 /* This is actually a static link, or it is a -Bsymbolic link
4858 and the symbol is defined locally. We must initialize this
4859 entry in the global offset table. Since the offset must
a6bb11b2
YZ
4860 always be a multiple of 8 (4 in the case of ILP32), we use
4861 the least significant bit to record whether we have
4862 initialized it already.
a06ea964
NC
4863 When doing a dynamic link, we create a .rel(a).got relocation
4864 entry to initialize the value. This is done in the
4865 finish_dynamic_symbol routine. */
4866 if ((off & 1) != 0)
4867 off &= ~1;
4868 else
4869 {
cec5225b 4870 bfd_put_NN (output_bfd, value, basegot->contents + off);
a06ea964
NC
4871 h->got.offset |= 1;
4872 }
4873 }
4874 else
4875 *unresolved_reloc_p = FALSE;
4876
4877 off = off + basegot->output_section->vma + basegot->output_offset;
4878 }
4879
4880 return off;
4881}
4882
4883/* Change R_TYPE to a more efficient access model where possible,
4884 return the new reloc type. */
4885
a6bb11b2
YZ
4886static bfd_reloc_code_real_type
4887aarch64_tls_transition_without_check (bfd_reloc_code_real_type r_type,
a06ea964
NC
4888 struct elf_link_hash_entry *h)
4889{
4890 bfd_boolean is_local = h == NULL;
a6bb11b2 4891
a06ea964
NC
4892 switch (r_type)
4893 {
a6bb11b2 4894 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
ce336788 4895 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
a6bb11b2
YZ
4896 return (is_local
4897 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
4898 : BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21);
4899
389b8029
MS
4900 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
4901 return (is_local
4902 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4903 : r_type);
4904
1ada945d
MS
4905 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
4906 return (is_local
4907 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
4908 : BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19);
4909
0484b454
RL
4910 case BFD_RELOC_AARCH64_TLSDESC_LDR:
4911 return (is_local
4912 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4913 : BFD_RELOC_AARCH64_NONE);
4914
4915 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
4916 return (is_local
4917 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC
4918 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC);
4919
4920 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
4921 return (is_local
4922 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2
4923 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1);
4924
a6bb11b2 4925 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
ce336788 4926 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a6bb11b2
YZ
4927 return (is_local
4928 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4929 : BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC);
4930
4931 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
4932 return is_local ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 : r_type;
4933
4934 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
4935 return is_local ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC : r_type;
4936
043bf05a
MS
4937 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
4938 return r_type;
4939
3c12b054
MS
4940 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
4941 return (is_local
4942 ? BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12
4943 : BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19);
4944
0484b454 4945 case BFD_RELOC_AARCH64_TLSDESC_ADD:
f955cccf 4946 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 4947 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a06ea964 4948 /* Instructions with these relocations will become NOPs. */
a6bb11b2
YZ
4949 return BFD_RELOC_AARCH64_NONE;
4950
259364ad
JW
4951 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
4952 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
4953 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
4954 return is_local ? BFD_RELOC_AARCH64_NONE : r_type;
4955
ac734732
RL
4956#if ARCH_SIZE == 64
4957 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
4958 return is_local
4959 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC
4960 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC;
4961
4962 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
4963 return is_local
4964 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2
4965 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1;
4966#endif
4967
a6bb11b2
YZ
4968 default:
4969 break;
a06ea964
NC
4970 }
4971
4972 return r_type;
4973}
4974
4975static unsigned int
a6bb11b2 4976aarch64_reloc_got_type (bfd_reloc_code_real_type r_type)
a06ea964
NC
4977{
4978 switch (r_type)
4979 {
a6bb11b2
YZ
4980 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
4981 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7018c030 4982 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
ce336788 4983 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
a2e1db00 4984 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
99ad26cb 4985 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
ce336788 4986 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
dc8008f5 4987 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
74a1bfe1 4988 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
a06ea964
NC
4989 return GOT_NORMAL;
4990
ce336788 4991 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a6bb11b2 4992 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3c12b054 4993 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
7ba7cfe4 4994 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
94facae3 4995 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
73f925cc 4996 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
f69e4920 4997 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
77a69ff8 4998 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
a06ea964
NC
4999 return GOT_TLS_GD;
5000
0484b454 5001 case BFD_RELOC_AARCH64_TLSDESC_ADD:
f955cccf 5002 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 5003 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
389b8029 5004 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
a6bb11b2 5005 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a6bb11b2 5006 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
f955cccf 5007 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
1ada945d 5008 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
0484b454
RL
5009 case BFD_RELOC_AARCH64_TLSDESC_LDR:
5010 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
5011 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
a06ea964
NC
5012 return GOT_TLSDESC_GD;
5013
a6bb11b2 5014 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a6bb11b2 5015 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
ce336788 5016 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
043bf05a 5017 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
3b957e5b
RL
5018 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
5019 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
a06ea964
NC
5020 return GOT_TLS_IE;
5021
a6bb11b2
YZ
5022 default:
5023 break;
a06ea964
NC
5024 }
5025 return GOT_UNKNOWN;
5026}
5027
5028static bfd_boolean
5029aarch64_can_relax_tls (bfd *input_bfd,
5030 struct bfd_link_info *info,
a6bb11b2 5031 bfd_reloc_code_real_type r_type,
a06ea964
NC
5032 struct elf_link_hash_entry *h,
5033 unsigned long r_symndx)
5034{
5035 unsigned int symbol_got_type;
5036 unsigned int reloc_got_type;
5037
9331eea1 5038 if (! IS_AARCH64_TLS_RELAX_RELOC (r_type))
a06ea964
NC
5039 return FALSE;
5040
cec5225b 5041 symbol_got_type = elfNN_aarch64_symbol_got_type (h, input_bfd, r_symndx);
a06ea964
NC
5042 reloc_got_type = aarch64_reloc_got_type (r_type);
5043
5044 if (symbol_got_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (reloc_got_type))
5045 return TRUE;
5046
6dda7875 5047 if (!bfd_link_executable (info))
a06ea964
NC
5048 return FALSE;
5049
5050 if (h && h->root.type == bfd_link_hash_undefweak)
5051 return FALSE;
5052
5053 return TRUE;
5054}
5055
a6bb11b2
YZ
5056/* Given the relocation code R_TYPE, return the relaxed bfd reloc
5057 enumerator. */
5058
5059static bfd_reloc_code_real_type
a06ea964
NC
5060aarch64_tls_transition (bfd *input_bfd,
5061 struct bfd_link_info *info,
5062 unsigned int r_type,
5063 struct elf_link_hash_entry *h,
5064 unsigned long r_symndx)
5065{
a6bb11b2 5066 bfd_reloc_code_real_type bfd_r_type
0aa13fee 5067 = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
a06ea964 5068
a6bb11b2
YZ
5069 if (! aarch64_can_relax_tls (input_bfd, info, bfd_r_type, h, r_symndx))
5070 return bfd_r_type;
5071
5072 return aarch64_tls_transition_without_check (bfd_r_type, h);
a06ea964
NC
5073}
5074
5075/* Return the base VMA address which should be subtracted from real addresses
a6bb11b2 5076 when resolving R_AARCH64_TLS_DTPREL relocation. */
a06ea964
NC
5077
5078static bfd_vma
5079dtpoff_base (struct bfd_link_info *info)
5080{
5081 /* If tls_sec is NULL, we should have signalled an error already. */
5082 BFD_ASSERT (elf_hash_table (info)->tls_sec != NULL);
5083 return elf_hash_table (info)->tls_sec->vma;
5084}
5085
a06ea964
NC
5086/* Return the base VMA address which should be subtracted from real addresses
5087 when resolving R_AARCH64_TLS_GOTTPREL64 relocations. */
5088
5089static bfd_vma
5090tpoff_base (struct bfd_link_info *info)
5091{
5092 struct elf_link_hash_table *htab = elf_hash_table (info);
5093
5094 /* If tls_sec is NULL, we should have signalled an error already. */
ac21917f 5095 BFD_ASSERT (htab->tls_sec != NULL);
a06ea964
NC
5096
5097 bfd_vma base = align_power ((bfd_vma) TCB_SIZE,
5098 htab->tls_sec->alignment_power);
5099 return htab->tls_sec->vma - base;
5100}
5101
5102static bfd_vma *
5103symbol_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
5104 unsigned long r_symndx)
5105{
5106 /* Calculate the address of the GOT entry for symbol
5107 referred to in h. */
5108 if (h != NULL)
5109 return &h->got.offset;
5110 else
5111 {
5112 /* local symbol */
5113 struct elf_aarch64_local_symbol *l;
5114
cec5225b 5115 l = elf_aarch64_locals (input_bfd);
a06ea964
NC
5116 return &l[r_symndx].got_offset;
5117 }
5118}
5119
5120static void
5121symbol_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
5122 unsigned long r_symndx)
5123{
5124 bfd_vma *p;
5125 p = symbol_got_offset_ref (input_bfd, h, r_symndx);
5126 *p |= 1;
5127}
5128
5129static int
5130symbol_got_offset_mark_p (bfd *input_bfd, struct elf_link_hash_entry *h,
5131 unsigned long r_symndx)
5132{
5133 bfd_vma value;
5134 value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
5135 return value & 1;
5136}
5137
5138static bfd_vma
5139symbol_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
5140 unsigned long r_symndx)
5141{
5142 bfd_vma value;
5143 value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
5144 value &= ~1;
5145 return value;
5146}
5147
5148static bfd_vma *
5149symbol_tlsdesc_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
5150 unsigned long r_symndx)
5151{
5152 /* Calculate the address of the GOT entry for symbol
5153 referred to in h. */
5154 if (h != NULL)
5155 {
cec5225b
YZ
5156 struct elf_aarch64_link_hash_entry *eh;
5157 eh = (struct elf_aarch64_link_hash_entry *) h;
a06ea964
NC
5158 return &eh->tlsdesc_got_jump_table_offset;
5159 }
5160 else
5161 {
5162 /* local symbol */
5163 struct elf_aarch64_local_symbol *l;
5164
cec5225b 5165 l = elf_aarch64_locals (input_bfd);
a06ea964
NC
5166 return &l[r_symndx].tlsdesc_got_jump_table_offset;
5167 }
5168}
5169
5170static void
5171symbol_tlsdesc_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
5172 unsigned long r_symndx)
5173{
5174 bfd_vma *p;
5175 p = symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
5176 *p |= 1;
5177}
5178
5179static int
5180symbol_tlsdesc_got_offset_mark_p (bfd *input_bfd,
5181 struct elf_link_hash_entry *h,
5182 unsigned long r_symndx)
5183{
5184 bfd_vma value;
5185 value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
5186 return value & 1;
5187}
5188
5189static bfd_vma
5190symbol_tlsdesc_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
5191 unsigned long r_symndx)
5192{
5193 bfd_vma value;
5194 value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
5195 value &= ~1;
5196 return value;
5197}
5198
68fcca92
JW
5199/* Data for make_branch_to_erratum_835769_stub(). */
5200
5201struct erratum_835769_branch_to_stub_data
5202{
4106101c 5203 struct bfd_link_info *info;
68fcca92
JW
5204 asection *output_section;
5205 bfd_byte *contents;
5206};
5207
5208/* Helper to insert branches to erratum 835769 stubs in the right
5209 places for a particular section. */
5210
5211static bfd_boolean
5212make_branch_to_erratum_835769_stub (struct bfd_hash_entry *gen_entry,
5213 void *in_arg)
5214{
5215 struct elf_aarch64_stub_hash_entry *stub_entry;
5216 struct erratum_835769_branch_to_stub_data *data;
5217 bfd_byte *contents;
5218 unsigned long branch_insn = 0;
5219 bfd_vma veneered_insn_loc, veneer_entry_loc;
5220 bfd_signed_vma branch_offset;
5221 unsigned int target;
5222 bfd *abfd;
5223
5224 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
5225 data = (struct erratum_835769_branch_to_stub_data *) in_arg;
5226
5227 if (stub_entry->target_section != data->output_section
5228 || stub_entry->stub_type != aarch64_stub_erratum_835769_veneer)
5229 return TRUE;
5230
5231 contents = data->contents;
5232 veneered_insn_loc = stub_entry->target_section->output_section->vma
5233 + stub_entry->target_section->output_offset
5234 + stub_entry->target_value;
5235 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
5236 + stub_entry->stub_sec->output_offset
5237 + stub_entry->stub_offset;
5238 branch_offset = veneer_entry_loc - veneered_insn_loc;
5239
5240 abfd = stub_entry->target_section->owner;
5241 if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
4eca0228 5242 _bfd_error_handler
90b6238f 5243 (_("%pB: error: erratum 835769 stub out "
4eca0228 5244 "of range (input file too large)"), abfd);
68fcca92
JW
5245
5246 target = stub_entry->target_value;
5247 branch_insn = 0x14000000;
5248 branch_offset >>= 2;
5249 branch_offset &= 0x3ffffff;
5250 branch_insn |= branch_offset;
5251 bfd_putl32 (branch_insn, &contents[target]);
5252
5253 return TRUE;
5254}
5255
4106101c
MS
5256
5257static bfd_boolean
5258_bfd_aarch64_erratum_843419_branch_to_stub (struct bfd_hash_entry *gen_entry,
5259 void *in_arg)
5260{
5261 struct elf_aarch64_stub_hash_entry *stub_entry
5262 = (struct elf_aarch64_stub_hash_entry *) gen_entry;
5263 struct erratum_835769_branch_to_stub_data *data
5264 = (struct erratum_835769_branch_to_stub_data *) in_arg;
5265 struct bfd_link_info *info;
5266 struct elf_aarch64_link_hash_table *htab;
5267 bfd_byte *contents;
5268 asection *section;
5269 bfd *abfd;
5270 bfd_vma place;
5271 uint32_t insn;
5272
5273 info = data->info;
5274 contents = data->contents;
5275 section = data->output_section;
5276
5277 htab = elf_aarch64_hash_table (info);
5278
5279 if (stub_entry->target_section != section
5280 || stub_entry->stub_type != aarch64_stub_erratum_843419_veneer)
5281 return TRUE;
5282
739b5c9c
TC
5283 BFD_ASSERT (((htab->fix_erratum_843419 & ERRAT_ADRP) && stub_entry->stub_sec)
5284 || (htab->fix_erratum_843419 & ERRAT_ADR));
5285
5286 /* Only update the stub section if we have one. We should always have one if
5287 we're allowed to use the ADRP errata workaround, otherwise it is not
5288 required. */
5289 if (stub_entry->stub_sec)
5290 {
5291 insn = bfd_getl32 (contents + stub_entry->target_value);
5292 bfd_putl32 (insn,
5293 stub_entry->stub_sec->contents + stub_entry->stub_offset);
5294 }
4106101c
MS
5295
5296 place = (section->output_section->vma + section->output_offset
5297 + stub_entry->adrp_offset);
5298 insn = bfd_getl32 (contents + stub_entry->adrp_offset);
5299
9fca35fc 5300 if (!_bfd_aarch64_adrp_p (insn))
4106101c
MS
5301 abort ();
5302
5303 bfd_signed_vma imm =
5304 (_bfd_aarch64_sign_extend
5305 ((bfd_vma) _bfd_aarch64_decode_adrp_imm (insn) << 12, 33)
5306 - (place & 0xfff));
5307
739b5c9c 5308 if ((htab->fix_erratum_843419 & ERRAT_ADR)
4106101c
MS
5309 && (imm >= AARCH64_MIN_ADRP_IMM && imm <= AARCH64_MAX_ADRP_IMM))
5310 {
5311 insn = (_bfd_aarch64_reencode_adr_imm (AARCH64_ADR_OP, imm)
5312 | AARCH64_RT (insn));
5313 bfd_putl32 (insn, contents + stub_entry->adrp_offset);
739b5c9c
TC
5314 /* Stub is not needed, don't map it out. */
5315 stub_entry->stub_type = aarch64_stub_none;
4106101c 5316 }
739b5c9c 5317 else if (htab->fix_erratum_843419 & ERRAT_ADRP)
4106101c
MS
5318 {
5319 bfd_vma veneered_insn_loc;
5320 bfd_vma veneer_entry_loc;
5321 bfd_signed_vma branch_offset;
5322 uint32_t branch_insn;
5323
5324 veneered_insn_loc = stub_entry->target_section->output_section->vma
5325 + stub_entry->target_section->output_offset
5326 + stub_entry->target_value;
5327 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
5328 + stub_entry->stub_sec->output_offset
5329 + stub_entry->stub_offset;
5330 branch_offset = veneer_entry_loc - veneered_insn_loc;
5331
5332 abfd = stub_entry->target_section->owner;
5333 if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
4eca0228 5334 _bfd_error_handler
90b6238f 5335 (_("%pB: error: erratum 843419 stub out "
4106101c
MS
5336 "of range (input file too large)"), abfd);
5337
5338 branch_insn = 0x14000000;
5339 branch_offset >>= 2;
5340 branch_offset &= 0x3ffffff;
5341 branch_insn |= branch_offset;
5342 bfd_putl32 (branch_insn, contents + stub_entry->target_value);
5343 }
739b5c9c
TC
5344 else
5345 {
5346 abfd = stub_entry->target_section->owner;
5347 _bfd_error_handler
64672071 5348 (_("%pB: error: erratum 843419 immediate 0x%" BFD_VMA_FMT "x "
739b5c9c
TC
5349 "out of range for ADR (input file too large) and "
5350 "--fix-cortex-a53-843419=adr used. Run the linker with "
5351 "--fix-cortex-a53-843419=full instead"), abfd, imm);
5352 bfd_set_error (bfd_error_bad_value);
5353 /* This function is called inside a hashtable traversal and the error
5354 handlers called above turn into non-fatal errors. Which means this
5355 case ld returns an exit code 0 and also produces a broken object file.
5356 To prevent this, issue a hard abort. */
5357 BFD_FAIL ();
5358 }
4106101c
MS
5359 return TRUE;
5360}
5361
5362
68fcca92
JW
5363static bfd_boolean
5364elfNN_aarch64_write_section (bfd *output_bfd ATTRIBUTE_UNUSED,
5365 struct bfd_link_info *link_info,
5366 asection *sec,
5367 bfd_byte *contents)
5368
5369{
5370 struct elf_aarch64_link_hash_table *globals =
f872121a 5371 elf_aarch64_hash_table (link_info);
68fcca92
JW
5372
5373 if (globals == NULL)
5374 return FALSE;
5375
5376 /* Fix code to point to erratum 835769 stubs. */
5377 if (globals->fix_erratum_835769)
5378 {
5379 struct erratum_835769_branch_to_stub_data data;
5380
4106101c 5381 data.info = link_info;
68fcca92
JW
5382 data.output_section = sec;
5383 data.contents = contents;
5384 bfd_hash_traverse (&globals->stub_hash_table,
5385 make_branch_to_erratum_835769_stub, &data);
5386 }
5387
4106101c
MS
5388 if (globals->fix_erratum_843419)
5389 {
5390 struct erratum_835769_branch_to_stub_data data;
5391
5392 data.info = link_info;
5393 data.output_section = sec;
5394 data.contents = contents;
5395 bfd_hash_traverse (&globals->stub_hash_table,
5396 _bfd_aarch64_erratum_843419_branch_to_stub, &data);
5397 }
5398
68fcca92
JW
5399 return FALSE;
5400}
5401
2aff25ba
JW
5402/* Return TRUE if RELOC is a relocation against the base of GOT table. */
5403
5404static bfd_boolean
5405aarch64_relocation_aginst_gp_p (bfd_reloc_code_real_type reloc)
5406{
5407 return (reloc == BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14
5408 || reloc == BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15
5409 || reloc == BFD_RELOC_AARCH64_LD64_GOTOFF_LO15
5410 || reloc == BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC
5411 || reloc == BFD_RELOC_AARCH64_MOVW_GOTOFF_G1);
5412}
5413
4e7fbb34
JW
5414/* Perform a relocation as part of a final link. The input relocation type
5415 should be TLS relaxed. */
5416
a06ea964 5417static bfd_reloc_status_type
cec5225b 5418elfNN_aarch64_final_link_relocate (reloc_howto_type *howto,
a06ea964
NC
5419 bfd *input_bfd,
5420 bfd *output_bfd,
5421 asection *input_section,
5422 bfd_byte *contents,
5423 Elf_Internal_Rela *rel,
5424 bfd_vma value,
5425 struct bfd_link_info *info,
5426 asection *sym_sec,
5427 struct elf_link_hash_entry *h,
5428 bfd_boolean *unresolved_reloc_p,
5429 bfd_boolean save_addend,
1419bbe5
WN
5430 bfd_vma *saved_addend,
5431 Elf_Internal_Sym *sym)
a06ea964 5432{
1419bbe5 5433 Elf_Internal_Shdr *symtab_hdr;
a06ea964 5434 unsigned int r_type = howto->type;
a6bb11b2
YZ
5435 bfd_reloc_code_real_type bfd_r_type
5436 = elfNN_aarch64_bfd_reloc_from_howto (howto);
a06ea964
NC
5437 unsigned long r_symndx;
5438 bfd_byte *hit_data = contents + rel->r_offset;
96d01d93 5439 bfd_vma place, off, got_entry_addr = 0;
a06ea964 5440 bfd_signed_vma signed_addend;
cec5225b 5441 struct elf_aarch64_link_hash_table *globals;
a06ea964 5442 bfd_boolean weak_undef_p;
ff07562f 5443 bfd_boolean relative_reloc;
b53b1bed 5444 asection *base_got;
ff07562f 5445 bfd_vma orig_value = value;
ddb7fd0f 5446 bfd_boolean resolved_to_zero;
0c1ded8d 5447 bfd_boolean abs_symbol_p;
7e057737 5448 bfd_boolean via_plt_p;
a06ea964 5449
cec5225b 5450 globals = elf_aarch64_hash_table (info);
a06ea964 5451
1419bbe5
WN
5452 symtab_hdr = &elf_symtab_hdr (input_bfd);
5453
a06ea964
NC
5454 BFD_ASSERT (is_aarch64_elf (input_bfd));
5455
cec5225b 5456 r_symndx = ELFNN_R_SYM (rel->r_info);
a06ea964 5457
a06ea964
NC
5458 place = input_section->output_section->vma
5459 + input_section->output_offset + rel->r_offset;
5460
5461 /* Get addend, accumulating the addend for consecutive relocs
5462 which refer to the same offset. */
5463 signed_addend = saved_addend ? *saved_addend : 0;
5464 signed_addend += rel->r_addend;
5465
5466 weak_undef_p = (h ? h->root.type == bfd_link_hash_undefweak
5467 : bfd_is_und_section (sym_sec));
c691de6a 5468 abs_symbol_p = h != NULL && bfd_is_abs_symbol (&h->root);
0c1ded8d 5469
7e057737
SP
5470 via_plt_p = (globals->root.splt != NULL && h != NULL
5471 && h->plt.offset != (bfd_vma) - 1);
a6bb11b2 5472
1419bbe5
WN
5473 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
5474 it here if it is defined in a non-shared object. */
5475 if (h != NULL
5476 && h->type == STT_GNU_IFUNC
5477 && h->def_regular)
5478 {
5479 asection *plt;
5480 const char *name;
99ad26cb 5481 bfd_vma addend = 0;
1419bbe5 5482
545bc2b3
SN
5483 if ((input_section->flags & SEC_ALLOC) == 0)
5484 {
f657f8c4
NC
5485 /* If this is a SHT_NOTE section without SHF_ALLOC, treat
5486 STT_GNU_IFUNC symbol as STT_FUNC. */
5487 if (elf_section_type (input_section) == SHT_NOTE)
5488 goto skip_ifunc;
5489
545bc2b3
SN
5490 /* Dynamic relocs are not propagated for SEC_DEBUGGING
5491 sections because such sections are not SEC_ALLOC and
5492 thus ld.so will not process them. */
5493 if ((input_section->flags & SEC_DEBUGGING) != 0)
5494 return bfd_reloc_ok;
5495
5496 if (h->root.root.string)
5497 name = h->root.root.string;
5498 else
5499 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym, NULL);
5500 _bfd_error_handler
5501 /* xgettext:c-format */
2dcf00ce
AM
5502 (_("%pB(%pA+%#" PRIx64 "): "
5503 "unresolvable %s relocation against symbol `%s'"),
5504 input_bfd, input_section, (uint64_t) rel->r_offset,
5505 howto->name, name);
545bc2b3 5506 bfd_set_error (bfd_error_bad_value);
1d75a8e2 5507 return bfd_reloc_notsupported;
545bc2b3
SN
5508 }
5509 else if (h->plt.offset == (bfd_vma) -1)
5510 goto bad_ifunc_reloc;
1419bbe5
WN
5511
5512 /* STT_GNU_IFUNC symbol must go through PLT. */
5513 plt = globals->root.splt ? globals->root.splt : globals->root.iplt;
5514 value = (plt->output_section->vma + plt->output_offset + h->plt.offset);
5515
5516 switch (bfd_r_type)
5517 {
5518 default:
dc1e8a47 5519 bad_ifunc_reloc:
1419bbe5
WN
5520 if (h->root.root.string)
5521 name = h->root.root.string;
5522 else
5523 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
5524 NULL);
4eca0228 5525 _bfd_error_handler
695344c0 5526 /* xgettext:c-format */
871b3ab2 5527 (_("%pB: relocation %s against STT_GNU_IFUNC "
1419bbe5
WN
5528 "symbol `%s' isn't handled by %s"), input_bfd,
5529 howto->name, name, __FUNCTION__);
5530 bfd_set_error (bfd_error_bad_value);
1d75a8e2 5531 return bfd_reloc_notsupported;
1419bbe5
WN
5532
5533 case BFD_RELOC_AARCH64_NN:
5534 if (rel->r_addend != 0)
5535 {
5536 if (h->root.root.string)
5537 name = h->root.root.string;
5538 else
5539 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
5540 sym, NULL);
4eca0228 5541 _bfd_error_handler
695344c0 5542 /* xgettext:c-format */
871b3ab2 5543 (_("%pB: relocation %s against STT_GNU_IFUNC "
2dcf00ce
AM
5544 "symbol `%s' has non-zero addend: %" PRId64),
5545 input_bfd, howto->name, name, (int64_t) rel->r_addend);
1419bbe5 5546 bfd_set_error (bfd_error_bad_value);
1d75a8e2 5547 return bfd_reloc_notsupported;
1419bbe5
WN
5548 }
5549
5550 /* Generate dynamic relocation only when there is a
5551 non-GOT reference in a shared object. */
0e1862bb 5552 if (bfd_link_pic (info) && h->non_got_ref)
1419bbe5
WN
5553 {
5554 Elf_Internal_Rela outrel;
5555 asection *sreloc;
5556
5557 /* Need a dynamic relocation to get the real function
5558 address. */
5559 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
5560 info,
5561 input_section,
5562 rel->r_offset);
5563 if (outrel.r_offset == (bfd_vma) -1
5564 || outrel.r_offset == (bfd_vma) -2)
5565 abort ();
5566
5567 outrel.r_offset += (input_section->output_section->vma
5568 + input_section->output_offset);
5569
5570 if (h->dynindx == -1
5571 || h->forced_local
0e1862bb 5572 || bfd_link_executable (info))
1419bbe5
WN
5573 {
5574 /* This symbol is resolved locally. */
5575 outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
5576 outrel.r_addend = (h->root.u.def.value
5577 + h->root.u.def.section->output_section->vma
5578 + h->root.u.def.section->output_offset);
5579 }
5580 else
5581 {
5582 outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
5583 outrel.r_addend = 0;
5584 }
5585
5586 sreloc = globals->root.irelifunc;
5587 elf_append_rela (output_bfd, sreloc, &outrel);
5588
5589 /* If this reloc is against an external symbol, we
5590 do not want to fiddle with the addend. Otherwise,
5591 we need to include the symbol value so that it
5592 becomes an addend for the dynamic reloc. For an
5593 internal symbol, we have updated addend. */
5594 return bfd_reloc_ok;
5595 }
5596 /* FALLTHROUGH */
1419bbe5 5597 case BFD_RELOC_AARCH64_CALL26:
ce336788 5598 case BFD_RELOC_AARCH64_JUMP26:
652afeef
TC
5599 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5600 place, value,
1419bbe5
WN
5601 signed_addend,
5602 weak_undef_p);
5603 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
5604 howto, value);
1419bbe5
WN
5605 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
5606 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7018c030 5607 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
ce336788 5608 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
99ad26cb 5609 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
dc8008f5 5610 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
74a1bfe1 5611 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
a2e1db00 5612 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
ce336788 5613 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
1419bbe5
WN
5614 base_got = globals->root.sgot;
5615 off = h->got.offset;
5616
5617 if (base_got == NULL)
5618 abort ();
5619
5620 if (off == (bfd_vma) -1)
5621 {
5622 bfd_vma plt_index;
5623
5624 /* We can't use h->got.offset here to save state, or
5625 even just remember the offset, as finish_dynamic_symbol
5626 would use that as offset into .got. */
5627
5628 if (globals->root.splt != NULL)
5629 {
b1ee0cc4
WN
5630 plt_index = ((h->plt.offset - globals->plt_header_size) /
5631 globals->plt_entry_size);
1419bbe5
WN
5632 off = (plt_index + 3) * GOT_ENTRY_SIZE;
5633 base_got = globals->root.sgotplt;
5634 }
5635 else
5636 {
5637 plt_index = h->plt.offset / globals->plt_entry_size;
5638 off = plt_index * GOT_ENTRY_SIZE;
5639 base_got = globals->root.igotplt;
5640 }
5641
5642 if (h->dynindx == -1
5643 || h->forced_local
5644 || info->symbolic)
5645 {
5646 /* This references the local definition. We must
5647 initialize this entry in the global offset table.
5648 Since the offset must always be a multiple of 8,
5649 we use the least significant bit to record
5650 whether we have initialized it already.
5651
5652 When doing a dynamic link, we create a .rela.got
5653 relocation entry to initialize the value. This
5654 is done in the finish_dynamic_symbol routine. */
5655 if ((off & 1) != 0)
5656 off &= ~1;
5657 else
5658 {
5659 bfd_put_NN (output_bfd, value,
5660 base_got->contents + off);
5661 /* Note that this is harmless as -1 | 1 still is -1. */
5662 h->got.offset |= 1;
5663 }
5664 }
5665 value = (base_got->output_section->vma
5666 + base_got->output_offset + off);
5667 }
5668 else
5669 value = aarch64_calculate_got_entry_vma (h, globals, info,
5670 value, output_bfd,
5671 unresolved_reloc_p);
a0becb89 5672
2aff25ba
JW
5673 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
5674 addend = (globals->root.sgot->output_section->vma
5675 + globals->root.sgot->output_offset);
a0becb89 5676
652afeef
TC
5677 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5678 place, value,
99ad26cb 5679 addend, weak_undef_p);
1419bbe5 5680 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type, howto, value);
1419bbe5 5681 case BFD_RELOC_AARCH64_ADD_LO12:
ce336788 5682 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
1419bbe5
WN
5683 break;
5684 }
5685 }
5686
f657f8c4 5687 skip_ifunc:
ddb7fd0f
L
5688 resolved_to_zero = (h != NULL
5689 && UNDEFWEAK_NO_DYNAMIC_RELOC (info, h));
5690
a6bb11b2 5691 switch (bfd_r_type)
a06ea964 5692 {
a6bb11b2 5693 case BFD_RELOC_AARCH64_NONE:
0484b454 5694 case BFD_RELOC_AARCH64_TLSDESC_ADD:
a6bb11b2 5695 case BFD_RELOC_AARCH64_TLSDESC_CALL:
0484b454 5696 case BFD_RELOC_AARCH64_TLSDESC_LDR:
a06ea964
NC
5697 *unresolved_reloc_p = FALSE;
5698 return bfd_reloc_ok;
5699
a6bb11b2 5700 case BFD_RELOC_AARCH64_NN:
a06ea964
NC
5701
5702 /* When generating a shared object or relocatable executable, these
07d6d2b8
AM
5703 relocations are copied into the output file to be resolved at
5704 run time. */
6353d82b
JW
5705 if (((bfd_link_pic (info)
5706 || globals->root.is_relocatable_executable)
5707 && (input_section->flags & SEC_ALLOC)
5708 && (h == NULL
ddb7fd0f
L
5709 || (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
5710 && !resolved_to_zero)
6353d82b
JW
5711 || h->root.type != bfd_link_hash_undefweak))
5712 /* Or we are creating an executable, we may need to keep relocations
5713 for symbols satisfied by a dynamic library if we manage to avoid
5714 copy relocs for the symbol. */
5715 || (ELIMINATE_COPY_RELOCS
5716 && !bfd_link_pic (info)
5717 && h != NULL
5718 && (input_section->flags & SEC_ALLOC)
5719 && h->dynindx != -1
5720 && !h->non_got_ref
5721 && ((h->def_dynamic
5722 && !h->def_regular)
5723 || h->root.type == bfd_link_hash_undefweak
5724 || h->root.type == bfd_link_hash_undefined)))
a06ea964
NC
5725 {
5726 Elf_Internal_Rela outrel;
5727 bfd_byte *loc;
5728 bfd_boolean skip, relocate;
5729 asection *sreloc;
5730
5731 *unresolved_reloc_p = FALSE;
5732
a06ea964
NC
5733 skip = FALSE;
5734 relocate = FALSE;
5735
5736 outrel.r_addend = signed_addend;
5737 outrel.r_offset =
5738 _bfd_elf_section_offset (output_bfd, info, input_section,
5739 rel->r_offset);
5740 if (outrel.r_offset == (bfd_vma) - 1)
5741 skip = TRUE;
5742 else if (outrel.r_offset == (bfd_vma) - 2)
5743 {
5744 skip = TRUE;
5745 relocate = TRUE;
5746 }
0c1ded8d
RL
5747 else if (abs_symbol_p)
5748 {
5749 /* Local absolute symbol. */
5750 skip = (h->forced_local || (h->dynindx == -1));
5751 relocate = skip;
5752 }
a06ea964
NC
5753
5754 outrel.r_offset += (input_section->output_section->vma
5755 + input_section->output_offset);
5756
5757 if (skip)
5758 memset (&outrel, 0, sizeof outrel);
5759 else if (h != NULL
5760 && h->dynindx != -1
0e1862bb 5761 && (!bfd_link_pic (info)
0c1ded8d 5762 || !(bfd_link_pie (info) || SYMBOLIC_BIND (info, h))
0e1862bb 5763 || !h->def_regular))
cec5225b 5764 outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
a06ea964
NC
5765 else
5766 {
5767 int symbol;
5768
5769 /* On SVR4-ish systems, the dynamic loader cannot
5770 relocate the text and data segments independently,
5771 so the symbol does not matter. */
5772 symbol = 0;
1f56df9d 5773 relocate = globals->no_apply_dynamic_relocs ? FALSE : TRUE;
a6bb11b2 5774 outrel.r_info = ELFNN_R_INFO (symbol, AARCH64_R (RELATIVE));
a06ea964
NC
5775 outrel.r_addend += value;
5776 }
5777
1419bbe5
WN
5778 sreloc = elf_section_data (input_section)->sreloc;
5779 if (sreloc == NULL || sreloc->contents == NULL)
5780 return bfd_reloc_notsupported;
5781
5782 loc = sreloc->contents + sreloc->reloc_count++ * RELOC_SIZE (globals);
cec5225b 5783 bfd_elfNN_swap_reloca_out (output_bfd, &outrel, loc);
a06ea964 5784
1419bbe5 5785 if (sreloc->reloc_count * RELOC_SIZE (globals) > sreloc->size)
a06ea964
NC
5786 {
5787 /* Sanity to check that we have previously allocated
5788 sufficient space in the relocation section for the
5789 number of relocations we actually want to emit. */
5790 abort ();
5791 }
5792
5793 /* If this reloc is against an external symbol, we do not want to
5794 fiddle with the addend. Otherwise, we need to include the symbol
5795 value so that it becomes an addend for the dynamic reloc. */
5796 if (!relocate)
5797 return bfd_reloc_ok;
5798
5799 return _bfd_final_link_relocate (howto, input_bfd, input_section,
5800 contents, rel->r_offset, value,
5801 signed_addend);
5802 }
5803 else
5804 value += signed_addend;
5805 break;
5806
7e057737
SP
5807 case BFD_RELOC_AARCH64_BRANCH19:
5808 case BFD_RELOC_AARCH64_TSTBR14:
5809 /* A conditional branch to an undefined weak symbol is converted to a
5810 branch to itself. */
5811 if (weak_undef_p && !via_plt_p)
5812 {
5813 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5814 place, value,
5815 signed_addend,
5816 weak_undef_p);
5817 break;
5818 }
5819 /* Fall through. */
a6bb11b2 5820 case BFD_RELOC_AARCH64_CALL26:
ce336788 5821 case BFD_RELOC_AARCH64_JUMP26:
a06ea964
NC
5822 {
5823 asection *splt = globals->root.splt;
a06ea964
NC
5824
5825 /* A call to an undefined weak symbol is converted to a jump to
5826 the next instruction unless a PLT entry will be created.
5827 The jump to the next instruction is optimized as a NOP.
5828 Do the same for local undefined symbols. */
5829 if (weak_undef_p && ! via_plt_p)
5830 {
5831 bfd_putl32 (INSN_NOP, hit_data);
5832 return bfd_reloc_ok;
5833 }
5834
5835 /* If the call goes through a PLT entry, make sure to
5836 check distance to the right destination address. */
5837 if (via_plt_p)
07f9ddfe
JW
5838 value = (splt->output_section->vma
5839 + splt->output_offset + h->plt.offset);
5840
5841 /* Check if a stub has to be inserted because the destination
5842 is too far away. */
5843 struct elf_aarch64_stub_hash_entry *stub_entry = NULL;
2f340668
JW
5844
5845 /* If the branch destination is directed to plt stub, "value" will be
5846 the final destination, otherwise we should plus signed_addend, it may
5847 contain non-zero value, for example call to local function symbol
5848 which are turned into "sec_sym + sec_off", and sec_off is kept in
5849 signed_addend. */
5850 if (! aarch64_valid_branch_p (via_plt_p ? value : value + signed_addend,
5851 place))
07f9ddfe
JW
5852 /* The target is out of reach, so redirect the branch to
5853 the local stub for this function. */
5854 stub_entry = elfNN_aarch64_get_stub_entry (input_section, sym_sec, h,
5855 rel, globals);
5856 if (stub_entry != NULL)
2f340668
JW
5857 {
5858 value = (stub_entry->stub_offset
5859 + stub_entry->stub_sec->output_offset
5860 + stub_entry->stub_sec->output_section->vma);
5861
5862 /* We have redirected the destination to stub entry address,
5863 so ignore any addend record in the original rela entry. */
5864 signed_addend = 0;
5865 }
a06ea964 5866 }
652afeef
TC
5867 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5868 place, value,
caed7120 5869 signed_addend, weak_undef_p);
07f9ddfe 5870 *unresolved_reloc_p = FALSE;
a06ea964
NC
5871 break;
5872
dcbd20eb
JW
5873 case BFD_RELOC_AARCH64_16_PCREL:
5874 case BFD_RELOC_AARCH64_32_PCREL:
5875 case BFD_RELOC_AARCH64_64_PCREL:
ce336788
JW
5876 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
5877 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
5878 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
5879 case BFD_RELOC_AARCH64_LD_LO19_PCREL:
1daf502a
RL
5880 case BFD_RELOC_AARCH64_MOVW_PREL_G0:
5881 case BFD_RELOC_AARCH64_MOVW_PREL_G0_NC:
5882 case BFD_RELOC_AARCH64_MOVW_PREL_G1:
5883 case BFD_RELOC_AARCH64_MOVW_PREL_G1_NC:
5884 case BFD_RELOC_AARCH64_MOVW_PREL_G2:
5885 case BFD_RELOC_AARCH64_MOVW_PREL_G2_NC:
5886 case BFD_RELOC_AARCH64_MOVW_PREL_G3:
0e1862bb 5887 if (bfd_link_pic (info)
dcbd20eb
JW
5888 && (input_section->flags & SEC_ALLOC) != 0
5889 && (input_section->flags & SEC_READONLY) != 0
d68f1976 5890 && !SYMBOL_REFERENCES_LOCAL (info, h))
dcbd20eb
JW
5891 {
5892 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
5893
4eca0228 5894 _bfd_error_handler
695344c0 5895 /* xgettext:c-format */
871b3ab2 5896 (_("%pB: relocation %s against symbol `%s' which may bind "
d68f1976
JW
5897 "externally can not be used when making a shared object; "
5898 "recompile with -fPIC"),
dcbd20eb
JW
5899 input_bfd, elfNN_aarch64_howto_table[howto_index].name,
5900 h->root.root.string);
5901 bfd_set_error (bfd_error_bad_value);
1d75a8e2 5902 return bfd_reloc_notsupported;
dcbd20eb 5903 }
1a0670f3 5904 /* Fall through. */
dcbd20eb 5905
a6bb11b2 5906 case BFD_RELOC_AARCH64_16:
92d77487
RL
5907#if ARCH_SIZE == 64
5908 case BFD_RELOC_AARCH64_32:
5909#endif
a6bb11b2 5910 case BFD_RELOC_AARCH64_ADD_LO12:
ce336788 5911 case BFD_RELOC_AARCH64_LDST128_LO12:
a6bb11b2
YZ
5912 case BFD_RELOC_AARCH64_LDST16_LO12:
5913 case BFD_RELOC_AARCH64_LDST32_LO12:
5914 case BFD_RELOC_AARCH64_LDST64_LO12:
ce336788 5915 case BFD_RELOC_AARCH64_LDST8_LO12:
a6bb11b2
YZ
5916 case BFD_RELOC_AARCH64_MOVW_G0:
5917 case BFD_RELOC_AARCH64_MOVW_G0_NC:
ce336788 5918 case BFD_RELOC_AARCH64_MOVW_G0_S:
a6bb11b2
YZ
5919 case BFD_RELOC_AARCH64_MOVW_G1:
5920 case BFD_RELOC_AARCH64_MOVW_G1_NC:
ce336788 5921 case BFD_RELOC_AARCH64_MOVW_G1_S:
a6bb11b2
YZ
5922 case BFD_RELOC_AARCH64_MOVW_G2:
5923 case BFD_RELOC_AARCH64_MOVW_G2_NC:
ce336788 5924 case BFD_RELOC_AARCH64_MOVW_G2_S:
a6bb11b2 5925 case BFD_RELOC_AARCH64_MOVW_G3:
652afeef
TC
5926 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5927 place, value,
caed7120 5928 signed_addend, weak_undef_p);
a06ea964
NC
5929 break;
5930
a6bb11b2
YZ
5931 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
5932 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7018c030 5933 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
ce336788 5934 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
99ad26cb 5935 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
ce336788 5936 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
2aff25ba
JW
5937 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
5938 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
5939 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
a06ea964
NC
5940 if (globals->root.sgot == NULL)
5941 BFD_ASSERT (h != NULL);
5942
ff07562f 5943 relative_reloc = FALSE;
a06ea964
NC
5944 if (h != NULL)
5945 {
99ad26cb 5946 bfd_vma addend = 0;
ff07562f
JW
5947
5948 /* If a symbol is not dynamic and is not undefined weak, bind it
5949 locally and generate a RELATIVE relocation under PIC mode.
5950
5951 NOTE: one symbol may be referenced by several relocations, we
5952 should only generate one RELATIVE relocation for that symbol.
5953 Therefore, check GOT offset mark first. */
5954 if (h->dynindx == -1
5955 && !h->forced_local
5956 && h->root.type != bfd_link_hash_undefweak
5957 && bfd_link_pic (info)
5958 && !symbol_got_offset_mark_p (input_bfd, h, r_symndx))
5959 relative_reloc = TRUE;
5960
a06ea964
NC
5961 value = aarch64_calculate_got_entry_vma (h, globals, info, value,
5962 output_bfd,
5963 unresolved_reloc_p);
ff07562f
JW
5964 /* Record the GOT entry address which will be used when generating
5965 RELATIVE relocation. */
5966 if (relative_reloc)
5967 got_entry_addr = value;
5968
2aff25ba 5969 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
99ad26cb
JW
5970 addend = (globals->root.sgot->output_section->vma
5971 + globals->root.sgot->output_offset);
652afeef
TC
5972 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5973 place, value,
99ad26cb 5974 addend, weak_undef_p);
a06ea964 5975 }
b53b1bed
JW
5976 else
5977 {
99ad26cb 5978 bfd_vma addend = 0;
b53b1bed
JW
5979 struct elf_aarch64_local_symbol *locals
5980 = elf_aarch64_locals (input_bfd);
5981
5982 if (locals == NULL)
5983 {
5984 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
4eca0228 5985 _bfd_error_handler
695344c0 5986 /* xgettext:c-format */
90b6238f 5987 (_("%pB: local symbol descriptor table be NULL when applying "
b53b1bed
JW
5988 "relocation %s against local symbol"),
5989 input_bfd, elfNN_aarch64_howto_table[howto_index].name);
5990 abort ();
5991 }
5992
5993 off = symbol_got_offset (input_bfd, h, r_symndx);
5994 base_got = globals->root.sgot;
ff07562f
JW
5995 got_entry_addr = (base_got->output_section->vma
5996 + base_got->output_offset + off);
b53b1bed
JW
5997
5998 if (!symbol_got_offset_mark_p (input_bfd, h, r_symndx))
5999 {
6000 bfd_put_64 (output_bfd, value, base_got->contents + off);
6001
ff07562f
JW
6002 /* For local symbol, we have done absolute relocation in static
6003 linking stage. While for shared library, we need to update the
6004 content of GOT entry according to the shared object's runtime
6005 base address. So, we need to generate a R_AARCH64_RELATIVE reloc
6006 for dynamic linker. */
0e1862bb 6007 if (bfd_link_pic (info))
ff07562f 6008 relative_reloc = TRUE;
b53b1bed
JW
6009
6010 symbol_got_offset_mark (input_bfd, h, r_symndx);
6011 }
6012
6013 /* Update the relocation value to GOT entry addr as we have transformed
6014 the direct data access into indirect data access through GOT. */
6015 value = got_entry_addr;
99ad26cb 6016
2aff25ba 6017 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
99ad26cb
JW
6018 addend = base_got->output_section->vma + base_got->output_offset;
6019
652afeef
TC
6020 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6021 place, value,
99ad26cb 6022 addend, weak_undef_p);
b53b1bed 6023 }
ff07562f
JW
6024
6025 if (relative_reloc)
6026 {
6027 asection *s;
6028 Elf_Internal_Rela outrel;
6029
6030 s = globals->root.srelgot;
6031 if (s == NULL)
6032 abort ();
6033
6034 outrel.r_offset = got_entry_addr;
6035 outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
6036 outrel.r_addend = orig_value;
6037 elf_append_rela (output_bfd, s, &outrel);
6038 }
a2e1db00
RL
6039 break;
6040
ce336788 6041 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a6bb11b2 6042 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3c12b054 6043 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
a6bb11b2 6044 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a6bb11b2 6045 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
ce336788 6046 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
043bf05a 6047 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
73f925cc 6048 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
f69e4920 6049 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
77a69ff8 6050 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
a06ea964
NC
6051 if (globals->root.sgot == NULL)
6052 return bfd_reloc_notsupported;
6053
6054 value = (symbol_got_offset (input_bfd, h, r_symndx)
6055 + globals->root.sgot->output_section->vma
f44a1f8e 6056 + globals->root.sgot->output_offset);
a06ea964 6057
652afeef
TC
6058 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6059 place, value,
caed7120 6060 0, weak_undef_p);
a06ea964
NC
6061 *unresolved_reloc_p = FALSE;
6062 break;
6063
7ba7cfe4 6064 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
94facae3 6065 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
3b957e5b
RL
6066 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
6067 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
94facae3
RL
6068 if (globals->root.sgot == NULL)
6069 return bfd_reloc_notsupported;
6070
6071 value = symbol_got_offset (input_bfd, h, r_symndx);
652afeef
TC
6072 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6073 place, value,
94facae3
RL
6074 0, weak_undef_p);
6075 *unresolved_reloc_p = FALSE;
6076 break;
6077
6ffe9a1b 6078 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12:
40fbed84 6079 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12:
753999c1 6080 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC:
07c9aa07
JW
6081 case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12:
6082 case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC:
6083 case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12:
6084 case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC:
6085 case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12:
6086 case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC:
6087 case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12:
6088 case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC:
6ffe9a1b
JW
6089 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0:
6090 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC:
6091 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1:
6092 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC:
6093 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2:
652afeef
TC
6094 {
6095 if (!(weak_undef_p || elf_hash_table (info)->tls_sec))
6096 {
6097 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
6098 _bfd_error_handler
6099 /* xgettext:c-format */
6100 (_("%pB: TLS relocation %s against undefined symbol `%s'"),
6101 input_bfd, elfNN_aarch64_howto_table[howto_index].name,
6102 h->root.root.string);
6103 bfd_set_error (bfd_error_bad_value);
6104 return bfd_reloc_notsupported;
6105 }
6106
6107 bfd_vma def_value
6108 = weak_undef_p ? 0 : signed_addend - dtpoff_base (info);
6109 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6110 place, value,
6111 def_value, weak_undef_p);
6112 break;
6113 }
40fbed84 6114
a6bb11b2
YZ
6115 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
6116 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
6117 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
e04ef022
RL
6118 case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12:
6119 case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12_NC:
6120 case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12:
6121 case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12_NC:
6122 case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12:
6123 case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12_NC:
6124 case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12:
6125 case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12_NC:
a6bb11b2
YZ
6126 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
6127 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
6128 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
6129 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
6130 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
652afeef
TC
6131 {
6132 if (!(weak_undef_p || elf_hash_table (info)->tls_sec))
6133 {
6134 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
6135 _bfd_error_handler
6136 /* xgettext:c-format */
6137 (_("%pB: TLS relocation %s against undefined symbol `%s'"),
6138 input_bfd, elfNN_aarch64_howto_table[howto_index].name,
6139 h->root.root.string);
6140 bfd_set_error (bfd_error_bad_value);
6141 return bfd_reloc_notsupported;
6142 }
6143
6144 bfd_vma def_value
6145 = weak_undef_p ? 0 : signed_addend - tpoff_base (info);
6146 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6147 place, value,
6148 def_value, weak_undef_p);
6149 *unresolved_reloc_p = FALSE;
6150 break;
6151 }
a06ea964 6152
f955cccf 6153 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 6154 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
389b8029 6155 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
a6bb11b2 6156 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
f955cccf 6157 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
1ada945d 6158 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
a06ea964
NC
6159 if (globals->root.sgot == NULL)
6160 return bfd_reloc_notsupported;
a06ea964
NC
6161 value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
6162 + globals->root.sgotplt->output_section->vma
f44a1f8e 6163 + globals->root.sgotplt->output_offset
a06ea964
NC
6164 + globals->sgotplt_jump_table_size);
6165
652afeef
TC
6166 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6167 place, value,
caed7120 6168 0, weak_undef_p);
a06ea964
NC
6169 *unresolved_reloc_p = FALSE;
6170 break;
6171
0484b454
RL
6172 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
6173 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
6174 if (globals->root.sgot == NULL)
6175 return bfd_reloc_notsupported;
6176
6177 value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
6178 + globals->root.sgotplt->output_section->vma
6179 + globals->root.sgotplt->output_offset
6180 + globals->sgotplt_jump_table_size);
6181
6182 value -= (globals->root.sgot->output_section->vma
6183 + globals->root.sgot->output_offset);
6184
652afeef
TC
6185 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6186 place, value,
0484b454
RL
6187 0, weak_undef_p);
6188 *unresolved_reloc_p = FALSE;
6189 break;
6190
a06ea964
NC
6191 default:
6192 return bfd_reloc_notsupported;
6193 }
6194
6195 if (saved_addend)
6196 *saved_addend = value;
6197
6198 /* Only apply the final relocation in a sequence. */
6199 if (save_addend)
6200 return bfd_reloc_continue;
6201
caed7120
YZ
6202 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
6203 howto, value);
a06ea964
NC
6204}
6205
2d0ca824
YN
6206/* LP64 and ILP32 operates on x- and w-registers respectively.
6207 Next definitions take into account the difference between
6208 corresponding machine codes. R means x-register if the target
6209 arch is LP64, and w-register if the target is ILP32. */
6210
6211#if ARCH_SIZE == 64
6212# define add_R0_R0 (0x91000000)
6213# define add_R0_R0_R1 (0x8b000020)
6214# define add_R0_R1 (0x91400020)
6215# define ldr_R0 (0x58000000)
6216# define ldr_R0_mask(i) (i & 0xffffffe0)
6217# define ldr_R0_x0 (0xf9400000)
6218# define ldr_hw_R0 (0xf2a00000)
6219# define movk_R0 (0xf2800000)
6220# define movz_R0 (0xd2a00000)
6221# define movz_hw_R0 (0xd2c00000)
6222#else /*ARCH_SIZE == 32 */
6223# define add_R0_R0 (0x11000000)
6224# define add_R0_R0_R1 (0x0b000020)
6225# define add_R0_R1 (0x11400020)
6226# define ldr_R0 (0x18000000)
6227# define ldr_R0_mask(i) (i & 0xbfffffe0)
6228# define ldr_R0_x0 (0xb9400000)
6229# define ldr_hw_R0 (0x72a00000)
6230# define movk_R0 (0x72800000)
6231# define movz_R0 (0x52a00000)
6232# define movz_hw_R0 (0x52c00000)
6233#endif
6234
9fca35fc
TC
6235/* Structure to hold payload for _bfd_aarch64_erratum_843419_clear_stub,
6236 it is used to identify the stub information to reset. */
6237
6238struct erratum_843419_branch_to_stub_clear_data
6239{
6240 bfd_vma adrp_offset;
6241 asection *output_section;
6242};
6243
6244/* Clear the erratum information for GEN_ENTRY if the ADRP_OFFSET and
6245 section inside IN_ARG matches. The clearing is done by setting the
6246 stub_type to none. */
6247
6248static bfd_boolean
6249_bfd_aarch64_erratum_843419_clear_stub (struct bfd_hash_entry *gen_entry,
6250 void *in_arg)
6251{
6252 struct elf_aarch64_stub_hash_entry *stub_entry
6253 = (struct elf_aarch64_stub_hash_entry *) gen_entry;
6254 struct erratum_843419_branch_to_stub_clear_data *data
6255 = (struct erratum_843419_branch_to_stub_clear_data *) in_arg;
6256
6257 if (stub_entry->target_section != data->output_section
6258 || stub_entry->stub_type != aarch64_stub_erratum_843419_veneer
6259 || stub_entry->adrp_offset != data->adrp_offset)
6260 return TRUE;
6261
6262 /* Change the stub type instead of removing the entry, removing from the hash
6263 table would be slower and we have already reserved the memory for the entry
6264 so there wouldn't be much gain. Changing the stub also keeps around a
6265 record of what was there before. */
6266 stub_entry->stub_type = aarch64_stub_none;
6267
6268 /* We're done and there could have been only one matching stub at that
6269 particular offset, so abort further traversal. */
6270 return FALSE;
6271}
6272
6273/* TLS Relaxations may relax an adrp sequence that matches the erratum 843419
6274 sequence. In this case the erratum no longer applies and we need to remove
6275 the entry from the pending stub generation. This clears matching adrp insn
6276 at ADRP_OFFSET in INPUT_SECTION in the stub table defined in GLOBALS. */
6277
6278static void
6279clear_erratum_843419_entry (struct elf_aarch64_link_hash_table *globals,
6280 bfd_vma adrp_offset, asection *input_section)
6281{
739b5c9c 6282 if (globals->fix_erratum_843419 & ERRAT_ADRP)
9fca35fc
TC
6283 {
6284 struct erratum_843419_branch_to_stub_clear_data data;
6285 data.adrp_offset = adrp_offset;
6286 data.output_section = input_section;
6287
6288 bfd_hash_traverse (&globals->stub_hash_table,
6289 _bfd_aarch64_erratum_843419_clear_stub, &data);
6290 }
6291}
6292
a06ea964
NC
6293/* Handle TLS relaxations. Relaxing is possible for symbols that use
6294 R_AARCH64_TLSDESC_ADR_{PAGE, LD64_LO12_NC, ADD_LO12_NC} during a static
6295 link.
6296
6297 Return bfd_reloc_ok if we're done, bfd_reloc_continue if the caller
6298 is to then call final_link_relocate. Return other values in the
6299 case of error. */
6300
6301static bfd_reloc_status_type
cec5225b 6302elfNN_aarch64_tls_relax (struct elf_aarch64_link_hash_table *globals,
9fca35fc
TC
6303 bfd *input_bfd, asection *input_section,
6304 bfd_byte *contents, Elf_Internal_Rela *rel,
6305 struct elf_link_hash_entry *h)
a06ea964
NC
6306{
6307 bfd_boolean is_local = h == NULL;
cec5225b 6308 unsigned int r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC
6309 unsigned long insn;
6310
6311 BFD_ASSERT (globals && input_bfd && contents && rel);
6312
0aa13fee 6313 switch (elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type))
a06ea964 6314 {
a6bb11b2 6315 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
ce336788 6316 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
a06ea964
NC
6317 if (is_local)
6318 {
6319 /* GD->LE relaxation:
2d0ca824 6320 adrp x0, :tlsgd:var => movz R0, :tprel_g1:var
a06ea964 6321 or
2d0ca824
YN
6322 adrp x0, :tlsdesc:var => movz R0, :tprel_g1:var
6323
6324 Where R is x for LP64, and w for ILP32. */
6325 bfd_putl32 (movz_R0, contents + rel->r_offset);
9fca35fc
TC
6326 /* We have relaxed the adrp into a mov, we may have to clear any
6327 pending erratum fixes. */
6328 clear_erratum_843419_entry (globals, rel->r_offset, input_section);
a06ea964
NC
6329 return bfd_reloc_continue;
6330 }
6331 else
6332 {
6333 /* GD->IE relaxation:
6334 adrp x0, :tlsgd:var => adrp x0, :gottprel:var
6335 or
6336 adrp x0, :tlsdesc:var => adrp x0, :gottprel:var
6337 */
a06ea964
NC
6338 return bfd_reloc_continue;
6339 }
6340
389b8029
MS
6341 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
6342 BFD_ASSERT (0);
6343 break;
6344
1ada945d
MS
6345 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
6346 if (is_local)
6347 {
6348 /* Tiny TLSDESC->LE relaxation:
07d6d2b8
AM
6349 ldr x1, :tlsdesc:var => movz R0, #:tprel_g1:var
6350 adr x0, :tlsdesc:var => movk R0, #:tprel_g0_nc:var
1ada945d 6351 .tlsdesccall var
07d6d2b8 6352 blr x1 => nop
2d0ca824
YN
6353
6354 Where R is x for LP64, and w for ILP32. */
1ada945d
MS
6355 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSDESC_ADR_PREL21));
6356 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (TLSDESC_CALL));
6357
6358 rel[1].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
6359 AARCH64_R (TLSLE_MOVW_TPREL_G0_NC));
6360 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6361
2d0ca824
YN
6362 bfd_putl32 (movz_R0, contents + rel->r_offset);
6363 bfd_putl32 (movk_R0, contents + rel->r_offset + 4);
1ada945d
MS
6364 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 8);
6365 return bfd_reloc_continue;
6366 }
6367 else
6368 {
6369 /* Tiny TLSDESC->IE relaxation:
07d6d2b8
AM
6370 ldr x1, :tlsdesc:var => ldr x0, :gottprel:var
6371 adr x0, :tlsdesc:var => nop
1ada945d 6372 .tlsdesccall var
07d6d2b8 6373 blr x1 => nop
1ada945d
MS
6374 */
6375 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSDESC_ADR_PREL21));
6376 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (TLSDESC_CALL));
6377
6378 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6379 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6380
2d0ca824 6381 bfd_putl32 (ldr_R0, contents + rel->r_offset);
1ada945d
MS
6382 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 4);
6383 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 8);
6384 return bfd_reloc_continue;
6385 }
6386
3c12b054
MS
6387 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
6388 if (is_local)
6389 {
6390 /* Tiny GD->LE relaxation:
07d6d2b8
AM
6391 adr x0, :tlsgd:var => mrs x1, tpidr_el0
6392 bl __tls_get_addr => add R0, R1, #:tprel_hi12:x, lsl #12
6393 nop => add R0, R0, #:tprel_lo12_nc:x
2d0ca824
YN
6394
6395 Where R is x for LP64, and x for Ilp32. */
3c12b054
MS
6396
6397 /* First kill the tls_get_addr reloc on the bl instruction. */
6398 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6399
6400 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 0);
2d0ca824
YN
6401 bfd_putl32 (add_R0_R1, contents + rel->r_offset + 4);
6402 bfd_putl32 (add_R0_R0, contents + rel->r_offset + 8);
3c12b054
MS
6403
6404 rel[1].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
6405 AARCH64_R (TLSLE_ADD_TPREL_LO12_NC));
6406 rel[1].r_offset = rel->r_offset + 8;
6407
6408 /* Move the current relocation to the second instruction in
6409 the sequence. */
6410 rel->r_offset += 4;
6411 rel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
6412 AARCH64_R (TLSLE_ADD_TPREL_HI12));
6413 return bfd_reloc_continue;
6414 }
6415 else
6416 {
6417 /* Tiny GD->IE relaxation:
07d6d2b8
AM
6418 adr x0, :tlsgd:var => ldr R0, :gottprel:var
6419 bl __tls_get_addr => mrs x1, tpidr_el0
6420 nop => add R0, R0, R1
2d0ca824
YN
6421
6422 Where R is x for LP64, and w for Ilp32. */
3c12b054
MS
6423
6424 /* First kill the tls_get_addr reloc on the bl instruction. */
6425 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6426 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6427
2d0ca824 6428 bfd_putl32 (ldr_R0, contents + rel->r_offset);
3c12b054 6429 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
2d0ca824 6430 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 8);
3c12b054
MS
6431 return bfd_reloc_continue;
6432 }
6433
ac734732
RL
6434#if ARCH_SIZE == 64
6435 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
6436 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSGD_MOVW_G0_NC));
6437 BFD_ASSERT (rel->r_offset + 12 == rel[2].r_offset);
6438 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (CALL26));
6439
6440 if (is_local)
6441 {
6442 /* Large GD->LE relaxation:
07d6d2b8 6443 movz x0, #:tlsgd_g1:var => movz x0, #:tprel_g2:var, lsl #32
ac734732 6444 movk x0, #:tlsgd_g0_nc:var => movk x0, #:tprel_g1_nc:var, lsl #16
07d6d2b8
AM
6445 add x0, gp, x0 => movk x0, #:tprel_g0_nc:var
6446 bl __tls_get_addr => mrs x1, tpidr_el0
6447 nop => add x0, x0, x1
ac734732
RL
6448 */
6449 rel[2].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
6450 AARCH64_R (TLSLE_MOVW_TPREL_G0_NC));
6451 rel[2].r_offset = rel->r_offset + 8;
6452
2d0ca824
YN
6453 bfd_putl32 (movz_hw_R0, contents + rel->r_offset + 0);
6454 bfd_putl32 (ldr_hw_R0, contents + rel->r_offset + 4);
6455 bfd_putl32 (movk_R0, contents + rel->r_offset + 8);
ac734732 6456 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 12);
2d0ca824 6457 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 16);
ac734732
RL
6458 }
6459 else
6460 {
6461 /* Large GD->IE relaxation:
07d6d2b8 6462 movz x0, #:tlsgd_g1:var => movz x0, #:gottprel_g1:var, lsl #16
ac734732 6463 movk x0, #:tlsgd_g0_nc:var => movk x0, #:gottprel_g0_nc:var
07d6d2b8
AM
6464 add x0, gp, x0 => ldr x0, [gp, x0]
6465 bl __tls_get_addr => mrs x1, tpidr_el0
6466 nop => add x0, x0, x1
ac734732
RL
6467 */
6468 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6469 bfd_putl32 (0xd2a80000, contents + rel->r_offset + 0);
2d0ca824 6470 bfd_putl32 (ldr_R0, contents + rel->r_offset + 8);
ac734732 6471 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 12);
2d0ca824 6472 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 16);
ac734732
RL
6473 }
6474 return bfd_reloc_continue;
6475
6476 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
6477 return bfd_reloc_continue;
6478#endif
6479
043bf05a
MS
6480 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
6481 return bfd_reloc_continue;
6482
a6bb11b2 6483 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
a06ea964
NC
6484 if (is_local)
6485 {
6486 /* GD->LE relaxation:
6487 ldr xd, [x0, #:tlsdesc_lo12:var] => movk x0, :tprel_g0_nc:var
2d0ca824
YN
6488
6489 Where R is x for lp64 mode, and w for ILP32 mode. */
6490 bfd_putl32 (movk_R0, contents + rel->r_offset);
a06ea964
NC
6491 return bfd_reloc_continue;
6492 }
6493 else
6494 {
6495 /* GD->IE relaxation:
2d0ca824
YN
6496 ldr xd, [x0, #:tlsdesc_lo12:var] => ldr R0, [x0, #:gottprel_lo12:var]
6497
6498 Where R is x for lp64 mode, and w for ILP32 mode. */
a06ea964 6499 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6500 bfd_putl32 (ldr_R0_mask (insn), contents + rel->r_offset);
a06ea964
NC
6501 return bfd_reloc_continue;
6502 }
6503
a6bb11b2 6504 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a06ea964
NC
6505 if (is_local)
6506 {
6507 /* GD->LE relaxation
07d6d2b8
AM
6508 add x0, #:tlsgd_lo12:var => movk R0, :tprel_g0_nc:var
6509 bl __tls_get_addr => mrs x1, tpidr_el0
6510 nop => add R0, R1, R0
2d0ca824
YN
6511
6512 Where R is x for lp64 mode, and w for ILP32 mode. */
a06ea964
NC
6513
6514 /* First kill the tls_get_addr reloc on the bl instruction. */
6515 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
cec5225b 6516 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
a06ea964 6517
2d0ca824 6518 bfd_putl32 (movk_R0, contents + rel->r_offset);
a06ea964 6519 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
2d0ca824 6520 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 8);
a06ea964
NC
6521 return bfd_reloc_continue;
6522 }
6523 else
6524 {
6525 /* GD->IE relaxation
07d6d2b8
AM
6526 ADD x0, #:tlsgd_lo12:var => ldr R0, [x0, #:gottprel_lo12:var]
6527 BL __tls_get_addr => mrs x1, tpidr_el0
a06ea964 6528 R_AARCH64_CALL26
07d6d2b8 6529 NOP => add R0, R1, R0
5cd1d8bc
YN
6530
6531 Where R is x for lp64 mode, and w for ilp32 mode. */
a06ea964 6532
a6bb11b2 6533 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
a06ea964
NC
6534
6535 /* Remove the relocation on the BL instruction. */
cec5225b 6536 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
a06ea964 6537
a06ea964
NC
6538 /* We choose to fixup the BL and NOP instructions using the
6539 offset from the second relocation to allow flexibility in
6540 scheduling instructions between the ADD and BL. */
2d0ca824 6541 bfd_putl32 (ldr_R0_x0, contents + rel->r_offset);
5cd1d8bc 6542 bfd_putl32 (0xd53bd041, contents + rel[1].r_offset);
2d0ca824 6543 bfd_putl32 (add_R0_R0_R1, contents + rel[1].r_offset + 4);
a06ea964
NC
6544 return bfd_reloc_continue;
6545 }
6546
0484b454 6547 case BFD_RELOC_AARCH64_TLSDESC_ADD:
f955cccf 6548 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 6549 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a06ea964 6550 /* GD->IE/LE relaxation:
07d6d2b8
AM
6551 add x0, x0, #:tlsdesc_lo12:var => nop
6552 blr xd => nop
a06ea964
NC
6553 */
6554 bfd_putl32 (INSN_NOP, contents + rel->r_offset);
6555 return bfd_reloc_ok;
6556
0484b454
RL
6557 case BFD_RELOC_AARCH64_TLSDESC_LDR:
6558 if (is_local)
6559 {
6560 /* GD->LE relaxation:
2d0ca824
YN
6561 ldr xd, [gp, xn] => movk R0, #:tprel_g0_nc:var
6562
6563 Where R is x for lp64 mode, and w for ILP32 mode. */
6564 bfd_putl32 (movk_R0, contents + rel->r_offset);
0484b454
RL
6565 return bfd_reloc_continue;
6566 }
6567 else
6568 {
6569 /* GD->IE relaxation:
2d0ca824
YN
6570 ldr xd, [gp, xn] => ldr R0, [gp, xn]
6571
6572 Where R is x for lp64 mode, and w for ILP32 mode. */
0484b454 6573 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6574 bfd_putl32 (ldr_R0_mask (insn), contents + rel->r_offset);
0484b454
RL
6575 return bfd_reloc_ok;
6576 }
6577
6578 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
6579 /* GD->LE relaxation:
2d0ca824 6580 movk xd, #:tlsdesc_off_g0_nc:var => movk R0, #:tprel_g1_nc:var, lsl #16
0484b454 6581 GD->IE relaxation:
2d0ca824
YN
6582 movk xd, #:tlsdesc_off_g0_nc:var => movk Rd, #:gottprel_g0_nc:var
6583
6584 Where R is x for lp64 mode, and w for ILP32 mode. */
0484b454 6585 if (is_local)
2d0ca824 6586 bfd_putl32 (ldr_hw_R0, contents + rel->r_offset);
0484b454
RL
6587 return bfd_reloc_continue;
6588
6589 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
6590 if (is_local)
6591 {
6592 /* GD->LE relaxation:
2d0ca824
YN
6593 movz xd, #:tlsdesc_off_g1:var => movz R0, #:tprel_g2:var, lsl #32
6594
6595 Where R is x for lp64 mode, and w for ILP32 mode. */
6596 bfd_putl32 (movz_hw_R0, contents + rel->r_offset);
0484b454
RL
6597 return bfd_reloc_continue;
6598 }
6599 else
6600 {
6601 /* GD->IE relaxation:
2d0ca824
YN
6602 movz xd, #:tlsdesc_off_g1:var => movz Rd, #:gottprel_g1:var, lsl #16
6603
6604 Where R is x for lp64 mode, and w for ILP32 mode. */
0484b454 6605 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6606 bfd_putl32 (movz_R0 | (insn & 0x1f), contents + rel->r_offset);
0484b454
RL
6607 return bfd_reloc_continue;
6608 }
6609
a6bb11b2 6610 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a06ea964 6611 /* IE->LE relaxation:
07d6d2b8 6612 adrp xd, :gottprel:var => movz Rd, :tprel_g1:var
2d0ca824
YN
6613
6614 Where R is x for lp64 mode, and w for ILP32 mode. */
a06ea964
NC
6615 if (is_local)
6616 {
6617 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6618 bfd_putl32 (movz_R0 | (insn & 0x1f), contents + rel->r_offset);
9fca35fc
TC
6619 /* We have relaxed the adrp into a mov, we may have to clear any
6620 pending erratum fixes. */
6621 clear_erratum_843419_entry (globals, rel->r_offset, input_section);
a06ea964
NC
6622 }
6623 return bfd_reloc_continue;
6624
a6bb11b2 6625 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
a06ea964 6626 /* IE->LE relaxation:
07d6d2b8 6627 ldr xd, [xm, #:gottprel_lo12:var] => movk Rd, :tprel_g0_nc:var
2d0ca824
YN
6628
6629 Where R is x for lp64 mode, and w for ILP32 mode. */
a06ea964
NC
6630 if (is_local)
6631 {
6632 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6633 bfd_putl32 (movk_R0 | (insn & 0x1f), contents + rel->r_offset);
a06ea964
NC
6634 }
6635 return bfd_reloc_continue;
6636
259364ad
JW
6637 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
6638 /* LD->LE relaxation (tiny):
6639 adr x0, :tlsldm:x => mrs x0, tpidr_el0
c1fc2d7e
YN
6640 bl __tls_get_addr => add R0, R0, TCB_SIZE
6641
6642 Where R is x for lp64 mode, and w for ilp32 mode. */
259364ad
JW
6643 if (is_local)
6644 {
6645 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6646 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
6647 /* No need of CALL26 relocation for tls_get_addr. */
6648 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6649 bfd_putl32 (0xd53bd040, contents + rel->r_offset + 0);
2d0ca824
YN
6650 bfd_putl32 (add_R0_R0 | (TCB_SIZE << 10),
6651 contents + rel->r_offset + 4);
259364ad
JW
6652 return bfd_reloc_ok;
6653 }
6654 return bfd_reloc_continue;
6655
6656 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
6657 /* LD->LE relaxation (small):
6658 adrp x0, :tlsldm:x => mrs x0, tpidr_el0
6659 */
6660 if (is_local)
6661 {
6662 bfd_putl32 (0xd53bd040, contents + rel->r_offset);
6663 return bfd_reloc_ok;
6664 }
6665 return bfd_reloc_continue;
6666
6667 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
6668 /* LD->LE relaxation (small):
c1fc2d7e 6669 add x0, #:tlsldm_lo12:x => add R0, R0, TCB_SIZE
259364ad 6670 bl __tls_get_addr => nop
c1fc2d7e
YN
6671
6672 Where R is x for lp64 mode, and w for ilp32 mode. */
259364ad
JW
6673 if (is_local)
6674 {
6675 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6676 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
6677 /* No need of CALL26 relocation for tls_get_addr. */
6678 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
2d0ca824
YN
6679 bfd_putl32 (add_R0_R0 | (TCB_SIZE << 10),
6680 contents + rel->r_offset + 0);
c1fc2d7e 6681 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 4);
259364ad
JW
6682 return bfd_reloc_ok;
6683 }
6684 return bfd_reloc_continue;
6685
a06ea964
NC
6686 default:
6687 return bfd_reloc_continue;
6688 }
6689
6690 return bfd_reloc_ok;
6691}
6692
6693/* Relocate an AArch64 ELF section. */
6694
6695static bfd_boolean
cec5225b 6696elfNN_aarch64_relocate_section (bfd *output_bfd,
a06ea964
NC
6697 struct bfd_link_info *info,
6698 bfd *input_bfd,
6699 asection *input_section,
6700 bfd_byte *contents,
6701 Elf_Internal_Rela *relocs,
6702 Elf_Internal_Sym *local_syms,
6703 asection **local_sections)
6704{
6705 Elf_Internal_Shdr *symtab_hdr;
6706 struct elf_link_hash_entry **sym_hashes;
6707 Elf_Internal_Rela *rel;
6708 Elf_Internal_Rela *relend;
6709 const char *name;
cec5225b 6710 struct elf_aarch64_link_hash_table *globals;
a06ea964
NC
6711 bfd_boolean save_addend = FALSE;
6712 bfd_vma addend = 0;
6713
cec5225b 6714 globals = elf_aarch64_hash_table (info);
a06ea964
NC
6715
6716 symtab_hdr = &elf_symtab_hdr (input_bfd);
6717 sym_hashes = elf_sym_hashes (input_bfd);
6718
6719 rel = relocs;
6720 relend = relocs + input_section->reloc_count;
6721 for (; rel < relend; rel++)
6722 {
6723 unsigned int r_type;
a6bb11b2
YZ
6724 bfd_reloc_code_real_type bfd_r_type;
6725 bfd_reloc_code_real_type relaxed_bfd_r_type;
a06ea964
NC
6726 reloc_howto_type *howto;
6727 unsigned long r_symndx;
6728 Elf_Internal_Sym *sym;
6729 asection *sec;
6730 struct elf_link_hash_entry *h;
6731 bfd_vma relocation;
6732 bfd_reloc_status_type r;
6733 arelent bfd_reloc;
6734 char sym_type;
6735 bfd_boolean unresolved_reloc = FALSE;
6736 char *error_message = NULL;
6737
cec5225b
YZ
6738 r_symndx = ELFNN_R_SYM (rel->r_info);
6739 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964 6740
0aa13fee
AM
6741 bfd_reloc.howto = elfNN_aarch64_howto_from_type (input_bfd, r_type);
6742 howto = bfd_reloc.howto;
a06ea964 6743
7fcfd62d 6744 if (howto == NULL)
47aeb64c
NC
6745 return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
6746
a6bb11b2 6747 bfd_r_type = elfNN_aarch64_bfd_reloc_from_howto (howto);
7fcfd62d 6748
a06ea964
NC
6749 h = NULL;
6750 sym = NULL;
6751 sec = NULL;
6752
6753 if (r_symndx < symtab_hdr->sh_info)
6754 {
6755 sym = local_syms + r_symndx;
cec5225b 6756 sym_type = ELFNN_ST_TYPE (sym->st_info);
a06ea964
NC
6757 sec = local_sections[r_symndx];
6758
6759 /* An object file might have a reference to a local
6760 undefined symbol. This is a daft object file, but we
6761 should at least do something about it. */
6762 if (r_type != R_AARCH64_NONE && r_type != R_AARCH64_NULL
6763 && bfd_is_und_section (sec)
6764 && ELF_ST_BIND (sym->st_info) != STB_WEAK)
1a72702b
AM
6765 (*info->callbacks->undefined_symbol)
6766 (info, bfd_elf_string_from_elf_section
6767 (input_bfd, symtab_hdr->sh_link, sym->st_name),
6768 input_bfd, input_section, rel->r_offset, TRUE);
a06ea964 6769
a06ea964 6770 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
1419bbe5
WN
6771
6772 /* Relocate against local STT_GNU_IFUNC symbol. */
0e1862bb 6773 if (!bfd_link_relocatable (info)
1419bbe5
WN
6774 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
6775 {
6776 h = elfNN_aarch64_get_local_sym_hash (globals, input_bfd,
6777 rel, FALSE);
6778 if (h == NULL)
6779 abort ();
6780
6781 /* Set STT_GNU_IFUNC symbol value. */
6782 h->root.u.def.value = sym->st_value;
6783 h->root.u.def.section = sec;
6784 }
a06ea964
NC
6785 }
6786 else
6787 {
62d887d4 6788 bfd_boolean warned, ignored;
a06ea964
NC
6789
6790 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
6791 r_symndx, symtab_hdr, sym_hashes,
6792 h, sec, relocation,
62d887d4 6793 unresolved_reloc, warned, ignored);
a06ea964
NC
6794
6795 sym_type = h->type;
6796 }
6797
6798 if (sec != NULL && discarded_section (sec))
6799 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
6800 rel, 1, relend, howto, 0, contents);
6801
0e1862bb 6802 if (bfd_link_relocatable (info))
2e0488d3 6803 continue;
a06ea964
NC
6804
6805 if (h != NULL)
6806 name = h->root.root.string;
6807 else
6808 {
6809 name = (bfd_elf_string_from_elf_section
6810 (input_bfd, symtab_hdr->sh_link, sym->st_name));
6811 if (name == NULL || *name == '\0')
fd361982 6812 name = bfd_section_name (sec);
a06ea964
NC
6813 }
6814
6815 if (r_symndx != 0
6816 && r_type != R_AARCH64_NONE
6817 && r_type != R_AARCH64_NULL
6818 && (h == NULL
6819 || h->root.type == bfd_link_hash_defined
6820 || h->root.type == bfd_link_hash_defweak)
a6bb11b2 6821 && IS_AARCH64_TLS_RELOC (bfd_r_type) != (sym_type == STT_TLS))
a06ea964 6822 {
4eca0228 6823 _bfd_error_handler
a06ea964 6824 ((sym_type == STT_TLS
695344c0 6825 /* xgettext:c-format */
2dcf00ce 6826 ? _("%pB(%pA+%#" PRIx64 "): %s used with TLS symbol %s")
695344c0 6827 /* xgettext:c-format */
2dcf00ce 6828 : _("%pB(%pA+%#" PRIx64 "): %s used with non-TLS symbol %s")),
a06ea964 6829 input_bfd,
2dcf00ce 6830 input_section, (uint64_t) rel->r_offset, howto->name, name);
a06ea964
NC
6831 }
6832
a06ea964 6833 /* We relax only if we can see that there can be a valid transition
07d6d2b8
AM
6834 from a reloc type to another.
6835 We call elfNN_aarch64_final_link_relocate unless we're completely
6836 done, i.e., the relaxation produced the final output we want. */
a06ea964 6837
a6bb11b2
YZ
6838 relaxed_bfd_r_type = aarch64_tls_transition (input_bfd, info, r_type,
6839 h, r_symndx);
6840 if (relaxed_bfd_r_type != bfd_r_type)
a06ea964 6841 {
a6bb11b2
YZ
6842 bfd_r_type = relaxed_bfd_r_type;
6843 howto = elfNN_aarch64_howto_from_bfd_reloc (bfd_r_type);
6844 BFD_ASSERT (howto != NULL);
6845 r_type = howto->type;
9fca35fc
TC
6846 r = elfNN_aarch64_tls_relax (globals, input_bfd, input_section,
6847 contents, rel, h);
a06ea964
NC
6848 unresolved_reloc = 0;
6849 }
6850 else
6851 r = bfd_reloc_continue;
6852
6853 /* There may be multiple consecutive relocations for the
07d6d2b8
AM
6854 same offset. In that case we are supposed to treat the
6855 output of each relocation as the addend for the next. */
a06ea964
NC
6856 if (rel + 1 < relend
6857 && rel->r_offset == rel[1].r_offset
cec5225b
YZ
6858 && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NONE
6859 && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NULL)
a06ea964
NC
6860 save_addend = TRUE;
6861 else
6862 save_addend = FALSE;
6863
6864 if (r == bfd_reloc_continue)
cec5225b 6865 r = elfNN_aarch64_final_link_relocate (howto, input_bfd, output_bfd,
a06ea964
NC
6866 input_section, contents, rel,
6867 relocation, info, sec,
6868 h, &unresolved_reloc,
1419bbe5 6869 save_addend, &addend, sym);
a06ea964 6870
0aa13fee 6871 switch (elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type))
a06ea964 6872 {
ce336788 6873 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a6bb11b2 6874 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3c12b054 6875 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
7ba7cfe4 6876 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
94facae3 6877 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
73f925cc 6878 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
f69e4920 6879 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
77a69ff8 6880 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
a06ea964
NC
6881 if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
6882 {
6883 bfd_boolean need_relocs = FALSE;
6884 bfd_byte *loc;
6885 int indx;
6886 bfd_vma off;
6887
6888 off = symbol_got_offset (input_bfd, h, r_symndx);
6889 indx = h && h->dynindx != -1 ? h->dynindx : 0;
6890
6891 need_relocs =
6dda7875 6892 (!bfd_link_executable (info) || indx != 0) &&
a06ea964
NC
6893 (h == NULL
6894 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6895 || h->root.type != bfd_link_hash_undefweak);
6896
6897 BFD_ASSERT (globals->root.srelgot != NULL);
6898
6899 if (need_relocs)
6900 {
6901 Elf_Internal_Rela rela;
a6bb11b2 6902 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPMOD));
a06ea964
NC
6903 rela.r_addend = 0;
6904 rela.r_offset = globals->root.sgot->output_section->vma +
6905 globals->root.sgot->output_offset + off;
6906
6907
6908 loc = globals->root.srelgot->contents;
6909 loc += globals->root.srelgot->reloc_count++
6910 * RELOC_SIZE (htab);
cec5225b 6911 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964 6912
f69e4920 6913 bfd_reloc_code_real_type real_type =
0aa13fee 6914 elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
f69e4920
JW
6915
6916 if (real_type == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21
73f925cc
JW
6917 || real_type == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21
6918 || real_type == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC)
77a69ff8
JW
6919 {
6920 /* For local dynamic, don't generate DTPREL in any case.
6921 Initialize the DTPREL slot into zero, so we get module
6922 base address when invoke runtime TLS resolver. */
6923 bfd_put_NN (output_bfd, 0,
6924 globals->root.sgot->contents + off
6925 + GOT_ENTRY_SIZE);
6926 }
6927 else if (indx == 0)
a06ea964 6928 {
cec5225b 6929 bfd_put_NN (output_bfd,
a06ea964
NC
6930 relocation - dtpoff_base (info),
6931 globals->root.sgot->contents + off
6932 + GOT_ENTRY_SIZE);
6933 }
6934 else
6935 {
6936 /* This TLS symbol is global. We emit a
6937 relocation to fixup the tls offset at load
6938 time. */
6939 rela.r_info =
a6bb11b2 6940 ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPREL));
a06ea964
NC
6941 rela.r_addend = 0;
6942 rela.r_offset =
6943 (globals->root.sgot->output_section->vma
6944 + globals->root.sgot->output_offset + off
6945 + GOT_ENTRY_SIZE);
6946
6947 loc = globals->root.srelgot->contents;
6948 loc += globals->root.srelgot->reloc_count++
6949 * RELOC_SIZE (globals);
cec5225b
YZ
6950 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
6951 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC
6952 globals->root.sgot->contents + off
6953 + GOT_ENTRY_SIZE);
6954 }
6955 }
6956 else
6957 {
cec5225b 6958 bfd_put_NN (output_bfd, (bfd_vma) 1,
a06ea964 6959 globals->root.sgot->contents + off);
cec5225b 6960 bfd_put_NN (output_bfd,
a06ea964
NC
6961 relocation - dtpoff_base (info),
6962 globals->root.sgot->contents + off
6963 + GOT_ENTRY_SIZE);
6964 }
6965
6966 symbol_got_offset_mark (input_bfd, h, r_symndx);
6967 }
6968 break;
6969
a6bb11b2
YZ
6970 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
6971 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
043bf05a 6972 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
3b957e5b
RL
6973 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
6974 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
a06ea964
NC
6975 if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
6976 {
6977 bfd_boolean need_relocs = FALSE;
6978 bfd_byte *loc;
6979 int indx;
6980 bfd_vma off;
6981
6982 off = symbol_got_offset (input_bfd, h, r_symndx);
6983
6984 indx = h && h->dynindx != -1 ? h->dynindx : 0;
6985
6986 need_relocs =
6dda7875 6987 (!bfd_link_executable (info) || indx != 0) &&
a06ea964
NC
6988 (h == NULL
6989 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6990 || h->root.type != bfd_link_hash_undefweak);
6991
6992 BFD_ASSERT (globals->root.srelgot != NULL);
6993
6994 if (need_relocs)
6995 {
6996 Elf_Internal_Rela rela;
6997
6998 if (indx == 0)
6999 rela.r_addend = relocation - dtpoff_base (info);
7000 else
7001 rela.r_addend = 0;
7002
a6bb11b2 7003 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_TPREL));
a06ea964
NC
7004 rela.r_offset = globals->root.sgot->output_section->vma +
7005 globals->root.sgot->output_offset + off;
7006
7007 loc = globals->root.srelgot->contents;
7008 loc += globals->root.srelgot->reloc_count++
7009 * RELOC_SIZE (htab);
7010
cec5225b 7011 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964 7012
cec5225b 7013 bfd_put_NN (output_bfd, rela.r_addend,
a06ea964
NC
7014 globals->root.sgot->contents + off);
7015 }
7016 else
cec5225b 7017 bfd_put_NN (output_bfd, relocation - tpoff_base (info),
a06ea964
NC
7018 globals->root.sgot->contents + off);
7019
7020 symbol_got_offset_mark (input_bfd, h, r_symndx);
7021 }
7022 break;
7023
f955cccf 7024 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 7025 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
389b8029 7026 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
a6bb11b2 7027 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
1ada945d 7028 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
0484b454
RL
7029 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
7030 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
a06ea964
NC
7031 if (! symbol_tlsdesc_got_offset_mark_p (input_bfd, h, r_symndx))
7032 {
7033 bfd_boolean need_relocs = FALSE;
7034 int indx = h && h->dynindx != -1 ? h->dynindx : 0;
7035 bfd_vma off = symbol_tlsdesc_got_offset (input_bfd, h, r_symndx);
7036
7037 need_relocs = (h == NULL
7038 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
7039 || h->root.type != bfd_link_hash_undefweak);
7040
7041 BFD_ASSERT (globals->root.srelgot != NULL);
7042 BFD_ASSERT (globals->root.sgot != NULL);
7043
7044 if (need_relocs)
7045 {
7046 bfd_byte *loc;
7047 Elf_Internal_Rela rela;
a6bb11b2
YZ
7048 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLSDESC));
7049
a06ea964
NC
7050 rela.r_addend = 0;
7051 rela.r_offset = (globals->root.sgotplt->output_section->vma
7052 + globals->root.sgotplt->output_offset
7053 + off + globals->sgotplt_jump_table_size);
7054
7055 if (indx == 0)
7056 rela.r_addend = relocation - dtpoff_base (info);
7057
7058 /* Allocate the next available slot in the PLT reloc
7059 section to hold our R_AARCH64_TLSDESC, the next
7060 available slot is determined from reloc_count,
7061 which we step. But note, reloc_count was
7062 artifically moved down while allocating slots for
7063 real PLT relocs such that all of the PLT relocs
7064 will fit above the initial reloc_count and the
7065 extra stuff will fit below. */
7066 loc = globals->root.srelplt->contents;
7067 loc += globals->root.srelplt->reloc_count++
7068 * RELOC_SIZE (globals);
7069
cec5225b 7070 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964 7071
cec5225b 7072 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC
7073 globals->root.sgotplt->contents + off +
7074 globals->sgotplt_jump_table_size);
cec5225b 7075 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC
7076 globals->root.sgotplt->contents + off +
7077 globals->sgotplt_jump_table_size +
7078 GOT_ENTRY_SIZE);
7079 }
7080
7081 symbol_tlsdesc_got_offset_mark (input_bfd, h, r_symndx);
7082 }
7083 break;
a6bb11b2
YZ
7084 default:
7085 break;
a06ea964
NC
7086 }
7087
a06ea964 7088 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
07d6d2b8
AM
7089 because such sections are not SEC_ALLOC and thus ld.so will
7090 not process them. */
a06ea964
NC
7091 if (unresolved_reloc
7092 && !((input_section->flags & SEC_DEBUGGING) != 0
7093 && h->def_dynamic)
7094 && _bfd_elf_section_offset (output_bfd, info, input_section,
7095 +rel->r_offset) != (bfd_vma) - 1)
7096 {
4eca0228 7097 _bfd_error_handler
695344c0 7098 /* xgettext:c-format */
2dcf00ce
AM
7099 (_("%pB(%pA+%#" PRIx64 "): "
7100 "unresolvable %s relocation against symbol `%s'"),
7101 input_bfd, input_section, (uint64_t) rel->r_offset, howto->name,
a06ea964
NC
7102 h->root.root.string);
7103 return FALSE;
7104 }
7105
7106 if (r != bfd_reloc_ok && r != bfd_reloc_continue)
7107 {
c674f5cd 7108 bfd_reloc_code_real_type real_r_type
0aa13fee 7109 = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
c674f5cd 7110
a06ea964
NC
7111 switch (r)
7112 {
7113 case bfd_reloc_overflow:
1a72702b
AM
7114 (*info->callbacks->reloc_overflow)
7115 (info, (h ? &h->root : NULL), name, howto->name, (bfd_vma) 0,
7116 input_bfd, input_section, rel->r_offset);
c674f5cd
JW
7117 if (real_r_type == BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15
7118 || real_r_type == BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14)
7119 {
7120 (*info->callbacks->warning)
7121 (info,
90b6238f 7122 _("too many GOT entries for -fpic, "
c674f5cd
JW
7123 "please recompile with -fPIC"),
7124 name, input_bfd, input_section, rel->r_offset);
7125 return FALSE;
7126 }
027e9c75
NC
7127 /* Overflow can occur when a variable is referenced with a type
7128 that has a larger alignment than the type with which it was
7129 declared. eg:
7130 file1.c: extern int foo; int a (void) { return foo; }
7131 file2.c: char bar, foo, baz;
7132 If the variable is placed into a data section at an offset
7133 that is incompatible with the larger alignment requirement
7134 overflow will occur. (Strictly speaking this is not overflow
7135 but rather an alignment problem, but the bfd_reloc_ error
7136 enum does not have a value to cover that situation).
7137
7138 Try to catch this situation here and provide a more helpful
7139 error message to the user. */
7140 if (addend & ((1 << howto->rightshift) - 1)
7141 /* FIXME: Are we testing all of the appropriate reloc
7142 types here ? */
7143 && (real_r_type == BFD_RELOC_AARCH64_LD_LO19_PCREL
7144 || real_r_type == BFD_RELOC_AARCH64_LDST16_LO12
7145 || real_r_type == BFD_RELOC_AARCH64_LDST32_LO12
7146 || real_r_type == BFD_RELOC_AARCH64_LDST64_LO12
7147 || real_r_type == BFD_RELOC_AARCH64_LDST128_LO12))
7148 {
7149 info->callbacks->warning
90b6238f 7150 (info, _("one possible cause of this error is that the \
027e9c75 7151symbol is being referenced in the indicated code as if it had a larger \
90b6238f 7152alignment than was declared where it was defined"),
027e9c75
NC
7153 name, input_bfd, input_section, rel->r_offset);
7154 }
a06ea964
NC
7155 break;
7156
7157 case bfd_reloc_undefined:
1a72702b
AM
7158 (*info->callbacks->undefined_symbol)
7159 (info, name, input_bfd, input_section, rel->r_offset, TRUE);
a06ea964
NC
7160 break;
7161
7162 case bfd_reloc_outofrange:
7163 error_message = _("out of range");
7164 goto common_error;
7165
7166 case bfd_reloc_notsupported:
7167 error_message = _("unsupported relocation");
7168 goto common_error;
7169
7170 case bfd_reloc_dangerous:
7171 /* error_message should already be set. */
7172 goto common_error;
7173
7174 default:
7175 error_message = _("unknown error");
7176 /* Fall through. */
7177
7178 common_error:
7179 BFD_ASSERT (error_message != NULL);
1a72702b
AM
7180 (*info->callbacks->reloc_dangerous)
7181 (info, error_message, input_bfd, input_section, rel->r_offset);
a06ea964
NC
7182 break;
7183 }
7184 }
027e9c75
NC
7185
7186 if (!save_addend)
7187 addend = 0;
a06ea964
NC
7188 }
7189
7190 return TRUE;
7191}
7192
7193/* Set the right machine number. */
7194
7195static bfd_boolean
cec5225b 7196elfNN_aarch64_object_p (bfd *abfd)
a06ea964 7197{
cec5225b
YZ
7198#if ARCH_SIZE == 32
7199 bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64_ilp32);
7200#else
a06ea964 7201 bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64);
cec5225b 7202#endif
a06ea964
NC
7203 return TRUE;
7204}
7205
7206/* Function to keep AArch64 specific flags in the ELF header. */
7207
7208static bfd_boolean
cec5225b 7209elfNN_aarch64_set_private_flags (bfd *abfd, flagword flags)
a06ea964
NC
7210{
7211 if (elf_flags_init (abfd) && elf_elfheader (abfd)->e_flags != flags)
7212 {
7213 }
7214 else
7215 {
7216 elf_elfheader (abfd)->e_flags = flags;
7217 elf_flags_init (abfd) = TRUE;
7218 }
7219
7220 return TRUE;
7221}
7222
a06ea964
NC
7223/* Merge backend specific data from an object file to the output
7224 object file when linking. */
7225
7226static bfd_boolean
50e03d47 7227elfNN_aarch64_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
a06ea964 7228{
50e03d47 7229 bfd *obfd = info->output_bfd;
a06ea964
NC
7230 flagword out_flags;
7231 flagword in_flags;
7232 bfd_boolean flags_compatible = TRUE;
7233 asection *sec;
7234
7235 /* Check if we have the same endianess. */
50e03d47 7236 if (!_bfd_generic_verify_endian_match (ibfd, info))
a06ea964
NC
7237 return FALSE;
7238
7239 if (!is_aarch64_elf (ibfd) || !is_aarch64_elf (obfd))
7240 return TRUE;
7241
7242 /* The input BFD must have had its flags initialised. */
7243 /* The following seems bogus to me -- The flags are initialized in
7244 the assembler but I don't think an elf_flags_init field is
7245 written into the object. */
7246 /* BFD_ASSERT (elf_flags_init (ibfd)); */
7247
7248 in_flags = elf_elfheader (ibfd)->e_flags;
7249 out_flags = elf_elfheader (obfd)->e_flags;
7250
7251 if (!elf_flags_init (obfd))
7252 {
7253 /* If the input is the default architecture and had the default
07d6d2b8
AM
7254 flags then do not bother setting the flags for the output
7255 architecture, instead allow future merges to do this. If no
7256 future merges ever set these flags then they will retain their
7257 uninitialised values, which surprise surprise, correspond
7258 to the default values. */
a06ea964
NC
7259 if (bfd_get_arch_info (ibfd)->the_default
7260 && elf_elfheader (ibfd)->e_flags == 0)
7261 return TRUE;
7262
7263 elf_flags_init (obfd) = TRUE;
7264 elf_elfheader (obfd)->e_flags = in_flags;
7265
7266 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
7267 && bfd_get_arch_info (obfd)->the_default)
7268 return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd),
7269 bfd_get_mach (ibfd));
7270
7271 return TRUE;
7272 }
7273
7274 /* Identical flags must be compatible. */
7275 if (in_flags == out_flags)
7276 return TRUE;
7277
7278 /* Check to see if the input BFD actually contains any sections. If
7279 not, its flags may not have been initialised either, but it
7280 cannot actually cause any incompatiblity. Do not short-circuit
7281 dynamic objects; their section list may be emptied by
7282 elf_link_add_object_symbols.
7283
7284 Also check to see if there are no code sections in the input.
7285 In this case there is no need to check for code specific flags.
7286 XXX - do we need to worry about floating-point format compatability
7287 in data sections ? */
7288 if (!(ibfd->flags & DYNAMIC))
7289 {
7290 bfd_boolean null_input_bfd = TRUE;
7291 bfd_boolean only_data_sections = TRUE;
7292
7293 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
7294 {
fd361982 7295 if ((bfd_section_flags (sec)
a06ea964
NC
7296 & (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
7297 == (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
7298 only_data_sections = FALSE;
7299
7300 null_input_bfd = FALSE;
7301 break;
7302 }
7303
7304 if (null_input_bfd || only_data_sections)
7305 return TRUE;
7306 }
7307
7308 return flags_compatible;
7309}
7310
7311/* Display the flags field. */
7312
7313static bfd_boolean
cec5225b 7314elfNN_aarch64_print_private_bfd_data (bfd *abfd, void *ptr)
a06ea964
NC
7315{
7316 FILE *file = (FILE *) ptr;
7317 unsigned long flags;
7318
7319 BFD_ASSERT (abfd != NULL && ptr != NULL);
7320
7321 /* Print normal ELF private data. */
7322 _bfd_elf_print_private_bfd_data (abfd, ptr);
7323
7324 flags = elf_elfheader (abfd)->e_flags;
7325 /* Ignore init flag - it may not be set, despite the flags field
7326 containing valid data. */
7327
7328 /* xgettext:c-format */
7329 fprintf (file, _("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
7330
7331 if (flags)
7332 fprintf (file, _("<Unrecognised flag bits set>"));
7333
7334 fputc ('\n', file);
7335
7336 return TRUE;
7337}
7338
6353d82b
JW
7339/* Return true if we need copy relocation against EH. */
7340
7341static bfd_boolean
7342need_copy_relocation_p (struct elf_aarch64_link_hash_entry *eh)
7343{
7344 struct elf_dyn_relocs *p;
7345 asection *s;
7346
190eb1dd 7347 for (p = eh->root.dyn_relocs; p != NULL; p = p->next)
6353d82b
JW
7348 {
7349 /* If there is any pc-relative reference, we need to keep copy relocation
7350 to avoid propagating the relocation into runtime that current glibc
7351 does not support. */
7352 if (p->pc_count)
7353 return TRUE;
7354
7355 s = p->sec->output_section;
7356 /* Need copy relocation if it's against read-only section. */
7357 if (s != NULL && (s->flags & SEC_READONLY) != 0)
7358 return TRUE;
7359 }
7360
7361 return FALSE;
7362}
7363
a06ea964
NC
7364/* Adjust a symbol defined by a dynamic object and referenced by a
7365 regular object. The current definition is in some section of the
7366 dynamic object, but we're not including those sections. We have to
7367 change the definition to something the rest of the link can
7368 understand. */
7369
7370static bfd_boolean
cec5225b 7371elfNN_aarch64_adjust_dynamic_symbol (struct bfd_link_info *info,
a06ea964
NC
7372 struct elf_link_hash_entry *h)
7373{
cec5225b 7374 struct elf_aarch64_link_hash_table *htab;
5474d94f 7375 asection *s, *srel;
a06ea964
NC
7376
7377 /* If this is a function, put it in the procedure linkage table. We
7378 will fill in the contents of the procedure linkage table later,
7379 when we know the address of the .got section. */
1419bbe5 7380 if (h->type == STT_FUNC || h->type == STT_GNU_IFUNC || h->needs_plt)
a06ea964
NC
7381 {
7382 if (h->plt.refcount <= 0
1419bbe5
WN
7383 || (h->type != STT_GNU_IFUNC
7384 && (SYMBOL_CALLS_LOCAL (info, h)
7385 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
7386 && h->root.type == bfd_link_hash_undefweak))))
a06ea964
NC
7387 {
7388 /* This case can occur if we saw a CALL26 reloc in
7389 an input file, but the symbol wasn't referred to
7390 by a dynamic object or all references were
7391 garbage collected. In which case we can end up
7392 resolving. */
7393 h->plt.offset = (bfd_vma) - 1;
7394 h->needs_plt = 0;
7395 }
7396
7397 return TRUE;
7398 }
7399 else
80de0c6d 7400 /* Otherwise, reset to -1. */
a06ea964
NC
7401 h->plt.offset = (bfd_vma) - 1;
7402
7403
7404 /* If this is a weak symbol, and there is a real definition, the
7405 processor independent code will have arranged for us to see the
7406 real definition first, and we can just use the same value. */
60d67dc8 7407 if (h->is_weakalias)
a06ea964 7408 {
60d67dc8
AM
7409 struct elf_link_hash_entry *def = weakdef (h);
7410 BFD_ASSERT (def->root.type == bfd_link_hash_defined);
7411 h->root.u.def.section = def->root.u.def.section;
7412 h->root.u.def.value = def->root.u.def.value;
a06ea964 7413 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
60d67dc8 7414 h->non_got_ref = def->non_got_ref;
a06ea964
NC
7415 return TRUE;
7416 }
7417
7418 /* If we are creating a shared library, we must presume that the
7419 only references to the symbol are via the global offset table.
7420 For such cases we need not do anything here; the relocations will
7421 be handled correctly by relocate_section. */
0e1862bb 7422 if (bfd_link_pic (info))
a06ea964
NC
7423 return TRUE;
7424
7425 /* If there are no references to this symbol that do not use the
7426 GOT, we don't need to generate a copy reloc. */
7427 if (!h->non_got_ref)
7428 return TRUE;
7429
7430 /* If -z nocopyreloc was given, we won't generate them either. */
7431 if (info->nocopyreloc)
7432 {
7433 h->non_got_ref = 0;
7434 return TRUE;
7435 }
7436
6353d82b
JW
7437 if (ELIMINATE_COPY_RELOCS)
7438 {
7439 struct elf_aarch64_link_hash_entry *eh;
dce2246a 7440 /* If we don't find any dynamic relocs in read-only sections, then
6353d82b
JW
7441 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
7442 eh = (struct elf_aarch64_link_hash_entry *) h;
7443 if (!need_copy_relocation_p (eh))
7444 {
7445 h->non_got_ref = 0;
7446 return TRUE;
7447 }
7448 }
7449
a06ea964
NC
7450 /* We must allocate the symbol in our .dynbss section, which will
7451 become part of the .bss section of the executable. There will be
7452 an entry for this symbol in the .dynsym section. The dynamic
7453 object will contain position independent code, so all references
7454 from the dynamic object to this symbol will go through the global
7455 offset table. The dynamic linker will use the .dynsym entry to
7456 determine the address it must put in the global offset table, so
7457 both the dynamic object and the regular object will refer to the
7458 same memory location for the variable. */
7459
cec5225b 7460 htab = elf_aarch64_hash_table (info);
a06ea964
NC
7461
7462 /* We must generate a R_AARCH64_COPY reloc to tell the dynamic linker
7463 to copy the initial value out of the dynamic object and into the
7464 runtime process image. */
5474d94f
AM
7465 if ((h->root.u.def.section->flags & SEC_READONLY) != 0)
7466 {
7467 s = htab->root.sdynrelro;
7468 srel = htab->root.sreldynrelro;
7469 }
7470 else
7471 {
7472 s = htab->root.sdynbss;
7473 srel = htab->root.srelbss;
7474 }
a06ea964
NC
7475 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
7476 {
5474d94f 7477 srel->size += RELOC_SIZE (htab);
a06ea964
NC
7478 h->needs_copy = 1;
7479 }
7480
6cabe1ea 7481 return _bfd_elf_adjust_dynamic_copy (info, h, s);
a06ea964
NC
7482
7483}
7484
7485static bfd_boolean
cec5225b 7486elfNN_aarch64_allocate_local_symbols (bfd *abfd, unsigned number)
a06ea964
NC
7487{
7488 struct elf_aarch64_local_symbol *locals;
cec5225b 7489 locals = elf_aarch64_locals (abfd);
a06ea964
NC
7490 if (locals == NULL)
7491 {
7492 locals = (struct elf_aarch64_local_symbol *)
7493 bfd_zalloc (abfd, number * sizeof (struct elf_aarch64_local_symbol));
7494 if (locals == NULL)
7495 return FALSE;
cec5225b 7496 elf_aarch64_locals (abfd) = locals;
a06ea964
NC
7497 }
7498 return TRUE;
7499}
7500
cc0efaa8
MS
7501/* Create the .got section to hold the global offset table. */
7502
7503static bfd_boolean
7504aarch64_elf_create_got_section (bfd *abfd, struct bfd_link_info *info)
7505{
7506 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
7507 flagword flags;
7508 asection *s;
7509 struct elf_link_hash_entry *h;
7510 struct elf_link_hash_table *htab = elf_hash_table (info);
7511
7512 /* This function may be called more than once. */
ce558b89 7513 if (htab->sgot != NULL)
cc0efaa8
MS
7514 return TRUE;
7515
7516 flags = bed->dynamic_sec_flags;
7517
7518 s = bfd_make_section_anyway_with_flags (abfd,
7519 (bed->rela_plts_and_copies_p
7520 ? ".rela.got" : ".rel.got"),
7521 (bed->dynamic_sec_flags
7522 | SEC_READONLY));
7523 if (s == NULL
fd361982 7524 || !bfd_set_section_alignment (s, bed->s->log_file_align))
cc0efaa8
MS
7525 return FALSE;
7526 htab->srelgot = s;
7527
7528 s = bfd_make_section_anyway_with_flags (abfd, ".got", flags);
7529 if (s == NULL
fd361982 7530 || !bfd_set_section_alignment (s, bed->s->log_file_align))
cc0efaa8
MS
7531 return FALSE;
7532 htab->sgot = s;
7533 htab->sgot->size += GOT_ENTRY_SIZE;
7534
7535 if (bed->want_got_sym)
7536 {
7537 /* Define the symbol _GLOBAL_OFFSET_TABLE_ at the start of the .got
7538 (or .got.plt) section. We don't do this in the linker script
7539 because we don't want to define the symbol if we are not creating
7540 a global offset table. */
7541 h = _bfd_elf_define_linkage_sym (abfd, info, s,
7542 "_GLOBAL_OFFSET_TABLE_");
7543 elf_hash_table (info)->hgot = h;
7544 if (h == NULL)
7545 return FALSE;
7546 }
7547
7548 if (bed->want_got_plt)
7549 {
7550 s = bfd_make_section_anyway_with_flags (abfd, ".got.plt", flags);
7551 if (s == NULL
fd361982 7552 || !bfd_set_section_alignment (s, bed->s->log_file_align))
cc0efaa8
MS
7553 return FALSE;
7554 htab->sgotplt = s;
7555 }
7556
7557 /* The first bit of the global offset table is the header. */
7558 s->size += bed->got_header_size;
7559
7560 return TRUE;
7561}
7562
a06ea964
NC
7563/* Look through the relocs for a section during the first phase. */
7564
7565static bfd_boolean
cec5225b 7566elfNN_aarch64_check_relocs (bfd *abfd, struct bfd_link_info *info,
a06ea964
NC
7567 asection *sec, const Elf_Internal_Rela *relocs)
7568{
7569 Elf_Internal_Shdr *symtab_hdr;
7570 struct elf_link_hash_entry **sym_hashes;
7571 const Elf_Internal_Rela *rel;
7572 const Elf_Internal_Rela *rel_end;
7573 asection *sreloc;
7574
cec5225b 7575 struct elf_aarch64_link_hash_table *htab;
a06ea964 7576
0e1862bb 7577 if (bfd_link_relocatable (info))
a06ea964
NC
7578 return TRUE;
7579
7580 BFD_ASSERT (is_aarch64_elf (abfd));
7581
cec5225b 7582 htab = elf_aarch64_hash_table (info);
a06ea964
NC
7583 sreloc = NULL;
7584
7585 symtab_hdr = &elf_symtab_hdr (abfd);
7586 sym_hashes = elf_sym_hashes (abfd);
a06ea964
NC
7587
7588 rel_end = relocs + sec->reloc_count;
7589 for (rel = relocs; rel < rel_end; rel++)
7590 {
7591 struct elf_link_hash_entry *h;
d42c267e 7592 unsigned int r_symndx;
a06ea964 7593 unsigned int r_type;
a6bb11b2 7594 bfd_reloc_code_real_type bfd_r_type;
1419bbe5 7595 Elf_Internal_Sym *isym;
a06ea964 7596
cec5225b
YZ
7597 r_symndx = ELFNN_R_SYM (rel->r_info);
7598 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC
7599
7600 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
7601 {
695344c0 7602 /* xgettext:c-format */
871b3ab2 7603 _bfd_error_handler (_("%pB: bad symbol index: %d"), abfd, r_symndx);
a06ea964
NC
7604 return FALSE;
7605 }
7606
ed5acf27 7607 if (r_symndx < symtab_hdr->sh_info)
1419bbe5
WN
7608 {
7609 /* A local symbol. */
f1dfbfdb 7610 isym = bfd_sym_from_r_symndx (&htab->root.sym_cache,
1419bbe5
WN
7611 abfd, r_symndx);
7612 if (isym == NULL)
7613 return FALSE;
7614
7615 /* Check relocation against local STT_GNU_IFUNC symbol. */
7616 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
7617 {
7618 h = elfNN_aarch64_get_local_sym_hash (htab, abfd, rel,
7619 TRUE);
7620 if (h == NULL)
7621 return FALSE;
7622
7623 /* Fake a STT_GNU_IFUNC symbol. */
7624 h->type = STT_GNU_IFUNC;
7625 h->def_regular = 1;
7626 h->ref_regular = 1;
7627 h->forced_local = 1;
7628 h->root.type = bfd_link_hash_defined;
7629 }
7630 else
7631 h = NULL;
7632 }
a06ea964
NC
7633 else
7634 {
7635 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
7636 while (h->root.type == bfd_link_hash_indirect
7637 || h->root.type == bfd_link_hash_warning)
7638 h = (struct elf_link_hash_entry *) h->root.u.i.link;
7639 }
7640
7641 /* Could be done earlier, if h were already available. */
a6bb11b2 7642 bfd_r_type = aarch64_tls_transition (abfd, info, r_type, h, r_symndx);
a06ea964 7643
1419bbe5
WN
7644 if (h != NULL)
7645 {
18f822a0
JW
7646 /* If a relocation refers to _GLOBAL_OFFSET_TABLE_, create the .got.
7647 This shows up in particular in an R_AARCH64_PREL64 in large model
7648 when calculating the pc-relative address to .got section which is
7649 used to initialize the gp register. */
7650 if (h->root.root.string
7651 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
7652 {
7653 if (htab->root.dynobj == NULL)
7654 htab->root.dynobj = abfd;
7655
7656 if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
7657 return FALSE;
7658
7659 BFD_ASSERT (h == htab->root.hgot);
7660 }
7661
1419bbe5
WN
7662 /* Create the ifunc sections for static executables. If we
7663 never see an indirect function symbol nor we are building
7664 a static executable, those sections will be empty and
7665 won't appear in output. */
7666 switch (bfd_r_type)
7667 {
7668 default:
7669 break;
7670
ce336788
JW
7671 case BFD_RELOC_AARCH64_ADD_LO12:
7672 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
7673 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
1419bbe5 7674 case BFD_RELOC_AARCH64_CALL26:
ce336788 7675 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
1419bbe5 7676 case BFD_RELOC_AARCH64_JUMP26:
7018c030 7677 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
1419bbe5 7678 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
a2e1db00 7679 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
99ad26cb 7680 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
1419bbe5 7681 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
dc8008f5 7682 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
74a1bfe1 7683 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
ce336788 7684 case BFD_RELOC_AARCH64_NN:
1419bbe5
WN
7685 if (htab->root.dynobj == NULL)
7686 htab->root.dynobj = abfd;
7687 if (!_bfd_elf_create_ifunc_sections (htab->root.dynobj, info))
7688 return FALSE;
7689 break;
7690 }
7691
2d0ca824 7692 /* It is referenced by a non-shared object. */
1419bbe5 7693 h->ref_regular = 1;
1419bbe5
WN
7694 }
7695
a6bb11b2 7696 switch (bfd_r_type)
a06ea964 7697 {
79e74192
RL
7698 case BFD_RELOC_AARCH64_16:
7699#if ARCH_SIZE == 64
7700 case BFD_RELOC_AARCH64_32:
7701#endif
279b2f94 7702 if (bfd_link_pic (info) && (sec->flags & SEC_ALLOC) != 0)
79e74192 7703 {
279b2f94
RL
7704 if (h != NULL
7705 /* This is an absolute symbol. It represents a value instead
7706 of an address. */
c691de6a 7707 && (bfd_is_abs_symbol (&h->root)
279b2f94
RL
7708 /* This is an undefined symbol. */
7709 || h->root.type == bfd_link_hash_undefined))
7710 break;
7711
7712 /* For local symbols, defined global symbols in a non-ABS section,
7713 it is assumed that the value is an address. */
79e74192
RL
7714 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
7715 _bfd_error_handler
7716 /* xgettext:c-format */
871b3ab2 7717 (_("%pB: relocation %s against `%s' can not be used when making "
79e74192
RL
7718 "a shared object"),
7719 abfd, elfNN_aarch64_howto_table[howto_index].name,
7720 (h) ? h->root.root.string : "a local symbol");
7721 bfd_set_error (bfd_error_bad_value);
7722 return FALSE;
7723 }
7724 else
7725 break;
7726
6353d82b
JW
7727 case BFD_RELOC_AARCH64_MOVW_G0_NC:
7728 case BFD_RELOC_AARCH64_MOVW_G1_NC:
7729 case BFD_RELOC_AARCH64_MOVW_G2_NC:
7730 case BFD_RELOC_AARCH64_MOVW_G3:
7731 if (bfd_link_pic (info))
7732 {
7733 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
7734 _bfd_error_handler
7735 /* xgettext:c-format */
871b3ab2 7736 (_("%pB: relocation %s against `%s' can not be used when making "
6353d82b
JW
7737 "a shared object; recompile with -fPIC"),
7738 abfd, elfNN_aarch64_howto_table[howto_index].name,
7739 (h) ? h->root.root.string : "a local symbol");
7740 bfd_set_error (bfd_error_bad_value);
7741 return FALSE;
7742 }
7743 /* Fall through. */
7744
7745 case BFD_RELOC_AARCH64_16_PCREL:
7746 case BFD_RELOC_AARCH64_32_PCREL:
7747 case BFD_RELOC_AARCH64_64_PCREL:
7748 case BFD_RELOC_AARCH64_ADD_LO12:
7749 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
7750 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
7751 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
7752 case BFD_RELOC_AARCH64_LDST128_LO12:
7753 case BFD_RELOC_AARCH64_LDST16_LO12:
7754 case BFD_RELOC_AARCH64_LDST32_LO12:
7755 case BFD_RELOC_AARCH64_LDST64_LO12:
7756 case BFD_RELOC_AARCH64_LDST8_LO12:
7757 case BFD_RELOC_AARCH64_LD_LO19_PCREL:
7758 if (h == NULL || bfd_link_pic (info))
7759 break;
7760 /* Fall through. */
7761
a6bb11b2 7762 case BFD_RELOC_AARCH64_NN:
a06ea964
NC
7763
7764 /* We don't need to handle relocs into sections not going into
7765 the "real" output. */
7766 if ((sec->flags & SEC_ALLOC) == 0)
7767 break;
7768
7769 if (h != NULL)
7770 {
0e1862bb 7771 if (!bfd_link_pic (info))
a06ea964
NC
7772 h->non_got_ref = 1;
7773
7774 h->plt.refcount += 1;
7775 h->pointer_equality_needed = 1;
7776 }
7777
7778 /* No need to do anything if we're not creating a shared
7779 object. */
6353d82b
JW
7780 if (!(bfd_link_pic (info)
7781 /* If on the other hand, we are creating an executable, we
7782 may need to keep relocations for symbols satisfied by a
7783 dynamic library if we manage to avoid copy relocs for the
7784 symbol.
7785
7786 NOTE: Currently, there is no support of copy relocs
7787 elimination on pc-relative relocation types, because there is
7788 no dynamic relocation support for them in glibc. We still
7789 record the dynamic symbol reference for them. This is
7790 because one symbol may be referenced by both absolute
7791 relocation (for example, BFD_RELOC_AARCH64_NN) and
7792 pc-relative relocation. We need full symbol reference
7793 information to make correct decision later in
7794 elfNN_aarch64_adjust_dynamic_symbol. */
7795 || (ELIMINATE_COPY_RELOCS
7796 && !bfd_link_pic (info)
7797 && h != NULL
7798 && (h->root.type == bfd_link_hash_defweak
7799 || !h->def_regular))))
a06ea964
NC
7800 break;
7801
7802 {
7803 struct elf_dyn_relocs *p;
7804 struct elf_dyn_relocs **head;
6353d82b 7805 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
a06ea964
NC
7806
7807 /* We must copy these reloc types into the output file.
7808 Create a reloc section in dynobj and make room for
7809 this reloc. */
7810 if (sreloc == NULL)
7811 {
7812 if (htab->root.dynobj == NULL)
7813 htab->root.dynobj = abfd;
7814
7815 sreloc = _bfd_elf_make_dynamic_reloc_section
0608afa7 7816 (sec, htab->root.dynobj, LOG_FILE_ALIGN, abfd, /*rela? */ TRUE);
a06ea964
NC
7817
7818 if (sreloc == NULL)
7819 return FALSE;
7820 }
7821
7822 /* If this is a global symbol, we count the number of
7823 relocations we need for this symbol. */
7824 if (h != NULL)
7825 {
190eb1dd 7826 head = &h->dyn_relocs;
a06ea964
NC
7827 }
7828 else
7829 {
7830 /* Track dynamic relocs needed for local syms too.
7831 We really need local syms available to do this
7832 easily. Oh well. */
7833
7834 asection *s;
7835 void **vpp;
a06ea964 7836
f1dfbfdb 7837 isym = bfd_sym_from_r_symndx (&htab->root.sym_cache,
a06ea964
NC
7838 abfd, r_symndx);
7839 if (isym == NULL)
7840 return FALSE;
7841
7842 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
7843 if (s == NULL)
7844 s = sec;
7845
7846 /* Beware of type punned pointers vs strict aliasing
7847 rules. */
7848 vpp = &(elf_section_data (s)->local_dynrel);
7849 head = (struct elf_dyn_relocs **) vpp;
7850 }
7851
7852 p = *head;
7853 if (p == NULL || p->sec != sec)
7854 {
986f0783 7855 size_t amt = sizeof *p;
a06ea964
NC
7856 p = ((struct elf_dyn_relocs *)
7857 bfd_zalloc (htab->root.dynobj, amt));
7858 if (p == NULL)
7859 return FALSE;
7860 p->next = *head;
7861 *head = p;
7862 p->sec = sec;
7863 }
7864
7865 p->count += 1;
7866
6353d82b
JW
7867 if (elfNN_aarch64_howto_table[howto_index].pc_relative)
7868 p->pc_count += 1;
a06ea964
NC
7869 }
7870 break;
7871
7872 /* RR: We probably want to keep a consistency check that
7873 there are no dangling GOT_PAGE relocs. */
a6bb11b2 7874 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
7bcccb57 7875 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7018c030 7876 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
7bcccb57 7877 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
a2e1db00 7878 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
99ad26cb 7879 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
7bcccb57 7880 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
dc8008f5 7881 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
74a1bfe1 7882 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
f955cccf 7883 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
7bcccb57 7884 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
389b8029 7885 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
7bcccb57 7886 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
f955cccf 7887 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
1ada945d 7888 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
0484b454
RL
7889 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
7890 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
a6bb11b2 7891 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
7bcccb57 7892 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3c12b054 7893 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
7ba7cfe4 7894 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
94facae3 7895 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
a6bb11b2 7896 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a6bb11b2 7897 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
7bcccb57 7898 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
043bf05a 7899 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
3b957e5b
RL
7900 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
7901 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
73f925cc 7902 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
f69e4920 7903 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
77a69ff8 7904 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
a06ea964
NC
7905 {
7906 unsigned got_type;
7907 unsigned old_got_type;
7908
a6bb11b2 7909 got_type = aarch64_reloc_got_type (bfd_r_type);
a06ea964
NC
7910
7911 if (h)
7912 {
7913 h->got.refcount += 1;
cec5225b 7914 old_got_type = elf_aarch64_hash_entry (h)->got_type;
a06ea964
NC
7915 }
7916 else
7917 {
7918 struct elf_aarch64_local_symbol *locals;
7919
cec5225b 7920 if (!elfNN_aarch64_allocate_local_symbols
a06ea964
NC
7921 (abfd, symtab_hdr->sh_info))
7922 return FALSE;
7923
cec5225b 7924 locals = elf_aarch64_locals (abfd);
a06ea964
NC
7925 BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
7926 locals[r_symndx].got_refcount += 1;
7927 old_got_type = locals[r_symndx].got_type;
7928 }
7929
7930 /* If a variable is accessed with both general dynamic TLS
7931 methods, two slots may be created. */
7932 if (GOT_TLS_GD_ANY_P (old_got_type) && GOT_TLS_GD_ANY_P (got_type))
7933 got_type |= old_got_type;
7934
7935 /* We will already have issued an error message if there
7936 is a TLS/non-TLS mismatch, based on the symbol type.
7937 So just combine any TLS types needed. */
7938 if (old_got_type != GOT_UNKNOWN && old_got_type != GOT_NORMAL
7939 && got_type != GOT_NORMAL)
7940 got_type |= old_got_type;
7941
7942 /* If the symbol is accessed by both IE and GD methods, we
7943 are able to relax. Turn off the GD flag, without
7944 messing up with any other kind of TLS types that may be
7945 involved. */
7946 if ((got_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (got_type))
7947 got_type &= ~ (GOT_TLSDESC_GD | GOT_TLS_GD);
7948
7949 if (old_got_type != got_type)
7950 {
7951 if (h != NULL)
cec5225b 7952 elf_aarch64_hash_entry (h)->got_type = got_type;
a06ea964
NC
7953 else
7954 {
7955 struct elf_aarch64_local_symbol *locals;
cec5225b 7956 locals = elf_aarch64_locals (abfd);
a06ea964
NC
7957 BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
7958 locals[r_symndx].got_type = got_type;
7959 }
7960 }
7961
cc0efaa8
MS
7962 if (htab->root.dynobj == NULL)
7963 htab->root.dynobj = abfd;
7964 if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
7965 return FALSE;
a06ea964
NC
7966 break;
7967 }
7968
7e057737
SP
7969 case BFD_RELOC_AARCH64_BRANCH19:
7970 case BFD_RELOC_AARCH64_TSTBR14:
a6bb11b2
YZ
7971 case BFD_RELOC_AARCH64_CALL26:
7972 case BFD_RELOC_AARCH64_JUMP26:
a06ea964
NC
7973 /* If this is a local symbol then we resolve it
7974 directly without creating a PLT entry. */
7975 if (h == NULL)
7976 continue;
7977
7978 h->needs_plt = 1;
1419bbe5
WN
7979 if (h->plt.refcount <= 0)
7980 h->plt.refcount = 1;
7981 else
7982 h->plt.refcount += 1;
a06ea964 7983 break;
a6bb11b2
YZ
7984
7985 default:
7986 break;
a06ea964
NC
7987 }
7988 }
a6bb11b2 7989
a06ea964
NC
7990 return TRUE;
7991}
7992
7993/* Treat mapping symbols as special target symbols. */
7994
7995static bfd_boolean
cec5225b 7996elfNN_aarch64_is_target_special_symbol (bfd *abfd ATTRIBUTE_UNUSED,
a06ea964
NC
7997 asymbol *sym)
7998{
7999 return bfd_is_aarch64_special_symbol_name (sym->name,
8000 BFD_AARCH64_SPECIAL_SYM_TYPE_ANY);
8001}
8002
e7679060
AM
8003/* If the ELF symbol SYM might be a function in SEC, return the
8004 function size and set *CODE_OFF to the function's entry point,
8005 otherwise return zero. */
a06ea964 8006
e7679060
AM
8007static bfd_size_type
8008elfNN_aarch64_maybe_function_sym (const asymbol *sym, asection *sec,
8009 bfd_vma *code_off)
8010{
8011 bfd_size_type size;
a06ea964 8012
e7679060
AM
8013 if ((sym->flags & (BSF_SECTION_SYM | BSF_FILE | BSF_OBJECT
8014 | BSF_THREAD_LOCAL | BSF_RELC | BSF_SRELC)) != 0
8015 || sym->section != sec)
8016 return 0;
a06ea964 8017
e7679060
AM
8018 if (!(sym->flags & BSF_SYNTHETIC))
8019 switch (ELF_ST_TYPE (((elf_symbol_type *) sym)->internal_elf_sym.st_info))
8020 {
a06ea964
NC
8021 case STT_FUNC:
8022 case STT_NOTYPE:
a06ea964 8023 break;
e7679060
AM
8024 default:
8025 return 0;
8026 }
a06ea964 8027
e7679060
AM
8028 if ((sym->flags & BSF_LOCAL)
8029 && bfd_is_aarch64_special_symbol_name (sym->name,
8030 BFD_AARCH64_SPECIAL_SYM_TYPE_ANY))
8031 return 0;
a06ea964 8032
e7679060
AM
8033 *code_off = sym->value;
8034 size = 0;
8035 if (!(sym->flags & BSF_SYNTHETIC))
8036 size = ((elf_symbol_type *) sym)->internal_elf_sym.st_size;
8037 if (size == 0)
8038 size = 1;
8039 return size;
a06ea964
NC
8040}
8041
8042static bfd_boolean
cec5225b 8043elfNN_aarch64_find_inliner_info (bfd *abfd,
a06ea964
NC
8044 const char **filename_ptr,
8045 const char **functionname_ptr,
8046 unsigned int *line_ptr)
8047{
8048 bfd_boolean found;
8049 found = _bfd_dwarf2_find_inliner_info
8050 (abfd, filename_ptr,
8051 functionname_ptr, line_ptr, &elf_tdata (abfd)->dwarf2_find_line_info);
8052 return found;
8053}
8054
8055
ed7e9d0b
AM
8056static bfd_boolean
8057elfNN_aarch64_init_file_header (bfd *abfd, struct bfd_link_info *link_info)
a06ea964
NC
8058{
8059 Elf_Internal_Ehdr *i_ehdrp; /* ELF file header, internal form. */
8060
ed7e9d0b
AM
8061 if (!_bfd_elf_init_file_header (abfd, link_info))
8062 return FALSE;
8063
a06ea964 8064 i_ehdrp = elf_elfheader (abfd);
a06ea964 8065 i_ehdrp->e_ident[EI_ABIVERSION] = AARCH64_ELF_ABI_VERSION;
ed7e9d0b 8066 return TRUE;
a06ea964
NC
8067}
8068
8069static enum elf_reloc_type_class
cec5225b 8070elfNN_aarch64_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
7e612e98
AM
8071 const asection *rel_sec ATTRIBUTE_UNUSED,
8072 const Elf_Internal_Rela *rela)
a06ea964 8073{
f2e6a843
SN
8074 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
8075
8076 if (htab->root.dynsym != NULL
8077 && htab->root.dynsym->contents != NULL)
8078 {
8079 /* Check relocation against STT_GNU_IFUNC symbol if there are
8080 dynamic symbols. */
8081 bfd *abfd = info->output_bfd;
8082 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
8083 unsigned long r_symndx = ELFNN_R_SYM (rela->r_info);
8084 if (r_symndx != STN_UNDEF)
8085 {
8086 Elf_Internal_Sym sym;
8087 if (!bed->s->swap_symbol_in (abfd,
8088 (htab->root.dynsym->contents
8089 + r_symndx * bed->s->sizeof_sym),
8090 0, &sym))
8091 {
8092 /* xgettext:c-format */
871b3ab2 8093 _bfd_error_handler (_("%pB symbol number %lu references"
f2e6a843
SN
8094 " nonexistent SHT_SYMTAB_SHNDX section"),
8095 abfd, r_symndx);
8096 /* Ideally an error class should be returned here. */
8097 }
8098 else if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
8099 return reloc_class_ifunc;
8100 }
8101 }
8102
cec5225b 8103 switch ((int) ELFNN_R_TYPE (rela->r_info))
a06ea964 8104 {
f2e6a843
SN
8105 case AARCH64_R (IRELATIVE):
8106 return reloc_class_ifunc;
a6bb11b2 8107 case AARCH64_R (RELATIVE):
a06ea964 8108 return reloc_class_relative;
a6bb11b2 8109 case AARCH64_R (JUMP_SLOT):
a06ea964 8110 return reloc_class_plt;
a6bb11b2 8111 case AARCH64_R (COPY):
a06ea964
NC
8112 return reloc_class_copy;
8113 default:
8114 return reloc_class_normal;
8115 }
8116}
8117
a06ea964
NC
8118/* Handle an AArch64 specific section when reading an object file. This is
8119 called when bfd_section_from_shdr finds a section with an unknown
8120 type. */
8121
8122static bfd_boolean
cec5225b 8123elfNN_aarch64_section_from_shdr (bfd *abfd,
a06ea964
NC
8124 Elf_Internal_Shdr *hdr,
8125 const char *name, int shindex)
8126{
8127 /* There ought to be a place to keep ELF backend specific flags, but
8128 at the moment there isn't one. We just keep track of the
8129 sections by their name, instead. Fortunately, the ABI gives
8130 names for all the AArch64 specific sections, so we will probably get
8131 away with this. */
8132 switch (hdr->sh_type)
8133 {
8134 case SHT_AARCH64_ATTRIBUTES:
8135 break;
8136
8137 default:
8138 return FALSE;
8139 }
8140
8141 if (!_bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
8142 return FALSE;
8143
8144 return TRUE;
8145}
8146
8147/* A structure used to record a list of sections, independently
8148 of the next and prev fields in the asection structure. */
8149typedef struct section_list
8150{
8151 asection *sec;
8152 struct section_list *next;
8153 struct section_list *prev;
8154}
8155section_list;
8156
8157/* Unfortunately we need to keep a list of sections for which
8158 an _aarch64_elf_section_data structure has been allocated. This
cec5225b 8159 is because it is possible for functions like elfNN_aarch64_write_section
a06ea964
NC
8160 to be called on a section which has had an elf_data_structure
8161 allocated for it (and so the used_by_bfd field is valid) but
8162 for which the AArch64 extended version of this structure - the
8163 _aarch64_elf_section_data structure - has not been allocated. */
8164static section_list *sections_with_aarch64_elf_section_data = NULL;
8165
8166static void
8167record_section_with_aarch64_elf_section_data (asection *sec)
8168{
8169 struct section_list *entry;
8170
8171 entry = bfd_malloc (sizeof (*entry));
8172 if (entry == NULL)
8173 return;
8174 entry->sec = sec;
8175 entry->next = sections_with_aarch64_elf_section_data;
8176 entry->prev = NULL;
8177 if (entry->next != NULL)
8178 entry->next->prev = entry;
8179 sections_with_aarch64_elf_section_data = entry;
8180}
8181
8182static struct section_list *
8183find_aarch64_elf_section_entry (asection *sec)
8184{
8185 struct section_list *entry;
8186 static struct section_list *last_entry = NULL;
8187
8188 /* This is a short cut for the typical case where the sections are added
8189 to the sections_with_aarch64_elf_section_data list in forward order and
8190 then looked up here in backwards order. This makes a real difference
8191 to the ld-srec/sec64k.exp linker test. */
8192 entry = sections_with_aarch64_elf_section_data;
8193 if (last_entry != NULL)
8194 {
8195 if (last_entry->sec == sec)
8196 entry = last_entry;
8197 else if (last_entry->next != NULL && last_entry->next->sec == sec)
8198 entry = last_entry->next;
8199 }
8200
8201 for (; entry; entry = entry->next)
8202 if (entry->sec == sec)
8203 break;
8204
8205 if (entry)
8206 /* Record the entry prior to this one - it is the entry we are
8207 most likely to want to locate next time. Also this way if we
8208 have been called from
8209 unrecord_section_with_aarch64_elf_section_data () we will not
8210 be caching a pointer that is about to be freed. */
8211 last_entry = entry->prev;
8212
8213 return entry;
8214}
8215
8216static void
8217unrecord_section_with_aarch64_elf_section_data (asection *sec)
8218{
8219 struct section_list *entry;
8220
8221 entry = find_aarch64_elf_section_entry (sec);
8222
8223 if (entry)
8224 {
8225 if (entry->prev != NULL)
8226 entry->prev->next = entry->next;
8227 if (entry->next != NULL)
8228 entry->next->prev = entry->prev;
8229 if (entry == sections_with_aarch64_elf_section_data)
8230 sections_with_aarch64_elf_section_data = entry->next;
8231 free (entry);
8232 }
8233}
8234
8235
8236typedef struct
8237{
8238 void *finfo;
8239 struct bfd_link_info *info;
8240 asection *sec;
8241 int sec_shndx;
8242 int (*func) (void *, const char *, Elf_Internal_Sym *,
8243 asection *, struct elf_link_hash_entry *);
8244} output_arch_syminfo;
8245
8246enum map_symbol_type
8247{
8248 AARCH64_MAP_INSN,
8249 AARCH64_MAP_DATA
8250};
8251
8252
8253/* Output a single mapping symbol. */
8254
8255static bfd_boolean
cec5225b 8256elfNN_aarch64_output_map_sym (output_arch_syminfo *osi,
a06ea964
NC
8257 enum map_symbol_type type, bfd_vma offset)
8258{
8259 static const char *names[2] = { "$x", "$d" };
8260 Elf_Internal_Sym sym;
8261
8262 sym.st_value = (osi->sec->output_section->vma
8263 + osi->sec->output_offset + offset);
8264 sym.st_size = 0;
8265 sym.st_other = 0;
8266 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_NOTYPE);
8267 sym.st_shndx = osi->sec_shndx;
8268 return osi->func (osi->finfo, names[type], &sym, osi->sec, NULL) == 1;
8269}
8270
a06ea964
NC
8271/* Output a single local symbol for a generated stub. */
8272
8273static bfd_boolean
cec5225b 8274elfNN_aarch64_output_stub_sym (output_arch_syminfo *osi, const char *name,
a06ea964
NC
8275 bfd_vma offset, bfd_vma size)
8276{
8277 Elf_Internal_Sym sym;
8278
8279 sym.st_value = (osi->sec->output_section->vma
8280 + osi->sec->output_offset + offset);
8281 sym.st_size = size;
8282 sym.st_other = 0;
8283 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
8284 sym.st_shndx = osi->sec_shndx;
8285 return osi->func (osi->finfo, name, &sym, osi->sec, NULL) == 1;
8286}
8287
8288static bfd_boolean
8289aarch64_map_one_stub (struct bfd_hash_entry *gen_entry, void *in_arg)
8290{
cec5225b 8291 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC
8292 asection *stub_sec;
8293 bfd_vma addr;
8294 char *stub_name;
8295 output_arch_syminfo *osi;
8296
8297 /* Massage our args to the form they really have. */
cec5225b 8298 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
a06ea964
NC
8299 osi = (output_arch_syminfo *) in_arg;
8300
8301 stub_sec = stub_entry->stub_sec;
8302
8303 /* Ensure this stub is attached to the current section being
8304 processed. */
8305 if (stub_sec != osi->sec)
8306 return TRUE;
8307
8308 addr = (bfd_vma) stub_entry->stub_offset;
8309
8310 stub_name = stub_entry->output_name;
8311
8312 switch (stub_entry->stub_type)
8313 {
8314 case aarch64_stub_adrp_branch:
cec5225b 8315 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
a06ea964
NC
8316 sizeof (aarch64_adrp_branch_stub)))
8317 return FALSE;
cec5225b 8318 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
a06ea964
NC
8319 return FALSE;
8320 break;
8321 case aarch64_stub_long_branch:
cec5225b 8322 if (!elfNN_aarch64_output_stub_sym
a06ea964
NC
8323 (osi, stub_name, addr, sizeof (aarch64_long_branch_stub)))
8324 return FALSE;
cec5225b 8325 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
a06ea964 8326 return FALSE;
cec5225b 8327 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_DATA, addr + 16))
a06ea964
NC
8328 return FALSE;
8329 break;
68fcca92
JW
8330 case aarch64_stub_erratum_835769_veneer:
8331 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
8332 sizeof (aarch64_erratum_835769_stub)))
8333 return FALSE;
8334 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
8335 return FALSE;
8336 break;
4106101c
MS
8337 case aarch64_stub_erratum_843419_veneer:
8338 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
8339 sizeof (aarch64_erratum_843419_stub)))
8340 return FALSE;
8341 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
8342 return FALSE;
8343 break;
9fca35fc
TC
8344 case aarch64_stub_none:
8345 break;
4106101c 8346
a06ea964 8347 default:
8e2fe09f 8348 abort ();
a06ea964
NC
8349 }
8350
8351 return TRUE;
8352}
8353
8354/* Output mapping symbols for linker generated sections. */
8355
8356static bfd_boolean
cec5225b 8357elfNN_aarch64_output_arch_local_syms (bfd *output_bfd,
a06ea964
NC
8358 struct bfd_link_info *info,
8359 void *finfo,
8360 int (*func) (void *, const char *,
8361 Elf_Internal_Sym *,
8362 asection *,
8363 struct elf_link_hash_entry
8364 *))
8365{
8366 output_arch_syminfo osi;
cec5225b 8367 struct elf_aarch64_link_hash_table *htab;
a06ea964 8368
cec5225b 8369 htab = elf_aarch64_hash_table (info);
a06ea964
NC
8370
8371 osi.finfo = finfo;
8372 osi.info = info;
8373 osi.func = func;
8374
8375 /* Long calls stubs. */
8376 if (htab->stub_bfd && htab->stub_bfd->sections)
8377 {
8378 asection *stub_sec;
8379
8380 for (stub_sec = htab->stub_bfd->sections;
8381 stub_sec != NULL; stub_sec = stub_sec->next)
8382 {
8383 /* Ignore non-stub sections. */
8384 if (!strstr (stub_sec->name, STUB_SUFFIX))
8385 continue;
8386
8387 osi.sec = stub_sec;
8388
8389 osi.sec_shndx = _bfd_elf_section_from_bfd_section
8390 (output_bfd, osi.sec->output_section);
8391
61865519
MS
8392 /* The first instruction in a stub is always a branch. */
8393 if (!elfNN_aarch64_output_map_sym (&osi, AARCH64_MAP_INSN, 0))
8394 return FALSE;
8395
a06ea964
NC
8396 bfd_hash_traverse (&htab->stub_hash_table, aarch64_map_one_stub,
8397 &osi);
8398 }
8399 }
8400
8401 /* Finally, output mapping symbols for the PLT. */
8402 if (!htab->root.splt || htab->root.splt->size == 0)
8403 return TRUE;
8404
a06ea964
NC
8405 osi.sec_shndx = _bfd_elf_section_from_bfd_section
8406 (output_bfd, htab->root.splt->output_section);
8407 osi.sec = htab->root.splt;
8408
73524045 8409 elfNN_aarch64_output_map_sym (&osi, AARCH64_MAP_INSN, 0);
a06ea964
NC
8410
8411 return TRUE;
8412
8413}
8414
8415/* Allocate target specific section data. */
8416
8417static bfd_boolean
cec5225b 8418elfNN_aarch64_new_section_hook (bfd *abfd, asection *sec)
a06ea964
NC
8419{
8420 if (!sec->used_by_bfd)
8421 {
8422 _aarch64_elf_section_data *sdata;
986f0783 8423 size_t amt = sizeof (*sdata);
a06ea964
NC
8424
8425 sdata = bfd_zalloc (abfd, amt);
8426 if (sdata == NULL)
8427 return FALSE;
8428 sec->used_by_bfd = sdata;
8429 }
8430
8431 record_section_with_aarch64_elf_section_data (sec);
8432
8433 return _bfd_elf_new_section_hook (abfd, sec);
8434}
8435
8436
8437static void
8438unrecord_section_via_map_over_sections (bfd *abfd ATTRIBUTE_UNUSED,
8439 asection *sec,
8440 void *ignore ATTRIBUTE_UNUSED)
8441{
8442 unrecord_section_with_aarch64_elf_section_data (sec);
8443}
8444
8445static bfd_boolean
cec5225b 8446elfNN_aarch64_close_and_cleanup (bfd *abfd)
a06ea964
NC
8447{
8448 if (abfd->sections)
8449 bfd_map_over_sections (abfd,
8450 unrecord_section_via_map_over_sections, NULL);
8451
8452 return _bfd_elf_close_and_cleanup (abfd);
8453}
8454
8455static bfd_boolean
cec5225b 8456elfNN_aarch64_bfd_free_cached_info (bfd *abfd)
a06ea964
NC
8457{
8458 if (abfd->sections)
8459 bfd_map_over_sections (abfd,
8460 unrecord_section_via_map_over_sections, NULL);
8461
8462 return _bfd_free_cached_info (abfd);
8463}
8464
a06ea964
NC
8465/* Create dynamic sections. This is different from the ARM backend in that
8466 the got, plt, gotplt and their relocation sections are all created in the
8467 standard part of the bfd elf backend. */
8468
8469static bfd_boolean
cec5225b 8470elfNN_aarch64_create_dynamic_sections (bfd *dynobj,
a06ea964
NC
8471 struct bfd_link_info *info)
8472{
cc0efaa8
MS
8473 /* We need to create .got section. */
8474 if (!aarch64_elf_create_got_section (dynobj, info))
8475 return FALSE;
a06ea964 8476
9d19e4fd 8477 return _bfd_elf_create_dynamic_sections (dynobj, info);
a06ea964
NC
8478}
8479
8480
8481/* Allocate space in .plt, .got and associated reloc sections for
8482 dynamic relocs. */
8483
8484static bfd_boolean
cec5225b 8485elfNN_aarch64_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
a06ea964
NC
8486{
8487 struct bfd_link_info *info;
cec5225b
YZ
8488 struct elf_aarch64_link_hash_table *htab;
8489 struct elf_aarch64_link_hash_entry *eh;
a06ea964
NC
8490 struct elf_dyn_relocs *p;
8491
8492 /* An example of a bfd_link_hash_indirect symbol is versioned
8493 symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
8494 -> __gxx_personality_v0(bfd_link_hash_defined)
8495
8496 There is no need to process bfd_link_hash_indirect symbols here
8497 because we will also be presented with the concrete instance of
cec5225b 8498 the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
a06ea964 8499 called to copy all relevant data from the generic to the concrete
2d0ca824 8500 symbol instance. */
a06ea964
NC
8501 if (h->root.type == bfd_link_hash_indirect)
8502 return TRUE;
8503
8504 if (h->root.type == bfd_link_hash_warning)
8505 h = (struct elf_link_hash_entry *) h->root.u.i.link;
8506
8507 info = (struct bfd_link_info *) inf;
cec5225b 8508 htab = elf_aarch64_hash_table (info);
a06ea964 8509
1419bbe5
WN
8510 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
8511 here if it is defined and referenced in a non-shared object. */
8512 if (h->type == STT_GNU_IFUNC
8513 && h->def_regular)
8514 return TRUE;
8515 else if (htab->root.dynamic_sections_created && h->plt.refcount > 0)
a06ea964
NC
8516 {
8517 /* Make sure this symbol is output as a dynamic symbol.
07d6d2b8 8518 Undefined weak syms won't yet be marked as dynamic. */
ff07562f
JW
8519 if (h->dynindx == -1 && !h->forced_local
8520 && h->root.type == bfd_link_hash_undefweak)
a06ea964
NC
8521 {
8522 if (!bfd_elf_link_record_dynamic_symbol (info, h))
8523 return FALSE;
8524 }
8525
0e1862bb 8526 if (bfd_link_pic (info) || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
a06ea964
NC
8527 {
8528 asection *s = htab->root.splt;
8529
8530 /* If this is the first .plt entry, make room for the special
8531 first entry. */
8532 if (s->size == 0)
8533 s->size += htab->plt_header_size;
8534
8535 h->plt.offset = s->size;
8536
8537 /* If this symbol is not defined in a regular file, and we are
8538 not generating a shared library, then set the symbol to this
8539 location in the .plt. This is required to make function
8540 pointers compare as equal between the normal executable and
8541 the shared library. */
0e1862bb 8542 if (!bfd_link_pic (info) && !h->def_regular)
a06ea964
NC
8543 {
8544 h->root.u.def.section = s;
8545 h->root.u.def.value = h->plt.offset;
8546 }
8547
8548 /* Make room for this entry. For now we only create the
8549 small model PLT entries. We later need to find a way
8550 of relaxing into these from the large model PLT entries. */
37c18eed 8551 s->size += htab->plt_entry_size;
a06ea964
NC
8552
8553 /* We also need to make an entry in the .got.plt section, which
8554 will be placed in the .got section by the linker script. */
8555 htab->root.sgotplt->size += GOT_ENTRY_SIZE;
8556
8557 /* We also need to make an entry in the .rela.plt section. */
8558 htab->root.srelplt->size += RELOC_SIZE (htab);
8559
8560 /* We need to ensure that all GOT entries that serve the PLT
8561 are consecutive with the special GOT slots [0] [1] and
8562 [2]. Any addtional relocations, such as
8563 R_AARCH64_TLSDESC, must be placed after the PLT related
8564 entries. We abuse the reloc_count such that during
8565 sizing we adjust reloc_count to indicate the number of
8566 PLT related reserved entries. In subsequent phases when
8567 filling in the contents of the reloc entries, PLT related
8568 entries are placed by computing their PLT index (0
8569 .. reloc_count). While other none PLT relocs are placed
8570 at the slot indicated by reloc_count and reloc_count is
8571 updated. */
8572
8573 htab->root.srelplt->reloc_count++;
823710d5
SN
8574
8575 /* Mark the DSO in case R_<CLS>_JUMP_SLOT relocs against
8576 variant PCS symbols are present. */
8577 if (h->other & STO_AARCH64_VARIANT_PCS)
8578 htab->variant_pcs = 1;
8579
a06ea964
NC
8580 }
8581 else
8582 {
8583 h->plt.offset = (bfd_vma) - 1;
8584 h->needs_plt = 0;
8585 }
8586 }
8587 else
8588 {
8589 h->plt.offset = (bfd_vma) - 1;
8590 h->needs_plt = 0;
8591 }
8592
cec5225b 8593 eh = (struct elf_aarch64_link_hash_entry *) h;
a06ea964
NC
8594 eh->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
8595
8596 if (h->got.refcount > 0)
8597 {
8598 bfd_boolean dyn;
cec5225b 8599 unsigned got_type = elf_aarch64_hash_entry (h)->got_type;
a06ea964
NC
8600
8601 h->got.offset = (bfd_vma) - 1;
8602
8603 dyn = htab->root.dynamic_sections_created;
8604
8605 /* Make sure this symbol is output as a dynamic symbol.
07d6d2b8 8606 Undefined weak syms won't yet be marked as dynamic. */
ff07562f
JW
8607 if (dyn && h->dynindx == -1 && !h->forced_local
8608 && h->root.type == bfd_link_hash_undefweak)
a06ea964
NC
8609 {
8610 if (!bfd_elf_link_record_dynamic_symbol (info, h))
8611 return FALSE;
8612 }
8613
8614 if (got_type == GOT_UNKNOWN)
8615 {
8616 }
8617 else if (got_type == GOT_NORMAL)
8618 {
8619 h->got.offset = htab->root.sgot->size;
8620 htab->root.sgot->size += GOT_ENTRY_SIZE;
8621 if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
8622 || h->root.type != bfd_link_hash_undefweak)
0e1862bb 8623 && (bfd_link_pic (info)
a377ae2a
SN
8624 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h))
8625 /* Undefined weak symbol in static PIE resolves to 0 without
8626 any dynamic relocations. */
8627 && !UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
a06ea964
NC
8628 {
8629 htab->root.srelgot->size += RELOC_SIZE (htab);
8630 }
8631 }
8632 else
8633 {
8634 int indx;
8635 if (got_type & GOT_TLSDESC_GD)
8636 {
8637 eh->tlsdesc_got_jump_table_offset =
8638 (htab->root.sgotplt->size
8639 - aarch64_compute_jump_table_size (htab));
8640 htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
8641 h->got.offset = (bfd_vma) - 2;
8642 }
8643
8644 if (got_type & GOT_TLS_GD)
8645 {
8646 h->got.offset = htab->root.sgot->size;
8647 htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
8648 }
8649
8650 if (got_type & GOT_TLS_IE)
8651 {
8652 h->got.offset = htab->root.sgot->size;
8653 htab->root.sgot->size += GOT_ENTRY_SIZE;
8654 }
8655
8656 indx = h && h->dynindx != -1 ? h->dynindx : 0;
8657 if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
8658 || h->root.type != bfd_link_hash_undefweak)
6dda7875 8659 && (!bfd_link_executable (info)
a06ea964
NC
8660 || indx != 0
8661 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
8662 {
8663 if (got_type & GOT_TLSDESC_GD)
8664 {
8665 htab->root.srelplt->size += RELOC_SIZE (htab);
8666 /* Note reloc_count not incremented here! We have
8667 already adjusted reloc_count for this relocation
8668 type. */
8669
8670 /* TLSDESC PLT is now needed, but not yet determined. */
9bcc30e4 8671 htab->root.tlsdesc_plt = (bfd_vma) - 1;
a06ea964
NC
8672 }
8673
8674 if (got_type & GOT_TLS_GD)
8675 htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
8676
8677 if (got_type & GOT_TLS_IE)
8678 htab->root.srelgot->size += RELOC_SIZE (htab);
8679 }
8680 }
8681 }
8682 else
8683 {
8684 h->got.offset = (bfd_vma) - 1;
8685 }
8686
190eb1dd 8687 if (h->dyn_relocs == NULL)
a06ea964
NC
8688 return TRUE;
8689
8690 /* In the shared -Bsymbolic case, discard space allocated for
8691 dynamic pc-relative relocs against symbols which turn out to be
8692 defined in regular objects. For the normal shared case, discard
8693 space for pc-relative relocs that have become local due to symbol
8694 visibility changes. */
8695
0e1862bb 8696 if (bfd_link_pic (info))
a06ea964
NC
8697 {
8698 /* Relocs that use pc_count are those that appear on a call
07d6d2b8
AM
8699 insn, or certain REL relocs that can generated via assembly.
8700 We want calls to protected symbols to resolve directly to the
8701 function rather than going via the plt. If people want
8702 function pointer comparisons to work as expected then they
8703 should avoid writing weird assembly. */
a06ea964
NC
8704 if (SYMBOL_CALLS_LOCAL (info, h))
8705 {
8706 struct elf_dyn_relocs **pp;
8707
190eb1dd 8708 for (pp = &h->dyn_relocs; (p = *pp) != NULL;)
a06ea964
NC
8709 {
8710 p->count -= p->pc_count;
8711 p->pc_count = 0;
8712 if (p->count == 0)
8713 *pp = p->next;
8714 else
8715 pp = &p->next;
8716 }
8717 }
8718
8719 /* Also discard relocs on undefined weak syms with non-default
07d6d2b8 8720 visibility. */
190eb1dd 8721 if (h->dyn_relocs != NULL && h->root.type == bfd_link_hash_undefweak)
a06ea964 8722 {
ddb7fd0f
L
8723 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
8724 || UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
190eb1dd 8725 h->dyn_relocs = NULL;
a06ea964
NC
8726
8727 /* Make sure undefined weak symbols are output as a dynamic
8728 symbol in PIEs. */
8729 else if (h->dynindx == -1
8730 && !h->forced_local
ff07562f 8731 && h->root.type == bfd_link_hash_undefweak
a06ea964
NC
8732 && !bfd_elf_link_record_dynamic_symbol (info, h))
8733 return FALSE;
8734 }
8735
8736 }
8737 else if (ELIMINATE_COPY_RELOCS)
8738 {
8739 /* For the non-shared case, discard space for relocs against
07d6d2b8
AM
8740 symbols which turn out to need copy relocs or are not
8741 dynamic. */
a06ea964
NC
8742
8743 if (!h->non_got_ref
8744 && ((h->def_dynamic
8745 && !h->def_regular)
8746 || (htab->root.dynamic_sections_created
8747 && (h->root.type == bfd_link_hash_undefweak
8748 || h->root.type == bfd_link_hash_undefined))))
8749 {
8750 /* Make sure this symbol is output as a dynamic symbol.
8751 Undefined weak syms won't yet be marked as dynamic. */
8752 if (h->dynindx == -1
8753 && !h->forced_local
ff07562f 8754 && h->root.type == bfd_link_hash_undefweak
a06ea964
NC
8755 && !bfd_elf_link_record_dynamic_symbol (info, h))
8756 return FALSE;
8757
8758 /* If that succeeded, we know we'll be keeping all the
8759 relocs. */
8760 if (h->dynindx != -1)
8761 goto keep;
8762 }
8763
190eb1dd 8764 h->dyn_relocs = NULL;
a06ea964
NC
8765
8766 keep:;
8767 }
8768
8769 /* Finally, allocate space. */
190eb1dd 8770 for (p = h->dyn_relocs; p != NULL; p = p->next)
a06ea964
NC
8771 {
8772 asection *sreloc;
8773
8774 sreloc = elf_section_data (p->sec)->sreloc;
8775
8776 BFD_ASSERT (sreloc != NULL);
8777
8778 sreloc->size += p->count * RELOC_SIZE (htab);
8779 }
8780
8781 return TRUE;
8782}
8783
1419bbe5
WN
8784/* Allocate space in .plt, .got and associated reloc sections for
8785 ifunc dynamic relocs. */
8786
8787static bfd_boolean
8788elfNN_aarch64_allocate_ifunc_dynrelocs (struct elf_link_hash_entry *h,
8789 void *inf)
8790{
8791 struct bfd_link_info *info;
8792 struct elf_aarch64_link_hash_table *htab;
1419bbe5
WN
8793
8794 /* An example of a bfd_link_hash_indirect symbol is versioned
8795 symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
8796 -> __gxx_personality_v0(bfd_link_hash_defined)
8797
8798 There is no need to process bfd_link_hash_indirect symbols here
8799 because we will also be presented with the concrete instance of
8800 the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
8801 called to copy all relevant data from the generic to the concrete
2d0ca824 8802 symbol instance. */
1419bbe5
WN
8803 if (h->root.type == bfd_link_hash_indirect)
8804 return TRUE;
8805
8806 if (h->root.type == bfd_link_hash_warning)
8807 h = (struct elf_link_hash_entry *) h->root.u.i.link;
8808
8809 info = (struct bfd_link_info *) inf;
8810 htab = elf_aarch64_hash_table (info);
8811
1419bbe5
WN
8812 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
8813 here if it is defined and referenced in a non-shared object. */
8814 if (h->type == STT_GNU_IFUNC
8815 && h->def_regular)
8816 return _bfd_elf_allocate_ifunc_dyn_relocs (info, h,
190eb1dd 8817 &h->dyn_relocs,
1419bbe5
WN
8818 htab->plt_entry_size,
8819 htab->plt_header_size,
233cc9c1
L
8820 GOT_ENTRY_SIZE,
8821 FALSE);
1419bbe5
WN
8822 return TRUE;
8823}
8824
1419bbe5
WN
8825/* Allocate space in .plt, .got and associated reloc sections for
8826 local ifunc dynamic relocs. */
8827
8828static bfd_boolean
8829elfNN_aarch64_allocate_local_ifunc_dynrelocs (void **slot, void *inf)
8830{
8831 struct elf_link_hash_entry *h
8832 = (struct elf_link_hash_entry *) *slot;
8833
8834 if (h->type != STT_GNU_IFUNC
8835 || !h->def_regular
8836 || !h->ref_regular
8837 || !h->forced_local
8838 || h->root.type != bfd_link_hash_defined)
8839 abort ();
8840
8841 return elfNN_aarch64_allocate_ifunc_dynrelocs (h, inf);
8842}
a06ea964 8843
a06ea964
NC
8844/* This is the most important function of all . Innocuosly named
8845 though ! */
2d0ca824 8846
a06ea964 8847static bfd_boolean
cec5225b 8848elfNN_aarch64_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
a06ea964
NC
8849 struct bfd_link_info *info)
8850{
cec5225b 8851 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC
8852 bfd *dynobj;
8853 asection *s;
8854 bfd_boolean relocs;
8855 bfd *ibfd;
8856
cec5225b 8857 htab = elf_aarch64_hash_table ((info));
a06ea964
NC
8858 dynobj = htab->root.dynobj;
8859
8860 BFD_ASSERT (dynobj != NULL);
8861
8862 if (htab->root.dynamic_sections_created)
8863 {
9b8b325a 8864 if (bfd_link_executable (info) && !info->nointerp)
a06ea964
NC
8865 {
8866 s = bfd_get_linker_section (dynobj, ".interp");
8867 if (s == NULL)
8868 abort ();
8869 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
8870 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
8871 }
8872 }
8873
8874 /* Set up .got offsets for local syms, and space for local dynamic
8875 relocs. */
c72f2fb2 8876 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
a06ea964
NC
8877 {
8878 struct elf_aarch64_local_symbol *locals = NULL;
8879 Elf_Internal_Shdr *symtab_hdr;
8880 asection *srel;
8881 unsigned int i;
8882
8883 if (!is_aarch64_elf (ibfd))
8884 continue;
8885
8886 for (s = ibfd->sections; s != NULL; s = s->next)
8887 {
8888 struct elf_dyn_relocs *p;
8889
8890 for (p = (struct elf_dyn_relocs *)
8891 (elf_section_data (s)->local_dynrel); p != NULL; p = p->next)
8892 {
8893 if (!bfd_is_abs_section (p->sec)
8894 && bfd_is_abs_section (p->sec->output_section))
8895 {
8896 /* Input section has been discarded, either because
8897 it is a copy of a linkonce section or due to
8898 linker script /DISCARD/, so we'll be discarding
8899 the relocs too. */
8900 }
8901 else if (p->count != 0)
8902 {
8903 srel = elf_section_data (p->sec)->sreloc;
8904 srel->size += p->count * RELOC_SIZE (htab);
8905 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
8906 info->flags |= DF_TEXTREL;
8907 }
8908 }
8909 }
8910
cec5225b 8911 locals = elf_aarch64_locals (ibfd);
a06ea964
NC
8912 if (!locals)
8913 continue;
8914
8915 symtab_hdr = &elf_symtab_hdr (ibfd);
8916 srel = htab->root.srelgot;
8917 for (i = 0; i < symtab_hdr->sh_info; i++)
8918 {
8919 locals[i].got_offset = (bfd_vma) - 1;
8920 locals[i].tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
8921 if (locals[i].got_refcount > 0)
8922 {
8923 unsigned got_type = locals[i].got_type;
8924 if (got_type & GOT_TLSDESC_GD)
8925 {
8926 locals[i].tlsdesc_got_jump_table_offset =
8927 (htab->root.sgotplt->size
8928 - aarch64_compute_jump_table_size (htab));
8929 htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
8930 locals[i].got_offset = (bfd_vma) - 2;
8931 }
8932
8933 if (got_type & GOT_TLS_GD)
8934 {
8935 locals[i].got_offset = htab->root.sgot->size;
8936 htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
8937 }
8938
b53b1bed
JW
8939 if (got_type & GOT_TLS_IE
8940 || got_type & GOT_NORMAL)
a06ea964
NC
8941 {
8942 locals[i].got_offset = htab->root.sgot->size;
8943 htab->root.sgot->size += GOT_ENTRY_SIZE;
8944 }
8945
8946 if (got_type == GOT_UNKNOWN)
8947 {
8948 }
8949
0e1862bb 8950 if (bfd_link_pic (info))
a06ea964
NC
8951 {
8952 if (got_type & GOT_TLSDESC_GD)
8953 {
8954 htab->root.srelplt->size += RELOC_SIZE (htab);
8955 /* Note RELOC_COUNT not incremented here! */
9bcc30e4 8956 htab->root.tlsdesc_plt = (bfd_vma) - 1;
a06ea964
NC
8957 }
8958
8959 if (got_type & GOT_TLS_GD)
8960 htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
8961
b53b1bed
JW
8962 if (got_type & GOT_TLS_IE
8963 || got_type & GOT_NORMAL)
a06ea964
NC
8964 htab->root.srelgot->size += RELOC_SIZE (htab);
8965 }
8966 }
8967 else
8968 {
8969 locals[i].got_refcount = (bfd_vma) - 1;
8970 }
8971 }
8972 }
8973
8974
8975 /* Allocate global sym .plt and .got entries, and space for global
8976 sym dynamic relocs. */
cec5225b 8977 elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_dynrelocs,
a06ea964
NC
8978 info);
8979
1419bbe5
WN
8980 /* Allocate global ifunc sym .plt and .got entries, and space for global
8981 ifunc sym dynamic relocs. */
8982 elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_ifunc_dynrelocs,
8983 info);
8984
1419bbe5
WN
8985 /* Allocate .plt and .got entries, and space for local ifunc symbols. */
8986 htab_traverse (htab->loc_hash_table,
8987 elfNN_aarch64_allocate_local_ifunc_dynrelocs,
8988 info);
a06ea964
NC
8989
8990 /* For every jump slot reserved in the sgotplt, reloc_count is
8991 incremented. However, when we reserve space for TLS descriptors,
8992 it's not incremented, so in order to compute the space reserved
8993 for them, it suffices to multiply the reloc count by the jump
8994 slot size. */
8995
8996 if (htab->root.srelplt)
8847944f 8997 htab->sgotplt_jump_table_size = aarch64_compute_jump_table_size (htab);
a06ea964 8998
9bcc30e4 8999 if (htab->root.tlsdesc_plt)
a06ea964
NC
9000 {
9001 if (htab->root.splt->size == 0)
37c18eed 9002 htab->root.splt->size += htab->plt_header_size;
a06ea964 9003
a06ea964 9004 /* If we're not using lazy TLS relocations, don't generate the
ce12121b 9005 GOT and PLT entry required. */
9bcc30e4
L
9006 if ((info->flags & DF_BIND_NOW))
9007 htab->root.tlsdesc_plt = 0;
9008 else
a06ea964 9009 {
9bcc30e4 9010 htab->root.tlsdesc_plt = htab->root.splt->size;
ce12121b
TC
9011 htab->root.splt->size += htab->tlsdesc_plt_entry_size;
9012
9bcc30e4 9013 htab->root.tlsdesc_got = htab->root.sgot->size;
a06ea964
NC
9014 htab->root.sgot->size += GOT_ENTRY_SIZE;
9015 }
9016 }
9017
68fcca92 9018 /* Init mapping symbols information to use later to distingush between
4106101c
MS
9019 code and data while scanning for errata. */
9020 if (htab->fix_erratum_835769 || htab->fix_erratum_843419)
68fcca92
JW
9021 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
9022 {
9023 if (!is_aarch64_elf (ibfd))
9024 continue;
9025 bfd_elfNN_aarch64_init_maps (ibfd);
9026 }
9027
a06ea964
NC
9028 /* We now have determined the sizes of the various dynamic sections.
9029 Allocate memory for them. */
9030 relocs = FALSE;
9031 for (s = dynobj->sections; s != NULL; s = s->next)
9032 {
9033 if ((s->flags & SEC_LINKER_CREATED) == 0)
9034 continue;
9035
9036 if (s == htab->root.splt
9037 || s == htab->root.sgot
9038 || s == htab->root.sgotplt
9039 || s == htab->root.iplt
9d19e4fd 9040 || s == htab->root.igotplt
5474d94f
AM
9041 || s == htab->root.sdynbss
9042 || s == htab->root.sdynrelro)
a06ea964
NC
9043 {
9044 /* Strip this section if we don't need it; see the
9045 comment below. */
9046 }
fd361982 9047 else if (CONST_STRNEQ (bfd_section_name (s), ".rela"))
a06ea964
NC
9048 {
9049 if (s->size != 0 && s != htab->root.srelplt)
9050 relocs = TRUE;
9051
9052 /* We use the reloc_count field as a counter if we need
9053 to copy relocs into the output file. */
9054 if (s != htab->root.srelplt)
9055 s->reloc_count = 0;
9056 }
9057 else
9058 {
9059 /* It's not one of our sections, so don't allocate space. */
9060 continue;
9061 }
9062
9063 if (s->size == 0)
9064 {
9065 /* If we don't need this section, strip it from the
9066 output file. This is mostly to handle .rela.bss and
9067 .rela.plt. We must create both sections in
9068 create_dynamic_sections, because they must be created
9069 before the linker maps input sections to output
9070 sections. The linker does that before
9071 adjust_dynamic_symbol is called, and it is that
9072 function which decides whether anything needs to go
9073 into these sections. */
a06ea964
NC
9074 s->flags |= SEC_EXCLUDE;
9075 continue;
9076 }
9077
9078 if ((s->flags & SEC_HAS_CONTENTS) == 0)
9079 continue;
9080
9081 /* Allocate memory for the section contents. We use bfd_zalloc
07d6d2b8
AM
9082 here in case unused entries are not reclaimed before the
9083 section's contents are written out. This should not happen,
9084 but this way if it does, we get a R_AARCH64_NONE reloc instead
9085 of garbage. */
a06ea964
NC
9086 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
9087 if (s->contents == NULL)
9088 return FALSE;
9089 }
9090
9091 if (htab->root.dynamic_sections_created)
9092 {
9093 /* Add some entries to the .dynamic section. We fill in the
07d6d2b8
AM
9094 values later, in elfNN_aarch64_finish_dynamic_sections, but we
9095 must add the entries now so that we get the correct size for
9096 the .dynamic section. The DT_DEBUG entry is filled in by the
9097 dynamic linker and used by the debugger. */
a06ea964
NC
9098#define add_dynamic_entry(TAG, VAL) \
9099 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
9100
3084d7a2
L
9101 if (!_bfd_elf_add_dynamic_tags (output_bfd, info, relocs))
9102 return FALSE;
a06ea964
NC
9103
9104 if (htab->root.splt->size != 0)
9105 {
823710d5
SN
9106 if (htab->variant_pcs
9107 && !add_dynamic_entry (DT_AARCH64_VARIANT_PCS, 0))
9108 return FALSE;
9109
1dbade74
SD
9110 if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_BTI_PAC)
9111 && (!add_dynamic_entry (DT_AARCH64_BTI_PLT, 0)
9112 || !add_dynamic_entry (DT_AARCH64_PAC_PLT, 0)))
9113 return FALSE;
9114
9115 else if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_BTI)
9116 && !add_dynamic_entry (DT_AARCH64_BTI_PLT, 0))
9117 return FALSE;
9118
9119 else if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_PAC)
9120 && !add_dynamic_entry (DT_AARCH64_PAC_PLT, 0))
37c18eed 9121 return FALSE;
a06ea964 9122 }
a06ea964
NC
9123 }
9124#undef add_dynamic_entry
9125
9126 return TRUE;
a06ea964
NC
9127}
9128
9129static inline void
caed7120
YZ
9130elf_aarch64_update_plt_entry (bfd *output_bfd,
9131 bfd_reloc_code_real_type r_type,
9132 bfd_byte *plt_entry, bfd_vma value)
a06ea964 9133{
caed7120
YZ
9134 reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (r_type);
9135
1d75a8e2
NC
9136 /* FIXME: We should check the return value from this function call. */
9137 (void) _bfd_aarch64_elf_put_addend (output_bfd, plt_entry, r_type, howto, value);
a06ea964
NC
9138}
9139
9140static void
cec5225b
YZ
9141elfNN_aarch64_create_small_pltn_entry (struct elf_link_hash_entry *h,
9142 struct elf_aarch64_link_hash_table
1419bbe5
WN
9143 *htab, bfd *output_bfd,
9144 struct bfd_link_info *info)
a06ea964
NC
9145{
9146 bfd_byte *plt_entry;
9147 bfd_vma plt_index;
9148 bfd_vma got_offset;
9149 bfd_vma gotplt_entry_address;
9150 bfd_vma plt_entry_address;
9151 Elf_Internal_Rela rela;
9152 bfd_byte *loc;
1419bbe5
WN
9153 asection *plt, *gotplt, *relplt;
9154
9155 /* When building a static executable, use .iplt, .igot.plt and
9156 .rela.iplt sections for STT_GNU_IFUNC symbols. */
9157 if (htab->root.splt != NULL)
9158 {
9159 plt = htab->root.splt;
9160 gotplt = htab->root.sgotplt;
9161 relplt = htab->root.srelplt;
9162 }
9163 else
9164 {
9165 plt = htab->root.iplt;
9166 gotplt = htab->root.igotplt;
9167 relplt = htab->root.irelplt;
9168 }
9169
9170 /* Get the index in the procedure linkage table which
9171 corresponds to this symbol. This is the index of this symbol
9172 in all the symbols for which we are making plt entries. The
9173 first entry in the procedure linkage table is reserved.
a06ea964 9174
1419bbe5
WN
9175 Get the offset into the .got table of the entry that
9176 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
9177 bytes. The first three are reserved for the dynamic linker.
692e2b8b 9178
1419bbe5
WN
9179 For static executables, we don't reserve anything. */
9180
9181 if (plt == htab->root.splt)
9182 {
9183 plt_index = (h->plt.offset - htab->plt_header_size) / htab->plt_entry_size;
9184 got_offset = (plt_index + 3) * GOT_ENTRY_SIZE;
9185 }
9186 else
9187 {
9188 plt_index = h->plt.offset / htab->plt_entry_size;
9189 got_offset = plt_index * GOT_ENTRY_SIZE;
9190 }
9191
9192 plt_entry = plt->contents + h->plt.offset;
9193 plt_entry_address = plt->output_section->vma
f44a1f8e 9194 + plt->output_offset + h->plt.offset;
1419bbe5
WN
9195 gotplt_entry_address = gotplt->output_section->vma +
9196 gotplt->output_offset + got_offset;
a06ea964
NC
9197
9198 /* Copy in the boiler-plate for the PLTn entry. */
37c18eed
SD
9199 memcpy (plt_entry, htab->plt_entry, htab->plt_entry_size);
9200
9201 /* First instruction in BTI enabled PLT stub is a BTI
9202 instruction so skip it. */
9203 if (elf_aarch64_tdata (output_bfd)->plt_type & PLT_BTI
9204 && elf_elfheader (output_bfd)->e_type == ET_EXEC)
9205 plt_entry = plt_entry + 4;
a06ea964
NC
9206
9207 /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
9208 ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
caed7120
YZ
9209 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9210 plt_entry,
9211 PG (gotplt_entry_address) -
9212 PG (plt_entry_address));
a06ea964
NC
9213
9214 /* Fill in the lo12 bits for the load from the pltgot. */
caed7120
YZ
9215 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
9216 plt_entry + 4,
9217 PG_OFFSET (gotplt_entry_address));
a06ea964 9218
9aff4b7a 9219 /* Fill in the lo12 bits for the add from the pltgot entry. */
caed7120
YZ
9220 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
9221 plt_entry + 8,
9222 PG_OFFSET (gotplt_entry_address));
a06ea964
NC
9223
9224 /* All the GOTPLT Entries are essentially initialized to PLT0. */
cec5225b 9225 bfd_put_NN (output_bfd,
1419bbe5
WN
9226 plt->output_section->vma + plt->output_offset,
9227 gotplt->contents + got_offset);
a06ea964 9228
a06ea964 9229 rela.r_offset = gotplt_entry_address;
1419bbe5
WN
9230
9231 if (h->dynindx == -1
0e1862bb 9232 || ((bfd_link_executable (info)
1419bbe5
WN
9233 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
9234 && h->def_regular
9235 && h->type == STT_GNU_IFUNC))
9236 {
9237 /* If an STT_GNU_IFUNC symbol is locally defined, generate
9238 R_AARCH64_IRELATIVE instead of R_AARCH64_JUMP_SLOT. */
9239 rela.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
9240 rela.r_addend = (h->root.u.def.value
9241 + h->root.u.def.section->output_section->vma
9242 + h->root.u.def.section->output_offset);
9243 }
9244 else
9245 {
9246 /* Fill in the entry in the .rela.plt section. */
9247 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (JUMP_SLOT));
9248 rela.r_addend = 0;
9249 }
a06ea964
NC
9250
9251 /* Compute the relocation entry to used based on PLT index and do
9252 not adjust reloc_count. The reloc_count has already been adjusted
9253 to account for this entry. */
1419bbe5 9254 loc = relplt->contents + plt_index * RELOC_SIZE (htab);
cec5225b 9255 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC
9256}
9257
9258/* Size sections even though they're not dynamic. We use it to setup
9259 _TLS_MODULE_BASE_, if needed. */
9260
9261static bfd_boolean
cec5225b 9262elfNN_aarch64_always_size_sections (bfd *output_bfd,
a06ea964
NC
9263 struct bfd_link_info *info)
9264{
9265 asection *tls_sec;
9266
0e1862bb 9267 if (bfd_link_relocatable (info))
a06ea964
NC
9268 return TRUE;
9269
9270 tls_sec = elf_hash_table (info)->tls_sec;
9271
9272 if (tls_sec)
9273 {
9274 struct elf_link_hash_entry *tlsbase;
9275
9276 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
9277 "_TLS_MODULE_BASE_", TRUE, TRUE, FALSE);
9278
9279 if (tlsbase)
9280 {
9281 struct bfd_link_hash_entry *h = NULL;
9282 const struct elf_backend_data *bed =
9283 get_elf_backend_data (output_bfd);
9284
9285 if (!(_bfd_generic_link_add_one_symbol
9286 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
9287 tls_sec, 0, NULL, FALSE, bed->collect, &h)))
9288 return FALSE;
9289
9290 tlsbase->type = STT_TLS;
9291 tlsbase = (struct elf_link_hash_entry *) h;
9292 tlsbase->def_regular = 1;
9293 tlsbase->other = STV_HIDDEN;
9294 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
9295 }
9296 }
9297
9298 return TRUE;
9299}
9300
9301/* Finish up dynamic symbol handling. We set the contents of various
9302 dynamic sections here. */
2d0ca824 9303
a06ea964 9304static bfd_boolean
cec5225b 9305elfNN_aarch64_finish_dynamic_symbol (bfd *output_bfd,
a06ea964
NC
9306 struct bfd_link_info *info,
9307 struct elf_link_hash_entry *h,
9308 Elf_Internal_Sym *sym)
9309{
cec5225b
YZ
9310 struct elf_aarch64_link_hash_table *htab;
9311 htab = elf_aarch64_hash_table (info);
a06ea964
NC
9312
9313 if (h->plt.offset != (bfd_vma) - 1)
9314 {
1419bbe5
WN
9315 asection *plt, *gotplt, *relplt;
9316
a06ea964 9317 /* This symbol has an entry in the procedure linkage table. Set
07d6d2b8 9318 it up. */
a06ea964 9319
1419bbe5
WN
9320 /* When building a static executable, use .iplt, .igot.plt and
9321 .rela.iplt sections for STT_GNU_IFUNC symbols. */
9322 if (htab->root.splt != NULL)
9323 {
9324 plt = htab->root.splt;
9325 gotplt = htab->root.sgotplt;
9326 relplt = htab->root.srelplt;
9327 }
9328 else
9329 {
9330 plt = htab->root.iplt;
9331 gotplt = htab->root.igotplt;
9332 relplt = htab->root.irelplt;
9333 }
9334
9335 /* This symbol has an entry in the procedure linkage table. Set
9336 it up. */
9337 if ((h->dynindx == -1
0e1862bb 9338 && !((h->forced_local || bfd_link_executable (info))
1419bbe5
WN
9339 && h->def_regular
9340 && h->type == STT_GNU_IFUNC))
9341 || plt == NULL
9342 || gotplt == NULL
9343 || relplt == NULL)
f955cccf 9344 return FALSE;
a06ea964 9345
1419bbe5 9346 elfNN_aarch64_create_small_pltn_entry (h, htab, output_bfd, info);
a06ea964
NC
9347 if (!h->def_regular)
9348 {
9349 /* Mark the symbol as undefined, rather than as defined in
46b87d49 9350 the .plt section. */
a06ea964 9351 sym->st_shndx = SHN_UNDEF;
46b87d49
WN
9352 /* If the symbol is weak we need to clear the value.
9353 Otherwise, the PLT entry would provide a definition for
9354 the symbol even if the symbol wasn't defined anywhere,
9355 and so the symbol would never be NULL. Leave the value if
9356 there were any relocations where pointer equality matters
9357 (this is a clue for the dynamic linker, to make function
9358 pointer comparisons work between an application and shared
9359 library). */
9360 if (!h->ref_regular_nonweak || !h->pointer_equality_needed)
9361 sym->st_value = 0;
a06ea964
NC
9362 }
9363 }
9364
9365 if (h->got.offset != (bfd_vma) - 1
a377ae2a
SN
9366 && elf_aarch64_hash_entry (h)->got_type == GOT_NORMAL
9367 /* Undefined weak symbol in static PIE resolves to 0 without
9368 any dynamic relocations. */
9369 && !UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
a06ea964
NC
9370 {
9371 Elf_Internal_Rela rela;
9372 bfd_byte *loc;
9373
9374 /* This symbol has an entry in the global offset table. Set it
07d6d2b8 9375 up. */
a06ea964
NC
9376 if (htab->root.sgot == NULL || htab->root.srelgot == NULL)
9377 abort ();
9378
9379 rela.r_offset = (htab->root.sgot->output_section->vma
9380 + htab->root.sgot->output_offset
9381 + (h->got.offset & ~(bfd_vma) 1));
9382
49206388
WN
9383 if (h->def_regular
9384 && h->type == STT_GNU_IFUNC)
9385 {
0e1862bb 9386 if (bfd_link_pic (info))
49206388
WN
9387 {
9388 /* Generate R_AARCH64_GLOB_DAT. */
9389 goto do_glob_dat;
9390 }
9391 else
9392 {
9393 asection *plt;
9394
9395 if (!h->pointer_equality_needed)
9396 abort ();
9397
9398 /* For non-shared object, we can't use .got.plt, which
9399 contains the real function address if we need pointer
9400 equality. We load the GOT entry with the PLT entry. */
9401 plt = htab->root.splt ? htab->root.splt : htab->root.iplt;
9402 bfd_put_NN (output_bfd, (plt->output_section->vma
9403 + plt->output_offset
9404 + h->plt.offset),
9405 htab->root.sgot->contents
9406 + (h->got.offset & ~(bfd_vma) 1));
9407 return TRUE;
9408 }
9409 }
0e1862bb 9410 else if (bfd_link_pic (info) && SYMBOL_REFERENCES_LOCAL (info, h))
a06ea964 9411 {
0ee3a6db 9412 if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
a06ea964
NC
9413 return FALSE;
9414
9415 BFD_ASSERT ((h->got.offset & 1) != 0);
a6bb11b2 9416 rela.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
a06ea964
NC
9417 rela.r_addend = (h->root.u.def.value
9418 + h->root.u.def.section->output_section->vma
9419 + h->root.u.def.section->output_offset);
9420 }
9421 else
9422 {
dc1e8a47 9423 do_glob_dat:
a06ea964 9424 BFD_ASSERT ((h->got.offset & 1) == 0);
cec5225b 9425 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964 9426 htab->root.sgot->contents + h->got.offset);
a6bb11b2 9427 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (GLOB_DAT));
a06ea964
NC
9428 rela.r_addend = 0;
9429 }
9430
9431 loc = htab->root.srelgot->contents;
9432 loc += htab->root.srelgot->reloc_count++ * RELOC_SIZE (htab);
cec5225b 9433 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC
9434 }
9435
9436 if (h->needs_copy)
9437 {
9438 Elf_Internal_Rela rela;
5474d94f 9439 asection *s;
a06ea964
NC
9440 bfd_byte *loc;
9441
9442 /* This symbol needs a copy reloc. Set it up. */
a06ea964
NC
9443 if (h->dynindx == -1
9444 || (h->root.type != bfd_link_hash_defined
9445 && h->root.type != bfd_link_hash_defweak)
9d19e4fd 9446 || htab->root.srelbss == NULL)
a06ea964
NC
9447 abort ();
9448
9449 rela.r_offset = (h->root.u.def.value
9450 + h->root.u.def.section->output_section->vma
9451 + h->root.u.def.section->output_offset);
a6bb11b2 9452 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (COPY));
a06ea964 9453 rela.r_addend = 0;
afbf7e8e 9454 if (h->root.u.def.section == htab->root.sdynrelro)
5474d94f
AM
9455 s = htab->root.sreldynrelro;
9456 else
9457 s = htab->root.srelbss;
9458 loc = s->contents + s->reloc_count++ * RELOC_SIZE (htab);
cec5225b 9459 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC
9460 }
9461
9462 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. SYM may
9463 be NULL for local symbols. */
9464 if (sym != NULL
9637f6ef 9465 && (h == elf_hash_table (info)->hdynamic
a06ea964
NC
9466 || h == elf_hash_table (info)->hgot))
9467 sym->st_shndx = SHN_ABS;
9468
9469 return TRUE;
9470}
9471
1419bbe5
WN
9472/* Finish up local dynamic symbol handling. We set the contents of
9473 various dynamic sections here. */
9474
9475static bfd_boolean
9476elfNN_aarch64_finish_local_dynamic_symbol (void **slot, void *inf)
9477{
9478 struct elf_link_hash_entry *h
9479 = (struct elf_link_hash_entry *) *slot;
9480 struct bfd_link_info *info
9481 = (struct bfd_link_info *) inf;
9482
9483 return elfNN_aarch64_finish_dynamic_symbol (info->output_bfd,
9484 info, h, NULL);
9485}
9486
a06ea964 9487static void
cec5225b
YZ
9488elfNN_aarch64_init_small_plt0_entry (bfd *output_bfd ATTRIBUTE_UNUSED,
9489 struct elf_aarch64_link_hash_table
a06ea964
NC
9490 *htab)
9491{
9492 /* Fill in PLT0. Fixme:RR Note this doesn't distinguish between
9493 small and large plts and at the minute just generates
9494 the small PLT. */
9495
cec5225b 9496 /* PLT0 of the small PLT looks like this in ELF64 -
a06ea964
NC
9497 stp x16, x30, [sp, #-16]! // Save the reloc and lr on stack.
9498 adrp x16, PLT_GOT + 16 // Get the page base of the GOTPLT
9499 ldr x17, [x16, #:lo12:PLT_GOT+16] // Load the address of the
9500 // symbol resolver
9501 add x16, x16, #:lo12:PLT_GOT+16 // Load the lo12 bits of the
9502 // GOTPLT entry for this.
9503 br x17
cec5225b 9504 PLT0 will be slightly different in ELF32 due to different got entry
2d0ca824 9505 size. */
caed7120 9506 bfd_vma plt_got_2nd_ent; /* Address of GOT[2]. */
a06ea964
NC
9507 bfd_vma plt_base;
9508
9509
37c18eed
SD
9510 memcpy (htab->root.splt->contents, htab->plt0_entry,
9511 htab->plt_header_size);
a06ea964 9512 elf_section_data (htab->root.splt->output_section)->this_hdr.sh_entsize =
37c18eed 9513 htab->plt_header_size;
a06ea964 9514
caed7120
YZ
9515 plt_got_2nd_ent = (htab->root.sgotplt->output_section->vma
9516 + htab->root.sgotplt->output_offset
9517 + GOT_ENTRY_SIZE * 2);
a06ea964
NC
9518
9519 plt_base = htab->root.splt->output_section->vma +
f44a1f8e 9520 htab->root.splt->output_offset;
a06ea964 9521
37c18eed
SD
9522 /* First instruction in BTI enabled PLT stub is a BTI
9523 instruction so skip it. */
9524 bfd_byte *plt0_entry = htab->root.splt->contents;
9525 if (elf_aarch64_tdata (output_bfd)->plt_type & PLT_BTI)
9526 plt0_entry = plt0_entry + 4;
9527
a06ea964
NC
9528 /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
9529 ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
caed7120 9530 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
37c18eed 9531 plt0_entry + 4,
caed7120 9532 PG (plt_got_2nd_ent) - PG (plt_base + 4));
a06ea964 9533
caed7120 9534 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
37c18eed 9535 plt0_entry + 8,
caed7120 9536 PG_OFFSET (plt_got_2nd_ent));
a06ea964 9537
caed7120 9538 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
37c18eed 9539 plt0_entry + 12,
caed7120 9540 PG_OFFSET (plt_got_2nd_ent));
a06ea964
NC
9541}
9542
9543static bfd_boolean
cec5225b 9544elfNN_aarch64_finish_dynamic_sections (bfd *output_bfd,
a06ea964
NC
9545 struct bfd_link_info *info)
9546{
cec5225b 9547 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC
9548 bfd *dynobj;
9549 asection *sdyn;
9550
cec5225b 9551 htab = elf_aarch64_hash_table (info);
a06ea964
NC
9552 dynobj = htab->root.dynobj;
9553 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
9554
9555 if (htab->root.dynamic_sections_created)
9556 {
cec5225b 9557 ElfNN_External_Dyn *dyncon, *dynconend;
a06ea964
NC
9558
9559 if (sdyn == NULL || htab->root.sgot == NULL)
9560 abort ();
9561
cec5225b
YZ
9562 dyncon = (ElfNN_External_Dyn *) sdyn->contents;
9563 dynconend = (ElfNN_External_Dyn *) (sdyn->contents + sdyn->size);
a06ea964
NC
9564 for (; dyncon < dynconend; dyncon++)
9565 {
9566 Elf_Internal_Dyn dyn;
9567 asection *s;
9568
cec5225b 9569 bfd_elfNN_swap_dyn_in (dynobj, dyncon, &dyn);
a06ea964
NC
9570
9571 switch (dyn.d_tag)
9572 {
9573 default:
9574 continue;
9575
9576 case DT_PLTGOT:
9577 s = htab->root.sgotplt;
9578 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
9579 break;
9580
9581 case DT_JMPREL:
4ade44b7
AM
9582 s = htab->root.srelplt;
9583 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
a06ea964
NC
9584 break;
9585
9586 case DT_PLTRELSZ:
c955de36 9587 s = htab->root.srelplt;
a06ea964
NC
9588 dyn.d_un.d_val = s->size;
9589 break;
9590
a06ea964
NC
9591 case DT_TLSDESC_PLT:
9592 s = htab->root.splt;
9593 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
9bcc30e4 9594 + htab->root.tlsdesc_plt;
a06ea964
NC
9595 break;
9596
9597 case DT_TLSDESC_GOT:
9598 s = htab->root.sgot;
9bcc30e4 9599 BFD_ASSERT (htab->root.tlsdesc_got != (bfd_vma)-1);
a06ea964 9600 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
9bcc30e4 9601 + htab->root.tlsdesc_got;
a06ea964
NC
9602 break;
9603 }
9604
cec5225b 9605 bfd_elfNN_swap_dyn_out (output_bfd, &dyn, dyncon);
a06ea964
NC
9606 }
9607
9608 }
9609
9610 /* Fill in the special first entry in the procedure linkage table. */
9611 if (htab->root.splt && htab->root.splt->size > 0)
9612 {
cec5225b 9613 elfNN_aarch64_init_small_plt0_entry (output_bfd, htab);
a06ea964
NC
9614
9615 elf_section_data (htab->root.splt->output_section)->
9616 this_hdr.sh_entsize = htab->plt_entry_size;
9617
9618
9bcc30e4 9619 if (htab->root.tlsdesc_plt && !(info->flags & DF_BIND_NOW))
a06ea964 9620 {
9bcc30e4 9621 BFD_ASSERT (htab->root.tlsdesc_got != (bfd_vma)-1);
cec5225b 9622 bfd_put_NN (output_bfd, (bfd_vma) 0,
9bcc30e4 9623 htab->root.sgot->contents + htab->root.tlsdesc_got);
a06ea964 9624
37c18eed
SD
9625 const bfd_byte *entry = elfNN_aarch64_tlsdesc_small_plt_entry;
9626 htab->tlsdesc_plt_entry_size = PLT_TLSDESC_ENTRY_SIZE;
9627
9628 aarch64_plt_type type = elf_aarch64_tdata (output_bfd)->plt_type;
1dbade74 9629 if (type == PLT_BTI || type == PLT_BTI_PAC)
37c18eed
SD
9630 {
9631 entry = elfNN_aarch64_tlsdesc_small_plt_bti_entry;
37c18eed
SD
9632 }
9633
9bcc30e4 9634 memcpy (htab->root.splt->contents + htab->root.tlsdesc_plt,
37c18eed 9635 entry, htab->tlsdesc_plt_entry_size);
a06ea964
NC
9636
9637 {
9638 bfd_vma adrp1_addr =
9639 htab->root.splt->output_section->vma
9bcc30e4
L
9640 + htab->root.splt->output_offset
9641 + htab->root.tlsdesc_plt + 4;
a06ea964 9642
caed7120 9643 bfd_vma adrp2_addr = adrp1_addr + 4;
a06ea964
NC
9644
9645 bfd_vma got_addr =
9646 htab->root.sgot->output_section->vma
9647 + htab->root.sgot->output_offset;
9648
9649 bfd_vma pltgot_addr =
9650 htab->root.sgotplt->output_section->vma
9651 + htab->root.sgotplt->output_offset;
9652
9bcc30e4 9653 bfd_vma dt_tlsdesc_got = got_addr + htab->root.tlsdesc_got;
caed7120
YZ
9654
9655 bfd_byte *plt_entry =
9bcc30e4 9656 htab->root.splt->contents + htab->root.tlsdesc_plt;
a06ea964 9657
37c18eed
SD
9658 /* First instruction in BTI enabled PLT stub is a BTI
9659 instruction so skip it. */
9660 if (type & PLT_BTI)
9661 {
9662 plt_entry = plt_entry + 4;
9663 adrp1_addr = adrp1_addr + 4;
9664 adrp2_addr = adrp2_addr + 4;
9665 }
9666
a06ea964 9667 /* adrp x2, DT_TLSDESC_GOT */
caed7120
YZ
9668 elf_aarch64_update_plt_entry (output_bfd,
9669 BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9670 plt_entry + 4,
9671 (PG (dt_tlsdesc_got)
9672 - PG (adrp1_addr)));
a06ea964
NC
9673
9674 /* adrp x3, 0 */
caed7120
YZ
9675 elf_aarch64_update_plt_entry (output_bfd,
9676 BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9677 plt_entry + 8,
9678 (PG (pltgot_addr)
9679 - PG (adrp2_addr)));
a06ea964
NC
9680
9681 /* ldr x2, [x2, #0] */
caed7120
YZ
9682 elf_aarch64_update_plt_entry (output_bfd,
9683 BFD_RELOC_AARCH64_LDSTNN_LO12,
9684 plt_entry + 12,
9685 PG_OFFSET (dt_tlsdesc_got));
a06ea964
NC
9686
9687 /* add x3, x3, 0 */
caed7120
YZ
9688 elf_aarch64_update_plt_entry (output_bfd,
9689 BFD_RELOC_AARCH64_ADD_LO12,
9690 plt_entry + 16,
9691 PG_OFFSET (pltgot_addr));
a06ea964
NC
9692 }
9693 }
9694 }
9695
9696 if (htab->root.sgotplt)
9697 {
9698 if (bfd_is_abs_section (htab->root.sgotplt->output_section))
9699 {
4eca0228 9700 _bfd_error_handler
871b3ab2 9701 (_("discarded output section: `%pA'"), htab->root.sgotplt);
a06ea964
NC
9702 return FALSE;
9703 }
9704
9705 /* Fill in the first three entries in the global offset table. */
9706 if (htab->root.sgotplt->size > 0)
9707 {
8db339a6
MS
9708 bfd_put_NN (output_bfd, (bfd_vma) 0, htab->root.sgotplt->contents);
9709
a06ea964 9710 /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
cec5225b 9711 bfd_put_NN (output_bfd,
a06ea964
NC
9712 (bfd_vma) 0,
9713 htab->root.sgotplt->contents + GOT_ENTRY_SIZE);
cec5225b 9714 bfd_put_NN (output_bfd,
a06ea964
NC
9715 (bfd_vma) 0,
9716 htab->root.sgotplt->contents + GOT_ENTRY_SIZE * 2);
9717 }
9718
8db339a6
MS
9719 if (htab->root.sgot)
9720 {
9721 if (htab->root.sgot->size > 0)
9722 {
9723 bfd_vma addr =
9724 sdyn ? sdyn->output_section->vma + sdyn->output_offset : 0;
9725 bfd_put_NN (output_bfd, addr, htab->root.sgot->contents);
9726 }
9727 }
9728
a06ea964
NC
9729 elf_section_data (htab->root.sgotplt->output_section)->
9730 this_hdr.sh_entsize = GOT_ENTRY_SIZE;
9731 }
9732
9733 if (htab->root.sgot && htab->root.sgot->size > 0)
9734 elf_section_data (htab->root.sgot->output_section)->this_hdr.sh_entsize
9735 = GOT_ENTRY_SIZE;
9736
1419bbe5
WN
9737 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
9738 htab_traverse (htab->loc_hash_table,
9739 elfNN_aarch64_finish_local_dynamic_symbol,
9740 info);
9741
a06ea964
NC
9742 return TRUE;
9743}
9744
37c18eed
SD
9745/* Check if BTI enabled PLTs are needed. Returns the type needed. */
9746static aarch64_plt_type
9747get_plt_type (bfd *abfd)
9748{
9749 aarch64_plt_type ret = PLT_NORMAL;
9750 bfd_byte *contents, *extdyn, *extdynend;
9751 asection *sec = bfd_get_section_by_name (abfd, ".dynamic");
9752 if (!sec || !bfd_malloc_and_get_section (abfd, sec, &contents))
9753 return ret;
9754 extdyn = contents;
9755 extdynend = contents + sec->size;
9756 for (; extdyn < extdynend; extdyn += sizeof (ElfNN_External_Dyn))
9757 {
9758 Elf_Internal_Dyn dyn;
9759 bfd_elfNN_swap_dyn_in (abfd, extdyn, &dyn);
9760
9761 /* Let's check the processor specific dynamic array tags. */
9762 bfd_vma tag = dyn.d_tag;
9763 if (tag < DT_LOPROC || tag > DT_HIPROC)
9764 continue;
9765
9766 switch (tag)
9767 {
9768 case DT_AARCH64_BTI_PLT:
1dbade74
SD
9769 ret |= PLT_BTI;
9770 break;
9771
9772 case DT_AARCH64_PAC_PLT:
9773 ret |= PLT_PAC;
37c18eed
SD
9774 break;
9775
9776 default: break;
9777 }
9778 }
9779 free (contents);
9780 return ret;
9781}
9782
9783static long
9784elfNN_aarch64_get_synthetic_symtab (bfd *abfd,
9785 long symcount,
9786 asymbol **syms,
9787 long dynsymcount,
9788 asymbol **dynsyms,
9789 asymbol **ret)
9790{
9791 elf_aarch64_tdata (abfd)->plt_type = get_plt_type (abfd);
9792 return _bfd_elf_get_synthetic_symtab (abfd, symcount, syms,
9793 dynsymcount, dynsyms, ret);
9794}
9795
a06ea964
NC
9796/* Return address for Ith PLT stub in section PLT, for relocation REL
9797 or (bfd_vma) -1 if it should not be included. */
9798
9799static bfd_vma
cec5225b 9800elfNN_aarch64_plt_sym_val (bfd_vma i, const asection *plt,
a06ea964
NC
9801 const arelent *rel ATTRIBUTE_UNUSED)
9802{
37c18eed
SD
9803 size_t plt0_size = PLT_ENTRY_SIZE;
9804 size_t pltn_size = PLT_SMALL_ENTRY_SIZE;
9805
1dbade74
SD
9806 if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_BTI_PAC)
9807 {
1dbade74
SD
9808 if (elf_elfheader (plt->owner)->e_type == ET_EXEC)
9809 pltn_size = PLT_BTI_PAC_SMALL_ENTRY_SIZE;
9810 else
9811 pltn_size = PLT_PAC_SMALL_ENTRY_SIZE;
9812 }
9813 else if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_BTI)
37c18eed 9814 {
37c18eed
SD
9815 if (elf_elfheader (plt->owner)->e_type == ET_EXEC)
9816 pltn_size = PLT_BTI_SMALL_ENTRY_SIZE;
9817 }
1dbade74
SD
9818 else if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_PAC)
9819 {
1dbade74
SD
9820 pltn_size = PLT_PAC_SMALL_ENTRY_SIZE;
9821 }
9822
37c18eed 9823 return plt->vma + plt0_size + i * pltn_size;
a06ea964
NC
9824}
9825
d691934d
NC
9826/* Returns TRUE if NAME is an AArch64 mapping symbol.
9827 The ARM ELF standard defines $x (for A64 code) and $d (for data).
9828 It also allows a period initiated suffix to be added to the symbol, ie:
9829 "$[adtx]\.[:sym_char]+". */
9830
9831static bfd_boolean
9832is_aarch64_mapping_symbol (const char * name)
9833{
9834 return name != NULL /* Paranoia. */
9835 && name[0] == '$' /* Note: if objcopy --prefix-symbols has been used then
9836 the mapping symbols could have acquired a prefix.
9837 We do not support this here, since such symbols no
9838 longer conform to the ARM ELF ABI. */
9839 && (name[1] == 'd' || name[1] == 'x')
9840 && (name[2] == 0 || name[2] == '.');
9841 /* FIXME: Strictly speaking the symbol is only a valid mapping symbol if
9842 any characters that follow the period are legal characters for the body
9843 of a symbol's name. For now we just assume that this is the case. */
9844}
9845
9846/* Make sure that mapping symbols in object files are not removed via the
9847 "strip --strip-unneeded" tool. These symbols might needed in order to
9848 correctly generate linked files. Once an object file has been linked,
9849 it should be safe to remove them. */
9850
9851static void
9852elfNN_aarch64_backend_symbol_processing (bfd *abfd, asymbol *sym)
9853{
9854 if (((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
9855 && sym->section != bfd_abs_section_ptr
9856 && is_aarch64_mapping_symbol (sym->name))
9857 sym->flags |= BSF_KEEP;
9858}
9859
cd702818
SD
9860/* Implement elf_backend_setup_gnu_properties for AArch64. It serves as a
9861 wrapper function for _bfd_aarch64_elf_link_setup_gnu_properties to account
9862 for the effect of GNU properties of the output_bfd. */
9863static bfd *
9864elfNN_aarch64_link_setup_gnu_properties (struct bfd_link_info *info)
9865{
9866 uint32_t prop = elf_aarch64_tdata (info->output_bfd)->gnu_and_prop;
9867 bfd *pbfd = _bfd_aarch64_elf_link_setup_gnu_properties (info, &prop);
9868 elf_aarch64_tdata (info->output_bfd)->gnu_and_prop = prop;
37c18eed
SD
9869 elf_aarch64_tdata (info->output_bfd)->plt_type
9870 |= (prop & GNU_PROPERTY_AARCH64_FEATURE_1_BTI) ? PLT_BTI : 0;
9871 setup_plt_values (info, elf_aarch64_tdata (info->output_bfd)->plt_type);
cd702818
SD
9872 return pbfd;
9873}
9874
9875/* Implement elf_backend_merge_gnu_properties for AArch64. It serves as a
9876 wrapper function for _bfd_aarch64_elf_merge_gnu_properties to account
9877 for the effect of GNU properties of the output_bfd. */
9878static bfd_boolean
9879elfNN_aarch64_merge_gnu_properties (struct bfd_link_info *info,
4e539114 9880 bfd *abfd, bfd *bbfd,
cd702818
SD
9881 elf_property *aprop,
9882 elf_property *bprop)
9883{
9884 uint32_t prop
9885 = elf_aarch64_tdata (info->output_bfd)->gnu_and_prop;
37c18eed
SD
9886
9887 /* If output has been marked with BTI using command line argument, give out
9888 warning if necessary. */
4e539114
SD
9889 /* Properties are merged per type, hence only check for warnings when merging
9890 GNU_PROPERTY_AARCH64_FEATURE_1_AND. */
9891 if (((aprop && aprop->pr_type == GNU_PROPERTY_AARCH64_FEATURE_1_AND)
9892 || (bprop && bprop->pr_type == GNU_PROPERTY_AARCH64_FEATURE_1_AND))
9893 && (prop & GNU_PROPERTY_AARCH64_FEATURE_1_BTI)
37c18eed
SD
9894 && (!elf_aarch64_tdata (info->output_bfd)->no_bti_warn))
9895 {
9896 if ((aprop && !(aprop->u.number & GNU_PROPERTY_AARCH64_FEATURE_1_BTI))
4e539114 9897 || !aprop)
37c18eed 9898 {
8bf6d176 9899 _bfd_error_handler (_("%pB: warning: BTI turned on by -z force-bti when "
4e539114
SD
9900 "all inputs do not have BTI in NOTE section."),
9901 abfd);
9902 }
9903 if ((bprop && !(bprop->u.number & GNU_PROPERTY_AARCH64_FEATURE_1_BTI))
9904 || !bprop)
9905 {
8bf6d176 9906 _bfd_error_handler (_("%pB: warning: BTI turned on by -z force-bti when "
4e539114
SD
9907 "all inputs do not have BTI in NOTE section."),
9908 bbfd);
37c18eed
SD
9909 }
9910 }
9911
cd702818
SD
9912 return _bfd_aarch64_elf_merge_gnu_properties (info, abfd, aprop,
9913 bprop, prop);
9914}
a06ea964
NC
9915
9916/* We use this so we can override certain functions
9917 (though currently we don't). */
9918
cec5225b 9919const struct elf_size_info elfNN_aarch64_size_info =
a06ea964 9920{
cec5225b
YZ
9921 sizeof (ElfNN_External_Ehdr),
9922 sizeof (ElfNN_External_Phdr),
9923 sizeof (ElfNN_External_Shdr),
9924 sizeof (ElfNN_External_Rel),
9925 sizeof (ElfNN_External_Rela),
9926 sizeof (ElfNN_External_Sym),
9927 sizeof (ElfNN_External_Dyn),
a06ea964
NC
9928 sizeof (Elf_External_Note),
9929 4, /* Hash table entry size. */
9930 1, /* Internal relocs per external relocs. */
cec5225b
YZ
9931 ARCH_SIZE, /* Arch size. */
9932 LOG_FILE_ALIGN, /* Log_file_align. */
9933 ELFCLASSNN, EV_CURRENT,
9934 bfd_elfNN_write_out_phdrs,
9935 bfd_elfNN_write_shdrs_and_ehdr,
9936 bfd_elfNN_checksum_contents,
9937 bfd_elfNN_write_relocs,
9938 bfd_elfNN_swap_symbol_in,
9939 bfd_elfNN_swap_symbol_out,
9940 bfd_elfNN_slurp_reloc_table,
9941 bfd_elfNN_slurp_symbol_table,
9942 bfd_elfNN_swap_dyn_in,
9943 bfd_elfNN_swap_dyn_out,
9944 bfd_elfNN_swap_reloc_in,
9945 bfd_elfNN_swap_reloc_out,
9946 bfd_elfNN_swap_reloca_in,
9947 bfd_elfNN_swap_reloca_out
a06ea964
NC
9948};
9949
9950#define ELF_ARCH bfd_arch_aarch64
9951#define ELF_MACHINE_CODE EM_AARCH64
9952#define ELF_MAXPAGESIZE 0x10000
9953#define ELF_MINPAGESIZE 0x1000
9954#define ELF_COMMONPAGESIZE 0x1000
9955
07d6d2b8 9956#define bfd_elfNN_close_and_cleanup \
cec5225b 9957 elfNN_aarch64_close_and_cleanup
a06ea964 9958
07d6d2b8 9959#define bfd_elfNN_bfd_free_cached_info \
cec5225b 9960 elfNN_aarch64_bfd_free_cached_info
a06ea964 9961
cec5225b
YZ
9962#define bfd_elfNN_bfd_is_target_special_symbol \
9963 elfNN_aarch64_is_target_special_symbol
a06ea964 9964
07d6d2b8 9965#define bfd_elfNN_bfd_link_hash_table_create \
cec5225b 9966 elfNN_aarch64_link_hash_table_create
a06ea964 9967
cec5225b
YZ
9968#define bfd_elfNN_bfd_merge_private_bfd_data \
9969 elfNN_aarch64_merge_private_bfd_data
a06ea964 9970
cec5225b
YZ
9971#define bfd_elfNN_bfd_print_private_bfd_data \
9972 elfNN_aarch64_print_private_bfd_data
a06ea964 9973
cec5225b
YZ
9974#define bfd_elfNN_bfd_reloc_type_lookup \
9975 elfNN_aarch64_reloc_type_lookup
a06ea964 9976
cec5225b
YZ
9977#define bfd_elfNN_bfd_reloc_name_lookup \
9978 elfNN_aarch64_reloc_name_lookup
a06ea964 9979
cec5225b
YZ
9980#define bfd_elfNN_bfd_set_private_flags \
9981 elfNN_aarch64_set_private_flags
a06ea964 9982
cec5225b
YZ
9983#define bfd_elfNN_find_inliner_info \
9984 elfNN_aarch64_find_inliner_info
a06ea964 9985
37c18eed
SD
9986#define bfd_elfNN_get_synthetic_symtab \
9987 elfNN_aarch64_get_synthetic_symtab
9988
cec5225b
YZ
9989#define bfd_elfNN_mkobject \
9990 elfNN_aarch64_mkobject
a06ea964 9991
cec5225b
YZ
9992#define bfd_elfNN_new_section_hook \
9993 elfNN_aarch64_new_section_hook
a06ea964
NC
9994
9995#define elf_backend_adjust_dynamic_symbol \
cec5225b 9996 elfNN_aarch64_adjust_dynamic_symbol
a06ea964
NC
9997
9998#define elf_backend_always_size_sections \
cec5225b 9999 elfNN_aarch64_always_size_sections
a06ea964
NC
10000
10001#define elf_backend_check_relocs \
cec5225b 10002 elfNN_aarch64_check_relocs
a06ea964
NC
10003
10004#define elf_backend_copy_indirect_symbol \
cec5225b 10005 elfNN_aarch64_copy_indirect_symbol
a06ea964 10006
823710d5
SN
10007#define elf_backend_merge_symbol_attribute \
10008 elfNN_aarch64_merge_symbol_attribute
10009
a06ea964
NC
10010/* Create .dynbss, and .rela.bss sections in DYNOBJ, and set up shortcuts
10011 to them in our hash. */
10012#define elf_backend_create_dynamic_sections \
cec5225b 10013 elfNN_aarch64_create_dynamic_sections
a06ea964
NC
10014
10015#define elf_backend_init_index_section \
10016 _bfd_elf_init_2_index_sections
10017
a06ea964 10018#define elf_backend_finish_dynamic_sections \
cec5225b 10019 elfNN_aarch64_finish_dynamic_sections
a06ea964
NC
10020
10021#define elf_backend_finish_dynamic_symbol \
cec5225b 10022 elfNN_aarch64_finish_dynamic_symbol
a06ea964 10023
a06ea964 10024#define elf_backend_object_p \
cec5225b 10025 elfNN_aarch64_object_p
a06ea964 10026
07d6d2b8 10027#define elf_backend_output_arch_local_syms \
cec5225b 10028 elfNN_aarch64_output_arch_local_syms
a06ea964 10029
e7679060
AM
10030#define elf_backend_maybe_function_sym \
10031 elfNN_aarch64_maybe_function_sym
10032
a06ea964 10033#define elf_backend_plt_sym_val \
cec5225b 10034 elfNN_aarch64_plt_sym_val
a06ea964 10035
ed7e9d0b
AM
10036#define elf_backend_init_file_header \
10037 elfNN_aarch64_init_file_header
a06ea964
NC
10038
10039#define elf_backend_relocate_section \
cec5225b 10040 elfNN_aarch64_relocate_section
a06ea964
NC
10041
10042#define elf_backend_reloc_type_class \
cec5225b 10043 elfNN_aarch64_reloc_type_class
a06ea964 10044
a06ea964 10045#define elf_backend_section_from_shdr \
cec5225b 10046 elfNN_aarch64_section_from_shdr
a06ea964
NC
10047
10048#define elf_backend_size_dynamic_sections \
cec5225b 10049 elfNN_aarch64_size_dynamic_sections
a06ea964
NC
10050
10051#define elf_backend_size_info \
cec5225b 10052 elfNN_aarch64_size_info
a06ea964 10053
68fcca92
JW
10054#define elf_backend_write_section \
10055 elfNN_aarch64_write_section
10056
d691934d
NC
10057#define elf_backend_symbol_processing \
10058 elfNN_aarch64_backend_symbol_processing
10059
cd702818
SD
10060#define elf_backend_setup_gnu_properties \
10061 elfNN_aarch64_link_setup_gnu_properties
10062
10063#define elf_backend_merge_gnu_properties \
10064 elfNN_aarch64_merge_gnu_properties
10065
a06ea964 10066#define elf_backend_can_refcount 1
59c108f7 10067#define elf_backend_can_gc_sections 1
a06ea964
NC
10068#define elf_backend_plt_readonly 1
10069#define elf_backend_want_got_plt 1
10070#define elf_backend_want_plt_sym 0
5474d94f 10071#define elf_backend_want_dynrelro 1
a06ea964
NC
10072#define elf_backend_may_use_rel_p 0
10073#define elf_backend_may_use_rela_p 1
10074#define elf_backend_default_use_rela_p 1
07d6d2b8 10075#define elf_backend_rela_normal 1
64f52338 10076#define elf_backend_dtrel_excludes_plt 1
a06ea964 10077#define elf_backend_got_header_size (GOT_ENTRY_SIZE * 3)
c495064d 10078#define elf_backend_default_execstack 0
32f573bc 10079#define elf_backend_extern_protected_data 1
7f784814 10080#define elf_backend_hash_symbol elf_aarch64_hash_symbol
a06ea964 10081
07d6d2b8 10082#undef elf_backend_obj_attrs_section
a06ea964
NC
10083#define elf_backend_obj_attrs_section ".ARM.attributes"
10084
cec5225b 10085#include "elfNN-target.h"
a75cf613
ES
10086
10087/* CloudABI support. */
10088
10089#undef TARGET_LITTLE_SYM
10090#define TARGET_LITTLE_SYM aarch64_elfNN_le_cloudabi_vec
10091#undef TARGET_LITTLE_NAME
10092#define TARGET_LITTLE_NAME "elfNN-littleaarch64-cloudabi"
10093#undef TARGET_BIG_SYM
10094#define TARGET_BIG_SYM aarch64_elfNN_be_cloudabi_vec
10095#undef TARGET_BIG_NAME
10096#define TARGET_BIG_NAME "elfNN-bigaarch64-cloudabi"
10097
10098#undef ELF_OSABI
10099#define ELF_OSABI ELFOSABI_CLOUDABI
10100
10101#undef elfNN_bed
10102#define elfNN_bed elfNN_aarch64_cloudabi_bed
10103
10104#include "elfNN-target.h"
This page took 1.803854 seconds and 4 git commands to generate.