Updated translations for various binutils sub-directories
[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 /* Small local sym cache. */
2647 struct sym_cache sym_cache;
2648
2649 /* For convenience in allocate_dynrelocs. */
2650 bfd *obfd;
2651
2652 /* The amount of space used by the reserved portion of the sgotplt
2653 section, plus whatever space is used by the jump slots. */
2654 bfd_vma sgotplt_jump_table_size;
2655
2656 /* The stub hash table. */
2657 struct bfd_hash_table stub_hash_table;
2658
2659 /* Linker stub bfd. */
2660 bfd *stub_bfd;
2661
2662 /* Linker call-backs. */
2663 asection *(*add_stub_section) (const char *, asection *);
2664 void (*layout_sections_again) (void);
2665
2666 /* Array to keep track of which stub sections have been created, and
2667 information on stub grouping. */
2668 struct map_stub
2669 {
2670 /* This is the section to which stubs in the group will be
2671 attached. */
2672 asection *link_sec;
2673 /* The stub section. */
2674 asection *stub_sec;
2675 } *stub_group;
2676
cec5225b 2677 /* Assorted information used by elfNN_aarch64_size_stubs. */
a06ea964 2678 unsigned int bfd_count;
7292b3ac 2679 unsigned int top_index;
a06ea964
NC
2680 asection **input_list;
2681
823710d5
SN
2682 /* JUMP_SLOT relocs for variant PCS symbols may be present. */
2683 int variant_pcs;
2684
37c18eed
SD
2685 /* The number of bytes in the PLT enty for the TLS descriptor. */
2686 bfd_size_type tlsdesc_plt_entry_size;
2687
1419bbe5
WN
2688 /* Used by local STT_GNU_IFUNC symbols. */
2689 htab_t loc_hash_table;
2690 void * loc_hash_memory;
a06ea964
NC
2691};
2692
a06ea964
NC
2693/* Create an entry in an AArch64 ELF linker hash table. */
2694
2695static struct bfd_hash_entry *
cec5225b 2696elfNN_aarch64_link_hash_newfunc (struct bfd_hash_entry *entry,
a06ea964
NC
2697 struct bfd_hash_table *table,
2698 const char *string)
2699{
cec5225b
YZ
2700 struct elf_aarch64_link_hash_entry *ret =
2701 (struct elf_aarch64_link_hash_entry *) entry;
a06ea964
NC
2702
2703 /* Allocate the structure if it has not already been allocated by a
2704 subclass. */
2705 if (ret == NULL)
2706 ret = bfd_hash_allocate (table,
cec5225b 2707 sizeof (struct elf_aarch64_link_hash_entry));
a06ea964
NC
2708 if (ret == NULL)
2709 return (struct bfd_hash_entry *) ret;
2710
2711 /* Call the allocation method of the superclass. */
cec5225b 2712 ret = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC
2713 _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
2714 table, string));
2715 if (ret != NULL)
2716 {
a06ea964
NC
2717 ret->got_type = GOT_UNKNOWN;
2718 ret->plt_got_offset = (bfd_vma) - 1;
2719 ret->stub_cache = NULL;
2720 ret->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
2721 }
2722
2723 return (struct bfd_hash_entry *) ret;
2724}
2725
2726/* Initialize an entry in the stub hash table. */
2727
2728static struct bfd_hash_entry *
2729stub_hash_newfunc (struct bfd_hash_entry *entry,
2730 struct bfd_hash_table *table, const char *string)
2731{
2732 /* Allocate the structure if it has not already been allocated by a
2733 subclass. */
2734 if (entry == NULL)
2735 {
2736 entry = bfd_hash_allocate (table,
2737 sizeof (struct
cec5225b 2738 elf_aarch64_stub_hash_entry));
a06ea964
NC
2739 if (entry == NULL)
2740 return entry;
2741 }
2742
2743 /* Call the allocation method of the superclass. */
2744 entry = bfd_hash_newfunc (entry, table, string);
2745 if (entry != NULL)
2746 {
cec5225b 2747 struct elf_aarch64_stub_hash_entry *eh;
a06ea964
NC
2748
2749 /* Initialize the local fields. */
cec5225b 2750 eh = (struct elf_aarch64_stub_hash_entry *) entry;
4106101c 2751 eh->adrp_offset = 0;
a06ea964
NC
2752 eh->stub_sec = NULL;
2753 eh->stub_offset = 0;
2754 eh->target_value = 0;
2755 eh->target_section = NULL;
2756 eh->stub_type = aarch64_stub_none;
2757 eh->h = NULL;
2758 eh->id_sec = NULL;
2759 }
2760
2761 return entry;
2762}
2763
1419bbe5
WN
2764/* Compute a hash of a local hash entry. We use elf_link_hash_entry
2765 for local symbol so that we can handle local STT_GNU_IFUNC symbols
2766 as global symbol. We reuse indx and dynstr_index for local symbol
2767 hash since they aren't used by global symbols in this backend. */
2768
2769static hashval_t
2770elfNN_aarch64_local_htab_hash (const void *ptr)
2771{
2772 struct elf_link_hash_entry *h
2773 = (struct elf_link_hash_entry *) ptr;
2774 return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
2775}
2776
2777/* Compare local hash entries. */
2778
2779static int
2780elfNN_aarch64_local_htab_eq (const void *ptr1, const void *ptr2)
2781{
2782 struct elf_link_hash_entry *h1
2783 = (struct elf_link_hash_entry *) ptr1;
2784 struct elf_link_hash_entry *h2
2785 = (struct elf_link_hash_entry *) ptr2;
2786
2787 return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
2788}
2789
2790/* Find and/or create a hash entry for local symbol. */
2791
2792static struct elf_link_hash_entry *
2793elfNN_aarch64_get_local_sym_hash (struct elf_aarch64_link_hash_table *htab,
2794 bfd *abfd, const Elf_Internal_Rela *rel,
2795 bfd_boolean create)
2796{
2797 struct elf_aarch64_link_hash_entry e, *ret;
2798 asection *sec = abfd->sections;
2799 hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id,
2800 ELFNN_R_SYM (rel->r_info));
2801 void **slot;
2802
2803 e.root.indx = sec->id;
2804 e.root.dynstr_index = ELFNN_R_SYM (rel->r_info);
2805 slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
2806 create ? INSERT : NO_INSERT);
2807
2808 if (!slot)
2809 return NULL;
2810
2811 if (*slot)
2812 {
2813 ret = (struct elf_aarch64_link_hash_entry *) *slot;
2814 return &ret->root;
2815 }
2816
2817 ret = (struct elf_aarch64_link_hash_entry *)
2818 objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
2819 sizeof (struct elf_aarch64_link_hash_entry));
2820 if (ret)
2821 {
2822 memset (ret, 0, sizeof (*ret));
2823 ret->root.indx = sec->id;
2824 ret->root.dynstr_index = ELFNN_R_SYM (rel->r_info);
2825 ret->root.dynindx = -1;
2826 *slot = ret;
2827 }
2828 return &ret->root;
2829}
a06ea964
NC
2830
2831/* Copy the extra info we tack onto an elf_link_hash_entry. */
2832
2833static void
cec5225b 2834elfNN_aarch64_copy_indirect_symbol (struct bfd_link_info *info,
a06ea964
NC
2835 struct elf_link_hash_entry *dir,
2836 struct elf_link_hash_entry *ind)
2837{
cec5225b 2838 struct elf_aarch64_link_hash_entry *edir, *eind;
a06ea964 2839
cec5225b
YZ
2840 edir = (struct elf_aarch64_link_hash_entry *) dir;
2841 eind = (struct elf_aarch64_link_hash_entry *) ind;
a06ea964 2842
a06ea964
NC
2843 if (ind->root.type == bfd_link_hash_indirect)
2844 {
2845 /* Copy over PLT info. */
2846 if (dir->got.refcount <= 0)
2847 {
2848 edir->got_type = eind->got_type;
2849 eind->got_type = GOT_UNKNOWN;
2850 }
2851 }
2852
2853 _bfd_elf_link_hash_copy_indirect (info, dir, ind);
2854}
2855
823710d5
SN
2856/* Merge non-visibility st_other attributes. */
2857
2858static void
2859elfNN_aarch64_merge_symbol_attribute (struct elf_link_hash_entry *h,
2860 const Elf_Internal_Sym *isym,
2861 bfd_boolean definition ATTRIBUTE_UNUSED,
2862 bfd_boolean dynamic ATTRIBUTE_UNUSED)
2863{
2864 unsigned int isym_sto = isym->st_other & ~ELF_ST_VISIBILITY (-1);
2865 unsigned int h_sto = h->other & ~ELF_ST_VISIBILITY (-1);
2866
2867 if (isym_sto == h_sto)
2868 return;
2869
2870 if (isym_sto & ~STO_AARCH64_VARIANT_PCS)
2871 /* Not fatal, this callback cannot fail. */
2872 _bfd_error_handler (_("unknown attribute for symbol `%s': 0x%02x"),
2873 h->root.root.string, isym_sto);
2874
2875 /* Note: Ideally we would warn about any attribute mismatch, but
2876 this api does not allow that without substantial changes. */
2877 if (isym_sto & STO_AARCH64_VARIANT_PCS)
2878 h->other |= STO_AARCH64_VARIANT_PCS;
2879}
2880
68faa637
AM
2881/* Destroy an AArch64 elf linker hash table. */
2882
2883static void
d495ab0d 2884elfNN_aarch64_link_hash_table_free (bfd *obfd)
68faa637
AM
2885{
2886 struct elf_aarch64_link_hash_table *ret
d495ab0d 2887 = (struct elf_aarch64_link_hash_table *) obfd->link.hash;
68faa637
AM
2888
2889 if (ret->loc_hash_table)
2890 htab_delete (ret->loc_hash_table);
2891 if (ret->loc_hash_memory)
2892 objalloc_free ((struct objalloc *) ret->loc_hash_memory);
2893
2894 bfd_hash_table_free (&ret->stub_hash_table);
d495ab0d 2895 _bfd_elf_link_hash_table_free (obfd);
68faa637
AM
2896}
2897
a06ea964
NC
2898/* Create an AArch64 elf linker hash table. */
2899
2900static struct bfd_link_hash_table *
cec5225b 2901elfNN_aarch64_link_hash_table_create (bfd *abfd)
a06ea964 2902{
cec5225b 2903 struct elf_aarch64_link_hash_table *ret;
986f0783 2904 size_t amt = sizeof (struct elf_aarch64_link_hash_table);
a06ea964 2905
7bf52ea2 2906 ret = bfd_zmalloc (amt);
a06ea964
NC
2907 if (ret == NULL)
2908 return NULL;
2909
2910 if (!_bfd_elf_link_hash_table_init
cec5225b
YZ
2911 (&ret->root, abfd, elfNN_aarch64_link_hash_newfunc,
2912 sizeof (struct elf_aarch64_link_hash_entry), AARCH64_ELF_DATA))
a06ea964
NC
2913 {
2914 free (ret);
2915 return NULL;
2916 }
2917
a06ea964 2918 ret->plt_header_size = PLT_ENTRY_SIZE;
37c18eed 2919 ret->plt0_entry = elfNN_aarch64_small_plt0_entry;
a06ea964 2920 ret->plt_entry_size = PLT_SMALL_ENTRY_SIZE;
37c18eed
SD
2921 ret->plt_entry = elfNN_aarch64_small_plt_entry;
2922 ret->tlsdesc_plt_entry_size = PLT_TLSDESC_ENTRY_SIZE;
a06ea964 2923 ret->obfd = abfd;
9bcc30e4 2924 ret->root.tlsdesc_got = (bfd_vma) - 1;
a06ea964
NC
2925
2926 if (!bfd_hash_table_init (&ret->stub_hash_table, stub_hash_newfunc,
cec5225b 2927 sizeof (struct elf_aarch64_stub_hash_entry)))
a06ea964 2928 {
d495ab0d 2929 _bfd_elf_link_hash_table_free (abfd);
a06ea964
NC
2930 return NULL;
2931 }
2932
1419bbe5
WN
2933 ret->loc_hash_table = htab_try_create (1024,
2934 elfNN_aarch64_local_htab_hash,
2935 elfNN_aarch64_local_htab_eq,
2936 NULL);
2937 ret->loc_hash_memory = objalloc_create ();
2938 if (!ret->loc_hash_table || !ret->loc_hash_memory)
2939 {
d495ab0d 2940 elfNN_aarch64_link_hash_table_free (abfd);
1419bbe5
WN
2941 return NULL;
2942 }
d495ab0d 2943 ret->root.root.hash_table_free = elfNN_aarch64_link_hash_table_free;
1419bbe5 2944
a06ea964
NC
2945 return &ret->root.root;
2946}
2947
1d75a8e2
NC
2948/* Perform relocation R_TYPE. Returns TRUE upon success, FALSE otherwise. */
2949
a06ea964
NC
2950static bfd_boolean
2951aarch64_relocate (unsigned int r_type, bfd *input_bfd, asection *input_section,
2952 bfd_vma offset, bfd_vma value)
2953{
2954 reloc_howto_type *howto;
2955 bfd_vma place;
2956
0aa13fee 2957 howto = elfNN_aarch64_howto_from_type (input_bfd, r_type);
a06ea964
NC
2958 place = (input_section->output_section->vma + input_section->output_offset
2959 + offset);
caed7120 2960
0aa13fee 2961 r_type = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
652afeef
TC
2962 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, r_type, place,
2963 value, 0, FALSE);
caed7120
YZ
2964 return _bfd_aarch64_elf_put_addend (input_bfd,
2965 input_section->contents + offset, r_type,
1d75a8e2 2966 howto, value) == bfd_reloc_ok;
a06ea964
NC
2967}
2968
cec5225b 2969static enum elf_aarch64_stub_type
a06ea964
NC
2970aarch64_select_branch_stub (bfd_vma value, bfd_vma place)
2971{
2972 if (aarch64_valid_for_adrp_p (value, place))
2973 return aarch64_stub_adrp_branch;
2974 return aarch64_stub_long_branch;
2975}
2976
2977/* Determine the type of stub needed, if any, for a call. */
2978
cec5225b 2979static enum elf_aarch64_stub_type
9a228467 2980aarch64_type_of_stub (asection *input_sec,
a06ea964 2981 const Elf_Internal_Rela *rel,
f678ded7 2982 asection *sym_sec,
a06ea964 2983 unsigned char st_type,
a06ea964
NC
2984 bfd_vma destination)
2985{
2986 bfd_vma location;
2987 bfd_signed_vma branch_offset;
2988 unsigned int r_type;
cec5225b 2989 enum elf_aarch64_stub_type stub_type = aarch64_stub_none;
a06ea964 2990
f678ded7 2991 if (st_type != STT_FUNC
2f340668 2992 && (sym_sec == input_sec))
a06ea964
NC
2993 return stub_type;
2994
a06ea964
NC
2995 /* Determine where the call point is. */
2996 location = (input_sec->output_offset
2997 + input_sec->output_section->vma + rel->r_offset);
2998
2999 branch_offset = (bfd_signed_vma) (destination - location);
3000
cec5225b 3001 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC
3002
3003 /* We don't want to redirect any old unconditional jump in this way,
3004 only one which is being used for a sibcall, where it is
3005 acceptable for the IP0 and IP1 registers to be clobbered. */
a6bb11b2 3006 if ((r_type == AARCH64_R (CALL26) || r_type == AARCH64_R (JUMP26))
a06ea964
NC
3007 && (branch_offset > AARCH64_MAX_FWD_BRANCH_OFFSET
3008 || branch_offset < AARCH64_MAX_BWD_BRANCH_OFFSET))
3009 {
3010 stub_type = aarch64_stub_long_branch;
3011 }
3012
3013 return stub_type;
3014}
3015
3016/* Build a name for an entry in the stub hash table. */
3017
3018static char *
cec5225b 3019elfNN_aarch64_stub_name (const asection *input_section,
a06ea964 3020 const asection *sym_sec,
cec5225b 3021 const struct elf_aarch64_link_hash_entry *hash,
a06ea964
NC
3022 const Elf_Internal_Rela *rel)
3023{
3024 char *stub_name;
3025 bfd_size_type len;
3026
3027 if (hash)
3028 {
3029 len = 8 + 1 + strlen (hash->root.root.root.string) + 1 + 16 + 1;
3030 stub_name = bfd_malloc (len);
3031 if (stub_name != NULL)
3032 snprintf (stub_name, len, "%08x_%s+%" BFD_VMA_FMT "x",
3033 (unsigned int) input_section->id,
3034 hash->root.root.root.string,
3035 rel->r_addend);
3036 }
3037 else
3038 {
3039 len = 8 + 1 + 8 + 1 + 8 + 1 + 16 + 1;
3040 stub_name = bfd_malloc (len);
3041 if (stub_name != NULL)
3042 snprintf (stub_name, len, "%08x_%x:%x+%" BFD_VMA_FMT "x",
3043 (unsigned int) input_section->id,
3044 (unsigned int) sym_sec->id,
cec5225b 3045 (unsigned int) ELFNN_R_SYM (rel->r_info),
a06ea964
NC
3046 rel->r_addend);
3047 }
3048
3049 return stub_name;
3050}
3051
7f784814
JW
3052/* Return TRUE if symbol H should be hashed in the `.gnu.hash' section. For
3053 executable PLT slots where the executable never takes the address of those
3054 functions, the function symbols are not added to the hash table. */
3055
3056static bfd_boolean
3057elf_aarch64_hash_symbol (struct elf_link_hash_entry *h)
3058{
3059 if (h->plt.offset != (bfd_vma) -1
3060 && !h->def_regular
3061 && !h->pointer_equality_needed)
3062 return FALSE;
3063
3064 return _bfd_elf_hash_symbol (h);
3065}
3066
3067
a06ea964
NC
3068/* Look up an entry in the stub hash. Stub entries are cached because
3069 creating the stub name takes a bit of time. */
3070
cec5225b
YZ
3071static struct elf_aarch64_stub_hash_entry *
3072elfNN_aarch64_get_stub_entry (const asection *input_section,
a06ea964
NC
3073 const asection *sym_sec,
3074 struct elf_link_hash_entry *hash,
3075 const Elf_Internal_Rela *rel,
cec5225b 3076 struct elf_aarch64_link_hash_table *htab)
a06ea964 3077{
cec5225b
YZ
3078 struct elf_aarch64_stub_hash_entry *stub_entry;
3079 struct elf_aarch64_link_hash_entry *h =
3080 (struct elf_aarch64_link_hash_entry *) hash;
a06ea964
NC
3081 const asection *id_sec;
3082
3083 if ((input_section->flags & SEC_CODE) == 0)
3084 return NULL;
3085
3086 /* If this input section is part of a group of sections sharing one
3087 stub section, then use the id of the first section in the group.
3088 Stub names need to include a section id, as there may well be
3089 more than one stub used to reach say, printf, and we need to
3090 distinguish between them. */
3091 id_sec = htab->stub_group[input_section->id].link_sec;
3092
3093 if (h != NULL && h->stub_cache != NULL
3094 && h->stub_cache->h == h && h->stub_cache->id_sec == id_sec)
3095 {
3096 stub_entry = h->stub_cache;
3097 }
3098 else
3099 {
3100 char *stub_name;
3101
cec5225b 3102 stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, h, rel);
a06ea964
NC
3103 if (stub_name == NULL)
3104 return NULL;
3105
3106 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table,
3107 stub_name, FALSE, FALSE);
3108 if (h != NULL)
3109 h->stub_cache = stub_entry;
3110
3111 free (stub_name);
3112 }
3113
3114 return stub_entry;
3115}
3116
a06ea964 3117
66585675
MS
3118/* Create a stub section. */
3119
3120static asection *
3121_bfd_aarch64_create_stub_section (asection *section,
3122 struct elf_aarch64_link_hash_table *htab)
3123{
3124 size_t namelen;
3125 bfd_size_type len;
3126 char *s_name;
3127
3128 namelen = strlen (section->name);
3129 len = namelen + sizeof (STUB_SUFFIX);
3130 s_name = bfd_alloc (htab->stub_bfd, len);
3131 if (s_name == NULL)
3132 return NULL;
3133
3134 memcpy (s_name, section->name, namelen);
3135 memcpy (s_name + namelen, STUB_SUFFIX, sizeof (STUB_SUFFIX));
3136 return (*htab->add_stub_section) (s_name, section);
3137}
3138
3139
fc6d53be
MS
3140/* Find or create a stub section for a link section.
3141
3142 Fix or create the stub section used to collect stubs attached to
3143 the specified link section. */
3144
3145static asection *
3146_bfd_aarch64_get_stub_for_link_section (asection *link_section,
3147 struct elf_aarch64_link_hash_table *htab)
3148{
3149 if (htab->stub_group[link_section->id].stub_sec == NULL)
3150 htab->stub_group[link_section->id].stub_sec
3151 = _bfd_aarch64_create_stub_section (link_section, htab);
3152 return htab->stub_group[link_section->id].stub_sec;
3153}
3154
3155
ef857521
MS
3156/* Find or create a stub section in the stub group for an input
3157 section. */
3158
3159static asection *
3160_bfd_aarch64_create_or_find_stub_sec (asection *section,
3161 struct elf_aarch64_link_hash_table *htab)
a06ea964 3162{
fc6d53be
MS
3163 asection *link_sec = htab->stub_group[section->id].link_sec;
3164 return _bfd_aarch64_get_stub_for_link_section (link_sec, htab);
ef857521
MS
3165}
3166
3167
3168/* Add a new stub entry in the stub group associated with an input
3169 section to the stub hash. Not all fields of the new stub entry are
3170 initialised. */
3171
3172static struct elf_aarch64_stub_hash_entry *
3173_bfd_aarch64_add_stub_entry_in_group (const char *stub_name,
3174 asection *section,
3175 struct elf_aarch64_link_hash_table *htab)
3176{
3177 asection *link_sec;
3178 asection *stub_sec;
3179 struct elf_aarch64_stub_hash_entry *stub_entry;
3180
3181 link_sec = htab->stub_group[section->id].link_sec;
3182 stub_sec = _bfd_aarch64_create_or_find_stub_sec (section, htab);
3183
a06ea964
NC
3184 /* Enter this entry into the linker stub hash table. */
3185 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
3186 TRUE, FALSE);
3187 if (stub_entry == NULL)
3188 {
695344c0 3189 /* xgettext:c-format */
871b3ab2 3190 _bfd_error_handler (_("%pB: cannot create stub entry %s"),
4eca0228 3191 section->owner, stub_name);
a06ea964
NC
3192 return NULL;
3193 }
3194
3195 stub_entry->stub_sec = stub_sec;
3196 stub_entry->stub_offset = 0;
3197 stub_entry->id_sec = link_sec;
3198
3199 return stub_entry;
3200}
3201
4106101c
MS
3202/* Add a new stub entry in the final stub section to the stub hash.
3203 Not all fields of the new stub entry are initialised. */
3204
3205static struct elf_aarch64_stub_hash_entry *
3206_bfd_aarch64_add_stub_entry_after (const char *stub_name,
3207 asection *link_section,
3208 struct elf_aarch64_link_hash_table *htab)
3209{
3210 asection *stub_sec;
3211 struct elf_aarch64_stub_hash_entry *stub_entry;
3212
739b5c9c
TC
3213 stub_sec = NULL;
3214 /* Only create the actual stub if we will end up needing it. */
3215 if (htab->fix_erratum_843419 & ERRAT_ADRP)
3216 stub_sec = _bfd_aarch64_get_stub_for_link_section (link_section, htab);
4106101c
MS
3217 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
3218 TRUE, FALSE);
3219 if (stub_entry == NULL)
3220 {
4eca0228 3221 _bfd_error_handler (_("cannot create stub entry %s"), stub_name);
4106101c
MS
3222 return NULL;
3223 }
3224
3225 stub_entry->stub_sec = stub_sec;
3226 stub_entry->stub_offset = 0;
3227 stub_entry->id_sec = link_section;
3228
3229 return stub_entry;
3230}
3231
3232
a06ea964
NC
3233static bfd_boolean
3234aarch64_build_one_stub (struct bfd_hash_entry *gen_entry,
abf874aa 3235 void *in_arg)
a06ea964 3236{
cec5225b 3237 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC
3238 asection *stub_sec;
3239 bfd *stub_bfd;
3240 bfd_byte *loc;
3241 bfd_vma sym_value;
68fcca92
JW
3242 bfd_vma veneered_insn_loc;
3243 bfd_vma veneer_entry_loc;
3244 bfd_signed_vma branch_offset = 0;
a06ea964
NC
3245 unsigned int template_size;
3246 const uint32_t *template;
3247 unsigned int i;
abf874aa 3248 struct bfd_link_info *info;
a06ea964
NC
3249
3250 /* Massage our args to the form they really have. */
cec5225b 3251 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
a06ea964 3252
abf874aa
CL
3253 info = (struct bfd_link_info *) in_arg;
3254
3255 /* Fail if the target section could not be assigned to an output
3256 section. The user should fix his linker script. */
3257 if (stub_entry->target_section->output_section == NULL
3258 && info->non_contiguous_regions)
53215f21
CL
3259 info->callbacks->einfo (_("%F%P: Could not assign '%pA' to an output section. "
3260 "Retry without "
3261 "--enable-non-contiguous-regions.\n"),
3262 stub_entry->target_section);
abf874aa 3263
a06ea964
NC
3264 stub_sec = stub_entry->stub_sec;
3265
3266 /* Make a note of the offset within the stubs for this entry. */
3267 stub_entry->stub_offset = stub_sec->size;
3268 loc = stub_sec->contents + stub_entry->stub_offset;
3269
3270 stub_bfd = stub_sec->owner;
3271
3272 /* This is the address of the stub destination. */
3273 sym_value = (stub_entry->target_value
3274 + stub_entry->target_section->output_offset
3275 + stub_entry->target_section->output_section->vma);
3276
3277 if (stub_entry->stub_type == aarch64_stub_long_branch)
3278 {
3279 bfd_vma place = (stub_entry->stub_offset + stub_sec->output_section->vma
3280 + stub_sec->output_offset);
3281
3282 /* See if we can relax the stub. */
3283 if (aarch64_valid_for_adrp_p (sym_value, place))
3284 stub_entry->stub_type = aarch64_select_branch_stub (sym_value, place);
3285 }
3286
3287 switch (stub_entry->stub_type)
3288 {
3289 case aarch64_stub_adrp_branch:
3290 template = aarch64_adrp_branch_stub;
3291 template_size = sizeof (aarch64_adrp_branch_stub);
3292 break;
3293 case aarch64_stub_long_branch:
3294 template = aarch64_long_branch_stub;
3295 template_size = sizeof (aarch64_long_branch_stub);
3296 break;
68fcca92
JW
3297 case aarch64_stub_erratum_835769_veneer:
3298 template = aarch64_erratum_835769_stub;
3299 template_size = sizeof (aarch64_erratum_835769_stub);
3300 break;
4106101c
MS
3301 case aarch64_stub_erratum_843419_veneer:
3302 template = aarch64_erratum_843419_stub;
3303 template_size = sizeof (aarch64_erratum_843419_stub);
3304 break;
a06ea964 3305 default:
8e2fe09f 3306 abort ();
a06ea964
NC
3307 }
3308
3309 for (i = 0; i < (template_size / sizeof template[0]); i++)
3310 {
3311 bfd_putl32 (template[i], loc);
3312 loc += 4;
3313 }
3314
3315 template_size = (template_size + 7) & ~7;
3316 stub_sec->size += template_size;
3317
3318 switch (stub_entry->stub_type)
3319 {
3320 case aarch64_stub_adrp_branch:
1d75a8e2
NC
3321 if (!aarch64_relocate (AARCH64_R (ADR_PREL_PG_HI21), stub_bfd, stub_sec,
3322 stub_entry->stub_offset, sym_value))
a06ea964
NC
3323 /* The stub would not have been relaxed if the offset was out
3324 of range. */
3325 BFD_FAIL ();
3326
1d75a8e2
NC
3327 if (!aarch64_relocate (AARCH64_R (ADD_ABS_LO12_NC), stub_bfd, stub_sec,
3328 stub_entry->stub_offset + 4, sym_value))
93ca8569 3329 BFD_FAIL ();
a06ea964
NC
3330 break;
3331
3332 case aarch64_stub_long_branch:
3333 /* We want the value relative to the address 12 bytes back from the
07d6d2b8 3334 value itself. */
1d75a8e2
NC
3335 if (!aarch64_relocate (AARCH64_R (PRELNN), stub_bfd, stub_sec,
3336 stub_entry->stub_offset + 16, sym_value + 12))
93ca8569 3337 BFD_FAIL ();
a06ea964 3338 break;
68fcca92
JW
3339
3340 case aarch64_stub_erratum_835769_veneer:
3341 veneered_insn_loc = stub_entry->target_section->output_section->vma
3342 + stub_entry->target_section->output_offset
3343 + stub_entry->target_value;
3344 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
3345 + stub_entry->stub_sec->output_offset
3346 + stub_entry->stub_offset;
3347 branch_offset = veneered_insn_loc - veneer_entry_loc;
3348 branch_offset >>= 2;
3349 branch_offset &= 0x3ffffff;
3350 bfd_putl32 (stub_entry->veneered_insn,
3351 stub_sec->contents + stub_entry->stub_offset);
3352 bfd_putl32 (template[1] | branch_offset,
3353 stub_sec->contents + stub_entry->stub_offset + 4);
3354 break;
3355
4106101c 3356 case aarch64_stub_erratum_843419_veneer:
1d75a8e2
NC
3357 if (!aarch64_relocate (AARCH64_R (JUMP26), stub_bfd, stub_sec,
3358 stub_entry->stub_offset + 4, sym_value + 4))
4106101c
MS
3359 BFD_FAIL ();
3360 break;
3361
a06ea964 3362 default:
8e2fe09f 3363 abort ();
a06ea964
NC
3364 }
3365
3366 return TRUE;
3367}
3368
3369/* As above, but don't actually build the stub. Just bump offset so
3370 we know stub section sizes. */
3371
3372static bfd_boolean
739b5c9c 3373aarch64_size_one_stub (struct bfd_hash_entry *gen_entry, void *in_arg)
a06ea964 3374{
cec5225b 3375 struct elf_aarch64_stub_hash_entry *stub_entry;
739b5c9c 3376 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC
3377 int size;
3378
3379 /* Massage our args to the form they really have. */
cec5225b 3380 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
739b5c9c 3381 htab = (struct elf_aarch64_link_hash_table *) in_arg;
a06ea964
NC
3382
3383 switch (stub_entry->stub_type)
3384 {
3385 case aarch64_stub_adrp_branch:
3386 size = sizeof (aarch64_adrp_branch_stub);
3387 break;
3388 case aarch64_stub_long_branch:
3389 size = sizeof (aarch64_long_branch_stub);
3390 break;
68fcca92
JW
3391 case aarch64_stub_erratum_835769_veneer:
3392 size = sizeof (aarch64_erratum_835769_stub);
3393 break;
4106101c 3394 case aarch64_stub_erratum_843419_veneer:
739b5c9c
TC
3395 {
3396 if (htab->fix_erratum_843419 == ERRAT_ADR)
3397 return TRUE;
3398 size = sizeof (aarch64_erratum_843419_stub);
3399 }
4106101c 3400 break;
a06ea964 3401 default:
8e2fe09f 3402 abort ();
a06ea964
NC
3403 }
3404
3405 size = (size + 7) & ~7;
3406 stub_entry->stub_sec->size += size;
3407 return TRUE;
3408}
3409
3410/* External entry points for sizing and building linker stubs. */
3411
3412/* Set up various things so that we can make a list of input sections
3413 for each output section included in the link. Returns -1 on error,
3414 0 when no stubs will be needed, and 1 on success. */
3415
3416int
cec5225b 3417elfNN_aarch64_setup_section_lists (bfd *output_bfd,
a06ea964
NC
3418 struct bfd_link_info *info)
3419{
3420 bfd *input_bfd;
3421 unsigned int bfd_count;
7292b3ac 3422 unsigned int top_id, top_index;
a06ea964
NC
3423 asection *section;
3424 asection **input_list, **list;
986f0783 3425 size_t amt;
cec5225b
YZ
3426 struct elf_aarch64_link_hash_table *htab =
3427 elf_aarch64_hash_table (info);
a06ea964
NC
3428
3429 if (!is_elf_hash_table (htab))
3430 return 0;
3431
3432 /* Count the number of input BFDs and find the top input section id. */
3433 for (input_bfd = info->input_bfds, bfd_count = 0, top_id = 0;
c72f2fb2 3434 input_bfd != NULL; input_bfd = input_bfd->link.next)
a06ea964
NC
3435 {
3436 bfd_count += 1;
3437 for (section = input_bfd->sections;
3438 section != NULL; section = section->next)
3439 {
3440 if (top_id < section->id)
3441 top_id = section->id;
3442 }
3443 }
3444 htab->bfd_count = bfd_count;
3445
3446 amt = sizeof (struct map_stub) * (top_id + 1);
3447 htab->stub_group = bfd_zmalloc (amt);
3448 if (htab->stub_group == NULL)
3449 return -1;
3450
3451 /* We can't use output_bfd->section_count here to find the top output
3452 section index as some sections may have been removed, and
3453 _bfd_strip_section_from_output doesn't renumber the indices. */
3454 for (section = output_bfd->sections, top_index = 0;
3455 section != NULL; section = section->next)
3456 {
3457 if (top_index < section->index)
3458 top_index = section->index;
3459 }
3460
3461 htab->top_index = top_index;
3462 amt = sizeof (asection *) * (top_index + 1);
3463 input_list = bfd_malloc (amt);
3464 htab->input_list = input_list;
3465 if (input_list == NULL)
3466 return -1;
3467
3468 /* For sections we aren't interested in, mark their entries with a
3469 value we can check later. */
3470 list = input_list + top_index;
3471 do
3472 *list = bfd_abs_section_ptr;
3473 while (list-- != input_list);
3474
3475 for (section = output_bfd->sections;
3476 section != NULL; section = section->next)
3477 {
3478 if ((section->flags & SEC_CODE) != 0)
3479 input_list[section->index] = NULL;
3480 }
3481
3482 return 1;
3483}
3484
cec5225b 3485/* Used by elfNN_aarch64_next_input_section and group_sections. */
a06ea964
NC
3486#define PREV_SEC(sec) (htab->stub_group[(sec)->id].link_sec)
3487
3488/* The linker repeatedly calls this function for each input section,
3489 in the order that input sections are linked into output sections.
3490 Build lists of input sections to determine groupings between which
3491 we may insert linker stubs. */
3492
3493void
cec5225b 3494elfNN_aarch64_next_input_section (struct bfd_link_info *info, asection *isec)
a06ea964 3495{
cec5225b
YZ
3496 struct elf_aarch64_link_hash_table *htab =
3497 elf_aarch64_hash_table (info);
a06ea964
NC
3498
3499 if (isec->output_section->index <= htab->top_index)
3500 {
3501 asection **list = htab->input_list + isec->output_section->index;
3502
cff69cf4 3503 if (*list != bfd_abs_section_ptr && (isec->flags & SEC_CODE) != 0)
a06ea964
NC
3504 {
3505 /* Steal the link_sec pointer for our list. */
3506 /* This happens to make the list in reverse order,
3507 which is what we want. */
3508 PREV_SEC (isec) = *list;
3509 *list = isec;
3510 }
3511 }
3512}
3513
3514/* See whether we can group stub sections together. Grouping stub
3515 sections may result in fewer stubs. More importantly, we need to
3516 put all .init* and .fini* stubs at the beginning of the .init or
3517 .fini output sections respectively, because glibc splits the
3518 _init and _fini functions into multiple parts. Putting a stub in
3519 the middle of a function is not a good idea. */
3520
3521static void
cec5225b 3522group_sections (struct elf_aarch64_link_hash_table *htab,
a06ea964 3523 bfd_size_type stub_group_size,
cff69cf4 3524 bfd_boolean stubs_always_after_branch)
a06ea964 3525{
cff69cf4 3526 asection **list = htab->input_list;
a06ea964
NC
3527
3528 do
3529 {
3530 asection *tail = *list;
cff69cf4 3531 asection *head;
a06ea964
NC
3532
3533 if (tail == bfd_abs_section_ptr)
3534 continue;
3535
cff69cf4
WD
3536 /* Reverse the list: we must avoid placing stubs at the
3537 beginning of the section because the beginning of the text
3538 section may be required for an interrupt vector in bare metal
3539 code. */
3540#define NEXT_SEC PREV_SEC
3541 head = NULL;
a06ea964 3542 while (tail != NULL)
cff69cf4
WD
3543 {
3544 /* Pop from tail. */
3545 asection *item = tail;
3546 tail = PREV_SEC (item);
3547
3548 /* Push on head. */
3549 NEXT_SEC (item) = head;
3550 head = item;
3551 }
3552
3553 while (head != NULL)
a06ea964
NC
3554 {
3555 asection *curr;
cff69cf4
WD
3556 asection *next;
3557 bfd_vma stub_group_start = head->output_offset;
3558 bfd_vma end_of_next;
a06ea964 3559
cff69cf4
WD
3560 curr = head;
3561 while (NEXT_SEC (curr) != NULL)
3562 {
3563 next = NEXT_SEC (curr);
3564 end_of_next = next->output_offset + next->size;
3565 if (end_of_next - stub_group_start >= stub_group_size)
3566 /* End of NEXT is too far from start, so stop. */
3567 break;
3568 /* Add NEXT to the group. */
3569 curr = next;
3570 }
a06ea964 3571
cff69cf4 3572 /* OK, the size from the start to the start of CURR is less
a06ea964 3573 than stub_group_size and thus can be handled by one stub
cff69cf4 3574 section. (Or the head section is itself larger than
a06ea964
NC
3575 stub_group_size, in which case we may be toast.)
3576 We should really be keeping track of the total size of
3577 stubs added here, as stubs contribute to the final output
3578 section size. */
3579 do
3580 {
cff69cf4 3581 next = NEXT_SEC (head);
a06ea964 3582 /* Set up this stub group. */
cff69cf4 3583 htab->stub_group[head->id].link_sec = curr;
a06ea964 3584 }
cff69cf4 3585 while (head != curr && (head = next) != NULL);
a06ea964
NC
3586
3587 /* But wait, there's more! Input sections up to stub_group_size
cff69cf4
WD
3588 bytes after the stub section can be handled by it too. */
3589 if (!stubs_always_after_branch)
a06ea964 3590 {
cff69cf4
WD
3591 stub_group_start = curr->output_offset + curr->size;
3592
3593 while (next != NULL)
a06ea964 3594 {
cff69cf4
WD
3595 end_of_next = next->output_offset + next->size;
3596 if (end_of_next - stub_group_start >= stub_group_size)
3597 /* End of NEXT is too far from stubs, so stop. */
3598 break;
3599 /* Add NEXT to the stub group. */
3600 head = next;
3601 next = NEXT_SEC (head);
3602 htab->stub_group[head->id].link_sec = curr;
a06ea964
NC
3603 }
3604 }
cff69cf4 3605 head = next;
a06ea964
NC
3606 }
3607 }
cff69cf4 3608 while (list++ != htab->input_list + htab->top_index);
a06ea964
NC
3609
3610 free (htab->input_list);
3611}
3612
cff69cf4 3613#undef PREV_SEC
a06ea964
NC
3614#undef PREV_SEC
3615
68fcca92
JW
3616#define AARCH64_BITS(x, pos, n) (((x) >> (pos)) & ((1 << (n)) - 1))
3617
3618#define AARCH64_RT(insn) AARCH64_BITS (insn, 0, 5)
3619#define AARCH64_RT2(insn) AARCH64_BITS (insn, 10, 5)
3620#define AARCH64_RA(insn) AARCH64_BITS (insn, 10, 5)
3621#define AARCH64_RD(insn) AARCH64_BITS (insn, 0, 5)
3622#define AARCH64_RN(insn) AARCH64_BITS (insn, 5, 5)
3623#define AARCH64_RM(insn) AARCH64_BITS (insn, 16, 5)
3624
3625#define AARCH64_MAC(insn) (((insn) & 0xff000000) == 0x9b000000)
3626#define AARCH64_BIT(insn, n) AARCH64_BITS (insn, n, 1)
3627#define AARCH64_OP31(insn) AARCH64_BITS (insn, 21, 3)
3628#define AARCH64_ZR 0x1f
3629
3630/* All ld/st ops. See C4-182 of the ARM ARM. The encoding space for
3631 LD_PCREL, LDST_RO, LDST_UI and LDST_UIMM cover prefetch ops. */
3632
3633#define AARCH64_LD(insn) (AARCH64_BIT (insn, 22) == 1)
3634#define AARCH64_LDST(insn) (((insn) & 0x0a000000) == 0x08000000)
3635#define AARCH64_LDST_EX(insn) (((insn) & 0x3f000000) == 0x08000000)
3636#define AARCH64_LDST_PCREL(insn) (((insn) & 0x3b000000) == 0x18000000)
3637#define AARCH64_LDST_NAP(insn) (((insn) & 0x3b800000) == 0x28000000)
3638#define AARCH64_LDSTP_PI(insn) (((insn) & 0x3b800000) == 0x28800000)
3639#define AARCH64_LDSTP_O(insn) (((insn) & 0x3b800000) == 0x29000000)
3640#define AARCH64_LDSTP_PRE(insn) (((insn) & 0x3b800000) == 0x29800000)
3641#define AARCH64_LDST_UI(insn) (((insn) & 0x3b200c00) == 0x38000000)
3642#define AARCH64_LDST_PIIMM(insn) (((insn) & 0x3b200c00) == 0x38000400)
3643#define AARCH64_LDST_U(insn) (((insn) & 0x3b200c00) == 0x38000800)
3644#define AARCH64_LDST_PREIMM(insn) (((insn) & 0x3b200c00) == 0x38000c00)
3645#define AARCH64_LDST_RO(insn) (((insn) & 0x3b200c00) == 0x38200800)
3646#define AARCH64_LDST_UIMM(insn) (((insn) & 0x3b000000) == 0x39000000)
3647#define AARCH64_LDST_SIMD_M(insn) (((insn) & 0xbfbf0000) == 0x0c000000)
3648#define AARCH64_LDST_SIMD_M_PI(insn) (((insn) & 0xbfa00000) == 0x0c800000)
3649#define AARCH64_LDST_SIMD_S(insn) (((insn) & 0xbf9f0000) == 0x0d000000)
3650#define AARCH64_LDST_SIMD_S_PI(insn) (((insn) & 0xbf800000) == 0x0d800000)
3651
3d14faea
MS
3652/* Classify an INSN if it is indeed a load/store.
3653
3654 Return TRUE if INSN is a LD/ST instruction otherwise return FALSE.
3655
3656 For scalar LD/ST instructions PAIR is FALSE, RT is returned and RT2
3657 is set equal to RT.
3658
2d0ca824 3659 For LD/ST pair instructions PAIR is TRUE, RT and RT2 are returned. */
68fcca92
JW
3660
3661static bfd_boolean
3d14faea 3662aarch64_mem_op_p (uint32_t insn, unsigned int *rt, unsigned int *rt2,
68fcca92
JW
3663 bfd_boolean *pair, bfd_boolean *load)
3664{
3665 uint32_t opcode;
3666 unsigned int r;
3667 uint32_t opc = 0;
3668 uint32_t v = 0;
3669 uint32_t opc_v = 0;
3670
de194d85 3671 /* Bail out quickly if INSN doesn't fall into the load-store
68fcca92
JW
3672 encoding space. */
3673 if (!AARCH64_LDST (insn))
3674 return FALSE;
3675
3676 *pair = FALSE;
3677 *load = FALSE;
3678 if (AARCH64_LDST_EX (insn))
3679 {
3680 *rt = AARCH64_RT (insn);
3d14faea 3681 *rt2 = *rt;
68fcca92 3682 if (AARCH64_BIT (insn, 21) == 1)
07d6d2b8 3683 {
68fcca92 3684 *pair = TRUE;
3d14faea 3685 *rt2 = AARCH64_RT2 (insn);
68fcca92
JW
3686 }
3687 *load = AARCH64_LD (insn);
3688 return TRUE;
3689 }
3690 else if (AARCH64_LDST_NAP (insn)
3691 || AARCH64_LDSTP_PI (insn)
3692 || AARCH64_LDSTP_O (insn)
3693 || AARCH64_LDSTP_PRE (insn))
3694 {
3695 *pair = TRUE;
3696 *rt = AARCH64_RT (insn);
3d14faea 3697 *rt2 = AARCH64_RT2 (insn);
68fcca92
JW
3698 *load = AARCH64_LD (insn);
3699 return TRUE;
3700 }
3701 else if (AARCH64_LDST_PCREL (insn)
3702 || AARCH64_LDST_UI (insn)
3703 || AARCH64_LDST_PIIMM (insn)
3704 || AARCH64_LDST_U (insn)
3705 || AARCH64_LDST_PREIMM (insn)
3706 || AARCH64_LDST_RO (insn)
3707 || AARCH64_LDST_UIMM (insn))
3708 {
3709 *rt = AARCH64_RT (insn);
3d14faea 3710 *rt2 = *rt;
68fcca92
JW
3711 if (AARCH64_LDST_PCREL (insn))
3712 *load = TRUE;
3713 opc = AARCH64_BITS (insn, 22, 2);
3714 v = AARCH64_BIT (insn, 26);
3715 opc_v = opc | (v << 2);
3716 *load = (opc_v == 1 || opc_v == 2 || opc_v == 3
3717 || opc_v == 5 || opc_v == 7);
3718 return TRUE;
3719 }
3720 else if (AARCH64_LDST_SIMD_M (insn)
3721 || AARCH64_LDST_SIMD_M_PI (insn))
3722 {
3723 *rt = AARCH64_RT (insn);
3724 *load = AARCH64_BIT (insn, 22);
3725 opcode = (insn >> 12) & 0xf;
3726 switch (opcode)
3727 {
3728 case 0:
3729 case 2:
3d14faea 3730 *rt2 = *rt + 3;
68fcca92
JW
3731 break;
3732
3733 case 4:
3734 case 6:
3d14faea 3735 *rt2 = *rt + 2;
68fcca92
JW
3736 break;
3737
3738 case 7:
3d14faea 3739 *rt2 = *rt;
68fcca92
JW
3740 break;
3741
3742 case 8:
3743 case 10:
3d14faea 3744 *rt2 = *rt + 1;
68fcca92
JW
3745 break;
3746
3747 default:
3748 return FALSE;
3749 }
3750 return TRUE;
3751 }
3752 else if (AARCH64_LDST_SIMD_S (insn)
3753 || AARCH64_LDST_SIMD_S_PI (insn))
3754 {
3755 *rt = AARCH64_RT (insn);
3756 r = (insn >> 21) & 1;
3757 *load = AARCH64_BIT (insn, 22);
3758 opcode = (insn >> 13) & 0x7;
3759 switch (opcode)
3760 {
3761 case 0:
3762 case 2:
3763 case 4:
3d14faea 3764 *rt2 = *rt + r;
68fcca92
JW
3765 break;
3766
3767 case 1:
3768 case 3:
3769 case 5:
3d14faea 3770 *rt2 = *rt + (r == 0 ? 2 : 3);
68fcca92
JW
3771 break;
3772
3773 case 6:
3d14faea 3774 *rt2 = *rt + r;
68fcca92
JW
3775 break;
3776
3777 case 7:
3d14faea 3778 *rt2 = *rt + (r == 0 ? 2 : 3);
68fcca92
JW
3779 break;
3780
3781 default:
3782 return FALSE;
3783 }
3784 return TRUE;
3785 }
3786
3787 return FALSE;
3788}
3789
3790/* Return TRUE if INSN is multiply-accumulate. */
3791
3792static bfd_boolean
3793aarch64_mlxl_p (uint32_t insn)
3794{
3795 uint32_t op31 = AARCH64_OP31 (insn);
3796
3797 if (AARCH64_MAC (insn)
3798 && (op31 == 0 || op31 == 1 || op31 == 5)
3799 /* Exclude MUL instructions which are encoded as a multiple accumulate
3800 with RA = XZR. */
3801 && AARCH64_RA (insn) != AARCH64_ZR)
3802 return TRUE;
3803
3804 return FALSE;
3805}
3806
3807/* Some early revisions of the Cortex-A53 have an erratum (835769) whereby
3808 it is possible for a 64-bit multiply-accumulate instruction to generate an
3809 incorrect result. The details are quite complex and hard to
3810 determine statically, since branches in the code may exist in some
3811 circumstances, but all cases end with a memory (load, store, or
3812 prefetch) instruction followed immediately by the multiply-accumulate
3813 operation. We employ a linker patching technique, by moving the potentially
3814 affected multiply-accumulate instruction into a patch region and replacing
3815 the original instruction with a branch to the patch. This function checks
3816 if INSN_1 is the memory operation followed by a multiply-accumulate
3817 operation (INSN_2). Return TRUE if an erratum sequence is found, FALSE
3818 if INSN_1 and INSN_2 are safe. */
3819
3820static bfd_boolean
3821aarch64_erratum_sequence (uint32_t insn_1, uint32_t insn_2)
3822{
3823 uint32_t rt;
3d14faea 3824 uint32_t rt2;
68fcca92
JW
3825 uint32_t rn;
3826 uint32_t rm;
3827 uint32_t ra;
3828 bfd_boolean pair;
3829 bfd_boolean load;
3830
3831 if (aarch64_mlxl_p (insn_2)
3d14faea 3832 && aarch64_mem_op_p (insn_1, &rt, &rt2, &pair, &load))
68fcca92
JW
3833 {
3834 /* Any SIMD memory op is independent of the subsequent MLA
3835 by definition of the erratum. */
3836 if (AARCH64_BIT (insn_1, 26))
3837 return TRUE;
3838
3839 /* If not SIMD, check for integer memory ops and MLA relationship. */
3840 rn = AARCH64_RN (insn_2);
3841 ra = AARCH64_RA (insn_2);
3842 rm = AARCH64_RM (insn_2);
3843
3844 /* If this is a load and there's a true(RAW) dependency, we are safe
3845 and this is not an erratum sequence. */
3846 if (load &&
3847 (rt == rn || rt == rm || rt == ra
3d14faea 3848 || (pair && (rt2 == rn || rt2 == rm || rt2 == ra))))
68fcca92
JW
3849 return FALSE;
3850
3851 /* We conservatively put out stubs for all other cases (including
3852 writebacks). */
3853 return TRUE;
3854 }
3855
3856 return FALSE;
3857}
3858
520c7b56
JW
3859/* Used to order a list of mapping symbols by address. */
3860
3861static int
3862elf_aarch64_compare_mapping (const void *a, const void *b)
3863{
3864 const elf_aarch64_section_map *amap = (const elf_aarch64_section_map *) a;
3865 const elf_aarch64_section_map *bmap = (const elf_aarch64_section_map *) b;
3866
3867 if (amap->vma > bmap->vma)
3868 return 1;
3869 else if (amap->vma < bmap->vma)
3870 return -1;
3871 else if (amap->type > bmap->type)
3872 /* Ensure results do not depend on the host qsort for objects with
3873 multiple mapping symbols at the same address by sorting on type
3874 after vma. */
3875 return 1;
3876 else if (amap->type < bmap->type)
3877 return -1;
3878 else
3879 return 0;
3880}
3881
2144188d 3882
35fee8b7
MS
3883static char *
3884_bfd_aarch64_erratum_835769_stub_name (unsigned num_fixes)
3885{
3886 char *stub_name = (char *) bfd_malloc
3887 (strlen ("__erratum_835769_veneer_") + 16);
bb69498c
NC
3888 if (stub_name != NULL)
3889 sprintf (stub_name,"__erratum_835769_veneer_%d", num_fixes);
35fee8b7
MS
3890 return stub_name;
3891}
3892
4106101c 3893/* Scan for Cortex-A53 erratum 835769 sequence.
2144188d
MS
3894
3895 Return TRUE else FALSE on abnormal termination. */
3896
68fcca92 3897static bfd_boolean
5421cc6e
MS
3898_bfd_aarch64_erratum_835769_scan (bfd *input_bfd,
3899 struct bfd_link_info *info,
3900 unsigned int *num_fixes_p)
68fcca92
JW
3901{
3902 asection *section;
3903 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
68fcca92 3904 unsigned int num_fixes = *num_fixes_p;
68fcca92
JW
3905
3906 if (htab == NULL)
2144188d 3907 return TRUE;
68fcca92
JW
3908
3909 for (section = input_bfd->sections;
3910 section != NULL;
3911 section = section->next)
3912 {
3913 bfd_byte *contents = NULL;
3914 struct _aarch64_elf_section_data *sec_data;
3915 unsigned int span;
3916
3917 if (elf_section_type (section) != SHT_PROGBITS
3918 || (elf_section_flags (section) & SHF_EXECINSTR) == 0
3919 || (section->flags & SEC_EXCLUDE) != 0
3920 || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
3921 || (section->output_section == bfd_abs_section_ptr))
3922 continue;
3923
3924 if (elf_section_data (section)->this_hdr.contents != NULL)
3925 contents = elf_section_data (section)->this_hdr.contents;
3926 else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
2144188d 3927 return FALSE;
68fcca92
JW
3928
3929 sec_data = elf_aarch64_section_data (section);
520c7b56
JW
3930
3931 qsort (sec_data->map, sec_data->mapcount,
3932 sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
3933
68fcca92
JW
3934 for (span = 0; span < sec_data->mapcount; span++)
3935 {
3936 unsigned int span_start = sec_data->map[span].vma;
3937 unsigned int span_end = ((span == sec_data->mapcount - 1)
3938 ? sec_data->map[0].vma + section->size
3939 : sec_data->map[span + 1].vma);
3940 unsigned int i;
3941 char span_type = sec_data->map[span].type;
3942
3943 if (span_type == 'd')
3944 continue;
3945
3946 for (i = span_start; i + 4 < span_end; i += 4)
3947 {
3948 uint32_t insn_1 = bfd_getl32 (contents + i);
3949 uint32_t insn_2 = bfd_getl32 (contents + i + 4);
3950
3951 if (aarch64_erratum_sequence (insn_1, insn_2))
3952 {
5421cc6e 3953 struct elf_aarch64_stub_hash_entry *stub_entry;
35fee8b7
MS
3954 char *stub_name = _bfd_aarch64_erratum_835769_stub_name (num_fixes);
3955 if (! stub_name)
2144188d 3956 return FALSE;
68fcca92 3957
5421cc6e
MS
3958 stub_entry = _bfd_aarch64_add_stub_entry_in_group (stub_name,
3959 section,
3960 htab);
3961 if (! stub_entry)
3962 return FALSE;
68fcca92 3963
5421cc6e
MS
3964 stub_entry->stub_type = aarch64_stub_erratum_835769_veneer;
3965 stub_entry->target_section = section;
3966 stub_entry->target_value = i + 4;
3967 stub_entry->veneered_insn = insn_2;
3968 stub_entry->output_name = stub_name;
68fcca92
JW
3969 num_fixes++;
3970 }
3971 }
3972 }
3973 if (elf_section_data (section)->this_hdr.contents == NULL)
3974 free (contents);
3975 }
3976
357d1523
MS
3977 *num_fixes_p = num_fixes;
3978
2144188d 3979 return TRUE;
68fcca92
JW
3980}
3981
13f622ec 3982
4106101c
MS
3983/* Test if instruction INSN is ADRP. */
3984
3985static bfd_boolean
3986_bfd_aarch64_adrp_p (uint32_t insn)
3987{
9fca35fc 3988 return ((insn & AARCH64_ADRP_OP_MASK) == AARCH64_ADRP_OP);
4106101c
MS
3989}
3990
3991
3992/* Helper predicate to look for cortex-a53 erratum 843419 sequence 1. */
3993
3994static bfd_boolean
3995_bfd_aarch64_erratum_843419_sequence_p (uint32_t insn_1, uint32_t insn_2,
3996 uint32_t insn_3)
3997{
3998 uint32_t rt;
3999 uint32_t rt2;
4000 bfd_boolean pair;
4001 bfd_boolean load;
4002
4003 return (aarch64_mem_op_p (insn_2, &rt, &rt2, &pair, &load)
4004 && (!pair
4005 || (pair && !load))
4006 && AARCH64_LDST_UIMM (insn_3)
4007 && AARCH64_RN (insn_3) == AARCH64_RD (insn_1));
4008}
4009
4010
4011/* Test for the presence of Cortex-A53 erratum 843419 instruction sequence.
4012
4013 Return TRUE if section CONTENTS at offset I contains one of the
4014 erratum 843419 sequences, otherwise return FALSE. If a sequence is
4015 seen set P_VENEER_I to the offset of the final LOAD/STORE
4016 instruction in the sequence.
4017 */
4018
4019static bfd_boolean
4020_bfd_aarch64_erratum_843419_p (bfd_byte *contents, bfd_vma vma,
4021 bfd_vma i, bfd_vma span_end,
4022 bfd_vma *p_veneer_i)
4023{
4024 uint32_t insn_1 = bfd_getl32 (contents + i);
4025
4026 if (!_bfd_aarch64_adrp_p (insn_1))
4027 return FALSE;
4028
4029 if (span_end < i + 12)
4030 return FALSE;
4031
4032 uint32_t insn_2 = bfd_getl32 (contents + i + 4);
4033 uint32_t insn_3 = bfd_getl32 (contents + i + 8);
4034
4035 if ((vma & 0xfff) != 0xff8 && (vma & 0xfff) != 0xffc)
4036 return FALSE;
4037
4038 if (_bfd_aarch64_erratum_843419_sequence_p (insn_1, insn_2, insn_3))
4039 {
4040 *p_veneer_i = i + 8;
4041 return TRUE;
4042 }
4043
4044 if (span_end < i + 16)
4045 return FALSE;
4046
4047 uint32_t insn_4 = bfd_getl32 (contents + i + 12);
4048
4049 if (_bfd_aarch64_erratum_843419_sequence_p (insn_1, insn_2, insn_4))
4050 {
4051 *p_veneer_i = i + 12;
4052 return TRUE;
4053 }
4054
4055 return FALSE;
4056}
4057
4058
13f622ec
MS
4059/* Resize all stub sections. */
4060
4061static void
4062_bfd_aarch64_resize_stubs (struct elf_aarch64_link_hash_table *htab)
4063{
4064 asection *section;
4065
4066 /* OK, we've added some stubs. Find out the new size of the
4067 stub sections. */
4068 for (section = htab->stub_bfd->sections;
4069 section != NULL; section = section->next)
4070 {
4071 /* Ignore non-stub sections. */
4072 if (!strstr (section->name, STUB_SUFFIX))
4073 continue;
4074 section->size = 0;
4075 }
4076
4077 bfd_hash_traverse (&htab->stub_hash_table, aarch64_size_one_stub, htab);
13f622ec 4078
61865519
MS
4079 for (section = htab->stub_bfd->sections;
4080 section != NULL; section = section->next)
4081 {
4082 if (!strstr (section->name, STUB_SUFFIX))
4083 continue;
4084
9a2ebffd
JW
4085 /* Add space for a branch. Add 8 bytes to keep section 8 byte aligned,
4086 as long branch stubs contain a 64-bit address. */
61865519 4087 if (section->size)
9a2ebffd 4088 section->size += 8;
4106101c
MS
4089
4090 /* Ensure all stub sections have a size which is a multiple of
4091 4096. This is important in order to ensure that the insertion
4092 of stub sections does not in itself move existing code around
739b5c9c
TC
4093 in such a way that new errata sequences are created. We only do this
4094 when the ADRP workaround is enabled. If only the ADR workaround is
4095 enabled then the stubs workaround won't ever be used. */
4096 if (htab->fix_erratum_843419 & ERRAT_ADRP)
4106101c
MS
4097 if (section->size)
4098 section->size = BFD_ALIGN (section->size, 0x1000);
4099 }
4100}
4101
9a2ebffd 4102/* Construct an erratum 843419 workaround stub name. */
4106101c
MS
4103
4104static char *
4105_bfd_aarch64_erratum_843419_stub_name (asection *input_section,
4106 bfd_vma offset)
4107{
4108 const bfd_size_type len = 8 + 4 + 1 + 8 + 1 + 16 + 1;
4109 char *stub_name = bfd_malloc (len);
4110
4111 if (stub_name != NULL)
4112 snprintf (stub_name, len, "e843419@%04x_%08x_%" BFD_VMA_FMT "x",
4113 input_section->owner->id,
4114 input_section->id,
4115 offset);
4116 return stub_name;
4117}
4118
4119/* Build a stub_entry structure describing an 843419 fixup.
4120
4121 The stub_entry constructed is populated with the bit pattern INSN
4122 of the instruction located at OFFSET within input SECTION.
4123
4124 Returns TRUE on success. */
4125
4126static bfd_boolean
4127_bfd_aarch64_erratum_843419_fixup (uint32_t insn,
4128 bfd_vma adrp_offset,
4129 bfd_vma ldst_offset,
4130 asection *section,
4131 struct bfd_link_info *info)
4132{
4133 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
4134 char *stub_name;
4135 struct elf_aarch64_stub_hash_entry *stub_entry;
4136
4137 stub_name = _bfd_aarch64_erratum_843419_stub_name (section, ldst_offset);
bb69498c
NC
4138 if (stub_name == NULL)
4139 return FALSE;
4106101c
MS
4140 stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
4141 FALSE, FALSE);
4142 if (stub_entry)
4143 {
4144 free (stub_name);
4145 return TRUE;
4146 }
4147
4148 /* We always place an 843419 workaround veneer in the stub section
4149 attached to the input section in which an erratum sequence has
4150 been found. This ensures that later in the link process (in
4151 elfNN_aarch64_write_section) when we copy the veneered
4152 instruction from the input section into the stub section the
4153 copied instruction will have had any relocations applied to it.
4154 If we placed workaround veneers in any other stub section then we
4155 could not assume that all relocations have been processed on the
4156 corresponding input section at the point we output the stub
bb69498c 4157 section. */
4106101c
MS
4158
4159 stub_entry = _bfd_aarch64_add_stub_entry_after (stub_name, section, htab);
4160 if (stub_entry == NULL)
4161 {
4162 free (stub_name);
4163 return FALSE;
4164 }
4165
4166 stub_entry->adrp_offset = adrp_offset;
4167 stub_entry->target_value = ldst_offset;
4168 stub_entry->target_section = section;
4169 stub_entry->stub_type = aarch64_stub_erratum_843419_veneer;
4170 stub_entry->veneered_insn = insn;
4171 stub_entry->output_name = stub_name;
4172
4173 return TRUE;
4174}
4175
4176
4177/* Scan an input section looking for the signature of erratum 843419.
4178
4179 Scans input SECTION in INPUT_BFD looking for erratum 843419
4180 signatures, for each signature found a stub_entry is created
4181 describing the location of the erratum for subsequent fixup.
4182
4183 Return TRUE on successful scan, FALSE on failure to scan.
4184 */
4185
4186static bfd_boolean
4187_bfd_aarch64_erratum_843419_scan (bfd *input_bfd, asection *section,
4188 struct bfd_link_info *info)
4189{
4190 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
4191
4192 if (htab == NULL)
4193 return TRUE;
4194
4195 if (elf_section_type (section) != SHT_PROGBITS
4196 || (elf_section_flags (section) & SHF_EXECINSTR) == 0
4197 || (section->flags & SEC_EXCLUDE) != 0
4198 || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
4199 || (section->output_section == bfd_abs_section_ptr))
4200 return TRUE;
4201
4202 do
4203 {
4204 bfd_byte *contents = NULL;
4205 struct _aarch64_elf_section_data *sec_data;
4206 unsigned int span;
4207
4208 if (elf_section_data (section)->this_hdr.contents != NULL)
4209 contents = elf_section_data (section)->this_hdr.contents;
4210 else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
4211 return FALSE;
4212
4213 sec_data = elf_aarch64_section_data (section);
4214
4215 qsort (sec_data->map, sec_data->mapcount,
4216 sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
4217
4218 for (span = 0; span < sec_data->mapcount; span++)
4219 {
4220 unsigned int span_start = sec_data->map[span].vma;
4221 unsigned int span_end = ((span == sec_data->mapcount - 1)
4222 ? sec_data->map[0].vma + section->size
4223 : sec_data->map[span + 1].vma);
4224 unsigned int i;
4225 char span_type = sec_data->map[span].type;
4226
4227 if (span_type == 'd')
4228 continue;
4229
4230 for (i = span_start; i + 8 < span_end; i += 4)
4231 {
4232 bfd_vma vma = (section->output_section->vma
4233 + section->output_offset
4234 + i);
4235 bfd_vma veneer_i;
4236
4237 if (_bfd_aarch64_erratum_843419_p
4238 (contents, vma, i, span_end, &veneer_i))
4239 {
4240 uint32_t insn = bfd_getl32 (contents + veneer_i);
4241
4242 if (!_bfd_aarch64_erratum_843419_fixup (insn, i, veneer_i,
4243 section, info))
4244 return FALSE;
4245 }
4246 }
4247 }
4248
4249 if (elf_section_data (section)->this_hdr.contents == NULL)
4250 free (contents);
61865519 4251 }
4106101c
MS
4252 while (0);
4253
4254 return TRUE;
61865519 4255}
13f622ec 4256
4106101c 4257
a06ea964
NC
4258/* Determine and set the size of the stub section for a final link.
4259
4260 The basic idea here is to examine all the relocations looking for
4261 PC-relative calls to a target that is unreachable with a "bl"
4262 instruction. */
4263
4264bfd_boolean
cec5225b 4265elfNN_aarch64_size_stubs (bfd *output_bfd,
a06ea964
NC
4266 bfd *stub_bfd,
4267 struct bfd_link_info *info,
4268 bfd_signed_vma group_size,
4269 asection * (*add_stub_section) (const char *,
4270 asection *),
4271 void (*layout_sections_again) (void))
4272{
4273 bfd_size_type stub_group_size;
4274 bfd_boolean stubs_always_before_branch;
5421cc6e 4275 bfd_boolean stub_changed = FALSE;
cec5225b 4276 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
68fcca92 4277 unsigned int num_erratum_835769_fixes = 0;
a06ea964
NC
4278
4279 /* Propagate mach to stub bfd, because it may not have been
4280 finalized when we created stub_bfd. */
4281 bfd_set_arch_mach (stub_bfd, bfd_get_arch (output_bfd),
4282 bfd_get_mach (output_bfd));
4283
4284 /* Stash our params away. */
4285 htab->stub_bfd = stub_bfd;
4286 htab->add_stub_section = add_stub_section;
4287 htab->layout_sections_again = layout_sections_again;
4288 stubs_always_before_branch = group_size < 0;
4289 if (group_size < 0)
4290 stub_group_size = -group_size;
4291 else
4292 stub_group_size = group_size;
4293
4294 if (stub_group_size == 1)
4295 {
4296 /* Default values. */
b9eead84 4297 /* AArch64 branch range is +-128MB. The value used is 1MB less. */
a06ea964
NC
4298 stub_group_size = 127 * 1024 * 1024;
4299 }
4300
4301 group_sections (htab, stub_group_size, stubs_always_before_branch);
4302
4106101c
MS
4303 (*htab->layout_sections_again) ();
4304
5421cc6e
MS
4305 if (htab->fix_erratum_835769)
4306 {
4307 bfd *input_bfd;
4308
4309 for (input_bfd = info->input_bfds;
4310 input_bfd != NULL; input_bfd = input_bfd->link.next)
8c803a2d
AM
4311 {
4312 if (!is_aarch64_elf (input_bfd)
4313 || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
4314 continue;
4315
4316 if (!_bfd_aarch64_erratum_835769_scan (input_bfd, info,
4317 &num_erratum_835769_fixes))
4318 return FALSE;
4319 }
5421cc6e 4320
4106101c
MS
4321 _bfd_aarch64_resize_stubs (htab);
4322 (*htab->layout_sections_again) ();
4323 }
4324
739b5c9c 4325 if (htab->fix_erratum_843419 != ERRAT_NONE)
4106101c
MS
4326 {
4327 bfd *input_bfd;
4328
4329 for (input_bfd = info->input_bfds;
4330 input_bfd != NULL;
4331 input_bfd = input_bfd->link.next)
4332 {
4333 asection *section;
4334
8c803a2d
AM
4335 if (!is_aarch64_elf (input_bfd)
4336 || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
4337 continue;
4338
4106101c
MS
4339 for (section = input_bfd->sections;
4340 section != NULL;
4341 section = section->next)
4342 if (!_bfd_aarch64_erratum_843419_scan (input_bfd, section, info))
4343 return FALSE;
4344 }
4345
4346 _bfd_aarch64_resize_stubs (htab);
4347 (*htab->layout_sections_again) ();
5421cc6e
MS
4348 }
4349
a06ea964
NC
4350 while (1)
4351 {
4352 bfd *input_bfd;
a06ea964 4353
9b9971aa
MS
4354 for (input_bfd = info->input_bfds;
4355 input_bfd != NULL; input_bfd = input_bfd->link.next)
a06ea964
NC
4356 {
4357 Elf_Internal_Shdr *symtab_hdr;
4358 asection *section;
4359 Elf_Internal_Sym *local_syms = NULL;
4360
8c803a2d
AM
4361 if (!is_aarch64_elf (input_bfd)
4362 || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
4363 continue;
4364
a06ea964
NC
4365 /* We'll need the symbol table in a second. */
4366 symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
4367 if (symtab_hdr->sh_info == 0)
4368 continue;
4369
4370 /* Walk over each section attached to the input bfd. */
4371 for (section = input_bfd->sections;
4372 section != NULL; section = section->next)
4373 {
4374 Elf_Internal_Rela *internal_relocs, *irelaend, *irela;
4375
4376 /* If there aren't any relocs, then there's nothing more
4377 to do. */
4378 if ((section->flags & SEC_RELOC) == 0
4379 || section->reloc_count == 0
4380 || (section->flags & SEC_CODE) == 0)
4381 continue;
4382
4383 /* If this section is a link-once section that will be
4384 discarded, then don't create any stubs. */
4385 if (section->output_section == NULL
4386 || section->output_section->owner != output_bfd)
4387 continue;
4388
4389 /* Get the relocs. */
4390 internal_relocs
4391 = _bfd_elf_link_read_relocs (input_bfd, section, NULL,
4392 NULL, info->keep_memory);
4393 if (internal_relocs == NULL)
4394 goto error_ret_free_local;
4395
4396 /* Now examine each relocation. */
4397 irela = internal_relocs;
4398 irelaend = irela + section->reloc_count;
4399 for (; irela < irelaend; irela++)
4400 {
4401 unsigned int r_type, r_indx;
cec5225b
YZ
4402 enum elf_aarch64_stub_type stub_type;
4403 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC
4404 asection *sym_sec;
4405 bfd_vma sym_value;
4406 bfd_vma destination;
cec5225b 4407 struct elf_aarch64_link_hash_entry *hash;
a06ea964
NC
4408 const char *sym_name;
4409 char *stub_name;
4410 const asection *id_sec;
4411 unsigned char st_type;
4412 bfd_size_type len;
4413
cec5225b
YZ
4414 r_type = ELFNN_R_TYPE (irela->r_info);
4415 r_indx = ELFNN_R_SYM (irela->r_info);
a06ea964
NC
4416
4417 if (r_type >= (unsigned int) R_AARCH64_end)
4418 {
4419 bfd_set_error (bfd_error_bad_value);
4420 error_ret_free_internal:
4421 if (elf_section_data (section)->relocs == NULL)
4422 free (internal_relocs);
4423 goto error_ret_free_local;
4424 }
4425
4426 /* Only look for stubs on unconditional branch and
4427 branch and link instructions. */
a6bb11b2
YZ
4428 if (r_type != (unsigned int) AARCH64_R (CALL26)
4429 && r_type != (unsigned int) AARCH64_R (JUMP26))
a06ea964
NC
4430 continue;
4431
4432 /* Now determine the call target, its name, value,
4433 section. */
4434 sym_sec = NULL;
4435 sym_value = 0;
4436 destination = 0;
4437 hash = NULL;
4438 sym_name = NULL;
4439 if (r_indx < symtab_hdr->sh_info)
4440 {
4441 /* It's a local symbol. */
4442 Elf_Internal_Sym *sym;
4443 Elf_Internal_Shdr *hdr;
4444
4445 if (local_syms == NULL)
4446 {
4447 local_syms
4448 = (Elf_Internal_Sym *) symtab_hdr->contents;
4449 if (local_syms == NULL)
4450 local_syms
4451 = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
4452 symtab_hdr->sh_info, 0,
4453 NULL, NULL, NULL);
4454 if (local_syms == NULL)
4455 goto error_ret_free_internal;
4456 }
4457
4458 sym = local_syms + r_indx;
4459 hdr = elf_elfsections (input_bfd)[sym->st_shndx];
4460 sym_sec = hdr->bfd_section;
4461 if (!sym_sec)
4462 /* This is an undefined symbol. It can never
4463 be resolved. */
4464 continue;
4465
4466 if (ELF_ST_TYPE (sym->st_info) != STT_SECTION)
4467 sym_value = sym->st_value;
4468 destination = (sym_value + irela->r_addend
4469 + sym_sec->output_offset
4470 + sym_sec->output_section->vma);
4471 st_type = ELF_ST_TYPE (sym->st_info);
4472 sym_name
4473 = bfd_elf_string_from_elf_section (input_bfd,
4474 symtab_hdr->sh_link,
4475 sym->st_name);
4476 }
4477 else
4478 {
4479 int e_indx;
4480
4481 e_indx = r_indx - symtab_hdr->sh_info;
cec5225b 4482 hash = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC
4483 elf_sym_hashes (input_bfd)[e_indx]);
4484
4485 while (hash->root.root.type == bfd_link_hash_indirect
4486 || hash->root.root.type == bfd_link_hash_warning)
cec5225b 4487 hash = ((struct elf_aarch64_link_hash_entry *)
a06ea964
NC
4488 hash->root.root.u.i.link);
4489
4490 if (hash->root.root.type == bfd_link_hash_defined
4491 || hash->root.root.type == bfd_link_hash_defweak)
4492 {
cec5225b
YZ
4493 struct elf_aarch64_link_hash_table *globals =
4494 elf_aarch64_hash_table (info);
a06ea964
NC
4495 sym_sec = hash->root.root.u.def.section;
4496 sym_value = hash->root.root.u.def.value;
4497 /* For a destination in a shared library,
4498 use the PLT stub as target address to
4499 decide whether a branch stub is
4500 needed. */
4501 if (globals->root.splt != NULL && hash != NULL
4502 && hash->root.plt.offset != (bfd_vma) - 1)
4503 {
4504 sym_sec = globals->root.splt;
4505 sym_value = hash->root.plt.offset;
4506 if (sym_sec->output_section != NULL)
4507 destination = (sym_value
4508 + sym_sec->output_offset
4509 +
4510 sym_sec->output_section->vma);
4511 }
4512 else if (sym_sec->output_section != NULL)
4513 destination = (sym_value + irela->r_addend
4514 + sym_sec->output_offset
4515 + sym_sec->output_section->vma);
4516 }
4517 else if (hash->root.root.type == bfd_link_hash_undefined
4518 || (hash->root.root.type
4519 == bfd_link_hash_undefweak))
4520 {
4521 /* For a shared library, use the PLT stub as
4522 target address to decide whether a long
4523 branch stub is needed.
4524 For absolute code, they cannot be handled. */
cec5225b
YZ
4525 struct elf_aarch64_link_hash_table *globals =
4526 elf_aarch64_hash_table (info);
a06ea964
NC
4527
4528 if (globals->root.splt != NULL && hash != NULL
4529 && hash->root.plt.offset != (bfd_vma) - 1)
4530 {
4531 sym_sec = globals->root.splt;
4532 sym_value = hash->root.plt.offset;
4533 if (sym_sec->output_section != NULL)
4534 destination = (sym_value
4535 + sym_sec->output_offset
4536 +
4537 sym_sec->output_section->vma);
4538 }
4539 else
4540 continue;
4541 }
4542 else
4543 {
4544 bfd_set_error (bfd_error_bad_value);
4545 goto error_ret_free_internal;
4546 }
4547 st_type = ELF_ST_TYPE (hash->root.type);
4548 sym_name = hash->root.root.root.string;
4549 }
4550
4551 /* Determine what (if any) linker stub is needed. */
9a228467
JW
4552 stub_type = aarch64_type_of_stub (section, irela, sym_sec,
4553 st_type, destination);
a06ea964
NC
4554 if (stub_type == aarch64_stub_none)
4555 continue;
4556
4557 /* Support for grouping stub sections. */
4558 id_sec = htab->stub_group[section->id].link_sec;
4559
4560 /* Get the name of this stub. */
cec5225b 4561 stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, hash,
a06ea964
NC
4562 irela);
4563 if (!stub_name)
4564 goto error_ret_free_internal;
4565
4566 stub_entry =
4567 aarch64_stub_hash_lookup (&htab->stub_hash_table,
4568 stub_name, FALSE, FALSE);
4569 if (stub_entry != NULL)
4570 {
4571 /* The proper stub has already been created. */
4572 free (stub_name);
3da64fe4
RA
4573 /* Always update this stub's target since it may have
4574 changed after layout. */
4575 stub_entry->target_value = sym_value + irela->r_addend;
a06ea964
NC
4576 continue;
4577 }
4578
ef857521
MS
4579 stub_entry = _bfd_aarch64_add_stub_entry_in_group
4580 (stub_name, section, htab);
a06ea964
NC
4581 if (stub_entry == NULL)
4582 {
4583 free (stub_name);
4584 goto error_ret_free_internal;
4585 }
4586
2f340668 4587 stub_entry->target_value = sym_value + irela->r_addend;
a06ea964
NC
4588 stub_entry->target_section = sym_sec;
4589 stub_entry->stub_type = stub_type;
4590 stub_entry->h = hash;
4591 stub_entry->st_type = st_type;
4592
4593 if (sym_name == NULL)
4594 sym_name = "unnamed";
4595 len = sizeof (STUB_ENTRY_NAME) + strlen (sym_name);
4596 stub_entry->output_name = bfd_alloc (htab->stub_bfd, len);
4597 if (stub_entry->output_name == NULL)
4598 {
4599 free (stub_name);
4600 goto error_ret_free_internal;
4601 }
4602
4603 snprintf (stub_entry->output_name, len, STUB_ENTRY_NAME,
4604 sym_name);
4605
4606 stub_changed = TRUE;
4607 }
4608
4609 /* We're done with the internal relocs, free them. */
4610 if (elf_section_data (section)->relocs == NULL)
4611 free (internal_relocs);
4612 }
4613 }
4614
4615 if (!stub_changed)
4616 break;
4617
13f622ec 4618 _bfd_aarch64_resize_stubs (htab);
a06ea964
NC
4619
4620 /* Ask the linker to do its stuff. */
4621 (*htab->layout_sections_again) ();
4622 stub_changed = FALSE;
4623 }
4624
4625 return TRUE;
4626
dc1e8a47 4627 error_ret_free_local:
a06ea964
NC
4628 return FALSE;
4629}
4630
4631/* Build all the stubs associated with the current output file. The
4632 stubs are kept in a hash table attached to the main linker hash
4633 table. We also set up the .plt entries for statically linked PIC
4634 functions here. This function is called via aarch64_elf_finish in the
4635 linker. */
4636
4637bfd_boolean
cec5225b 4638elfNN_aarch64_build_stubs (struct bfd_link_info *info)
a06ea964
NC
4639{
4640 asection *stub_sec;
4641 struct bfd_hash_table *table;
cec5225b 4642 struct elf_aarch64_link_hash_table *htab;
a06ea964 4643
cec5225b 4644 htab = elf_aarch64_hash_table (info);
a06ea964
NC
4645
4646 for (stub_sec = htab->stub_bfd->sections;
4647 stub_sec != NULL; stub_sec = stub_sec->next)
4648 {
4649 bfd_size_type size;
4650
4651 /* Ignore non-stub sections. */
4652 if (!strstr (stub_sec->name, STUB_SUFFIX))
4653 continue;
4654
4655 /* Allocate memory to hold the linker stubs. */
4656 size = stub_sec->size;
4657 stub_sec->contents = bfd_zalloc (htab->stub_bfd, size);
4658 if (stub_sec->contents == NULL && size != 0)
4659 return FALSE;
4660 stub_sec->size = 0;
61865519 4661
9a2ebffd
JW
4662 /* Add a branch around the stub section, and a nop, to keep it 8 byte
4663 aligned, as long branch stubs contain a 64-bit address. */
61865519 4664 bfd_putl32 (0x14000000 | (size >> 2), stub_sec->contents);
9a2ebffd
JW
4665 bfd_putl32 (INSN_NOP, stub_sec->contents + 4);
4666 stub_sec->size += 8;
a06ea964
NC
4667 }
4668
4669 /* Build the stubs as directed by the stub hash table. */
4670 table = &htab->stub_hash_table;
4671 bfd_hash_traverse (table, aarch64_build_one_stub, info);
4672
4673 return TRUE;
4674}
4675
4676
4677/* Add an entry to the code/data map for section SEC. */
4678
4679static void
cec5225b 4680elfNN_aarch64_section_map_add (asection *sec, char type, bfd_vma vma)
a06ea964
NC
4681{
4682 struct _aarch64_elf_section_data *sec_data =
cec5225b 4683 elf_aarch64_section_data (sec);
a06ea964
NC
4684 unsigned int newidx;
4685
4686 if (sec_data->map == NULL)
4687 {
cec5225b 4688 sec_data->map = bfd_malloc (sizeof (elf_aarch64_section_map));
a06ea964
NC
4689 sec_data->mapcount = 0;
4690 sec_data->mapsize = 1;
4691 }
4692
4693 newidx = sec_data->mapcount++;
4694
4695 if (sec_data->mapcount > sec_data->mapsize)
4696 {
4697 sec_data->mapsize *= 2;
4698 sec_data->map = bfd_realloc_or_free
cec5225b 4699 (sec_data->map, sec_data->mapsize * sizeof (elf_aarch64_section_map));
a06ea964
NC
4700 }
4701
4702 if (sec_data->map)
4703 {
4704 sec_data->map[newidx].vma = vma;
4705 sec_data->map[newidx].type = type;
4706 }
4707}
4708
4709
4710/* Initialise maps of insn/data for input BFDs. */
4711void
cec5225b 4712bfd_elfNN_aarch64_init_maps (bfd *abfd)
a06ea964
NC
4713{
4714 Elf_Internal_Sym *isymbuf;
4715 Elf_Internal_Shdr *hdr;
4716 unsigned int i, localsyms;
4717
4718 /* Make sure that we are dealing with an AArch64 elf binary. */
4719 if (!is_aarch64_elf (abfd))
4720 return;
4721
4722 if ((abfd->flags & DYNAMIC) != 0)
68fcca92 4723 return;
a06ea964
NC
4724
4725 hdr = &elf_symtab_hdr (abfd);
4726 localsyms = hdr->sh_info;
4727
4728 /* Obtain a buffer full of symbols for this BFD. The hdr->sh_info field
4729 should contain the number of local symbols, which should come before any
4730 global symbols. Mapping symbols are always local. */
4731 isymbuf = bfd_elf_get_elf_syms (abfd, hdr, localsyms, 0, NULL, NULL, NULL);
4732
4733 /* No internal symbols read? Skip this BFD. */
4734 if (isymbuf == NULL)
4735 return;
4736
4737 for (i = 0; i < localsyms; i++)
4738 {
4739 Elf_Internal_Sym *isym = &isymbuf[i];
4740 asection *sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
4741 const char *name;
4742
4743 if (sec != NULL && ELF_ST_BIND (isym->st_info) == STB_LOCAL)
4744 {
4745 name = bfd_elf_string_from_elf_section (abfd,
4746 hdr->sh_link,
4747 isym->st_name);
4748
4749 if (bfd_is_aarch64_special_symbol_name
4750 (name, BFD_AARCH64_SPECIAL_SYM_TYPE_MAP))
cec5225b 4751 elfNN_aarch64_section_map_add (sec, name[1], isym->st_value);
a06ea964
NC
4752 }
4753 }
4754}
4755
37c18eed
SD
4756static void
4757setup_plt_values (struct bfd_link_info *link_info,
4758 aarch64_plt_type plt_type)
4759{
4760 struct elf_aarch64_link_hash_table *globals;
4761 globals = elf_aarch64_hash_table (link_info);
4762
1dbade74
SD
4763 if (plt_type == PLT_BTI_PAC)
4764 {
68bb0359 4765 globals->plt0_entry = elfNN_aarch64_small_plt0_bti_entry;
1dbade74
SD
4766
4767 /* Only in ET_EXEC we need PLTn with BTI. */
4768 if (bfd_link_pde (link_info))
4769 {
4770 globals->plt_entry_size = PLT_BTI_PAC_SMALL_ENTRY_SIZE;
4771 globals->plt_entry = elfNN_aarch64_small_plt_bti_pac_entry;
4772 }
4773 else
4774 {
4775 globals->plt_entry_size = PLT_PAC_SMALL_ENTRY_SIZE;
4776 globals->plt_entry = elfNN_aarch64_small_plt_pac_entry;
4777 }
4778 }
4779 else if (plt_type == PLT_BTI)
37c18eed 4780 {
37c18eed 4781 globals->plt0_entry = elfNN_aarch64_small_plt0_bti_entry;
37c18eed
SD
4782
4783 /* Only in ET_EXEC we need PLTn with BTI. */
4784 if (bfd_link_pde (link_info))
4785 {
4786 globals->plt_entry_size = PLT_BTI_SMALL_ENTRY_SIZE;
4787 globals->plt_entry = elfNN_aarch64_small_plt_bti_entry;
4788 }
4789 }
1dbade74
SD
4790 else if (plt_type == PLT_PAC)
4791 {
1dbade74
SD
4792 globals->plt_entry_size = PLT_PAC_SMALL_ENTRY_SIZE;
4793 globals->plt_entry = elfNN_aarch64_small_plt_pac_entry;
4794 }
37c18eed
SD
4795}
4796
a06ea964
NC
4797/* Set option values needed during linking. */
4798void
cec5225b 4799bfd_elfNN_aarch64_set_options (struct bfd *output_bfd,
a06ea964
NC
4800 struct bfd_link_info *link_info,
4801 int no_enum_warn,
68fcca92 4802 int no_wchar_warn, int pic_veneer,
4106101c 4803 int fix_erratum_835769,
739b5c9c 4804 erratum_84319_opts fix_erratum_843419,
37c18eed
SD
4805 int no_apply_dynamic_relocs,
4806 aarch64_bti_pac_info bp_info)
a06ea964 4807{
cec5225b 4808 struct elf_aarch64_link_hash_table *globals;
a06ea964 4809
cec5225b 4810 globals = elf_aarch64_hash_table (link_info);
a06ea964 4811 globals->pic_veneer = pic_veneer;
68fcca92 4812 globals->fix_erratum_835769 = fix_erratum_835769;
739b5c9c
TC
4813 /* If the default options are used, then ERRAT_ADR will be set by default
4814 which will enable the ADRP->ADR workaround for the erratum 843419
4815 workaround. */
4106101c 4816 globals->fix_erratum_843419 = fix_erratum_843419;
1f56df9d 4817 globals->no_apply_dynamic_relocs = no_apply_dynamic_relocs;
a06ea964
NC
4818
4819 BFD_ASSERT (is_aarch64_elf (output_bfd));
4820 elf_aarch64_tdata (output_bfd)->no_enum_size_warning = no_enum_warn;
4821 elf_aarch64_tdata (output_bfd)->no_wchar_size_warning = no_wchar_warn;
37c18eed
SD
4822
4823 switch (bp_info.bti_type)
4824 {
4825 case BTI_WARN:
4826 elf_aarch64_tdata (output_bfd)->no_bti_warn = 0;
4827 elf_aarch64_tdata (output_bfd)->gnu_and_prop
4828 |= GNU_PROPERTY_AARCH64_FEATURE_1_BTI;
4829 break;
4830
4831 default:
4832 break;
4833 }
4834 elf_aarch64_tdata (output_bfd)->plt_type = bp_info.plt_type;
4835 setup_plt_values (link_info, bp_info.plt_type);
a06ea964
NC
4836}
4837
a06ea964
NC
4838static bfd_vma
4839aarch64_calculate_got_entry_vma (struct elf_link_hash_entry *h,
cec5225b 4840 struct elf_aarch64_link_hash_table
a06ea964
NC
4841 *globals, struct bfd_link_info *info,
4842 bfd_vma value, bfd *output_bfd,
4843 bfd_boolean *unresolved_reloc_p)
4844{
4845 bfd_vma off = (bfd_vma) - 1;
4846 asection *basegot = globals->root.sgot;
4847 bfd_boolean dyn = globals->root.dynamic_sections_created;
4848
4849 if (h != NULL)
4850 {
a6bb11b2 4851 BFD_ASSERT (basegot != NULL);
a06ea964
NC
4852 off = h->got.offset;
4853 BFD_ASSERT (off != (bfd_vma) - 1);
0e1862bb
L
4854 if (!WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)
4855 || (bfd_link_pic (info)
a06ea964
NC
4856 && SYMBOL_REFERENCES_LOCAL (info, h))
4857 || (ELF_ST_VISIBILITY (h->other)
4858 && h->root.type == bfd_link_hash_undefweak))
4859 {
4860 /* This is actually a static link, or it is a -Bsymbolic link
4861 and the symbol is defined locally. We must initialize this
4862 entry in the global offset table. Since the offset must
a6bb11b2
YZ
4863 always be a multiple of 8 (4 in the case of ILP32), we use
4864 the least significant bit to record whether we have
4865 initialized it already.
a06ea964
NC
4866 When doing a dynamic link, we create a .rel(a).got relocation
4867 entry to initialize the value. This is done in the
4868 finish_dynamic_symbol routine. */
4869 if ((off & 1) != 0)
4870 off &= ~1;
4871 else
4872 {
cec5225b 4873 bfd_put_NN (output_bfd, value, basegot->contents + off);
a06ea964
NC
4874 h->got.offset |= 1;
4875 }
4876 }
4877 else
4878 *unresolved_reloc_p = FALSE;
4879
4880 off = off + basegot->output_section->vma + basegot->output_offset;
4881 }
4882
4883 return off;
4884}
4885
4886/* Change R_TYPE to a more efficient access model where possible,
4887 return the new reloc type. */
4888
a6bb11b2
YZ
4889static bfd_reloc_code_real_type
4890aarch64_tls_transition_without_check (bfd_reloc_code_real_type r_type,
a06ea964
NC
4891 struct elf_link_hash_entry *h)
4892{
4893 bfd_boolean is_local = h == NULL;
a6bb11b2 4894
a06ea964
NC
4895 switch (r_type)
4896 {
a6bb11b2 4897 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
ce336788 4898 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
a6bb11b2
YZ
4899 return (is_local
4900 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
4901 : BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21);
4902
389b8029
MS
4903 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
4904 return (is_local
4905 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4906 : r_type);
4907
1ada945d
MS
4908 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
4909 return (is_local
4910 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
4911 : BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19);
4912
0484b454
RL
4913 case BFD_RELOC_AARCH64_TLSDESC_LDR:
4914 return (is_local
4915 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4916 : BFD_RELOC_AARCH64_NONE);
4917
4918 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
4919 return (is_local
4920 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC
4921 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC);
4922
4923 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
4924 return (is_local
4925 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2
4926 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1);
4927
a6bb11b2 4928 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
ce336788 4929 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a6bb11b2
YZ
4930 return (is_local
4931 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
4932 : BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC);
4933
4934 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
4935 return is_local ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 : r_type;
4936
4937 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
4938 return is_local ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC : r_type;
4939
043bf05a
MS
4940 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
4941 return r_type;
4942
3c12b054
MS
4943 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
4944 return (is_local
4945 ? BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12
4946 : BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19);
4947
0484b454 4948 case BFD_RELOC_AARCH64_TLSDESC_ADD:
f955cccf 4949 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 4950 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a06ea964 4951 /* Instructions with these relocations will become NOPs. */
a6bb11b2
YZ
4952 return BFD_RELOC_AARCH64_NONE;
4953
259364ad
JW
4954 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
4955 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
4956 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
4957 return is_local ? BFD_RELOC_AARCH64_NONE : r_type;
4958
ac734732
RL
4959#if ARCH_SIZE == 64
4960 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
4961 return is_local
4962 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC
4963 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC;
4964
4965 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
4966 return is_local
4967 ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2
4968 : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1;
4969#endif
4970
a6bb11b2
YZ
4971 default:
4972 break;
a06ea964
NC
4973 }
4974
4975 return r_type;
4976}
4977
4978static unsigned int
a6bb11b2 4979aarch64_reloc_got_type (bfd_reloc_code_real_type r_type)
a06ea964
NC
4980{
4981 switch (r_type)
4982 {
a6bb11b2
YZ
4983 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
4984 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7018c030 4985 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
ce336788 4986 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
a2e1db00 4987 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
99ad26cb 4988 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
ce336788 4989 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
dc8008f5 4990 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
74a1bfe1 4991 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
a06ea964
NC
4992 return GOT_NORMAL;
4993
ce336788 4994 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a6bb11b2 4995 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3c12b054 4996 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
7ba7cfe4 4997 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
94facae3 4998 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
73f925cc 4999 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
f69e4920 5000 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
77a69ff8 5001 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
a06ea964
NC
5002 return GOT_TLS_GD;
5003
0484b454 5004 case BFD_RELOC_AARCH64_TLSDESC_ADD:
f955cccf 5005 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 5006 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
389b8029 5007 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
a6bb11b2 5008 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a6bb11b2 5009 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
f955cccf 5010 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
1ada945d 5011 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
0484b454
RL
5012 case BFD_RELOC_AARCH64_TLSDESC_LDR:
5013 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
5014 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
a06ea964
NC
5015 return GOT_TLSDESC_GD;
5016
a6bb11b2 5017 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a6bb11b2 5018 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
ce336788 5019 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
043bf05a 5020 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
3b957e5b
RL
5021 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
5022 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
a06ea964
NC
5023 return GOT_TLS_IE;
5024
a6bb11b2
YZ
5025 default:
5026 break;
a06ea964
NC
5027 }
5028 return GOT_UNKNOWN;
5029}
5030
5031static bfd_boolean
5032aarch64_can_relax_tls (bfd *input_bfd,
5033 struct bfd_link_info *info,
a6bb11b2 5034 bfd_reloc_code_real_type r_type,
a06ea964
NC
5035 struct elf_link_hash_entry *h,
5036 unsigned long r_symndx)
5037{
5038 unsigned int symbol_got_type;
5039 unsigned int reloc_got_type;
5040
9331eea1 5041 if (! IS_AARCH64_TLS_RELAX_RELOC (r_type))
a06ea964
NC
5042 return FALSE;
5043
cec5225b 5044 symbol_got_type = elfNN_aarch64_symbol_got_type (h, input_bfd, r_symndx);
a06ea964
NC
5045 reloc_got_type = aarch64_reloc_got_type (r_type);
5046
5047 if (symbol_got_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (reloc_got_type))
5048 return TRUE;
5049
6dda7875 5050 if (!bfd_link_executable (info))
a06ea964
NC
5051 return FALSE;
5052
5053 if (h && h->root.type == bfd_link_hash_undefweak)
5054 return FALSE;
5055
5056 return TRUE;
5057}
5058
a6bb11b2
YZ
5059/* Given the relocation code R_TYPE, return the relaxed bfd reloc
5060 enumerator. */
5061
5062static bfd_reloc_code_real_type
a06ea964
NC
5063aarch64_tls_transition (bfd *input_bfd,
5064 struct bfd_link_info *info,
5065 unsigned int r_type,
5066 struct elf_link_hash_entry *h,
5067 unsigned long r_symndx)
5068{
a6bb11b2 5069 bfd_reloc_code_real_type bfd_r_type
0aa13fee 5070 = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
a06ea964 5071
a6bb11b2
YZ
5072 if (! aarch64_can_relax_tls (input_bfd, info, bfd_r_type, h, r_symndx))
5073 return bfd_r_type;
5074
5075 return aarch64_tls_transition_without_check (bfd_r_type, h);
a06ea964
NC
5076}
5077
5078/* Return the base VMA address which should be subtracted from real addresses
a6bb11b2 5079 when resolving R_AARCH64_TLS_DTPREL relocation. */
a06ea964
NC
5080
5081static bfd_vma
5082dtpoff_base (struct bfd_link_info *info)
5083{
5084 /* If tls_sec is NULL, we should have signalled an error already. */
5085 BFD_ASSERT (elf_hash_table (info)->tls_sec != NULL);
5086 return elf_hash_table (info)->tls_sec->vma;
5087}
5088
a06ea964
NC
5089/* Return the base VMA address which should be subtracted from real addresses
5090 when resolving R_AARCH64_TLS_GOTTPREL64 relocations. */
5091
5092static bfd_vma
5093tpoff_base (struct bfd_link_info *info)
5094{
5095 struct elf_link_hash_table *htab = elf_hash_table (info);
5096
5097 /* If tls_sec is NULL, we should have signalled an error already. */
ac21917f 5098 BFD_ASSERT (htab->tls_sec != NULL);
a06ea964
NC
5099
5100 bfd_vma base = align_power ((bfd_vma) TCB_SIZE,
5101 htab->tls_sec->alignment_power);
5102 return htab->tls_sec->vma - base;
5103}
5104
5105static bfd_vma *
5106symbol_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
5107 unsigned long r_symndx)
5108{
5109 /* Calculate the address of the GOT entry for symbol
5110 referred to in h. */
5111 if (h != NULL)
5112 return &h->got.offset;
5113 else
5114 {
5115 /* local symbol */
5116 struct elf_aarch64_local_symbol *l;
5117
cec5225b 5118 l = elf_aarch64_locals (input_bfd);
a06ea964
NC
5119 return &l[r_symndx].got_offset;
5120 }
5121}
5122
5123static void
5124symbol_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
5125 unsigned long r_symndx)
5126{
5127 bfd_vma *p;
5128 p = symbol_got_offset_ref (input_bfd, h, r_symndx);
5129 *p |= 1;
5130}
5131
5132static int
5133symbol_got_offset_mark_p (bfd *input_bfd, struct elf_link_hash_entry *h,
5134 unsigned long r_symndx)
5135{
5136 bfd_vma value;
5137 value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
5138 return value & 1;
5139}
5140
5141static bfd_vma
5142symbol_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
5143 unsigned long r_symndx)
5144{
5145 bfd_vma value;
5146 value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
5147 value &= ~1;
5148 return value;
5149}
5150
5151static bfd_vma *
5152symbol_tlsdesc_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
5153 unsigned long r_symndx)
5154{
5155 /* Calculate the address of the GOT entry for symbol
5156 referred to in h. */
5157 if (h != NULL)
5158 {
cec5225b
YZ
5159 struct elf_aarch64_link_hash_entry *eh;
5160 eh = (struct elf_aarch64_link_hash_entry *) h;
a06ea964
NC
5161 return &eh->tlsdesc_got_jump_table_offset;
5162 }
5163 else
5164 {
5165 /* local symbol */
5166 struct elf_aarch64_local_symbol *l;
5167
cec5225b 5168 l = elf_aarch64_locals (input_bfd);
a06ea964
NC
5169 return &l[r_symndx].tlsdesc_got_jump_table_offset;
5170 }
5171}
5172
5173static void
5174symbol_tlsdesc_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
5175 unsigned long r_symndx)
5176{
5177 bfd_vma *p;
5178 p = symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
5179 *p |= 1;
5180}
5181
5182static int
5183symbol_tlsdesc_got_offset_mark_p (bfd *input_bfd,
5184 struct elf_link_hash_entry *h,
5185 unsigned long r_symndx)
5186{
5187 bfd_vma value;
5188 value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
5189 return value & 1;
5190}
5191
5192static bfd_vma
5193symbol_tlsdesc_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
5194 unsigned long r_symndx)
5195{
5196 bfd_vma value;
5197 value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
5198 value &= ~1;
5199 return value;
5200}
5201
68fcca92
JW
5202/* Data for make_branch_to_erratum_835769_stub(). */
5203
5204struct erratum_835769_branch_to_stub_data
5205{
4106101c 5206 struct bfd_link_info *info;
68fcca92
JW
5207 asection *output_section;
5208 bfd_byte *contents;
5209};
5210
5211/* Helper to insert branches to erratum 835769 stubs in the right
5212 places for a particular section. */
5213
5214static bfd_boolean
5215make_branch_to_erratum_835769_stub (struct bfd_hash_entry *gen_entry,
5216 void *in_arg)
5217{
5218 struct elf_aarch64_stub_hash_entry *stub_entry;
5219 struct erratum_835769_branch_to_stub_data *data;
5220 bfd_byte *contents;
5221 unsigned long branch_insn = 0;
5222 bfd_vma veneered_insn_loc, veneer_entry_loc;
5223 bfd_signed_vma branch_offset;
5224 unsigned int target;
5225 bfd *abfd;
5226
5227 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
5228 data = (struct erratum_835769_branch_to_stub_data *) in_arg;
5229
5230 if (stub_entry->target_section != data->output_section
5231 || stub_entry->stub_type != aarch64_stub_erratum_835769_veneer)
5232 return TRUE;
5233
5234 contents = data->contents;
5235 veneered_insn_loc = stub_entry->target_section->output_section->vma
5236 + stub_entry->target_section->output_offset
5237 + stub_entry->target_value;
5238 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
5239 + stub_entry->stub_sec->output_offset
5240 + stub_entry->stub_offset;
5241 branch_offset = veneer_entry_loc - veneered_insn_loc;
5242
5243 abfd = stub_entry->target_section->owner;
5244 if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
4eca0228 5245 _bfd_error_handler
90b6238f 5246 (_("%pB: error: erratum 835769 stub out "
4eca0228 5247 "of range (input file too large)"), abfd);
68fcca92
JW
5248
5249 target = stub_entry->target_value;
5250 branch_insn = 0x14000000;
5251 branch_offset >>= 2;
5252 branch_offset &= 0x3ffffff;
5253 branch_insn |= branch_offset;
5254 bfd_putl32 (branch_insn, &contents[target]);
5255
5256 return TRUE;
5257}
5258
4106101c
MS
5259
5260static bfd_boolean
5261_bfd_aarch64_erratum_843419_branch_to_stub (struct bfd_hash_entry *gen_entry,
5262 void *in_arg)
5263{
5264 struct elf_aarch64_stub_hash_entry *stub_entry
5265 = (struct elf_aarch64_stub_hash_entry *) gen_entry;
5266 struct erratum_835769_branch_to_stub_data *data
5267 = (struct erratum_835769_branch_to_stub_data *) in_arg;
5268 struct bfd_link_info *info;
5269 struct elf_aarch64_link_hash_table *htab;
5270 bfd_byte *contents;
5271 asection *section;
5272 bfd *abfd;
5273 bfd_vma place;
5274 uint32_t insn;
5275
5276 info = data->info;
5277 contents = data->contents;
5278 section = data->output_section;
5279
5280 htab = elf_aarch64_hash_table (info);
5281
5282 if (stub_entry->target_section != section
5283 || stub_entry->stub_type != aarch64_stub_erratum_843419_veneer)
5284 return TRUE;
5285
739b5c9c
TC
5286 BFD_ASSERT (((htab->fix_erratum_843419 & ERRAT_ADRP) && stub_entry->stub_sec)
5287 || (htab->fix_erratum_843419 & ERRAT_ADR));
5288
5289 /* Only update the stub section if we have one. We should always have one if
5290 we're allowed to use the ADRP errata workaround, otherwise it is not
5291 required. */
5292 if (stub_entry->stub_sec)
5293 {
5294 insn = bfd_getl32 (contents + stub_entry->target_value);
5295 bfd_putl32 (insn,
5296 stub_entry->stub_sec->contents + stub_entry->stub_offset);
5297 }
4106101c
MS
5298
5299 place = (section->output_section->vma + section->output_offset
5300 + stub_entry->adrp_offset);
5301 insn = bfd_getl32 (contents + stub_entry->adrp_offset);
5302
9fca35fc 5303 if (!_bfd_aarch64_adrp_p (insn))
4106101c
MS
5304 abort ();
5305
5306 bfd_signed_vma imm =
5307 (_bfd_aarch64_sign_extend
5308 ((bfd_vma) _bfd_aarch64_decode_adrp_imm (insn) << 12, 33)
5309 - (place & 0xfff));
5310
739b5c9c 5311 if ((htab->fix_erratum_843419 & ERRAT_ADR)
4106101c
MS
5312 && (imm >= AARCH64_MIN_ADRP_IMM && imm <= AARCH64_MAX_ADRP_IMM))
5313 {
5314 insn = (_bfd_aarch64_reencode_adr_imm (AARCH64_ADR_OP, imm)
5315 | AARCH64_RT (insn));
5316 bfd_putl32 (insn, contents + stub_entry->adrp_offset);
739b5c9c
TC
5317 /* Stub is not needed, don't map it out. */
5318 stub_entry->stub_type = aarch64_stub_none;
4106101c 5319 }
739b5c9c 5320 else if (htab->fix_erratum_843419 & ERRAT_ADRP)
4106101c
MS
5321 {
5322 bfd_vma veneered_insn_loc;
5323 bfd_vma veneer_entry_loc;
5324 bfd_signed_vma branch_offset;
5325 uint32_t branch_insn;
5326
5327 veneered_insn_loc = stub_entry->target_section->output_section->vma
5328 + stub_entry->target_section->output_offset
5329 + stub_entry->target_value;
5330 veneer_entry_loc = stub_entry->stub_sec->output_section->vma
5331 + stub_entry->stub_sec->output_offset
5332 + stub_entry->stub_offset;
5333 branch_offset = veneer_entry_loc - veneered_insn_loc;
5334
5335 abfd = stub_entry->target_section->owner;
5336 if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
4eca0228 5337 _bfd_error_handler
90b6238f 5338 (_("%pB: error: erratum 843419 stub out "
4106101c
MS
5339 "of range (input file too large)"), abfd);
5340
5341 branch_insn = 0x14000000;
5342 branch_offset >>= 2;
5343 branch_offset &= 0x3ffffff;
5344 branch_insn |= branch_offset;
5345 bfd_putl32 (branch_insn, contents + stub_entry->target_value);
5346 }
739b5c9c
TC
5347 else
5348 {
5349 abfd = stub_entry->target_section->owner;
5350 _bfd_error_handler
64672071 5351 (_("%pB: error: erratum 843419 immediate 0x%" BFD_VMA_FMT "x "
739b5c9c
TC
5352 "out of range for ADR (input file too large) and "
5353 "--fix-cortex-a53-843419=adr used. Run the linker with "
5354 "--fix-cortex-a53-843419=full instead"), abfd, imm);
5355 bfd_set_error (bfd_error_bad_value);
5356 /* This function is called inside a hashtable traversal and the error
5357 handlers called above turn into non-fatal errors. Which means this
5358 case ld returns an exit code 0 and also produces a broken object file.
5359 To prevent this, issue a hard abort. */
5360 BFD_FAIL ();
5361 }
4106101c
MS
5362 return TRUE;
5363}
5364
5365
68fcca92
JW
5366static bfd_boolean
5367elfNN_aarch64_write_section (bfd *output_bfd ATTRIBUTE_UNUSED,
5368 struct bfd_link_info *link_info,
5369 asection *sec,
5370 bfd_byte *contents)
5371
5372{
5373 struct elf_aarch64_link_hash_table *globals =
f872121a 5374 elf_aarch64_hash_table (link_info);
68fcca92
JW
5375
5376 if (globals == NULL)
5377 return FALSE;
5378
5379 /* Fix code to point to erratum 835769 stubs. */
5380 if (globals->fix_erratum_835769)
5381 {
5382 struct erratum_835769_branch_to_stub_data data;
5383
4106101c 5384 data.info = link_info;
68fcca92
JW
5385 data.output_section = sec;
5386 data.contents = contents;
5387 bfd_hash_traverse (&globals->stub_hash_table,
5388 make_branch_to_erratum_835769_stub, &data);
5389 }
5390
4106101c
MS
5391 if (globals->fix_erratum_843419)
5392 {
5393 struct erratum_835769_branch_to_stub_data data;
5394
5395 data.info = link_info;
5396 data.output_section = sec;
5397 data.contents = contents;
5398 bfd_hash_traverse (&globals->stub_hash_table,
5399 _bfd_aarch64_erratum_843419_branch_to_stub, &data);
5400 }
5401
68fcca92
JW
5402 return FALSE;
5403}
5404
2aff25ba
JW
5405/* Return TRUE if RELOC is a relocation against the base of GOT table. */
5406
5407static bfd_boolean
5408aarch64_relocation_aginst_gp_p (bfd_reloc_code_real_type reloc)
5409{
5410 return (reloc == BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14
5411 || reloc == BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15
5412 || reloc == BFD_RELOC_AARCH64_LD64_GOTOFF_LO15
5413 || reloc == BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC
5414 || reloc == BFD_RELOC_AARCH64_MOVW_GOTOFF_G1);
5415}
5416
4e7fbb34
JW
5417/* Perform a relocation as part of a final link. The input relocation type
5418 should be TLS relaxed. */
5419
a06ea964 5420static bfd_reloc_status_type
cec5225b 5421elfNN_aarch64_final_link_relocate (reloc_howto_type *howto,
a06ea964
NC
5422 bfd *input_bfd,
5423 bfd *output_bfd,
5424 asection *input_section,
5425 bfd_byte *contents,
5426 Elf_Internal_Rela *rel,
5427 bfd_vma value,
5428 struct bfd_link_info *info,
5429 asection *sym_sec,
5430 struct elf_link_hash_entry *h,
5431 bfd_boolean *unresolved_reloc_p,
5432 bfd_boolean save_addend,
1419bbe5
WN
5433 bfd_vma *saved_addend,
5434 Elf_Internal_Sym *sym)
a06ea964 5435{
1419bbe5 5436 Elf_Internal_Shdr *symtab_hdr;
a06ea964 5437 unsigned int r_type = howto->type;
a6bb11b2
YZ
5438 bfd_reloc_code_real_type bfd_r_type
5439 = elfNN_aarch64_bfd_reloc_from_howto (howto);
a06ea964
NC
5440 unsigned long r_symndx;
5441 bfd_byte *hit_data = contents + rel->r_offset;
96d01d93 5442 bfd_vma place, off, got_entry_addr = 0;
a06ea964 5443 bfd_signed_vma signed_addend;
cec5225b 5444 struct elf_aarch64_link_hash_table *globals;
a06ea964 5445 bfd_boolean weak_undef_p;
ff07562f 5446 bfd_boolean relative_reloc;
b53b1bed 5447 asection *base_got;
ff07562f 5448 bfd_vma orig_value = value;
ddb7fd0f 5449 bfd_boolean resolved_to_zero;
0c1ded8d 5450 bfd_boolean abs_symbol_p;
7e057737 5451 bfd_boolean via_plt_p;
a06ea964 5452
cec5225b 5453 globals = elf_aarch64_hash_table (info);
a06ea964 5454
1419bbe5
WN
5455 symtab_hdr = &elf_symtab_hdr (input_bfd);
5456
a06ea964
NC
5457 BFD_ASSERT (is_aarch64_elf (input_bfd));
5458
cec5225b 5459 r_symndx = ELFNN_R_SYM (rel->r_info);
a06ea964 5460
a06ea964
NC
5461 place = input_section->output_section->vma
5462 + input_section->output_offset + rel->r_offset;
5463
5464 /* Get addend, accumulating the addend for consecutive relocs
5465 which refer to the same offset. */
5466 signed_addend = saved_addend ? *saved_addend : 0;
5467 signed_addend += rel->r_addend;
5468
5469 weak_undef_p = (h ? h->root.type == bfd_link_hash_undefweak
5470 : bfd_is_und_section (sym_sec));
c691de6a 5471 abs_symbol_p = h != NULL && bfd_is_abs_symbol (&h->root);
0c1ded8d 5472
7e057737
SP
5473 via_plt_p = (globals->root.splt != NULL && h != NULL
5474 && h->plt.offset != (bfd_vma) - 1);
a6bb11b2 5475
1419bbe5
WN
5476 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
5477 it here if it is defined in a non-shared object. */
5478 if (h != NULL
5479 && h->type == STT_GNU_IFUNC
5480 && h->def_regular)
5481 {
5482 asection *plt;
5483 const char *name;
99ad26cb 5484 bfd_vma addend = 0;
1419bbe5 5485
545bc2b3
SN
5486 if ((input_section->flags & SEC_ALLOC) == 0)
5487 {
f657f8c4
NC
5488 /* If this is a SHT_NOTE section without SHF_ALLOC, treat
5489 STT_GNU_IFUNC symbol as STT_FUNC. */
5490 if (elf_section_type (input_section) == SHT_NOTE)
5491 goto skip_ifunc;
5492
545bc2b3
SN
5493 /* Dynamic relocs are not propagated for SEC_DEBUGGING
5494 sections because such sections are not SEC_ALLOC and
5495 thus ld.so will not process them. */
5496 if ((input_section->flags & SEC_DEBUGGING) != 0)
5497 return bfd_reloc_ok;
5498
5499 if (h->root.root.string)
5500 name = h->root.root.string;
5501 else
5502 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym, NULL);
5503 _bfd_error_handler
5504 /* xgettext:c-format */
2dcf00ce
AM
5505 (_("%pB(%pA+%#" PRIx64 "): "
5506 "unresolvable %s relocation against symbol `%s'"),
5507 input_bfd, input_section, (uint64_t) rel->r_offset,
5508 howto->name, name);
545bc2b3 5509 bfd_set_error (bfd_error_bad_value);
1d75a8e2 5510 return bfd_reloc_notsupported;
545bc2b3
SN
5511 }
5512 else if (h->plt.offset == (bfd_vma) -1)
5513 goto bad_ifunc_reloc;
1419bbe5
WN
5514
5515 /* STT_GNU_IFUNC symbol must go through PLT. */
5516 plt = globals->root.splt ? globals->root.splt : globals->root.iplt;
5517 value = (plt->output_section->vma + plt->output_offset + h->plt.offset);
5518
5519 switch (bfd_r_type)
5520 {
5521 default:
dc1e8a47 5522 bad_ifunc_reloc:
1419bbe5
WN
5523 if (h->root.root.string)
5524 name = h->root.root.string;
5525 else
5526 name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
5527 NULL);
4eca0228 5528 _bfd_error_handler
695344c0 5529 /* xgettext:c-format */
871b3ab2 5530 (_("%pB: relocation %s against STT_GNU_IFUNC "
1419bbe5
WN
5531 "symbol `%s' isn't handled by %s"), input_bfd,
5532 howto->name, name, __FUNCTION__);
5533 bfd_set_error (bfd_error_bad_value);
1d75a8e2 5534 return bfd_reloc_notsupported;
1419bbe5
WN
5535
5536 case BFD_RELOC_AARCH64_NN:
5537 if (rel->r_addend != 0)
5538 {
5539 if (h->root.root.string)
5540 name = h->root.root.string;
5541 else
5542 name = bfd_elf_sym_name (input_bfd, symtab_hdr,
5543 sym, NULL);
4eca0228 5544 _bfd_error_handler
695344c0 5545 /* xgettext:c-format */
871b3ab2 5546 (_("%pB: relocation %s against STT_GNU_IFUNC "
2dcf00ce
AM
5547 "symbol `%s' has non-zero addend: %" PRId64),
5548 input_bfd, howto->name, name, (int64_t) rel->r_addend);
1419bbe5 5549 bfd_set_error (bfd_error_bad_value);
1d75a8e2 5550 return bfd_reloc_notsupported;
1419bbe5
WN
5551 }
5552
5553 /* Generate dynamic relocation only when there is a
5554 non-GOT reference in a shared object. */
0e1862bb 5555 if (bfd_link_pic (info) && h->non_got_ref)
1419bbe5
WN
5556 {
5557 Elf_Internal_Rela outrel;
5558 asection *sreloc;
5559
5560 /* Need a dynamic relocation to get the real function
5561 address. */
5562 outrel.r_offset = _bfd_elf_section_offset (output_bfd,
5563 info,
5564 input_section,
5565 rel->r_offset);
5566 if (outrel.r_offset == (bfd_vma) -1
5567 || outrel.r_offset == (bfd_vma) -2)
5568 abort ();
5569
5570 outrel.r_offset += (input_section->output_section->vma
5571 + input_section->output_offset);
5572
5573 if (h->dynindx == -1
5574 || h->forced_local
0e1862bb 5575 || bfd_link_executable (info))
1419bbe5
WN
5576 {
5577 /* This symbol is resolved locally. */
5578 outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
5579 outrel.r_addend = (h->root.u.def.value
5580 + h->root.u.def.section->output_section->vma
5581 + h->root.u.def.section->output_offset);
5582 }
5583 else
5584 {
5585 outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
5586 outrel.r_addend = 0;
5587 }
5588
5589 sreloc = globals->root.irelifunc;
5590 elf_append_rela (output_bfd, sreloc, &outrel);
5591
5592 /* If this reloc is against an external symbol, we
5593 do not want to fiddle with the addend. Otherwise,
5594 we need to include the symbol value so that it
5595 becomes an addend for the dynamic reloc. For an
5596 internal symbol, we have updated addend. */
5597 return bfd_reloc_ok;
5598 }
5599 /* FALLTHROUGH */
1419bbe5 5600 case BFD_RELOC_AARCH64_CALL26:
ce336788 5601 case BFD_RELOC_AARCH64_JUMP26:
652afeef
TC
5602 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5603 place, value,
1419bbe5
WN
5604 signed_addend,
5605 weak_undef_p);
5606 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
5607 howto, value);
1419bbe5
WN
5608 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
5609 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7018c030 5610 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
ce336788 5611 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
99ad26cb 5612 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
dc8008f5 5613 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
74a1bfe1 5614 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
a2e1db00 5615 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
ce336788 5616 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
1419bbe5
WN
5617 base_got = globals->root.sgot;
5618 off = h->got.offset;
5619
5620 if (base_got == NULL)
5621 abort ();
5622
5623 if (off == (bfd_vma) -1)
5624 {
5625 bfd_vma plt_index;
5626
5627 /* We can't use h->got.offset here to save state, or
5628 even just remember the offset, as finish_dynamic_symbol
5629 would use that as offset into .got. */
5630
5631 if (globals->root.splt != NULL)
5632 {
b1ee0cc4
WN
5633 plt_index = ((h->plt.offset - globals->plt_header_size) /
5634 globals->plt_entry_size);
1419bbe5
WN
5635 off = (plt_index + 3) * GOT_ENTRY_SIZE;
5636 base_got = globals->root.sgotplt;
5637 }
5638 else
5639 {
5640 plt_index = h->plt.offset / globals->plt_entry_size;
5641 off = plt_index * GOT_ENTRY_SIZE;
5642 base_got = globals->root.igotplt;
5643 }
5644
5645 if (h->dynindx == -1
5646 || h->forced_local
5647 || info->symbolic)
5648 {
5649 /* This references the local definition. We must
5650 initialize this entry in the global offset table.
5651 Since the offset must always be a multiple of 8,
5652 we use the least significant bit to record
5653 whether we have initialized it already.
5654
5655 When doing a dynamic link, we create a .rela.got
5656 relocation entry to initialize the value. This
5657 is done in the finish_dynamic_symbol routine. */
5658 if ((off & 1) != 0)
5659 off &= ~1;
5660 else
5661 {
5662 bfd_put_NN (output_bfd, value,
5663 base_got->contents + off);
5664 /* Note that this is harmless as -1 | 1 still is -1. */
5665 h->got.offset |= 1;
5666 }
5667 }
5668 value = (base_got->output_section->vma
5669 + base_got->output_offset + off);
5670 }
5671 else
5672 value = aarch64_calculate_got_entry_vma (h, globals, info,
5673 value, output_bfd,
5674 unresolved_reloc_p);
a0becb89 5675
2aff25ba
JW
5676 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
5677 addend = (globals->root.sgot->output_section->vma
5678 + globals->root.sgot->output_offset);
a0becb89 5679
652afeef
TC
5680 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5681 place, value,
99ad26cb 5682 addend, weak_undef_p);
1419bbe5 5683 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type, howto, value);
1419bbe5 5684 case BFD_RELOC_AARCH64_ADD_LO12:
ce336788 5685 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
1419bbe5
WN
5686 break;
5687 }
5688 }
5689
f657f8c4 5690 skip_ifunc:
ddb7fd0f
L
5691 resolved_to_zero = (h != NULL
5692 && UNDEFWEAK_NO_DYNAMIC_RELOC (info, h));
5693
a6bb11b2 5694 switch (bfd_r_type)
a06ea964 5695 {
a6bb11b2 5696 case BFD_RELOC_AARCH64_NONE:
0484b454 5697 case BFD_RELOC_AARCH64_TLSDESC_ADD:
a6bb11b2 5698 case BFD_RELOC_AARCH64_TLSDESC_CALL:
0484b454 5699 case BFD_RELOC_AARCH64_TLSDESC_LDR:
a06ea964
NC
5700 *unresolved_reloc_p = FALSE;
5701 return bfd_reloc_ok;
5702
a6bb11b2 5703 case BFD_RELOC_AARCH64_NN:
a06ea964
NC
5704
5705 /* When generating a shared object or relocatable executable, these
07d6d2b8
AM
5706 relocations are copied into the output file to be resolved at
5707 run time. */
6353d82b
JW
5708 if (((bfd_link_pic (info)
5709 || globals->root.is_relocatable_executable)
5710 && (input_section->flags & SEC_ALLOC)
5711 && (h == NULL
ddb7fd0f
L
5712 || (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
5713 && !resolved_to_zero)
6353d82b
JW
5714 || h->root.type != bfd_link_hash_undefweak))
5715 /* Or we are creating an executable, we may need to keep relocations
5716 for symbols satisfied by a dynamic library if we manage to avoid
5717 copy relocs for the symbol. */
5718 || (ELIMINATE_COPY_RELOCS
5719 && !bfd_link_pic (info)
5720 && h != NULL
5721 && (input_section->flags & SEC_ALLOC)
5722 && h->dynindx != -1
5723 && !h->non_got_ref
5724 && ((h->def_dynamic
5725 && !h->def_regular)
5726 || h->root.type == bfd_link_hash_undefweak
5727 || h->root.type == bfd_link_hash_undefined)))
a06ea964
NC
5728 {
5729 Elf_Internal_Rela outrel;
5730 bfd_byte *loc;
5731 bfd_boolean skip, relocate;
5732 asection *sreloc;
5733
5734 *unresolved_reloc_p = FALSE;
5735
a06ea964
NC
5736 skip = FALSE;
5737 relocate = FALSE;
5738
5739 outrel.r_addend = signed_addend;
5740 outrel.r_offset =
5741 _bfd_elf_section_offset (output_bfd, info, input_section,
5742 rel->r_offset);
5743 if (outrel.r_offset == (bfd_vma) - 1)
5744 skip = TRUE;
5745 else if (outrel.r_offset == (bfd_vma) - 2)
5746 {
5747 skip = TRUE;
5748 relocate = TRUE;
5749 }
0c1ded8d
RL
5750 else if (abs_symbol_p)
5751 {
5752 /* Local absolute symbol. */
5753 skip = (h->forced_local || (h->dynindx == -1));
5754 relocate = skip;
5755 }
a06ea964
NC
5756
5757 outrel.r_offset += (input_section->output_section->vma
5758 + input_section->output_offset);
5759
5760 if (skip)
5761 memset (&outrel, 0, sizeof outrel);
5762 else if (h != NULL
5763 && h->dynindx != -1
0e1862bb 5764 && (!bfd_link_pic (info)
0c1ded8d 5765 || !(bfd_link_pie (info) || SYMBOLIC_BIND (info, h))
0e1862bb 5766 || !h->def_regular))
cec5225b 5767 outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
a06ea964
NC
5768 else
5769 {
5770 int symbol;
5771
5772 /* On SVR4-ish systems, the dynamic loader cannot
5773 relocate the text and data segments independently,
5774 so the symbol does not matter. */
5775 symbol = 0;
1f56df9d 5776 relocate = globals->no_apply_dynamic_relocs ? FALSE : TRUE;
a6bb11b2 5777 outrel.r_info = ELFNN_R_INFO (symbol, AARCH64_R (RELATIVE));
a06ea964
NC
5778 outrel.r_addend += value;
5779 }
5780
1419bbe5
WN
5781 sreloc = elf_section_data (input_section)->sreloc;
5782 if (sreloc == NULL || sreloc->contents == NULL)
5783 return bfd_reloc_notsupported;
5784
5785 loc = sreloc->contents + sreloc->reloc_count++ * RELOC_SIZE (globals);
cec5225b 5786 bfd_elfNN_swap_reloca_out (output_bfd, &outrel, loc);
a06ea964 5787
1419bbe5 5788 if (sreloc->reloc_count * RELOC_SIZE (globals) > sreloc->size)
a06ea964
NC
5789 {
5790 /* Sanity to check that we have previously allocated
5791 sufficient space in the relocation section for the
5792 number of relocations we actually want to emit. */
5793 abort ();
5794 }
5795
5796 /* If this reloc is against an external symbol, we do not want to
5797 fiddle with the addend. Otherwise, we need to include the symbol
5798 value so that it becomes an addend for the dynamic reloc. */
5799 if (!relocate)
5800 return bfd_reloc_ok;
5801
5802 return _bfd_final_link_relocate (howto, input_bfd, input_section,
5803 contents, rel->r_offset, value,
5804 signed_addend);
5805 }
5806 else
5807 value += signed_addend;
5808 break;
5809
7e057737
SP
5810 case BFD_RELOC_AARCH64_BRANCH19:
5811 case BFD_RELOC_AARCH64_TSTBR14:
5812 /* A conditional branch to an undefined weak symbol is converted to a
5813 branch to itself. */
5814 if (weak_undef_p && !via_plt_p)
5815 {
5816 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5817 place, value,
5818 signed_addend,
5819 weak_undef_p);
5820 break;
5821 }
5822 /* Fall through. */
a6bb11b2 5823 case BFD_RELOC_AARCH64_CALL26:
ce336788 5824 case BFD_RELOC_AARCH64_JUMP26:
a06ea964
NC
5825 {
5826 asection *splt = globals->root.splt;
a06ea964
NC
5827
5828 /* A call to an undefined weak symbol is converted to a jump to
5829 the next instruction unless a PLT entry will be created.
5830 The jump to the next instruction is optimized as a NOP.
5831 Do the same for local undefined symbols. */
5832 if (weak_undef_p && ! via_plt_p)
5833 {
5834 bfd_putl32 (INSN_NOP, hit_data);
5835 return bfd_reloc_ok;
5836 }
5837
5838 /* If the call goes through a PLT entry, make sure to
5839 check distance to the right destination address. */
5840 if (via_plt_p)
07f9ddfe
JW
5841 value = (splt->output_section->vma
5842 + splt->output_offset + h->plt.offset);
5843
5844 /* Check if a stub has to be inserted because the destination
5845 is too far away. */
5846 struct elf_aarch64_stub_hash_entry *stub_entry = NULL;
2f340668
JW
5847
5848 /* If the branch destination is directed to plt stub, "value" will be
5849 the final destination, otherwise we should plus signed_addend, it may
5850 contain non-zero value, for example call to local function symbol
5851 which are turned into "sec_sym + sec_off", and sec_off is kept in
5852 signed_addend. */
5853 if (! aarch64_valid_branch_p (via_plt_p ? value : value + signed_addend,
5854 place))
07f9ddfe
JW
5855 /* The target is out of reach, so redirect the branch to
5856 the local stub for this function. */
5857 stub_entry = elfNN_aarch64_get_stub_entry (input_section, sym_sec, h,
5858 rel, globals);
5859 if (stub_entry != NULL)
2f340668
JW
5860 {
5861 value = (stub_entry->stub_offset
5862 + stub_entry->stub_sec->output_offset
5863 + stub_entry->stub_sec->output_section->vma);
5864
5865 /* We have redirected the destination to stub entry address,
5866 so ignore any addend record in the original rela entry. */
5867 signed_addend = 0;
5868 }
a06ea964 5869 }
652afeef
TC
5870 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5871 place, value,
caed7120 5872 signed_addend, weak_undef_p);
07f9ddfe 5873 *unresolved_reloc_p = FALSE;
a06ea964
NC
5874 break;
5875
dcbd20eb
JW
5876 case BFD_RELOC_AARCH64_16_PCREL:
5877 case BFD_RELOC_AARCH64_32_PCREL:
5878 case BFD_RELOC_AARCH64_64_PCREL:
ce336788
JW
5879 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
5880 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
5881 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
5882 case BFD_RELOC_AARCH64_LD_LO19_PCREL:
1daf502a
RL
5883 case BFD_RELOC_AARCH64_MOVW_PREL_G0:
5884 case BFD_RELOC_AARCH64_MOVW_PREL_G0_NC:
5885 case BFD_RELOC_AARCH64_MOVW_PREL_G1:
5886 case BFD_RELOC_AARCH64_MOVW_PREL_G1_NC:
5887 case BFD_RELOC_AARCH64_MOVW_PREL_G2:
5888 case BFD_RELOC_AARCH64_MOVW_PREL_G2_NC:
5889 case BFD_RELOC_AARCH64_MOVW_PREL_G3:
0e1862bb 5890 if (bfd_link_pic (info)
dcbd20eb
JW
5891 && (input_section->flags & SEC_ALLOC) != 0
5892 && (input_section->flags & SEC_READONLY) != 0
d68f1976 5893 && !SYMBOL_REFERENCES_LOCAL (info, h))
dcbd20eb
JW
5894 {
5895 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
5896
4eca0228 5897 _bfd_error_handler
695344c0 5898 /* xgettext:c-format */
871b3ab2 5899 (_("%pB: relocation %s against symbol `%s' which may bind "
d68f1976
JW
5900 "externally can not be used when making a shared object; "
5901 "recompile with -fPIC"),
dcbd20eb
JW
5902 input_bfd, elfNN_aarch64_howto_table[howto_index].name,
5903 h->root.root.string);
5904 bfd_set_error (bfd_error_bad_value);
1d75a8e2 5905 return bfd_reloc_notsupported;
dcbd20eb 5906 }
1a0670f3 5907 /* Fall through. */
dcbd20eb 5908
a6bb11b2 5909 case BFD_RELOC_AARCH64_16:
92d77487
RL
5910#if ARCH_SIZE == 64
5911 case BFD_RELOC_AARCH64_32:
5912#endif
a6bb11b2 5913 case BFD_RELOC_AARCH64_ADD_LO12:
ce336788 5914 case BFD_RELOC_AARCH64_LDST128_LO12:
a6bb11b2
YZ
5915 case BFD_RELOC_AARCH64_LDST16_LO12:
5916 case BFD_RELOC_AARCH64_LDST32_LO12:
5917 case BFD_RELOC_AARCH64_LDST64_LO12:
ce336788 5918 case BFD_RELOC_AARCH64_LDST8_LO12:
a6bb11b2
YZ
5919 case BFD_RELOC_AARCH64_MOVW_G0:
5920 case BFD_RELOC_AARCH64_MOVW_G0_NC:
ce336788 5921 case BFD_RELOC_AARCH64_MOVW_G0_S:
a6bb11b2
YZ
5922 case BFD_RELOC_AARCH64_MOVW_G1:
5923 case BFD_RELOC_AARCH64_MOVW_G1_NC:
ce336788 5924 case BFD_RELOC_AARCH64_MOVW_G1_S:
a6bb11b2
YZ
5925 case BFD_RELOC_AARCH64_MOVW_G2:
5926 case BFD_RELOC_AARCH64_MOVW_G2_NC:
ce336788 5927 case BFD_RELOC_AARCH64_MOVW_G2_S:
a6bb11b2 5928 case BFD_RELOC_AARCH64_MOVW_G3:
652afeef
TC
5929 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5930 place, value,
caed7120 5931 signed_addend, weak_undef_p);
a06ea964
NC
5932 break;
5933
a6bb11b2
YZ
5934 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
5935 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7018c030 5936 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
ce336788 5937 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
99ad26cb 5938 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
ce336788 5939 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
2aff25ba
JW
5940 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
5941 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
5942 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
a06ea964
NC
5943 if (globals->root.sgot == NULL)
5944 BFD_ASSERT (h != NULL);
5945
ff07562f 5946 relative_reloc = FALSE;
a06ea964
NC
5947 if (h != NULL)
5948 {
99ad26cb 5949 bfd_vma addend = 0;
ff07562f
JW
5950
5951 /* If a symbol is not dynamic and is not undefined weak, bind it
5952 locally and generate a RELATIVE relocation under PIC mode.
5953
5954 NOTE: one symbol may be referenced by several relocations, we
5955 should only generate one RELATIVE relocation for that symbol.
5956 Therefore, check GOT offset mark first. */
5957 if (h->dynindx == -1
5958 && !h->forced_local
5959 && h->root.type != bfd_link_hash_undefweak
5960 && bfd_link_pic (info)
5961 && !symbol_got_offset_mark_p (input_bfd, h, r_symndx))
5962 relative_reloc = TRUE;
5963
a06ea964
NC
5964 value = aarch64_calculate_got_entry_vma (h, globals, info, value,
5965 output_bfd,
5966 unresolved_reloc_p);
ff07562f
JW
5967 /* Record the GOT entry address which will be used when generating
5968 RELATIVE relocation. */
5969 if (relative_reloc)
5970 got_entry_addr = value;
5971
2aff25ba 5972 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
99ad26cb
JW
5973 addend = (globals->root.sgot->output_section->vma
5974 + globals->root.sgot->output_offset);
652afeef
TC
5975 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
5976 place, value,
99ad26cb 5977 addend, weak_undef_p);
a06ea964 5978 }
b53b1bed
JW
5979 else
5980 {
99ad26cb 5981 bfd_vma addend = 0;
b53b1bed
JW
5982 struct elf_aarch64_local_symbol *locals
5983 = elf_aarch64_locals (input_bfd);
5984
5985 if (locals == NULL)
5986 {
5987 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
4eca0228 5988 _bfd_error_handler
695344c0 5989 /* xgettext:c-format */
90b6238f 5990 (_("%pB: local symbol descriptor table be NULL when applying "
b53b1bed
JW
5991 "relocation %s against local symbol"),
5992 input_bfd, elfNN_aarch64_howto_table[howto_index].name);
5993 abort ();
5994 }
5995
5996 off = symbol_got_offset (input_bfd, h, r_symndx);
5997 base_got = globals->root.sgot;
ff07562f
JW
5998 got_entry_addr = (base_got->output_section->vma
5999 + base_got->output_offset + off);
b53b1bed
JW
6000
6001 if (!symbol_got_offset_mark_p (input_bfd, h, r_symndx))
6002 {
6003 bfd_put_64 (output_bfd, value, base_got->contents + off);
6004
ff07562f
JW
6005 /* For local symbol, we have done absolute relocation in static
6006 linking stage. While for shared library, we need to update the
6007 content of GOT entry according to the shared object's runtime
6008 base address. So, we need to generate a R_AARCH64_RELATIVE reloc
6009 for dynamic linker. */
0e1862bb 6010 if (bfd_link_pic (info))
ff07562f 6011 relative_reloc = TRUE;
b53b1bed
JW
6012
6013 symbol_got_offset_mark (input_bfd, h, r_symndx);
6014 }
6015
6016 /* Update the relocation value to GOT entry addr as we have transformed
6017 the direct data access into indirect data access through GOT. */
6018 value = got_entry_addr;
99ad26cb 6019
2aff25ba 6020 if (aarch64_relocation_aginst_gp_p (bfd_r_type))
99ad26cb
JW
6021 addend = base_got->output_section->vma + base_got->output_offset;
6022
652afeef
TC
6023 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6024 place, value,
99ad26cb 6025 addend, weak_undef_p);
b53b1bed 6026 }
ff07562f
JW
6027
6028 if (relative_reloc)
6029 {
6030 asection *s;
6031 Elf_Internal_Rela outrel;
6032
6033 s = globals->root.srelgot;
6034 if (s == NULL)
6035 abort ();
6036
6037 outrel.r_offset = got_entry_addr;
6038 outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
6039 outrel.r_addend = orig_value;
6040 elf_append_rela (output_bfd, s, &outrel);
6041 }
a2e1db00
RL
6042 break;
6043
ce336788 6044 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a6bb11b2 6045 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3c12b054 6046 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
a6bb11b2 6047 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a6bb11b2 6048 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
ce336788 6049 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
043bf05a 6050 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
73f925cc 6051 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
f69e4920 6052 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
77a69ff8 6053 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
a06ea964
NC
6054 if (globals->root.sgot == NULL)
6055 return bfd_reloc_notsupported;
6056
6057 value = (symbol_got_offset (input_bfd, h, r_symndx)
6058 + globals->root.sgot->output_section->vma
f44a1f8e 6059 + globals->root.sgot->output_offset);
a06ea964 6060
652afeef
TC
6061 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6062 place, value,
caed7120 6063 0, weak_undef_p);
a06ea964
NC
6064 *unresolved_reloc_p = FALSE;
6065 break;
6066
7ba7cfe4 6067 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
94facae3 6068 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
3b957e5b
RL
6069 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
6070 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
94facae3
RL
6071 if (globals->root.sgot == NULL)
6072 return bfd_reloc_notsupported;
6073
6074 value = symbol_got_offset (input_bfd, h, r_symndx);
652afeef
TC
6075 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6076 place, value,
94facae3
RL
6077 0, weak_undef_p);
6078 *unresolved_reloc_p = FALSE;
6079 break;
6080
6ffe9a1b 6081 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12:
40fbed84 6082 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12:
753999c1 6083 case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC:
07c9aa07
JW
6084 case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12:
6085 case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC:
6086 case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12:
6087 case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC:
6088 case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12:
6089 case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC:
6090 case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12:
6091 case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC:
6ffe9a1b
JW
6092 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0:
6093 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC:
6094 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1:
6095 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC:
6096 case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2:
652afeef
TC
6097 {
6098 if (!(weak_undef_p || elf_hash_table (info)->tls_sec))
6099 {
6100 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
6101 _bfd_error_handler
6102 /* xgettext:c-format */
6103 (_("%pB: TLS relocation %s against undefined symbol `%s'"),
6104 input_bfd, elfNN_aarch64_howto_table[howto_index].name,
6105 h->root.root.string);
6106 bfd_set_error (bfd_error_bad_value);
6107 return bfd_reloc_notsupported;
6108 }
6109
6110 bfd_vma def_value
6111 = weak_undef_p ? 0 : signed_addend - dtpoff_base (info);
6112 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6113 place, value,
6114 def_value, weak_undef_p);
6115 break;
6116 }
40fbed84 6117
a6bb11b2
YZ
6118 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
6119 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
6120 case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
e04ef022
RL
6121 case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12:
6122 case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12_NC:
6123 case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12:
6124 case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12_NC:
6125 case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12:
6126 case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12_NC:
6127 case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12:
6128 case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12_NC:
a6bb11b2
YZ
6129 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
6130 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
6131 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
6132 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
6133 case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
652afeef
TC
6134 {
6135 if (!(weak_undef_p || elf_hash_table (info)->tls_sec))
6136 {
6137 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
6138 _bfd_error_handler
6139 /* xgettext:c-format */
6140 (_("%pB: TLS relocation %s against undefined symbol `%s'"),
6141 input_bfd, elfNN_aarch64_howto_table[howto_index].name,
6142 h->root.root.string);
6143 bfd_set_error (bfd_error_bad_value);
6144 return bfd_reloc_notsupported;
6145 }
6146
6147 bfd_vma def_value
6148 = weak_undef_p ? 0 : signed_addend - tpoff_base (info);
6149 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6150 place, value,
6151 def_value, weak_undef_p);
6152 *unresolved_reloc_p = FALSE;
6153 break;
6154 }
a06ea964 6155
f955cccf 6156 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 6157 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
389b8029 6158 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
a6bb11b2 6159 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
f955cccf 6160 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
1ada945d 6161 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
a06ea964
NC
6162 if (globals->root.sgot == NULL)
6163 return bfd_reloc_notsupported;
a06ea964
NC
6164 value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
6165 + globals->root.sgotplt->output_section->vma
f44a1f8e 6166 + globals->root.sgotplt->output_offset
a06ea964
NC
6167 + globals->sgotplt_jump_table_size);
6168
652afeef
TC
6169 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6170 place, value,
caed7120 6171 0, weak_undef_p);
a06ea964
NC
6172 *unresolved_reloc_p = FALSE;
6173 break;
6174
0484b454
RL
6175 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
6176 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
6177 if (globals->root.sgot == NULL)
6178 return bfd_reloc_notsupported;
6179
6180 value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
6181 + globals->root.sgotplt->output_section->vma
6182 + globals->root.sgotplt->output_offset
6183 + globals->sgotplt_jump_table_size);
6184
6185 value -= (globals->root.sgot->output_section->vma
6186 + globals->root.sgot->output_offset);
6187
652afeef
TC
6188 value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
6189 place, value,
0484b454
RL
6190 0, weak_undef_p);
6191 *unresolved_reloc_p = FALSE;
6192 break;
6193
a06ea964
NC
6194 default:
6195 return bfd_reloc_notsupported;
6196 }
6197
6198 if (saved_addend)
6199 *saved_addend = value;
6200
6201 /* Only apply the final relocation in a sequence. */
6202 if (save_addend)
6203 return bfd_reloc_continue;
6204
caed7120
YZ
6205 return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
6206 howto, value);
a06ea964
NC
6207}
6208
2d0ca824
YN
6209/* LP64 and ILP32 operates on x- and w-registers respectively.
6210 Next definitions take into account the difference between
6211 corresponding machine codes. R means x-register if the target
6212 arch is LP64, and w-register if the target is ILP32. */
6213
6214#if ARCH_SIZE == 64
6215# define add_R0_R0 (0x91000000)
6216# define add_R0_R0_R1 (0x8b000020)
6217# define add_R0_R1 (0x91400020)
6218# define ldr_R0 (0x58000000)
6219# define ldr_R0_mask(i) (i & 0xffffffe0)
6220# define ldr_R0_x0 (0xf9400000)
6221# define ldr_hw_R0 (0xf2a00000)
6222# define movk_R0 (0xf2800000)
6223# define movz_R0 (0xd2a00000)
6224# define movz_hw_R0 (0xd2c00000)
6225#else /*ARCH_SIZE == 32 */
6226# define add_R0_R0 (0x11000000)
6227# define add_R0_R0_R1 (0x0b000020)
6228# define add_R0_R1 (0x11400020)
6229# define ldr_R0 (0x18000000)
6230# define ldr_R0_mask(i) (i & 0xbfffffe0)
6231# define ldr_R0_x0 (0xb9400000)
6232# define ldr_hw_R0 (0x72a00000)
6233# define movk_R0 (0x72800000)
6234# define movz_R0 (0x52a00000)
6235# define movz_hw_R0 (0x52c00000)
6236#endif
6237
9fca35fc
TC
6238/* Structure to hold payload for _bfd_aarch64_erratum_843419_clear_stub,
6239 it is used to identify the stub information to reset. */
6240
6241struct erratum_843419_branch_to_stub_clear_data
6242{
6243 bfd_vma adrp_offset;
6244 asection *output_section;
6245};
6246
6247/* Clear the erratum information for GEN_ENTRY if the ADRP_OFFSET and
6248 section inside IN_ARG matches. The clearing is done by setting the
6249 stub_type to none. */
6250
6251static bfd_boolean
6252_bfd_aarch64_erratum_843419_clear_stub (struct bfd_hash_entry *gen_entry,
6253 void *in_arg)
6254{
6255 struct elf_aarch64_stub_hash_entry *stub_entry
6256 = (struct elf_aarch64_stub_hash_entry *) gen_entry;
6257 struct erratum_843419_branch_to_stub_clear_data *data
6258 = (struct erratum_843419_branch_to_stub_clear_data *) in_arg;
6259
6260 if (stub_entry->target_section != data->output_section
6261 || stub_entry->stub_type != aarch64_stub_erratum_843419_veneer
6262 || stub_entry->adrp_offset != data->adrp_offset)
6263 return TRUE;
6264
6265 /* Change the stub type instead of removing the entry, removing from the hash
6266 table would be slower and we have already reserved the memory for the entry
6267 so there wouldn't be much gain. Changing the stub also keeps around a
6268 record of what was there before. */
6269 stub_entry->stub_type = aarch64_stub_none;
6270
6271 /* We're done and there could have been only one matching stub at that
6272 particular offset, so abort further traversal. */
6273 return FALSE;
6274}
6275
6276/* TLS Relaxations may relax an adrp sequence that matches the erratum 843419
6277 sequence. In this case the erratum no longer applies and we need to remove
6278 the entry from the pending stub generation. This clears matching adrp insn
6279 at ADRP_OFFSET in INPUT_SECTION in the stub table defined in GLOBALS. */
6280
6281static void
6282clear_erratum_843419_entry (struct elf_aarch64_link_hash_table *globals,
6283 bfd_vma adrp_offset, asection *input_section)
6284{
739b5c9c 6285 if (globals->fix_erratum_843419 & ERRAT_ADRP)
9fca35fc
TC
6286 {
6287 struct erratum_843419_branch_to_stub_clear_data data;
6288 data.adrp_offset = adrp_offset;
6289 data.output_section = input_section;
6290
6291 bfd_hash_traverse (&globals->stub_hash_table,
6292 _bfd_aarch64_erratum_843419_clear_stub, &data);
6293 }
6294}
6295
a06ea964
NC
6296/* Handle TLS relaxations. Relaxing is possible for symbols that use
6297 R_AARCH64_TLSDESC_ADR_{PAGE, LD64_LO12_NC, ADD_LO12_NC} during a static
6298 link.
6299
6300 Return bfd_reloc_ok if we're done, bfd_reloc_continue if the caller
6301 is to then call final_link_relocate. Return other values in the
6302 case of error. */
6303
6304static bfd_reloc_status_type
cec5225b 6305elfNN_aarch64_tls_relax (struct elf_aarch64_link_hash_table *globals,
9fca35fc
TC
6306 bfd *input_bfd, asection *input_section,
6307 bfd_byte *contents, Elf_Internal_Rela *rel,
6308 struct elf_link_hash_entry *h)
a06ea964
NC
6309{
6310 bfd_boolean is_local = h == NULL;
cec5225b 6311 unsigned int r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC
6312 unsigned long insn;
6313
6314 BFD_ASSERT (globals && input_bfd && contents && rel);
6315
0aa13fee 6316 switch (elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type))
a06ea964 6317 {
a6bb11b2 6318 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
ce336788 6319 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
a06ea964
NC
6320 if (is_local)
6321 {
6322 /* GD->LE relaxation:
2d0ca824 6323 adrp x0, :tlsgd:var => movz R0, :tprel_g1:var
a06ea964 6324 or
2d0ca824
YN
6325 adrp x0, :tlsdesc:var => movz R0, :tprel_g1:var
6326
6327 Where R is x for LP64, and w for ILP32. */
6328 bfd_putl32 (movz_R0, contents + rel->r_offset);
9fca35fc
TC
6329 /* We have relaxed the adrp into a mov, we may have to clear any
6330 pending erratum fixes. */
6331 clear_erratum_843419_entry (globals, rel->r_offset, input_section);
a06ea964
NC
6332 return bfd_reloc_continue;
6333 }
6334 else
6335 {
6336 /* GD->IE relaxation:
6337 adrp x0, :tlsgd:var => adrp x0, :gottprel:var
6338 or
6339 adrp x0, :tlsdesc:var => adrp x0, :gottprel:var
6340 */
a06ea964
NC
6341 return bfd_reloc_continue;
6342 }
6343
389b8029
MS
6344 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
6345 BFD_ASSERT (0);
6346 break;
6347
1ada945d
MS
6348 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
6349 if (is_local)
6350 {
6351 /* Tiny TLSDESC->LE relaxation:
07d6d2b8
AM
6352 ldr x1, :tlsdesc:var => movz R0, #:tprel_g1:var
6353 adr x0, :tlsdesc:var => movk R0, #:tprel_g0_nc:var
1ada945d 6354 .tlsdesccall var
07d6d2b8 6355 blr x1 => nop
2d0ca824
YN
6356
6357 Where R is x for LP64, and w for ILP32. */
1ada945d
MS
6358 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSDESC_ADR_PREL21));
6359 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (TLSDESC_CALL));
6360
6361 rel[1].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
6362 AARCH64_R (TLSLE_MOVW_TPREL_G0_NC));
6363 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6364
2d0ca824
YN
6365 bfd_putl32 (movz_R0, contents + rel->r_offset);
6366 bfd_putl32 (movk_R0, contents + rel->r_offset + 4);
1ada945d
MS
6367 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 8);
6368 return bfd_reloc_continue;
6369 }
6370 else
6371 {
6372 /* Tiny TLSDESC->IE relaxation:
07d6d2b8
AM
6373 ldr x1, :tlsdesc:var => ldr x0, :gottprel:var
6374 adr x0, :tlsdesc:var => nop
1ada945d 6375 .tlsdesccall var
07d6d2b8 6376 blr x1 => nop
1ada945d
MS
6377 */
6378 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSDESC_ADR_PREL21));
6379 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (TLSDESC_CALL));
6380
6381 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6382 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6383
2d0ca824 6384 bfd_putl32 (ldr_R0, contents + rel->r_offset);
1ada945d
MS
6385 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 4);
6386 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 8);
6387 return bfd_reloc_continue;
6388 }
6389
3c12b054
MS
6390 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
6391 if (is_local)
6392 {
6393 /* Tiny GD->LE relaxation:
07d6d2b8
AM
6394 adr x0, :tlsgd:var => mrs x1, tpidr_el0
6395 bl __tls_get_addr => add R0, R1, #:tprel_hi12:x, lsl #12
6396 nop => add R0, R0, #:tprel_lo12_nc:x
2d0ca824
YN
6397
6398 Where R is x for LP64, and x for Ilp32. */
3c12b054
MS
6399
6400 /* First kill the tls_get_addr reloc on the bl instruction. */
6401 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6402
6403 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 0);
2d0ca824
YN
6404 bfd_putl32 (add_R0_R1, contents + rel->r_offset + 4);
6405 bfd_putl32 (add_R0_R0, contents + rel->r_offset + 8);
3c12b054
MS
6406
6407 rel[1].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
6408 AARCH64_R (TLSLE_ADD_TPREL_LO12_NC));
6409 rel[1].r_offset = rel->r_offset + 8;
6410
6411 /* Move the current relocation to the second instruction in
6412 the sequence. */
6413 rel->r_offset += 4;
6414 rel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
6415 AARCH64_R (TLSLE_ADD_TPREL_HI12));
6416 return bfd_reloc_continue;
6417 }
6418 else
6419 {
6420 /* Tiny GD->IE relaxation:
07d6d2b8
AM
6421 adr x0, :tlsgd:var => ldr R0, :gottprel:var
6422 bl __tls_get_addr => mrs x1, tpidr_el0
6423 nop => add R0, R0, R1
2d0ca824
YN
6424
6425 Where R is x for LP64, and w for Ilp32. */
3c12b054
MS
6426
6427 /* First kill the tls_get_addr reloc on the bl instruction. */
6428 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6429 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6430
2d0ca824 6431 bfd_putl32 (ldr_R0, contents + rel->r_offset);
3c12b054 6432 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
2d0ca824 6433 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 8);
3c12b054
MS
6434 return bfd_reloc_continue;
6435 }
6436
ac734732
RL
6437#if ARCH_SIZE == 64
6438 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
6439 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSGD_MOVW_G0_NC));
6440 BFD_ASSERT (rel->r_offset + 12 == rel[2].r_offset);
6441 BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (CALL26));
6442
6443 if (is_local)
6444 {
6445 /* Large GD->LE relaxation:
07d6d2b8 6446 movz x0, #:tlsgd_g1:var => movz x0, #:tprel_g2:var, lsl #32
ac734732 6447 movk x0, #:tlsgd_g0_nc:var => movk x0, #:tprel_g1_nc:var, lsl #16
07d6d2b8
AM
6448 add x0, gp, x0 => movk x0, #:tprel_g0_nc:var
6449 bl __tls_get_addr => mrs x1, tpidr_el0
6450 nop => add x0, x0, x1
ac734732
RL
6451 */
6452 rel[2].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
6453 AARCH64_R (TLSLE_MOVW_TPREL_G0_NC));
6454 rel[2].r_offset = rel->r_offset + 8;
6455
2d0ca824
YN
6456 bfd_putl32 (movz_hw_R0, contents + rel->r_offset + 0);
6457 bfd_putl32 (ldr_hw_R0, contents + rel->r_offset + 4);
6458 bfd_putl32 (movk_R0, contents + rel->r_offset + 8);
ac734732 6459 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 12);
2d0ca824 6460 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 16);
ac734732
RL
6461 }
6462 else
6463 {
6464 /* Large GD->IE relaxation:
07d6d2b8 6465 movz x0, #:tlsgd_g1:var => movz x0, #:gottprel_g1:var, lsl #16
ac734732 6466 movk x0, #:tlsgd_g0_nc:var => movk x0, #:gottprel_g0_nc:var
07d6d2b8
AM
6467 add x0, gp, x0 => ldr x0, [gp, x0]
6468 bl __tls_get_addr => mrs x1, tpidr_el0
6469 nop => add x0, x0, x1
ac734732
RL
6470 */
6471 rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6472 bfd_putl32 (0xd2a80000, contents + rel->r_offset + 0);
2d0ca824 6473 bfd_putl32 (ldr_R0, contents + rel->r_offset + 8);
ac734732 6474 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 12);
2d0ca824 6475 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 16);
ac734732
RL
6476 }
6477 return bfd_reloc_continue;
6478
6479 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
6480 return bfd_reloc_continue;
6481#endif
6482
043bf05a
MS
6483 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
6484 return bfd_reloc_continue;
6485
a6bb11b2 6486 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
a06ea964
NC
6487 if (is_local)
6488 {
6489 /* GD->LE relaxation:
6490 ldr xd, [x0, #:tlsdesc_lo12:var] => movk x0, :tprel_g0_nc:var
2d0ca824
YN
6491
6492 Where R is x for lp64 mode, and w for ILP32 mode. */
6493 bfd_putl32 (movk_R0, contents + rel->r_offset);
a06ea964
NC
6494 return bfd_reloc_continue;
6495 }
6496 else
6497 {
6498 /* GD->IE relaxation:
2d0ca824
YN
6499 ldr xd, [x0, #:tlsdesc_lo12:var] => ldr R0, [x0, #:gottprel_lo12:var]
6500
6501 Where R is x for lp64 mode, and w for ILP32 mode. */
a06ea964 6502 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6503 bfd_putl32 (ldr_R0_mask (insn), contents + rel->r_offset);
a06ea964
NC
6504 return bfd_reloc_continue;
6505 }
6506
a6bb11b2 6507 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a06ea964
NC
6508 if (is_local)
6509 {
6510 /* GD->LE relaxation
07d6d2b8
AM
6511 add x0, #:tlsgd_lo12:var => movk R0, :tprel_g0_nc:var
6512 bl __tls_get_addr => mrs x1, tpidr_el0
6513 nop => add R0, R1, R0
2d0ca824
YN
6514
6515 Where R is x for lp64 mode, and w for ILP32 mode. */
a06ea964
NC
6516
6517 /* First kill the tls_get_addr reloc on the bl instruction. */
6518 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
cec5225b 6519 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
a06ea964 6520
2d0ca824 6521 bfd_putl32 (movk_R0, contents + rel->r_offset);
a06ea964 6522 bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
2d0ca824 6523 bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 8);
a06ea964
NC
6524 return bfd_reloc_continue;
6525 }
6526 else
6527 {
6528 /* GD->IE relaxation
07d6d2b8
AM
6529 ADD x0, #:tlsgd_lo12:var => ldr R0, [x0, #:gottprel_lo12:var]
6530 BL __tls_get_addr => mrs x1, tpidr_el0
a06ea964 6531 R_AARCH64_CALL26
07d6d2b8 6532 NOP => add R0, R1, R0
5cd1d8bc
YN
6533
6534 Where R is x for lp64 mode, and w for ilp32 mode. */
a06ea964 6535
a6bb11b2 6536 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
a06ea964
NC
6537
6538 /* Remove the relocation on the BL instruction. */
cec5225b 6539 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
a06ea964 6540
a06ea964
NC
6541 /* We choose to fixup the BL and NOP instructions using the
6542 offset from the second relocation to allow flexibility in
6543 scheduling instructions between the ADD and BL. */
2d0ca824 6544 bfd_putl32 (ldr_R0_x0, contents + rel->r_offset);
5cd1d8bc 6545 bfd_putl32 (0xd53bd041, contents + rel[1].r_offset);
2d0ca824 6546 bfd_putl32 (add_R0_R0_R1, contents + rel[1].r_offset + 4);
a06ea964
NC
6547 return bfd_reloc_continue;
6548 }
6549
0484b454 6550 case BFD_RELOC_AARCH64_TLSDESC_ADD:
f955cccf 6551 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 6552 case BFD_RELOC_AARCH64_TLSDESC_CALL:
a06ea964 6553 /* GD->IE/LE relaxation:
07d6d2b8
AM
6554 add x0, x0, #:tlsdesc_lo12:var => nop
6555 blr xd => nop
a06ea964
NC
6556 */
6557 bfd_putl32 (INSN_NOP, contents + rel->r_offset);
6558 return bfd_reloc_ok;
6559
0484b454
RL
6560 case BFD_RELOC_AARCH64_TLSDESC_LDR:
6561 if (is_local)
6562 {
6563 /* GD->LE relaxation:
2d0ca824
YN
6564 ldr xd, [gp, xn] => movk R0, #:tprel_g0_nc:var
6565
6566 Where R is x for lp64 mode, and w for ILP32 mode. */
6567 bfd_putl32 (movk_R0, contents + rel->r_offset);
0484b454
RL
6568 return bfd_reloc_continue;
6569 }
6570 else
6571 {
6572 /* GD->IE relaxation:
2d0ca824
YN
6573 ldr xd, [gp, xn] => ldr R0, [gp, xn]
6574
6575 Where R is x for lp64 mode, and w for ILP32 mode. */
0484b454 6576 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6577 bfd_putl32 (ldr_R0_mask (insn), contents + rel->r_offset);
0484b454
RL
6578 return bfd_reloc_ok;
6579 }
6580
6581 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
6582 /* GD->LE relaxation:
2d0ca824 6583 movk xd, #:tlsdesc_off_g0_nc:var => movk R0, #:tprel_g1_nc:var, lsl #16
0484b454 6584 GD->IE relaxation:
2d0ca824
YN
6585 movk xd, #:tlsdesc_off_g0_nc:var => movk Rd, #:gottprel_g0_nc:var
6586
6587 Where R is x for lp64 mode, and w for ILP32 mode. */
0484b454 6588 if (is_local)
2d0ca824 6589 bfd_putl32 (ldr_hw_R0, contents + rel->r_offset);
0484b454
RL
6590 return bfd_reloc_continue;
6591
6592 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
6593 if (is_local)
6594 {
6595 /* GD->LE relaxation:
2d0ca824
YN
6596 movz xd, #:tlsdesc_off_g1:var => movz R0, #:tprel_g2:var, lsl #32
6597
6598 Where R is x for lp64 mode, and w for ILP32 mode. */
6599 bfd_putl32 (movz_hw_R0, contents + rel->r_offset);
0484b454
RL
6600 return bfd_reloc_continue;
6601 }
6602 else
6603 {
6604 /* GD->IE relaxation:
2d0ca824
YN
6605 movz xd, #:tlsdesc_off_g1:var => movz Rd, #:gottprel_g1:var, lsl #16
6606
6607 Where R is x for lp64 mode, and w for ILP32 mode. */
0484b454 6608 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6609 bfd_putl32 (movz_R0 | (insn & 0x1f), contents + rel->r_offset);
0484b454
RL
6610 return bfd_reloc_continue;
6611 }
6612
a6bb11b2 6613 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a06ea964 6614 /* IE->LE relaxation:
07d6d2b8 6615 adrp xd, :gottprel:var => movz Rd, :tprel_g1:var
2d0ca824
YN
6616
6617 Where R is x for lp64 mode, and w for ILP32 mode. */
a06ea964
NC
6618 if (is_local)
6619 {
6620 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6621 bfd_putl32 (movz_R0 | (insn & 0x1f), contents + rel->r_offset);
9fca35fc
TC
6622 /* We have relaxed the adrp into a mov, we may have to clear any
6623 pending erratum fixes. */
6624 clear_erratum_843419_entry (globals, rel->r_offset, input_section);
a06ea964
NC
6625 }
6626 return bfd_reloc_continue;
6627
a6bb11b2 6628 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
a06ea964 6629 /* IE->LE relaxation:
07d6d2b8 6630 ldr xd, [xm, #:gottprel_lo12:var] => movk Rd, :tprel_g0_nc:var
2d0ca824
YN
6631
6632 Where R is x for lp64 mode, and w for ILP32 mode. */
a06ea964
NC
6633 if (is_local)
6634 {
6635 insn = bfd_getl32 (contents + rel->r_offset);
2d0ca824 6636 bfd_putl32 (movk_R0 | (insn & 0x1f), contents + rel->r_offset);
a06ea964
NC
6637 }
6638 return bfd_reloc_continue;
6639
259364ad
JW
6640 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
6641 /* LD->LE relaxation (tiny):
6642 adr x0, :tlsldm:x => mrs x0, tpidr_el0
c1fc2d7e
YN
6643 bl __tls_get_addr => add R0, R0, TCB_SIZE
6644
6645 Where R is x for lp64 mode, and w for ilp32 mode. */
259364ad
JW
6646 if (is_local)
6647 {
6648 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6649 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
6650 /* No need of CALL26 relocation for tls_get_addr. */
6651 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
6652 bfd_putl32 (0xd53bd040, contents + rel->r_offset + 0);
2d0ca824
YN
6653 bfd_putl32 (add_R0_R0 | (TCB_SIZE << 10),
6654 contents + rel->r_offset + 4);
259364ad
JW
6655 return bfd_reloc_ok;
6656 }
6657 return bfd_reloc_continue;
6658
6659 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
6660 /* LD->LE relaxation (small):
6661 adrp x0, :tlsldm:x => mrs x0, tpidr_el0
6662 */
6663 if (is_local)
6664 {
6665 bfd_putl32 (0xd53bd040, contents + rel->r_offset);
6666 return bfd_reloc_ok;
6667 }
6668 return bfd_reloc_continue;
6669
6670 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
6671 /* LD->LE relaxation (small):
c1fc2d7e 6672 add x0, #:tlsldm_lo12:x => add R0, R0, TCB_SIZE
259364ad 6673 bl __tls_get_addr => nop
c1fc2d7e
YN
6674
6675 Where R is x for lp64 mode, and w for ilp32 mode. */
259364ad
JW
6676 if (is_local)
6677 {
6678 BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
6679 BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
6680 /* No need of CALL26 relocation for tls_get_addr. */
6681 rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
2d0ca824
YN
6682 bfd_putl32 (add_R0_R0 | (TCB_SIZE << 10),
6683 contents + rel->r_offset + 0);
c1fc2d7e 6684 bfd_putl32 (INSN_NOP, contents + rel->r_offset + 4);
259364ad
JW
6685 return bfd_reloc_ok;
6686 }
6687 return bfd_reloc_continue;
6688
a06ea964
NC
6689 default:
6690 return bfd_reloc_continue;
6691 }
6692
6693 return bfd_reloc_ok;
6694}
6695
6696/* Relocate an AArch64 ELF section. */
6697
6698static bfd_boolean
cec5225b 6699elfNN_aarch64_relocate_section (bfd *output_bfd,
a06ea964
NC
6700 struct bfd_link_info *info,
6701 bfd *input_bfd,
6702 asection *input_section,
6703 bfd_byte *contents,
6704 Elf_Internal_Rela *relocs,
6705 Elf_Internal_Sym *local_syms,
6706 asection **local_sections)
6707{
6708 Elf_Internal_Shdr *symtab_hdr;
6709 struct elf_link_hash_entry **sym_hashes;
6710 Elf_Internal_Rela *rel;
6711 Elf_Internal_Rela *relend;
6712 const char *name;
cec5225b 6713 struct elf_aarch64_link_hash_table *globals;
a06ea964
NC
6714 bfd_boolean save_addend = FALSE;
6715 bfd_vma addend = 0;
6716
cec5225b 6717 globals = elf_aarch64_hash_table (info);
a06ea964
NC
6718
6719 symtab_hdr = &elf_symtab_hdr (input_bfd);
6720 sym_hashes = elf_sym_hashes (input_bfd);
6721
6722 rel = relocs;
6723 relend = relocs + input_section->reloc_count;
6724 for (; rel < relend; rel++)
6725 {
6726 unsigned int r_type;
a6bb11b2
YZ
6727 bfd_reloc_code_real_type bfd_r_type;
6728 bfd_reloc_code_real_type relaxed_bfd_r_type;
a06ea964
NC
6729 reloc_howto_type *howto;
6730 unsigned long r_symndx;
6731 Elf_Internal_Sym *sym;
6732 asection *sec;
6733 struct elf_link_hash_entry *h;
6734 bfd_vma relocation;
6735 bfd_reloc_status_type r;
6736 arelent bfd_reloc;
6737 char sym_type;
6738 bfd_boolean unresolved_reloc = FALSE;
6739 char *error_message = NULL;
6740
cec5225b
YZ
6741 r_symndx = ELFNN_R_SYM (rel->r_info);
6742 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964 6743
0aa13fee
AM
6744 bfd_reloc.howto = elfNN_aarch64_howto_from_type (input_bfd, r_type);
6745 howto = bfd_reloc.howto;
a06ea964 6746
7fcfd62d 6747 if (howto == NULL)
47aeb64c
NC
6748 return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
6749
a6bb11b2 6750 bfd_r_type = elfNN_aarch64_bfd_reloc_from_howto (howto);
7fcfd62d 6751
a06ea964
NC
6752 h = NULL;
6753 sym = NULL;
6754 sec = NULL;
6755
6756 if (r_symndx < symtab_hdr->sh_info)
6757 {
6758 sym = local_syms + r_symndx;
cec5225b 6759 sym_type = ELFNN_ST_TYPE (sym->st_info);
a06ea964
NC
6760 sec = local_sections[r_symndx];
6761
6762 /* An object file might have a reference to a local
6763 undefined symbol. This is a daft object file, but we
6764 should at least do something about it. */
6765 if (r_type != R_AARCH64_NONE && r_type != R_AARCH64_NULL
6766 && bfd_is_und_section (sec)
6767 && ELF_ST_BIND (sym->st_info) != STB_WEAK)
1a72702b
AM
6768 (*info->callbacks->undefined_symbol)
6769 (info, bfd_elf_string_from_elf_section
6770 (input_bfd, symtab_hdr->sh_link, sym->st_name),
6771 input_bfd, input_section, rel->r_offset, TRUE);
a06ea964 6772
a06ea964 6773 relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
1419bbe5
WN
6774
6775 /* Relocate against local STT_GNU_IFUNC symbol. */
0e1862bb 6776 if (!bfd_link_relocatable (info)
1419bbe5
WN
6777 && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
6778 {
6779 h = elfNN_aarch64_get_local_sym_hash (globals, input_bfd,
6780 rel, FALSE);
6781 if (h == NULL)
6782 abort ();
6783
6784 /* Set STT_GNU_IFUNC symbol value. */
6785 h->root.u.def.value = sym->st_value;
6786 h->root.u.def.section = sec;
6787 }
a06ea964
NC
6788 }
6789 else
6790 {
62d887d4 6791 bfd_boolean warned, ignored;
a06ea964
NC
6792
6793 RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
6794 r_symndx, symtab_hdr, sym_hashes,
6795 h, sec, relocation,
62d887d4 6796 unresolved_reloc, warned, ignored);
a06ea964
NC
6797
6798 sym_type = h->type;
6799 }
6800
6801 if (sec != NULL && discarded_section (sec))
6802 RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
6803 rel, 1, relend, howto, 0, contents);
6804
0e1862bb 6805 if (bfd_link_relocatable (info))
2e0488d3 6806 continue;
a06ea964
NC
6807
6808 if (h != NULL)
6809 name = h->root.root.string;
6810 else
6811 {
6812 name = (bfd_elf_string_from_elf_section
6813 (input_bfd, symtab_hdr->sh_link, sym->st_name));
6814 if (name == NULL || *name == '\0')
fd361982 6815 name = bfd_section_name (sec);
a06ea964
NC
6816 }
6817
6818 if (r_symndx != 0
6819 && r_type != R_AARCH64_NONE
6820 && r_type != R_AARCH64_NULL
6821 && (h == NULL
6822 || h->root.type == bfd_link_hash_defined
6823 || h->root.type == bfd_link_hash_defweak)
a6bb11b2 6824 && IS_AARCH64_TLS_RELOC (bfd_r_type) != (sym_type == STT_TLS))
a06ea964 6825 {
4eca0228 6826 _bfd_error_handler
a06ea964 6827 ((sym_type == STT_TLS
695344c0 6828 /* xgettext:c-format */
2dcf00ce 6829 ? _("%pB(%pA+%#" PRIx64 "): %s used with TLS symbol %s")
695344c0 6830 /* xgettext:c-format */
2dcf00ce 6831 : _("%pB(%pA+%#" PRIx64 "): %s used with non-TLS symbol %s")),
a06ea964 6832 input_bfd,
2dcf00ce 6833 input_section, (uint64_t) rel->r_offset, howto->name, name);
a06ea964
NC
6834 }
6835
a06ea964 6836 /* We relax only if we can see that there can be a valid transition
07d6d2b8
AM
6837 from a reloc type to another.
6838 We call elfNN_aarch64_final_link_relocate unless we're completely
6839 done, i.e., the relaxation produced the final output we want. */
a06ea964 6840
a6bb11b2
YZ
6841 relaxed_bfd_r_type = aarch64_tls_transition (input_bfd, info, r_type,
6842 h, r_symndx);
6843 if (relaxed_bfd_r_type != bfd_r_type)
a06ea964 6844 {
a6bb11b2
YZ
6845 bfd_r_type = relaxed_bfd_r_type;
6846 howto = elfNN_aarch64_howto_from_bfd_reloc (bfd_r_type);
6847 BFD_ASSERT (howto != NULL);
6848 r_type = howto->type;
9fca35fc
TC
6849 r = elfNN_aarch64_tls_relax (globals, input_bfd, input_section,
6850 contents, rel, h);
a06ea964
NC
6851 unresolved_reloc = 0;
6852 }
6853 else
6854 r = bfd_reloc_continue;
6855
6856 /* There may be multiple consecutive relocations for the
07d6d2b8
AM
6857 same offset. In that case we are supposed to treat the
6858 output of each relocation as the addend for the next. */
a06ea964
NC
6859 if (rel + 1 < relend
6860 && rel->r_offset == rel[1].r_offset
cec5225b
YZ
6861 && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NONE
6862 && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NULL)
a06ea964
NC
6863 save_addend = TRUE;
6864 else
6865 save_addend = FALSE;
6866
6867 if (r == bfd_reloc_continue)
cec5225b 6868 r = elfNN_aarch64_final_link_relocate (howto, input_bfd, output_bfd,
a06ea964
NC
6869 input_section, contents, rel,
6870 relocation, info, sec,
6871 h, &unresolved_reloc,
1419bbe5 6872 save_addend, &addend, sym);
a06ea964 6873
0aa13fee 6874 switch (elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type))
a06ea964 6875 {
ce336788 6876 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
a6bb11b2 6877 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3c12b054 6878 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
7ba7cfe4 6879 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
94facae3 6880 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
73f925cc 6881 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
f69e4920 6882 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
77a69ff8 6883 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
a06ea964
NC
6884 if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
6885 {
6886 bfd_boolean need_relocs = FALSE;
6887 bfd_byte *loc;
6888 int indx;
6889 bfd_vma off;
6890
6891 off = symbol_got_offset (input_bfd, h, r_symndx);
6892 indx = h && h->dynindx != -1 ? h->dynindx : 0;
6893
6894 need_relocs =
6dda7875 6895 (!bfd_link_executable (info) || indx != 0) &&
a06ea964
NC
6896 (h == NULL
6897 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6898 || h->root.type != bfd_link_hash_undefweak);
6899
6900 BFD_ASSERT (globals->root.srelgot != NULL);
6901
6902 if (need_relocs)
6903 {
6904 Elf_Internal_Rela rela;
a6bb11b2 6905 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPMOD));
a06ea964
NC
6906 rela.r_addend = 0;
6907 rela.r_offset = globals->root.sgot->output_section->vma +
6908 globals->root.sgot->output_offset + off;
6909
6910
6911 loc = globals->root.srelgot->contents;
6912 loc += globals->root.srelgot->reloc_count++
6913 * RELOC_SIZE (htab);
cec5225b 6914 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964 6915
f69e4920 6916 bfd_reloc_code_real_type real_type =
0aa13fee 6917 elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
f69e4920
JW
6918
6919 if (real_type == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21
73f925cc
JW
6920 || real_type == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21
6921 || real_type == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC)
77a69ff8
JW
6922 {
6923 /* For local dynamic, don't generate DTPREL in any case.
6924 Initialize the DTPREL slot into zero, so we get module
6925 base address when invoke runtime TLS resolver. */
6926 bfd_put_NN (output_bfd, 0,
6927 globals->root.sgot->contents + off
6928 + GOT_ENTRY_SIZE);
6929 }
6930 else if (indx == 0)
a06ea964 6931 {
cec5225b 6932 bfd_put_NN (output_bfd,
a06ea964
NC
6933 relocation - dtpoff_base (info),
6934 globals->root.sgot->contents + off
6935 + GOT_ENTRY_SIZE);
6936 }
6937 else
6938 {
6939 /* This TLS symbol is global. We emit a
6940 relocation to fixup the tls offset at load
6941 time. */
6942 rela.r_info =
a6bb11b2 6943 ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPREL));
a06ea964
NC
6944 rela.r_addend = 0;
6945 rela.r_offset =
6946 (globals->root.sgot->output_section->vma
6947 + globals->root.sgot->output_offset + off
6948 + GOT_ENTRY_SIZE);
6949
6950 loc = globals->root.srelgot->contents;
6951 loc += globals->root.srelgot->reloc_count++
6952 * RELOC_SIZE (globals);
cec5225b
YZ
6953 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
6954 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC
6955 globals->root.sgot->contents + off
6956 + GOT_ENTRY_SIZE);
6957 }
6958 }
6959 else
6960 {
cec5225b 6961 bfd_put_NN (output_bfd, (bfd_vma) 1,
a06ea964 6962 globals->root.sgot->contents + off);
cec5225b 6963 bfd_put_NN (output_bfd,
a06ea964
NC
6964 relocation - dtpoff_base (info),
6965 globals->root.sgot->contents + off
6966 + GOT_ENTRY_SIZE);
6967 }
6968
6969 symbol_got_offset_mark (input_bfd, h, r_symndx);
6970 }
6971 break;
6972
a6bb11b2
YZ
6973 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
6974 case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
043bf05a 6975 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
3b957e5b
RL
6976 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
6977 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
a06ea964
NC
6978 if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
6979 {
6980 bfd_boolean need_relocs = FALSE;
6981 bfd_byte *loc;
6982 int indx;
6983 bfd_vma off;
6984
6985 off = symbol_got_offset (input_bfd, h, r_symndx);
6986
6987 indx = h && h->dynindx != -1 ? h->dynindx : 0;
6988
6989 need_relocs =
6dda7875 6990 (!bfd_link_executable (info) || indx != 0) &&
a06ea964
NC
6991 (h == NULL
6992 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
6993 || h->root.type != bfd_link_hash_undefweak);
6994
6995 BFD_ASSERT (globals->root.srelgot != NULL);
6996
6997 if (need_relocs)
6998 {
6999 Elf_Internal_Rela rela;
7000
7001 if (indx == 0)
7002 rela.r_addend = relocation - dtpoff_base (info);
7003 else
7004 rela.r_addend = 0;
7005
a6bb11b2 7006 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_TPREL));
a06ea964
NC
7007 rela.r_offset = globals->root.sgot->output_section->vma +
7008 globals->root.sgot->output_offset + off;
7009
7010 loc = globals->root.srelgot->contents;
7011 loc += globals->root.srelgot->reloc_count++
7012 * RELOC_SIZE (htab);
7013
cec5225b 7014 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964 7015
cec5225b 7016 bfd_put_NN (output_bfd, rela.r_addend,
a06ea964
NC
7017 globals->root.sgot->contents + off);
7018 }
7019 else
cec5225b 7020 bfd_put_NN (output_bfd, relocation - tpoff_base (info),
a06ea964
NC
7021 globals->root.sgot->contents + off);
7022
7023 symbol_got_offset_mark (input_bfd, h, r_symndx);
7024 }
7025 break;
7026
f955cccf 7027 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
a6bb11b2 7028 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
389b8029 7029 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
a6bb11b2 7030 case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
1ada945d 7031 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
0484b454
RL
7032 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
7033 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
a06ea964
NC
7034 if (! symbol_tlsdesc_got_offset_mark_p (input_bfd, h, r_symndx))
7035 {
7036 bfd_boolean need_relocs = FALSE;
7037 int indx = h && h->dynindx != -1 ? h->dynindx : 0;
7038 bfd_vma off = symbol_tlsdesc_got_offset (input_bfd, h, r_symndx);
7039
7040 need_relocs = (h == NULL
7041 || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
7042 || h->root.type != bfd_link_hash_undefweak);
7043
7044 BFD_ASSERT (globals->root.srelgot != NULL);
7045 BFD_ASSERT (globals->root.sgot != NULL);
7046
7047 if (need_relocs)
7048 {
7049 bfd_byte *loc;
7050 Elf_Internal_Rela rela;
a6bb11b2
YZ
7051 rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLSDESC));
7052
a06ea964
NC
7053 rela.r_addend = 0;
7054 rela.r_offset = (globals->root.sgotplt->output_section->vma
7055 + globals->root.sgotplt->output_offset
7056 + off + globals->sgotplt_jump_table_size);
7057
7058 if (indx == 0)
7059 rela.r_addend = relocation - dtpoff_base (info);
7060
7061 /* Allocate the next available slot in the PLT reloc
7062 section to hold our R_AARCH64_TLSDESC, the next
7063 available slot is determined from reloc_count,
7064 which we step. But note, reloc_count was
7065 artifically moved down while allocating slots for
7066 real PLT relocs such that all of the PLT relocs
7067 will fit above the initial reloc_count and the
7068 extra stuff will fit below. */
7069 loc = globals->root.srelplt->contents;
7070 loc += globals->root.srelplt->reloc_count++
7071 * RELOC_SIZE (globals);
7072
cec5225b 7073 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964 7074
cec5225b 7075 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC
7076 globals->root.sgotplt->contents + off +
7077 globals->sgotplt_jump_table_size);
cec5225b 7078 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964
NC
7079 globals->root.sgotplt->contents + off +
7080 globals->sgotplt_jump_table_size +
7081 GOT_ENTRY_SIZE);
7082 }
7083
7084 symbol_tlsdesc_got_offset_mark (input_bfd, h, r_symndx);
7085 }
7086 break;
a6bb11b2
YZ
7087 default:
7088 break;
a06ea964
NC
7089 }
7090
a06ea964 7091 /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
07d6d2b8
AM
7092 because such sections are not SEC_ALLOC and thus ld.so will
7093 not process them. */
a06ea964
NC
7094 if (unresolved_reloc
7095 && !((input_section->flags & SEC_DEBUGGING) != 0
7096 && h->def_dynamic)
7097 && _bfd_elf_section_offset (output_bfd, info, input_section,
7098 +rel->r_offset) != (bfd_vma) - 1)
7099 {
4eca0228 7100 _bfd_error_handler
695344c0 7101 /* xgettext:c-format */
2dcf00ce
AM
7102 (_("%pB(%pA+%#" PRIx64 "): "
7103 "unresolvable %s relocation against symbol `%s'"),
7104 input_bfd, input_section, (uint64_t) rel->r_offset, howto->name,
a06ea964
NC
7105 h->root.root.string);
7106 return FALSE;
7107 }
7108
7109 if (r != bfd_reloc_ok && r != bfd_reloc_continue)
7110 {
c674f5cd 7111 bfd_reloc_code_real_type real_r_type
0aa13fee 7112 = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
c674f5cd 7113
a06ea964
NC
7114 switch (r)
7115 {
7116 case bfd_reloc_overflow:
1a72702b
AM
7117 (*info->callbacks->reloc_overflow)
7118 (info, (h ? &h->root : NULL), name, howto->name, (bfd_vma) 0,
7119 input_bfd, input_section, rel->r_offset);
c674f5cd
JW
7120 if (real_r_type == BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15
7121 || real_r_type == BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14)
7122 {
7123 (*info->callbacks->warning)
7124 (info,
90b6238f 7125 _("too many GOT entries for -fpic, "
c674f5cd
JW
7126 "please recompile with -fPIC"),
7127 name, input_bfd, input_section, rel->r_offset);
7128 return FALSE;
7129 }
027e9c75
NC
7130 /* Overflow can occur when a variable is referenced with a type
7131 that has a larger alignment than the type with which it was
7132 declared. eg:
7133 file1.c: extern int foo; int a (void) { return foo; }
7134 file2.c: char bar, foo, baz;
7135 If the variable is placed into a data section at an offset
7136 that is incompatible with the larger alignment requirement
7137 overflow will occur. (Strictly speaking this is not overflow
7138 but rather an alignment problem, but the bfd_reloc_ error
7139 enum does not have a value to cover that situation).
7140
7141 Try to catch this situation here and provide a more helpful
7142 error message to the user. */
7143 if (addend & ((1 << howto->rightshift) - 1)
7144 /* FIXME: Are we testing all of the appropriate reloc
7145 types here ? */
7146 && (real_r_type == BFD_RELOC_AARCH64_LD_LO19_PCREL
7147 || real_r_type == BFD_RELOC_AARCH64_LDST16_LO12
7148 || real_r_type == BFD_RELOC_AARCH64_LDST32_LO12
7149 || real_r_type == BFD_RELOC_AARCH64_LDST64_LO12
7150 || real_r_type == BFD_RELOC_AARCH64_LDST128_LO12))
7151 {
7152 info->callbacks->warning
90b6238f 7153 (info, _("one possible cause of this error is that the \
027e9c75 7154symbol is being referenced in the indicated code as if it had a larger \
90b6238f 7155alignment than was declared where it was defined"),
027e9c75
NC
7156 name, input_bfd, input_section, rel->r_offset);
7157 }
a06ea964
NC
7158 break;
7159
7160 case bfd_reloc_undefined:
1a72702b
AM
7161 (*info->callbacks->undefined_symbol)
7162 (info, name, input_bfd, input_section, rel->r_offset, TRUE);
a06ea964
NC
7163 break;
7164
7165 case bfd_reloc_outofrange:
7166 error_message = _("out of range");
7167 goto common_error;
7168
7169 case bfd_reloc_notsupported:
7170 error_message = _("unsupported relocation");
7171 goto common_error;
7172
7173 case bfd_reloc_dangerous:
7174 /* error_message should already be set. */
7175 goto common_error;
7176
7177 default:
7178 error_message = _("unknown error");
7179 /* Fall through. */
7180
7181 common_error:
7182 BFD_ASSERT (error_message != NULL);
1a72702b
AM
7183 (*info->callbacks->reloc_dangerous)
7184 (info, error_message, input_bfd, input_section, rel->r_offset);
a06ea964
NC
7185 break;
7186 }
7187 }
027e9c75
NC
7188
7189 if (!save_addend)
7190 addend = 0;
a06ea964
NC
7191 }
7192
7193 return TRUE;
7194}
7195
7196/* Set the right machine number. */
7197
7198static bfd_boolean
cec5225b 7199elfNN_aarch64_object_p (bfd *abfd)
a06ea964 7200{
cec5225b
YZ
7201#if ARCH_SIZE == 32
7202 bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64_ilp32);
7203#else
a06ea964 7204 bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64);
cec5225b 7205#endif
a06ea964
NC
7206 return TRUE;
7207}
7208
7209/* Function to keep AArch64 specific flags in the ELF header. */
7210
7211static bfd_boolean
cec5225b 7212elfNN_aarch64_set_private_flags (bfd *abfd, flagword flags)
a06ea964
NC
7213{
7214 if (elf_flags_init (abfd) && elf_elfheader (abfd)->e_flags != flags)
7215 {
7216 }
7217 else
7218 {
7219 elf_elfheader (abfd)->e_flags = flags;
7220 elf_flags_init (abfd) = TRUE;
7221 }
7222
7223 return TRUE;
7224}
7225
a06ea964
NC
7226/* Merge backend specific data from an object file to the output
7227 object file when linking. */
7228
7229static bfd_boolean
50e03d47 7230elfNN_aarch64_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
a06ea964 7231{
50e03d47 7232 bfd *obfd = info->output_bfd;
a06ea964
NC
7233 flagword out_flags;
7234 flagword in_flags;
7235 bfd_boolean flags_compatible = TRUE;
7236 asection *sec;
7237
7238 /* Check if we have the same endianess. */
50e03d47 7239 if (!_bfd_generic_verify_endian_match (ibfd, info))
a06ea964
NC
7240 return FALSE;
7241
7242 if (!is_aarch64_elf (ibfd) || !is_aarch64_elf (obfd))
7243 return TRUE;
7244
7245 /* The input BFD must have had its flags initialised. */
7246 /* The following seems bogus to me -- The flags are initialized in
7247 the assembler but I don't think an elf_flags_init field is
7248 written into the object. */
7249 /* BFD_ASSERT (elf_flags_init (ibfd)); */
7250
7251 in_flags = elf_elfheader (ibfd)->e_flags;
7252 out_flags = elf_elfheader (obfd)->e_flags;
7253
7254 if (!elf_flags_init (obfd))
7255 {
7256 /* If the input is the default architecture and had the default
07d6d2b8
AM
7257 flags then do not bother setting the flags for the output
7258 architecture, instead allow future merges to do this. If no
7259 future merges ever set these flags then they will retain their
7260 uninitialised values, which surprise surprise, correspond
7261 to the default values. */
a06ea964
NC
7262 if (bfd_get_arch_info (ibfd)->the_default
7263 && elf_elfheader (ibfd)->e_flags == 0)
7264 return TRUE;
7265
7266 elf_flags_init (obfd) = TRUE;
7267 elf_elfheader (obfd)->e_flags = in_flags;
7268
7269 if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
7270 && bfd_get_arch_info (obfd)->the_default)
7271 return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd),
7272 bfd_get_mach (ibfd));
7273
7274 return TRUE;
7275 }
7276
7277 /* Identical flags must be compatible. */
7278 if (in_flags == out_flags)
7279 return TRUE;
7280
7281 /* Check to see if the input BFD actually contains any sections. If
7282 not, its flags may not have been initialised either, but it
7283 cannot actually cause any incompatiblity. Do not short-circuit
7284 dynamic objects; their section list may be emptied by
7285 elf_link_add_object_symbols.
7286
7287 Also check to see if there are no code sections in the input.
7288 In this case there is no need to check for code specific flags.
7289 XXX - do we need to worry about floating-point format compatability
7290 in data sections ? */
7291 if (!(ibfd->flags & DYNAMIC))
7292 {
7293 bfd_boolean null_input_bfd = TRUE;
7294 bfd_boolean only_data_sections = TRUE;
7295
7296 for (sec = ibfd->sections; sec != NULL; sec = sec->next)
7297 {
fd361982 7298 if ((bfd_section_flags (sec)
a06ea964
NC
7299 & (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
7300 == (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
7301 only_data_sections = FALSE;
7302
7303 null_input_bfd = FALSE;
7304 break;
7305 }
7306
7307 if (null_input_bfd || only_data_sections)
7308 return TRUE;
7309 }
7310
7311 return flags_compatible;
7312}
7313
7314/* Display the flags field. */
7315
7316static bfd_boolean
cec5225b 7317elfNN_aarch64_print_private_bfd_data (bfd *abfd, void *ptr)
a06ea964
NC
7318{
7319 FILE *file = (FILE *) ptr;
7320 unsigned long flags;
7321
7322 BFD_ASSERT (abfd != NULL && ptr != NULL);
7323
7324 /* Print normal ELF private data. */
7325 _bfd_elf_print_private_bfd_data (abfd, ptr);
7326
7327 flags = elf_elfheader (abfd)->e_flags;
7328 /* Ignore init flag - it may not be set, despite the flags field
7329 containing valid data. */
7330
7331 /* xgettext:c-format */
7332 fprintf (file, _("private flags = %lx:"), elf_elfheader (abfd)->e_flags);
7333
7334 if (flags)
7335 fprintf (file, _("<Unrecognised flag bits set>"));
7336
7337 fputc ('\n', file);
7338
7339 return TRUE;
7340}
7341
6353d82b
JW
7342/* Return true if we need copy relocation against EH. */
7343
7344static bfd_boolean
7345need_copy_relocation_p (struct elf_aarch64_link_hash_entry *eh)
7346{
7347 struct elf_dyn_relocs *p;
7348 asection *s;
7349
190eb1dd 7350 for (p = eh->root.dyn_relocs; p != NULL; p = p->next)
6353d82b
JW
7351 {
7352 /* If there is any pc-relative reference, we need to keep copy relocation
7353 to avoid propagating the relocation into runtime that current glibc
7354 does not support. */
7355 if (p->pc_count)
7356 return TRUE;
7357
7358 s = p->sec->output_section;
7359 /* Need copy relocation if it's against read-only section. */
7360 if (s != NULL && (s->flags & SEC_READONLY) != 0)
7361 return TRUE;
7362 }
7363
7364 return FALSE;
7365}
7366
a06ea964
NC
7367/* Adjust a symbol defined by a dynamic object and referenced by a
7368 regular object. The current definition is in some section of the
7369 dynamic object, but we're not including those sections. We have to
7370 change the definition to something the rest of the link can
7371 understand. */
7372
7373static bfd_boolean
cec5225b 7374elfNN_aarch64_adjust_dynamic_symbol (struct bfd_link_info *info,
a06ea964
NC
7375 struct elf_link_hash_entry *h)
7376{
cec5225b 7377 struct elf_aarch64_link_hash_table *htab;
5474d94f 7378 asection *s, *srel;
a06ea964
NC
7379
7380 /* If this is a function, put it in the procedure linkage table. We
7381 will fill in the contents of the procedure linkage table later,
7382 when we know the address of the .got section. */
1419bbe5 7383 if (h->type == STT_FUNC || h->type == STT_GNU_IFUNC || h->needs_plt)
a06ea964
NC
7384 {
7385 if (h->plt.refcount <= 0
1419bbe5
WN
7386 || (h->type != STT_GNU_IFUNC
7387 && (SYMBOL_CALLS_LOCAL (info, h)
7388 || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
7389 && h->root.type == bfd_link_hash_undefweak))))
a06ea964
NC
7390 {
7391 /* This case can occur if we saw a CALL26 reloc in
7392 an input file, but the symbol wasn't referred to
7393 by a dynamic object or all references were
7394 garbage collected. In which case we can end up
7395 resolving. */
7396 h->plt.offset = (bfd_vma) - 1;
7397 h->needs_plt = 0;
7398 }
7399
7400 return TRUE;
7401 }
7402 else
80de0c6d 7403 /* Otherwise, reset to -1. */
a06ea964
NC
7404 h->plt.offset = (bfd_vma) - 1;
7405
7406
7407 /* If this is a weak symbol, and there is a real definition, the
7408 processor independent code will have arranged for us to see the
7409 real definition first, and we can just use the same value. */
60d67dc8 7410 if (h->is_weakalias)
a06ea964 7411 {
60d67dc8
AM
7412 struct elf_link_hash_entry *def = weakdef (h);
7413 BFD_ASSERT (def->root.type == bfd_link_hash_defined);
7414 h->root.u.def.section = def->root.u.def.section;
7415 h->root.u.def.value = def->root.u.def.value;
a06ea964 7416 if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
60d67dc8 7417 h->non_got_ref = def->non_got_ref;
a06ea964
NC
7418 return TRUE;
7419 }
7420
7421 /* If we are creating a shared library, we must presume that the
7422 only references to the symbol are via the global offset table.
7423 For such cases we need not do anything here; the relocations will
7424 be handled correctly by relocate_section. */
0e1862bb 7425 if (bfd_link_pic (info))
a06ea964
NC
7426 return TRUE;
7427
7428 /* If there are no references to this symbol that do not use the
7429 GOT, we don't need to generate a copy reloc. */
7430 if (!h->non_got_ref)
7431 return TRUE;
7432
7433 /* If -z nocopyreloc was given, we won't generate them either. */
7434 if (info->nocopyreloc)
7435 {
7436 h->non_got_ref = 0;
7437 return TRUE;
7438 }
7439
6353d82b
JW
7440 if (ELIMINATE_COPY_RELOCS)
7441 {
7442 struct elf_aarch64_link_hash_entry *eh;
dce2246a 7443 /* If we don't find any dynamic relocs in read-only sections, then
6353d82b
JW
7444 we'll be keeping the dynamic relocs and avoiding the copy reloc. */
7445 eh = (struct elf_aarch64_link_hash_entry *) h;
7446 if (!need_copy_relocation_p (eh))
7447 {
7448 h->non_got_ref = 0;
7449 return TRUE;
7450 }
7451 }
7452
a06ea964
NC
7453 /* We must allocate the symbol in our .dynbss section, which will
7454 become part of the .bss section of the executable. There will be
7455 an entry for this symbol in the .dynsym section. The dynamic
7456 object will contain position independent code, so all references
7457 from the dynamic object to this symbol will go through the global
7458 offset table. The dynamic linker will use the .dynsym entry to
7459 determine the address it must put in the global offset table, so
7460 both the dynamic object and the regular object will refer to the
7461 same memory location for the variable. */
7462
cec5225b 7463 htab = elf_aarch64_hash_table (info);
a06ea964
NC
7464
7465 /* We must generate a R_AARCH64_COPY reloc to tell the dynamic linker
7466 to copy the initial value out of the dynamic object and into the
7467 runtime process image. */
5474d94f
AM
7468 if ((h->root.u.def.section->flags & SEC_READONLY) != 0)
7469 {
7470 s = htab->root.sdynrelro;
7471 srel = htab->root.sreldynrelro;
7472 }
7473 else
7474 {
7475 s = htab->root.sdynbss;
7476 srel = htab->root.srelbss;
7477 }
a06ea964
NC
7478 if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
7479 {
5474d94f 7480 srel->size += RELOC_SIZE (htab);
a06ea964
NC
7481 h->needs_copy = 1;
7482 }
7483
6cabe1ea 7484 return _bfd_elf_adjust_dynamic_copy (info, h, s);
a06ea964
NC
7485
7486}
7487
7488static bfd_boolean
cec5225b 7489elfNN_aarch64_allocate_local_symbols (bfd *abfd, unsigned number)
a06ea964
NC
7490{
7491 struct elf_aarch64_local_symbol *locals;
cec5225b 7492 locals = elf_aarch64_locals (abfd);
a06ea964
NC
7493 if (locals == NULL)
7494 {
7495 locals = (struct elf_aarch64_local_symbol *)
7496 bfd_zalloc (abfd, number * sizeof (struct elf_aarch64_local_symbol));
7497 if (locals == NULL)
7498 return FALSE;
cec5225b 7499 elf_aarch64_locals (abfd) = locals;
a06ea964
NC
7500 }
7501 return TRUE;
7502}
7503
cc0efaa8
MS
7504/* Create the .got section to hold the global offset table. */
7505
7506static bfd_boolean
7507aarch64_elf_create_got_section (bfd *abfd, struct bfd_link_info *info)
7508{
7509 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
7510 flagword flags;
7511 asection *s;
7512 struct elf_link_hash_entry *h;
7513 struct elf_link_hash_table *htab = elf_hash_table (info);
7514
7515 /* This function may be called more than once. */
ce558b89 7516 if (htab->sgot != NULL)
cc0efaa8
MS
7517 return TRUE;
7518
7519 flags = bed->dynamic_sec_flags;
7520
7521 s = bfd_make_section_anyway_with_flags (abfd,
7522 (bed->rela_plts_and_copies_p
7523 ? ".rela.got" : ".rel.got"),
7524 (bed->dynamic_sec_flags
7525 | SEC_READONLY));
7526 if (s == NULL
fd361982 7527 || !bfd_set_section_alignment (s, bed->s->log_file_align))
cc0efaa8
MS
7528 return FALSE;
7529 htab->srelgot = s;
7530
7531 s = bfd_make_section_anyway_with_flags (abfd, ".got", flags);
7532 if (s == NULL
fd361982 7533 || !bfd_set_section_alignment (s, bed->s->log_file_align))
cc0efaa8
MS
7534 return FALSE;
7535 htab->sgot = s;
7536 htab->sgot->size += GOT_ENTRY_SIZE;
7537
7538 if (bed->want_got_sym)
7539 {
7540 /* Define the symbol _GLOBAL_OFFSET_TABLE_ at the start of the .got
7541 (or .got.plt) section. We don't do this in the linker script
7542 because we don't want to define the symbol if we are not creating
7543 a global offset table. */
7544 h = _bfd_elf_define_linkage_sym (abfd, info, s,
7545 "_GLOBAL_OFFSET_TABLE_");
7546 elf_hash_table (info)->hgot = h;
7547 if (h == NULL)
7548 return FALSE;
7549 }
7550
7551 if (bed->want_got_plt)
7552 {
7553 s = bfd_make_section_anyway_with_flags (abfd, ".got.plt", flags);
7554 if (s == NULL
fd361982 7555 || !bfd_set_section_alignment (s, bed->s->log_file_align))
cc0efaa8
MS
7556 return FALSE;
7557 htab->sgotplt = s;
7558 }
7559
7560 /* The first bit of the global offset table is the header. */
7561 s->size += bed->got_header_size;
7562
7563 return TRUE;
7564}
7565
a06ea964
NC
7566/* Look through the relocs for a section during the first phase. */
7567
7568static bfd_boolean
cec5225b 7569elfNN_aarch64_check_relocs (bfd *abfd, struct bfd_link_info *info,
a06ea964
NC
7570 asection *sec, const Elf_Internal_Rela *relocs)
7571{
7572 Elf_Internal_Shdr *symtab_hdr;
7573 struct elf_link_hash_entry **sym_hashes;
7574 const Elf_Internal_Rela *rel;
7575 const Elf_Internal_Rela *rel_end;
7576 asection *sreloc;
7577
cec5225b 7578 struct elf_aarch64_link_hash_table *htab;
a06ea964 7579
0e1862bb 7580 if (bfd_link_relocatable (info))
a06ea964
NC
7581 return TRUE;
7582
7583 BFD_ASSERT (is_aarch64_elf (abfd));
7584
cec5225b 7585 htab = elf_aarch64_hash_table (info);
a06ea964
NC
7586 sreloc = NULL;
7587
7588 symtab_hdr = &elf_symtab_hdr (abfd);
7589 sym_hashes = elf_sym_hashes (abfd);
a06ea964
NC
7590
7591 rel_end = relocs + sec->reloc_count;
7592 for (rel = relocs; rel < rel_end; rel++)
7593 {
7594 struct elf_link_hash_entry *h;
d42c267e 7595 unsigned int r_symndx;
a06ea964 7596 unsigned int r_type;
a6bb11b2 7597 bfd_reloc_code_real_type bfd_r_type;
1419bbe5 7598 Elf_Internal_Sym *isym;
a06ea964 7599
cec5225b
YZ
7600 r_symndx = ELFNN_R_SYM (rel->r_info);
7601 r_type = ELFNN_R_TYPE (rel->r_info);
a06ea964
NC
7602
7603 if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
7604 {
695344c0 7605 /* xgettext:c-format */
871b3ab2 7606 _bfd_error_handler (_("%pB: bad symbol index: %d"), abfd, r_symndx);
a06ea964
NC
7607 return FALSE;
7608 }
7609
ed5acf27 7610 if (r_symndx < symtab_hdr->sh_info)
1419bbe5
WN
7611 {
7612 /* A local symbol. */
7613 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
7614 abfd, r_symndx);
7615 if (isym == NULL)
7616 return FALSE;
7617
7618 /* Check relocation against local STT_GNU_IFUNC symbol. */
7619 if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
7620 {
7621 h = elfNN_aarch64_get_local_sym_hash (htab, abfd, rel,
7622 TRUE);
7623 if (h == NULL)
7624 return FALSE;
7625
7626 /* Fake a STT_GNU_IFUNC symbol. */
7627 h->type = STT_GNU_IFUNC;
7628 h->def_regular = 1;
7629 h->ref_regular = 1;
7630 h->forced_local = 1;
7631 h->root.type = bfd_link_hash_defined;
7632 }
7633 else
7634 h = NULL;
7635 }
a06ea964
NC
7636 else
7637 {
7638 h = sym_hashes[r_symndx - symtab_hdr->sh_info];
7639 while (h->root.type == bfd_link_hash_indirect
7640 || h->root.type == bfd_link_hash_warning)
7641 h = (struct elf_link_hash_entry *) h->root.u.i.link;
7642 }
7643
7644 /* Could be done earlier, if h were already available. */
a6bb11b2 7645 bfd_r_type = aarch64_tls_transition (abfd, info, r_type, h, r_symndx);
a06ea964 7646
1419bbe5
WN
7647 if (h != NULL)
7648 {
18f822a0
JW
7649 /* If a relocation refers to _GLOBAL_OFFSET_TABLE_, create the .got.
7650 This shows up in particular in an R_AARCH64_PREL64 in large model
7651 when calculating the pc-relative address to .got section which is
7652 used to initialize the gp register. */
7653 if (h->root.root.string
7654 && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
7655 {
7656 if (htab->root.dynobj == NULL)
7657 htab->root.dynobj = abfd;
7658
7659 if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
7660 return FALSE;
7661
7662 BFD_ASSERT (h == htab->root.hgot);
7663 }
7664
1419bbe5
WN
7665 /* Create the ifunc sections for static executables. If we
7666 never see an indirect function symbol nor we are building
7667 a static executable, those sections will be empty and
7668 won't appear in output. */
7669 switch (bfd_r_type)
7670 {
7671 default:
7672 break;
7673
ce336788
JW
7674 case BFD_RELOC_AARCH64_ADD_LO12:
7675 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
7676 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
1419bbe5 7677 case BFD_RELOC_AARCH64_CALL26:
ce336788 7678 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
1419bbe5 7679 case BFD_RELOC_AARCH64_JUMP26:
7018c030 7680 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
1419bbe5 7681 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
a2e1db00 7682 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
99ad26cb 7683 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
1419bbe5 7684 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
dc8008f5 7685 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
74a1bfe1 7686 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
ce336788 7687 case BFD_RELOC_AARCH64_NN:
1419bbe5
WN
7688 if (htab->root.dynobj == NULL)
7689 htab->root.dynobj = abfd;
7690 if (!_bfd_elf_create_ifunc_sections (htab->root.dynobj, info))
7691 return FALSE;
7692 break;
7693 }
7694
2d0ca824 7695 /* It is referenced by a non-shared object. */
1419bbe5 7696 h->ref_regular = 1;
1419bbe5
WN
7697 }
7698
a6bb11b2 7699 switch (bfd_r_type)
a06ea964 7700 {
79e74192
RL
7701 case BFD_RELOC_AARCH64_16:
7702#if ARCH_SIZE == 64
7703 case BFD_RELOC_AARCH64_32:
7704#endif
279b2f94 7705 if (bfd_link_pic (info) && (sec->flags & SEC_ALLOC) != 0)
79e74192 7706 {
279b2f94
RL
7707 if (h != NULL
7708 /* This is an absolute symbol. It represents a value instead
7709 of an address. */
c691de6a 7710 && (bfd_is_abs_symbol (&h->root)
279b2f94
RL
7711 /* This is an undefined symbol. */
7712 || h->root.type == bfd_link_hash_undefined))
7713 break;
7714
7715 /* For local symbols, defined global symbols in a non-ABS section,
7716 it is assumed that the value is an address. */
79e74192
RL
7717 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
7718 _bfd_error_handler
7719 /* xgettext:c-format */
871b3ab2 7720 (_("%pB: relocation %s against `%s' can not be used when making "
79e74192
RL
7721 "a shared object"),
7722 abfd, elfNN_aarch64_howto_table[howto_index].name,
7723 (h) ? h->root.root.string : "a local symbol");
7724 bfd_set_error (bfd_error_bad_value);
7725 return FALSE;
7726 }
7727 else
7728 break;
7729
6353d82b
JW
7730 case BFD_RELOC_AARCH64_MOVW_G0_NC:
7731 case BFD_RELOC_AARCH64_MOVW_G1_NC:
7732 case BFD_RELOC_AARCH64_MOVW_G2_NC:
7733 case BFD_RELOC_AARCH64_MOVW_G3:
7734 if (bfd_link_pic (info))
7735 {
7736 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
7737 _bfd_error_handler
7738 /* xgettext:c-format */
871b3ab2 7739 (_("%pB: relocation %s against `%s' can not be used when making "
6353d82b
JW
7740 "a shared object; recompile with -fPIC"),
7741 abfd, elfNN_aarch64_howto_table[howto_index].name,
7742 (h) ? h->root.root.string : "a local symbol");
7743 bfd_set_error (bfd_error_bad_value);
7744 return FALSE;
7745 }
7746 /* Fall through. */
7747
7748 case BFD_RELOC_AARCH64_16_PCREL:
7749 case BFD_RELOC_AARCH64_32_PCREL:
7750 case BFD_RELOC_AARCH64_64_PCREL:
7751 case BFD_RELOC_AARCH64_ADD_LO12:
7752 case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
7753 case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
7754 case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
7755 case BFD_RELOC_AARCH64_LDST128_LO12:
7756 case BFD_RELOC_AARCH64_LDST16_LO12:
7757 case BFD_RELOC_AARCH64_LDST32_LO12:
7758 case BFD_RELOC_AARCH64_LDST64_LO12:
7759 case BFD_RELOC_AARCH64_LDST8_LO12:
7760 case BFD_RELOC_AARCH64_LD_LO19_PCREL:
7761 if (h == NULL || bfd_link_pic (info))
7762 break;
7763 /* Fall through. */
7764
a6bb11b2 7765 case BFD_RELOC_AARCH64_NN:
a06ea964
NC
7766
7767 /* We don't need to handle relocs into sections not going into
7768 the "real" output. */
7769 if ((sec->flags & SEC_ALLOC) == 0)
7770 break;
7771
7772 if (h != NULL)
7773 {
0e1862bb 7774 if (!bfd_link_pic (info))
a06ea964
NC
7775 h->non_got_ref = 1;
7776
7777 h->plt.refcount += 1;
7778 h->pointer_equality_needed = 1;
7779 }
7780
7781 /* No need to do anything if we're not creating a shared
7782 object. */
6353d82b
JW
7783 if (!(bfd_link_pic (info)
7784 /* If on the other hand, we are creating an executable, we
7785 may need to keep relocations for symbols satisfied by a
7786 dynamic library if we manage to avoid copy relocs for the
7787 symbol.
7788
7789 NOTE: Currently, there is no support of copy relocs
7790 elimination on pc-relative relocation types, because there is
7791 no dynamic relocation support for them in glibc. We still
7792 record the dynamic symbol reference for them. This is
7793 because one symbol may be referenced by both absolute
7794 relocation (for example, BFD_RELOC_AARCH64_NN) and
7795 pc-relative relocation. We need full symbol reference
7796 information to make correct decision later in
7797 elfNN_aarch64_adjust_dynamic_symbol. */
7798 || (ELIMINATE_COPY_RELOCS
7799 && !bfd_link_pic (info)
7800 && h != NULL
7801 && (h->root.type == bfd_link_hash_defweak
7802 || !h->def_regular))))
a06ea964
NC
7803 break;
7804
7805 {
7806 struct elf_dyn_relocs *p;
7807 struct elf_dyn_relocs **head;
6353d82b 7808 int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
a06ea964
NC
7809
7810 /* We must copy these reloc types into the output file.
7811 Create a reloc section in dynobj and make room for
7812 this reloc. */
7813 if (sreloc == NULL)
7814 {
7815 if (htab->root.dynobj == NULL)
7816 htab->root.dynobj = abfd;
7817
7818 sreloc = _bfd_elf_make_dynamic_reloc_section
0608afa7 7819 (sec, htab->root.dynobj, LOG_FILE_ALIGN, abfd, /*rela? */ TRUE);
a06ea964
NC
7820
7821 if (sreloc == NULL)
7822 return FALSE;
7823 }
7824
7825 /* If this is a global symbol, we count the number of
7826 relocations we need for this symbol. */
7827 if (h != NULL)
7828 {
190eb1dd 7829 head = &h->dyn_relocs;
a06ea964
NC
7830 }
7831 else
7832 {
7833 /* Track dynamic relocs needed for local syms too.
7834 We really need local syms available to do this
7835 easily. Oh well. */
7836
7837 asection *s;
7838 void **vpp;
a06ea964
NC
7839
7840 isym = bfd_sym_from_r_symndx (&htab->sym_cache,
7841 abfd, r_symndx);
7842 if (isym == NULL)
7843 return FALSE;
7844
7845 s = bfd_section_from_elf_index (abfd, isym->st_shndx);
7846 if (s == NULL)
7847 s = sec;
7848
7849 /* Beware of type punned pointers vs strict aliasing
7850 rules. */
7851 vpp = &(elf_section_data (s)->local_dynrel);
7852 head = (struct elf_dyn_relocs **) vpp;
7853 }
7854
7855 p = *head;
7856 if (p == NULL || p->sec != sec)
7857 {
986f0783 7858 size_t amt = sizeof *p;
a06ea964
NC
7859 p = ((struct elf_dyn_relocs *)
7860 bfd_zalloc (htab->root.dynobj, amt));
7861 if (p == NULL)
7862 return FALSE;
7863 p->next = *head;
7864 *head = p;
7865 p->sec = sec;
7866 }
7867
7868 p->count += 1;
7869
6353d82b
JW
7870 if (elfNN_aarch64_howto_table[howto_index].pc_relative)
7871 p->pc_count += 1;
a06ea964
NC
7872 }
7873 break;
7874
7875 /* RR: We probably want to keep a consistency check that
7876 there are no dangling GOT_PAGE relocs. */
a6bb11b2 7877 case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
7bcccb57 7878 case BFD_RELOC_AARCH64_GOT_LD_PREL19:
7018c030 7879 case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
7bcccb57 7880 case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
a2e1db00 7881 case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
99ad26cb 7882 case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
7bcccb57 7883 case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
dc8008f5 7884 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
74a1bfe1 7885 case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
f955cccf 7886 case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
7bcccb57 7887 case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
389b8029 7888 case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
7bcccb57 7889 case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
f955cccf 7890 case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
1ada945d 7891 case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
0484b454
RL
7892 case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
7893 case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
a6bb11b2 7894 case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
7bcccb57 7895 case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
3c12b054 7896 case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
7ba7cfe4 7897 case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
94facae3 7898 case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
a6bb11b2 7899 case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
a6bb11b2 7900 case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
7bcccb57 7901 case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
043bf05a 7902 case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
3b957e5b
RL
7903 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
7904 case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
73f925cc 7905 case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
f69e4920 7906 case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
77a69ff8 7907 case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
a06ea964
NC
7908 {
7909 unsigned got_type;
7910 unsigned old_got_type;
7911
a6bb11b2 7912 got_type = aarch64_reloc_got_type (bfd_r_type);
a06ea964
NC
7913
7914 if (h)
7915 {
7916 h->got.refcount += 1;
cec5225b 7917 old_got_type = elf_aarch64_hash_entry (h)->got_type;
a06ea964
NC
7918 }
7919 else
7920 {
7921 struct elf_aarch64_local_symbol *locals;
7922
cec5225b 7923 if (!elfNN_aarch64_allocate_local_symbols
a06ea964
NC
7924 (abfd, symtab_hdr->sh_info))
7925 return FALSE;
7926
cec5225b 7927 locals = elf_aarch64_locals (abfd);
a06ea964
NC
7928 BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
7929 locals[r_symndx].got_refcount += 1;
7930 old_got_type = locals[r_symndx].got_type;
7931 }
7932
7933 /* If a variable is accessed with both general dynamic TLS
7934 methods, two slots may be created. */
7935 if (GOT_TLS_GD_ANY_P (old_got_type) && GOT_TLS_GD_ANY_P (got_type))
7936 got_type |= old_got_type;
7937
7938 /* We will already have issued an error message if there
7939 is a TLS/non-TLS mismatch, based on the symbol type.
7940 So just combine any TLS types needed. */
7941 if (old_got_type != GOT_UNKNOWN && old_got_type != GOT_NORMAL
7942 && got_type != GOT_NORMAL)
7943 got_type |= old_got_type;
7944
7945 /* If the symbol is accessed by both IE and GD methods, we
7946 are able to relax. Turn off the GD flag, without
7947 messing up with any other kind of TLS types that may be
7948 involved. */
7949 if ((got_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (got_type))
7950 got_type &= ~ (GOT_TLSDESC_GD | GOT_TLS_GD);
7951
7952 if (old_got_type != got_type)
7953 {
7954 if (h != NULL)
cec5225b 7955 elf_aarch64_hash_entry (h)->got_type = got_type;
a06ea964
NC
7956 else
7957 {
7958 struct elf_aarch64_local_symbol *locals;
cec5225b 7959 locals = elf_aarch64_locals (abfd);
a06ea964
NC
7960 BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
7961 locals[r_symndx].got_type = got_type;
7962 }
7963 }
7964
cc0efaa8
MS
7965 if (htab->root.dynobj == NULL)
7966 htab->root.dynobj = abfd;
7967 if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
7968 return FALSE;
a06ea964
NC
7969 break;
7970 }
7971
7e057737
SP
7972 case BFD_RELOC_AARCH64_BRANCH19:
7973 case BFD_RELOC_AARCH64_TSTBR14:
a6bb11b2
YZ
7974 case BFD_RELOC_AARCH64_CALL26:
7975 case BFD_RELOC_AARCH64_JUMP26:
a06ea964
NC
7976 /* If this is a local symbol then we resolve it
7977 directly without creating a PLT entry. */
7978 if (h == NULL)
7979 continue;
7980
7981 h->needs_plt = 1;
1419bbe5
WN
7982 if (h->plt.refcount <= 0)
7983 h->plt.refcount = 1;
7984 else
7985 h->plt.refcount += 1;
a06ea964 7986 break;
a6bb11b2
YZ
7987
7988 default:
7989 break;
a06ea964
NC
7990 }
7991 }
a6bb11b2 7992
a06ea964
NC
7993 return TRUE;
7994}
7995
7996/* Treat mapping symbols as special target symbols. */
7997
7998static bfd_boolean
cec5225b 7999elfNN_aarch64_is_target_special_symbol (bfd *abfd ATTRIBUTE_UNUSED,
a06ea964
NC
8000 asymbol *sym)
8001{
8002 return bfd_is_aarch64_special_symbol_name (sym->name,
8003 BFD_AARCH64_SPECIAL_SYM_TYPE_ANY);
8004}
8005
e7679060
AM
8006/* If the ELF symbol SYM might be a function in SEC, return the
8007 function size and set *CODE_OFF to the function's entry point,
8008 otherwise return zero. */
a06ea964 8009
e7679060
AM
8010static bfd_size_type
8011elfNN_aarch64_maybe_function_sym (const asymbol *sym, asection *sec,
8012 bfd_vma *code_off)
8013{
8014 bfd_size_type size;
a06ea964 8015
e7679060
AM
8016 if ((sym->flags & (BSF_SECTION_SYM | BSF_FILE | BSF_OBJECT
8017 | BSF_THREAD_LOCAL | BSF_RELC | BSF_SRELC)) != 0
8018 || sym->section != sec)
8019 return 0;
a06ea964 8020
e7679060
AM
8021 if (!(sym->flags & BSF_SYNTHETIC))
8022 switch (ELF_ST_TYPE (((elf_symbol_type *) sym)->internal_elf_sym.st_info))
8023 {
a06ea964
NC
8024 case STT_FUNC:
8025 case STT_NOTYPE:
a06ea964 8026 break;
e7679060
AM
8027 default:
8028 return 0;
8029 }
a06ea964 8030
e7679060
AM
8031 if ((sym->flags & BSF_LOCAL)
8032 && bfd_is_aarch64_special_symbol_name (sym->name,
8033 BFD_AARCH64_SPECIAL_SYM_TYPE_ANY))
8034 return 0;
a06ea964 8035
e7679060
AM
8036 *code_off = sym->value;
8037 size = 0;
8038 if (!(sym->flags & BSF_SYNTHETIC))
8039 size = ((elf_symbol_type *) sym)->internal_elf_sym.st_size;
8040 if (size == 0)
8041 size = 1;
8042 return size;
a06ea964
NC
8043}
8044
8045static bfd_boolean
cec5225b 8046elfNN_aarch64_find_inliner_info (bfd *abfd,
a06ea964
NC
8047 const char **filename_ptr,
8048 const char **functionname_ptr,
8049 unsigned int *line_ptr)
8050{
8051 bfd_boolean found;
8052 found = _bfd_dwarf2_find_inliner_info
8053 (abfd, filename_ptr,
8054 functionname_ptr, line_ptr, &elf_tdata (abfd)->dwarf2_find_line_info);
8055 return found;
8056}
8057
8058
ed7e9d0b
AM
8059static bfd_boolean
8060elfNN_aarch64_init_file_header (bfd *abfd, struct bfd_link_info *link_info)
a06ea964
NC
8061{
8062 Elf_Internal_Ehdr *i_ehdrp; /* ELF file header, internal form. */
8063
ed7e9d0b
AM
8064 if (!_bfd_elf_init_file_header (abfd, link_info))
8065 return FALSE;
8066
a06ea964 8067 i_ehdrp = elf_elfheader (abfd);
a06ea964 8068 i_ehdrp->e_ident[EI_ABIVERSION] = AARCH64_ELF_ABI_VERSION;
ed7e9d0b 8069 return TRUE;
a06ea964
NC
8070}
8071
8072static enum elf_reloc_type_class
cec5225b 8073elfNN_aarch64_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
7e612e98
AM
8074 const asection *rel_sec ATTRIBUTE_UNUSED,
8075 const Elf_Internal_Rela *rela)
a06ea964 8076{
f2e6a843
SN
8077 struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
8078
8079 if (htab->root.dynsym != NULL
8080 && htab->root.dynsym->contents != NULL)
8081 {
8082 /* Check relocation against STT_GNU_IFUNC symbol if there are
8083 dynamic symbols. */
8084 bfd *abfd = info->output_bfd;
8085 const struct elf_backend_data *bed = get_elf_backend_data (abfd);
8086 unsigned long r_symndx = ELFNN_R_SYM (rela->r_info);
8087 if (r_symndx != STN_UNDEF)
8088 {
8089 Elf_Internal_Sym sym;
8090 if (!bed->s->swap_symbol_in (abfd,
8091 (htab->root.dynsym->contents
8092 + r_symndx * bed->s->sizeof_sym),
8093 0, &sym))
8094 {
8095 /* xgettext:c-format */
871b3ab2 8096 _bfd_error_handler (_("%pB symbol number %lu references"
f2e6a843
SN
8097 " nonexistent SHT_SYMTAB_SHNDX section"),
8098 abfd, r_symndx);
8099 /* Ideally an error class should be returned here. */
8100 }
8101 else if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
8102 return reloc_class_ifunc;
8103 }
8104 }
8105
cec5225b 8106 switch ((int) ELFNN_R_TYPE (rela->r_info))
a06ea964 8107 {
f2e6a843
SN
8108 case AARCH64_R (IRELATIVE):
8109 return reloc_class_ifunc;
a6bb11b2 8110 case AARCH64_R (RELATIVE):
a06ea964 8111 return reloc_class_relative;
a6bb11b2 8112 case AARCH64_R (JUMP_SLOT):
a06ea964 8113 return reloc_class_plt;
a6bb11b2 8114 case AARCH64_R (COPY):
a06ea964
NC
8115 return reloc_class_copy;
8116 default:
8117 return reloc_class_normal;
8118 }
8119}
8120
a06ea964
NC
8121/* Handle an AArch64 specific section when reading an object file. This is
8122 called when bfd_section_from_shdr finds a section with an unknown
8123 type. */
8124
8125static bfd_boolean
cec5225b 8126elfNN_aarch64_section_from_shdr (bfd *abfd,
a06ea964
NC
8127 Elf_Internal_Shdr *hdr,
8128 const char *name, int shindex)
8129{
8130 /* There ought to be a place to keep ELF backend specific flags, but
8131 at the moment there isn't one. We just keep track of the
8132 sections by their name, instead. Fortunately, the ABI gives
8133 names for all the AArch64 specific sections, so we will probably get
8134 away with this. */
8135 switch (hdr->sh_type)
8136 {
8137 case SHT_AARCH64_ATTRIBUTES:
8138 break;
8139
8140 default:
8141 return FALSE;
8142 }
8143
8144 if (!_bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
8145 return FALSE;
8146
8147 return TRUE;
8148}
8149
8150/* A structure used to record a list of sections, independently
8151 of the next and prev fields in the asection structure. */
8152typedef struct section_list
8153{
8154 asection *sec;
8155 struct section_list *next;
8156 struct section_list *prev;
8157}
8158section_list;
8159
8160/* Unfortunately we need to keep a list of sections for which
8161 an _aarch64_elf_section_data structure has been allocated. This
cec5225b 8162 is because it is possible for functions like elfNN_aarch64_write_section
a06ea964
NC
8163 to be called on a section which has had an elf_data_structure
8164 allocated for it (and so the used_by_bfd field is valid) but
8165 for which the AArch64 extended version of this structure - the
8166 _aarch64_elf_section_data structure - has not been allocated. */
8167static section_list *sections_with_aarch64_elf_section_data = NULL;
8168
8169static void
8170record_section_with_aarch64_elf_section_data (asection *sec)
8171{
8172 struct section_list *entry;
8173
8174 entry = bfd_malloc (sizeof (*entry));
8175 if (entry == NULL)
8176 return;
8177 entry->sec = sec;
8178 entry->next = sections_with_aarch64_elf_section_data;
8179 entry->prev = NULL;
8180 if (entry->next != NULL)
8181 entry->next->prev = entry;
8182 sections_with_aarch64_elf_section_data = entry;
8183}
8184
8185static struct section_list *
8186find_aarch64_elf_section_entry (asection *sec)
8187{
8188 struct section_list *entry;
8189 static struct section_list *last_entry = NULL;
8190
8191 /* This is a short cut for the typical case where the sections are added
8192 to the sections_with_aarch64_elf_section_data list in forward order and
8193 then looked up here in backwards order. This makes a real difference
8194 to the ld-srec/sec64k.exp linker test. */
8195 entry = sections_with_aarch64_elf_section_data;
8196 if (last_entry != NULL)
8197 {
8198 if (last_entry->sec == sec)
8199 entry = last_entry;
8200 else if (last_entry->next != NULL && last_entry->next->sec == sec)
8201 entry = last_entry->next;
8202 }
8203
8204 for (; entry; entry = entry->next)
8205 if (entry->sec == sec)
8206 break;
8207
8208 if (entry)
8209 /* Record the entry prior to this one - it is the entry we are
8210 most likely to want to locate next time. Also this way if we
8211 have been called from
8212 unrecord_section_with_aarch64_elf_section_data () we will not
8213 be caching a pointer that is about to be freed. */
8214 last_entry = entry->prev;
8215
8216 return entry;
8217}
8218
8219static void
8220unrecord_section_with_aarch64_elf_section_data (asection *sec)
8221{
8222 struct section_list *entry;
8223
8224 entry = find_aarch64_elf_section_entry (sec);
8225
8226 if (entry)
8227 {
8228 if (entry->prev != NULL)
8229 entry->prev->next = entry->next;
8230 if (entry->next != NULL)
8231 entry->next->prev = entry->prev;
8232 if (entry == sections_with_aarch64_elf_section_data)
8233 sections_with_aarch64_elf_section_data = entry->next;
8234 free (entry);
8235 }
8236}
8237
8238
8239typedef struct
8240{
8241 void *finfo;
8242 struct bfd_link_info *info;
8243 asection *sec;
8244 int sec_shndx;
8245 int (*func) (void *, const char *, Elf_Internal_Sym *,
8246 asection *, struct elf_link_hash_entry *);
8247} output_arch_syminfo;
8248
8249enum map_symbol_type
8250{
8251 AARCH64_MAP_INSN,
8252 AARCH64_MAP_DATA
8253};
8254
8255
8256/* Output a single mapping symbol. */
8257
8258static bfd_boolean
cec5225b 8259elfNN_aarch64_output_map_sym (output_arch_syminfo *osi,
a06ea964
NC
8260 enum map_symbol_type type, bfd_vma offset)
8261{
8262 static const char *names[2] = { "$x", "$d" };
8263 Elf_Internal_Sym sym;
8264
8265 sym.st_value = (osi->sec->output_section->vma
8266 + osi->sec->output_offset + offset);
8267 sym.st_size = 0;
8268 sym.st_other = 0;
8269 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_NOTYPE);
8270 sym.st_shndx = osi->sec_shndx;
8271 return osi->func (osi->finfo, names[type], &sym, osi->sec, NULL) == 1;
8272}
8273
a06ea964
NC
8274/* Output a single local symbol for a generated stub. */
8275
8276static bfd_boolean
cec5225b 8277elfNN_aarch64_output_stub_sym (output_arch_syminfo *osi, const char *name,
a06ea964
NC
8278 bfd_vma offset, bfd_vma size)
8279{
8280 Elf_Internal_Sym sym;
8281
8282 sym.st_value = (osi->sec->output_section->vma
8283 + osi->sec->output_offset + offset);
8284 sym.st_size = size;
8285 sym.st_other = 0;
8286 sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
8287 sym.st_shndx = osi->sec_shndx;
8288 return osi->func (osi->finfo, name, &sym, osi->sec, NULL) == 1;
8289}
8290
8291static bfd_boolean
8292aarch64_map_one_stub (struct bfd_hash_entry *gen_entry, void *in_arg)
8293{
cec5225b 8294 struct elf_aarch64_stub_hash_entry *stub_entry;
a06ea964
NC
8295 asection *stub_sec;
8296 bfd_vma addr;
8297 char *stub_name;
8298 output_arch_syminfo *osi;
8299
8300 /* Massage our args to the form they really have. */
cec5225b 8301 stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
a06ea964
NC
8302 osi = (output_arch_syminfo *) in_arg;
8303
8304 stub_sec = stub_entry->stub_sec;
8305
8306 /* Ensure this stub is attached to the current section being
8307 processed. */
8308 if (stub_sec != osi->sec)
8309 return TRUE;
8310
8311 addr = (bfd_vma) stub_entry->stub_offset;
8312
8313 stub_name = stub_entry->output_name;
8314
8315 switch (stub_entry->stub_type)
8316 {
8317 case aarch64_stub_adrp_branch:
cec5225b 8318 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
a06ea964
NC
8319 sizeof (aarch64_adrp_branch_stub)))
8320 return FALSE;
cec5225b 8321 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
a06ea964
NC
8322 return FALSE;
8323 break;
8324 case aarch64_stub_long_branch:
cec5225b 8325 if (!elfNN_aarch64_output_stub_sym
a06ea964
NC
8326 (osi, stub_name, addr, sizeof (aarch64_long_branch_stub)))
8327 return FALSE;
cec5225b 8328 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
a06ea964 8329 return FALSE;
cec5225b 8330 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_DATA, addr + 16))
a06ea964
NC
8331 return FALSE;
8332 break;
68fcca92
JW
8333 case aarch64_stub_erratum_835769_veneer:
8334 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
8335 sizeof (aarch64_erratum_835769_stub)))
8336 return FALSE;
8337 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
8338 return FALSE;
8339 break;
4106101c
MS
8340 case aarch64_stub_erratum_843419_veneer:
8341 if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
8342 sizeof (aarch64_erratum_843419_stub)))
8343 return FALSE;
8344 if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
8345 return FALSE;
8346 break;
9fca35fc
TC
8347 case aarch64_stub_none:
8348 break;
4106101c 8349
a06ea964 8350 default:
8e2fe09f 8351 abort ();
a06ea964
NC
8352 }
8353
8354 return TRUE;
8355}
8356
8357/* Output mapping symbols for linker generated sections. */
8358
8359static bfd_boolean
cec5225b 8360elfNN_aarch64_output_arch_local_syms (bfd *output_bfd,
a06ea964
NC
8361 struct bfd_link_info *info,
8362 void *finfo,
8363 int (*func) (void *, const char *,
8364 Elf_Internal_Sym *,
8365 asection *,
8366 struct elf_link_hash_entry
8367 *))
8368{
8369 output_arch_syminfo osi;
cec5225b 8370 struct elf_aarch64_link_hash_table *htab;
a06ea964 8371
cec5225b 8372 htab = elf_aarch64_hash_table (info);
a06ea964
NC
8373
8374 osi.finfo = finfo;
8375 osi.info = info;
8376 osi.func = func;
8377
8378 /* Long calls stubs. */
8379 if (htab->stub_bfd && htab->stub_bfd->sections)
8380 {
8381 asection *stub_sec;
8382
8383 for (stub_sec = htab->stub_bfd->sections;
8384 stub_sec != NULL; stub_sec = stub_sec->next)
8385 {
8386 /* Ignore non-stub sections. */
8387 if (!strstr (stub_sec->name, STUB_SUFFIX))
8388 continue;
8389
8390 osi.sec = stub_sec;
8391
8392 osi.sec_shndx = _bfd_elf_section_from_bfd_section
8393 (output_bfd, osi.sec->output_section);
8394
61865519
MS
8395 /* The first instruction in a stub is always a branch. */
8396 if (!elfNN_aarch64_output_map_sym (&osi, AARCH64_MAP_INSN, 0))
8397 return FALSE;
8398
a06ea964
NC
8399 bfd_hash_traverse (&htab->stub_hash_table, aarch64_map_one_stub,
8400 &osi);
8401 }
8402 }
8403
8404 /* Finally, output mapping symbols for the PLT. */
8405 if (!htab->root.splt || htab->root.splt->size == 0)
8406 return TRUE;
8407
a06ea964
NC
8408 osi.sec_shndx = _bfd_elf_section_from_bfd_section
8409 (output_bfd, htab->root.splt->output_section);
8410 osi.sec = htab->root.splt;
8411
73524045 8412 elfNN_aarch64_output_map_sym (&osi, AARCH64_MAP_INSN, 0);
a06ea964
NC
8413
8414 return TRUE;
8415
8416}
8417
8418/* Allocate target specific section data. */
8419
8420static bfd_boolean
cec5225b 8421elfNN_aarch64_new_section_hook (bfd *abfd, asection *sec)
a06ea964
NC
8422{
8423 if (!sec->used_by_bfd)
8424 {
8425 _aarch64_elf_section_data *sdata;
986f0783 8426 size_t amt = sizeof (*sdata);
a06ea964
NC
8427
8428 sdata = bfd_zalloc (abfd, amt);
8429 if (sdata == NULL)
8430 return FALSE;
8431 sec->used_by_bfd = sdata;
8432 }
8433
8434 record_section_with_aarch64_elf_section_data (sec);
8435
8436 return _bfd_elf_new_section_hook (abfd, sec);
8437}
8438
8439
8440static void
8441unrecord_section_via_map_over_sections (bfd *abfd ATTRIBUTE_UNUSED,
8442 asection *sec,
8443 void *ignore ATTRIBUTE_UNUSED)
8444{
8445 unrecord_section_with_aarch64_elf_section_data (sec);
8446}
8447
8448static bfd_boolean
cec5225b 8449elfNN_aarch64_close_and_cleanup (bfd *abfd)
a06ea964
NC
8450{
8451 if (abfd->sections)
8452 bfd_map_over_sections (abfd,
8453 unrecord_section_via_map_over_sections, NULL);
8454
8455 return _bfd_elf_close_and_cleanup (abfd);
8456}
8457
8458static bfd_boolean
cec5225b 8459elfNN_aarch64_bfd_free_cached_info (bfd *abfd)
a06ea964
NC
8460{
8461 if (abfd->sections)
8462 bfd_map_over_sections (abfd,
8463 unrecord_section_via_map_over_sections, NULL);
8464
8465 return _bfd_free_cached_info (abfd);
8466}
8467
a06ea964
NC
8468/* Create dynamic sections. This is different from the ARM backend in that
8469 the got, plt, gotplt and their relocation sections are all created in the
8470 standard part of the bfd elf backend. */
8471
8472static bfd_boolean
cec5225b 8473elfNN_aarch64_create_dynamic_sections (bfd *dynobj,
a06ea964
NC
8474 struct bfd_link_info *info)
8475{
cc0efaa8
MS
8476 /* We need to create .got section. */
8477 if (!aarch64_elf_create_got_section (dynobj, info))
8478 return FALSE;
a06ea964 8479
9d19e4fd 8480 return _bfd_elf_create_dynamic_sections (dynobj, info);
a06ea964
NC
8481}
8482
8483
8484/* Allocate space in .plt, .got and associated reloc sections for
8485 dynamic relocs. */
8486
8487static bfd_boolean
cec5225b 8488elfNN_aarch64_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
a06ea964
NC
8489{
8490 struct bfd_link_info *info;
cec5225b
YZ
8491 struct elf_aarch64_link_hash_table *htab;
8492 struct elf_aarch64_link_hash_entry *eh;
a06ea964
NC
8493 struct elf_dyn_relocs *p;
8494
8495 /* An example of a bfd_link_hash_indirect symbol is versioned
8496 symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
8497 -> __gxx_personality_v0(bfd_link_hash_defined)
8498
8499 There is no need to process bfd_link_hash_indirect symbols here
8500 because we will also be presented with the concrete instance of
cec5225b 8501 the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
a06ea964 8502 called to copy all relevant data from the generic to the concrete
2d0ca824 8503 symbol instance. */
a06ea964
NC
8504 if (h->root.type == bfd_link_hash_indirect)
8505 return TRUE;
8506
8507 if (h->root.type == bfd_link_hash_warning)
8508 h = (struct elf_link_hash_entry *) h->root.u.i.link;
8509
8510 info = (struct bfd_link_info *) inf;
cec5225b 8511 htab = elf_aarch64_hash_table (info);
a06ea964 8512
1419bbe5
WN
8513 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
8514 here if it is defined and referenced in a non-shared object. */
8515 if (h->type == STT_GNU_IFUNC
8516 && h->def_regular)
8517 return TRUE;
8518 else if (htab->root.dynamic_sections_created && h->plt.refcount > 0)
a06ea964
NC
8519 {
8520 /* Make sure this symbol is output as a dynamic symbol.
07d6d2b8 8521 Undefined weak syms won't yet be marked as dynamic. */
ff07562f
JW
8522 if (h->dynindx == -1 && !h->forced_local
8523 && h->root.type == bfd_link_hash_undefweak)
a06ea964
NC
8524 {
8525 if (!bfd_elf_link_record_dynamic_symbol (info, h))
8526 return FALSE;
8527 }
8528
0e1862bb 8529 if (bfd_link_pic (info) || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
a06ea964
NC
8530 {
8531 asection *s = htab->root.splt;
8532
8533 /* If this is the first .plt entry, make room for the special
8534 first entry. */
8535 if (s->size == 0)
8536 s->size += htab->plt_header_size;
8537
8538 h->plt.offset = s->size;
8539
8540 /* If this symbol is not defined in a regular file, and we are
8541 not generating a shared library, then set the symbol to this
8542 location in the .plt. This is required to make function
8543 pointers compare as equal between the normal executable and
8544 the shared library. */
0e1862bb 8545 if (!bfd_link_pic (info) && !h->def_regular)
a06ea964
NC
8546 {
8547 h->root.u.def.section = s;
8548 h->root.u.def.value = h->plt.offset;
8549 }
8550
8551 /* Make room for this entry. For now we only create the
8552 small model PLT entries. We later need to find a way
8553 of relaxing into these from the large model PLT entries. */
37c18eed 8554 s->size += htab->plt_entry_size;
a06ea964
NC
8555
8556 /* We also need to make an entry in the .got.plt section, which
8557 will be placed in the .got section by the linker script. */
8558 htab->root.sgotplt->size += GOT_ENTRY_SIZE;
8559
8560 /* We also need to make an entry in the .rela.plt section. */
8561 htab->root.srelplt->size += RELOC_SIZE (htab);
8562
8563 /* We need to ensure that all GOT entries that serve the PLT
8564 are consecutive with the special GOT slots [0] [1] and
8565 [2]. Any addtional relocations, such as
8566 R_AARCH64_TLSDESC, must be placed after the PLT related
8567 entries. We abuse the reloc_count such that during
8568 sizing we adjust reloc_count to indicate the number of
8569 PLT related reserved entries. In subsequent phases when
8570 filling in the contents of the reloc entries, PLT related
8571 entries are placed by computing their PLT index (0
8572 .. reloc_count). While other none PLT relocs are placed
8573 at the slot indicated by reloc_count and reloc_count is
8574 updated. */
8575
8576 htab->root.srelplt->reloc_count++;
823710d5
SN
8577
8578 /* Mark the DSO in case R_<CLS>_JUMP_SLOT relocs against
8579 variant PCS symbols are present. */
8580 if (h->other & STO_AARCH64_VARIANT_PCS)
8581 htab->variant_pcs = 1;
8582
a06ea964
NC
8583 }
8584 else
8585 {
8586 h->plt.offset = (bfd_vma) - 1;
8587 h->needs_plt = 0;
8588 }
8589 }
8590 else
8591 {
8592 h->plt.offset = (bfd_vma) - 1;
8593 h->needs_plt = 0;
8594 }
8595
cec5225b 8596 eh = (struct elf_aarch64_link_hash_entry *) h;
a06ea964
NC
8597 eh->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
8598
8599 if (h->got.refcount > 0)
8600 {
8601 bfd_boolean dyn;
cec5225b 8602 unsigned got_type = elf_aarch64_hash_entry (h)->got_type;
a06ea964
NC
8603
8604 h->got.offset = (bfd_vma) - 1;
8605
8606 dyn = htab->root.dynamic_sections_created;
8607
8608 /* Make sure this symbol is output as a dynamic symbol.
07d6d2b8 8609 Undefined weak syms won't yet be marked as dynamic. */
ff07562f
JW
8610 if (dyn && h->dynindx == -1 && !h->forced_local
8611 && h->root.type == bfd_link_hash_undefweak)
a06ea964
NC
8612 {
8613 if (!bfd_elf_link_record_dynamic_symbol (info, h))
8614 return FALSE;
8615 }
8616
8617 if (got_type == GOT_UNKNOWN)
8618 {
8619 }
8620 else if (got_type == GOT_NORMAL)
8621 {
8622 h->got.offset = htab->root.sgot->size;
8623 htab->root.sgot->size += GOT_ENTRY_SIZE;
8624 if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
8625 || h->root.type != bfd_link_hash_undefweak)
0e1862bb 8626 && (bfd_link_pic (info)
a377ae2a
SN
8627 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h))
8628 /* Undefined weak symbol in static PIE resolves to 0 without
8629 any dynamic relocations. */
8630 && !UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
a06ea964
NC
8631 {
8632 htab->root.srelgot->size += RELOC_SIZE (htab);
8633 }
8634 }
8635 else
8636 {
8637 int indx;
8638 if (got_type & GOT_TLSDESC_GD)
8639 {
8640 eh->tlsdesc_got_jump_table_offset =
8641 (htab->root.sgotplt->size
8642 - aarch64_compute_jump_table_size (htab));
8643 htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
8644 h->got.offset = (bfd_vma) - 2;
8645 }
8646
8647 if (got_type & GOT_TLS_GD)
8648 {
8649 h->got.offset = htab->root.sgot->size;
8650 htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
8651 }
8652
8653 if (got_type & GOT_TLS_IE)
8654 {
8655 h->got.offset = htab->root.sgot->size;
8656 htab->root.sgot->size += GOT_ENTRY_SIZE;
8657 }
8658
8659 indx = h && h->dynindx != -1 ? h->dynindx : 0;
8660 if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
8661 || h->root.type != bfd_link_hash_undefweak)
6dda7875 8662 && (!bfd_link_executable (info)
a06ea964
NC
8663 || indx != 0
8664 || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
8665 {
8666 if (got_type & GOT_TLSDESC_GD)
8667 {
8668 htab->root.srelplt->size += RELOC_SIZE (htab);
8669 /* Note reloc_count not incremented here! We have
8670 already adjusted reloc_count for this relocation
8671 type. */
8672
8673 /* TLSDESC PLT is now needed, but not yet determined. */
9bcc30e4 8674 htab->root.tlsdesc_plt = (bfd_vma) - 1;
a06ea964
NC
8675 }
8676
8677 if (got_type & GOT_TLS_GD)
8678 htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
8679
8680 if (got_type & GOT_TLS_IE)
8681 htab->root.srelgot->size += RELOC_SIZE (htab);
8682 }
8683 }
8684 }
8685 else
8686 {
8687 h->got.offset = (bfd_vma) - 1;
8688 }
8689
190eb1dd 8690 if (h->dyn_relocs == NULL)
a06ea964
NC
8691 return TRUE;
8692
8693 /* In the shared -Bsymbolic case, discard space allocated for
8694 dynamic pc-relative relocs against symbols which turn out to be
8695 defined in regular objects. For the normal shared case, discard
8696 space for pc-relative relocs that have become local due to symbol
8697 visibility changes. */
8698
0e1862bb 8699 if (bfd_link_pic (info))
a06ea964
NC
8700 {
8701 /* Relocs that use pc_count are those that appear on a call
07d6d2b8
AM
8702 insn, or certain REL relocs that can generated via assembly.
8703 We want calls to protected symbols to resolve directly to the
8704 function rather than going via the plt. If people want
8705 function pointer comparisons to work as expected then they
8706 should avoid writing weird assembly. */
a06ea964
NC
8707 if (SYMBOL_CALLS_LOCAL (info, h))
8708 {
8709 struct elf_dyn_relocs **pp;
8710
190eb1dd 8711 for (pp = &h->dyn_relocs; (p = *pp) != NULL;)
a06ea964
NC
8712 {
8713 p->count -= p->pc_count;
8714 p->pc_count = 0;
8715 if (p->count == 0)
8716 *pp = p->next;
8717 else
8718 pp = &p->next;
8719 }
8720 }
8721
8722 /* Also discard relocs on undefined weak syms with non-default
07d6d2b8 8723 visibility. */
190eb1dd 8724 if (h->dyn_relocs != NULL && h->root.type == bfd_link_hash_undefweak)
a06ea964 8725 {
ddb7fd0f
L
8726 if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
8727 || UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
190eb1dd 8728 h->dyn_relocs = NULL;
a06ea964
NC
8729
8730 /* Make sure undefined weak symbols are output as a dynamic
8731 symbol in PIEs. */
8732 else if (h->dynindx == -1
8733 && !h->forced_local
ff07562f 8734 && h->root.type == bfd_link_hash_undefweak
a06ea964
NC
8735 && !bfd_elf_link_record_dynamic_symbol (info, h))
8736 return FALSE;
8737 }
8738
8739 }
8740 else if (ELIMINATE_COPY_RELOCS)
8741 {
8742 /* For the non-shared case, discard space for relocs against
07d6d2b8
AM
8743 symbols which turn out to need copy relocs or are not
8744 dynamic. */
a06ea964
NC
8745
8746 if (!h->non_got_ref
8747 && ((h->def_dynamic
8748 && !h->def_regular)
8749 || (htab->root.dynamic_sections_created
8750 && (h->root.type == bfd_link_hash_undefweak
8751 || h->root.type == bfd_link_hash_undefined))))
8752 {
8753 /* Make sure this symbol is output as a dynamic symbol.
8754 Undefined weak syms won't yet be marked as dynamic. */
8755 if (h->dynindx == -1
8756 && !h->forced_local
ff07562f 8757 && h->root.type == bfd_link_hash_undefweak
a06ea964
NC
8758 && !bfd_elf_link_record_dynamic_symbol (info, h))
8759 return FALSE;
8760
8761 /* If that succeeded, we know we'll be keeping all the
8762 relocs. */
8763 if (h->dynindx != -1)
8764 goto keep;
8765 }
8766
190eb1dd 8767 h->dyn_relocs = NULL;
a06ea964
NC
8768
8769 keep:;
8770 }
8771
8772 /* Finally, allocate space. */
190eb1dd 8773 for (p = h->dyn_relocs; p != NULL; p = p->next)
a06ea964
NC
8774 {
8775 asection *sreloc;
8776
8777 sreloc = elf_section_data (p->sec)->sreloc;
8778
8779 BFD_ASSERT (sreloc != NULL);
8780
8781 sreloc->size += p->count * RELOC_SIZE (htab);
8782 }
8783
8784 return TRUE;
8785}
8786
1419bbe5
WN
8787/* Allocate space in .plt, .got and associated reloc sections for
8788 ifunc dynamic relocs. */
8789
8790static bfd_boolean
8791elfNN_aarch64_allocate_ifunc_dynrelocs (struct elf_link_hash_entry *h,
8792 void *inf)
8793{
8794 struct bfd_link_info *info;
8795 struct elf_aarch64_link_hash_table *htab;
1419bbe5
WN
8796
8797 /* An example of a bfd_link_hash_indirect symbol is versioned
8798 symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
8799 -> __gxx_personality_v0(bfd_link_hash_defined)
8800
8801 There is no need to process bfd_link_hash_indirect symbols here
8802 because we will also be presented with the concrete instance of
8803 the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
8804 called to copy all relevant data from the generic to the concrete
2d0ca824 8805 symbol instance. */
1419bbe5
WN
8806 if (h->root.type == bfd_link_hash_indirect)
8807 return TRUE;
8808
8809 if (h->root.type == bfd_link_hash_warning)
8810 h = (struct elf_link_hash_entry *) h->root.u.i.link;
8811
8812 info = (struct bfd_link_info *) inf;
8813 htab = elf_aarch64_hash_table (info);
8814
1419bbe5
WN
8815 /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
8816 here if it is defined and referenced in a non-shared object. */
8817 if (h->type == STT_GNU_IFUNC
8818 && h->def_regular)
8819 return _bfd_elf_allocate_ifunc_dyn_relocs (info, h,
190eb1dd 8820 &h->dyn_relocs,
1419bbe5
WN
8821 htab->plt_entry_size,
8822 htab->plt_header_size,
233cc9c1
L
8823 GOT_ENTRY_SIZE,
8824 FALSE);
1419bbe5
WN
8825 return TRUE;
8826}
8827
1419bbe5
WN
8828/* Allocate space in .plt, .got and associated reloc sections for
8829 local ifunc dynamic relocs. */
8830
8831static bfd_boolean
8832elfNN_aarch64_allocate_local_ifunc_dynrelocs (void **slot, void *inf)
8833{
8834 struct elf_link_hash_entry *h
8835 = (struct elf_link_hash_entry *) *slot;
8836
8837 if (h->type != STT_GNU_IFUNC
8838 || !h->def_regular
8839 || !h->ref_regular
8840 || !h->forced_local
8841 || h->root.type != bfd_link_hash_defined)
8842 abort ();
8843
8844 return elfNN_aarch64_allocate_ifunc_dynrelocs (h, inf);
8845}
a06ea964 8846
a06ea964
NC
8847/* This is the most important function of all . Innocuosly named
8848 though ! */
2d0ca824 8849
a06ea964 8850static bfd_boolean
cec5225b 8851elfNN_aarch64_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
a06ea964
NC
8852 struct bfd_link_info *info)
8853{
cec5225b 8854 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC
8855 bfd *dynobj;
8856 asection *s;
8857 bfd_boolean relocs;
8858 bfd *ibfd;
8859
cec5225b 8860 htab = elf_aarch64_hash_table ((info));
a06ea964
NC
8861 dynobj = htab->root.dynobj;
8862
8863 BFD_ASSERT (dynobj != NULL);
8864
8865 if (htab->root.dynamic_sections_created)
8866 {
9b8b325a 8867 if (bfd_link_executable (info) && !info->nointerp)
a06ea964
NC
8868 {
8869 s = bfd_get_linker_section (dynobj, ".interp");
8870 if (s == NULL)
8871 abort ();
8872 s->size = sizeof ELF_DYNAMIC_INTERPRETER;
8873 s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
8874 }
8875 }
8876
8877 /* Set up .got offsets for local syms, and space for local dynamic
8878 relocs. */
c72f2fb2 8879 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
a06ea964
NC
8880 {
8881 struct elf_aarch64_local_symbol *locals = NULL;
8882 Elf_Internal_Shdr *symtab_hdr;
8883 asection *srel;
8884 unsigned int i;
8885
8886 if (!is_aarch64_elf (ibfd))
8887 continue;
8888
8889 for (s = ibfd->sections; s != NULL; s = s->next)
8890 {
8891 struct elf_dyn_relocs *p;
8892
8893 for (p = (struct elf_dyn_relocs *)
8894 (elf_section_data (s)->local_dynrel); p != NULL; p = p->next)
8895 {
8896 if (!bfd_is_abs_section (p->sec)
8897 && bfd_is_abs_section (p->sec->output_section))
8898 {
8899 /* Input section has been discarded, either because
8900 it is a copy of a linkonce section or due to
8901 linker script /DISCARD/, so we'll be discarding
8902 the relocs too. */
8903 }
8904 else if (p->count != 0)
8905 {
8906 srel = elf_section_data (p->sec)->sreloc;
8907 srel->size += p->count * RELOC_SIZE (htab);
8908 if ((p->sec->output_section->flags & SEC_READONLY) != 0)
8909 info->flags |= DF_TEXTREL;
8910 }
8911 }
8912 }
8913
cec5225b 8914 locals = elf_aarch64_locals (ibfd);
a06ea964
NC
8915 if (!locals)
8916 continue;
8917
8918 symtab_hdr = &elf_symtab_hdr (ibfd);
8919 srel = htab->root.srelgot;
8920 for (i = 0; i < symtab_hdr->sh_info; i++)
8921 {
8922 locals[i].got_offset = (bfd_vma) - 1;
8923 locals[i].tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
8924 if (locals[i].got_refcount > 0)
8925 {
8926 unsigned got_type = locals[i].got_type;
8927 if (got_type & GOT_TLSDESC_GD)
8928 {
8929 locals[i].tlsdesc_got_jump_table_offset =
8930 (htab->root.sgotplt->size
8931 - aarch64_compute_jump_table_size (htab));
8932 htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
8933 locals[i].got_offset = (bfd_vma) - 2;
8934 }
8935
8936 if (got_type & GOT_TLS_GD)
8937 {
8938 locals[i].got_offset = htab->root.sgot->size;
8939 htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
8940 }
8941
b53b1bed
JW
8942 if (got_type & GOT_TLS_IE
8943 || got_type & GOT_NORMAL)
a06ea964
NC
8944 {
8945 locals[i].got_offset = htab->root.sgot->size;
8946 htab->root.sgot->size += GOT_ENTRY_SIZE;
8947 }
8948
8949 if (got_type == GOT_UNKNOWN)
8950 {
8951 }
8952
0e1862bb 8953 if (bfd_link_pic (info))
a06ea964
NC
8954 {
8955 if (got_type & GOT_TLSDESC_GD)
8956 {
8957 htab->root.srelplt->size += RELOC_SIZE (htab);
8958 /* Note RELOC_COUNT not incremented here! */
9bcc30e4 8959 htab->root.tlsdesc_plt = (bfd_vma) - 1;
a06ea964
NC
8960 }
8961
8962 if (got_type & GOT_TLS_GD)
8963 htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
8964
b53b1bed
JW
8965 if (got_type & GOT_TLS_IE
8966 || got_type & GOT_NORMAL)
a06ea964
NC
8967 htab->root.srelgot->size += RELOC_SIZE (htab);
8968 }
8969 }
8970 else
8971 {
8972 locals[i].got_refcount = (bfd_vma) - 1;
8973 }
8974 }
8975 }
8976
8977
8978 /* Allocate global sym .plt and .got entries, and space for global
8979 sym dynamic relocs. */
cec5225b 8980 elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_dynrelocs,
a06ea964
NC
8981 info);
8982
1419bbe5
WN
8983 /* Allocate global ifunc sym .plt and .got entries, and space for global
8984 ifunc sym dynamic relocs. */
8985 elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_ifunc_dynrelocs,
8986 info);
8987
1419bbe5
WN
8988 /* Allocate .plt and .got entries, and space for local ifunc symbols. */
8989 htab_traverse (htab->loc_hash_table,
8990 elfNN_aarch64_allocate_local_ifunc_dynrelocs,
8991 info);
a06ea964
NC
8992
8993 /* For every jump slot reserved in the sgotplt, reloc_count is
8994 incremented. However, when we reserve space for TLS descriptors,
8995 it's not incremented, so in order to compute the space reserved
8996 for them, it suffices to multiply the reloc count by the jump
8997 slot size. */
8998
8999 if (htab->root.srelplt)
8847944f 9000 htab->sgotplt_jump_table_size = aarch64_compute_jump_table_size (htab);
a06ea964 9001
9bcc30e4 9002 if (htab->root.tlsdesc_plt)
a06ea964
NC
9003 {
9004 if (htab->root.splt->size == 0)
37c18eed 9005 htab->root.splt->size += htab->plt_header_size;
a06ea964 9006
a06ea964 9007 /* If we're not using lazy TLS relocations, don't generate the
ce12121b 9008 GOT and PLT entry required. */
9bcc30e4
L
9009 if ((info->flags & DF_BIND_NOW))
9010 htab->root.tlsdesc_plt = 0;
9011 else
a06ea964 9012 {
9bcc30e4 9013 htab->root.tlsdesc_plt = htab->root.splt->size;
ce12121b
TC
9014 htab->root.splt->size += htab->tlsdesc_plt_entry_size;
9015
9bcc30e4 9016 htab->root.tlsdesc_got = htab->root.sgot->size;
a06ea964
NC
9017 htab->root.sgot->size += GOT_ENTRY_SIZE;
9018 }
9019 }
9020
68fcca92 9021 /* Init mapping symbols information to use later to distingush between
4106101c
MS
9022 code and data while scanning for errata. */
9023 if (htab->fix_erratum_835769 || htab->fix_erratum_843419)
68fcca92
JW
9024 for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
9025 {
9026 if (!is_aarch64_elf (ibfd))
9027 continue;
9028 bfd_elfNN_aarch64_init_maps (ibfd);
9029 }
9030
a06ea964
NC
9031 /* We now have determined the sizes of the various dynamic sections.
9032 Allocate memory for them. */
9033 relocs = FALSE;
9034 for (s = dynobj->sections; s != NULL; s = s->next)
9035 {
9036 if ((s->flags & SEC_LINKER_CREATED) == 0)
9037 continue;
9038
9039 if (s == htab->root.splt
9040 || s == htab->root.sgot
9041 || s == htab->root.sgotplt
9042 || s == htab->root.iplt
9d19e4fd 9043 || s == htab->root.igotplt
5474d94f
AM
9044 || s == htab->root.sdynbss
9045 || s == htab->root.sdynrelro)
a06ea964
NC
9046 {
9047 /* Strip this section if we don't need it; see the
9048 comment below. */
9049 }
fd361982 9050 else if (CONST_STRNEQ (bfd_section_name (s), ".rela"))
a06ea964
NC
9051 {
9052 if (s->size != 0 && s != htab->root.srelplt)
9053 relocs = TRUE;
9054
9055 /* We use the reloc_count field as a counter if we need
9056 to copy relocs into the output file. */
9057 if (s != htab->root.srelplt)
9058 s->reloc_count = 0;
9059 }
9060 else
9061 {
9062 /* It's not one of our sections, so don't allocate space. */
9063 continue;
9064 }
9065
9066 if (s->size == 0)
9067 {
9068 /* If we don't need this section, strip it from the
9069 output file. This is mostly to handle .rela.bss and
9070 .rela.plt. We must create both sections in
9071 create_dynamic_sections, because they must be created
9072 before the linker maps input sections to output
9073 sections. The linker does that before
9074 adjust_dynamic_symbol is called, and it is that
9075 function which decides whether anything needs to go
9076 into these sections. */
a06ea964
NC
9077 s->flags |= SEC_EXCLUDE;
9078 continue;
9079 }
9080
9081 if ((s->flags & SEC_HAS_CONTENTS) == 0)
9082 continue;
9083
9084 /* Allocate memory for the section contents. We use bfd_zalloc
07d6d2b8
AM
9085 here in case unused entries are not reclaimed before the
9086 section's contents are written out. This should not happen,
9087 but this way if it does, we get a R_AARCH64_NONE reloc instead
9088 of garbage. */
a06ea964
NC
9089 s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
9090 if (s->contents == NULL)
9091 return FALSE;
9092 }
9093
9094 if (htab->root.dynamic_sections_created)
9095 {
9096 /* Add some entries to the .dynamic section. We fill in the
07d6d2b8
AM
9097 values later, in elfNN_aarch64_finish_dynamic_sections, but we
9098 must add the entries now so that we get the correct size for
9099 the .dynamic section. The DT_DEBUG entry is filled in by the
9100 dynamic linker and used by the debugger. */
a06ea964
NC
9101#define add_dynamic_entry(TAG, VAL) \
9102 _bfd_elf_add_dynamic_entry (info, TAG, VAL)
9103
3084d7a2
L
9104 if (!_bfd_elf_add_dynamic_tags (output_bfd, info, relocs))
9105 return FALSE;
a06ea964
NC
9106
9107 if (htab->root.splt->size != 0)
9108 {
823710d5
SN
9109 if (htab->variant_pcs
9110 && !add_dynamic_entry (DT_AARCH64_VARIANT_PCS, 0))
9111 return FALSE;
9112
1dbade74
SD
9113 if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_BTI_PAC)
9114 && (!add_dynamic_entry (DT_AARCH64_BTI_PLT, 0)
9115 || !add_dynamic_entry (DT_AARCH64_PAC_PLT, 0)))
9116 return FALSE;
9117
9118 else if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_BTI)
9119 && !add_dynamic_entry (DT_AARCH64_BTI_PLT, 0))
9120 return FALSE;
9121
9122 else if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_PAC)
9123 && !add_dynamic_entry (DT_AARCH64_PAC_PLT, 0))
37c18eed 9124 return FALSE;
a06ea964 9125 }
a06ea964
NC
9126 }
9127#undef add_dynamic_entry
9128
9129 return TRUE;
a06ea964
NC
9130}
9131
9132static inline void
caed7120
YZ
9133elf_aarch64_update_plt_entry (bfd *output_bfd,
9134 bfd_reloc_code_real_type r_type,
9135 bfd_byte *plt_entry, bfd_vma value)
a06ea964 9136{
caed7120
YZ
9137 reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (r_type);
9138
1d75a8e2
NC
9139 /* FIXME: We should check the return value from this function call. */
9140 (void) _bfd_aarch64_elf_put_addend (output_bfd, plt_entry, r_type, howto, value);
a06ea964
NC
9141}
9142
9143static void
cec5225b
YZ
9144elfNN_aarch64_create_small_pltn_entry (struct elf_link_hash_entry *h,
9145 struct elf_aarch64_link_hash_table
1419bbe5
WN
9146 *htab, bfd *output_bfd,
9147 struct bfd_link_info *info)
a06ea964
NC
9148{
9149 bfd_byte *plt_entry;
9150 bfd_vma plt_index;
9151 bfd_vma got_offset;
9152 bfd_vma gotplt_entry_address;
9153 bfd_vma plt_entry_address;
9154 Elf_Internal_Rela rela;
9155 bfd_byte *loc;
1419bbe5
WN
9156 asection *plt, *gotplt, *relplt;
9157
9158 /* When building a static executable, use .iplt, .igot.plt and
9159 .rela.iplt sections for STT_GNU_IFUNC symbols. */
9160 if (htab->root.splt != NULL)
9161 {
9162 plt = htab->root.splt;
9163 gotplt = htab->root.sgotplt;
9164 relplt = htab->root.srelplt;
9165 }
9166 else
9167 {
9168 plt = htab->root.iplt;
9169 gotplt = htab->root.igotplt;
9170 relplt = htab->root.irelplt;
9171 }
9172
9173 /* Get the index in the procedure linkage table which
9174 corresponds to this symbol. This is the index of this symbol
9175 in all the symbols for which we are making plt entries. The
9176 first entry in the procedure linkage table is reserved.
a06ea964 9177
1419bbe5
WN
9178 Get the offset into the .got table of the entry that
9179 corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
9180 bytes. The first three are reserved for the dynamic linker.
692e2b8b 9181
1419bbe5
WN
9182 For static executables, we don't reserve anything. */
9183
9184 if (plt == htab->root.splt)
9185 {
9186 plt_index = (h->plt.offset - htab->plt_header_size) / htab->plt_entry_size;
9187 got_offset = (plt_index + 3) * GOT_ENTRY_SIZE;
9188 }
9189 else
9190 {
9191 plt_index = h->plt.offset / htab->plt_entry_size;
9192 got_offset = plt_index * GOT_ENTRY_SIZE;
9193 }
9194
9195 plt_entry = plt->contents + h->plt.offset;
9196 plt_entry_address = plt->output_section->vma
f44a1f8e 9197 + plt->output_offset + h->plt.offset;
1419bbe5
WN
9198 gotplt_entry_address = gotplt->output_section->vma +
9199 gotplt->output_offset + got_offset;
a06ea964
NC
9200
9201 /* Copy in the boiler-plate for the PLTn entry. */
37c18eed
SD
9202 memcpy (plt_entry, htab->plt_entry, htab->plt_entry_size);
9203
9204 /* First instruction in BTI enabled PLT stub is a BTI
9205 instruction so skip it. */
9206 if (elf_aarch64_tdata (output_bfd)->plt_type & PLT_BTI
9207 && elf_elfheader (output_bfd)->e_type == ET_EXEC)
9208 plt_entry = plt_entry + 4;
a06ea964
NC
9209
9210 /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
9211 ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
caed7120
YZ
9212 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9213 plt_entry,
9214 PG (gotplt_entry_address) -
9215 PG (plt_entry_address));
a06ea964
NC
9216
9217 /* Fill in the lo12 bits for the load from the pltgot. */
caed7120
YZ
9218 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
9219 plt_entry + 4,
9220 PG_OFFSET (gotplt_entry_address));
a06ea964 9221
9aff4b7a 9222 /* Fill in the lo12 bits for the add from the pltgot entry. */
caed7120
YZ
9223 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
9224 plt_entry + 8,
9225 PG_OFFSET (gotplt_entry_address));
a06ea964
NC
9226
9227 /* All the GOTPLT Entries are essentially initialized to PLT0. */
cec5225b 9228 bfd_put_NN (output_bfd,
1419bbe5
WN
9229 plt->output_section->vma + plt->output_offset,
9230 gotplt->contents + got_offset);
a06ea964 9231
a06ea964 9232 rela.r_offset = gotplt_entry_address;
1419bbe5
WN
9233
9234 if (h->dynindx == -1
0e1862bb 9235 || ((bfd_link_executable (info)
1419bbe5
WN
9236 || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
9237 && h->def_regular
9238 && h->type == STT_GNU_IFUNC))
9239 {
9240 /* If an STT_GNU_IFUNC symbol is locally defined, generate
9241 R_AARCH64_IRELATIVE instead of R_AARCH64_JUMP_SLOT. */
9242 rela.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
9243 rela.r_addend = (h->root.u.def.value
9244 + h->root.u.def.section->output_section->vma
9245 + h->root.u.def.section->output_offset);
9246 }
9247 else
9248 {
9249 /* Fill in the entry in the .rela.plt section. */
9250 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (JUMP_SLOT));
9251 rela.r_addend = 0;
9252 }
a06ea964
NC
9253
9254 /* Compute the relocation entry to used based on PLT index and do
9255 not adjust reloc_count. The reloc_count has already been adjusted
9256 to account for this entry. */
1419bbe5 9257 loc = relplt->contents + plt_index * RELOC_SIZE (htab);
cec5225b 9258 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC
9259}
9260
9261/* Size sections even though they're not dynamic. We use it to setup
9262 _TLS_MODULE_BASE_, if needed. */
9263
9264static bfd_boolean
cec5225b 9265elfNN_aarch64_always_size_sections (bfd *output_bfd,
a06ea964
NC
9266 struct bfd_link_info *info)
9267{
9268 asection *tls_sec;
9269
0e1862bb 9270 if (bfd_link_relocatable (info))
a06ea964
NC
9271 return TRUE;
9272
9273 tls_sec = elf_hash_table (info)->tls_sec;
9274
9275 if (tls_sec)
9276 {
9277 struct elf_link_hash_entry *tlsbase;
9278
9279 tlsbase = elf_link_hash_lookup (elf_hash_table (info),
9280 "_TLS_MODULE_BASE_", TRUE, TRUE, FALSE);
9281
9282 if (tlsbase)
9283 {
9284 struct bfd_link_hash_entry *h = NULL;
9285 const struct elf_backend_data *bed =
9286 get_elf_backend_data (output_bfd);
9287
9288 if (!(_bfd_generic_link_add_one_symbol
9289 (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
9290 tls_sec, 0, NULL, FALSE, bed->collect, &h)))
9291 return FALSE;
9292
9293 tlsbase->type = STT_TLS;
9294 tlsbase = (struct elf_link_hash_entry *) h;
9295 tlsbase->def_regular = 1;
9296 tlsbase->other = STV_HIDDEN;
9297 (*bed->elf_backend_hide_symbol) (info, tlsbase, TRUE);
9298 }
9299 }
9300
9301 return TRUE;
9302}
9303
9304/* Finish up dynamic symbol handling. We set the contents of various
9305 dynamic sections here. */
2d0ca824 9306
a06ea964 9307static bfd_boolean
cec5225b 9308elfNN_aarch64_finish_dynamic_symbol (bfd *output_bfd,
a06ea964
NC
9309 struct bfd_link_info *info,
9310 struct elf_link_hash_entry *h,
9311 Elf_Internal_Sym *sym)
9312{
cec5225b
YZ
9313 struct elf_aarch64_link_hash_table *htab;
9314 htab = elf_aarch64_hash_table (info);
a06ea964
NC
9315
9316 if (h->plt.offset != (bfd_vma) - 1)
9317 {
1419bbe5
WN
9318 asection *plt, *gotplt, *relplt;
9319
a06ea964 9320 /* This symbol has an entry in the procedure linkage table. Set
07d6d2b8 9321 it up. */
a06ea964 9322
1419bbe5
WN
9323 /* When building a static executable, use .iplt, .igot.plt and
9324 .rela.iplt sections for STT_GNU_IFUNC symbols. */
9325 if (htab->root.splt != NULL)
9326 {
9327 plt = htab->root.splt;
9328 gotplt = htab->root.sgotplt;
9329 relplt = htab->root.srelplt;
9330 }
9331 else
9332 {
9333 plt = htab->root.iplt;
9334 gotplt = htab->root.igotplt;
9335 relplt = htab->root.irelplt;
9336 }
9337
9338 /* This symbol has an entry in the procedure linkage table. Set
9339 it up. */
9340 if ((h->dynindx == -1
0e1862bb 9341 && !((h->forced_local || bfd_link_executable (info))
1419bbe5
WN
9342 && h->def_regular
9343 && h->type == STT_GNU_IFUNC))
9344 || plt == NULL
9345 || gotplt == NULL
9346 || relplt == NULL)
f955cccf 9347 return FALSE;
a06ea964 9348
1419bbe5 9349 elfNN_aarch64_create_small_pltn_entry (h, htab, output_bfd, info);
a06ea964
NC
9350 if (!h->def_regular)
9351 {
9352 /* Mark the symbol as undefined, rather than as defined in
46b87d49 9353 the .plt section. */
a06ea964 9354 sym->st_shndx = SHN_UNDEF;
46b87d49
WN
9355 /* If the symbol is weak we need to clear the value.
9356 Otherwise, the PLT entry would provide a definition for
9357 the symbol even if the symbol wasn't defined anywhere,
9358 and so the symbol would never be NULL. Leave the value if
9359 there were any relocations where pointer equality matters
9360 (this is a clue for the dynamic linker, to make function
9361 pointer comparisons work between an application and shared
9362 library). */
9363 if (!h->ref_regular_nonweak || !h->pointer_equality_needed)
9364 sym->st_value = 0;
a06ea964
NC
9365 }
9366 }
9367
9368 if (h->got.offset != (bfd_vma) - 1
a377ae2a
SN
9369 && elf_aarch64_hash_entry (h)->got_type == GOT_NORMAL
9370 /* Undefined weak symbol in static PIE resolves to 0 without
9371 any dynamic relocations. */
9372 && !UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
a06ea964
NC
9373 {
9374 Elf_Internal_Rela rela;
9375 bfd_byte *loc;
9376
9377 /* This symbol has an entry in the global offset table. Set it
07d6d2b8 9378 up. */
a06ea964
NC
9379 if (htab->root.sgot == NULL || htab->root.srelgot == NULL)
9380 abort ();
9381
9382 rela.r_offset = (htab->root.sgot->output_section->vma
9383 + htab->root.sgot->output_offset
9384 + (h->got.offset & ~(bfd_vma) 1));
9385
49206388
WN
9386 if (h->def_regular
9387 && h->type == STT_GNU_IFUNC)
9388 {
0e1862bb 9389 if (bfd_link_pic (info))
49206388
WN
9390 {
9391 /* Generate R_AARCH64_GLOB_DAT. */
9392 goto do_glob_dat;
9393 }
9394 else
9395 {
9396 asection *plt;
9397
9398 if (!h->pointer_equality_needed)
9399 abort ();
9400
9401 /* For non-shared object, we can't use .got.plt, which
9402 contains the real function address if we need pointer
9403 equality. We load the GOT entry with the PLT entry. */
9404 plt = htab->root.splt ? htab->root.splt : htab->root.iplt;
9405 bfd_put_NN (output_bfd, (plt->output_section->vma
9406 + plt->output_offset
9407 + h->plt.offset),
9408 htab->root.sgot->contents
9409 + (h->got.offset & ~(bfd_vma) 1));
9410 return TRUE;
9411 }
9412 }
0e1862bb 9413 else if (bfd_link_pic (info) && SYMBOL_REFERENCES_LOCAL (info, h))
a06ea964 9414 {
0ee3a6db 9415 if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
a06ea964
NC
9416 return FALSE;
9417
9418 BFD_ASSERT ((h->got.offset & 1) != 0);
a6bb11b2 9419 rela.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
a06ea964
NC
9420 rela.r_addend = (h->root.u.def.value
9421 + h->root.u.def.section->output_section->vma
9422 + h->root.u.def.section->output_offset);
9423 }
9424 else
9425 {
dc1e8a47 9426 do_glob_dat:
a06ea964 9427 BFD_ASSERT ((h->got.offset & 1) == 0);
cec5225b 9428 bfd_put_NN (output_bfd, (bfd_vma) 0,
a06ea964 9429 htab->root.sgot->contents + h->got.offset);
a6bb11b2 9430 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (GLOB_DAT));
a06ea964
NC
9431 rela.r_addend = 0;
9432 }
9433
9434 loc = htab->root.srelgot->contents;
9435 loc += htab->root.srelgot->reloc_count++ * RELOC_SIZE (htab);
cec5225b 9436 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC
9437 }
9438
9439 if (h->needs_copy)
9440 {
9441 Elf_Internal_Rela rela;
5474d94f 9442 asection *s;
a06ea964
NC
9443 bfd_byte *loc;
9444
9445 /* This symbol needs a copy reloc. Set it up. */
a06ea964
NC
9446 if (h->dynindx == -1
9447 || (h->root.type != bfd_link_hash_defined
9448 && h->root.type != bfd_link_hash_defweak)
9d19e4fd 9449 || htab->root.srelbss == NULL)
a06ea964
NC
9450 abort ();
9451
9452 rela.r_offset = (h->root.u.def.value
9453 + h->root.u.def.section->output_section->vma
9454 + h->root.u.def.section->output_offset);
a6bb11b2 9455 rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (COPY));
a06ea964 9456 rela.r_addend = 0;
afbf7e8e 9457 if (h->root.u.def.section == htab->root.sdynrelro)
5474d94f
AM
9458 s = htab->root.sreldynrelro;
9459 else
9460 s = htab->root.srelbss;
9461 loc = s->contents + s->reloc_count++ * RELOC_SIZE (htab);
cec5225b 9462 bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
a06ea964
NC
9463 }
9464
9465 /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. SYM may
9466 be NULL for local symbols. */
9467 if (sym != NULL
9637f6ef 9468 && (h == elf_hash_table (info)->hdynamic
a06ea964
NC
9469 || h == elf_hash_table (info)->hgot))
9470 sym->st_shndx = SHN_ABS;
9471
9472 return TRUE;
9473}
9474
1419bbe5
WN
9475/* Finish up local dynamic symbol handling. We set the contents of
9476 various dynamic sections here. */
9477
9478static bfd_boolean
9479elfNN_aarch64_finish_local_dynamic_symbol (void **slot, void *inf)
9480{
9481 struct elf_link_hash_entry *h
9482 = (struct elf_link_hash_entry *) *slot;
9483 struct bfd_link_info *info
9484 = (struct bfd_link_info *) inf;
9485
9486 return elfNN_aarch64_finish_dynamic_symbol (info->output_bfd,
9487 info, h, NULL);
9488}
9489
a06ea964 9490static void
cec5225b
YZ
9491elfNN_aarch64_init_small_plt0_entry (bfd *output_bfd ATTRIBUTE_UNUSED,
9492 struct elf_aarch64_link_hash_table
a06ea964
NC
9493 *htab)
9494{
9495 /* Fill in PLT0. Fixme:RR Note this doesn't distinguish between
9496 small and large plts and at the minute just generates
9497 the small PLT. */
9498
cec5225b 9499 /* PLT0 of the small PLT looks like this in ELF64 -
a06ea964
NC
9500 stp x16, x30, [sp, #-16]! // Save the reloc and lr on stack.
9501 adrp x16, PLT_GOT + 16 // Get the page base of the GOTPLT
9502 ldr x17, [x16, #:lo12:PLT_GOT+16] // Load the address of the
9503 // symbol resolver
9504 add x16, x16, #:lo12:PLT_GOT+16 // Load the lo12 bits of the
9505 // GOTPLT entry for this.
9506 br x17
cec5225b 9507 PLT0 will be slightly different in ELF32 due to different got entry
2d0ca824 9508 size. */
caed7120 9509 bfd_vma plt_got_2nd_ent; /* Address of GOT[2]. */
a06ea964
NC
9510 bfd_vma plt_base;
9511
9512
37c18eed
SD
9513 memcpy (htab->root.splt->contents, htab->plt0_entry,
9514 htab->plt_header_size);
a06ea964 9515 elf_section_data (htab->root.splt->output_section)->this_hdr.sh_entsize =
37c18eed 9516 htab->plt_header_size;
a06ea964 9517
caed7120
YZ
9518 plt_got_2nd_ent = (htab->root.sgotplt->output_section->vma
9519 + htab->root.sgotplt->output_offset
9520 + GOT_ENTRY_SIZE * 2);
a06ea964
NC
9521
9522 plt_base = htab->root.splt->output_section->vma +
f44a1f8e 9523 htab->root.splt->output_offset;
a06ea964 9524
37c18eed
SD
9525 /* First instruction in BTI enabled PLT stub is a BTI
9526 instruction so skip it. */
9527 bfd_byte *plt0_entry = htab->root.splt->contents;
9528 if (elf_aarch64_tdata (output_bfd)->plt_type & PLT_BTI)
9529 plt0_entry = plt0_entry + 4;
9530
a06ea964
NC
9531 /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
9532 ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
caed7120 9533 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
37c18eed 9534 plt0_entry + 4,
caed7120 9535 PG (plt_got_2nd_ent) - PG (plt_base + 4));
a06ea964 9536
caed7120 9537 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
37c18eed 9538 plt0_entry + 8,
caed7120 9539 PG_OFFSET (plt_got_2nd_ent));
a06ea964 9540
caed7120 9541 elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
37c18eed 9542 plt0_entry + 12,
caed7120 9543 PG_OFFSET (plt_got_2nd_ent));
a06ea964
NC
9544}
9545
9546static bfd_boolean
cec5225b 9547elfNN_aarch64_finish_dynamic_sections (bfd *output_bfd,
a06ea964
NC
9548 struct bfd_link_info *info)
9549{
cec5225b 9550 struct elf_aarch64_link_hash_table *htab;
a06ea964
NC
9551 bfd *dynobj;
9552 asection *sdyn;
9553
cec5225b 9554 htab = elf_aarch64_hash_table (info);
a06ea964
NC
9555 dynobj = htab->root.dynobj;
9556 sdyn = bfd_get_linker_section (dynobj, ".dynamic");
9557
9558 if (htab->root.dynamic_sections_created)
9559 {
cec5225b 9560 ElfNN_External_Dyn *dyncon, *dynconend;
a06ea964
NC
9561
9562 if (sdyn == NULL || htab->root.sgot == NULL)
9563 abort ();
9564
cec5225b
YZ
9565 dyncon = (ElfNN_External_Dyn *) sdyn->contents;
9566 dynconend = (ElfNN_External_Dyn *) (sdyn->contents + sdyn->size);
a06ea964
NC
9567 for (; dyncon < dynconend; dyncon++)
9568 {
9569 Elf_Internal_Dyn dyn;
9570 asection *s;
9571
cec5225b 9572 bfd_elfNN_swap_dyn_in (dynobj, dyncon, &dyn);
a06ea964
NC
9573
9574 switch (dyn.d_tag)
9575 {
9576 default:
9577 continue;
9578
9579 case DT_PLTGOT:
9580 s = htab->root.sgotplt;
9581 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
9582 break;
9583
9584 case DT_JMPREL:
4ade44b7
AM
9585 s = htab->root.srelplt;
9586 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
a06ea964
NC
9587 break;
9588
9589 case DT_PLTRELSZ:
c955de36 9590 s = htab->root.srelplt;
a06ea964
NC
9591 dyn.d_un.d_val = s->size;
9592 break;
9593
a06ea964
NC
9594 case DT_TLSDESC_PLT:
9595 s = htab->root.splt;
9596 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
9bcc30e4 9597 + htab->root.tlsdesc_plt;
a06ea964
NC
9598 break;
9599
9600 case DT_TLSDESC_GOT:
9601 s = htab->root.sgot;
9bcc30e4 9602 BFD_ASSERT (htab->root.tlsdesc_got != (bfd_vma)-1);
a06ea964 9603 dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
9bcc30e4 9604 + htab->root.tlsdesc_got;
a06ea964
NC
9605 break;
9606 }
9607
cec5225b 9608 bfd_elfNN_swap_dyn_out (output_bfd, &dyn, dyncon);
a06ea964
NC
9609 }
9610
9611 }
9612
9613 /* Fill in the special first entry in the procedure linkage table. */
9614 if (htab->root.splt && htab->root.splt->size > 0)
9615 {
cec5225b 9616 elfNN_aarch64_init_small_plt0_entry (output_bfd, htab);
a06ea964
NC
9617
9618 elf_section_data (htab->root.splt->output_section)->
9619 this_hdr.sh_entsize = htab->plt_entry_size;
9620
9621
9bcc30e4 9622 if (htab->root.tlsdesc_plt && !(info->flags & DF_BIND_NOW))
a06ea964 9623 {
9bcc30e4 9624 BFD_ASSERT (htab->root.tlsdesc_got != (bfd_vma)-1);
cec5225b 9625 bfd_put_NN (output_bfd, (bfd_vma) 0,
9bcc30e4 9626 htab->root.sgot->contents + htab->root.tlsdesc_got);
a06ea964 9627
37c18eed
SD
9628 const bfd_byte *entry = elfNN_aarch64_tlsdesc_small_plt_entry;
9629 htab->tlsdesc_plt_entry_size = PLT_TLSDESC_ENTRY_SIZE;
9630
9631 aarch64_plt_type type = elf_aarch64_tdata (output_bfd)->plt_type;
1dbade74 9632 if (type == PLT_BTI || type == PLT_BTI_PAC)
37c18eed
SD
9633 {
9634 entry = elfNN_aarch64_tlsdesc_small_plt_bti_entry;
37c18eed
SD
9635 }
9636
9bcc30e4 9637 memcpy (htab->root.splt->contents + htab->root.tlsdesc_plt,
37c18eed 9638 entry, htab->tlsdesc_plt_entry_size);
a06ea964
NC
9639
9640 {
9641 bfd_vma adrp1_addr =
9642 htab->root.splt->output_section->vma
9bcc30e4
L
9643 + htab->root.splt->output_offset
9644 + htab->root.tlsdesc_plt + 4;
a06ea964 9645
caed7120 9646 bfd_vma adrp2_addr = adrp1_addr + 4;
a06ea964
NC
9647
9648 bfd_vma got_addr =
9649 htab->root.sgot->output_section->vma
9650 + htab->root.sgot->output_offset;
9651
9652 bfd_vma pltgot_addr =
9653 htab->root.sgotplt->output_section->vma
9654 + htab->root.sgotplt->output_offset;
9655
9bcc30e4 9656 bfd_vma dt_tlsdesc_got = got_addr + htab->root.tlsdesc_got;
caed7120
YZ
9657
9658 bfd_byte *plt_entry =
9bcc30e4 9659 htab->root.splt->contents + htab->root.tlsdesc_plt;
a06ea964 9660
37c18eed
SD
9661 /* First instruction in BTI enabled PLT stub is a BTI
9662 instruction so skip it. */
9663 if (type & PLT_BTI)
9664 {
9665 plt_entry = plt_entry + 4;
9666 adrp1_addr = adrp1_addr + 4;
9667 adrp2_addr = adrp2_addr + 4;
9668 }
9669
a06ea964 9670 /* adrp x2, DT_TLSDESC_GOT */
caed7120
YZ
9671 elf_aarch64_update_plt_entry (output_bfd,
9672 BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9673 plt_entry + 4,
9674 (PG (dt_tlsdesc_got)
9675 - PG (adrp1_addr)));
a06ea964
NC
9676
9677 /* adrp x3, 0 */
caed7120
YZ
9678 elf_aarch64_update_plt_entry (output_bfd,
9679 BFD_RELOC_AARCH64_ADR_HI21_PCREL,
9680 plt_entry + 8,
9681 (PG (pltgot_addr)
9682 - PG (adrp2_addr)));
a06ea964
NC
9683
9684 /* ldr x2, [x2, #0] */
caed7120
YZ
9685 elf_aarch64_update_plt_entry (output_bfd,
9686 BFD_RELOC_AARCH64_LDSTNN_LO12,
9687 plt_entry + 12,
9688 PG_OFFSET (dt_tlsdesc_got));
a06ea964
NC
9689
9690 /* add x3, x3, 0 */
caed7120
YZ
9691 elf_aarch64_update_plt_entry (output_bfd,
9692 BFD_RELOC_AARCH64_ADD_LO12,
9693 plt_entry + 16,
9694 PG_OFFSET (pltgot_addr));
a06ea964
NC
9695 }
9696 }
9697 }
9698
9699 if (htab->root.sgotplt)
9700 {
9701 if (bfd_is_abs_section (htab->root.sgotplt->output_section))
9702 {
4eca0228 9703 _bfd_error_handler
871b3ab2 9704 (_("discarded output section: `%pA'"), htab->root.sgotplt);
a06ea964
NC
9705 return FALSE;
9706 }
9707
9708 /* Fill in the first three entries in the global offset table. */
9709 if (htab->root.sgotplt->size > 0)
9710 {
8db339a6
MS
9711 bfd_put_NN (output_bfd, (bfd_vma) 0, htab->root.sgotplt->contents);
9712
a06ea964 9713 /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
cec5225b 9714 bfd_put_NN (output_bfd,
a06ea964
NC
9715 (bfd_vma) 0,
9716 htab->root.sgotplt->contents + GOT_ENTRY_SIZE);
cec5225b 9717 bfd_put_NN (output_bfd,
a06ea964
NC
9718 (bfd_vma) 0,
9719 htab->root.sgotplt->contents + GOT_ENTRY_SIZE * 2);
9720 }
9721
8db339a6
MS
9722 if (htab->root.sgot)
9723 {
9724 if (htab->root.sgot->size > 0)
9725 {
9726 bfd_vma addr =
9727 sdyn ? sdyn->output_section->vma + sdyn->output_offset : 0;
9728 bfd_put_NN (output_bfd, addr, htab->root.sgot->contents);
9729 }
9730 }
9731
a06ea964
NC
9732 elf_section_data (htab->root.sgotplt->output_section)->
9733 this_hdr.sh_entsize = GOT_ENTRY_SIZE;
9734 }
9735
9736 if (htab->root.sgot && htab->root.sgot->size > 0)
9737 elf_section_data (htab->root.sgot->output_section)->this_hdr.sh_entsize
9738 = GOT_ENTRY_SIZE;
9739
1419bbe5
WN
9740 /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
9741 htab_traverse (htab->loc_hash_table,
9742 elfNN_aarch64_finish_local_dynamic_symbol,
9743 info);
9744
a06ea964
NC
9745 return TRUE;
9746}
9747
37c18eed
SD
9748/* Check if BTI enabled PLTs are needed. Returns the type needed. */
9749static aarch64_plt_type
9750get_plt_type (bfd *abfd)
9751{
9752 aarch64_plt_type ret = PLT_NORMAL;
9753 bfd_byte *contents, *extdyn, *extdynend;
9754 asection *sec = bfd_get_section_by_name (abfd, ".dynamic");
9755 if (!sec || !bfd_malloc_and_get_section (abfd, sec, &contents))
9756 return ret;
9757 extdyn = contents;
9758 extdynend = contents + sec->size;
9759 for (; extdyn < extdynend; extdyn += sizeof (ElfNN_External_Dyn))
9760 {
9761 Elf_Internal_Dyn dyn;
9762 bfd_elfNN_swap_dyn_in (abfd, extdyn, &dyn);
9763
9764 /* Let's check the processor specific dynamic array tags. */
9765 bfd_vma tag = dyn.d_tag;
9766 if (tag < DT_LOPROC || tag > DT_HIPROC)
9767 continue;
9768
9769 switch (tag)
9770 {
9771 case DT_AARCH64_BTI_PLT:
1dbade74
SD
9772 ret |= PLT_BTI;
9773 break;
9774
9775 case DT_AARCH64_PAC_PLT:
9776 ret |= PLT_PAC;
37c18eed
SD
9777 break;
9778
9779 default: break;
9780 }
9781 }
9782 free (contents);
9783 return ret;
9784}
9785
9786static long
9787elfNN_aarch64_get_synthetic_symtab (bfd *abfd,
9788 long symcount,
9789 asymbol **syms,
9790 long dynsymcount,
9791 asymbol **dynsyms,
9792 asymbol **ret)
9793{
9794 elf_aarch64_tdata (abfd)->plt_type = get_plt_type (abfd);
9795 return _bfd_elf_get_synthetic_symtab (abfd, symcount, syms,
9796 dynsymcount, dynsyms, ret);
9797}
9798
a06ea964
NC
9799/* Return address for Ith PLT stub in section PLT, for relocation REL
9800 or (bfd_vma) -1 if it should not be included. */
9801
9802static bfd_vma
cec5225b 9803elfNN_aarch64_plt_sym_val (bfd_vma i, const asection *plt,
a06ea964
NC
9804 const arelent *rel ATTRIBUTE_UNUSED)
9805{
37c18eed
SD
9806 size_t plt0_size = PLT_ENTRY_SIZE;
9807 size_t pltn_size = PLT_SMALL_ENTRY_SIZE;
9808
1dbade74
SD
9809 if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_BTI_PAC)
9810 {
1dbade74
SD
9811 if (elf_elfheader (plt->owner)->e_type == ET_EXEC)
9812 pltn_size = PLT_BTI_PAC_SMALL_ENTRY_SIZE;
9813 else
9814 pltn_size = PLT_PAC_SMALL_ENTRY_SIZE;
9815 }
9816 else if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_BTI)
37c18eed 9817 {
37c18eed
SD
9818 if (elf_elfheader (plt->owner)->e_type == ET_EXEC)
9819 pltn_size = PLT_BTI_SMALL_ENTRY_SIZE;
9820 }
1dbade74
SD
9821 else if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_PAC)
9822 {
1dbade74
SD
9823 pltn_size = PLT_PAC_SMALL_ENTRY_SIZE;
9824 }
9825
37c18eed 9826 return plt->vma + plt0_size + i * pltn_size;
a06ea964
NC
9827}
9828
d691934d
NC
9829/* Returns TRUE if NAME is an AArch64 mapping symbol.
9830 The ARM ELF standard defines $x (for A64 code) and $d (for data).
9831 It also allows a period initiated suffix to be added to the symbol, ie:
9832 "$[adtx]\.[:sym_char]+". */
9833
9834static bfd_boolean
9835is_aarch64_mapping_symbol (const char * name)
9836{
9837 return name != NULL /* Paranoia. */
9838 && name[0] == '$' /* Note: if objcopy --prefix-symbols has been used then
9839 the mapping symbols could have acquired a prefix.
9840 We do not support this here, since such symbols no
9841 longer conform to the ARM ELF ABI. */
9842 && (name[1] == 'd' || name[1] == 'x')
9843 && (name[2] == 0 || name[2] == '.');
9844 /* FIXME: Strictly speaking the symbol is only a valid mapping symbol if
9845 any characters that follow the period are legal characters for the body
9846 of a symbol's name. For now we just assume that this is the case. */
9847}
9848
9849/* Make sure that mapping symbols in object files are not removed via the
9850 "strip --strip-unneeded" tool. These symbols might needed in order to
9851 correctly generate linked files. Once an object file has been linked,
9852 it should be safe to remove them. */
9853
9854static void
9855elfNN_aarch64_backend_symbol_processing (bfd *abfd, asymbol *sym)
9856{
9857 if (((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
9858 && sym->section != bfd_abs_section_ptr
9859 && is_aarch64_mapping_symbol (sym->name))
9860 sym->flags |= BSF_KEEP;
9861}
9862
cd702818
SD
9863/* Implement elf_backend_setup_gnu_properties for AArch64. It serves as a
9864 wrapper function for _bfd_aarch64_elf_link_setup_gnu_properties to account
9865 for the effect of GNU properties of the output_bfd. */
9866static bfd *
9867elfNN_aarch64_link_setup_gnu_properties (struct bfd_link_info *info)
9868{
9869 uint32_t prop = elf_aarch64_tdata (info->output_bfd)->gnu_and_prop;
9870 bfd *pbfd = _bfd_aarch64_elf_link_setup_gnu_properties (info, &prop);
9871 elf_aarch64_tdata (info->output_bfd)->gnu_and_prop = prop;
37c18eed
SD
9872 elf_aarch64_tdata (info->output_bfd)->plt_type
9873 |= (prop & GNU_PROPERTY_AARCH64_FEATURE_1_BTI) ? PLT_BTI : 0;
9874 setup_plt_values (info, elf_aarch64_tdata (info->output_bfd)->plt_type);
cd702818
SD
9875 return pbfd;
9876}
9877
9878/* Implement elf_backend_merge_gnu_properties for AArch64. It serves as a
9879 wrapper function for _bfd_aarch64_elf_merge_gnu_properties to account
9880 for the effect of GNU properties of the output_bfd. */
9881static bfd_boolean
9882elfNN_aarch64_merge_gnu_properties (struct bfd_link_info *info,
4e539114 9883 bfd *abfd, bfd *bbfd,
cd702818
SD
9884 elf_property *aprop,
9885 elf_property *bprop)
9886{
9887 uint32_t prop
9888 = elf_aarch64_tdata (info->output_bfd)->gnu_and_prop;
37c18eed
SD
9889
9890 /* If output has been marked with BTI using command line argument, give out
9891 warning if necessary. */
4e539114
SD
9892 /* Properties are merged per type, hence only check for warnings when merging
9893 GNU_PROPERTY_AARCH64_FEATURE_1_AND. */
9894 if (((aprop && aprop->pr_type == GNU_PROPERTY_AARCH64_FEATURE_1_AND)
9895 || (bprop && bprop->pr_type == GNU_PROPERTY_AARCH64_FEATURE_1_AND))
9896 && (prop & GNU_PROPERTY_AARCH64_FEATURE_1_BTI)
37c18eed
SD
9897 && (!elf_aarch64_tdata (info->output_bfd)->no_bti_warn))
9898 {
9899 if ((aprop && !(aprop->u.number & GNU_PROPERTY_AARCH64_FEATURE_1_BTI))
4e539114 9900 || !aprop)
37c18eed 9901 {
8bf6d176 9902 _bfd_error_handler (_("%pB: warning: BTI turned on by -z force-bti when "
4e539114
SD
9903 "all inputs do not have BTI in NOTE section."),
9904 abfd);
9905 }
9906 if ((bprop && !(bprop->u.number & GNU_PROPERTY_AARCH64_FEATURE_1_BTI))
9907 || !bprop)
9908 {
8bf6d176 9909 _bfd_error_handler (_("%pB: warning: BTI turned on by -z force-bti when "
4e539114
SD
9910 "all inputs do not have BTI in NOTE section."),
9911 bbfd);
37c18eed
SD
9912 }
9913 }
9914
cd702818
SD
9915 return _bfd_aarch64_elf_merge_gnu_properties (info, abfd, aprop,
9916 bprop, prop);
9917}
a06ea964
NC
9918
9919/* We use this so we can override certain functions
9920 (though currently we don't). */
9921
cec5225b 9922const struct elf_size_info elfNN_aarch64_size_info =
a06ea964 9923{
cec5225b
YZ
9924 sizeof (ElfNN_External_Ehdr),
9925 sizeof (ElfNN_External_Phdr),
9926 sizeof (ElfNN_External_Shdr),
9927 sizeof (ElfNN_External_Rel),
9928 sizeof (ElfNN_External_Rela),
9929 sizeof (ElfNN_External_Sym),
9930 sizeof (ElfNN_External_Dyn),
a06ea964
NC
9931 sizeof (Elf_External_Note),
9932 4, /* Hash table entry size. */
9933 1, /* Internal relocs per external relocs. */
cec5225b
YZ
9934 ARCH_SIZE, /* Arch size. */
9935 LOG_FILE_ALIGN, /* Log_file_align. */
9936 ELFCLASSNN, EV_CURRENT,
9937 bfd_elfNN_write_out_phdrs,
9938 bfd_elfNN_write_shdrs_and_ehdr,
9939 bfd_elfNN_checksum_contents,
9940 bfd_elfNN_write_relocs,
9941 bfd_elfNN_swap_symbol_in,
9942 bfd_elfNN_swap_symbol_out,
9943 bfd_elfNN_slurp_reloc_table,
9944 bfd_elfNN_slurp_symbol_table,
9945 bfd_elfNN_swap_dyn_in,
9946 bfd_elfNN_swap_dyn_out,
9947 bfd_elfNN_swap_reloc_in,
9948 bfd_elfNN_swap_reloc_out,
9949 bfd_elfNN_swap_reloca_in,
9950 bfd_elfNN_swap_reloca_out
a06ea964
NC
9951};
9952
9953#define ELF_ARCH bfd_arch_aarch64
9954#define ELF_MACHINE_CODE EM_AARCH64
9955#define ELF_MAXPAGESIZE 0x10000
9956#define ELF_MINPAGESIZE 0x1000
9957#define ELF_COMMONPAGESIZE 0x1000
9958
07d6d2b8 9959#define bfd_elfNN_close_and_cleanup \
cec5225b 9960 elfNN_aarch64_close_and_cleanup
a06ea964 9961
07d6d2b8 9962#define bfd_elfNN_bfd_free_cached_info \
cec5225b 9963 elfNN_aarch64_bfd_free_cached_info
a06ea964 9964
cec5225b
YZ
9965#define bfd_elfNN_bfd_is_target_special_symbol \
9966 elfNN_aarch64_is_target_special_symbol
a06ea964 9967
07d6d2b8 9968#define bfd_elfNN_bfd_link_hash_table_create \
cec5225b 9969 elfNN_aarch64_link_hash_table_create
a06ea964 9970
cec5225b
YZ
9971#define bfd_elfNN_bfd_merge_private_bfd_data \
9972 elfNN_aarch64_merge_private_bfd_data
a06ea964 9973
cec5225b
YZ
9974#define bfd_elfNN_bfd_print_private_bfd_data \
9975 elfNN_aarch64_print_private_bfd_data
a06ea964 9976
cec5225b
YZ
9977#define bfd_elfNN_bfd_reloc_type_lookup \
9978 elfNN_aarch64_reloc_type_lookup
a06ea964 9979
cec5225b
YZ
9980#define bfd_elfNN_bfd_reloc_name_lookup \
9981 elfNN_aarch64_reloc_name_lookup
a06ea964 9982
cec5225b
YZ
9983#define bfd_elfNN_bfd_set_private_flags \
9984 elfNN_aarch64_set_private_flags
a06ea964 9985
cec5225b
YZ
9986#define bfd_elfNN_find_inliner_info \
9987 elfNN_aarch64_find_inliner_info
a06ea964 9988
37c18eed
SD
9989#define bfd_elfNN_get_synthetic_symtab \
9990 elfNN_aarch64_get_synthetic_symtab
9991
cec5225b
YZ
9992#define bfd_elfNN_mkobject \
9993 elfNN_aarch64_mkobject
a06ea964 9994
cec5225b
YZ
9995#define bfd_elfNN_new_section_hook \
9996 elfNN_aarch64_new_section_hook
a06ea964
NC
9997
9998#define elf_backend_adjust_dynamic_symbol \
cec5225b 9999 elfNN_aarch64_adjust_dynamic_symbol
a06ea964
NC
10000
10001#define elf_backend_always_size_sections \
cec5225b 10002 elfNN_aarch64_always_size_sections
a06ea964
NC
10003
10004#define elf_backend_check_relocs \
cec5225b 10005 elfNN_aarch64_check_relocs
a06ea964
NC
10006
10007#define elf_backend_copy_indirect_symbol \
cec5225b 10008 elfNN_aarch64_copy_indirect_symbol
a06ea964 10009
823710d5
SN
10010#define elf_backend_merge_symbol_attribute \
10011 elfNN_aarch64_merge_symbol_attribute
10012
a06ea964
NC
10013/* Create .dynbss, and .rela.bss sections in DYNOBJ, and set up shortcuts
10014 to them in our hash. */
10015#define elf_backend_create_dynamic_sections \
cec5225b 10016 elfNN_aarch64_create_dynamic_sections
a06ea964
NC
10017
10018#define elf_backend_init_index_section \
10019 _bfd_elf_init_2_index_sections
10020
a06ea964 10021#define elf_backend_finish_dynamic_sections \
cec5225b 10022 elfNN_aarch64_finish_dynamic_sections
a06ea964
NC
10023
10024#define elf_backend_finish_dynamic_symbol \
cec5225b 10025 elfNN_aarch64_finish_dynamic_symbol
a06ea964 10026
a06ea964 10027#define elf_backend_object_p \
cec5225b 10028 elfNN_aarch64_object_p
a06ea964 10029
07d6d2b8 10030#define elf_backend_output_arch_local_syms \
cec5225b 10031 elfNN_aarch64_output_arch_local_syms
a06ea964 10032
e7679060
AM
10033#define elf_backend_maybe_function_sym \
10034 elfNN_aarch64_maybe_function_sym
10035
a06ea964 10036#define elf_backend_plt_sym_val \
cec5225b 10037 elfNN_aarch64_plt_sym_val
a06ea964 10038
ed7e9d0b
AM
10039#define elf_backend_init_file_header \
10040 elfNN_aarch64_init_file_header
a06ea964
NC
10041
10042#define elf_backend_relocate_section \
cec5225b 10043 elfNN_aarch64_relocate_section
a06ea964
NC
10044
10045#define elf_backend_reloc_type_class \
cec5225b 10046 elfNN_aarch64_reloc_type_class
a06ea964 10047
a06ea964 10048#define elf_backend_section_from_shdr \
cec5225b 10049 elfNN_aarch64_section_from_shdr
a06ea964
NC
10050
10051#define elf_backend_size_dynamic_sections \
cec5225b 10052 elfNN_aarch64_size_dynamic_sections
a06ea964
NC
10053
10054#define elf_backend_size_info \
cec5225b 10055 elfNN_aarch64_size_info
a06ea964 10056
68fcca92
JW
10057#define elf_backend_write_section \
10058 elfNN_aarch64_write_section
10059
d691934d
NC
10060#define elf_backend_symbol_processing \
10061 elfNN_aarch64_backend_symbol_processing
10062
cd702818
SD
10063#define elf_backend_setup_gnu_properties \
10064 elfNN_aarch64_link_setup_gnu_properties
10065
10066#define elf_backend_merge_gnu_properties \
10067 elfNN_aarch64_merge_gnu_properties
10068
a06ea964 10069#define elf_backend_can_refcount 1
59c108f7 10070#define elf_backend_can_gc_sections 1
a06ea964
NC
10071#define elf_backend_plt_readonly 1
10072#define elf_backend_want_got_plt 1
10073#define elf_backend_want_plt_sym 0
5474d94f 10074#define elf_backend_want_dynrelro 1
a06ea964
NC
10075#define elf_backend_may_use_rel_p 0
10076#define elf_backend_may_use_rela_p 1
10077#define elf_backend_default_use_rela_p 1
07d6d2b8 10078#define elf_backend_rela_normal 1
64f52338 10079#define elf_backend_dtrel_excludes_plt 1
a06ea964 10080#define elf_backend_got_header_size (GOT_ENTRY_SIZE * 3)
c495064d 10081#define elf_backend_default_execstack 0
32f573bc 10082#define elf_backend_extern_protected_data 1
7f784814 10083#define elf_backend_hash_symbol elf_aarch64_hash_symbol
a06ea964 10084
07d6d2b8 10085#undef elf_backend_obj_attrs_section
a06ea964
NC
10086#define elf_backend_obj_attrs_section ".ARM.attributes"
10087
cec5225b 10088#include "elfNN-target.h"
a75cf613
ES
10089
10090/* CloudABI support. */
10091
10092#undef TARGET_LITTLE_SYM
10093#define TARGET_LITTLE_SYM aarch64_elfNN_le_cloudabi_vec
10094#undef TARGET_LITTLE_NAME
10095#define TARGET_LITTLE_NAME "elfNN-littleaarch64-cloudabi"
10096#undef TARGET_BIG_SYM
10097#define TARGET_BIG_SYM aarch64_elfNN_be_cloudabi_vec
10098#undef TARGET_BIG_NAME
10099#define TARGET_BIG_NAME "elfNN-bigaarch64-cloudabi"
10100
10101#undef ELF_OSABI
10102#define ELF_OSABI ELFOSABI_CLOUDABI
10103
10104#undef elfNN_bed
10105#define elfNN_bed elfNN_aarch64_cloudabi_bed
10106
10107#include "elfNN-target.h"
This page took 1.131827 seconds and 4 git commands to generate.