33 kx /* AArch64-specific support for NN-bit ELF.
33 kx Copyright (C) 2009-2023 Free Software Foundation, Inc.
33 kx Contributed by ARM Ltd.
33 kx
33 kx This file is part of BFD, the Binary File Descriptor library.
33 kx
33 kx This program is free software; you can redistribute it and/or modify
33 kx it under the terms of the GNU General Public License as published by
33 kx the Free Software Foundation; either version 3 of the License, or
33 kx (at your option) any later version.
33 kx
33 kx This program is distributed in the hope that it will be useful,
33 kx but WITHOUT ANY WARRANTY; without even the implied warranty of
33 kx MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
33 kx GNU General Public License for more details.
33 kx
33 kx You should have received a copy of the GNU General Public License
33 kx along with this program; see the file COPYING3. If not,
33 kx see <http://www.gnu.org/licenses/>. */
33 kx
33 kx /* Notes on implementation:
33 kx
33 kx Thread Local Store (TLS)
33 kx
33 kx Overview:
33 kx
33 kx The implementation currently supports both traditional TLS and TLS
33 kx descriptors, but only general dynamic (GD).
33 kx
33 kx For traditional TLS the assembler will present us with code
33 kx fragments of the form:
33 kx
33 kx adrp x0, :tlsgd:foo
33 kx R_AARCH64_TLSGD_ADR_PAGE21(foo)
33 kx add x0, :tlsgd_lo12:foo
33 kx R_AARCH64_TLSGD_ADD_LO12_NC(foo)
33 kx bl __tls_get_addr
33 kx nop
33 kx
33 kx For TLS descriptors the assembler will present us with code
33 kx fragments of the form:
33 kx
33 kx adrp x0, :tlsdesc:foo R_AARCH64_TLSDESC_ADR_PAGE21(foo)
33 kx ldr x1, [x0, #:tlsdesc_lo12:foo] R_AARCH64_TLSDESC_LD64_LO12(foo)
33 kx add x0, x0, #:tlsdesc_lo12:foo R_AARCH64_TLSDESC_ADD_LO12(foo)
33 kx .tlsdesccall foo
33 kx blr x1 R_AARCH64_TLSDESC_CALL(foo)
33 kx
33 kx The relocations R_AARCH64_TLSGD_{ADR_PREL21,ADD_LO12_NC} against foo
33 kx indicate that foo is thread local and should be accessed via the
33 kx traditional TLS mechanims.
33 kx
33 kx The relocations R_AARCH64_TLSDESC_{ADR_PAGE21,LD64_LO12_NC,ADD_LO12_NC}
33 kx against foo indicate that 'foo' is thread local and should be accessed
33 kx via a TLS descriptor mechanism.
33 kx
33 kx The precise instruction sequence is only relevant from the
33 kx perspective of linker relaxation which is currently not implemented.
33 kx
33 kx The static linker must detect that 'foo' is a TLS object and
33 kx allocate a double GOT entry. The GOT entry must be created for both
33 kx global and local TLS symbols. Note that this is different to none
33 kx TLS local objects which do not need a GOT entry.
33 kx
33 kx In the traditional TLS mechanism, the double GOT entry is used to
33 kx provide the tls_index structure, containing module and offset
33 kx entries. The static linker places the relocation R_AARCH64_TLS_DTPMOD
33 kx on the module entry. The loader will subsequently fixup this
33 kx relocation with the module identity.
33 kx
33 kx For global traditional TLS symbols the static linker places an
33 kx R_AARCH64_TLS_DTPREL relocation on the offset entry. The loader
33 kx will subsequently fixup the offset. For local TLS symbols the static
33 kx linker fixes up offset.
33 kx
33 kx In the TLS descriptor mechanism the double GOT entry is used to
33 kx provide the descriptor. The static linker places the relocation
33 kx R_AARCH64_TLSDESC on the first GOT slot. The loader will
33 kx subsequently fix this up.
33 kx
33 kx Implementation:
33 kx
33 kx The handling of TLS symbols is implemented across a number of
33 kx different backend functions. The following is a top level view of
33 kx what processing is performed where.
33 kx
33 kx The TLS implementation maintains state information for each TLS
33 kx symbol. The state information for local and global symbols is kept
33 kx in different places. Global symbols use generic BFD structures while
33 kx local symbols use backend specific structures that are allocated and
33 kx maintained entirely by the backend.
33 kx
33 kx The flow:
33 kx
33 kx elfNN_aarch64_check_relocs()
33 kx
33 kx This function is invoked for each relocation.
33 kx
33 kx The TLS relocations R_AARCH64_TLSGD_{ADR_PREL21,ADD_LO12_NC} and
33 kx R_AARCH64_TLSDESC_{ADR_PAGE21,LD64_LO12_NC,ADD_LO12_NC} are
33 kx spotted. One time creation of local symbol data structures are
33 kx created when the first local symbol is seen.
33 kx
33 kx The reference count for a symbol is incremented. The GOT type for
33 kx each symbol is marked as general dynamic.
33 kx
33 kx elfNN_aarch64_allocate_dynrelocs ()
33 kx
33 kx For each global with positive reference count we allocate a double
33 kx GOT slot. For a traditional TLS symbol we allocate space for two
33 kx relocation entries on the GOT, for a TLS descriptor symbol we
33 kx allocate space for one relocation on the slot. Record the GOT offset
33 kx for this symbol.
33 kx
33 kx elfNN_aarch64_size_dynamic_sections ()
33 kx
33 kx Iterate all input BFDS, look for in the local symbol data structure
33 kx constructed earlier for local TLS symbols and allocate them double
33 kx GOT slots along with space for a single GOT relocation. Update the
33 kx local symbol structure to record the GOT offset allocated.
33 kx
33 kx elfNN_aarch64_relocate_section ()
33 kx
33 kx Calls elfNN_aarch64_final_link_relocate ()
33 kx
33 kx Emit the relevant TLS relocations against the GOT for each TLS
33 kx symbol. For local TLS symbols emit the GOT offset directly. The GOT
33 kx relocations are emitted once the first time a TLS symbol is
33 kx encountered. The implementation uses the LSB of the GOT offset to
33 kx flag that the relevant GOT relocations for a symbol have been
33 kx emitted. All of the TLS code that uses the GOT offset needs to take
33 kx care to mask out this flag bit before using the offset.
33 kx
33 kx elfNN_aarch64_final_link_relocate ()
33 kx
33 kx Fixup the R_AARCH64_TLSGD_{ADR_PREL21, ADD_LO12_NC} relocations. */
33 kx
33 kx #include "sysdep.h"
33 kx #include "bfd.h"
33 kx #include "libiberty.h"
33 kx #include "libbfd.h"
33 kx #include "elf-bfd.h"
33 kx #include "bfdlink.h"
33 kx #include "objalloc.h"
33 kx #include "elf/aarch64.h"
33 kx #include "elfxx-aarch64.h"
33 kx #include "cpu-aarch64.h"
33 kx
33 kx #define ARCH_SIZE NN
33 kx
33 kx #if ARCH_SIZE == 64
33 kx #define AARCH64_R(NAME) R_AARCH64_ ## NAME
33 kx #define AARCH64_R_STR(NAME) "R_AARCH64_" #NAME
33 kx #define HOWTO64(...) HOWTO (__VA_ARGS__)
33 kx #define HOWTO32(...) EMPTY_HOWTO (0)
33 kx #define LOG_FILE_ALIGN 3
33 kx #define BFD_RELOC_AARCH64_TLSDESC_LD64_LO12_NC BFD_RELOC_AARCH64_TLSDESC_LD64_LO12
33 kx #endif
33 kx
33 kx #if ARCH_SIZE == 32
33 kx #define AARCH64_R(NAME) R_AARCH64_P32_ ## NAME
33 kx #define AARCH64_R_STR(NAME) "R_AARCH64_P32_" #NAME
33 kx #define HOWTO64(...) EMPTY_HOWTO (0)
33 kx #define HOWTO32(...) HOWTO (__VA_ARGS__)
33 kx #define LOG_FILE_ALIGN 2
33 kx #define BFD_RELOC_AARCH64_TLSDESC_LD32_LO12 BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC
33 kx #define R_AARCH64_P32_TLSDESC_ADD_LO12 R_AARCH64_P32_TLSDESC_ADD_LO12_NC
33 kx #endif
33 kx
33 kx #define IS_AARCH64_TLS_RELOC(R_TYPE) \
33 kx ((R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PREL21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G1 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLS_DTPMOD \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLS_DTPREL \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLS_TPREL \
33 kx || IS_AARCH64_TLSDESC_RELOC ((R_TYPE)))
33 kx
33 kx #define IS_AARCH64_TLS_RELAX_RELOC(R_TYPE) \
33 kx ((R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_CALL \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD_PREL19 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G1 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADR_PREL21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSGD_MOVW_G1 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21)
33 kx
33 kx #define IS_AARCH64_TLSDESC_RELOC(R_TYPE) \
33 kx ((R_TYPE) == BFD_RELOC_AARCH64_TLSDESC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADD_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_CALL \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD64_LO12 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LDR \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_LD_PREL19 \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC \
33 kx || (R_TYPE) == BFD_RELOC_AARCH64_TLSDESC_OFF_G1)
33 kx
33 kx #define ELIMINATE_COPY_RELOCS 1
33 kx
33 kx /* Return size of a relocation entry. HTAB is the bfd's
33 kx elf_aarch64_link_hash_entry. */
33 kx #define RELOC_SIZE(HTAB) (sizeof (ElfNN_External_Rela))
33 kx
33 kx /* GOT Entry size - 8 bytes in ELF64 and 4 bytes in ELF32. */
33 kx #define GOT_ENTRY_SIZE (ARCH_SIZE / 8)
33 kx #define PLT_ENTRY_SIZE (32)
33 kx #define PLT_SMALL_ENTRY_SIZE (16)
33 kx #define PLT_TLSDESC_ENTRY_SIZE (32)
33 kx /* PLT sizes with BTI insn. */
33 kx #define PLT_BTI_SMALL_ENTRY_SIZE (24)
33 kx /* PLT sizes with PAC insn. */
33 kx #define PLT_PAC_SMALL_ENTRY_SIZE (24)
33 kx /* PLT sizes with BTI and PAC insn. */
33 kx #define PLT_BTI_PAC_SMALL_ENTRY_SIZE (24)
33 kx
33 kx /* Encoding of the nop instruction. */
33 kx #define INSN_NOP 0xd503201f
33 kx
33 kx #define aarch64_compute_jump_table_size(htab) \
33 kx (((htab)->root.srelplt == NULL) ? 0 \
33 kx : (htab)->root.srelplt->reloc_count * GOT_ENTRY_SIZE)
33 kx
33 kx /* The first entry in a procedure linkage table looks like this
33 kx if the distance between the PLTGOT and the PLT is < 4GB use
33 kx these PLT entries. Note that the dynamic linker gets &PLTGOT[2]
33 kx in x16 and needs to work out PLTGOT[1] by using an address of
33 kx [x16,#-GOT_ENTRY_SIZE]. */
33 kx static const bfd_byte elfNN_aarch64_small_plt0_entry[PLT_ENTRY_SIZE] =
33 kx {
33 kx 0xf0, 0x7b, 0xbf, 0xa9, /* stp x16, x30, [sp, #-16]! */
33 kx 0x10, 0x00, 0x00, 0x90, /* adrp x16, (GOT+16) */
33 kx #if ARCH_SIZE == 64
33 kx 0x11, 0x0A, 0x40, 0xf9, /* ldr x17, [x16, #PLT_GOT+0x10] */
33 kx 0x10, 0x42, 0x00, 0x91, /* add x16, x16,#PLT_GOT+0x10 */
33 kx #else
33 kx 0x11, 0x0A, 0x40, 0xb9, /* ldr w17, [x16, #PLT_GOT+0x8] */
33 kx 0x10, 0x22, 0x00, 0x11, /* add w16, w16,#PLT_GOT+0x8 */
33 kx #endif
33 kx 0x20, 0x02, 0x1f, 0xd6, /* br x17 */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx };
33 kx
33 kx static const bfd_byte elfNN_aarch64_small_plt0_bti_entry[PLT_ENTRY_SIZE] =
33 kx {
33 kx 0x5f, 0x24, 0x03, 0xd5, /* bti c. */
33 kx 0xf0, 0x7b, 0xbf, 0xa9, /* stp x16, x30, [sp, #-16]! */
33 kx 0x10, 0x00, 0x00, 0x90, /* adrp x16, (GOT+16) */
33 kx #if ARCH_SIZE == 64
33 kx 0x11, 0x0A, 0x40, 0xf9, /* ldr x17, [x16, #PLT_GOT+0x10] */
33 kx 0x10, 0x42, 0x00, 0x91, /* add x16, x16,#PLT_GOT+0x10 */
33 kx #else
33 kx 0x11, 0x0A, 0x40, 0xb9, /* ldr w17, [x16, #PLT_GOT+0x8] */
33 kx 0x10, 0x22, 0x00, 0x11, /* add w16, w16,#PLT_GOT+0x8 */
33 kx #endif
33 kx 0x20, 0x02, 0x1f, 0xd6, /* br x17 */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx };
33 kx
33 kx /* Per function entry in a procedure linkage table looks like this
33 kx if the distance between the PLTGOT and the PLT is < 4GB use
33 kx these PLT entries. Use BTI versions of the PLTs when enabled. */
33 kx static const bfd_byte elfNN_aarch64_small_plt_entry[PLT_SMALL_ENTRY_SIZE] =
33 kx {
33 kx 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
33 kx #if ARCH_SIZE == 64
33 kx 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
33 kx 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
33 kx #else
33 kx 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
33 kx 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
33 kx #endif
33 kx 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
33 kx };
33 kx
33 kx static const bfd_byte
33 kx elfNN_aarch64_small_plt_bti_entry[PLT_BTI_SMALL_ENTRY_SIZE] =
33 kx {
33 kx 0x5f, 0x24, 0x03, 0xd5, /* bti c. */
33 kx 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
33 kx #if ARCH_SIZE == 64
33 kx 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
33 kx 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
33 kx #else
33 kx 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
33 kx 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
33 kx #endif
33 kx 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx };
33 kx
33 kx static const bfd_byte
33 kx elfNN_aarch64_small_plt_pac_entry[PLT_PAC_SMALL_ENTRY_SIZE] =
33 kx {
33 kx 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
33 kx #if ARCH_SIZE == 64
33 kx 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
33 kx 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
33 kx #else
33 kx 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
33 kx 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
33 kx #endif
33 kx 0x9f, 0x21, 0x03, 0xd5, /* autia1716 */
33 kx 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx };
33 kx
33 kx static const bfd_byte
33 kx elfNN_aarch64_small_plt_bti_pac_entry[PLT_BTI_PAC_SMALL_ENTRY_SIZE] =
33 kx {
33 kx 0x5f, 0x24, 0x03, 0xd5, /* bti c. */
33 kx 0x10, 0x00, 0x00, 0x90, /* adrp x16, PLTGOT + n * 8 */
33 kx #if ARCH_SIZE == 64
33 kx 0x11, 0x02, 0x40, 0xf9, /* ldr x17, [x16, PLTGOT + n * 8] */
33 kx 0x10, 0x02, 0x00, 0x91, /* add x16, x16, :lo12:PLTGOT + n * 8 */
33 kx #else
33 kx 0x11, 0x02, 0x40, 0xb9, /* ldr w17, [x16, PLTGOT + n * 4] */
33 kx 0x10, 0x02, 0x00, 0x11, /* add w16, w16, :lo12:PLTGOT + n * 4 */
33 kx #endif
33 kx 0x9f, 0x21, 0x03, 0xd5, /* autia1716 */
33 kx 0x20, 0x02, 0x1f, 0xd6, /* br x17. */
33 kx };
33 kx
33 kx static const bfd_byte
33 kx elfNN_aarch64_tlsdesc_small_plt_entry[PLT_TLSDESC_ENTRY_SIZE] =
33 kx {
33 kx 0xe2, 0x0f, 0xbf, 0xa9, /* stp x2, x3, [sp, #-16]! */
33 kx 0x02, 0x00, 0x00, 0x90, /* adrp x2, 0 */
33 kx 0x03, 0x00, 0x00, 0x90, /* adrp x3, 0 */
33 kx #if ARCH_SIZE == 64
33 kx 0x42, 0x00, 0x40, 0xf9, /* ldr x2, [x2, #0] */
33 kx 0x63, 0x00, 0x00, 0x91, /* add x3, x3, 0 */
33 kx #else
33 kx 0x42, 0x00, 0x40, 0xb9, /* ldr w2, [x2, #0] */
33 kx 0x63, 0x00, 0x00, 0x11, /* add w3, w3, 0 */
33 kx #endif
33 kx 0x40, 0x00, 0x1f, 0xd6, /* br x2 */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx };
33 kx
33 kx static const bfd_byte
33 kx elfNN_aarch64_tlsdesc_small_plt_bti_entry[PLT_TLSDESC_ENTRY_SIZE] =
33 kx {
33 kx 0x5f, 0x24, 0x03, 0xd5, /* bti c. */
33 kx 0xe2, 0x0f, 0xbf, 0xa9, /* stp x2, x3, [sp, #-16]! */
33 kx 0x02, 0x00, 0x00, 0x90, /* adrp x2, 0 */
33 kx 0x03, 0x00, 0x00, 0x90, /* adrp x3, 0 */
33 kx #if ARCH_SIZE == 64
33 kx 0x42, 0x00, 0x40, 0xf9, /* ldr x2, [x2, #0] */
33 kx 0x63, 0x00, 0x00, 0x91, /* add x3, x3, 0 */
33 kx #else
33 kx 0x42, 0x00, 0x40, 0xb9, /* ldr w2, [x2, #0] */
33 kx 0x63, 0x00, 0x00, 0x11, /* add w3, w3, 0 */
33 kx #endif
33 kx 0x40, 0x00, 0x1f, 0xd6, /* br x2 */
33 kx 0x1f, 0x20, 0x03, 0xd5, /* nop */
33 kx };
33 kx
33 kx #define elf_info_to_howto elfNN_aarch64_info_to_howto
33 kx #define elf_info_to_howto_rel elfNN_aarch64_info_to_howto
33 kx
33 kx #define AARCH64_ELF_ABI_VERSION 0
33 kx
33 kx /* In case we're on a 32-bit machine, construct a 64-bit "-1" value. */
33 kx #define ALL_ONES (~ (bfd_vma) 0)
33 kx
33 kx /* Indexed by the bfd interal reloc enumerators.
33 kx Therefore, the table needs to be synced with BFD_RELOC_AARCH64_*
33 kx in reloc.c. */
33 kx
33 kx static reloc_howto_type elfNN_aarch64_howto_table[] =
33 kx {
33 kx EMPTY_HOWTO (0),
33 kx
33 kx /* Basic data relocations. */
33 kx
33 kx /* Deprecated, but retained for backwards compatibility. */
33 kx HOWTO64 (R_AARCH64_NULL, /* type */
33 kx 0, /* rightshift */
33 kx 0, /* size */
33 kx 0, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx "R_AARCH64_NULL", /* name */
33 kx false, /* partial_inplace */
33 kx 0, /* src_mask */
33 kx 0, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx HOWTO (R_AARCH64_NONE, /* type */
33 kx 0, /* rightshift */
33 kx 0, /* size */
33 kx 0, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx "R_AARCH64_NONE", /* name */
33 kx false, /* partial_inplace */
33 kx 0, /* src_mask */
33 kx 0, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* .xword: (S+A) */
33 kx HOWTO64 (AARCH64_R (ABS64), /* type */
33 kx 0, /* rightshift */
33 kx 8, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (ABS64), /* name */
33 kx false, /* partial_inplace */
33 kx ALL_ONES, /* src_mask */
33 kx ALL_ONES, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* .word: (S+A) */
33 kx HOWTO (AARCH64_R (ABS32), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 32, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (ABS32), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffffffff, /* src_mask */
33 kx 0xffffffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* .half: (S+A) */
33 kx HOWTO (AARCH64_R (ABS16), /* type */
33 kx 0, /* rightshift */
33 kx 2, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (ABS16), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* .xword: (S+A-P) */
33 kx HOWTO64 (AARCH64_R (PREL64), /* type */
33 kx 0, /* rightshift */
33 kx 8, /* size */
33 kx 64, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (PREL64), /* name */
33 kx false, /* partial_inplace */
33 kx ALL_ONES, /* src_mask */
33 kx ALL_ONES, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* .word: (S+A-P) */
33 kx HOWTO (AARCH64_R (PREL32), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 32, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (PREL32), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffffffff, /* src_mask */
33 kx 0xffffffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* .half: (S+A-P) */
33 kx HOWTO (AARCH64_R (PREL16), /* type */
33 kx 0, /* rightshift */
33 kx 2, /* size */
33 kx 16, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (PREL16), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* Group relocations to create a 16, 32, 48 or 64 bit
33 kx unsigned data or abs address inline. */
33 kx
33 kx /* MOVZ: ((S+A) >> 0) & 0xffff */
33 kx HOWTO (AARCH64_R (MOVW_UABS_G0), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_UABS_G0), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVK: ((S+A) >> 0) & 0xffff [no overflow check] */
33 kx HOWTO (AARCH64_R (MOVW_UABS_G0_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_UABS_G0_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVZ: ((S+A) >> 16) & 0xffff */
33 kx HOWTO (AARCH64_R (MOVW_UABS_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_UABS_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVK: ((S+A) >> 16) & 0xffff [no overflow check] */
33 kx HOWTO64 (AARCH64_R (MOVW_UABS_G1_NC), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_UABS_G1_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVZ: ((S+A) >> 32) & 0xffff */
33 kx HOWTO64 (AARCH64_R (MOVW_UABS_G2), /* type */
33 kx 32, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_UABS_G2), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVK: ((S+A) >> 32) & 0xffff [no overflow check] */
33 kx HOWTO64 (AARCH64_R (MOVW_UABS_G2_NC), /* type */
33 kx 32, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_UABS_G2_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVZ: ((S+A) >> 48) & 0xffff */
33 kx HOWTO64 (AARCH64_R (MOVW_UABS_G3), /* type */
33 kx 48, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_UABS_G3), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Group relocations to create high part of a 16, 32, 48 or 64 bit
33 kx signed data or abs address inline. Will change instruction
33 kx to MOVN or MOVZ depending on sign of calculated value. */
33 kx
33 kx /* MOV[ZN]: ((S+A) >> 0) & 0xffff */
33 kx HOWTO (AARCH64_R (MOVW_SABS_G0), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 17, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_SABS_G0), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOV[ZN]: ((S+A) >> 16) & 0xffff */
33 kx HOWTO64 (AARCH64_R (MOVW_SABS_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 17, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_SABS_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOV[ZN]: ((S+A) >> 32) & 0xffff */
33 kx HOWTO64 (AARCH64_R (MOVW_SABS_G2), /* type */
33 kx 32, /* rightshift */
33 kx 4, /* size */
33 kx 17, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_SABS_G2), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Group relocations to create a 16, 32, 48 or 64 bit
33 kx PC relative address inline. */
33 kx
33 kx /* MOV[NZ]: ((S+A-P) >> 0) & 0xffff */
33 kx HOWTO (AARCH64_R (MOVW_PREL_G0), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 17, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_PREL_G0), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* MOVK: ((S+A-P) >> 0) & 0xffff [no overflow check] */
33 kx HOWTO (AARCH64_R (MOVW_PREL_G0_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_PREL_G0_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* MOV[NZ]: ((S+A-P) >> 16) & 0xffff */
33 kx HOWTO (AARCH64_R (MOVW_PREL_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 17, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_PREL_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* MOVK: ((S+A-P) >> 16) & 0xffff [no overflow check] */
33 kx HOWTO64 (AARCH64_R (MOVW_PREL_G1_NC), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_PREL_G1_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* MOV[NZ]: ((S+A-P) >> 32) & 0xffff */
33 kx HOWTO64 (AARCH64_R (MOVW_PREL_G2), /* type */
33 kx 32, /* rightshift */
33 kx 4, /* size */
33 kx 17, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_PREL_G2), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* MOVK: ((S+A-P) >> 32) & 0xffff [no overflow check] */
33 kx HOWTO64 (AARCH64_R (MOVW_PREL_G2_NC), /* type */
33 kx 32, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_PREL_G2_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* MOV[NZ]: ((S+A-P) >> 48) & 0xffff */
33 kx HOWTO64 (AARCH64_R (MOVW_PREL_G3), /* type */
33 kx 48, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_PREL_G3), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* Relocations to generate 19, 21 and 33 bit PC-relative load/store
33 kx addresses: PG(x) is (x & ~0xfff). */
33 kx
33 kx /* LD-lit: ((S+A-P) >> 2) & 0x7ffff */
33 kx HOWTO (AARCH64_R (LD_PREL_LO19), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 19, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LD_PREL_LO19), /* name */
33 kx false, /* partial_inplace */
33 kx 0x7ffff, /* src_mask */
33 kx 0x7ffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* ADR: (S+A-P) & 0x1fffff */
33 kx HOWTO (AARCH64_R (ADR_PREL_LO21), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (ADR_PREL_LO21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
33 kx HOWTO (AARCH64_R (ADR_PREL_PG_HI21), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (ADR_PREL_PG_HI21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff [no overflow check] */
33 kx HOWTO64 (AARCH64_R (ADR_PREL_PG_HI21_NC), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (ADR_PREL_PG_HI21_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* ADD: (S+A) & 0xfff [no overflow check] */
33 kx HOWTO (AARCH64_R (ADD_ABS_LO12_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (ADD_ABS_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffc00, /* src_mask */
33 kx 0x3ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST8: (S+A) & 0xfff */
33 kx HOWTO (AARCH64_R (LDST8_ABS_LO12_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LDST8_ABS_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Relocations for control-flow instructions. */
33 kx
33 kx /* TBZ/NZ: ((S+A-P) >> 2) & 0x3fff */
33 kx HOWTO (AARCH64_R (TSTBR14), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 14, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TSTBR14), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3fff, /* src_mask */
33 kx 0x3fff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* B.cond: ((S+A-P) >> 2) & 0x7ffff */
33 kx HOWTO (AARCH64_R (CONDBR19), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 19, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (CONDBR19), /* name */
33 kx false, /* partial_inplace */
33 kx 0x7ffff, /* src_mask */
33 kx 0x7ffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* B: ((S+A-P) >> 2) & 0x3ffffff */
33 kx HOWTO (AARCH64_R (JUMP26), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 26, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (JUMP26), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffffff, /* src_mask */
33 kx 0x3ffffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* BL: ((S+A-P) >> 2) & 0x3ffffff */
33 kx HOWTO (AARCH64_R (CALL26), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 26, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (CALL26), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffffff, /* src_mask */
33 kx 0x3ffffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* LD/ST16: (S+A) & 0xffe */
33 kx HOWTO (AARCH64_R (LDST16_ABS_LO12_NC), /* type */
33 kx 1, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LDST16_ABS_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffe, /* src_mask */
33 kx 0xffe, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST32: (S+A) & 0xffc */
33 kx HOWTO (AARCH64_R (LDST32_ABS_LO12_NC), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LDST32_ABS_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffc, /* src_mask */
33 kx 0xffc, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST64: (S+A) & 0xff8 */
33 kx HOWTO (AARCH64_R (LDST64_ABS_LO12_NC), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LDST64_ABS_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xff8, /* src_mask */
33 kx 0xff8, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST128: (S+A) & 0xff0 */
33 kx HOWTO (AARCH64_R (LDST128_ABS_LO12_NC), /* type */
33 kx 4, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LDST128_ABS_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xff0, /* src_mask */
33 kx 0xff0, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Set a load-literal immediate field to bits
33 kx 0x1FFFFC of G(S)-P */
33 kx HOWTO (AARCH64_R (GOT_LD_PREL19), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 19, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (GOT_LD_PREL19), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffffe0, /* src_mask */
33 kx 0xffffe0, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* Get to the page for the GOT entry for the symbol
33 kx (G(S) - P) using an ADRP instruction. */
33 kx HOWTO (AARCH64_R (ADR_GOT_PAGE), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (ADR_GOT_PAGE), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* LD64: GOT offset G(S) & 0xff8 */
33 kx HOWTO64 (AARCH64_R (LD64_GOT_LO12_NC), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LD64_GOT_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xff8, /* src_mask */
33 kx 0xff8, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD32: GOT offset G(S) & 0xffc */
33 kx HOWTO32 (AARCH64_R (LD32_GOT_LO12_NC), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LD32_GOT_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffc, /* src_mask */
33 kx 0xffc, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Lower 16 bits of GOT offset for the symbol. */
33 kx HOWTO64 (AARCH64_R (MOVW_GOTOFF_G0_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_GOTOFF_G0_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Higher 16 bits of GOT offset for the symbol. */
33 kx HOWTO64 (AARCH64_R (MOVW_GOTOFF_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (MOVW_GOTOFF_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD64: GOT offset for the symbol. */
33 kx HOWTO64 (AARCH64_R (LD64_GOTOFF_LO15), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LD64_GOTOFF_LO15), /* name */
33 kx false, /* partial_inplace */
33 kx 0x7ff8, /* src_mask */
33 kx 0x7ff8, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD32: GOT offset to the page address of GOT table.
33 kx (G(S) - PAGE (_GLOBAL_OFFSET_TABLE_)) & 0x5ffc. */
33 kx HOWTO32 (AARCH64_R (LD32_GOTPAGE_LO14), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LD32_GOTPAGE_LO14), /* name */
33 kx false, /* partial_inplace */
33 kx 0x5ffc, /* src_mask */
33 kx 0x5ffc, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD64: GOT offset to the page address of GOT table.
33 kx (G(S) - PAGE (_GLOBAL_OFFSET_TABLE_)) & 0x7ff8. */
33 kx HOWTO64 (AARCH64_R (LD64_GOTPAGE_LO15), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (LD64_GOTPAGE_LO15), /* name */
33 kx false, /* partial_inplace */
33 kx 0x7ff8, /* src_mask */
33 kx 0x7ff8, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Get to the page for the GOT entry for the symbol
33 kx (G(S) - P) using an ADRP instruction. */
33 kx HOWTO (AARCH64_R (TLSGD_ADR_PAGE21), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSGD_ADR_PAGE21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSGD_ADR_PREL21), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSGD_ADR_PREL21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* ADD: GOT offset G(S) & 0xff8 [no overflow check] */
33 kx HOWTO (AARCH64_R (TLSGD_ADD_LO12_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSGD_ADD_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Lower 16 bits of GOT offset to tls_index. */
33 kx HOWTO64 (AARCH64_R (TLSGD_MOVW_G0_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSGD_MOVW_G0_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Higher 16 bits of GOT offset to tls_index. */
33 kx HOWTO64 (AARCH64_R (TLSGD_MOVW_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSGD_MOVW_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSIE_ADR_GOTTPREL_PAGE21), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSIE_ADR_GOTTPREL_PAGE21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSIE_LD64_GOTTPREL_LO12_NC), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSIE_LD64_GOTTPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xff8, /* src_mask */
33 kx 0xff8, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO32 (AARCH64_R (TLSIE_LD32_GOTTPREL_LO12_NC), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSIE_LD32_GOTTPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffc, /* src_mask */
33 kx 0xffc, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSIE_LD_GOTTPREL_PREL19), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 19, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSIE_LD_GOTTPREL_PREL19), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1ffffc, /* src_mask */
33 kx 0x1ffffc, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSIE_MOVW_GOTTPREL_G0_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSIE_MOVW_GOTTPREL_G0_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSIE_MOVW_GOTTPREL_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSIE_MOVW_GOTTPREL_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* ADD: bit[23:12] of byte offset to module TLS base address. */
33 kx HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_HI12), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_ADD_DTPREL_HI12), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Unsigned 12 bit byte offset to module TLS base address. */
33 kx HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_LO12), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_ADD_DTPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12. */
33 kx HOWTO (AARCH64_R (TLSLD_ADD_DTPREL_LO12_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_ADD_DTPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* ADD: GOT offset G(S) & 0xff8 [no overflow check] */
33 kx HOWTO (AARCH64_R (TLSLD_ADD_LO12_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_ADD_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Get to the page for the GOT entry for the symbol
33 kx (G(S) - P) using an ADRP instruction. */
33 kx HOWTO (AARCH64_R (TLSLD_ADR_PAGE21), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_ADR_PAGE21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSLD_ADR_PREL21), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_signed, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_ADR_PREL21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* LD/ST16: bit[11:1] of byte offset to module TLS base address. */
33 kx HOWTO64 (AARCH64_R (TLSLD_LDST16_DTPREL_LO12), /* type */
33 kx 1, /* rightshift */
33 kx 4, /* size */
33 kx 11, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_LDST16_DTPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1ffc00, /* src_mask */
33 kx 0x1ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Same as BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12, but no overflow check. */
33 kx HOWTO64 (AARCH64_R (TLSLD_LDST16_DTPREL_LO12_NC), /* type */
33 kx 1, /* rightshift */
33 kx 4, /* size */
33 kx 11, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_LDST16_DTPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1ffc00, /* src_mask */
33 kx 0x1ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST32: bit[11:2] of byte offset to module TLS base address. */
33 kx HOWTO64 (AARCH64_R (TLSLD_LDST32_DTPREL_LO12), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 10, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_LDST32_DTPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffc00, /* src_mask */
33 kx 0x3ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Same as BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12, but no overflow check. */
33 kx HOWTO64 (AARCH64_R (TLSLD_LDST32_DTPREL_LO12_NC), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 10, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_LDST32_DTPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffc00, /* src_mask */
33 kx 0xffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST64: bit[11:3] of byte offset to module TLS base address. */
33 kx HOWTO64 (AARCH64_R (TLSLD_LDST64_DTPREL_LO12), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 9, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_LDST64_DTPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffc00, /* src_mask */
33 kx 0x3ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Same as BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12, but no overflow check. */
33 kx HOWTO64 (AARCH64_R (TLSLD_LDST64_DTPREL_LO12_NC), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 9, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_LDST64_DTPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0x7fc00, /* src_mask */
33 kx 0x7fc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST8: bit[11:0] of byte offset to module TLS base address. */
33 kx HOWTO64 (AARCH64_R (TLSLD_LDST8_DTPREL_LO12), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_LDST8_DTPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffc00, /* src_mask */
33 kx 0x3ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Same as BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12, but no overflow check. */
33 kx HOWTO64 (AARCH64_R (TLSLD_LDST8_DTPREL_LO12_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_LDST8_DTPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffc00, /* src_mask */
33 kx 0x3ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVZ: bit[15:0] of byte offset to module TLS base address. */
33 kx HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G0), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_MOVW_DTPREL_G0), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0. */
33 kx HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G0_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_MOVW_DTPREL_G0_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVZ: bit[31:16] of byte offset to module TLS base address. */
33 kx HOWTO (AARCH64_R (TLSLD_MOVW_DTPREL_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_MOVW_DTPREL_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* No overflow check version of BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1. */
33 kx HOWTO64 (AARCH64_R (TLSLD_MOVW_DTPREL_G1_NC), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_MOVW_DTPREL_G1_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* MOVZ: bit[47:32] of byte offset to module TLS base address. */
33 kx HOWTO64 (AARCH64_R (TLSLD_MOVW_DTPREL_G2), /* type */
33 kx 32, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLD_MOVW_DTPREL_G2), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSLE_MOVW_TPREL_G2), /* type */
33 kx 32, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_MOVW_TPREL_G2), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_MOVW_TPREL_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSLE_MOVW_TPREL_G1_NC), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_MOVW_TPREL_G1_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G0), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_MOVW_TPREL_G0), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSLE_MOVW_TPREL_G0_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 16, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_MOVW_TPREL_G0_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSLE_ADD_TPREL_HI12), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_ADD_TPREL_HI12), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSLE_ADD_TPREL_LO12), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_ADD_TPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSLE_ADD_TPREL_LO12_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_ADD_TPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST16: bit[11:1] of byte offset to module TLS base address. */
33 kx HOWTO (AARCH64_R (TLSLE_LDST16_TPREL_LO12), /* type */
33 kx 1, /* rightshift */
33 kx 4, /* size */
33 kx 11, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_LDST16_TPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1ffc00, /* src_mask */
33 kx 0x1ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Same as BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12, but no overflow check. */
33 kx HOWTO (AARCH64_R (TLSLE_LDST16_TPREL_LO12_NC), /* type */
33 kx 1, /* rightshift */
33 kx 4, /* size */
33 kx 11, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_LDST16_TPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1ffc00, /* src_mask */
33 kx 0x1ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST32: bit[11:2] of byte offset to module TLS base address. */
33 kx HOWTO (AARCH64_R (TLSLE_LDST32_TPREL_LO12), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 10, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_LDST32_TPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffc00, /* src_mask */
33 kx 0xffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Same as BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12, but no overflow check. */
33 kx HOWTO (AARCH64_R (TLSLE_LDST32_TPREL_LO12_NC), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 10, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_LDST32_TPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffc00, /* src_mask */
33 kx 0xffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST64: bit[11:3] of byte offset to module TLS base address. */
33 kx HOWTO (AARCH64_R (TLSLE_LDST64_TPREL_LO12), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 9, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_LDST64_TPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0x7fc00, /* src_mask */
33 kx 0x7fc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Same as BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12, but no overflow check. */
33 kx HOWTO (AARCH64_R (TLSLE_LDST64_TPREL_LO12_NC), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 9, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_LDST64_TPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0x7fc00, /* src_mask */
33 kx 0x7fc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD/ST8: bit[11:0] of byte offset to module TLS base address. */
33 kx HOWTO (AARCH64_R (TLSLE_LDST8_TPREL_LO12), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_LDST8_TPREL_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffc00, /* src_mask */
33 kx 0x3ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* Same as BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12, but no overflow check. */
33 kx HOWTO (AARCH64_R (TLSLE_LDST8_TPREL_LO12_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 10, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSLE_LDST8_TPREL_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0x3ffc00, /* src_mask */
33 kx 0x3ffc00, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSDESC_LD_PREL19), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 19, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_LD_PREL19), /* name */
33 kx false, /* partial_inplace */
33 kx 0x0ffffe0, /* src_mask */
33 kx 0x0ffffe0, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSDESC_ADR_PREL21), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_ADR_PREL21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* Get to the page for the GOT entry for the symbol
33 kx (G(S) - P) using an ADRP instruction. */
33 kx HOWTO (AARCH64_R (TLSDESC_ADR_PAGE21), /* type */
33 kx 12, /* rightshift */
33 kx 4, /* size */
33 kx 21, /* bitsize */
33 kx true, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_ADR_PAGE21), /* name */
33 kx false, /* partial_inplace */
33 kx 0x1fffff, /* src_mask */
33 kx 0x1fffff, /* dst_mask */
33 kx true), /* pcrel_offset */
33 kx
33 kx /* LD64: GOT offset G(S) & 0xff8. */
33 kx HOWTO64 (AARCH64_R (TLSDESC_LD64_LO12), /* type */
33 kx 3, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_LD64_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0xff8, /* src_mask */
33 kx 0xff8, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* LD32: GOT offset G(S) & 0xffc. */
33 kx HOWTO32 (AARCH64_R (TLSDESC_LD32_LO12_NC), /* type */
33 kx 2, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_LD32_LO12_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffc, /* src_mask */
33 kx 0xffc, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx /* ADD: GOT offset G(S) & 0xfff. */
33 kx HOWTO (AARCH64_R (TLSDESC_ADD_LO12), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont,/* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_ADD_LO12), /* name */
33 kx false, /* partial_inplace */
33 kx 0xfff, /* src_mask */
33 kx 0xfff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSDESC_OFF_G1), /* type */
33 kx 16, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_unsigned, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_OFF_G1), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSDESC_OFF_G0_NC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_OFF_G0_NC), /* name */
33 kx false, /* partial_inplace */
33 kx 0xffff, /* src_mask */
33 kx 0xffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSDESC_LDR), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_LDR), /* name */
33 kx false, /* partial_inplace */
33 kx 0x0, /* src_mask */
33 kx 0x0, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO64 (AARCH64_R (TLSDESC_ADD), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 12, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_ADD), /* name */
33 kx false, /* partial_inplace */
33 kx 0x0, /* src_mask */
33 kx 0x0, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSDESC_CALL), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 0, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC_CALL), /* name */
33 kx false, /* partial_inplace */
33 kx 0x0, /* src_mask */
33 kx 0x0, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (COPY), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_bitfield, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (COPY), /* name */
33 kx true, /* partial_inplace */
33 kx 0xffffffff, /* src_mask */
33 kx 0xffffffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (GLOB_DAT), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_bitfield, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (GLOB_DAT), /* name */
33 kx true, /* partial_inplace */
33 kx 0xffffffff, /* src_mask */
33 kx 0xffffffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (JUMP_SLOT), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_bitfield, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (JUMP_SLOT), /* name */
33 kx true, /* partial_inplace */
33 kx 0xffffffff, /* src_mask */
33 kx 0xffffffff, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (RELATIVE), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_bitfield, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (RELATIVE), /* name */
33 kx true, /* partial_inplace */
33 kx ALL_ONES, /* src_mask */
33 kx ALL_ONES, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLS_DTPMOD), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx #if ARCH_SIZE == 64
33 kx AARCH64_R_STR (TLS_DTPMOD64), /* name */
33 kx #else
33 kx AARCH64_R_STR (TLS_DTPMOD), /* name */
33 kx #endif
33 kx false, /* partial_inplace */
33 kx 0, /* src_mask */
33 kx ALL_ONES, /* dst_mask */
33 kx false), /* pc_reloffset */
33 kx
33 kx HOWTO (AARCH64_R (TLS_DTPREL), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx #if ARCH_SIZE == 64
33 kx AARCH64_R_STR (TLS_DTPREL64), /* name */
33 kx #else
33 kx AARCH64_R_STR (TLS_DTPREL), /* name */
33 kx #endif
33 kx false, /* partial_inplace */
33 kx 0, /* src_mask */
33 kx ALL_ONES, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLS_TPREL), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx #if ARCH_SIZE == 64
33 kx AARCH64_R_STR (TLS_TPREL64), /* name */
33 kx #else
33 kx AARCH64_R_STR (TLS_TPREL), /* name */
33 kx #endif
33 kx false, /* partial_inplace */
33 kx 0, /* src_mask */
33 kx ALL_ONES, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (TLSDESC), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (TLSDESC), /* name */
33 kx false, /* partial_inplace */
33 kx 0, /* src_mask */
33 kx ALL_ONES, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx HOWTO (AARCH64_R (IRELATIVE), /* type */
33 kx 0, /* rightshift */
33 kx 4, /* size */
33 kx 64, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_bitfield, /* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx AARCH64_R_STR (IRELATIVE), /* name */
33 kx false, /* partial_inplace */
33 kx 0, /* src_mask */
33 kx ALL_ONES, /* dst_mask */
33 kx false), /* pcrel_offset */
33 kx
33 kx EMPTY_HOWTO (0),
33 kx };
33 kx
33 kx static reloc_howto_type elfNN_aarch64_howto_none =
33 kx HOWTO (R_AARCH64_NONE, /* type */
33 kx 0, /* rightshift */
33 kx 0, /* size */
33 kx 0, /* bitsize */
33 kx false, /* pc_relative */
33 kx 0, /* bitpos */
33 kx complain_overflow_dont,/* complain_on_overflow */
33 kx bfd_elf_generic_reloc, /* special_function */
33 kx "R_AARCH64_NONE", /* name */
33 kx false, /* partial_inplace */
33 kx 0, /* src_mask */
33 kx 0, /* dst_mask */
33 kx false); /* pcrel_offset */
33 kx
33 kx /* Given HOWTO, return the bfd internal relocation enumerator. */
33 kx
33 kx static bfd_reloc_code_real_type
33 kx elfNN_aarch64_bfd_reloc_from_howto (reloc_howto_type *howto)
33 kx {
33 kx const int size
33 kx = (int) ARRAY_SIZE (elfNN_aarch64_howto_table);
33 kx const ptrdiff_t offset
33 kx = howto - elfNN_aarch64_howto_table;
33 kx
33 kx if (offset > 0 && offset < size - 1)
33 kx return BFD_RELOC_AARCH64_RELOC_START + offset;
33 kx
33 kx if (howto == &elfNN_aarch64_howto_none)
33 kx return BFD_RELOC_AARCH64_NONE;
33 kx
33 kx return BFD_RELOC_AARCH64_RELOC_START;
33 kx }
33 kx
33 kx /* Given R_TYPE, return the bfd internal relocation enumerator. */
33 kx
33 kx static bfd_reloc_code_real_type
33 kx elfNN_aarch64_bfd_reloc_from_type (bfd *abfd, unsigned int r_type)
33 kx {
33 kx static bool initialized_p = false;
33 kx /* Indexed by R_TYPE, values are offsets in the howto_table. */
33 kx static unsigned int offsets[R_AARCH64_end];
33 kx
33 kx if (!initialized_p)
33 kx {
33 kx unsigned int i;
33 kx
33 kx for (i = 1; i < ARRAY_SIZE (elfNN_aarch64_howto_table) - 1; ++i)
33 kx if (elfNN_aarch64_howto_table[i].type != 0)
33 kx offsets[elfNN_aarch64_howto_table[i].type] = i;
33 kx
33 kx initialized_p = true;
33 kx }
33 kx
33 kx if (r_type == R_AARCH64_NONE || r_type == R_AARCH64_NULL)
33 kx return BFD_RELOC_AARCH64_NONE;
33 kx
33 kx /* PR 17512: file: b371e70a. */
33 kx if (r_type >= R_AARCH64_end)
33 kx {
33 kx _bfd_error_handler (_("%pB: unsupported relocation type %#x"),
33 kx abfd, r_type);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return BFD_RELOC_AARCH64_NONE;
33 kx }
33 kx
33 kx return BFD_RELOC_AARCH64_RELOC_START + offsets[r_type];
33 kx }
33 kx
33 kx struct elf_aarch64_reloc_map
33 kx {
33 kx bfd_reloc_code_real_type from;
33 kx bfd_reloc_code_real_type to;
33 kx };
33 kx
33 kx /* Map bfd generic reloc to AArch64-specific reloc. */
33 kx static const struct elf_aarch64_reloc_map elf_aarch64_reloc_map[] =
33 kx {
33 kx {BFD_RELOC_NONE, BFD_RELOC_AARCH64_NONE},
33 kx
33 kx /* Basic data relocations. */
33 kx {BFD_RELOC_CTOR, BFD_RELOC_AARCH64_NN},
33 kx {BFD_RELOC_64, BFD_RELOC_AARCH64_64},
33 kx {BFD_RELOC_32, BFD_RELOC_AARCH64_32},
33 kx {BFD_RELOC_16, BFD_RELOC_AARCH64_16},
33 kx {BFD_RELOC_64_PCREL, BFD_RELOC_AARCH64_64_PCREL},
33 kx {BFD_RELOC_32_PCREL, BFD_RELOC_AARCH64_32_PCREL},
33 kx {BFD_RELOC_16_PCREL, BFD_RELOC_AARCH64_16_PCREL},
33 kx };
33 kx
33 kx /* Given the bfd internal relocation enumerator in CODE, return the
33 kx corresponding howto entry. */
33 kx
33 kx static reloc_howto_type *
33 kx elfNN_aarch64_howto_from_bfd_reloc (bfd_reloc_code_real_type code)
33 kx {
33 kx unsigned int i;
33 kx
33 kx /* Convert bfd generic reloc to AArch64-specific reloc. */
33 kx if (code < BFD_RELOC_AARCH64_RELOC_START
33 kx || code > BFD_RELOC_AARCH64_RELOC_END)
33 kx for (i = 0; i < ARRAY_SIZE (elf_aarch64_reloc_map); i++)
33 kx if (elf_aarch64_reloc_map[i].from == code)
33 kx {
33 kx code = elf_aarch64_reloc_map[i].to;
33 kx break;
33 kx }
33 kx
33 kx if (code > BFD_RELOC_AARCH64_RELOC_START
33 kx && code < BFD_RELOC_AARCH64_RELOC_END)
33 kx if (elfNN_aarch64_howto_table[code - BFD_RELOC_AARCH64_RELOC_START].type)
33 kx return &elfNN_aarch64_howto_table[code - BFD_RELOC_AARCH64_RELOC_START];
33 kx
33 kx if (code == BFD_RELOC_AARCH64_NONE)
33 kx return &elfNN_aarch64_howto_none;
33 kx
33 kx return NULL;
33 kx }
33 kx
33 kx static reloc_howto_type *
33 kx elfNN_aarch64_howto_from_type (bfd *abfd, unsigned int r_type)
33 kx {
33 kx bfd_reloc_code_real_type val;
33 kx reloc_howto_type *howto;
33 kx
33 kx #if ARCH_SIZE == 32
33 kx if (r_type > 256)
33 kx {
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return NULL;
33 kx }
33 kx #endif
33 kx
33 kx if (r_type == R_AARCH64_NONE)
33 kx return &elfNN_aarch64_howto_none;
33 kx
33 kx val = elfNN_aarch64_bfd_reloc_from_type (abfd, r_type);
33 kx howto = elfNN_aarch64_howto_from_bfd_reloc (val);
33 kx
33 kx if (howto != NULL)
33 kx return howto;
33 kx
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return NULL;
33 kx }
33 kx
33 kx static bool
33 kx elfNN_aarch64_info_to_howto (bfd *abfd, arelent *bfd_reloc,
33 kx Elf_Internal_Rela *elf_reloc)
33 kx {
33 kx unsigned int r_type;
33 kx
33 kx r_type = ELFNN_R_TYPE (elf_reloc->r_info);
33 kx bfd_reloc->howto = elfNN_aarch64_howto_from_type (abfd, r_type);
33 kx
33 kx if (bfd_reloc->howto == NULL)
33 kx {
33 kx /* xgettext:c-format */
33 kx _bfd_error_handler (_("%pB: unsupported relocation type %#x"), abfd, r_type);
33 kx return false;
33 kx }
33 kx return true;
33 kx }
33 kx
33 kx static reloc_howto_type *
33 kx elfNN_aarch64_reloc_type_lookup (bfd *abfd ATTRIBUTE_UNUSED,
33 kx bfd_reloc_code_real_type code)
33 kx {
33 kx reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (code);
33 kx
33 kx if (howto != NULL)
33 kx return howto;
33 kx
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return NULL;
33 kx }
33 kx
33 kx static reloc_howto_type *
33 kx elfNN_aarch64_reloc_name_lookup (bfd *abfd ATTRIBUTE_UNUSED,
33 kx const char *r_name)
33 kx {
33 kx unsigned int i;
33 kx
33 kx for (i = 1; i < ARRAY_SIZE (elfNN_aarch64_howto_table) - 1; ++i)
33 kx if (elfNN_aarch64_howto_table[i].name != NULL
33 kx && strcasecmp (elfNN_aarch64_howto_table[i].name, r_name) == 0)
33 kx return &elfNN_aarch64_howto_table[i];
33 kx
33 kx return NULL;
33 kx }
33 kx
33 kx #define TARGET_LITTLE_SYM aarch64_elfNN_le_vec
33 kx #define TARGET_LITTLE_NAME "elfNN-littleaarch64"
33 kx #define TARGET_BIG_SYM aarch64_elfNN_be_vec
33 kx #define TARGET_BIG_NAME "elfNN-bigaarch64"
33 kx
33 kx /* The linker script knows the section names for placement.
33 kx The entry_names are used to do simple name mangling on the stubs.
33 kx Given a function name, and its type, the stub can be found. The
33 kx name can be changed. The only requirement is the %s be present. */
33 kx #define STUB_ENTRY_NAME "__%s_veneer"
33 kx
33 kx /* The name of the dynamic interpreter. This is put in the .interp
33 kx section. */
33 kx #define ELF_DYNAMIC_INTERPRETER "/lib/ld.so.1"
33 kx
33 kx #define AARCH64_MAX_FWD_BRANCH_OFFSET \
33 kx (((1 << 25) - 1) << 2)
33 kx #define AARCH64_MAX_BWD_BRANCH_OFFSET \
33 kx (-((1 << 25) << 2))
33 kx
33 kx #define AARCH64_MAX_ADRP_IMM ((1 << 20) - 1)
33 kx #define AARCH64_MIN_ADRP_IMM (-(1 << 20))
33 kx
33 kx static int
33 kx aarch64_valid_for_adrp_p (bfd_vma value, bfd_vma place)
33 kx {
33 kx bfd_signed_vma offset = (bfd_signed_vma) (PG (value) - PG (place)) >> 12;
33 kx return offset <= AARCH64_MAX_ADRP_IMM && offset >= AARCH64_MIN_ADRP_IMM;
33 kx }
33 kx
33 kx static int
33 kx aarch64_valid_branch_p (bfd_vma value, bfd_vma place)
33 kx {
33 kx bfd_signed_vma offset = (bfd_signed_vma) (value - place);
33 kx return (offset <= AARCH64_MAX_FWD_BRANCH_OFFSET
33 kx && offset >= AARCH64_MAX_BWD_BRANCH_OFFSET);
33 kx }
33 kx
33 kx static const uint32_t aarch64_adrp_branch_stub [] =
33 kx {
33 kx 0x90000010, /* adrp ip0, X */
33 kx /* R_AARCH64_ADR_HI21_PCREL(X) */
33 kx 0x91000210, /* add ip0, ip0, :lo12:X */
33 kx /* R_AARCH64_ADD_ABS_LO12_NC(X) */
33 kx 0xd61f0200, /* br ip0 */
33 kx };
33 kx
33 kx static const uint32_t aarch64_long_branch_stub[] =
33 kx {
33 kx #if ARCH_SIZE == 64
33 kx 0x58000090, /* ldr ip0, 1f */
33 kx #else
33 kx 0x18000090, /* ldr wip0, 1f */
33 kx #endif
33 kx 0x10000011, /* adr ip1, #0 */
33 kx 0x8b110210, /* add ip0, ip0, ip1 */
33 kx 0xd61f0200, /* br ip0 */
33 kx 0x00000000, /* 1: .xword or .word
33 kx R_AARCH64_PRELNN(X) + 12
33 kx */
33 kx 0x00000000,
33 kx };
33 kx
33 kx static const uint32_t aarch64_erratum_835769_stub[] =
33 kx {
33 kx 0x00000000, /* Placeholder for multiply accumulate. */
33 kx 0x14000000, /* b <label> */
33 kx };
33 kx
33 kx static const uint32_t aarch64_erratum_843419_stub[] =
33 kx {
33 kx 0x00000000, /* Placeholder for LDR instruction. */
33 kx 0x14000000, /* b <label> */
33 kx };
33 kx
33 kx /* Section name for stubs is the associated section name plus this
33 kx string. */
33 kx #define STUB_SUFFIX ".stub"
33 kx
33 kx enum elf_aarch64_stub_type
33 kx {
33 kx aarch64_stub_none,
33 kx aarch64_stub_adrp_branch,
33 kx aarch64_stub_long_branch,
33 kx aarch64_stub_erratum_835769_veneer,
33 kx aarch64_stub_erratum_843419_veneer,
33 kx };
33 kx
33 kx struct elf_aarch64_stub_hash_entry
33 kx {
33 kx /* Base hash table entry structure. */
33 kx struct bfd_hash_entry root;
33 kx
33 kx /* The stub section. */
33 kx asection *stub_sec;
33 kx
33 kx /* Offset within stub_sec of the beginning of this stub. */
33 kx bfd_vma stub_offset;
33 kx
33 kx /* Given the symbol's value and its section we can determine its final
33 kx value when building the stubs (so the stub knows where to jump). */
33 kx bfd_vma target_value;
33 kx asection *target_section;
33 kx
33 kx enum elf_aarch64_stub_type stub_type;
33 kx
33 kx /* The symbol table entry, if any, that this was derived from. */
33 kx struct elf_aarch64_link_hash_entry *h;
33 kx
33 kx /* Destination symbol type */
33 kx unsigned char st_type;
33 kx
33 kx /* Where this stub is being called from, or, in the case of combined
33 kx stub sections, the first input section in the group. */
33 kx asection *id_sec;
33 kx
33 kx /* The name for the local symbol at the start of this stub. The
33 kx stub name in the hash table has to be unique; this does not, so
33 kx it can be friendlier. */
33 kx char *output_name;
33 kx
33 kx /* The instruction which caused this stub to be generated (only valid for
33 kx erratum 835769 workaround stubs at present). */
33 kx uint32_t veneered_insn;
33 kx
33 kx /* In an erratum 843419 workaround stub, the ADRP instruction offset. */
33 kx bfd_vma adrp_offset;
33 kx };
33 kx
33 kx /* Used to build a map of a section. This is required for mixed-endian
33 kx code/data. */
33 kx
33 kx typedef struct elf_elf_section_map
33 kx {
33 kx bfd_vma vma;
33 kx char type;
33 kx }
33 kx elf_aarch64_section_map;
33 kx
33 kx
33 kx typedef struct _aarch64_elf_section_data
33 kx {
33 kx struct bfd_elf_section_data elf;
33 kx unsigned int mapcount;
33 kx unsigned int mapsize;
33 kx elf_aarch64_section_map *map;
33 kx }
33 kx _aarch64_elf_section_data;
33 kx
33 kx #define elf_aarch64_section_data(sec) \
33 kx ((_aarch64_elf_section_data *) elf_section_data (sec))
33 kx
33 kx /* The size of the thread control block which is defined to be two pointers. */
33 kx #define TCB_SIZE (ARCH_SIZE/8)*2
33 kx
33 kx struct elf_aarch64_local_symbol
33 kx {
33 kx unsigned int got_type;
33 kx bfd_signed_vma got_refcount;
33 kx bfd_vma got_offset;
33 kx
33 kx /* Offset of the GOTPLT entry reserved for the TLS descriptor. The
33 kx offset is from the end of the jump table and reserved entries
33 kx within the PLTGOT.
33 kx
33 kx The magic value (bfd_vma) -1 indicates that an offset has not be
33 kx allocated. */
33 kx bfd_vma tlsdesc_got_jump_table_offset;
33 kx };
33 kx
33 kx struct elf_aarch64_obj_tdata
33 kx {
33 kx struct elf_obj_tdata root;
33 kx
33 kx /* local symbol descriptors */
33 kx struct elf_aarch64_local_symbol *locals;
33 kx
33 kx /* Zero to warn when linking objects with incompatible enum sizes. */
33 kx int no_enum_size_warning;
33 kx
33 kx /* Zero to warn when linking objects with incompatible wchar_t sizes. */
33 kx int no_wchar_size_warning;
33 kx
33 kx /* All GNU_PROPERTY_AARCH64_FEATURE_1_AND properties. */
33 kx uint32_t gnu_and_prop;
33 kx
33 kx /* Zero to warn when linking objects with incompatible
33 kx GNU_PROPERTY_AARCH64_FEATURE_1_BTI. */
33 kx int no_bti_warn;
33 kx
33 kx /* PLT type based on security. */
33 kx aarch64_plt_type plt_type;
33 kx };
33 kx
33 kx #define elf_aarch64_tdata(bfd) \
33 kx ((struct elf_aarch64_obj_tdata *) (bfd)->tdata.any)
33 kx
33 kx #define elf_aarch64_locals(bfd) (elf_aarch64_tdata (bfd)->locals)
33 kx
33 kx #define is_aarch64_elf(bfd) \
33 kx (bfd_get_flavour (bfd) == bfd_target_elf_flavour \
33 kx && elf_tdata (bfd) != NULL \
33 kx && elf_object_id (bfd) == AARCH64_ELF_DATA)
33 kx
33 kx static bool
33 kx elfNN_aarch64_mkobject (bfd *abfd)
33 kx {
33 kx return bfd_elf_allocate_object (abfd, sizeof (struct elf_aarch64_obj_tdata),
33 kx AARCH64_ELF_DATA);
33 kx }
33 kx
33 kx #define elf_aarch64_hash_entry(ent) \
33 kx ((struct elf_aarch64_link_hash_entry *)(ent))
33 kx
33 kx #define GOT_UNKNOWN 0
33 kx #define GOT_NORMAL 1
33 kx #define GOT_TLS_GD 2
33 kx #define GOT_TLS_IE 4
33 kx #define GOT_TLSDESC_GD 8
33 kx
33 kx #define GOT_TLS_GD_ANY_P(type) ((type & GOT_TLS_GD) || (type & GOT_TLSDESC_GD))
33 kx
33 kx /* AArch64 ELF linker hash entry. */
33 kx struct elf_aarch64_link_hash_entry
33 kx {
33 kx struct elf_link_hash_entry root;
33 kx
33 kx /* Since PLT entries have variable size, we need to record the
33 kx index into .got.plt instead of recomputing it from the PLT
33 kx offset. */
33 kx bfd_signed_vma plt_got_offset;
33 kx
33 kx /* Bit mask representing the type of GOT entry(s) if any required by
33 kx this symbol. */
33 kx unsigned int got_type;
33 kx
33 kx /* TRUE if symbol is defined as a protected symbol. */
33 kx unsigned int def_protected : 1;
33 kx
33 kx /* A pointer to the most recently used stub hash entry against this
33 kx symbol. */
33 kx struct elf_aarch64_stub_hash_entry *stub_cache;
33 kx
33 kx /* Offset of the GOTPLT entry reserved for the TLS descriptor. The offset
33 kx is from the end of the jump table and reserved entries within the PLTGOT.
33 kx
33 kx The magic value (bfd_vma) -1 indicates that an offset has not
33 kx be allocated. */
33 kx bfd_vma tlsdesc_got_jump_table_offset;
33 kx };
33 kx
33 kx static unsigned int
33 kx elfNN_aarch64_symbol_got_type (struct elf_link_hash_entry *h,
33 kx bfd *abfd,
33 kx unsigned long r_symndx)
33 kx {
33 kx if (h)
33 kx return elf_aarch64_hash_entry (h)->got_type;
33 kx
33 kx if (! elf_aarch64_locals (abfd))
33 kx return GOT_UNKNOWN;
33 kx
33 kx return elf_aarch64_locals (abfd)[r_symndx].got_type;
33 kx }
33 kx
33 kx /* Get the AArch64 elf linker hash table from a link_info structure. */
33 kx #define elf_aarch64_hash_table(info) \
33 kx ((struct elf_aarch64_link_hash_table *) ((info)->hash))
33 kx
33 kx #define aarch64_stub_hash_lookup(table, string, create, copy) \
33 kx ((struct elf_aarch64_stub_hash_entry *) \
33 kx bfd_hash_lookup ((table), (string), (create), (copy)))
33 kx
33 kx /* AArch64 ELF linker hash table. */
33 kx struct elf_aarch64_link_hash_table
33 kx {
33 kx /* The main hash table. */
33 kx struct elf_link_hash_table root;
33 kx
33 kx /* Nonzero to force PIC branch veneers. */
33 kx int pic_veneer;
33 kx
33 kx /* Fix erratum 835769. */
33 kx int fix_erratum_835769;
33 kx
33 kx /* Fix erratum 843419. */
33 kx erratum_84319_opts fix_erratum_843419;
33 kx
33 kx /* Don't apply link-time values for dynamic relocations. */
33 kx int no_apply_dynamic_relocs;
33 kx
33 kx /* The number of bytes in the initial entry in the PLT. */
33 kx bfd_size_type plt_header_size;
33 kx
33 kx /* The bytes of the initial PLT entry. */
33 kx const bfd_byte *plt0_entry;
33 kx
33 kx /* The number of bytes in the subsequent PLT entries. */
33 kx bfd_size_type plt_entry_size;
33 kx
33 kx /* The bytes of the subsequent PLT entry. */
33 kx const bfd_byte *plt_entry;
33 kx
33 kx /* For convenience in allocate_dynrelocs. */
33 kx bfd *obfd;
33 kx
33 kx /* The amount of space used by the reserved portion of the sgotplt
33 kx section, plus whatever space is used by the jump slots. */
33 kx bfd_vma sgotplt_jump_table_size;
33 kx
33 kx /* The stub hash table. */
33 kx struct bfd_hash_table stub_hash_table;
33 kx
33 kx /* Linker stub bfd. */
33 kx bfd *stub_bfd;
33 kx
33 kx /* Linker call-backs. */
33 kx asection *(*add_stub_section) (const char *, asection *);
33 kx void (*layout_sections_again) (void);
33 kx
33 kx /* Array to keep track of which stub sections have been created, and
33 kx information on stub grouping. */
33 kx struct map_stub
33 kx {
33 kx /* This is the section to which stubs in the group will be
33 kx attached. */
33 kx asection *link_sec;
33 kx /* The stub section. */
33 kx asection *stub_sec;
33 kx } *stub_group;
33 kx
33 kx /* Assorted information used by elfNN_aarch64_size_stubs. */
33 kx unsigned int bfd_count;
33 kx unsigned int top_index;
33 kx asection **input_list;
33 kx
33 kx /* JUMP_SLOT relocs for variant PCS symbols may be present. */
33 kx int variant_pcs;
33 kx
33 kx /* The number of bytes in the PLT enty for the TLS descriptor. */
33 kx bfd_size_type tlsdesc_plt_entry_size;
33 kx
33 kx /* Used by local STT_GNU_IFUNC symbols. */
33 kx htab_t loc_hash_table;
33 kx void * loc_hash_memory;
33 kx };
33 kx
33 kx /* Create an entry in an AArch64 ELF linker hash table. */
33 kx
33 kx static struct bfd_hash_entry *
33 kx elfNN_aarch64_link_hash_newfunc (struct bfd_hash_entry *entry,
33 kx struct bfd_hash_table *table,
33 kx const char *string)
33 kx {
33 kx struct elf_aarch64_link_hash_entry *ret =
33 kx (struct elf_aarch64_link_hash_entry *) entry;
33 kx
33 kx /* Allocate the structure if it has not already been allocated by a
33 kx subclass. */
33 kx if (ret == NULL)
33 kx ret = bfd_hash_allocate (table,
33 kx sizeof (struct elf_aarch64_link_hash_entry));
33 kx if (ret == NULL)
33 kx return (struct bfd_hash_entry *) ret;
33 kx
33 kx /* Call the allocation method of the superclass. */
33 kx ret = ((struct elf_aarch64_link_hash_entry *)
33 kx _bfd_elf_link_hash_newfunc ((struct bfd_hash_entry *) ret,
33 kx table, string));
33 kx if (ret != NULL)
33 kx {
33 kx ret->got_type = GOT_UNKNOWN;
33 kx ret->def_protected = 0;
33 kx ret->plt_got_offset = (bfd_vma) - 1;
33 kx ret->stub_cache = NULL;
33 kx ret->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
33 kx }
33 kx
33 kx return (struct bfd_hash_entry *) ret;
33 kx }
33 kx
33 kx /* Initialize an entry in the stub hash table. */
33 kx
33 kx static struct bfd_hash_entry *
33 kx stub_hash_newfunc (struct bfd_hash_entry *entry,
33 kx struct bfd_hash_table *table, const char *string)
33 kx {
33 kx /* Allocate the structure if it has not already been allocated by a
33 kx subclass. */
33 kx if (entry == NULL)
33 kx {
33 kx entry = bfd_hash_allocate (table,
33 kx sizeof (struct
33 kx elf_aarch64_stub_hash_entry));
33 kx if (entry == NULL)
33 kx return entry;
33 kx }
33 kx
33 kx /* Call the allocation method of the superclass. */
33 kx entry = bfd_hash_newfunc (entry, table, string);
33 kx if (entry != NULL)
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *eh;
33 kx
33 kx /* Initialize the local fields. */
33 kx eh = (struct elf_aarch64_stub_hash_entry *) entry;
33 kx eh->adrp_offset = 0;
33 kx eh->stub_sec = NULL;
33 kx eh->stub_offset = 0;
33 kx eh->target_value = 0;
33 kx eh->target_section = NULL;
33 kx eh->stub_type = aarch64_stub_none;
33 kx eh->h = NULL;
33 kx eh->id_sec = NULL;
33 kx }
33 kx
33 kx return entry;
33 kx }
33 kx
33 kx /* Compute a hash of a local hash entry. We use elf_link_hash_entry
33 kx for local symbol so that we can handle local STT_GNU_IFUNC symbols
33 kx as global symbol. We reuse indx and dynstr_index for local symbol
33 kx hash since they aren't used by global symbols in this backend. */
33 kx
33 kx static hashval_t
33 kx elfNN_aarch64_local_htab_hash (const void *ptr)
33 kx {
33 kx struct elf_link_hash_entry *h
33 kx = (struct elf_link_hash_entry *) ptr;
33 kx return ELF_LOCAL_SYMBOL_HASH (h->indx, h->dynstr_index);
33 kx }
33 kx
33 kx /* Compare local hash entries. */
33 kx
33 kx static int
33 kx elfNN_aarch64_local_htab_eq (const void *ptr1, const void *ptr2)
33 kx {
33 kx struct elf_link_hash_entry *h1
33 kx = (struct elf_link_hash_entry *) ptr1;
33 kx struct elf_link_hash_entry *h2
33 kx = (struct elf_link_hash_entry *) ptr2;
33 kx
33 kx return h1->indx == h2->indx && h1->dynstr_index == h2->dynstr_index;
33 kx }
33 kx
33 kx /* Find and/or create a hash entry for local symbol. */
33 kx
33 kx static struct elf_link_hash_entry *
33 kx elfNN_aarch64_get_local_sym_hash (struct elf_aarch64_link_hash_table *htab,
33 kx bfd *abfd, const Elf_Internal_Rela *rel,
33 kx bool create)
33 kx {
33 kx struct elf_aarch64_link_hash_entry e, *ret;
33 kx asection *sec = abfd->sections;
33 kx hashval_t h = ELF_LOCAL_SYMBOL_HASH (sec->id,
33 kx ELFNN_R_SYM (rel->r_info));
33 kx void **slot;
33 kx
33 kx e.root.indx = sec->id;
33 kx e.root.dynstr_index = ELFNN_R_SYM (rel->r_info);
33 kx slot = htab_find_slot_with_hash (htab->loc_hash_table, &e, h,
33 kx create ? INSERT : NO_INSERT);
33 kx
33 kx if (!slot)
33 kx return NULL;
33 kx
33 kx if (*slot)
33 kx {
33 kx ret = (struct elf_aarch64_link_hash_entry *) *slot;
33 kx return &ret->root;
33 kx }
33 kx
33 kx ret = (struct elf_aarch64_link_hash_entry *)
33 kx objalloc_alloc ((struct objalloc *) htab->loc_hash_memory,
33 kx sizeof (struct elf_aarch64_link_hash_entry));
33 kx if (ret)
33 kx {
33 kx memset (ret, 0, sizeof (*ret));
33 kx ret->root.indx = sec->id;
33 kx ret->root.dynstr_index = ELFNN_R_SYM (rel->r_info);
33 kx ret->root.dynindx = -1;
33 kx *slot = ret;
33 kx }
33 kx return &ret->root;
33 kx }
33 kx
33 kx /* Copy the extra info we tack onto an elf_link_hash_entry. */
33 kx
33 kx static void
33 kx elfNN_aarch64_copy_indirect_symbol (struct bfd_link_info *info,
33 kx struct elf_link_hash_entry *dir,
33 kx struct elf_link_hash_entry *ind)
33 kx {
33 kx struct elf_aarch64_link_hash_entry *edir, *eind;
33 kx
33 kx edir = (struct elf_aarch64_link_hash_entry *) dir;
33 kx eind = (struct elf_aarch64_link_hash_entry *) ind;
33 kx
33 kx if (ind->root.type == bfd_link_hash_indirect)
33 kx {
33 kx /* Copy over PLT info. */
33 kx if (dir->got.refcount <= 0)
33 kx {
33 kx edir->got_type = eind->got_type;
33 kx eind->got_type = GOT_UNKNOWN;
33 kx }
33 kx }
33 kx
33 kx _bfd_elf_link_hash_copy_indirect (info, dir, ind);
33 kx }
33 kx
33 kx /* Merge non-visibility st_other attributes. */
33 kx
33 kx static void
33 kx elfNN_aarch64_merge_symbol_attribute (struct elf_link_hash_entry *h,
33 kx unsigned int st_other,
33 kx bool definition,
33 kx bool dynamic ATTRIBUTE_UNUSED)
33 kx {
33 kx if (definition)
33 kx {
33 kx struct elf_aarch64_link_hash_entry *eh
33 kx = (struct elf_aarch64_link_hash_entry *)h;
33 kx eh->def_protected = ELF_ST_VISIBILITY (st_other) == STV_PROTECTED;
33 kx }
33 kx
33 kx unsigned int isym_sto = st_other & ~ELF_ST_VISIBILITY (-1);
33 kx unsigned int h_sto = h->other & ~ELF_ST_VISIBILITY (-1);
33 kx
33 kx if (isym_sto == h_sto)
33 kx return;
33 kx
33 kx if (isym_sto & ~STO_AARCH64_VARIANT_PCS)
33 kx /* Not fatal, this callback cannot fail. */
33 kx _bfd_error_handler (_("unknown attribute for symbol `%s': 0x%02x"),
33 kx h->root.root.string, isym_sto);
33 kx
33 kx /* Note: Ideally we would warn about any attribute mismatch, but
33 kx this api does not allow that without substantial changes. */
33 kx if (isym_sto & STO_AARCH64_VARIANT_PCS)
33 kx h->other |= STO_AARCH64_VARIANT_PCS;
33 kx }
33 kx
33 kx /* Destroy an AArch64 elf linker hash table. */
33 kx
33 kx static void
33 kx elfNN_aarch64_link_hash_table_free (bfd *obfd)
33 kx {
33 kx struct elf_aarch64_link_hash_table *ret
33 kx = (struct elf_aarch64_link_hash_table *) obfd->link.hash;
33 kx
33 kx if (ret->loc_hash_table)
33 kx htab_delete (ret->loc_hash_table);
33 kx if (ret->loc_hash_memory)
33 kx objalloc_free ((struct objalloc *) ret->loc_hash_memory);
33 kx
33 kx bfd_hash_table_free (&ret->stub_hash_table);
33 kx _bfd_elf_link_hash_table_free (obfd);
33 kx }
33 kx
33 kx /* Create an AArch64 elf linker hash table. */
33 kx
33 kx static struct bfd_link_hash_table *
33 kx elfNN_aarch64_link_hash_table_create (bfd *abfd)
33 kx {
33 kx struct elf_aarch64_link_hash_table *ret;
33 kx size_t amt = sizeof (struct elf_aarch64_link_hash_table);
33 kx
33 kx ret = bfd_zmalloc (amt);
33 kx if (ret == NULL)
33 kx return NULL;
33 kx
33 kx if (!_bfd_elf_link_hash_table_init
33 kx (&ret->root, abfd, elfNN_aarch64_link_hash_newfunc,
33 kx sizeof (struct elf_aarch64_link_hash_entry), AARCH64_ELF_DATA))
33 kx {
33 kx free (ret);
33 kx return NULL;
33 kx }
33 kx
33 kx ret->plt_header_size = PLT_ENTRY_SIZE;
33 kx ret->plt0_entry = elfNN_aarch64_small_plt0_entry;
33 kx ret->plt_entry_size = PLT_SMALL_ENTRY_SIZE;
33 kx ret->plt_entry = elfNN_aarch64_small_plt_entry;
33 kx ret->tlsdesc_plt_entry_size = PLT_TLSDESC_ENTRY_SIZE;
33 kx ret->obfd = abfd;
33 kx ret->root.tlsdesc_got = (bfd_vma) - 1;
33 kx
33 kx if (!bfd_hash_table_init (&ret->stub_hash_table, stub_hash_newfunc,
33 kx sizeof (struct elf_aarch64_stub_hash_entry)))
33 kx {
33 kx _bfd_elf_link_hash_table_free (abfd);
33 kx return NULL;
33 kx }
33 kx
33 kx ret->loc_hash_table = htab_try_create (1024,
33 kx elfNN_aarch64_local_htab_hash,
33 kx elfNN_aarch64_local_htab_eq,
33 kx NULL);
33 kx ret->loc_hash_memory = objalloc_create ();
33 kx if (!ret->loc_hash_table || !ret->loc_hash_memory)
33 kx {
33 kx elfNN_aarch64_link_hash_table_free (abfd);
33 kx return NULL;
33 kx }
33 kx ret->root.root.hash_table_free = elfNN_aarch64_link_hash_table_free;
33 kx
33 kx return &ret->root.root;
33 kx }
33 kx
33 kx /* Perform relocation R_TYPE. Returns TRUE upon success, FALSE otherwise. */
33 kx
33 kx static bool
33 kx aarch64_relocate (unsigned int r_type, bfd *input_bfd, asection *input_section,
33 kx bfd_vma offset, bfd_vma value)
33 kx {
33 kx reloc_howto_type *howto;
33 kx bfd_vma place;
33 kx
33 kx howto = elfNN_aarch64_howto_from_type (input_bfd, r_type);
33 kx place = (input_section->output_section->vma + input_section->output_offset
33 kx + offset);
33 kx
33 kx r_type = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, r_type, place,
33 kx value, 0, false);
33 kx return _bfd_aarch64_elf_put_addend (input_bfd,
33 kx input_section->contents + offset, r_type,
33 kx howto, value) == bfd_reloc_ok;
33 kx }
33 kx
33 kx static enum elf_aarch64_stub_type
33 kx aarch64_select_branch_stub (bfd_vma value, bfd_vma place)
33 kx {
33 kx if (aarch64_valid_for_adrp_p (value, place))
33 kx return aarch64_stub_adrp_branch;
33 kx return aarch64_stub_long_branch;
33 kx }
33 kx
33 kx /* Determine the type of stub needed, if any, for a call. */
33 kx
33 kx static enum elf_aarch64_stub_type
33 kx aarch64_type_of_stub (asection *input_sec,
33 kx const Elf_Internal_Rela *rel,
33 kx asection *sym_sec,
33 kx unsigned char st_type,
33 kx bfd_vma destination)
33 kx {
33 kx bfd_vma location;
33 kx bfd_signed_vma branch_offset;
33 kx unsigned int r_type;
33 kx enum elf_aarch64_stub_type stub_type = aarch64_stub_none;
33 kx
33 kx if (st_type != STT_FUNC
33 kx && (sym_sec == input_sec))
33 kx return stub_type;
33 kx
33 kx /* Determine where the call point is. */
33 kx location = (input_sec->output_offset
33 kx + input_sec->output_section->vma + rel->r_offset);
33 kx
33 kx branch_offset = (bfd_signed_vma) (destination - location);
33 kx
33 kx r_type = ELFNN_R_TYPE (rel->r_info);
33 kx
33 kx /* We don't want to redirect any old unconditional jump in this way,
33 kx only one which is being used for a sibcall, where it is
33 kx acceptable for the IP0 and IP1 registers to be clobbered. */
33 kx if ((r_type == AARCH64_R (CALL26) || r_type == AARCH64_R (JUMP26))
33 kx && (branch_offset > AARCH64_MAX_FWD_BRANCH_OFFSET
33 kx || branch_offset < AARCH64_MAX_BWD_BRANCH_OFFSET))
33 kx {
33 kx stub_type = aarch64_stub_long_branch;
33 kx }
33 kx
33 kx return stub_type;
33 kx }
33 kx
33 kx /* Build a name for an entry in the stub hash table. */
33 kx
33 kx static char *
33 kx elfNN_aarch64_stub_name (const asection *input_section,
33 kx const asection *sym_sec,
33 kx const struct elf_aarch64_link_hash_entry *hash,
33 kx const Elf_Internal_Rela *rel)
33 kx {
33 kx char *stub_name;
33 kx bfd_size_type len;
33 kx
33 kx if (hash)
33 kx {
33 kx len = 8 + 1 + strlen (hash->root.root.root.string) + 1 + 16 + 1;
33 kx stub_name = bfd_malloc (len);
33 kx if (stub_name != NULL)
33 kx snprintf (stub_name, len, "%08x_%s+%" PRIx64,
33 kx (unsigned int) input_section->id,
33 kx hash->root.root.root.string,
33 kx (uint64_t) rel->r_addend);
33 kx }
33 kx else
33 kx {
33 kx len = 8 + 1 + 8 + 1 + 8 + 1 + 16 + 1;
33 kx stub_name = bfd_malloc (len);
33 kx if (stub_name != NULL)
33 kx snprintf (stub_name, len, "%08x_%x:%x+%" PRIx64,
33 kx (unsigned int) input_section->id,
33 kx (unsigned int) sym_sec->id,
33 kx (unsigned int) ELFNN_R_SYM (rel->r_info),
33 kx (uint64_t) rel->r_addend);
33 kx }
33 kx
33 kx return stub_name;
33 kx }
33 kx
33 kx /* Return TRUE if symbol H should be hashed in the `.gnu.hash' section. For
33 kx executable PLT slots where the executable never takes the address of those
33 kx functions, the function symbols are not added to the hash table. */
33 kx
33 kx static bool
33 kx elf_aarch64_hash_symbol (struct elf_link_hash_entry *h)
33 kx {
33 kx if (h->plt.offset != (bfd_vma) -1
33 kx && !h->def_regular
33 kx && !h->pointer_equality_needed)
33 kx return false;
33 kx
33 kx return _bfd_elf_hash_symbol (h);
33 kx }
33 kx
33 kx
33 kx /* Look up an entry in the stub hash. Stub entries are cached because
33 kx creating the stub name takes a bit of time. */
33 kx
33 kx static struct elf_aarch64_stub_hash_entry *
33 kx elfNN_aarch64_get_stub_entry (const asection *input_section,
33 kx const asection *sym_sec,
33 kx struct elf_link_hash_entry *hash,
33 kx const Elf_Internal_Rela *rel,
33 kx struct elf_aarch64_link_hash_table *htab)
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx struct elf_aarch64_link_hash_entry *h =
33 kx (struct elf_aarch64_link_hash_entry *) hash;
33 kx const asection *id_sec;
33 kx
33 kx if ((input_section->flags & SEC_CODE) == 0)
33 kx return NULL;
33 kx
33 kx /* If this input section is part of a group of sections sharing one
33 kx stub section, then use the id of the first section in the group.
33 kx Stub names need to include a section id, as there may well be
33 kx more than one stub used to reach say, printf, and we need to
33 kx distinguish between them. */
33 kx id_sec = htab->stub_group[input_section->id].link_sec;
33 kx
33 kx if (h != NULL && h->stub_cache != NULL
33 kx && h->stub_cache->h == h && h->stub_cache->id_sec == id_sec)
33 kx {
33 kx stub_entry = h->stub_cache;
33 kx }
33 kx else
33 kx {
33 kx char *stub_name;
33 kx
33 kx stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, h, rel);
33 kx if (stub_name == NULL)
33 kx return NULL;
33 kx
33 kx stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table,
33 kx stub_name, false, false);
33 kx if (h != NULL)
33 kx h->stub_cache = stub_entry;
33 kx
33 kx free (stub_name);
33 kx }
33 kx
33 kx return stub_entry;
33 kx }
33 kx
33 kx
33 kx /* Create a stub section. */
33 kx
33 kx static asection *
33 kx _bfd_aarch64_create_stub_section (asection *section,
33 kx struct elf_aarch64_link_hash_table *htab)
33 kx {
33 kx size_t namelen;
33 kx bfd_size_type len;
33 kx char *s_name;
33 kx
33 kx namelen = strlen (section->name);
33 kx len = namelen + sizeof (STUB_SUFFIX);
33 kx s_name = bfd_alloc (htab->stub_bfd, len);
33 kx if (s_name == NULL)
33 kx return NULL;
33 kx
33 kx memcpy (s_name, section->name, namelen);
33 kx memcpy (s_name + namelen, STUB_SUFFIX, sizeof (STUB_SUFFIX));
33 kx return (*htab->add_stub_section) (s_name, section);
33 kx }
33 kx
33 kx
33 kx /* Find or create a stub section for a link section.
33 kx
33 kx Fix or create the stub section used to collect stubs attached to
33 kx the specified link section. */
33 kx
33 kx static asection *
33 kx _bfd_aarch64_get_stub_for_link_section (asection *link_section,
33 kx struct elf_aarch64_link_hash_table *htab)
33 kx {
33 kx if (htab->stub_group[link_section->id].stub_sec == NULL)
33 kx htab->stub_group[link_section->id].stub_sec
33 kx = _bfd_aarch64_create_stub_section (link_section, htab);
33 kx return htab->stub_group[link_section->id].stub_sec;
33 kx }
33 kx
33 kx
33 kx /* Find or create a stub section in the stub group for an input
33 kx section. */
33 kx
33 kx static asection *
33 kx _bfd_aarch64_create_or_find_stub_sec (asection *section,
33 kx struct elf_aarch64_link_hash_table *htab)
33 kx {
33 kx asection *link_sec = htab->stub_group[section->id].link_sec;
33 kx return _bfd_aarch64_get_stub_for_link_section (link_sec, htab);
33 kx }
33 kx
33 kx
33 kx /* Add a new stub entry in the stub group associated with an input
33 kx section to the stub hash. Not all fields of the new stub entry are
33 kx initialised. */
33 kx
33 kx static struct elf_aarch64_stub_hash_entry *
33 kx _bfd_aarch64_add_stub_entry_in_group (const char *stub_name,
33 kx asection *section,
33 kx struct elf_aarch64_link_hash_table *htab)
33 kx {
33 kx asection *link_sec;
33 kx asection *stub_sec;
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx
33 kx link_sec = htab->stub_group[section->id].link_sec;
33 kx stub_sec = _bfd_aarch64_create_or_find_stub_sec (section, htab);
33 kx
33 kx /* Enter this entry into the linker stub hash table. */
33 kx stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
33 kx true, false);
33 kx if (stub_entry == NULL)
33 kx {
33 kx /* xgettext:c-format */
33 kx _bfd_error_handler (_("%pB: cannot create stub entry %s"),
33 kx section->owner, stub_name);
33 kx return NULL;
33 kx }
33 kx
33 kx stub_entry->stub_sec = stub_sec;
33 kx stub_entry->stub_offset = 0;
33 kx stub_entry->id_sec = link_sec;
33 kx
33 kx return stub_entry;
33 kx }
33 kx
33 kx /* Add a new stub entry in the final stub section to the stub hash.
33 kx Not all fields of the new stub entry are initialised. */
33 kx
33 kx static struct elf_aarch64_stub_hash_entry *
33 kx _bfd_aarch64_add_stub_entry_after (const char *stub_name,
33 kx asection *link_section,
33 kx struct elf_aarch64_link_hash_table *htab)
33 kx {
33 kx asection *stub_sec;
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx
33 kx stub_sec = NULL;
33 kx /* Only create the actual stub if we will end up needing it. */
33 kx if (htab->fix_erratum_843419 & ERRAT_ADRP)
33 kx stub_sec = _bfd_aarch64_get_stub_for_link_section (link_section, htab);
33 kx stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
33 kx true, false);
33 kx if (stub_entry == NULL)
33 kx {
33 kx _bfd_error_handler (_("cannot create stub entry %s"), stub_name);
33 kx return NULL;
33 kx }
33 kx
33 kx stub_entry->stub_sec = stub_sec;
33 kx stub_entry->stub_offset = 0;
33 kx stub_entry->id_sec = link_section;
33 kx
33 kx return stub_entry;
33 kx }
33 kx
33 kx
33 kx static bool
33 kx aarch64_build_one_stub (struct bfd_hash_entry *gen_entry,
33 kx void *in_arg)
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx asection *stub_sec;
33 kx bfd *stub_bfd;
33 kx bfd_byte *loc;
33 kx bfd_vma sym_value;
33 kx bfd_vma veneered_insn_loc;
33 kx bfd_vma veneer_entry_loc;
33 kx bfd_signed_vma branch_offset = 0;
33 kx unsigned int template_size;
33 kx const uint32_t *template;
33 kx unsigned int i;
33 kx struct bfd_link_info *info;
33 kx
33 kx /* Massage our args to the form they really have. */
33 kx stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
33 kx
33 kx info = (struct bfd_link_info *) in_arg;
33 kx
33 kx /* Fail if the target section could not be assigned to an output
33 kx section. The user should fix his linker script. */
33 kx if (stub_entry->target_section->output_section == NULL
33 kx && info->non_contiguous_regions)
33 kx info->callbacks->einfo (_("%F%P: Could not assign `%pA' to an output section. "
33 kx "Retry without "
33 kx "--enable-non-contiguous-regions.\n"),
33 kx stub_entry->target_section);
33 kx
33 kx stub_sec = stub_entry->stub_sec;
33 kx
33 kx /* Make a note of the offset within the stubs for this entry. */
33 kx stub_entry->stub_offset = stub_sec->size;
33 kx loc = stub_sec->contents + stub_entry->stub_offset;
33 kx
33 kx stub_bfd = stub_sec->owner;
33 kx
33 kx /* This is the address of the stub destination. */
33 kx sym_value = (stub_entry->target_value
33 kx + stub_entry->target_section->output_offset
33 kx + stub_entry->target_section->output_section->vma);
33 kx
33 kx if (stub_entry->stub_type == aarch64_stub_long_branch)
33 kx {
33 kx bfd_vma place = (stub_entry->stub_offset + stub_sec->output_section->vma
33 kx + stub_sec->output_offset);
33 kx
33 kx /* See if we can relax the stub. */
33 kx if (aarch64_valid_for_adrp_p (sym_value, place))
33 kx stub_entry->stub_type = aarch64_select_branch_stub (sym_value, place);
33 kx }
33 kx
33 kx switch (stub_entry->stub_type)
33 kx {
33 kx case aarch64_stub_adrp_branch:
33 kx template = aarch64_adrp_branch_stub;
33 kx template_size = sizeof (aarch64_adrp_branch_stub);
33 kx break;
33 kx case aarch64_stub_long_branch:
33 kx template = aarch64_long_branch_stub;
33 kx template_size = sizeof (aarch64_long_branch_stub);
33 kx break;
33 kx case aarch64_stub_erratum_835769_veneer:
33 kx template = aarch64_erratum_835769_stub;
33 kx template_size = sizeof (aarch64_erratum_835769_stub);
33 kx break;
33 kx case aarch64_stub_erratum_843419_veneer:
33 kx template = aarch64_erratum_843419_stub;
33 kx template_size = sizeof (aarch64_erratum_843419_stub);
33 kx break;
33 kx default:
33 kx abort ();
33 kx }
33 kx
33 kx for (i = 0; i < (template_size / sizeof template[0]); i++)
33 kx {
33 kx bfd_putl32 (template[i], loc);
33 kx loc += 4;
33 kx }
33 kx
33 kx template_size = (template_size + 7) & ~7;
33 kx stub_sec->size += template_size;
33 kx
33 kx switch (stub_entry->stub_type)
33 kx {
33 kx case aarch64_stub_adrp_branch:
33 kx if (!aarch64_relocate (AARCH64_R (ADR_PREL_PG_HI21), stub_bfd, stub_sec,
33 kx stub_entry->stub_offset, sym_value))
33 kx /* The stub would not have been relaxed if the offset was out
33 kx of range. */
33 kx BFD_FAIL ();
33 kx
33 kx if (!aarch64_relocate (AARCH64_R (ADD_ABS_LO12_NC), stub_bfd, stub_sec,
33 kx stub_entry->stub_offset + 4, sym_value))
33 kx BFD_FAIL ();
33 kx break;
33 kx
33 kx case aarch64_stub_long_branch:
33 kx /* We want the value relative to the address 12 bytes back from the
33 kx value itself. */
33 kx if (!aarch64_relocate (AARCH64_R (PRELNN), stub_bfd, stub_sec,
33 kx stub_entry->stub_offset + 16, sym_value + 12))
33 kx BFD_FAIL ();
33 kx break;
33 kx
33 kx case aarch64_stub_erratum_835769_veneer:
33 kx veneered_insn_loc = stub_entry->target_section->output_section->vma
33 kx + stub_entry->target_section->output_offset
33 kx + stub_entry->target_value;
33 kx veneer_entry_loc = stub_entry->stub_sec->output_section->vma
33 kx + stub_entry->stub_sec->output_offset
33 kx + stub_entry->stub_offset;
33 kx branch_offset = veneered_insn_loc - veneer_entry_loc;
33 kx branch_offset >>= 2;
33 kx branch_offset &= 0x3ffffff;
33 kx bfd_putl32 (stub_entry->veneered_insn,
33 kx stub_sec->contents + stub_entry->stub_offset);
33 kx bfd_putl32 (template[1] | branch_offset,
33 kx stub_sec->contents + stub_entry->stub_offset + 4);
33 kx break;
33 kx
33 kx case aarch64_stub_erratum_843419_veneer:
33 kx if (!aarch64_relocate (AARCH64_R (JUMP26), stub_bfd, stub_sec,
33 kx stub_entry->stub_offset + 4, sym_value + 4))
33 kx BFD_FAIL ();
33 kx break;
33 kx
33 kx default:
33 kx abort ();
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* As above, but don't actually build the stub. Just bump offset so
33 kx we know stub section sizes. */
33 kx
33 kx static bool
33 kx aarch64_size_one_stub (struct bfd_hash_entry *gen_entry, void *in_arg)
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx int size;
33 kx
33 kx /* Massage our args to the form they really have. */
33 kx stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
33 kx htab = (struct elf_aarch64_link_hash_table *) in_arg;
33 kx
33 kx switch (stub_entry->stub_type)
33 kx {
33 kx case aarch64_stub_adrp_branch:
33 kx size = sizeof (aarch64_adrp_branch_stub);
33 kx break;
33 kx case aarch64_stub_long_branch:
33 kx size = sizeof (aarch64_long_branch_stub);
33 kx break;
33 kx case aarch64_stub_erratum_835769_veneer:
33 kx size = sizeof (aarch64_erratum_835769_stub);
33 kx break;
33 kx case aarch64_stub_erratum_843419_veneer:
33 kx {
33 kx if (htab->fix_erratum_843419 == ERRAT_ADR)
33 kx return true;
33 kx size = sizeof (aarch64_erratum_843419_stub);
33 kx }
33 kx break;
33 kx default:
33 kx abort ();
33 kx }
33 kx
33 kx size = (size + 7) & ~7;
33 kx stub_entry->stub_sec->size += size;
33 kx return true;
33 kx }
33 kx
33 kx /* External entry points for sizing and building linker stubs. */
33 kx
33 kx /* Set up various things so that we can make a list of input sections
33 kx for each output section included in the link. Returns -1 on error,
33 kx 0 when no stubs will be needed, and 1 on success. */
33 kx
33 kx int
33 kx elfNN_aarch64_setup_section_lists (bfd *output_bfd,
33 kx struct bfd_link_info *info)
33 kx {
33 kx bfd *input_bfd;
33 kx unsigned int bfd_count;
33 kx unsigned int top_id, top_index;
33 kx asection *section;
33 kx asection **input_list, **list;
33 kx size_t amt;
33 kx struct elf_aarch64_link_hash_table *htab =
33 kx elf_aarch64_hash_table (info);
33 kx
33 kx if (!is_elf_hash_table (&htab->root.root))
33 kx return 0;
33 kx
33 kx /* Count the number of input BFDs and find the top input section id. */
33 kx for (input_bfd = info->input_bfds, bfd_count = 0, top_id = 0;
33 kx input_bfd != NULL; input_bfd = input_bfd->link.next)
33 kx {
33 kx bfd_count += 1;
33 kx for (section = input_bfd->sections;
33 kx section != NULL; section = section->next)
33 kx {
33 kx if (top_id < section->id)
33 kx top_id = section->id;
33 kx }
33 kx }
33 kx htab->bfd_count = bfd_count;
33 kx
33 kx amt = sizeof (struct map_stub) * (top_id + 1);
33 kx htab->stub_group = bfd_zmalloc (amt);
33 kx if (htab->stub_group == NULL)
33 kx return -1;
33 kx
33 kx /* We can't use output_bfd->section_count here to find the top output
33 kx section index as some sections may have been removed, and
33 kx _bfd_strip_section_from_output doesn't renumber the indices. */
33 kx for (section = output_bfd->sections, top_index = 0;
33 kx section != NULL; section = section->next)
33 kx {
33 kx if (top_index < section->index)
33 kx top_index = section->index;
33 kx }
33 kx
33 kx htab->top_index = top_index;
33 kx amt = sizeof (asection *) * (top_index + 1);
33 kx input_list = bfd_malloc (amt);
33 kx htab->input_list = input_list;
33 kx if (input_list == NULL)
33 kx return -1;
33 kx
33 kx /* For sections we aren't interested in, mark their entries with a
33 kx value we can check later. */
33 kx list = input_list + top_index;
33 kx do
33 kx *list = bfd_abs_section_ptr;
33 kx while (list-- != input_list);
33 kx
33 kx for (section = output_bfd->sections;
33 kx section != NULL; section = section->next)
33 kx {
33 kx if ((section->flags & SEC_CODE) != 0)
33 kx input_list[section->index] = NULL;
33 kx }
33 kx
33 kx return 1;
33 kx }
33 kx
33 kx /* Used by elfNN_aarch64_next_input_section and group_sections. */
33 kx #define PREV_SEC(sec) (htab->stub_group[(sec)->id].link_sec)
33 kx
33 kx /* The linker repeatedly calls this function for each input section,
33 kx in the order that input sections are linked into output sections.
33 kx Build lists of input sections to determine groupings between which
33 kx we may insert linker stubs. */
33 kx
33 kx void
33 kx elfNN_aarch64_next_input_section (struct bfd_link_info *info, asection *isec)
33 kx {
33 kx struct elf_aarch64_link_hash_table *htab =
33 kx elf_aarch64_hash_table (info);
33 kx
33 kx if (isec->output_section->index <= htab->top_index)
33 kx {
33 kx asection **list = htab->input_list + isec->output_section->index;
33 kx
33 kx if (*list != bfd_abs_section_ptr && (isec->flags & SEC_CODE) != 0)
33 kx {
33 kx /* Steal the link_sec pointer for our list. */
33 kx /* This happens to make the list in reverse order,
33 kx which is what we want. */
33 kx PREV_SEC (isec) = *list;
33 kx *list = isec;
33 kx }
33 kx }
33 kx }
33 kx
33 kx /* See whether we can group stub sections together. Grouping stub
33 kx sections may result in fewer stubs. More importantly, we need to
33 kx put all .init* and .fini* stubs at the beginning of the .init or
33 kx .fini output sections respectively, because glibc splits the
33 kx _init and _fini functions into multiple parts. Putting a stub in
33 kx the middle of a function is not a good idea. */
33 kx
33 kx static void
33 kx group_sections (struct elf_aarch64_link_hash_table *htab,
33 kx bfd_size_type stub_group_size,
33 kx bool stubs_always_after_branch)
33 kx {
33 kx asection **list = htab->input_list;
33 kx
33 kx do
33 kx {
33 kx asection *tail = *list;
33 kx asection *head;
33 kx
33 kx if (tail == bfd_abs_section_ptr)
33 kx continue;
33 kx
33 kx /* Reverse the list: we must avoid placing stubs at the
33 kx beginning of the section because the beginning of the text
33 kx section may be required for an interrupt vector in bare metal
33 kx code. */
33 kx #define NEXT_SEC PREV_SEC
33 kx head = NULL;
33 kx while (tail != NULL)
33 kx {
33 kx /* Pop from tail. */
33 kx asection *item = tail;
33 kx tail = PREV_SEC (item);
33 kx
33 kx /* Push on head. */
33 kx NEXT_SEC (item) = head;
33 kx head = item;
33 kx }
33 kx
33 kx while (head != NULL)
33 kx {
33 kx asection *curr;
33 kx asection *next;
33 kx bfd_vma stub_group_start = head->output_offset;
33 kx bfd_vma end_of_next;
33 kx
33 kx curr = head;
33 kx while (NEXT_SEC (curr) != NULL)
33 kx {
33 kx next = NEXT_SEC (curr);
33 kx end_of_next = next->output_offset + next->size;
33 kx if (end_of_next - stub_group_start >= stub_group_size)
33 kx /* End of NEXT is too far from start, so stop. */
33 kx break;
33 kx /* Add NEXT to the group. */
33 kx curr = next;
33 kx }
33 kx
33 kx /* OK, the size from the start to the start of CURR is less
33 kx than stub_group_size and thus can be handled by one stub
33 kx section. (Or the head section is itself larger than
33 kx stub_group_size, in which case we may be toast.)
33 kx We should really be keeping track of the total size of
33 kx stubs added here, as stubs contribute to the final output
33 kx section size. */
33 kx do
33 kx {
33 kx next = NEXT_SEC (head);
33 kx /* Set up this stub group. */
33 kx htab->stub_group[head->id].link_sec = curr;
33 kx }
33 kx while (head != curr && (head = next) != NULL);
33 kx
33 kx /* But wait, there's more! Input sections up to stub_group_size
33 kx bytes after the stub section can be handled by it too. */
33 kx if (!stubs_always_after_branch)
33 kx {
33 kx stub_group_start = curr->output_offset + curr->size;
33 kx
33 kx while (next != NULL)
33 kx {
33 kx end_of_next = next->output_offset + next->size;
33 kx if (end_of_next - stub_group_start >= stub_group_size)
33 kx /* End of NEXT is too far from stubs, so stop. */
33 kx break;
33 kx /* Add NEXT to the stub group. */
33 kx head = next;
33 kx next = NEXT_SEC (head);
33 kx htab->stub_group[head->id].link_sec = curr;
33 kx }
33 kx }
33 kx head = next;
33 kx }
33 kx }
33 kx while (list++ != htab->input_list + htab->top_index);
33 kx
33 kx free (htab->input_list);
33 kx }
33 kx
33 kx #undef PREV_SEC
33 kx #undef PREV_SEC
33 kx
33 kx #define AARCH64_BITS(x, pos, n) (((x) >> (pos)) & ((1 << (n)) - 1))
33 kx
33 kx #define AARCH64_RT(insn) AARCH64_BITS (insn, 0, 5)
33 kx #define AARCH64_RT2(insn) AARCH64_BITS (insn, 10, 5)
33 kx #define AARCH64_RA(insn) AARCH64_BITS (insn, 10, 5)
33 kx #define AARCH64_RD(insn) AARCH64_BITS (insn, 0, 5)
33 kx #define AARCH64_RN(insn) AARCH64_BITS (insn, 5, 5)
33 kx #define AARCH64_RM(insn) AARCH64_BITS (insn, 16, 5)
33 kx
33 kx #define AARCH64_MAC(insn) (((insn) & 0xff000000) == 0x9b000000)
33 kx #define AARCH64_BIT(insn, n) AARCH64_BITS (insn, n, 1)
33 kx #define AARCH64_OP31(insn) AARCH64_BITS (insn, 21, 3)
33 kx #define AARCH64_ZR 0x1f
33 kx
33 kx /* All ld/st ops. See C4-182 of the ARM ARM. The encoding space for
33 kx LD_PCREL, LDST_RO, LDST_UI and LDST_UIMM cover prefetch ops. */
33 kx
33 kx #define AARCH64_LD(insn) (AARCH64_BIT (insn, 22) == 1)
33 kx #define AARCH64_LDST(insn) (((insn) & 0x0a000000) == 0x08000000)
33 kx #define AARCH64_LDST_EX(insn) (((insn) & 0x3f000000) == 0x08000000)
33 kx #define AARCH64_LDST_PCREL(insn) (((insn) & 0x3b000000) == 0x18000000)
33 kx #define AARCH64_LDST_NAP(insn) (((insn) & 0x3b800000) == 0x28000000)
33 kx #define AARCH64_LDSTP_PI(insn) (((insn) & 0x3b800000) == 0x28800000)
33 kx #define AARCH64_LDSTP_O(insn) (((insn) & 0x3b800000) == 0x29000000)
33 kx #define AARCH64_LDSTP_PRE(insn) (((insn) & 0x3b800000) == 0x29800000)
33 kx #define AARCH64_LDST_UI(insn) (((insn) & 0x3b200c00) == 0x38000000)
33 kx #define AARCH64_LDST_PIIMM(insn) (((insn) & 0x3b200c00) == 0x38000400)
33 kx #define AARCH64_LDST_U(insn) (((insn) & 0x3b200c00) == 0x38000800)
33 kx #define AARCH64_LDST_PREIMM(insn) (((insn) & 0x3b200c00) == 0x38000c00)
33 kx #define AARCH64_LDST_RO(insn) (((insn) & 0x3b200c00) == 0x38200800)
33 kx #define AARCH64_LDST_UIMM(insn) (((insn) & 0x3b000000) == 0x39000000)
33 kx #define AARCH64_LDST_SIMD_M(insn) (((insn) & 0xbfbf0000) == 0x0c000000)
33 kx #define AARCH64_LDST_SIMD_M_PI(insn) (((insn) & 0xbfa00000) == 0x0c800000)
33 kx #define AARCH64_LDST_SIMD_S(insn) (((insn) & 0xbf9f0000) == 0x0d000000)
33 kx #define AARCH64_LDST_SIMD_S_PI(insn) (((insn) & 0xbf800000) == 0x0d800000)
33 kx
33 kx /* Classify an INSN if it is indeed a load/store.
33 kx
33 kx Return TRUE if INSN is a LD/ST instruction otherwise return FALSE.
33 kx
33 kx For scalar LD/ST instructions PAIR is FALSE, RT is returned and RT2
33 kx is set equal to RT.
33 kx
33 kx For LD/ST pair instructions PAIR is TRUE, RT and RT2 are returned. */
33 kx
33 kx static bool
33 kx aarch64_mem_op_p (uint32_t insn, unsigned int *rt, unsigned int *rt2,
33 kx bool *pair, bool *load)
33 kx {
33 kx uint32_t opcode;
33 kx unsigned int r;
33 kx uint32_t opc = 0;
33 kx uint32_t v = 0;
33 kx uint32_t opc_v = 0;
33 kx
33 kx /* Bail out quickly if INSN doesn't fall into the load-store
33 kx encoding space. */
33 kx if (!AARCH64_LDST (insn))
33 kx return false;
33 kx
33 kx *pair = false;
33 kx *load = false;
33 kx if (AARCH64_LDST_EX (insn))
33 kx {
33 kx *rt = AARCH64_RT (insn);
33 kx *rt2 = *rt;
33 kx if (AARCH64_BIT (insn, 21) == 1)
33 kx {
33 kx *pair = true;
33 kx *rt2 = AARCH64_RT2 (insn);
33 kx }
33 kx *load = AARCH64_LD (insn);
33 kx return true;
33 kx }
33 kx else if (AARCH64_LDST_NAP (insn)
33 kx || AARCH64_LDSTP_PI (insn)
33 kx || AARCH64_LDSTP_O (insn)
33 kx || AARCH64_LDSTP_PRE (insn))
33 kx {
33 kx *pair = true;
33 kx *rt = AARCH64_RT (insn);
33 kx *rt2 = AARCH64_RT2 (insn);
33 kx *load = AARCH64_LD (insn);
33 kx return true;
33 kx }
33 kx else if (AARCH64_LDST_PCREL (insn)
33 kx || AARCH64_LDST_UI (insn)
33 kx || AARCH64_LDST_PIIMM (insn)
33 kx || AARCH64_LDST_U (insn)
33 kx || AARCH64_LDST_PREIMM (insn)
33 kx || AARCH64_LDST_RO (insn)
33 kx || AARCH64_LDST_UIMM (insn))
33 kx {
33 kx *rt = AARCH64_RT (insn);
33 kx *rt2 = *rt;
33 kx if (AARCH64_LDST_PCREL (insn))
33 kx *load = true;
33 kx opc = AARCH64_BITS (insn, 22, 2);
33 kx v = AARCH64_BIT (insn, 26);
33 kx opc_v = opc | (v << 2);
33 kx *load = (opc_v == 1 || opc_v == 2 || opc_v == 3
33 kx || opc_v == 5 || opc_v == 7);
33 kx return true;
33 kx }
33 kx else if (AARCH64_LDST_SIMD_M (insn)
33 kx || AARCH64_LDST_SIMD_M_PI (insn))
33 kx {
33 kx *rt = AARCH64_RT (insn);
33 kx *load = AARCH64_BIT (insn, 22);
33 kx opcode = (insn >> 12) & 0xf;
33 kx switch (opcode)
33 kx {
33 kx case 0:
33 kx case 2:
33 kx *rt2 = *rt + 3;
33 kx break;
33 kx
33 kx case 4:
33 kx case 6:
33 kx *rt2 = *rt + 2;
33 kx break;
33 kx
33 kx case 7:
33 kx *rt2 = *rt;
33 kx break;
33 kx
33 kx case 8:
33 kx case 10:
33 kx *rt2 = *rt + 1;
33 kx break;
33 kx
33 kx default:
33 kx return false;
33 kx }
33 kx return true;
33 kx }
33 kx else if (AARCH64_LDST_SIMD_S (insn)
33 kx || AARCH64_LDST_SIMD_S_PI (insn))
33 kx {
33 kx *rt = AARCH64_RT (insn);
33 kx r = (insn >> 21) & 1;
33 kx *load = AARCH64_BIT (insn, 22);
33 kx opcode = (insn >> 13) & 0x7;
33 kx switch (opcode)
33 kx {
33 kx case 0:
33 kx case 2:
33 kx case 4:
33 kx *rt2 = *rt + r;
33 kx break;
33 kx
33 kx case 1:
33 kx case 3:
33 kx case 5:
33 kx *rt2 = *rt + (r == 0 ? 2 : 3);
33 kx break;
33 kx
33 kx case 6:
33 kx *rt2 = *rt + r;
33 kx break;
33 kx
33 kx case 7:
33 kx *rt2 = *rt + (r == 0 ? 2 : 3);
33 kx break;
33 kx
33 kx default:
33 kx return false;
33 kx }
33 kx return true;
33 kx }
33 kx
33 kx return false;
33 kx }
33 kx
33 kx /* Return TRUE if INSN is multiply-accumulate. */
33 kx
33 kx static bool
33 kx aarch64_mlxl_p (uint32_t insn)
33 kx {
33 kx uint32_t op31 = AARCH64_OP31 (insn);
33 kx
33 kx if (AARCH64_MAC (insn)
33 kx && (op31 == 0 || op31 == 1 || op31 == 5)
33 kx /* Exclude MUL instructions which are encoded as a multiple accumulate
33 kx with RA = XZR. */
33 kx && AARCH64_RA (insn) != AARCH64_ZR)
33 kx return true;
33 kx
33 kx return false;
33 kx }
33 kx
33 kx /* Some early revisions of the Cortex-A53 have an erratum (835769) whereby
33 kx it is possible for a 64-bit multiply-accumulate instruction to generate an
33 kx incorrect result. The details are quite complex and hard to
33 kx determine statically, since branches in the code may exist in some
33 kx circumstances, but all cases end with a memory (load, store, or
33 kx prefetch) instruction followed immediately by the multiply-accumulate
33 kx operation. We employ a linker patching technique, by moving the potentially
33 kx affected multiply-accumulate instruction into a patch region and replacing
33 kx the original instruction with a branch to the patch. This function checks
33 kx if INSN_1 is the memory operation followed by a multiply-accumulate
33 kx operation (INSN_2). Return TRUE if an erratum sequence is found, FALSE
33 kx if INSN_1 and INSN_2 are safe. */
33 kx
33 kx static bool
33 kx aarch64_erratum_sequence (uint32_t insn_1, uint32_t insn_2)
33 kx {
33 kx uint32_t rt;
33 kx uint32_t rt2;
33 kx uint32_t rn;
33 kx uint32_t rm;
33 kx uint32_t ra;
33 kx bool pair;
33 kx bool load;
33 kx
33 kx if (aarch64_mlxl_p (insn_2)
33 kx && aarch64_mem_op_p (insn_1, &rt, &rt2, &pair, &load))
33 kx {
33 kx /* Any SIMD memory op is independent of the subsequent MLA
33 kx by definition of the erratum. */
33 kx if (AARCH64_BIT (insn_1, 26))
33 kx return true;
33 kx
33 kx /* If not SIMD, check for integer memory ops and MLA relationship. */
33 kx rn = AARCH64_RN (insn_2);
33 kx ra = AARCH64_RA (insn_2);
33 kx rm = AARCH64_RM (insn_2);
33 kx
33 kx /* If this is a load and there's a true(RAW) dependency, we are safe
33 kx and this is not an erratum sequence. */
33 kx if (load &&
33 kx (rt == rn || rt == rm || rt == ra
33 kx || (pair && (rt2 == rn || rt2 == rm || rt2 == ra))))
33 kx return false;
33 kx
33 kx /* We conservatively put out stubs for all other cases (including
33 kx writebacks). */
33 kx return true;
33 kx }
33 kx
33 kx return false;
33 kx }
33 kx
33 kx /* Used to order a list of mapping symbols by address. */
33 kx
33 kx static int
33 kx elf_aarch64_compare_mapping (const void *a, const void *b)
33 kx {
33 kx const elf_aarch64_section_map *amap = (const elf_aarch64_section_map *) a;
33 kx const elf_aarch64_section_map *bmap = (const elf_aarch64_section_map *) b;
33 kx
33 kx if (amap->vma > bmap->vma)
33 kx return 1;
33 kx else if (amap->vma < bmap->vma)
33 kx return -1;
33 kx else if (amap->type > bmap->type)
33 kx /* Ensure results do not depend on the host qsort for objects with
33 kx multiple mapping symbols at the same address by sorting on type
33 kx after vma. */
33 kx return 1;
33 kx else if (amap->type < bmap->type)
33 kx return -1;
33 kx else
33 kx return 0;
33 kx }
33 kx
33 kx
33 kx static char *
33 kx _bfd_aarch64_erratum_835769_stub_name (unsigned num_fixes)
33 kx {
33 kx char *stub_name = (char *) bfd_malloc
33 kx (strlen ("__erratum_835769_veneer_") + 16);
33 kx if (stub_name != NULL)
33 kx sprintf (stub_name,"__erratum_835769_veneer_%d", num_fixes);
33 kx return stub_name;
33 kx }
33 kx
33 kx /* Scan for Cortex-A53 erratum 835769 sequence.
33 kx
33 kx Return TRUE else FALSE on abnormal termination. */
33 kx
33 kx static bool
33 kx _bfd_aarch64_erratum_835769_scan (bfd *input_bfd,
33 kx struct bfd_link_info *info,
33 kx unsigned int *num_fixes_p)
33 kx {
33 kx asection *section;
33 kx struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
33 kx unsigned int num_fixes = *num_fixes_p;
33 kx
33 kx if (htab == NULL)
33 kx return true;
33 kx
33 kx for (section = input_bfd->sections;
33 kx section != NULL;
33 kx section = section->next)
33 kx {
33 kx bfd_byte *contents = NULL;
33 kx struct _aarch64_elf_section_data *sec_data;
33 kx unsigned int span;
33 kx
33 kx if (elf_section_type (section) != SHT_PROGBITS
33 kx || (elf_section_flags (section) & SHF_EXECINSTR) == 0
33 kx || (section->flags & SEC_EXCLUDE) != 0
33 kx || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
33 kx || (section->output_section == bfd_abs_section_ptr))
33 kx continue;
33 kx
33 kx if (elf_section_data (section)->this_hdr.contents != NULL)
33 kx contents = elf_section_data (section)->this_hdr.contents;
33 kx else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
33 kx return false;
33 kx
33 kx sec_data = elf_aarch64_section_data (section);
33 kx
33 kx if (sec_data->mapcount)
33 kx qsort (sec_data->map, sec_data->mapcount,
33 kx sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
33 kx
33 kx for (span = 0; span < sec_data->mapcount; span++)
33 kx {
33 kx unsigned int span_start = sec_data->map[span].vma;
33 kx unsigned int span_end = ((span == sec_data->mapcount - 1)
33 kx ? sec_data->map[0].vma + section->size
33 kx : sec_data->map[span + 1].vma);
33 kx unsigned int i;
33 kx char span_type = sec_data->map[span].type;
33 kx
33 kx if (span_type == 'd')
33 kx continue;
33 kx
33 kx for (i = span_start; i + 4 < span_end; i += 4)
33 kx {
33 kx uint32_t insn_1 = bfd_getl32 (contents + i);
33 kx uint32_t insn_2 = bfd_getl32 (contents + i + 4);
33 kx
33 kx if (aarch64_erratum_sequence (insn_1, insn_2))
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx char *stub_name = _bfd_aarch64_erratum_835769_stub_name (num_fixes);
33 kx if (! stub_name)
33 kx return false;
33 kx
33 kx stub_entry = _bfd_aarch64_add_stub_entry_in_group (stub_name,
33 kx section,
33 kx htab);
33 kx if (! stub_entry)
33 kx return false;
33 kx
33 kx stub_entry->stub_type = aarch64_stub_erratum_835769_veneer;
33 kx stub_entry->target_section = section;
33 kx stub_entry->target_value = i + 4;
33 kx stub_entry->veneered_insn = insn_2;
33 kx stub_entry->output_name = stub_name;
33 kx num_fixes++;
33 kx }
33 kx }
33 kx }
33 kx if (elf_section_data (section)->this_hdr.contents == NULL)
33 kx free (contents);
33 kx }
33 kx
33 kx *num_fixes_p = num_fixes;
33 kx
33 kx return true;
33 kx }
33 kx
33 kx
33 kx /* Test if instruction INSN is ADRP. */
33 kx
33 kx static bool
33 kx _bfd_aarch64_adrp_p (uint32_t insn)
33 kx {
33 kx return ((insn & AARCH64_ADRP_OP_MASK) == AARCH64_ADRP_OP);
33 kx }
33 kx
33 kx
33 kx /* Helper predicate to look for cortex-a53 erratum 843419 sequence 1. */
33 kx
33 kx static bool
33 kx _bfd_aarch64_erratum_843419_sequence_p (uint32_t insn_1, uint32_t insn_2,
33 kx uint32_t insn_3)
33 kx {
33 kx uint32_t rt;
33 kx uint32_t rt2;
33 kx bool pair;
33 kx bool load;
33 kx
33 kx return (aarch64_mem_op_p (insn_2, &rt, &rt2, &pair, &load)
33 kx && (!pair
33 kx || (pair && !load))
33 kx && AARCH64_LDST_UIMM (insn_3)
33 kx && AARCH64_RN (insn_3) == AARCH64_RD (insn_1));
33 kx }
33 kx
33 kx
33 kx /* Test for the presence of Cortex-A53 erratum 843419 instruction sequence.
33 kx
33 kx Return TRUE if section CONTENTS at offset I contains one of the
33 kx erratum 843419 sequences, otherwise return FALSE. If a sequence is
33 kx seen set P_VENEER_I to the offset of the final LOAD/STORE
33 kx instruction in the sequence.
33 kx */
33 kx
33 kx static bool
33 kx _bfd_aarch64_erratum_843419_p (bfd_byte *contents, bfd_vma vma,
33 kx bfd_vma i, bfd_vma span_end,
33 kx bfd_vma *p_veneer_i)
33 kx {
33 kx uint32_t insn_1 = bfd_getl32 (contents + i);
33 kx
33 kx if (!_bfd_aarch64_adrp_p (insn_1))
33 kx return false;
33 kx
33 kx if (span_end < i + 12)
33 kx return false;
33 kx
33 kx uint32_t insn_2 = bfd_getl32 (contents + i + 4);
33 kx uint32_t insn_3 = bfd_getl32 (contents + i + 8);
33 kx
33 kx if ((vma & 0xfff) != 0xff8 && (vma & 0xfff) != 0xffc)
33 kx return false;
33 kx
33 kx if (_bfd_aarch64_erratum_843419_sequence_p (insn_1, insn_2, insn_3))
33 kx {
33 kx *p_veneer_i = i + 8;
33 kx return true;
33 kx }
33 kx
33 kx if (span_end < i + 16)
33 kx return false;
33 kx
33 kx uint32_t insn_4 = bfd_getl32 (contents + i + 12);
33 kx
33 kx if (_bfd_aarch64_erratum_843419_sequence_p (insn_1, insn_2, insn_4))
33 kx {
33 kx *p_veneer_i = i + 12;
33 kx return true;
33 kx }
33 kx
33 kx return false;
33 kx }
33 kx
33 kx
33 kx /* Resize all stub sections. */
33 kx
33 kx static void
33 kx _bfd_aarch64_resize_stubs (struct elf_aarch64_link_hash_table *htab)
33 kx {
33 kx asection *section;
33 kx
33 kx /* OK, we've added some stubs. Find out the new size of the
33 kx stub sections. */
33 kx for (section = htab->stub_bfd->sections;
33 kx section != NULL; section = section->next)
33 kx {
33 kx /* Ignore non-stub sections. */
33 kx if (!strstr (section->name, STUB_SUFFIX))
33 kx continue;
33 kx section->size = 0;
33 kx }
33 kx
33 kx bfd_hash_traverse (&htab->stub_hash_table, aarch64_size_one_stub, htab);
33 kx
33 kx for (section = htab->stub_bfd->sections;
33 kx section != NULL; section = section->next)
33 kx {
33 kx if (!strstr (section->name, STUB_SUFFIX))
33 kx continue;
33 kx
33 kx /* Add space for a branch. Add 8 bytes to keep section 8 byte aligned,
33 kx as long branch stubs contain a 64-bit address. */
33 kx if (section->size)
33 kx section->size += 8;
33 kx
33 kx /* Ensure all stub sections have a size which is a multiple of
33 kx 4096. This is important in order to ensure that the insertion
33 kx of stub sections does not in itself move existing code around
33 kx in such a way that new errata sequences are created. We only do this
33 kx when the ADRP workaround is enabled. If only the ADR workaround is
33 kx enabled then the stubs workaround won't ever be used. */
33 kx if (htab->fix_erratum_843419 & ERRAT_ADRP)
33 kx if (section->size)
33 kx section->size = BFD_ALIGN (section->size, 0x1000);
33 kx }
33 kx }
33 kx
33 kx /* Construct an erratum 843419 workaround stub name. */
33 kx
33 kx static char *
33 kx _bfd_aarch64_erratum_843419_stub_name (asection *input_section,
33 kx bfd_vma offset)
33 kx {
33 kx const bfd_size_type len = 8 + 4 + 1 + 8 + 1 + 16 + 1;
33 kx char *stub_name = bfd_malloc (len);
33 kx
33 kx if (stub_name != NULL)
33 kx snprintf (stub_name, len, "e843419@%04x_%08x_%" PRIx64,
33 kx input_section->owner->id,
33 kx input_section->id,
33 kx (uint64_t) offset);
33 kx return stub_name;
33 kx }
33 kx
33 kx /* Build a stub_entry structure describing an 843419 fixup.
33 kx
33 kx The stub_entry constructed is populated with the bit pattern INSN
33 kx of the instruction located at OFFSET within input SECTION.
33 kx
33 kx Returns TRUE on success. */
33 kx
33 kx static bool
33 kx _bfd_aarch64_erratum_843419_fixup (uint32_t insn,
33 kx bfd_vma adrp_offset,
33 kx bfd_vma ldst_offset,
33 kx asection *section,
33 kx struct bfd_link_info *info)
33 kx {
33 kx struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
33 kx char *stub_name;
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx
33 kx stub_name = _bfd_aarch64_erratum_843419_stub_name (section, ldst_offset);
33 kx if (stub_name == NULL)
33 kx return false;
33 kx stub_entry = aarch64_stub_hash_lookup (&htab->stub_hash_table, stub_name,
33 kx false, false);
33 kx if (stub_entry)
33 kx {
33 kx free (stub_name);
33 kx return true;
33 kx }
33 kx
33 kx /* We always place an 843419 workaround veneer in the stub section
33 kx attached to the input section in which an erratum sequence has
33 kx been found. This ensures that later in the link process (in
33 kx elfNN_aarch64_write_section) when we copy the veneered
33 kx instruction from the input section into the stub section the
33 kx copied instruction will have had any relocations applied to it.
33 kx If we placed workaround veneers in any other stub section then we
33 kx could not assume that all relocations have been processed on the
33 kx corresponding input section at the point we output the stub
33 kx section. */
33 kx
33 kx stub_entry = _bfd_aarch64_add_stub_entry_after (stub_name, section, htab);
33 kx if (stub_entry == NULL)
33 kx {
33 kx free (stub_name);
33 kx return false;
33 kx }
33 kx
33 kx stub_entry->adrp_offset = adrp_offset;
33 kx stub_entry->target_value = ldst_offset;
33 kx stub_entry->target_section = section;
33 kx stub_entry->stub_type = aarch64_stub_erratum_843419_veneer;
33 kx stub_entry->veneered_insn = insn;
33 kx stub_entry->output_name = stub_name;
33 kx
33 kx return true;
33 kx }
33 kx
33 kx
33 kx /* Scan an input section looking for the signature of erratum 843419.
33 kx
33 kx Scans input SECTION in INPUT_BFD looking for erratum 843419
33 kx signatures, for each signature found a stub_entry is created
33 kx describing the location of the erratum for subsequent fixup.
33 kx
33 kx Return TRUE on successful scan, FALSE on failure to scan.
33 kx */
33 kx
33 kx static bool
33 kx _bfd_aarch64_erratum_843419_scan (bfd *input_bfd, asection *section,
33 kx struct bfd_link_info *info)
33 kx {
33 kx struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
33 kx
33 kx if (htab == NULL)
33 kx return true;
33 kx
33 kx if (elf_section_type (section) != SHT_PROGBITS
33 kx || (elf_section_flags (section) & SHF_EXECINSTR) == 0
33 kx || (section->flags & SEC_EXCLUDE) != 0
33 kx || (section->sec_info_type == SEC_INFO_TYPE_JUST_SYMS)
33 kx || (section->output_section == bfd_abs_section_ptr))
33 kx return true;
33 kx
33 kx do
33 kx {
33 kx bfd_byte *contents = NULL;
33 kx struct _aarch64_elf_section_data *sec_data;
33 kx unsigned int span;
33 kx
33 kx if (elf_section_data (section)->this_hdr.contents != NULL)
33 kx contents = elf_section_data (section)->this_hdr.contents;
33 kx else if (! bfd_malloc_and_get_section (input_bfd, section, &contents))
33 kx return false;
33 kx
33 kx sec_data = elf_aarch64_section_data (section);
33 kx
33 kx if (sec_data->mapcount)
33 kx qsort (sec_data->map, sec_data->mapcount,
33 kx sizeof (elf_aarch64_section_map), elf_aarch64_compare_mapping);
33 kx
33 kx for (span = 0; span < sec_data->mapcount; span++)
33 kx {
33 kx unsigned int span_start = sec_data->map[span].vma;
33 kx unsigned int span_end = ((span == sec_data->mapcount - 1)
33 kx ? sec_data->map[0].vma + section->size
33 kx : sec_data->map[span + 1].vma);
33 kx unsigned int i;
33 kx char span_type = sec_data->map[span].type;
33 kx
33 kx if (span_type == 'd')
33 kx continue;
33 kx
33 kx for (i = span_start; i + 8 < span_end; i += 4)
33 kx {
33 kx bfd_vma vma = (section->output_section->vma
33 kx + section->output_offset
33 kx + i);
33 kx bfd_vma veneer_i;
33 kx
33 kx if (_bfd_aarch64_erratum_843419_p
33 kx (contents, vma, i, span_end, &veneer_i))
33 kx {
33 kx uint32_t insn = bfd_getl32 (contents + veneer_i);
33 kx
33 kx if (!_bfd_aarch64_erratum_843419_fixup (insn, i, veneer_i,
33 kx section, info))
33 kx return false;
33 kx }
33 kx }
33 kx }
33 kx
33 kx if (elf_section_data (section)->this_hdr.contents == NULL)
33 kx free (contents);
33 kx }
33 kx while (0);
33 kx
33 kx return true;
33 kx }
33 kx
33 kx
33 kx /* Determine and set the size of the stub section for a final link.
33 kx
33 kx The basic idea here is to examine all the relocations looking for
33 kx PC-relative calls to a target that is unreachable with a "bl"
33 kx instruction. */
33 kx
33 kx bool
33 kx elfNN_aarch64_size_stubs (bfd *output_bfd,
33 kx bfd *stub_bfd,
33 kx struct bfd_link_info *info,
33 kx bfd_signed_vma group_size,
33 kx asection * (*add_stub_section) (const char *,
33 kx asection *),
33 kx void (*layout_sections_again) (void))
33 kx {
33 kx bfd_size_type stub_group_size;
33 kx bool stubs_always_before_branch;
33 kx bool stub_changed = false;
33 kx struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
33 kx unsigned int num_erratum_835769_fixes = 0;
33 kx
33 kx /* Propagate mach to stub bfd, because it may not have been
33 kx finalized when we created stub_bfd. */
33 kx bfd_set_arch_mach (stub_bfd, bfd_get_arch (output_bfd),
33 kx bfd_get_mach (output_bfd));
33 kx
33 kx /* Stash our params away. */
33 kx htab->stub_bfd = stub_bfd;
33 kx htab->add_stub_section = add_stub_section;
33 kx htab->layout_sections_again = layout_sections_again;
33 kx stubs_always_before_branch = group_size < 0;
33 kx if (group_size < 0)
33 kx stub_group_size = -group_size;
33 kx else
33 kx stub_group_size = group_size;
33 kx
33 kx if (stub_group_size == 1)
33 kx {
33 kx /* Default values. */
33 kx /* AArch64 branch range is +-128MB. The value used is 1MB less. */
33 kx stub_group_size = 127 * 1024 * 1024;
33 kx }
33 kx
33 kx group_sections (htab, stub_group_size, stubs_always_before_branch);
33 kx
33 kx (*htab->layout_sections_again) ();
33 kx
33 kx if (htab->fix_erratum_835769)
33 kx {
33 kx bfd *input_bfd;
33 kx
33 kx for (input_bfd = info->input_bfds;
33 kx input_bfd != NULL; input_bfd = input_bfd->link.next)
33 kx {
33 kx if (!is_aarch64_elf (input_bfd)
33 kx || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
33 kx continue;
33 kx
33 kx if (!_bfd_aarch64_erratum_835769_scan (input_bfd, info,
33 kx &num_erratum_835769_fixes))
33 kx return false;
33 kx }
33 kx
33 kx _bfd_aarch64_resize_stubs (htab);
33 kx (*htab->layout_sections_again) ();
33 kx }
33 kx
33 kx if (htab->fix_erratum_843419 != ERRAT_NONE)
33 kx {
33 kx bfd *input_bfd;
33 kx
33 kx for (input_bfd = info->input_bfds;
33 kx input_bfd != NULL;
33 kx input_bfd = input_bfd->link.next)
33 kx {
33 kx asection *section;
33 kx
33 kx if (!is_aarch64_elf (input_bfd)
33 kx || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
33 kx continue;
33 kx
33 kx for (section = input_bfd->sections;
33 kx section != NULL;
33 kx section = section->next)
33 kx if (!_bfd_aarch64_erratum_843419_scan (input_bfd, section, info))
33 kx return false;
33 kx }
33 kx
33 kx _bfd_aarch64_resize_stubs (htab);
33 kx (*htab->layout_sections_again) ();
33 kx }
33 kx
33 kx while (1)
33 kx {
33 kx bfd *input_bfd;
33 kx
33 kx for (input_bfd = info->input_bfds;
33 kx input_bfd != NULL; input_bfd = input_bfd->link.next)
33 kx {
33 kx Elf_Internal_Shdr *symtab_hdr;
33 kx asection *section;
33 kx Elf_Internal_Sym *local_syms = NULL;
33 kx
33 kx if (!is_aarch64_elf (input_bfd)
33 kx || (input_bfd->flags & BFD_LINKER_CREATED) != 0)
33 kx continue;
33 kx
33 kx /* We'll need the symbol table in a second. */
33 kx symtab_hdr = &elf_tdata (input_bfd)->symtab_hdr;
33 kx if (symtab_hdr->sh_info == 0)
33 kx continue;
33 kx
33 kx /* Walk over each section attached to the input bfd. */
33 kx for (section = input_bfd->sections;
33 kx section != NULL; section = section->next)
33 kx {
33 kx Elf_Internal_Rela *internal_relocs, *irelaend, *irela;
33 kx
33 kx /* If there aren't any relocs, then there's nothing more
33 kx to do. */
33 kx if ((section->flags & SEC_RELOC) == 0
33 kx || section->reloc_count == 0
33 kx || (section->flags & SEC_CODE) == 0)
33 kx continue;
33 kx
33 kx /* If this section is a link-once section that will be
33 kx discarded, then don't create any stubs. */
33 kx if (section->output_section == NULL
33 kx || section->output_section->owner != output_bfd)
33 kx continue;
33 kx
33 kx /* Get the relocs. */
33 kx internal_relocs
33 kx = _bfd_elf_link_read_relocs (input_bfd, section, NULL,
33 kx NULL, info->keep_memory);
33 kx if (internal_relocs == NULL)
33 kx goto error_ret_free_local;
33 kx
33 kx /* Now examine each relocation. */
33 kx irela = internal_relocs;
33 kx irelaend = irela + section->reloc_count;
33 kx for (; irela < irelaend; irela++)
33 kx {
33 kx unsigned int r_type, r_indx;
33 kx enum elf_aarch64_stub_type stub_type;
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx asection *sym_sec;
33 kx bfd_vma sym_value;
33 kx bfd_vma destination;
33 kx struct elf_aarch64_link_hash_entry *hash;
33 kx const char *sym_name;
33 kx char *stub_name;
33 kx const asection *id_sec;
33 kx unsigned char st_type;
33 kx bfd_size_type len;
33 kx
33 kx r_type = ELFNN_R_TYPE (irela->r_info);
33 kx r_indx = ELFNN_R_SYM (irela->r_info);
33 kx
33 kx if (r_type >= (unsigned int) R_AARCH64_end)
33 kx {
33 kx bfd_set_error (bfd_error_bad_value);
33 kx error_ret_free_internal:
33 kx if (elf_section_data (section)->relocs == NULL)
33 kx free (internal_relocs);
33 kx goto error_ret_free_local;
33 kx }
33 kx
33 kx /* Only look for stubs on unconditional branch and
33 kx branch and link instructions. */
33 kx if (r_type != (unsigned int) AARCH64_R (CALL26)
33 kx && r_type != (unsigned int) AARCH64_R (JUMP26))
33 kx continue;
33 kx
33 kx /* Now determine the call target, its name, value,
33 kx section. */
33 kx sym_sec = NULL;
33 kx sym_value = 0;
33 kx destination = 0;
33 kx hash = NULL;
33 kx sym_name = NULL;
33 kx if (r_indx < symtab_hdr->sh_info)
33 kx {
33 kx /* It's a local symbol. */
33 kx Elf_Internal_Sym *sym;
33 kx Elf_Internal_Shdr *hdr;
33 kx
33 kx if (local_syms == NULL)
33 kx {
33 kx local_syms
33 kx = (Elf_Internal_Sym *) symtab_hdr->contents;
33 kx if (local_syms == NULL)
33 kx local_syms
33 kx = bfd_elf_get_elf_syms (input_bfd, symtab_hdr,
33 kx symtab_hdr->sh_info, 0,
33 kx NULL, NULL, NULL);
33 kx if (local_syms == NULL)
33 kx goto error_ret_free_internal;
33 kx }
33 kx
33 kx sym = local_syms + r_indx;
33 kx hdr = elf_elfsections (input_bfd)[sym->st_shndx];
33 kx sym_sec = hdr->bfd_section;
33 kx if (!sym_sec)
33 kx /* This is an undefined symbol. It can never
33 kx be resolved. */
33 kx continue;
33 kx
33 kx if (ELF_ST_TYPE (sym->st_info) != STT_SECTION)
33 kx sym_value = sym->st_value;
33 kx destination = (sym_value + irela->r_addend
33 kx + sym_sec->output_offset
33 kx + sym_sec->output_section->vma);
33 kx st_type = ELF_ST_TYPE (sym->st_info);
33 kx sym_name
33 kx = bfd_elf_string_from_elf_section (input_bfd,
33 kx symtab_hdr->sh_link,
33 kx sym->st_name);
33 kx }
33 kx else
33 kx {
33 kx int e_indx;
33 kx
33 kx e_indx = r_indx - symtab_hdr->sh_info;
33 kx hash = ((struct elf_aarch64_link_hash_entry *)
33 kx elf_sym_hashes (input_bfd)[e_indx]);
33 kx
33 kx while (hash->root.root.type == bfd_link_hash_indirect
33 kx || hash->root.root.type == bfd_link_hash_warning)
33 kx hash = ((struct elf_aarch64_link_hash_entry *)
33 kx hash->root.root.u.i.link);
33 kx
33 kx if (hash->root.root.type == bfd_link_hash_defined
33 kx || hash->root.root.type == bfd_link_hash_defweak)
33 kx {
33 kx struct elf_aarch64_link_hash_table *globals =
33 kx elf_aarch64_hash_table (info);
33 kx sym_sec = hash->root.root.u.def.section;
33 kx sym_value = hash->root.root.u.def.value;
33 kx /* For a destination in a shared library,
33 kx use the PLT stub as target address to
33 kx decide whether a branch stub is
33 kx needed. */
33 kx if (globals->root.splt != NULL && hash != NULL
33 kx && hash->root.plt.offset != (bfd_vma) - 1)
33 kx {
33 kx sym_sec = globals->root.splt;
33 kx sym_value = hash->root.plt.offset;
33 kx if (sym_sec->output_section != NULL)
33 kx destination = (sym_value
33 kx + sym_sec->output_offset
33 kx +
33 kx sym_sec->output_section->vma);
33 kx }
33 kx else if (sym_sec->output_section != NULL)
33 kx destination = (sym_value + irela->r_addend
33 kx + sym_sec->output_offset
33 kx + sym_sec->output_section->vma);
33 kx }
33 kx else if (hash->root.root.type == bfd_link_hash_undefined
33 kx || (hash->root.root.type
33 kx == bfd_link_hash_undefweak))
33 kx {
33 kx /* For a shared library, use the PLT stub as
33 kx target address to decide whether a long
33 kx branch stub is needed.
33 kx For absolute code, they cannot be handled. */
33 kx struct elf_aarch64_link_hash_table *globals =
33 kx elf_aarch64_hash_table (info);
33 kx
33 kx if (globals->root.splt != NULL && hash != NULL
33 kx && hash->root.plt.offset != (bfd_vma) - 1)
33 kx {
33 kx sym_sec = globals->root.splt;
33 kx sym_value = hash->root.plt.offset;
33 kx if (sym_sec->output_section != NULL)
33 kx destination = (sym_value
33 kx + sym_sec->output_offset
33 kx +
33 kx sym_sec->output_section->vma);
33 kx }
33 kx else
33 kx continue;
33 kx }
33 kx else
33 kx {
33 kx bfd_set_error (bfd_error_bad_value);
33 kx goto error_ret_free_internal;
33 kx }
33 kx st_type = ELF_ST_TYPE (hash->root.type);
33 kx sym_name = hash->root.root.root.string;
33 kx }
33 kx
33 kx /* Determine what (if any) linker stub is needed. */
33 kx stub_type = aarch64_type_of_stub (section, irela, sym_sec,
33 kx st_type, destination);
33 kx if (stub_type == aarch64_stub_none)
33 kx continue;
33 kx
33 kx /* Support for grouping stub sections. */
33 kx id_sec = htab->stub_group[section->id].link_sec;
33 kx
33 kx /* Get the name of this stub. */
33 kx stub_name = elfNN_aarch64_stub_name (id_sec, sym_sec, hash,
33 kx irela);
33 kx if (!stub_name)
33 kx goto error_ret_free_internal;
33 kx
33 kx stub_entry =
33 kx aarch64_stub_hash_lookup (&htab->stub_hash_table,
33 kx stub_name, false, false);
33 kx if (stub_entry != NULL)
33 kx {
33 kx /* The proper stub has already been created. */
33 kx free (stub_name);
33 kx /* Always update this stub's target since it may have
33 kx changed after layout. */
33 kx stub_entry->target_value = sym_value + irela->r_addend;
33 kx continue;
33 kx }
33 kx
33 kx stub_entry = _bfd_aarch64_add_stub_entry_in_group
33 kx (stub_name, section, htab);
33 kx if (stub_entry == NULL)
33 kx {
33 kx free (stub_name);
33 kx goto error_ret_free_internal;
33 kx }
33 kx
33 kx stub_entry->target_value = sym_value + irela->r_addend;
33 kx stub_entry->target_section = sym_sec;
33 kx stub_entry->stub_type = stub_type;
33 kx stub_entry->h = hash;
33 kx stub_entry->st_type = st_type;
33 kx
33 kx if (sym_name == NULL)
33 kx sym_name = "unnamed";
33 kx len = sizeof (STUB_ENTRY_NAME) + strlen (sym_name);
33 kx stub_entry->output_name = bfd_alloc (htab->stub_bfd, len);
33 kx if (stub_entry->output_name == NULL)
33 kx {
33 kx free (stub_name);
33 kx goto error_ret_free_internal;
33 kx }
33 kx
33 kx snprintf (stub_entry->output_name, len, STUB_ENTRY_NAME,
33 kx sym_name);
33 kx
33 kx stub_changed = true;
33 kx }
33 kx
33 kx /* We're done with the internal relocs, free them. */
33 kx if (elf_section_data (section)->relocs == NULL)
33 kx free (internal_relocs);
33 kx }
33 kx }
33 kx
33 kx if (!stub_changed)
33 kx break;
33 kx
33 kx _bfd_aarch64_resize_stubs (htab);
33 kx
33 kx /* Ask the linker to do its stuff. */
33 kx (*htab->layout_sections_again) ();
33 kx stub_changed = false;
33 kx }
33 kx
33 kx return true;
33 kx
33 kx error_ret_free_local:
33 kx return false;
33 kx }
33 kx
33 kx /* Build all the stubs associated with the current output file. The
33 kx stubs are kept in a hash table attached to the main linker hash
33 kx table. We also set up the .plt entries for statically linked PIC
33 kx functions here. This function is called via aarch64_elf_finish in the
33 kx linker. */
33 kx
33 kx bool
33 kx elfNN_aarch64_build_stubs (struct bfd_link_info *info)
33 kx {
33 kx asection *stub_sec;
33 kx struct bfd_hash_table *table;
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx
33 kx htab = elf_aarch64_hash_table (info);
33 kx
33 kx for (stub_sec = htab->stub_bfd->sections;
33 kx stub_sec != NULL; stub_sec = stub_sec->next)
33 kx {
33 kx bfd_size_type size;
33 kx
33 kx /* Ignore non-stub sections. */
33 kx if (!strstr (stub_sec->name, STUB_SUFFIX))
33 kx continue;
33 kx
33 kx /* Allocate memory to hold the linker stubs. */
33 kx size = stub_sec->size;
33 kx stub_sec->contents = bfd_zalloc (htab->stub_bfd, size);
33 kx if (stub_sec->contents == NULL && size != 0)
33 kx return false;
33 kx stub_sec->size = 0;
33 kx
33 kx /* Add a branch around the stub section, and a nop, to keep it 8 byte
33 kx aligned, as long branch stubs contain a 64-bit address. */
33 kx bfd_putl32 (0x14000000 | (size >> 2), stub_sec->contents);
33 kx bfd_putl32 (INSN_NOP, stub_sec->contents + 4);
33 kx stub_sec->size += 8;
33 kx }
33 kx
33 kx /* Build the stubs as directed by the stub hash table. */
33 kx table = &htab->stub_hash_table;
33 kx bfd_hash_traverse (table, aarch64_build_one_stub, info);
33 kx
33 kx return true;
33 kx }
33 kx
33 kx
33 kx /* Add an entry to the code/data map for section SEC. */
33 kx
33 kx static void
33 kx elfNN_aarch64_section_map_add (asection *sec, char type, bfd_vma vma)
33 kx {
33 kx struct _aarch64_elf_section_data *sec_data =
33 kx elf_aarch64_section_data (sec);
33 kx unsigned int newidx;
33 kx
33 kx if (sec_data->map == NULL)
33 kx {
33 kx sec_data->map = bfd_malloc (sizeof (elf_aarch64_section_map));
33 kx sec_data->mapcount = 0;
33 kx sec_data->mapsize = 1;
33 kx }
33 kx
33 kx newidx = sec_data->mapcount++;
33 kx
33 kx if (sec_data->mapcount > sec_data->mapsize)
33 kx {
33 kx sec_data->mapsize *= 2;
33 kx sec_data->map = bfd_realloc_or_free
33 kx (sec_data->map, sec_data->mapsize * sizeof (elf_aarch64_section_map));
33 kx }
33 kx
33 kx if (sec_data->map)
33 kx {
33 kx sec_data->map[newidx].vma = vma;
33 kx sec_data->map[newidx].type = type;
33 kx }
33 kx }
33 kx
33 kx
33 kx /* Initialise maps of insn/data for input BFDs. */
33 kx void
33 kx bfd_elfNN_aarch64_init_maps (bfd *abfd)
33 kx {
33 kx Elf_Internal_Sym *isymbuf;
33 kx Elf_Internal_Shdr *hdr;
33 kx unsigned int i, localsyms;
33 kx
33 kx /* Make sure that we are dealing with an AArch64 elf binary. */
33 kx if (!is_aarch64_elf (abfd))
33 kx return;
33 kx
33 kx if ((abfd->flags & DYNAMIC) != 0)
33 kx return;
33 kx
33 kx hdr = &elf_symtab_hdr (abfd);
33 kx localsyms = hdr->sh_info;
33 kx
33 kx /* Obtain a buffer full of symbols for this BFD. The hdr->sh_info field
33 kx should contain the number of local symbols, which should come before any
33 kx global symbols. Mapping symbols are always local. */
33 kx isymbuf = bfd_elf_get_elf_syms (abfd, hdr, localsyms, 0, NULL, NULL, NULL);
33 kx
33 kx /* No internal symbols read? Skip this BFD. */
33 kx if (isymbuf == NULL)
33 kx return;
33 kx
33 kx for (i = 0; i < localsyms; i++)
33 kx {
33 kx Elf_Internal_Sym *isym = &isymbuf[i];
33 kx asection *sec = bfd_section_from_elf_index (abfd, isym->st_shndx);
33 kx const char *name;
33 kx
33 kx if (sec != NULL && ELF_ST_BIND (isym->st_info) == STB_LOCAL)
33 kx {
33 kx name = bfd_elf_string_from_elf_section (abfd,
33 kx hdr->sh_link,
33 kx isym->st_name);
33 kx
33 kx if (bfd_is_aarch64_special_symbol_name
33 kx (name, BFD_AARCH64_SPECIAL_SYM_TYPE_MAP))
33 kx elfNN_aarch64_section_map_add (sec, name[1], isym->st_value);
33 kx }
33 kx }
33 kx }
33 kx
33 kx static void
33 kx setup_plt_values (struct bfd_link_info *link_info,
33 kx aarch64_plt_type plt_type)
33 kx {
33 kx struct elf_aarch64_link_hash_table *globals;
33 kx globals = elf_aarch64_hash_table (link_info);
33 kx
33 kx if (plt_type == PLT_BTI_PAC)
33 kx {
33 kx globals->plt0_entry = elfNN_aarch64_small_plt0_bti_entry;
33 kx
33 kx /* Only in ET_EXEC we need PLTn with BTI. */
33 kx if (bfd_link_pde (link_info))
33 kx {
33 kx globals->plt_entry_size = PLT_BTI_PAC_SMALL_ENTRY_SIZE;
33 kx globals->plt_entry = elfNN_aarch64_small_plt_bti_pac_entry;
33 kx }
33 kx else
33 kx {
33 kx globals->plt_entry_size = PLT_PAC_SMALL_ENTRY_SIZE;
33 kx globals->plt_entry = elfNN_aarch64_small_plt_pac_entry;
33 kx }
33 kx }
33 kx else if (plt_type == PLT_BTI)
33 kx {
33 kx globals->plt0_entry = elfNN_aarch64_small_plt0_bti_entry;
33 kx
33 kx /* Only in ET_EXEC we need PLTn with BTI. */
33 kx if (bfd_link_pde (link_info))
33 kx {
33 kx globals->plt_entry_size = PLT_BTI_SMALL_ENTRY_SIZE;
33 kx globals->plt_entry = elfNN_aarch64_small_plt_bti_entry;
33 kx }
33 kx }
33 kx else if (plt_type == PLT_PAC)
33 kx {
33 kx globals->plt_entry_size = PLT_PAC_SMALL_ENTRY_SIZE;
33 kx globals->plt_entry = elfNN_aarch64_small_plt_pac_entry;
33 kx }
33 kx }
33 kx
33 kx /* Set option values needed during linking. */
33 kx void
33 kx bfd_elfNN_aarch64_set_options (struct bfd *output_bfd,
33 kx struct bfd_link_info *link_info,
33 kx int no_enum_warn,
33 kx int no_wchar_warn, int pic_veneer,
33 kx int fix_erratum_835769,
33 kx erratum_84319_opts fix_erratum_843419,
33 kx int no_apply_dynamic_relocs,
33 kx aarch64_bti_pac_info bp_info)
33 kx {
33 kx struct elf_aarch64_link_hash_table *globals;
33 kx
33 kx globals = elf_aarch64_hash_table (link_info);
33 kx globals->pic_veneer = pic_veneer;
33 kx globals->fix_erratum_835769 = fix_erratum_835769;
33 kx /* If the default options are used, then ERRAT_ADR will be set by default
33 kx which will enable the ADRP->ADR workaround for the erratum 843419
33 kx workaround. */
33 kx globals->fix_erratum_843419 = fix_erratum_843419;
33 kx globals->no_apply_dynamic_relocs = no_apply_dynamic_relocs;
33 kx
33 kx BFD_ASSERT (is_aarch64_elf (output_bfd));
33 kx elf_aarch64_tdata (output_bfd)->no_enum_size_warning = no_enum_warn;
33 kx elf_aarch64_tdata (output_bfd)->no_wchar_size_warning = no_wchar_warn;
33 kx
33 kx switch (bp_info.bti_type)
33 kx {
33 kx case BTI_WARN:
33 kx elf_aarch64_tdata (output_bfd)->no_bti_warn = 0;
33 kx elf_aarch64_tdata (output_bfd)->gnu_and_prop
33 kx |= GNU_PROPERTY_AARCH64_FEATURE_1_BTI;
33 kx break;
33 kx
33 kx default:
33 kx break;
33 kx }
33 kx elf_aarch64_tdata (output_bfd)->plt_type = bp_info.plt_type;
33 kx setup_plt_values (link_info, bp_info.plt_type);
33 kx }
33 kx
33 kx static bfd_vma
33 kx aarch64_calculate_got_entry_vma (struct elf_link_hash_entry *h,
33 kx struct elf_aarch64_link_hash_table
33 kx *globals, struct bfd_link_info *info,
33 kx bfd_vma value, bfd *output_bfd,
33 kx bool *unresolved_reloc_p)
33 kx {
33 kx bfd_vma off = (bfd_vma) - 1;
33 kx asection *basegot = globals->root.sgot;
33 kx bool dyn = globals->root.dynamic_sections_created;
33 kx
33 kx if (h != NULL)
33 kx {
33 kx BFD_ASSERT (basegot != NULL);
33 kx off = h->got.offset;
33 kx BFD_ASSERT (off != (bfd_vma) - 1);
33 kx if (!WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, bfd_link_pic (info), h)
33 kx || (bfd_link_pic (info)
33 kx && SYMBOL_REFERENCES_LOCAL (info, h))
33 kx || (ELF_ST_VISIBILITY (h->other)
33 kx && h->root.type == bfd_link_hash_undefweak))
33 kx {
33 kx /* This is actually a static link, or it is a -Bsymbolic link
33 kx and the symbol is defined locally. We must initialize this
33 kx entry in the global offset table. Since the offset must
33 kx always be a multiple of 8 (4 in the case of ILP32), we use
33 kx the least significant bit to record whether we have
33 kx initialized it already.
33 kx When doing a dynamic link, we create a .rel(a).got relocation
33 kx entry to initialize the value. This is done in the
33 kx finish_dynamic_symbol routine. */
33 kx if ((off & 1) != 0)
33 kx off &= ~1;
33 kx else
33 kx {
33 kx bfd_put_NN (output_bfd, value, basegot->contents + off);
33 kx h->got.offset |= 1;
33 kx }
33 kx }
33 kx else
33 kx *unresolved_reloc_p = false;
33 kx
33 kx off = off + basegot->output_section->vma + basegot->output_offset;
33 kx }
33 kx
33 kx return off;
33 kx }
33 kx
33 kx /* Change R_TYPE to a more efficient access model where possible,
33 kx return the new reloc type. */
33 kx
33 kx static bfd_reloc_code_real_type
33 kx aarch64_tls_transition_without_check (bfd_reloc_code_real_type r_type,
33 kx struct elf_link_hash_entry *h,
33 kx struct bfd_link_info *info)
33 kx {
33 kx bool local_exec = bfd_link_executable (info)
33 kx && SYMBOL_REFERENCES_LOCAL (info, h);
33 kx
33 kx switch (r_type)
33 kx {
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
33 kx return (local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
33 kx : BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21);
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
33 kx return (local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
33 kx : r_type);
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
33 kx return (local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1
33 kx : BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19);
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_LDR:
33 kx return (local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
33 kx : BFD_RELOC_AARCH64_NONE);
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
33 kx return (local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC
33 kx : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC);
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
33 kx return (local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2
33 kx : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1);
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
33 kx return (local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC
33 kx : BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC);
33 kx
33 kx case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
33 kx return local_exec ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1 : r_type;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
33 kx return local_exec ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC : r_type;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
33 kx return r_type;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
33 kx return (local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12
33 kx : BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19);
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_CALL:
33 kx /* Instructions with these relocations will become NOPs. */
33 kx return BFD_RELOC_AARCH64_NONE;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
33 kx return local_exec ? BFD_RELOC_AARCH64_NONE : r_type;
33 kx
33 kx #if ARCH_SIZE == 64
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
33 kx return local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC
33 kx : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
33 kx return local_exec
33 kx ? BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2
33 kx : BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1;
33 kx #endif
33 kx
33 kx default:
33 kx break;
33 kx }
33 kx
33 kx return r_type;
33 kx }
33 kx
33 kx static unsigned int
33 kx aarch64_reloc_got_type (bfd_reloc_code_real_type r_type)
33 kx {
33 kx switch (r_type)
33 kx {
33 kx case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
33 kx case BFD_RELOC_AARCH64_GOT_LD_PREL19:
33 kx case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
33 kx case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
33 kx case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
33 kx case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
33 kx return GOT_NORMAL;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
33 kx return GOT_TLS_GD;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
33 kx case BFD_RELOC_AARCH64_TLSDESC_CALL:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LDR:
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
33 kx return GOT_TLSDESC_GD;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
33 kx case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
33 kx return GOT_TLS_IE;
33 kx
33 kx default:
33 kx break;
33 kx }
33 kx return GOT_UNKNOWN;
33 kx }
33 kx
33 kx static bool
33 kx aarch64_can_relax_tls (bfd *input_bfd,
33 kx struct bfd_link_info *info,
33 kx bfd_reloc_code_real_type r_type,
33 kx struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx unsigned int symbol_got_type;
33 kx unsigned int reloc_got_type;
33 kx
33 kx if (! IS_AARCH64_TLS_RELAX_RELOC (r_type))
33 kx return false;
33 kx
33 kx symbol_got_type = elfNN_aarch64_symbol_got_type (h, input_bfd, r_symndx);
33 kx reloc_got_type = aarch64_reloc_got_type (r_type);
33 kx
33 kx if (symbol_got_type == GOT_TLS_IE && GOT_TLS_GD_ANY_P (reloc_got_type))
33 kx return true;
33 kx
33 kx if (!bfd_link_executable (info))
33 kx return false;
33 kx
33 kx if (h && h->root.type == bfd_link_hash_undefweak)
33 kx return false;
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Given the relocation code R_TYPE, return the relaxed bfd reloc
33 kx enumerator. */
33 kx
33 kx static bfd_reloc_code_real_type
33 kx aarch64_tls_transition (bfd *input_bfd,
33 kx struct bfd_link_info *info,
33 kx unsigned int r_type,
33 kx struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx bfd_reloc_code_real_type bfd_r_type
33 kx = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
33 kx
33 kx if (! aarch64_can_relax_tls (input_bfd, info, bfd_r_type, h, r_symndx))
33 kx return bfd_r_type;
33 kx
33 kx return aarch64_tls_transition_without_check (bfd_r_type, h, info);
33 kx }
33 kx
33 kx /* Return the base VMA address which should be subtracted from real addresses
33 kx when resolving R_AARCH64_TLS_DTPREL relocation. */
33 kx
33 kx static bfd_vma
33 kx dtpoff_base (struct bfd_link_info *info)
33 kx {
33 kx /* If tls_sec is NULL, we should have signalled an error already. */
33 kx BFD_ASSERT (elf_hash_table (info)->tls_sec != NULL);
33 kx return elf_hash_table (info)->tls_sec->vma;
33 kx }
33 kx
33 kx /* Return the base VMA address which should be subtracted from real addresses
33 kx when resolving R_AARCH64_TLS_GOTTPREL64 relocations. */
33 kx
33 kx static bfd_vma
33 kx tpoff_base (struct bfd_link_info *info)
33 kx {
33 kx struct elf_link_hash_table *htab = elf_hash_table (info);
33 kx
33 kx /* If tls_sec is NULL, we should have signalled an error already. */
33 kx BFD_ASSERT (htab->tls_sec != NULL);
33 kx
33 kx bfd_vma base = align_power ((bfd_vma) TCB_SIZE,
33 kx htab->tls_sec->alignment_power);
33 kx return htab->tls_sec->vma - base;
33 kx }
33 kx
33 kx static bfd_vma *
33 kx symbol_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx /* Calculate the address of the GOT entry for symbol
33 kx referred to in h. */
33 kx if (h != NULL)
33 kx return &h->got.offset;
33 kx else
33 kx {
33 kx /* local symbol */
33 kx struct elf_aarch64_local_symbol *l;
33 kx
33 kx l = elf_aarch64_locals (input_bfd);
33 kx return &l[r_symndx].got_offset;
33 kx }
33 kx }
33 kx
33 kx static void
33 kx symbol_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx bfd_vma *p;
33 kx p = symbol_got_offset_ref (input_bfd, h, r_symndx);
33 kx *p |= 1;
33 kx }
33 kx
33 kx static int
33 kx symbol_got_offset_mark_p (bfd *input_bfd, struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx bfd_vma value;
33 kx value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
33 kx return value & 1;
33 kx }
33 kx
33 kx static bfd_vma
33 kx symbol_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx bfd_vma value;
33 kx value = * symbol_got_offset_ref (input_bfd, h, r_symndx);
33 kx value &= ~1;
33 kx return value;
33 kx }
33 kx
33 kx static bfd_vma *
33 kx symbol_tlsdesc_got_offset_ref (bfd *input_bfd, struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx /* Calculate the address of the GOT entry for symbol
33 kx referred to in h. */
33 kx if (h != NULL)
33 kx {
33 kx struct elf_aarch64_link_hash_entry *eh;
33 kx eh = (struct elf_aarch64_link_hash_entry *) h;
33 kx return &eh->tlsdesc_got_jump_table_offset;
33 kx }
33 kx else
33 kx {
33 kx /* local symbol */
33 kx struct elf_aarch64_local_symbol *l;
33 kx
33 kx l = elf_aarch64_locals (input_bfd);
33 kx return &l[r_symndx].tlsdesc_got_jump_table_offset;
33 kx }
33 kx }
33 kx
33 kx static void
33 kx symbol_tlsdesc_got_offset_mark (bfd *input_bfd, struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx bfd_vma *p;
33 kx p = symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
33 kx *p |= 1;
33 kx }
33 kx
33 kx static int
33 kx symbol_tlsdesc_got_offset_mark_p (bfd *input_bfd,
33 kx struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx bfd_vma value;
33 kx value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
33 kx return value & 1;
33 kx }
33 kx
33 kx static bfd_vma
33 kx symbol_tlsdesc_got_offset (bfd *input_bfd, struct elf_link_hash_entry *h,
33 kx unsigned long r_symndx)
33 kx {
33 kx bfd_vma value;
33 kx value = * symbol_tlsdesc_got_offset_ref (input_bfd, h, r_symndx);
33 kx value &= ~1;
33 kx return value;
33 kx }
33 kx
33 kx /* Data for make_branch_to_erratum_835769_stub(). */
33 kx
33 kx struct erratum_835769_branch_to_stub_data
33 kx {
33 kx struct bfd_link_info *info;
33 kx asection *output_section;
33 kx bfd_byte *contents;
33 kx };
33 kx
33 kx /* Helper to insert branches to erratum 835769 stubs in the right
33 kx places for a particular section. */
33 kx
33 kx static bool
33 kx make_branch_to_erratum_835769_stub (struct bfd_hash_entry *gen_entry,
33 kx void *in_arg)
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx struct erratum_835769_branch_to_stub_data *data;
33 kx bfd_byte *contents;
33 kx unsigned long branch_insn = 0;
33 kx bfd_vma veneered_insn_loc, veneer_entry_loc;
33 kx bfd_signed_vma branch_offset;
33 kx unsigned int target;
33 kx bfd *abfd;
33 kx
33 kx stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
33 kx data = (struct erratum_835769_branch_to_stub_data *) in_arg;
33 kx
33 kx if (stub_entry->target_section != data->output_section
33 kx || stub_entry->stub_type != aarch64_stub_erratum_835769_veneer)
33 kx return true;
33 kx
33 kx contents = data->contents;
33 kx veneered_insn_loc = stub_entry->target_section->output_section->vma
33 kx + stub_entry->target_section->output_offset
33 kx + stub_entry->target_value;
33 kx veneer_entry_loc = stub_entry->stub_sec->output_section->vma
33 kx + stub_entry->stub_sec->output_offset
33 kx + stub_entry->stub_offset;
33 kx branch_offset = veneer_entry_loc - veneered_insn_loc;
33 kx
33 kx abfd = stub_entry->target_section->owner;
33 kx if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
33 kx _bfd_error_handler
33 kx (_("%pB: error: erratum 835769 stub out "
33 kx "of range (input file too large)"), abfd);
33 kx
33 kx target = stub_entry->target_value;
33 kx branch_insn = 0x14000000;
33 kx branch_offset >>= 2;
33 kx branch_offset &= 0x3ffffff;
33 kx branch_insn |= branch_offset;
33 kx bfd_putl32 (branch_insn, &contents[target]);
33 kx
33 kx return true;
33 kx }
33 kx
33 kx
33 kx static bool
33 kx _bfd_aarch64_erratum_843419_branch_to_stub (struct bfd_hash_entry *gen_entry,
33 kx void *in_arg)
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *stub_entry
33 kx = (struct elf_aarch64_stub_hash_entry *) gen_entry;
33 kx struct erratum_835769_branch_to_stub_data *data
33 kx = (struct erratum_835769_branch_to_stub_data *) in_arg;
33 kx struct bfd_link_info *info;
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx bfd_byte *contents;
33 kx asection *section;
33 kx bfd *abfd;
33 kx bfd_vma place;
33 kx uint32_t insn;
33 kx
33 kx info = data->info;
33 kx contents = data->contents;
33 kx section = data->output_section;
33 kx
33 kx htab = elf_aarch64_hash_table (info);
33 kx
33 kx if (stub_entry->target_section != section
33 kx || stub_entry->stub_type != aarch64_stub_erratum_843419_veneer)
33 kx return true;
33 kx
33 kx BFD_ASSERT (((htab->fix_erratum_843419 & ERRAT_ADRP) && stub_entry->stub_sec)
33 kx || (htab->fix_erratum_843419 & ERRAT_ADR));
33 kx
33 kx /* Only update the stub section if we have one. We should always have one if
33 kx we're allowed to use the ADRP errata workaround, otherwise it is not
33 kx required. */
33 kx if (stub_entry->stub_sec)
33 kx {
33 kx insn = bfd_getl32 (contents + stub_entry->target_value);
33 kx bfd_putl32 (insn,
33 kx stub_entry->stub_sec->contents + stub_entry->stub_offset);
33 kx }
33 kx
33 kx place = (section->output_section->vma + section->output_offset
33 kx + stub_entry->adrp_offset);
33 kx insn = bfd_getl32 (contents + stub_entry->adrp_offset);
33 kx
33 kx if (!_bfd_aarch64_adrp_p (insn))
33 kx abort ();
33 kx
33 kx bfd_signed_vma imm =
33 kx (_bfd_aarch64_sign_extend
33 kx ((bfd_vma) _bfd_aarch64_decode_adrp_imm (insn) << 12, 33)
33 kx - (place & 0xfff));
33 kx
33 kx if ((htab->fix_erratum_843419 & ERRAT_ADR)
33 kx && (imm >= AARCH64_MIN_ADRP_IMM && imm <= AARCH64_MAX_ADRP_IMM))
33 kx {
33 kx insn = (_bfd_aarch64_reencode_adr_imm (AARCH64_ADR_OP, imm)
33 kx | AARCH64_RT (insn));
33 kx bfd_putl32 (insn, contents + stub_entry->adrp_offset);
33 kx /* Stub is not needed, don't map it out. */
33 kx stub_entry->stub_type = aarch64_stub_none;
33 kx }
33 kx else if (htab->fix_erratum_843419 & ERRAT_ADRP)
33 kx {
33 kx bfd_vma veneered_insn_loc;
33 kx bfd_vma veneer_entry_loc;
33 kx bfd_signed_vma branch_offset;
33 kx uint32_t branch_insn;
33 kx
33 kx veneered_insn_loc = stub_entry->target_section->output_section->vma
33 kx + stub_entry->target_section->output_offset
33 kx + stub_entry->target_value;
33 kx veneer_entry_loc = stub_entry->stub_sec->output_section->vma
33 kx + stub_entry->stub_sec->output_offset
33 kx + stub_entry->stub_offset;
33 kx branch_offset = veneer_entry_loc - veneered_insn_loc;
33 kx
33 kx abfd = stub_entry->target_section->owner;
33 kx if (!aarch64_valid_branch_p (veneer_entry_loc, veneered_insn_loc))
33 kx _bfd_error_handler
33 kx (_("%pB: error: erratum 843419 stub out "
33 kx "of range (input file too large)"), abfd);
33 kx
33 kx branch_insn = 0x14000000;
33 kx branch_offset >>= 2;
33 kx branch_offset &= 0x3ffffff;
33 kx branch_insn |= branch_offset;
33 kx bfd_putl32 (branch_insn, contents + stub_entry->target_value);
33 kx }
33 kx else
33 kx {
33 kx abfd = stub_entry->target_section->owner;
33 kx _bfd_error_handler
33 kx (_("%pB: error: erratum 843419 immediate 0x%" PRIx64
33 kx " out of range for ADR (input file too large) and "
33 kx "--fix-cortex-a53-843419=adr used. Run the linker with "
33 kx "--fix-cortex-a53-843419=full instead"),
33 kx abfd, (uint64_t) (bfd_vma) imm);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx /* This function is called inside a hashtable traversal and the error
33 kx handlers called above turn into non-fatal errors. Which means this
33 kx case ld returns an exit code 0 and also produces a broken object file.
33 kx To prevent this, issue a hard abort. */
33 kx BFD_FAIL ();
33 kx }
33 kx return true;
33 kx }
33 kx
33 kx
33 kx static bool
33 kx elfNN_aarch64_write_section (bfd *output_bfd ATTRIBUTE_UNUSED,
33 kx struct bfd_link_info *link_info,
33 kx asection *sec,
33 kx bfd_byte *contents)
33 kx
33 kx {
33 kx struct elf_aarch64_link_hash_table *globals =
33 kx elf_aarch64_hash_table (link_info);
33 kx
33 kx if (globals == NULL)
33 kx return false;
33 kx
33 kx /* Fix code to point to erratum 835769 stubs. */
33 kx if (globals->fix_erratum_835769)
33 kx {
33 kx struct erratum_835769_branch_to_stub_data data;
33 kx
33 kx data.info = link_info;
33 kx data.output_section = sec;
33 kx data.contents = contents;
33 kx bfd_hash_traverse (&globals->stub_hash_table,
33 kx make_branch_to_erratum_835769_stub, &data);
33 kx }
33 kx
33 kx if (globals->fix_erratum_843419)
33 kx {
33 kx struct erratum_835769_branch_to_stub_data data;
33 kx
33 kx data.info = link_info;
33 kx data.output_section = sec;
33 kx data.contents = contents;
33 kx bfd_hash_traverse (&globals->stub_hash_table,
33 kx _bfd_aarch64_erratum_843419_branch_to_stub, &data);
33 kx }
33 kx
33 kx return false;
33 kx }
33 kx
33 kx /* Return TRUE if RELOC is a relocation against the base of GOT table. */
33 kx
33 kx static bool
33 kx aarch64_relocation_aginst_gp_p (bfd_reloc_code_real_type reloc)
33 kx {
33 kx return (reloc == BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14
33 kx || reloc == BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15
33 kx || reloc == BFD_RELOC_AARCH64_LD64_GOTOFF_LO15
33 kx || reloc == BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC
33 kx || reloc == BFD_RELOC_AARCH64_MOVW_GOTOFF_G1);
33 kx }
33 kx
33 kx /* Perform a relocation as part of a final link. The input relocation type
33 kx should be TLS relaxed. */
33 kx
33 kx static bfd_reloc_status_type
33 kx elfNN_aarch64_final_link_relocate (reloc_howto_type *howto,
33 kx bfd *input_bfd,
33 kx bfd *output_bfd,
33 kx asection *input_section,
33 kx bfd_byte *contents,
33 kx Elf_Internal_Rela *rel,
33 kx bfd_vma value,
33 kx struct bfd_link_info *info,
33 kx asection *sym_sec,
33 kx struct elf_link_hash_entry *h,
33 kx bool *unresolved_reloc_p,
33 kx bool save_addend,
33 kx bfd_vma *saved_addend,
33 kx Elf_Internal_Sym *sym)
33 kx {
33 kx Elf_Internal_Shdr *symtab_hdr;
33 kx unsigned int r_type = howto->type;
33 kx bfd_reloc_code_real_type bfd_r_type
33 kx = elfNN_aarch64_bfd_reloc_from_howto (howto);
33 kx unsigned long r_symndx;
33 kx bfd_byte *hit_data = contents + rel->r_offset;
33 kx bfd_vma place, off, got_entry_addr = 0;
33 kx bfd_signed_vma signed_addend;
33 kx struct elf_aarch64_link_hash_table *globals;
33 kx bool weak_undef_p;
33 kx bool relative_reloc;
33 kx asection *base_got;
33 kx bfd_vma orig_value = value;
33 kx bool resolved_to_zero;
33 kx bool abs_symbol_p;
33 kx
33 kx globals = elf_aarch64_hash_table (info);
33 kx
33 kx symtab_hdr = &elf_symtab_hdr (input_bfd);
33 kx
33 kx BFD_ASSERT (is_aarch64_elf (input_bfd));
33 kx
33 kx r_symndx = ELFNN_R_SYM (rel->r_info);
33 kx
33 kx place = input_section->output_section->vma
33 kx + input_section->output_offset + rel->r_offset;
33 kx
33 kx /* Get addend, accumulating the addend for consecutive relocs
33 kx which refer to the same offset. */
33 kx signed_addend = saved_addend ? *saved_addend : 0;
33 kx signed_addend += rel->r_addend;
33 kx
33 kx weak_undef_p = (h ? h->root.type == bfd_link_hash_undefweak
33 kx : bfd_is_und_section (sym_sec));
33 kx abs_symbol_p = h != NULL && bfd_is_abs_symbol (&h->root);
33 kx
33 kx
33 kx /* Since STT_GNU_IFUNC symbol must go through PLT, we handle
33 kx it here if it is defined in a non-shared object. */
33 kx if (h != NULL
33 kx && h->type == STT_GNU_IFUNC
33 kx && (input_section->flags & SEC_ALLOC)
33 kx && h->def_regular)
33 kx {
33 kx asection *plt;
33 kx const char *name;
33 kx bfd_vma addend = 0;
33 kx
33 kx if ((input_section->flags & SEC_ALLOC) == 0)
33 kx {
33 kx /* If this is a SHT_NOTE section without SHF_ALLOC, treat
33 kx STT_GNU_IFUNC symbol as STT_FUNC. */
33 kx if (elf_section_type (input_section) == SHT_NOTE)
33 kx goto skip_ifunc;
33 kx
33 kx /* Dynamic relocs are not propagated for SEC_DEBUGGING
33 kx sections because such sections are not SEC_ALLOC and
33 kx thus ld.so will not process them. */
33 kx if ((input_section->flags & SEC_DEBUGGING) != 0)
33 kx return bfd_reloc_ok;
33 kx
33 kx if (h->root.root.string)
33 kx name = h->root.root.string;
33 kx else
33 kx name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym, NULL);
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB(%pA+%#" PRIx64 "): "
33 kx "unresolvable %s relocation against symbol `%s'"),
33 kx input_bfd, input_section, (uint64_t) rel->r_offset,
33 kx howto->name, name);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return bfd_reloc_notsupported;
33 kx }
33 kx else if (h->plt.offset == (bfd_vma) -1)
33 kx goto bad_ifunc_reloc;
33 kx
33 kx /* STT_GNU_IFUNC symbol must go through PLT. */
33 kx plt = globals->root.splt ? globals->root.splt : globals->root.iplt;
33 kx value = (plt->output_section->vma + plt->output_offset + h->plt.offset);
33 kx
33 kx switch (bfd_r_type)
33 kx {
33 kx default:
33 kx bad_ifunc_reloc:
33 kx if (h->root.root.string)
33 kx name = h->root.root.string;
33 kx else
33 kx name = bfd_elf_sym_name (input_bfd, symtab_hdr, sym,
33 kx NULL);
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: relocation %s against STT_GNU_IFUNC "
33 kx "symbol `%s' isn't handled by %s"), input_bfd,
33 kx howto->name, name, __FUNCTION__);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return bfd_reloc_notsupported;
33 kx
33 kx case BFD_RELOC_AARCH64_NN:
33 kx if (rel->r_addend != 0)
33 kx {
33 kx if (h->root.root.string)
33 kx name = h->root.root.string;
33 kx else
33 kx name = bfd_elf_sym_name (input_bfd, symtab_hdr,
33 kx sym, NULL);
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: relocation %s against STT_GNU_IFUNC "
33 kx "symbol `%s' has non-zero addend: %" PRId64),
33 kx input_bfd, howto->name, name, (int64_t) rel->r_addend);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return bfd_reloc_notsupported;
33 kx }
33 kx
33 kx /* Generate dynamic relocation only when there is a
33 kx non-GOT reference in a shared object. */
33 kx if (bfd_link_pic (info) && h->non_got_ref)
33 kx {
33 kx Elf_Internal_Rela outrel;
33 kx asection *sreloc;
33 kx
33 kx /* Need a dynamic relocation to get the real function
33 kx address. */
33 kx outrel.r_offset = _bfd_elf_section_offset (output_bfd,
33 kx info,
33 kx input_section,
33 kx rel->r_offset);
33 kx if (outrel.r_offset == (bfd_vma) -1
33 kx || outrel.r_offset == (bfd_vma) -2)
33 kx abort ();
33 kx
33 kx outrel.r_offset += (input_section->output_section->vma
33 kx + input_section->output_offset);
33 kx
33 kx if (h->dynindx == -1
33 kx || h->forced_local
33 kx || bfd_link_executable (info))
33 kx {
33 kx /* This symbol is resolved locally. */
33 kx outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
33 kx outrel.r_addend = (h->root.u.def.value
33 kx + h->root.u.def.section->output_section->vma
33 kx + h->root.u.def.section->output_offset);
33 kx }
33 kx else
33 kx {
33 kx outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
33 kx outrel.r_addend = 0;
33 kx }
33 kx
33 kx sreloc = globals->root.irelifunc;
33 kx elf_append_rela (output_bfd, sreloc, &outrel);
33 kx
33 kx /* If this reloc is against an external symbol, we
33 kx do not want to fiddle with the addend. Otherwise,
33 kx we need to include the symbol value so that it
33 kx becomes an addend for the dynamic reloc. For an
33 kx internal symbol, we have updated addend. */
33 kx return bfd_reloc_ok;
33 kx }
33 kx /* FALLTHROUGH */
33 kx case BFD_RELOC_AARCH64_CALL26:
33 kx case BFD_RELOC_AARCH64_JUMP26:
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx signed_addend,
33 kx weak_undef_p);
33 kx return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
33 kx howto, value);
33 kx case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
33 kx case BFD_RELOC_AARCH64_GOT_LD_PREL19:
33 kx case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
33 kx case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
33 kx case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
33 kx case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
33 kx base_got = globals->root.sgot;
33 kx off = h->got.offset;
33 kx
33 kx if (base_got == NULL)
33 kx abort ();
33 kx
33 kx if (off == (bfd_vma) -1)
33 kx {
33 kx bfd_vma plt_index;
33 kx
33 kx /* We can't use h->got.offset here to save state, or
33 kx even just remember the offset, as finish_dynamic_symbol
33 kx would use that as offset into .got. */
33 kx
33 kx if (globals->root.splt != NULL)
33 kx {
33 kx plt_index = ((h->plt.offset - globals->plt_header_size) /
33 kx globals->plt_entry_size);
33 kx off = (plt_index + 3) * GOT_ENTRY_SIZE;
33 kx base_got = globals->root.sgotplt;
33 kx }
33 kx else
33 kx {
33 kx plt_index = h->plt.offset / globals->plt_entry_size;
33 kx off = plt_index * GOT_ENTRY_SIZE;
33 kx base_got = globals->root.igotplt;
33 kx }
33 kx
33 kx if (h->dynindx == -1
33 kx || h->forced_local
33 kx || info->symbolic)
33 kx {
33 kx /* This references the local definition. We must
33 kx initialize this entry in the global offset table.
33 kx Since the offset must always be a multiple of 8,
33 kx we use the least significant bit to record
33 kx whether we have initialized it already.
33 kx
33 kx When doing a dynamic link, we create a .rela.got
33 kx relocation entry to initialize the value. This
33 kx is done in the finish_dynamic_symbol routine. */
33 kx if ((off & 1) != 0)
33 kx off &= ~1;
33 kx else
33 kx {
33 kx bfd_put_NN (output_bfd, value,
33 kx base_got->contents + off);
33 kx /* Note that this is harmless as -1 | 1 still is -1. */
33 kx h->got.offset |= 1;
33 kx }
33 kx }
33 kx value = (base_got->output_section->vma
33 kx + base_got->output_offset + off);
33 kx }
33 kx else
33 kx value = aarch64_calculate_got_entry_vma (h, globals, info,
33 kx value, output_bfd,
33 kx unresolved_reloc_p);
33 kx
33 kx if (aarch64_relocation_aginst_gp_p (bfd_r_type))
33 kx addend = (globals->root.sgot->output_section->vma
33 kx + globals->root.sgot->output_offset);
33 kx
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx addend, weak_undef_p);
33 kx return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type, howto, value);
33 kx case BFD_RELOC_AARCH64_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
33 kx break;
33 kx }
33 kx }
33 kx
33 kx skip_ifunc:
33 kx resolved_to_zero = (h != NULL
33 kx && UNDEFWEAK_NO_DYNAMIC_RELOC (info, h));
33 kx
33 kx switch (bfd_r_type)
33 kx {
33 kx case BFD_RELOC_AARCH64_NONE:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD:
33 kx case BFD_RELOC_AARCH64_TLSDESC_CALL:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LDR:
33 kx *unresolved_reloc_p = false;
33 kx return bfd_reloc_ok;
33 kx
33 kx case BFD_RELOC_AARCH64_NN:
33 kx
33 kx /* When generating a shared object or relocatable executable, these
33 kx relocations are copied into the output file to be resolved at
33 kx run time. */
33 kx if (((bfd_link_pic (info)
33 kx || globals->root.is_relocatable_executable)
33 kx && (input_section->flags & SEC_ALLOC)
33 kx && (h == NULL
33 kx || (ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
33 kx && !resolved_to_zero)
33 kx || h->root.type != bfd_link_hash_undefweak))
33 kx /* Or we are creating an executable, we may need to keep relocations
33 kx for symbols satisfied by a dynamic library if we manage to avoid
33 kx copy relocs for the symbol. */
33 kx || (ELIMINATE_COPY_RELOCS
33 kx && !bfd_link_pic (info)
33 kx && h != NULL
33 kx && (input_section->flags & SEC_ALLOC)
33 kx && h->dynindx != -1
33 kx && !h->non_got_ref
33 kx && ((h->def_dynamic
33 kx && !h->def_regular)
33 kx || h->root.type == bfd_link_hash_undefweak
33 kx || h->root.type == bfd_link_hash_undefined)))
33 kx {
33 kx Elf_Internal_Rela outrel;
33 kx bfd_byte *loc;
33 kx bool skip, relocate;
33 kx asection *sreloc;
33 kx
33 kx *unresolved_reloc_p = false;
33 kx
33 kx skip = false;
33 kx relocate = false;
33 kx
33 kx outrel.r_addend = signed_addend;
33 kx outrel.r_offset =
33 kx _bfd_elf_section_offset (output_bfd, info, input_section,
33 kx rel->r_offset);
33 kx if (outrel.r_offset == (bfd_vma) - 1)
33 kx skip = true;
33 kx else if (outrel.r_offset == (bfd_vma) - 2)
33 kx {
33 kx skip = true;
33 kx relocate = true;
33 kx }
33 kx else if (abs_symbol_p)
33 kx {
33 kx /* Local absolute symbol. */
33 kx skip = (h->forced_local || (h->dynindx == -1));
33 kx relocate = skip;
33 kx }
33 kx
33 kx outrel.r_offset += (input_section->output_section->vma
33 kx + input_section->output_offset);
33 kx
33 kx if (skip)
33 kx memset (&outrel, 0, sizeof outrel);
33 kx else if (h != NULL
33 kx && h->dynindx != -1
33 kx && (!bfd_link_pic (info)
33 kx || !(bfd_link_pie (info) || SYMBOLIC_BIND (info, h))
33 kx || !h->def_regular))
33 kx outrel.r_info = ELFNN_R_INFO (h->dynindx, r_type);
33 kx else
33 kx {
33 kx int symbol;
33 kx
33 kx /* On SVR4-ish systems, the dynamic loader cannot
33 kx relocate the text and data segments independently,
33 kx so the symbol does not matter. */
33 kx symbol = 0;
33 kx relocate = !globals->no_apply_dynamic_relocs;
33 kx outrel.r_info = ELFNN_R_INFO (symbol, AARCH64_R (RELATIVE));
33 kx outrel.r_addend += value;
33 kx }
33 kx
33 kx sreloc = elf_section_data (input_section)->sreloc;
33 kx if (sreloc == NULL || sreloc->contents == NULL)
33 kx return bfd_reloc_notsupported;
33 kx
33 kx loc = sreloc->contents + sreloc->reloc_count++ * RELOC_SIZE (globals);
33 kx bfd_elfNN_swap_reloca_out (output_bfd, &outrel, loc);
33 kx
33 kx if (sreloc->reloc_count * RELOC_SIZE (globals) > sreloc->size)
33 kx {
33 kx /* Sanity to check that we have previously allocated
33 kx sufficient space in the relocation section for the
33 kx number of relocations we actually want to emit. */
33 kx abort ();
33 kx }
33 kx
33 kx /* If this reloc is against an external symbol, we do not want to
33 kx fiddle with the addend. Otherwise, we need to include the symbol
33 kx value so that it becomes an addend for the dynamic reloc. */
33 kx if (!relocate)
33 kx return bfd_reloc_ok;
33 kx
33 kx return _bfd_final_link_relocate (howto, input_bfd, input_section,
33 kx contents, rel->r_offset, value,
33 kx signed_addend);
33 kx }
33 kx else
33 kx value += signed_addend;
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_CALL26:
33 kx case BFD_RELOC_AARCH64_JUMP26:
33 kx {
33 kx asection *splt = globals->root.splt;
33 kx bool via_plt_p =
33 kx splt != NULL && h != NULL && h->plt.offset != (bfd_vma) - 1;
33 kx
33 kx /* A call to an undefined weak symbol is converted to a jump to
33 kx the next instruction unless a PLT entry will be created.
33 kx The jump to the next instruction is optimized as a NOP.
33 kx Do the same for local undefined symbols. */
33 kx if (weak_undef_p && ! via_plt_p)
33 kx {
33 kx bfd_putl32 (INSN_NOP, hit_data);
33 kx return bfd_reloc_ok;
33 kx }
33 kx
33 kx /* If the call goes through a PLT entry, make sure to
33 kx check distance to the right destination address. */
33 kx if (via_plt_p)
33 kx value = (splt->output_section->vma
33 kx + splt->output_offset + h->plt.offset);
33 kx
33 kx /* Check if a stub has to be inserted because the destination
33 kx is too far away. */
33 kx struct elf_aarch64_stub_hash_entry *stub_entry = NULL;
33 kx
33 kx /* If the branch destination is directed to plt stub, "value" will be
33 kx the final destination, otherwise we should plus signed_addend, it may
33 kx contain non-zero value, for example call to local function symbol
33 kx which are turned into "sec_sym + sec_off", and sec_off is kept in
33 kx signed_addend. */
33 kx if (! aarch64_valid_branch_p (via_plt_p ? value : value + signed_addend,
33 kx place))
33 kx /* The target is out of reach, so redirect the branch to
33 kx the local stub for this function. */
33 kx stub_entry = elfNN_aarch64_get_stub_entry (input_section, sym_sec, h,
33 kx rel, globals);
33 kx if (stub_entry != NULL)
33 kx {
33 kx value = (stub_entry->stub_offset
33 kx + stub_entry->stub_sec->output_offset
33 kx + stub_entry->stub_sec->output_section->vma);
33 kx
33 kx /* We have redirected the destination to stub entry address,
33 kx so ignore any addend record in the original rela entry. */
33 kx signed_addend = 0;
33 kx }
33 kx }
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx signed_addend, weak_undef_p);
33 kx *unresolved_reloc_p = false;
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_16_PCREL:
33 kx case BFD_RELOC_AARCH64_32_PCREL:
33 kx case BFD_RELOC_AARCH64_64_PCREL:
33 kx case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
33 kx case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
33 kx case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
33 kx case BFD_RELOC_AARCH64_LD_LO19_PCREL:
33 kx case BFD_RELOC_AARCH64_MOVW_PREL_G0:
33 kx case BFD_RELOC_AARCH64_MOVW_PREL_G0_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_PREL_G1:
33 kx case BFD_RELOC_AARCH64_MOVW_PREL_G1_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_PREL_G2:
33 kx case BFD_RELOC_AARCH64_MOVW_PREL_G2_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_PREL_G3:
33 kx if (bfd_link_pic (info)
33 kx && (input_section->flags & SEC_ALLOC) != 0
33 kx && (input_section->flags & SEC_READONLY) != 0
33 kx && !_bfd_elf_symbol_refs_local_p (h, info, 1))
33 kx {
33 kx int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
33 kx
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: relocation %s against symbol `%s' which may bind "
33 kx "externally can not be used when making a shared object; "
33 kx "recompile with -fPIC"),
33 kx input_bfd, elfNN_aarch64_howto_table[howto_index].name,
33 kx h->root.root.string);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return bfd_reloc_notsupported;
33 kx }
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx signed_addend,
33 kx weak_undef_p);
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_BRANCH19:
33 kx case BFD_RELOC_AARCH64_TSTBR14:
33 kx if (h && h->root.type == bfd_link_hash_undefined)
33 kx {
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: conditional branch to undefined symbol `%s' "
33 kx "not allowed"), input_bfd, h->root.root.string);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return bfd_reloc_notsupported;
33 kx }
33 kx /* Fall through. */
33 kx
33 kx case BFD_RELOC_AARCH64_16:
33 kx #if ARCH_SIZE == 64
33 kx case BFD_RELOC_AARCH64_32:
33 kx #endif
33 kx case BFD_RELOC_AARCH64_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_LDST128_LO12:
33 kx case BFD_RELOC_AARCH64_LDST16_LO12:
33 kx case BFD_RELOC_AARCH64_LDST32_LO12:
33 kx case BFD_RELOC_AARCH64_LDST64_LO12:
33 kx case BFD_RELOC_AARCH64_LDST8_LO12:
33 kx case BFD_RELOC_AARCH64_MOVW_G0:
33 kx case BFD_RELOC_AARCH64_MOVW_G0_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_G0_S:
33 kx case BFD_RELOC_AARCH64_MOVW_G1:
33 kx case BFD_RELOC_AARCH64_MOVW_G1_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_G1_S:
33 kx case BFD_RELOC_AARCH64_MOVW_G2:
33 kx case BFD_RELOC_AARCH64_MOVW_G2_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_G2_S:
33 kx case BFD_RELOC_AARCH64_MOVW_G3:
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx signed_addend, weak_undef_p);
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
33 kx case BFD_RELOC_AARCH64_GOT_LD_PREL19:
33 kx case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
33 kx case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
33 kx case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
33 kx if (globals->root.sgot == NULL)
33 kx BFD_ASSERT (h != NULL);
33 kx
33 kx relative_reloc = false;
33 kx if (h != NULL)
33 kx {
33 kx bfd_vma addend = 0;
33 kx
33 kx /* If a symbol is not dynamic and is not undefined weak, bind it
33 kx locally and generate a RELATIVE relocation under PIC mode.
33 kx
33 kx NOTE: one symbol may be referenced by several relocations, we
33 kx should only generate one RELATIVE relocation for that symbol.
33 kx Therefore, check GOT offset mark first. */
33 kx if (h->dynindx == -1
33 kx && !h->forced_local
33 kx && h->root.type != bfd_link_hash_undefweak
33 kx && bfd_link_pic (info)
33 kx && !symbol_got_offset_mark_p (input_bfd, h, r_symndx))
33 kx relative_reloc = true;
33 kx
33 kx value = aarch64_calculate_got_entry_vma (h, globals, info, value,
33 kx output_bfd,
33 kx unresolved_reloc_p);
33 kx /* Record the GOT entry address which will be used when generating
33 kx RELATIVE relocation. */
33 kx if (relative_reloc)
33 kx got_entry_addr = value;
33 kx
33 kx if (aarch64_relocation_aginst_gp_p (bfd_r_type))
33 kx addend = (globals->root.sgot->output_section->vma
33 kx + globals->root.sgot->output_offset);
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx addend, weak_undef_p);
33 kx }
33 kx else
33 kx {
33 kx bfd_vma addend = 0;
33 kx struct elf_aarch64_local_symbol *locals
33 kx = elf_aarch64_locals (input_bfd);
33 kx
33 kx if (locals == NULL)
33 kx {
33 kx int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: local symbol descriptor table be NULL when applying "
33 kx "relocation %s against local symbol"),
33 kx input_bfd, elfNN_aarch64_howto_table[howto_index].name);
33 kx abort ();
33 kx }
33 kx
33 kx off = symbol_got_offset (input_bfd, h, r_symndx);
33 kx base_got = globals->root.sgot;
33 kx got_entry_addr = (base_got->output_section->vma
33 kx + base_got->output_offset + off);
33 kx
33 kx if (!symbol_got_offset_mark_p (input_bfd, h, r_symndx))
33 kx {
33 kx bfd_put_64 (output_bfd, value, base_got->contents + off);
33 kx
33 kx /* For local symbol, we have done absolute relocation in static
33 kx linking stage. While for shared library, we need to update the
33 kx content of GOT entry according to the shared object's runtime
33 kx base address. So, we need to generate a R_AARCH64_RELATIVE reloc
33 kx for dynamic linker. */
33 kx if (bfd_link_pic (info))
33 kx relative_reloc = true;
33 kx
33 kx symbol_got_offset_mark (input_bfd, h, r_symndx);
33 kx }
33 kx
33 kx /* Update the relocation value to GOT entry addr as we have transformed
33 kx the direct data access into indirect data access through GOT. */
33 kx value = got_entry_addr;
33 kx
33 kx if (aarch64_relocation_aginst_gp_p (bfd_r_type))
33 kx addend = base_got->output_section->vma + base_got->output_offset;
33 kx
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx addend, weak_undef_p);
33 kx }
33 kx
33 kx if (relative_reloc)
33 kx {
33 kx asection *s;
33 kx Elf_Internal_Rela outrel;
33 kx
33 kx s = globals->root.srelgot;
33 kx if (s == NULL)
33 kx abort ();
33 kx
33 kx outrel.r_offset = got_entry_addr;
33 kx outrel.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
33 kx outrel.r_addend = orig_value;
33 kx elf_append_rela (output_bfd, s, &outrel);
33 kx }
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
33 kx case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
33 kx if (globals->root.sgot == NULL)
33 kx return bfd_reloc_notsupported;
33 kx
33 kx value = (symbol_got_offset (input_bfd, h, r_symndx)
33 kx + globals->root.sgot->output_section->vma
33 kx + globals->root.sgot->output_offset);
33 kx
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx 0, weak_undef_p);
33 kx *unresolved_reloc_p = false;
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
33 kx case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
33 kx if (globals->root.sgot == NULL)
33 kx return bfd_reloc_notsupported;
33 kx
33 kx value = symbol_got_offset (input_bfd, h, r_symndx);
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx 0, weak_undef_p);
33 kx *unresolved_reloc_p = false;
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_HI12:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_DTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLD_LDST16_DTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLD_LDST32_DTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLD_LDST64_DTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLD_LDST8_DTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0:
33 kx case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1:
33 kx case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G1_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_MOVW_DTPREL_G2:
33 kx {
33 kx if (!(weak_undef_p || elf_hash_table (info)->tls_sec))
33 kx {
33 kx int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: TLS relocation %s against undefined symbol `%s'"),
33 kx input_bfd, elfNN_aarch64_howto_table[howto_index].name,
33 kx h->root.root.string);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return bfd_reloc_notsupported;
33 kx }
33 kx
33 kx bfd_vma def_value
33 kx = weak_undef_p ? 0 : signed_addend - dtpoff_base (info);
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx def_value, weak_undef_p);
33 kx break;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_HI12:
33 kx case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLE_ADD_TPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLE_LDST16_TPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLE_LDST32_TPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLE_LDST64_TPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12:
33 kx case BFD_RELOC_AARCH64_TLSLE_LDST8_TPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0:
33 kx case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1:
33 kx case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G1_NC:
33 kx case BFD_RELOC_AARCH64_TLSLE_MOVW_TPREL_G2:
33 kx {
33 kx if (!(weak_undef_p || elf_hash_table (info)->tls_sec))
33 kx {
33 kx int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: TLS relocation %s against undefined symbol `%s'"),
33 kx input_bfd, elfNN_aarch64_howto_table[howto_index].name,
33 kx h->root.root.string);
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return bfd_reloc_notsupported;
33 kx }
33 kx
33 kx bfd_vma def_value
33 kx = weak_undef_p ? 0 : signed_addend - tpoff_base (info);
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx def_value, weak_undef_p);
33 kx *unresolved_reloc_p = false;
33 kx break;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
33 kx if (globals->root.sgot == NULL)
33 kx return bfd_reloc_notsupported;
33 kx value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
33 kx + globals->root.sgotplt->output_section->vma
33 kx + globals->root.sgotplt->output_offset
33 kx + globals->sgotplt_jump_table_size);
33 kx
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx 0, weak_undef_p);
33 kx *unresolved_reloc_p = false;
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
33 kx if (globals->root.sgot == NULL)
33 kx return bfd_reloc_notsupported;
33 kx
33 kx value = (symbol_tlsdesc_got_offset (input_bfd, h, r_symndx)
33 kx + globals->root.sgotplt->output_section->vma
33 kx + globals->root.sgotplt->output_offset
33 kx + globals->sgotplt_jump_table_size);
33 kx
33 kx value -= (globals->root.sgot->output_section->vma
33 kx + globals->root.sgot->output_offset);
33 kx
33 kx value = _bfd_aarch64_elf_resolve_relocation (input_bfd, bfd_r_type,
33 kx place, value,
33 kx 0, weak_undef_p);
33 kx *unresolved_reloc_p = false;
33 kx break;
33 kx
33 kx default:
33 kx return bfd_reloc_notsupported;
33 kx }
33 kx
33 kx if (saved_addend)
33 kx *saved_addend = value;
33 kx
33 kx /* Only apply the final relocation in a sequence. */
33 kx if (save_addend)
33 kx return bfd_reloc_continue;
33 kx
33 kx return _bfd_aarch64_elf_put_addend (input_bfd, hit_data, bfd_r_type,
33 kx howto, value);
33 kx }
33 kx
33 kx /* LP64 and ILP32 operates on x- and w-registers respectively.
33 kx Next definitions take into account the difference between
33 kx corresponding machine codes. R means x-register if the target
33 kx arch is LP64, and w-register if the target is ILP32. */
33 kx
33 kx #if ARCH_SIZE == 64
33 kx # define add_R0_R0 (0x91000000)
33 kx # define add_R0_R0_R1 (0x8b000020)
33 kx # define add_R0_R1 (0x91400020)
33 kx # define ldr_R0 (0x58000000)
33 kx # define ldr_R0_mask(i) (i & 0xffffffe0)
33 kx # define ldr_R0_x0 (0xf9400000)
33 kx # define ldr_hw_R0 (0xf2a00000)
33 kx # define movk_R0 (0xf2800000)
33 kx # define movz_R0 (0xd2a00000)
33 kx # define movz_hw_R0 (0xd2c00000)
33 kx #else /*ARCH_SIZE == 32 */
33 kx # define add_R0_R0 (0x11000000)
33 kx # define add_R0_R0_R1 (0x0b000020)
33 kx # define add_R0_R1 (0x11400020)
33 kx # define ldr_R0 (0x18000000)
33 kx # define ldr_R0_mask(i) (i & 0xbfffffe0)
33 kx # define ldr_R0_x0 (0xb9400000)
33 kx # define ldr_hw_R0 (0x72a00000)
33 kx # define movk_R0 (0x72800000)
33 kx # define movz_R0 (0x52a00000)
33 kx # define movz_hw_R0 (0x52c00000)
33 kx #endif
33 kx
33 kx /* Structure to hold payload for _bfd_aarch64_erratum_843419_clear_stub,
33 kx it is used to identify the stub information to reset. */
33 kx
33 kx struct erratum_843419_branch_to_stub_clear_data
33 kx {
33 kx bfd_vma adrp_offset;
33 kx asection *output_section;
33 kx };
33 kx
33 kx /* Clear the erratum information for GEN_ENTRY if the ADRP_OFFSET and
33 kx section inside IN_ARG matches. The clearing is done by setting the
33 kx stub_type to none. */
33 kx
33 kx static bool
33 kx _bfd_aarch64_erratum_843419_clear_stub (struct bfd_hash_entry *gen_entry,
33 kx void *in_arg)
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *stub_entry
33 kx = (struct elf_aarch64_stub_hash_entry *) gen_entry;
33 kx struct erratum_843419_branch_to_stub_clear_data *data
33 kx = (struct erratum_843419_branch_to_stub_clear_data *) in_arg;
33 kx
33 kx if (stub_entry->target_section != data->output_section
33 kx || stub_entry->stub_type != aarch64_stub_erratum_843419_veneer
33 kx || stub_entry->adrp_offset != data->adrp_offset)
33 kx return true;
33 kx
33 kx /* Change the stub type instead of removing the entry, removing from the hash
33 kx table would be slower and we have already reserved the memory for the entry
33 kx so there wouldn't be much gain. Changing the stub also keeps around a
33 kx record of what was there before. */
33 kx stub_entry->stub_type = aarch64_stub_none;
33 kx
33 kx /* We're done and there could have been only one matching stub at that
33 kx particular offset, so abort further traversal. */
33 kx return false;
33 kx }
33 kx
33 kx /* TLS Relaxations may relax an adrp sequence that matches the erratum 843419
33 kx sequence. In this case the erratum no longer applies and we need to remove
33 kx the entry from the pending stub generation. This clears matching adrp insn
33 kx at ADRP_OFFSET in INPUT_SECTION in the stub table defined in GLOBALS. */
33 kx
33 kx static void
33 kx clear_erratum_843419_entry (struct elf_aarch64_link_hash_table *globals,
33 kx bfd_vma adrp_offset, asection *input_section)
33 kx {
33 kx if (globals->fix_erratum_843419 & ERRAT_ADRP)
33 kx {
33 kx struct erratum_843419_branch_to_stub_clear_data data;
33 kx data.adrp_offset = adrp_offset;
33 kx data.output_section = input_section;
33 kx
33 kx bfd_hash_traverse (&globals->stub_hash_table,
33 kx _bfd_aarch64_erratum_843419_clear_stub, &data);
33 kx }
33 kx }
33 kx
33 kx /* Handle TLS relaxations. Relaxing is possible for symbols that use
33 kx R_AARCH64_TLSDESC_ADR_{PAGE, LD64_LO12_NC, ADD_LO12_NC} during a static
33 kx link.
33 kx
33 kx Return bfd_reloc_ok if we're done, bfd_reloc_continue if the caller
33 kx is to then call final_link_relocate. Return other values in the
33 kx case of error. */
33 kx
33 kx static bfd_reloc_status_type
33 kx elfNN_aarch64_tls_relax (struct elf_aarch64_link_hash_table *globals,
33 kx bfd *input_bfd, asection *input_section,
33 kx bfd_byte *contents, Elf_Internal_Rela *rel,
33 kx struct elf_link_hash_entry *h,
33 kx struct bfd_link_info *info)
33 kx {
33 kx bool local_exec = bfd_link_executable (info)
33 kx && SYMBOL_REFERENCES_LOCAL (info, h);
33 kx unsigned int r_type = ELFNN_R_TYPE (rel->r_info);
33 kx unsigned long insn;
33 kx
33 kx BFD_ASSERT (globals && input_bfd && contents && rel);
33 kx
33 kx switch (elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type))
33 kx {
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
33 kx if (local_exec)
33 kx {
33 kx /* GD->LE relaxation:
33 kx adrp x0, :tlsgd:var => movz R0, :tprel_g1:var
33 kx or
33 kx adrp x0, :tlsdesc:var => movz R0, :tprel_g1:var
33 kx
33 kx Where R is x for LP64, and w for ILP32. */
33 kx bfd_putl32 (movz_R0, contents + rel->r_offset);
33 kx /* We have relaxed the adrp into a mov, we may have to clear any
33 kx pending erratum fixes. */
33 kx clear_erratum_843419_entry (globals, rel->r_offset, input_section);
33 kx return bfd_reloc_continue;
33 kx }
33 kx else
33 kx {
33 kx /* GD->IE relaxation:
33 kx adrp x0, :tlsgd:var => adrp x0, :gottprel:var
33 kx or
33 kx adrp x0, :tlsdesc:var => adrp x0, :gottprel:var
33 kx */
33 kx return bfd_reloc_continue;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
33 kx BFD_ASSERT (0);
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
33 kx if (local_exec)
33 kx {
33 kx /* Tiny TLSDESC->LE relaxation:
33 kx ldr x1, :tlsdesc:var => movz R0, #:tprel_g1:var
33 kx adr x0, :tlsdesc:var => movk R0, #:tprel_g0_nc:var
33 kx .tlsdesccall var
33 kx blr x1 => nop
33 kx
33 kx Where R is x for LP64, and w for ILP32. */
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSDESC_ADR_PREL21));
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (TLSDESC_CALL));
33 kx
33 kx rel[1].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
33 kx AARCH64_R (TLSLE_MOVW_TPREL_G0_NC));
33 kx rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx
33 kx bfd_putl32 (movz_R0, contents + rel->r_offset);
33 kx bfd_putl32 (movk_R0, contents + rel->r_offset + 4);
33 kx bfd_putl32 (INSN_NOP, contents + rel->r_offset + 8);
33 kx return bfd_reloc_continue;
33 kx }
33 kx else
33 kx {
33 kx /* Tiny TLSDESC->IE relaxation:
33 kx ldr x1, :tlsdesc:var => ldr x0, :gottprel:var
33 kx adr x0, :tlsdesc:var => nop
33 kx .tlsdesccall var
33 kx blr x1 => nop
33 kx */
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSDESC_ADR_PREL21));
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (TLSDESC_CALL));
33 kx
33 kx rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx
33 kx bfd_putl32 (ldr_R0, contents + rel->r_offset);
33 kx bfd_putl32 (INSN_NOP, contents + rel->r_offset + 4);
33 kx bfd_putl32 (INSN_NOP, contents + rel->r_offset + 8);
33 kx return bfd_reloc_continue;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
33 kx if (local_exec)
33 kx {
33 kx /* Tiny GD->LE relaxation:
33 kx adr x0, :tlsgd:var => mrs x1, tpidr_el0
33 kx bl __tls_get_addr => add R0, R1, #:tprel_hi12:x, lsl #12
33 kx nop => add R0, R0, #:tprel_lo12_nc:x
33 kx
33 kx Where R is x for LP64, and x for Ilp32. */
33 kx
33 kx /* First kill the tls_get_addr reloc on the bl instruction. */
33 kx BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
33 kx
33 kx bfd_putl32 (0xd53bd041, contents + rel->r_offset + 0);
33 kx bfd_putl32 (add_R0_R1, contents + rel->r_offset + 4);
33 kx bfd_putl32 (add_R0_R0, contents + rel->r_offset + 8);
33 kx
33 kx rel[1].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
33 kx AARCH64_R (TLSLE_ADD_TPREL_LO12_NC));
33 kx rel[1].r_offset = rel->r_offset + 8;
33 kx
33 kx /* Move the current relocation to the second instruction in
33 kx the sequence. */
33 kx rel->r_offset += 4;
33 kx rel->r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
33 kx AARCH64_R (TLSLE_ADD_TPREL_HI12));
33 kx return bfd_reloc_continue;
33 kx }
33 kx else
33 kx {
33 kx /* Tiny GD->IE relaxation:
33 kx adr x0, :tlsgd:var => ldr R0, :gottprel:var
33 kx bl __tls_get_addr => mrs x1, tpidr_el0
33 kx nop => add R0, R0, R1
33 kx
33 kx Where R is x for LP64, and w for Ilp32. */
33 kx
33 kx /* First kill the tls_get_addr reloc on the bl instruction. */
33 kx BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
33 kx rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx
33 kx bfd_putl32 (ldr_R0, contents + rel->r_offset);
33 kx bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
33 kx bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 8);
33 kx return bfd_reloc_continue;
33 kx }
33 kx
33 kx #if ARCH_SIZE == 64
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (TLSGD_MOVW_G0_NC));
33 kx BFD_ASSERT (rel->r_offset + 12 == rel[2].r_offset);
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[2].r_info) == AARCH64_R (CALL26));
33 kx
33 kx if (local_exec)
33 kx {
33 kx /* Large GD->LE relaxation:
33 kx movz x0, #:tlsgd_g1:var => movz x0, #:tprel_g2:var, lsl #32
33 kx movk x0, #:tlsgd_g0_nc:var => movk x0, #:tprel_g1_nc:var, lsl #16
33 kx add x0, gp, x0 => movk x0, #:tprel_g0_nc:var
33 kx bl __tls_get_addr => mrs x1, tpidr_el0
33 kx nop => add x0, x0, x1
33 kx */
33 kx rel[2].r_info = ELFNN_R_INFO (ELFNN_R_SYM (rel->r_info),
33 kx AARCH64_R (TLSLE_MOVW_TPREL_G0_NC));
33 kx rel[2].r_offset = rel->r_offset + 8;
33 kx
33 kx bfd_putl32 (movz_hw_R0, contents + rel->r_offset + 0);
33 kx bfd_putl32 (ldr_hw_R0, contents + rel->r_offset + 4);
33 kx bfd_putl32 (movk_R0, contents + rel->r_offset + 8);
33 kx bfd_putl32 (0xd53bd041, contents + rel->r_offset + 12);
33 kx bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 16);
33 kx }
33 kx else
33 kx {
33 kx /* Large GD->IE relaxation:
33 kx movz x0, #:tlsgd_g1:var => movz x0, #:gottprel_g1:var, lsl #16
33 kx movk x0, #:tlsgd_g0_nc:var => movk x0, #:gottprel_g0_nc:var
33 kx add x0, gp, x0 => ldr x0, [gp, x0]
33 kx bl __tls_get_addr => mrs x1, tpidr_el0
33 kx nop => add x0, x0, x1
33 kx */
33 kx rel[2].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx bfd_putl32 (0xd2a80000, contents + rel->r_offset + 0);
33 kx bfd_putl32 (ldr_R0, contents + rel->r_offset + 8);
33 kx bfd_putl32 (0xd53bd041, contents + rel->r_offset + 12);
33 kx bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 16);
33 kx }
33 kx return bfd_reloc_continue;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
33 kx return bfd_reloc_continue;
33 kx #endif
33 kx
33 kx case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
33 kx return bfd_reloc_continue;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
33 kx if (local_exec)
33 kx {
33 kx /* GD->LE relaxation:
33 kx ldr xd, [x0, #:tlsdesc_lo12:var] => movk x0, :tprel_g0_nc:var
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx bfd_putl32 (movk_R0, contents + rel->r_offset);
33 kx return bfd_reloc_continue;
33 kx }
33 kx else
33 kx {
33 kx /* GD->IE relaxation:
33 kx ldr xd, [x0, #:tlsdesc_lo12:var] => ldr R0, [x0, #:gottprel_lo12:var]
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx insn = bfd_getl32 (contents + rel->r_offset);
33 kx bfd_putl32 (ldr_R0_mask (insn), contents + rel->r_offset);
33 kx return bfd_reloc_continue;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
33 kx if (local_exec)
33 kx {
33 kx /* GD->LE relaxation
33 kx add x0, #:tlsgd_lo12:var => movk R0, :tprel_g0_nc:var
33 kx bl __tls_get_addr => mrs x1, tpidr_el0
33 kx nop => add R0, R1, R0
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx
33 kx /* First kill the tls_get_addr reloc on the bl instruction. */
33 kx BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
33 kx rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx
33 kx bfd_putl32 (movk_R0, contents + rel->r_offset);
33 kx bfd_putl32 (0xd53bd041, contents + rel->r_offset + 4);
33 kx bfd_putl32 (add_R0_R0_R1, contents + rel->r_offset + 8);
33 kx return bfd_reloc_continue;
33 kx }
33 kx else
33 kx {
33 kx /* GD->IE relaxation
33 kx ADD x0, #:tlsgd_lo12:var => ldr R0, [x0, #:gottprel_lo12:var]
33 kx BL __tls_get_addr => mrs x1, tpidr_el0
33 kx R_AARCH64_CALL26
33 kx NOP => add R0, R1, R0
33 kx
33 kx Where R is x for lp64 mode, and w for ilp32 mode. */
33 kx
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
33 kx
33 kx /* Remove the relocation on the BL instruction. */
33 kx rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx
33 kx /* We choose to fixup the BL and NOP instructions using the
33 kx offset from the second relocation to allow flexibility in
33 kx scheduling instructions between the ADD and BL. */
33 kx bfd_putl32 (ldr_R0_x0, contents + rel->r_offset);
33 kx bfd_putl32 (0xd53bd041, contents + rel[1].r_offset);
33 kx bfd_putl32 (add_R0_R0_R1, contents + rel[1].r_offset + 4);
33 kx return bfd_reloc_continue;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_CALL:
33 kx /* GD->IE/LE relaxation:
33 kx add x0, x0, #:tlsdesc_lo12:var => nop
33 kx blr xd => nop
33 kx */
33 kx bfd_putl32 (INSN_NOP, contents + rel->r_offset);
33 kx return bfd_reloc_ok;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_LDR:
33 kx if (local_exec)
33 kx {
33 kx /* GD->LE relaxation:
33 kx ldr xd, [gp, xn] => movk R0, #:tprel_g0_nc:var
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx bfd_putl32 (movk_R0, contents + rel->r_offset);
33 kx return bfd_reloc_continue;
33 kx }
33 kx else
33 kx {
33 kx /* GD->IE relaxation:
33 kx ldr xd, [gp, xn] => ldr R0, [gp, xn]
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx insn = bfd_getl32 (contents + rel->r_offset);
33 kx bfd_putl32 (ldr_R0_mask (insn), contents + rel->r_offset);
33 kx return bfd_reloc_ok;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
33 kx /* GD->LE relaxation:
33 kx movk xd, #:tlsdesc_off_g0_nc:var => movk R0, #:tprel_g1_nc:var, lsl #16
33 kx GD->IE relaxation:
33 kx movk xd, #:tlsdesc_off_g0_nc:var => movk Rd, #:gottprel_g0_nc:var
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx if (local_exec)
33 kx bfd_putl32 (ldr_hw_R0, contents + rel->r_offset);
33 kx return bfd_reloc_continue;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
33 kx if (local_exec)
33 kx {
33 kx /* GD->LE relaxation:
33 kx movz xd, #:tlsdesc_off_g1:var => movz R0, #:tprel_g2:var, lsl #32
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx bfd_putl32 (movz_hw_R0, contents + rel->r_offset);
33 kx return bfd_reloc_continue;
33 kx }
33 kx else
33 kx {
33 kx /* GD->IE relaxation:
33 kx movz xd, #:tlsdesc_off_g1:var => movz Rd, #:gottprel_g1:var, lsl #16
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx insn = bfd_getl32 (contents + rel->r_offset);
33 kx bfd_putl32 (movz_R0 | (insn & 0x1f), contents + rel->r_offset);
33 kx return bfd_reloc_continue;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
33 kx /* IE->LE relaxation:
33 kx adrp xd, :gottprel:var => movz Rd, :tprel_g1:var
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx if (local_exec)
33 kx {
33 kx insn = bfd_getl32 (contents + rel->r_offset);
33 kx bfd_putl32 (movz_R0 | (insn & 0x1f), contents + rel->r_offset);
33 kx /* We have relaxed the adrp into a mov, we may have to clear any
33 kx pending erratum fixes. */
33 kx clear_erratum_843419_entry (globals, rel->r_offset, input_section);
33 kx }
33 kx return bfd_reloc_continue;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
33 kx /* IE->LE relaxation:
33 kx ldr xd, [xm, #:gottprel_lo12:var] => movk Rd, :tprel_g0_nc:var
33 kx
33 kx Where R is x for lp64 mode, and w for ILP32 mode. */
33 kx if (local_exec)
33 kx {
33 kx insn = bfd_getl32 (contents + rel->r_offset);
33 kx bfd_putl32 (movk_R0 | (insn & 0x1f), contents + rel->r_offset);
33 kx }
33 kx return bfd_reloc_continue;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
33 kx /* LD->LE relaxation (tiny):
33 kx adr x0, :tlsldm:x => mrs x0, tpidr_el0
33 kx bl __tls_get_addr => add R0, R0, TCB_SIZE
33 kx
33 kx Where R is x for lp64 mode, and w for ilp32 mode. */
33 kx if (local_exec)
33 kx {
33 kx BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
33 kx /* No need of CALL26 relocation for tls_get_addr. */
33 kx rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx bfd_putl32 (0xd53bd040, contents + rel->r_offset + 0);
33 kx bfd_putl32 (add_R0_R0 | (TCB_SIZE << 10),
33 kx contents + rel->r_offset + 4);
33 kx return bfd_reloc_ok;
33 kx }
33 kx return bfd_reloc_continue;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
33 kx /* LD->LE relaxation (small):
33 kx adrp x0, :tlsldm:x => mrs x0, tpidr_el0
33 kx */
33 kx if (local_exec)
33 kx {
33 kx bfd_putl32 (0xd53bd040, contents + rel->r_offset);
33 kx return bfd_reloc_ok;
33 kx }
33 kx return bfd_reloc_continue;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
33 kx /* LD->LE relaxation (small):
33 kx add x0, #:tlsldm_lo12:x => add R0, R0, TCB_SIZE
33 kx bl __tls_get_addr => nop
33 kx
33 kx Where R is x for lp64 mode, and w for ilp32 mode. */
33 kx if (local_exec)
33 kx {
33 kx BFD_ASSERT (rel->r_offset + 4 == rel[1].r_offset);
33 kx BFD_ASSERT (ELFNN_R_TYPE (rel[1].r_info) == AARCH64_R (CALL26));
33 kx /* No need of CALL26 relocation for tls_get_addr. */
33 kx rel[1].r_info = ELFNN_R_INFO (STN_UNDEF, R_AARCH64_NONE);
33 kx bfd_putl32 (add_R0_R0 | (TCB_SIZE << 10),
33 kx contents + rel->r_offset + 0);
33 kx bfd_putl32 (INSN_NOP, contents + rel->r_offset + 4);
33 kx return bfd_reloc_ok;
33 kx }
33 kx return bfd_reloc_continue;
33 kx
33 kx default:
33 kx return bfd_reloc_continue;
33 kx }
33 kx
33 kx return bfd_reloc_ok;
33 kx }
33 kx
33 kx /* Relocate an AArch64 ELF section. */
33 kx
33 kx static int
33 kx elfNN_aarch64_relocate_section (bfd *output_bfd,
33 kx struct bfd_link_info *info,
33 kx bfd *input_bfd,
33 kx asection *input_section,
33 kx bfd_byte *contents,
33 kx Elf_Internal_Rela *relocs,
33 kx Elf_Internal_Sym *local_syms,
33 kx asection **local_sections)
33 kx {
33 kx Elf_Internal_Shdr *symtab_hdr;
33 kx struct elf_link_hash_entry **sym_hashes;
33 kx Elf_Internal_Rela *rel;
33 kx Elf_Internal_Rela *relend;
33 kx const char *name;
33 kx struct elf_aarch64_link_hash_table *globals;
33 kx bool save_addend = false;
33 kx bfd_vma addend = 0;
33 kx
33 kx globals = elf_aarch64_hash_table (info);
33 kx
33 kx symtab_hdr = &elf_symtab_hdr (input_bfd);
33 kx sym_hashes = elf_sym_hashes (input_bfd);
33 kx
33 kx rel = relocs;
33 kx relend = relocs + input_section->reloc_count;
33 kx for (; rel < relend; rel++)
33 kx {
33 kx unsigned int r_type;
33 kx bfd_reloc_code_real_type bfd_r_type;
33 kx bfd_reloc_code_real_type relaxed_bfd_r_type;
33 kx reloc_howto_type *howto;
33 kx unsigned long r_symndx;
33 kx Elf_Internal_Sym *sym;
33 kx asection *sec;
33 kx struct elf_link_hash_entry *h;
33 kx bfd_vma relocation;
33 kx bfd_reloc_status_type r;
33 kx arelent bfd_reloc;
33 kx char sym_type;
33 kx bool unresolved_reloc = false;
33 kx char *error_message = NULL;
33 kx
33 kx r_symndx = ELFNN_R_SYM (rel->r_info);
33 kx r_type = ELFNN_R_TYPE (rel->r_info);
33 kx
33 kx bfd_reloc.howto = elfNN_aarch64_howto_from_type (input_bfd, r_type);
33 kx howto = bfd_reloc.howto;
33 kx
33 kx if (howto == NULL)
33 kx return _bfd_unrecognized_reloc (input_bfd, input_section, r_type);
33 kx
33 kx bfd_r_type = elfNN_aarch64_bfd_reloc_from_howto (howto);
33 kx
33 kx h = NULL;
33 kx sym = NULL;
33 kx sec = NULL;
33 kx
33 kx if (r_symndx < symtab_hdr->sh_info)
33 kx {
33 kx sym = local_syms + r_symndx;
33 kx sym_type = ELFNN_ST_TYPE (sym->st_info);
33 kx sec = local_sections[r_symndx];
33 kx
33 kx /* An object file might have a reference to a local
33 kx undefined symbol. This is a daft object file, but we
33 kx should at least do something about it. */
33 kx if (r_type != R_AARCH64_NONE && r_type != R_AARCH64_NULL
33 kx && bfd_is_und_section (sec)
33 kx && ELF_ST_BIND (sym->st_info) != STB_WEAK)
33 kx (*info->callbacks->undefined_symbol)
33 kx (info, bfd_elf_string_from_elf_section
33 kx (input_bfd, symtab_hdr->sh_link, sym->st_name),
33 kx input_bfd, input_section, rel->r_offset, true);
33 kx
33 kx relocation = _bfd_elf_rela_local_sym (output_bfd, sym, &sec, rel);
33 kx
33 kx /* Relocate against local STT_GNU_IFUNC symbol. */
33 kx if (!bfd_link_relocatable (info)
33 kx && ELF_ST_TYPE (sym->st_info) == STT_GNU_IFUNC)
33 kx {
33 kx h = elfNN_aarch64_get_local_sym_hash (globals, input_bfd,
33 kx rel, false);
33 kx if (h == NULL)
33 kx abort ();
33 kx
33 kx /* Set STT_GNU_IFUNC symbol value. */
33 kx h->root.u.def.value = sym->st_value;
33 kx h->root.u.def.section = sec;
33 kx }
33 kx }
33 kx else
33 kx {
33 kx bool warned, ignored;
33 kx
33 kx RELOC_FOR_GLOBAL_SYMBOL (info, input_bfd, input_section, rel,
33 kx r_symndx, symtab_hdr, sym_hashes,
33 kx h, sec, relocation,
33 kx unresolved_reloc, warned, ignored);
33 kx
33 kx sym_type = h->type;
33 kx }
33 kx
33 kx if (sec != NULL && discarded_section (sec))
33 kx RELOC_AGAINST_DISCARDED_SECTION (info, input_bfd, input_section,
33 kx rel, 1, relend, howto, 0, contents);
33 kx
33 kx if (bfd_link_relocatable (info))
33 kx continue;
33 kx
33 kx if (h != NULL)
33 kx name = h->root.root.string;
33 kx else
33 kx {
33 kx name = (bfd_elf_string_from_elf_section
33 kx (input_bfd, symtab_hdr->sh_link, sym->st_name));
33 kx if (name == NULL || *name == '\0')
33 kx name = bfd_section_name (sec);
33 kx }
33 kx
33 kx if (r_symndx != 0
33 kx && r_type != R_AARCH64_NONE
33 kx && r_type != R_AARCH64_NULL
33 kx && (h == NULL
33 kx || h->root.type == bfd_link_hash_defined
33 kx || h->root.type == bfd_link_hash_defweak)
33 kx && IS_AARCH64_TLS_RELOC (bfd_r_type) != (sym_type == STT_TLS))
33 kx {
33 kx _bfd_error_handler
33 kx ((sym_type == STT_TLS
33 kx /* xgettext:c-format */
33 kx ? _("%pB(%pA+%#" PRIx64 "): %s used with TLS symbol %s")
33 kx /* xgettext:c-format */
33 kx : _("%pB(%pA+%#" PRIx64 "): %s used with non-TLS symbol %s")),
33 kx input_bfd,
33 kx input_section, (uint64_t) rel->r_offset, howto->name, name);
33 kx }
33 kx
33 kx /* We relax only if we can see that there can be a valid transition
33 kx from a reloc type to another.
33 kx We call elfNN_aarch64_final_link_relocate unless we're completely
33 kx done, i.e., the relaxation produced the final output we want. */
33 kx
33 kx relaxed_bfd_r_type = aarch64_tls_transition (input_bfd, info, r_type,
33 kx h, r_symndx);
33 kx if (relaxed_bfd_r_type != bfd_r_type)
33 kx {
33 kx bfd_r_type = relaxed_bfd_r_type;
33 kx howto = elfNN_aarch64_howto_from_bfd_reloc (bfd_r_type);
33 kx BFD_ASSERT (howto != NULL);
33 kx r_type = howto->type;
33 kx r = elfNN_aarch64_tls_relax (globals, input_bfd, input_section,
33 kx contents, rel, h, info);
33 kx unresolved_reloc = 0;
33 kx }
33 kx else
33 kx r = bfd_reloc_continue;
33 kx
33 kx /* There may be multiple consecutive relocations for the
33 kx same offset. In that case we are supposed to treat the
33 kx output of each relocation as the addend for the next. */
33 kx if (rel + 1 < relend
33 kx && rel->r_offset == rel[1].r_offset
33 kx && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NONE
33 kx && ELFNN_R_TYPE (rel[1].r_info) != R_AARCH64_NULL)
33 kx save_addend = true;
33 kx else
33 kx save_addend = false;
33 kx
33 kx if (r == bfd_reloc_continue)
33 kx r = elfNN_aarch64_final_link_relocate (howto, input_bfd, output_bfd,
33 kx input_section, contents, rel,
33 kx relocation, info, sec,
33 kx h, &unresolved_reloc,
33 kx save_addend, &addend, sym);
33 kx
33 kx switch (elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type))
33 kx {
33 kx case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
33 kx if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
33 kx {
33 kx bool need_relocs = false;
33 kx bfd_byte *loc;
33 kx int indx;
33 kx bfd_vma off;
33 kx
33 kx off = symbol_got_offset (input_bfd, h, r_symndx);
33 kx indx = h && h->dynindx != -1 ? h->dynindx : 0;
33 kx
33 kx need_relocs =
33 kx (!bfd_link_executable (info) || indx != 0) &&
33 kx (h == NULL
33 kx || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
33 kx || h->root.type != bfd_link_hash_undefweak);
33 kx
33 kx BFD_ASSERT (globals->root.srelgot != NULL);
33 kx
33 kx if (need_relocs)
33 kx {
33 kx Elf_Internal_Rela rela;
33 kx rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPMOD));
33 kx rela.r_addend = 0;
33 kx rela.r_offset = globals->root.sgot->output_section->vma +
33 kx globals->root.sgot->output_offset + off;
33 kx
33 kx
33 kx loc = globals->root.srelgot->contents;
33 kx loc += globals->root.srelgot->reloc_count++
33 kx * RELOC_SIZE (htab);
33 kx bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
33 kx
33 kx bfd_reloc_code_real_type real_type =
33 kx elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
33 kx
33 kx if (real_type == BFD_RELOC_AARCH64_TLSLD_ADR_PREL21
33 kx || real_type == BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21
33 kx || real_type == BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC)
33 kx {
33 kx /* For local dynamic, don't generate DTPREL in any case.
33 kx Initialize the DTPREL slot into zero, so we get module
33 kx base address when invoke runtime TLS resolver. */
33 kx bfd_put_NN (output_bfd, 0,
33 kx globals->root.sgot->contents + off
33 kx + GOT_ENTRY_SIZE);
33 kx }
33 kx else if (indx == 0)
33 kx {
33 kx bfd_put_NN (output_bfd,
33 kx relocation - dtpoff_base (info),
33 kx globals->root.sgot->contents + off
33 kx + GOT_ENTRY_SIZE);
33 kx }
33 kx else
33 kx {
33 kx /* This TLS symbol is global. We emit a
33 kx relocation to fixup the tls offset at load
33 kx time. */
33 kx rela.r_info =
33 kx ELFNN_R_INFO (indx, AARCH64_R (TLS_DTPREL));
33 kx rela.r_addend = 0;
33 kx rela.r_offset =
33 kx (globals->root.sgot->output_section->vma
33 kx + globals->root.sgot->output_offset + off
33 kx + GOT_ENTRY_SIZE);
33 kx
33 kx loc = globals->root.srelgot->contents;
33 kx loc += globals->root.srelgot->reloc_count++
33 kx * RELOC_SIZE (globals);
33 kx bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
33 kx bfd_put_NN (output_bfd, (bfd_vma) 0,
33 kx globals->root.sgot->contents + off
33 kx + GOT_ENTRY_SIZE);
33 kx }
33 kx }
33 kx else
33 kx {
33 kx bfd_put_NN (output_bfd, (bfd_vma) 1,
33 kx globals->root.sgot->contents + off);
33 kx bfd_put_NN (output_bfd,
33 kx relocation - dtpoff_base (info),
33 kx globals->root.sgot->contents + off
33 kx + GOT_ENTRY_SIZE);
33 kx }
33 kx
33 kx symbol_got_offset_mark (input_bfd, h, r_symndx);
33 kx }
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSIE_LDNN_GOTTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
33 kx case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
33 kx if (! symbol_got_offset_mark_p (input_bfd, h, r_symndx))
33 kx {
33 kx bool need_relocs = false;
33 kx bfd_byte *loc;
33 kx int indx;
33 kx bfd_vma off;
33 kx
33 kx off = symbol_got_offset (input_bfd, h, r_symndx);
33 kx
33 kx indx = h && h->dynindx != -1 ? h->dynindx : 0;
33 kx
33 kx need_relocs =
33 kx (!bfd_link_executable (info) || indx != 0) &&
33 kx (h == NULL
33 kx || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
33 kx || h->root.type != bfd_link_hash_undefweak);
33 kx
33 kx BFD_ASSERT (globals->root.srelgot != NULL);
33 kx
33 kx if (need_relocs)
33 kx {
33 kx Elf_Internal_Rela rela;
33 kx
33 kx if (indx == 0)
33 kx rela.r_addend = relocation - dtpoff_base (info);
33 kx else
33 kx rela.r_addend = 0;
33 kx
33 kx rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLS_TPREL));
33 kx rela.r_offset = globals->root.sgot->output_section->vma +
33 kx globals->root.sgot->output_offset + off;
33 kx
33 kx loc = globals->root.srelgot->contents;
33 kx loc += globals->root.srelgot->reloc_count++
33 kx * RELOC_SIZE (htab);
33 kx
33 kx bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
33 kx
33 kx bfd_put_NN (output_bfd, rela.r_addend,
33 kx globals->root.sgot->contents + off);
33 kx }
33 kx else
33 kx bfd_put_NN (output_bfd, relocation - tpoff_base (info),
33 kx globals->root.sgot->contents + off);
33 kx
33 kx symbol_got_offset_mark (input_bfd, h, r_symndx);
33 kx }
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LDNN_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
33 kx if (! symbol_tlsdesc_got_offset_mark_p (input_bfd, h, r_symndx))
33 kx {
33 kx bool need_relocs = false;
33 kx int indx = h && h->dynindx != -1 ? h->dynindx : 0;
33 kx bfd_vma off = symbol_tlsdesc_got_offset (input_bfd, h, r_symndx);
33 kx
33 kx need_relocs = (h == NULL
33 kx || ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
33 kx || h->root.type != bfd_link_hash_undefweak);
33 kx
33 kx BFD_ASSERT (globals->root.srelgot != NULL);
33 kx BFD_ASSERT (globals->root.sgot != NULL);
33 kx
33 kx if (need_relocs)
33 kx {
33 kx bfd_byte *loc;
33 kx Elf_Internal_Rela rela;
33 kx rela.r_info = ELFNN_R_INFO (indx, AARCH64_R (TLSDESC));
33 kx
33 kx rela.r_addend = 0;
33 kx rela.r_offset = (globals->root.sgotplt->output_section->vma
33 kx + globals->root.sgotplt->output_offset
33 kx + off + globals->sgotplt_jump_table_size);
33 kx
33 kx if (indx == 0)
33 kx rela.r_addend = relocation - dtpoff_base (info);
33 kx
33 kx /* Allocate the next available slot in the PLT reloc
33 kx section to hold our R_AARCH64_TLSDESC, the next
33 kx available slot is determined from reloc_count,
33 kx which we step. But note, reloc_count was
33 kx artifically moved down while allocating slots for
33 kx real PLT relocs such that all of the PLT relocs
33 kx will fit above the initial reloc_count and the
33 kx extra stuff will fit below. */
33 kx loc = globals->root.srelplt->contents;
33 kx loc += globals->root.srelplt->reloc_count++
33 kx * RELOC_SIZE (globals);
33 kx
33 kx bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
33 kx
33 kx bfd_put_NN (output_bfd, (bfd_vma) 0,
33 kx globals->root.sgotplt->contents + off +
33 kx globals->sgotplt_jump_table_size);
33 kx bfd_put_NN (output_bfd, (bfd_vma) 0,
33 kx globals->root.sgotplt->contents + off +
33 kx globals->sgotplt_jump_table_size +
33 kx GOT_ENTRY_SIZE);
33 kx }
33 kx
33 kx symbol_tlsdesc_got_offset_mark (input_bfd, h, r_symndx);
33 kx }
33 kx break;
33 kx default:
33 kx break;
33 kx }
33 kx
33 kx /* Dynamic relocs are not propagated for SEC_DEBUGGING sections
33 kx because such sections are not SEC_ALLOC and thus ld.so will
33 kx not process them. */
33 kx if (unresolved_reloc
33 kx && !((input_section->flags & SEC_DEBUGGING) != 0
33 kx && h->def_dynamic)
33 kx && _bfd_elf_section_offset (output_bfd, info, input_section,
33 kx +rel->r_offset) != (bfd_vma) - 1)
33 kx {
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB(%pA+%#" PRIx64 "): "
33 kx "unresolvable %s relocation against symbol `%s'"),
33 kx input_bfd, input_section, (uint64_t) rel->r_offset, howto->name,
33 kx h->root.root.string);
33 kx return false;
33 kx }
33 kx
33 kx if (r != bfd_reloc_ok && r != bfd_reloc_continue)
33 kx {
33 kx bfd_reloc_code_real_type real_r_type
33 kx = elfNN_aarch64_bfd_reloc_from_type (input_bfd, r_type);
33 kx
33 kx switch (r)
33 kx {
33 kx case bfd_reloc_overflow:
33 kx (*info->callbacks->reloc_overflow)
33 kx (info, (h ? &h->root : NULL), name, howto->name, (bfd_vma) 0,
33 kx input_bfd, input_section, rel->r_offset);
33 kx if (real_r_type == BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15
33 kx || real_r_type == BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14)
33 kx {
33 kx (*info->callbacks->warning)
33 kx (info,
33 kx _("too many GOT entries for -fpic, "
33 kx "please recompile with -fPIC"),
33 kx name, input_bfd, input_section, rel->r_offset);
33 kx return false;
33 kx }
33 kx /* Overflow can occur when a variable is referenced with a type
33 kx that has a larger alignment than the type with which it was
33 kx declared. eg:
33 kx file1.c: extern int foo; int a (void) { return foo; }
33 kx file2.c: char bar, foo, baz;
33 kx If the variable is placed into a data section at an offset
33 kx that is incompatible with the larger alignment requirement
33 kx overflow will occur. (Strictly speaking this is not overflow
33 kx but rather an alignment problem, but the bfd_reloc_ error
33 kx enum does not have a value to cover that situation).
33 kx
33 kx Try to catch this situation here and provide a more helpful
33 kx error message to the user. */
33 kx if (addend & (((bfd_vma) 1 << howto->rightshift) - 1)
33 kx /* FIXME: Are we testing all of the appropriate reloc
33 kx types here ? */
33 kx && (real_r_type == BFD_RELOC_AARCH64_LD_LO19_PCREL
33 kx || real_r_type == BFD_RELOC_AARCH64_LDST16_LO12
33 kx || real_r_type == BFD_RELOC_AARCH64_LDST32_LO12
33 kx || real_r_type == BFD_RELOC_AARCH64_LDST64_LO12
33 kx || real_r_type == BFD_RELOC_AARCH64_LDST128_LO12))
33 kx {
33 kx info->callbacks->warning
33 kx (info, _("one possible cause of this error is that the \
33 kx symbol is being referenced in the indicated code as if it had a larger \
33 kx alignment than was declared where it was defined"),
33 kx name, input_bfd, input_section, rel->r_offset);
33 kx }
33 kx break;
33 kx
33 kx case bfd_reloc_undefined:
33 kx (*info->callbacks->undefined_symbol)
33 kx (info, name, input_bfd, input_section, rel->r_offset, true);
33 kx break;
33 kx
33 kx case bfd_reloc_outofrange:
33 kx error_message = _("out of range");
33 kx goto common_error;
33 kx
33 kx case bfd_reloc_notsupported:
33 kx error_message = _("unsupported relocation");
33 kx goto common_error;
33 kx
33 kx case bfd_reloc_dangerous:
33 kx /* error_message should already be set. */
33 kx goto common_error;
33 kx
33 kx default:
33 kx error_message = _("unknown error");
33 kx /* Fall through. */
33 kx
33 kx common_error:
33 kx BFD_ASSERT (error_message != NULL);
33 kx (*info->callbacks->reloc_dangerous)
33 kx (info, error_message, input_bfd, input_section, rel->r_offset);
33 kx break;
33 kx }
33 kx }
33 kx
33 kx if (!save_addend)
33 kx addend = 0;
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Set the right machine number. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_object_p (bfd *abfd)
33 kx {
33 kx #if ARCH_SIZE == 32
33 kx bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64_ilp32);
33 kx #else
33 kx bfd_default_set_arch_mach (abfd, bfd_arch_aarch64, bfd_mach_aarch64);
33 kx #endif
33 kx return true;
33 kx }
33 kx
33 kx /* Function to keep AArch64 specific flags in the ELF header. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_set_private_flags (bfd *abfd, flagword flags)
33 kx {
33 kx if (elf_flags_init (abfd) && elf_elfheader (abfd)->e_flags != flags)
33 kx {
33 kx }
33 kx else
33 kx {
33 kx elf_elfheader (abfd)->e_flags = flags;
33 kx elf_flags_init (abfd) = true;
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Merge backend specific data from an object file to the output
33 kx object file when linking. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_merge_private_bfd_data (bfd *ibfd, struct bfd_link_info *info)
33 kx {
33 kx bfd *obfd = info->output_bfd;
33 kx flagword out_flags;
33 kx flagword in_flags;
33 kx bool flags_compatible = true;
33 kx asection *sec;
33 kx
33 kx /* Check if we have the same endianess. */
33 kx if (!_bfd_generic_verify_endian_match (ibfd, info))
33 kx return false;
33 kx
33 kx if (!is_aarch64_elf (ibfd) || !is_aarch64_elf (obfd))
33 kx return true;
33 kx
33 kx /* The input BFD must have had its flags initialised. */
33 kx /* The following seems bogus to me -- The flags are initialized in
33 kx the assembler but I don't think an elf_flags_init field is
33 kx written into the object. */
33 kx /* BFD_ASSERT (elf_flags_init (ibfd)); */
33 kx
33 kx in_flags = elf_elfheader (ibfd)->e_flags;
33 kx out_flags = elf_elfheader (obfd)->e_flags;
33 kx
33 kx if (!elf_flags_init (obfd))
33 kx {
33 kx /* If the input is the default architecture and had the default
33 kx flags then do not bother setting the flags for the output
33 kx architecture, instead allow future merges to do this. If no
33 kx future merges ever set these flags then they will retain their
33 kx uninitialised values, which surprise surprise, correspond
33 kx to the default values. */
33 kx if (bfd_get_arch_info (ibfd)->the_default
33 kx && elf_elfheader (ibfd)->e_flags == 0)
33 kx return true;
33 kx
33 kx elf_flags_init (obfd) = true;
33 kx elf_elfheader (obfd)->e_flags = in_flags;
33 kx
33 kx if (bfd_get_arch (obfd) == bfd_get_arch (ibfd)
33 kx && bfd_get_arch_info (obfd)->the_default)
33 kx return bfd_set_arch_mach (obfd, bfd_get_arch (ibfd),
33 kx bfd_get_mach (ibfd));
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Identical flags must be compatible. */
33 kx if (in_flags == out_flags)
33 kx return true;
33 kx
33 kx /* Check to see if the input BFD actually contains any sections. If
33 kx not, its flags may not have been initialised either, but it
33 kx cannot actually cause any incompatiblity. Do not short-circuit
33 kx dynamic objects; their section list may be emptied by
33 kx elf_link_add_object_symbols.
33 kx
33 kx Also check to see if there are no code sections in the input.
33 kx In this case there is no need to check for code specific flags.
33 kx XXX - do we need to worry about floating-point format compatability
33 kx in data sections ? */
33 kx if (!(ibfd->flags & DYNAMIC))
33 kx {
33 kx bool null_input_bfd = true;
33 kx bool only_data_sections = true;
33 kx
33 kx for (sec = ibfd->sections; sec != NULL; sec = sec->next)
33 kx {
33 kx if ((bfd_section_flags (sec)
33 kx & (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
33 kx == (SEC_LOAD | SEC_CODE | SEC_HAS_CONTENTS))
33 kx only_data_sections = false;
33 kx
33 kx null_input_bfd = false;
33 kx break;
33 kx }
33 kx
33 kx if (null_input_bfd || only_data_sections)
33 kx return true;
33 kx }
33 kx
33 kx return flags_compatible;
33 kx }
33 kx
33 kx /* Display the flags field. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_print_private_bfd_data (bfd *abfd, void *ptr)
33 kx {
33 kx FILE *file = (FILE *) ptr;
33 kx unsigned long flags;
33 kx
33 kx BFD_ASSERT (abfd != NULL && ptr != NULL);
33 kx
33 kx /* Print normal ELF private data. */
33 kx _bfd_elf_print_private_bfd_data (abfd, ptr);
33 kx
33 kx flags = elf_elfheader (abfd)->e_flags;
33 kx /* Ignore init flag - it may not be set, despite the flags field
33 kx containing valid data. */
33 kx
33 kx /* xgettext:c-format */
33 kx fprintf (file, _("private flags = 0x%lx:"), elf_elfheader (abfd)->e_flags);
33 kx
33 kx if (flags)
33 kx fprintf (file, _(" <Unrecognised flag bits set>"));
33 kx
33 kx fputc ('\n', file);
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Return true if we need copy relocation against EH. */
33 kx
33 kx static bool
33 kx need_copy_relocation_p (struct elf_aarch64_link_hash_entry *eh)
33 kx {
33 kx struct elf_dyn_relocs *p;
33 kx asection *s;
33 kx
33 kx for (p = eh->root.dyn_relocs; p != NULL; p = p->next)
33 kx {
33 kx /* If there is any pc-relative reference, we need to keep copy relocation
33 kx to avoid propagating the relocation into runtime that current glibc
33 kx does not support. */
33 kx if (p->pc_count)
33 kx return true;
33 kx
33 kx s = p->sec->output_section;
33 kx /* Need copy relocation if it's against read-only section. */
33 kx if (s != NULL && (s->flags & SEC_READONLY) != 0)
33 kx return true;
33 kx }
33 kx
33 kx return false;
33 kx }
33 kx
33 kx /* Adjust a symbol defined by a dynamic object and referenced by a
33 kx regular object. The current definition is in some section of the
33 kx dynamic object, but we're not including those sections. We have to
33 kx change the definition to something the rest of the link can
33 kx understand. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_adjust_dynamic_symbol (struct bfd_link_info *info,
33 kx struct elf_link_hash_entry *h)
33 kx {
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx asection *s, *srel;
33 kx
33 kx /* If this is a function, put it in the procedure linkage table. We
33 kx will fill in the contents of the procedure linkage table later,
33 kx when we know the address of the .got section. */
33 kx if (h->type == STT_FUNC || h->type == STT_GNU_IFUNC || h->needs_plt)
33 kx {
33 kx if (h->plt.refcount <= 0
33 kx || (h->type != STT_GNU_IFUNC
33 kx && (SYMBOL_CALLS_LOCAL (info, h)
33 kx || (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
33 kx && h->root.type == bfd_link_hash_undefweak))))
33 kx {
33 kx /* This case can occur if we saw a CALL26 reloc in
33 kx an input file, but the symbol wasn't referred to
33 kx by a dynamic object or all references were
33 kx garbage collected. In which case we can end up
33 kx resolving. */
33 kx h->plt.offset = (bfd_vma) - 1;
33 kx h->needs_plt = 0;
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx else
33 kx /* Otherwise, reset to -1. */
33 kx h->plt.offset = (bfd_vma) - 1;
33 kx
33 kx
33 kx /* If this is a weak symbol, and there is a real definition, the
33 kx processor independent code will have arranged for us to see the
33 kx real definition first, and we can just use the same value. */
33 kx if (h->is_weakalias)
33 kx {
33 kx struct elf_link_hash_entry *def = weakdef (h);
33 kx BFD_ASSERT (def->root.type == bfd_link_hash_defined);
33 kx h->root.u.def.section = def->root.u.def.section;
33 kx h->root.u.def.value = def->root.u.def.value;
33 kx if (ELIMINATE_COPY_RELOCS || info->nocopyreloc)
33 kx h->non_got_ref = def->non_got_ref;
33 kx return true;
33 kx }
33 kx
33 kx /* If we are creating a shared library, we must presume that the
33 kx only references to the symbol are via the global offset table.
33 kx For such cases we need not do anything here; the relocations will
33 kx be handled correctly by relocate_section. */
33 kx if (bfd_link_pic (info))
33 kx return true;
33 kx
33 kx /* If there are no references to this symbol that do not use the
33 kx GOT, we don't need to generate a copy reloc. */
33 kx if (!h->non_got_ref)
33 kx return true;
33 kx
33 kx /* If -z nocopyreloc was given, we won't generate them either. */
33 kx if (info->nocopyreloc)
33 kx {
33 kx h->non_got_ref = 0;
33 kx return true;
33 kx }
33 kx
33 kx if (ELIMINATE_COPY_RELOCS)
33 kx {
33 kx struct elf_aarch64_link_hash_entry *eh;
33 kx /* If we don't find any dynamic relocs in read-only sections, then
33 kx we'll be keeping the dynamic relocs and avoiding the copy reloc. */
33 kx eh = (struct elf_aarch64_link_hash_entry *) h;
33 kx if (!need_copy_relocation_p (eh))
33 kx {
33 kx h->non_got_ref = 0;
33 kx return true;
33 kx }
33 kx }
33 kx
33 kx /* We must allocate the symbol in our .dynbss section, which will
33 kx become part of the .bss section of the executable. There will be
33 kx an entry for this symbol in the .dynsym section. The dynamic
33 kx object will contain position independent code, so all references
33 kx from the dynamic object to this symbol will go through the global
33 kx offset table. The dynamic linker will use the .dynsym entry to
33 kx determine the address it must put in the global offset table, so
33 kx both the dynamic object and the regular object will refer to the
33 kx same memory location for the variable. */
33 kx
33 kx htab = elf_aarch64_hash_table (info);
33 kx
33 kx /* We must generate a R_AARCH64_COPY reloc to tell the dynamic linker
33 kx to copy the initial value out of the dynamic object and into the
33 kx runtime process image. */
33 kx if ((h->root.u.def.section->flags & SEC_READONLY) != 0)
33 kx {
33 kx s = htab->root.sdynrelro;
33 kx srel = htab->root.sreldynrelro;
33 kx }
33 kx else
33 kx {
33 kx s = htab->root.sdynbss;
33 kx srel = htab->root.srelbss;
33 kx }
33 kx if ((h->root.u.def.section->flags & SEC_ALLOC) != 0 && h->size != 0)
33 kx {
33 kx srel->size += RELOC_SIZE (htab);
33 kx h->needs_copy = 1;
33 kx }
33 kx
33 kx return _bfd_elf_adjust_dynamic_copy (info, h, s);
33 kx
33 kx }
33 kx
33 kx static bool
33 kx elfNN_aarch64_allocate_local_symbols (bfd *abfd, unsigned number)
33 kx {
33 kx struct elf_aarch64_local_symbol *locals;
33 kx locals = elf_aarch64_locals (abfd);
33 kx if (locals == NULL)
33 kx {
33 kx locals = (struct elf_aarch64_local_symbol *)
33 kx bfd_zalloc (abfd, number * sizeof (struct elf_aarch64_local_symbol));
33 kx if (locals == NULL)
33 kx return false;
33 kx elf_aarch64_locals (abfd) = locals;
33 kx }
33 kx return true;
33 kx }
33 kx
33 kx /* Create the .got section to hold the global offset table. */
33 kx
33 kx static bool
33 kx aarch64_elf_create_got_section (bfd *abfd, struct bfd_link_info *info)
33 kx {
33 kx const struct elf_backend_data *bed = get_elf_backend_data (abfd);
33 kx flagword flags;
33 kx asection *s;
33 kx struct elf_link_hash_entry *h;
33 kx struct elf_link_hash_table *htab = elf_hash_table (info);
33 kx
33 kx /* This function may be called more than once. */
33 kx if (htab->sgot != NULL)
33 kx return true;
33 kx
33 kx flags = bed->dynamic_sec_flags;
33 kx
33 kx s = bfd_make_section_anyway_with_flags (abfd,
33 kx (bed->rela_plts_and_copies_p
33 kx ? ".rela.got" : ".rel.got"),
33 kx (bed->dynamic_sec_flags
33 kx | SEC_READONLY));
33 kx if (s == NULL
33 kx || !bfd_set_section_alignment (s, bed->s->log_file_align))
33 kx return false;
33 kx htab->srelgot = s;
33 kx
33 kx s = bfd_make_section_anyway_with_flags (abfd, ".got", flags);
33 kx if (s == NULL
33 kx || !bfd_set_section_alignment (s, bed->s->log_file_align))
33 kx return false;
33 kx htab->sgot = s;
33 kx htab->sgot->size += GOT_ENTRY_SIZE;
33 kx
33 kx if (bed->want_got_sym)
33 kx {
33 kx /* Define the symbol _GLOBAL_OFFSET_TABLE_ at the start of the .got
33 kx (or .got.plt) section. We don't do this in the linker script
33 kx because we don't want to define the symbol if we are not creating
33 kx a global offset table. */
33 kx h = _bfd_elf_define_linkage_sym (abfd, info, s,
33 kx "_GLOBAL_OFFSET_TABLE_");
33 kx elf_hash_table (info)->hgot = h;
33 kx if (h == NULL)
33 kx return false;
33 kx }
33 kx
33 kx if (bed->want_got_plt)
33 kx {
33 kx s = bfd_make_section_anyway_with_flags (abfd, ".got.plt", flags);
33 kx if (s == NULL
33 kx || !bfd_set_section_alignment (s, bed->s->log_file_align))
33 kx return false;
33 kx htab->sgotplt = s;
33 kx }
33 kx
33 kx /* The first bit of the global offset table is the header. */
33 kx s->size += bed->got_header_size;
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Look through the relocs for a section during the first phase. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_check_relocs (bfd *abfd, struct bfd_link_info *info,
33 kx asection *sec, const Elf_Internal_Rela *relocs)
33 kx {
33 kx Elf_Internal_Shdr *symtab_hdr;
33 kx struct elf_link_hash_entry **sym_hashes;
33 kx const Elf_Internal_Rela *rel;
33 kx const Elf_Internal_Rela *rel_end;
33 kx asection *sreloc;
33 kx
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx
33 kx if (bfd_link_relocatable (info))
33 kx return true;
33 kx
33 kx BFD_ASSERT (is_aarch64_elf (abfd));
33 kx
33 kx htab = elf_aarch64_hash_table (info);
33 kx sreloc = NULL;
33 kx
33 kx symtab_hdr = &elf_symtab_hdr (abfd);
33 kx sym_hashes = elf_sym_hashes (abfd);
33 kx
33 kx rel_end = relocs + sec->reloc_count;
33 kx for (rel = relocs; rel < rel_end; rel++)
33 kx {
33 kx struct elf_link_hash_entry *h;
33 kx unsigned int r_symndx;
33 kx unsigned int r_type;
33 kx bfd_reloc_code_real_type bfd_r_type;
33 kx Elf_Internal_Sym *isym;
33 kx
33 kx r_symndx = ELFNN_R_SYM (rel->r_info);
33 kx r_type = ELFNN_R_TYPE (rel->r_info);
33 kx
33 kx if (r_symndx >= NUM_SHDR_ENTRIES (symtab_hdr))
33 kx {
33 kx /* xgettext:c-format */
33 kx _bfd_error_handler (_("%pB: bad symbol index: %d"), abfd, r_symndx);
33 kx return false;
33 kx }
33 kx
33 kx if (r_symndx < symtab_hdr->sh_info)
33 kx {
33 kx /* A local symbol. */
33 kx isym = bfd_sym_from_r_symndx (&htab->root.sym_cache,
33 kx abfd, r_symndx);
33 kx if (isym == NULL)
33 kx return false;
33 kx
33 kx /* Check relocation against local STT_GNU_IFUNC symbol. */
33 kx if (ELF_ST_TYPE (isym->st_info) == STT_GNU_IFUNC)
33 kx {
33 kx h = elfNN_aarch64_get_local_sym_hash (htab, abfd, rel,
33 kx true);
33 kx if (h == NULL)
33 kx return false;
33 kx
33 kx /* Fake a STT_GNU_IFUNC symbol. */
33 kx h->type = STT_GNU_IFUNC;
33 kx h->def_regular = 1;
33 kx h->ref_regular = 1;
33 kx h->forced_local = 1;
33 kx h->root.type = bfd_link_hash_defined;
33 kx }
33 kx else
33 kx h = NULL;
33 kx }
33 kx else
33 kx {
33 kx h = sym_hashes[r_symndx - symtab_hdr->sh_info];
33 kx while (h->root.type == bfd_link_hash_indirect
33 kx || h->root.type == bfd_link_hash_warning)
33 kx h = (struct elf_link_hash_entry *) h->root.u.i.link;
33 kx }
33 kx
33 kx /* Could be done earlier, if h were already available. */
33 kx bfd_r_type = aarch64_tls_transition (abfd, info, r_type, h, r_symndx);
33 kx
33 kx if (h != NULL)
33 kx {
33 kx /* If a relocation refers to _GLOBAL_OFFSET_TABLE_, create the .got.
33 kx This shows up in particular in an R_AARCH64_PREL64 in large model
33 kx when calculating the pc-relative address to .got section which is
33 kx used to initialize the gp register. */
33 kx if (h->root.root.string
33 kx && strcmp (h->root.root.string, "_GLOBAL_OFFSET_TABLE_") == 0)
33 kx {
33 kx if (htab->root.dynobj == NULL)
33 kx htab->root.dynobj = abfd;
33 kx
33 kx if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
33 kx return false;
33 kx
33 kx BFD_ASSERT (h == htab->root.hgot);
33 kx }
33 kx
33 kx /* Create the ifunc sections for static executables. If we
33 kx never see an indirect function symbol nor we are building
33 kx a static executable, those sections will be empty and
33 kx won't appear in output. */
33 kx switch (bfd_r_type)
33 kx {
33 kx default:
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
33 kx case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
33 kx case BFD_RELOC_AARCH64_CALL26:
33 kx case BFD_RELOC_AARCH64_GOT_LD_PREL19:
33 kx case BFD_RELOC_AARCH64_JUMP26:
33 kx case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
33 kx case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
33 kx case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
33 kx case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
33 kx case BFD_RELOC_AARCH64_NN:
33 kx if (htab->root.dynobj == NULL)
33 kx htab->root.dynobj = abfd;
33 kx if (!_bfd_elf_create_ifunc_sections (htab->root.dynobj, info))
33 kx return false;
33 kx break;
33 kx }
33 kx
33 kx /* It is referenced by a non-shared object. */
33 kx h->ref_regular = 1;
33 kx }
33 kx
33 kx switch (bfd_r_type)
33 kx {
33 kx case BFD_RELOC_AARCH64_16:
33 kx #if ARCH_SIZE == 64
33 kx case BFD_RELOC_AARCH64_32:
33 kx #endif
33 kx if (bfd_link_pic (info) && (sec->flags & SEC_ALLOC) != 0)
33 kx {
33 kx if (h != NULL
33 kx /* This is an absolute symbol. It represents a value instead
33 kx of an address. */
33 kx && (bfd_is_abs_symbol (&h->root)
33 kx /* This is an undefined symbol. */
33 kx || h->root.type == bfd_link_hash_undefined))
33 kx break;
33 kx
33 kx /* For local symbols, defined global symbols in a non-ABS section,
33 kx it is assumed that the value is an address. */
33 kx int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: relocation %s against `%s' can not be used when making "
33 kx "a shared object"),
33 kx abfd, elfNN_aarch64_howto_table[howto_index].name,
33 kx (h) ? h->root.root.string : "a local symbol");
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return false;
33 kx }
33 kx else
33 kx break;
33 kx
33 kx case BFD_RELOC_AARCH64_MOVW_G0_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_G1_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_G2_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_G3:
33 kx if (bfd_link_pic (info))
33 kx {
33 kx int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
33 kx _bfd_error_handler
33 kx /* xgettext:c-format */
33 kx (_("%pB: relocation %s against `%s' can not be used when making "
33 kx "a shared object; recompile with -fPIC"),
33 kx abfd, elfNN_aarch64_howto_table[howto_index].name,
33 kx (h) ? h->root.root.string : "a local symbol");
33 kx bfd_set_error (bfd_error_bad_value);
33 kx return false;
33 kx }
33 kx /* Fall through. */
33 kx
33 kx case BFD_RELOC_AARCH64_16_PCREL:
33 kx case BFD_RELOC_AARCH64_32_PCREL:
33 kx case BFD_RELOC_AARCH64_64_PCREL:
33 kx case BFD_RELOC_AARCH64_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_ADR_HI21_NC_PCREL:
33 kx case BFD_RELOC_AARCH64_ADR_HI21_PCREL:
33 kx case BFD_RELOC_AARCH64_ADR_LO21_PCREL:
33 kx case BFD_RELOC_AARCH64_LDST128_LO12:
33 kx case BFD_RELOC_AARCH64_LDST16_LO12:
33 kx case BFD_RELOC_AARCH64_LDST32_LO12:
33 kx case BFD_RELOC_AARCH64_LDST64_LO12:
33 kx case BFD_RELOC_AARCH64_LDST8_LO12:
33 kx case BFD_RELOC_AARCH64_LD_LO19_PCREL:
33 kx if (h == NULL || bfd_link_pic (info))
33 kx break;
33 kx /* Fall through. */
33 kx
33 kx case BFD_RELOC_AARCH64_NN:
33 kx
33 kx /* We don't need to handle relocs into sections not going into
33 kx the "real" output. */
33 kx if ((sec->flags & SEC_ALLOC) == 0)
33 kx break;
33 kx
33 kx if (h != NULL)
33 kx {
33 kx if (!bfd_link_pic (info))
33 kx h->non_got_ref = 1;
33 kx
33 kx h->plt.refcount += 1;
33 kx h->pointer_equality_needed = 1;
33 kx }
33 kx
33 kx /* No need to do anything if we're not creating a shared
33 kx object. */
33 kx if (!(bfd_link_pic (info)
33 kx /* If on the other hand, we are creating an executable, we
33 kx may need to keep relocations for symbols satisfied by a
33 kx dynamic library if we manage to avoid copy relocs for the
33 kx symbol.
33 kx
33 kx NOTE: Currently, there is no support of copy relocs
33 kx elimination on pc-relative relocation types, because there is
33 kx no dynamic relocation support for them in glibc. We still
33 kx record the dynamic symbol reference for them. This is
33 kx because one symbol may be referenced by both absolute
33 kx relocation (for example, BFD_RELOC_AARCH64_NN) and
33 kx pc-relative relocation. We need full symbol reference
33 kx information to make correct decision later in
33 kx elfNN_aarch64_adjust_dynamic_symbol. */
33 kx || (ELIMINATE_COPY_RELOCS
33 kx && !bfd_link_pic (info)
33 kx && h != NULL
33 kx && (h->root.type == bfd_link_hash_defweak
33 kx || !h->def_regular))))
33 kx break;
33 kx
33 kx {
33 kx struct elf_dyn_relocs *p;
33 kx struct elf_dyn_relocs **head;
33 kx int howto_index = bfd_r_type - BFD_RELOC_AARCH64_RELOC_START;
33 kx
33 kx /* We must copy these reloc types into the output file.
33 kx Create a reloc section in dynobj and make room for
33 kx this reloc. */
33 kx if (sreloc == NULL)
33 kx {
33 kx if (htab->root.dynobj == NULL)
33 kx htab->root.dynobj = abfd;
33 kx
33 kx sreloc = _bfd_elf_make_dynamic_reloc_section
33 kx (sec, htab->root.dynobj, LOG_FILE_ALIGN, abfd, /*rela? */ true);
33 kx
33 kx if (sreloc == NULL)
33 kx return false;
33 kx }
33 kx
33 kx /* If this is a global symbol, we count the number of
33 kx relocations we need for this symbol. */
33 kx if (h != NULL)
33 kx {
33 kx head = &h->dyn_relocs;
33 kx }
33 kx else
33 kx {
33 kx /* Track dynamic relocs needed for local syms too.
33 kx We really need local syms available to do this
33 kx easily. Oh well. */
33 kx
33 kx asection *s;
33 kx void **vpp;
33 kx
33 kx isym = bfd_sym_from_r_symndx (&htab->root.sym_cache,
33 kx abfd, r_symndx);
33 kx if (isym == NULL)
33 kx return false;
33 kx
33 kx s = bfd_section_from_elf_index (abfd, isym->st_shndx);
33 kx if (s == NULL)
33 kx s = sec;
33 kx
33 kx /* Beware of type punned pointers vs strict aliasing
33 kx rules. */
33 kx vpp = &(elf_section_data (s)->local_dynrel);
33 kx head = (struct elf_dyn_relocs **) vpp;
33 kx }
33 kx
33 kx p = *head;
33 kx if (p == NULL || p->sec != sec)
33 kx {
33 kx size_t amt = sizeof *p;
33 kx p = ((struct elf_dyn_relocs *)
33 kx bfd_zalloc (htab->root.dynobj, amt));
33 kx if (p == NULL)
33 kx return false;
33 kx p->next = *head;
33 kx *head = p;
33 kx p->sec = sec;
33 kx }
33 kx
33 kx p->count += 1;
33 kx
33 kx if (elfNN_aarch64_howto_table[howto_index].pc_relative)
33 kx p->pc_count += 1;
33 kx }
33 kx break;
33 kx
33 kx /* RR: We probably want to keep a consistency check that
33 kx there are no dangling GOT_PAGE relocs. */
33 kx case BFD_RELOC_AARCH64_ADR_GOT_PAGE:
33 kx case BFD_RELOC_AARCH64_GOT_LD_PREL19:
33 kx case BFD_RELOC_AARCH64_LD32_GOTPAGE_LO14:
33 kx case BFD_RELOC_AARCH64_LD32_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_LD64_GOTOFF_LO15:
33 kx case BFD_RELOC_AARCH64_LD64_GOTPAGE_LO15:
33 kx case BFD_RELOC_AARCH64_LD64_GOT_LO12_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_MOVW_GOTOFF_G1:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADD_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSDESC_ADR_PREL21:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD32_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD64_LO12:
33 kx case BFD_RELOC_AARCH64_TLSDESC_LD_PREL19:
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSDESC_OFF_G1:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSGD_ADR_PREL21:
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSGD_MOVW_G1:
33 kx case BFD_RELOC_AARCH64_TLSIE_ADR_GOTTPREL_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD32_GOTTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD64_GOTTPREL_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_LD_GOTTPREL_PREL19:
33 kx case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G0_NC:
33 kx case BFD_RELOC_AARCH64_TLSIE_MOVW_GOTTPREL_G1:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADD_LO12_NC:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PAGE21:
33 kx case BFD_RELOC_AARCH64_TLSLD_ADR_PREL21:
33 kx {
33 kx unsigned got_type;
33 kx unsigned old_got_type;
33 kx
33 kx got_type = aarch64_reloc_got_type (bfd_r_type);
33 kx
33 kx if (h)
33 kx {
33 kx h->got.refcount += 1;
33 kx old_got_type = elf_aarch64_hash_entry (h)->got_type;
33 kx }
33 kx else
33 kx {
33 kx struct elf_aarch64_local_symbol *locals;
33 kx
33 kx if (!elfNN_aarch64_allocate_local_symbols
33 kx (abfd, symtab_hdr->sh_info))
33 kx return false;
33 kx
33 kx locals = elf_aarch64_locals (abfd);
33 kx BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
33 kx locals[r_symndx].got_refcount += 1;
33 kx old_got_type = locals[r_symndx].got_type;
33 kx }
33 kx
33 kx /* If a variable is accessed with both general dynamic TLS
33 kx methods, two slots may be created. */
33 kx if (GOT_TLS_GD_ANY_P (old_got_type) && GOT_TLS_GD_ANY_P (got_type))
33 kx got_type |= old_got_type;
33 kx
33 kx /* We will already have issued an error message if there
33 kx is a TLS/non-TLS mismatch, based on the symbol type.
33 kx So just combine any TLS types needed. */
33 kx if (old_got_type != GOT_UNKNOWN && old_got_type != GOT_NORMAL
33 kx && got_type != GOT_NORMAL)
33 kx got_type |= old_got_type;
33 kx
33 kx /* If the symbol is accessed by both IE and GD methods, we
33 kx are able to relax. Turn off the GD flag, without
33 kx messing up with any other kind of TLS types that may be
33 kx involved. */
33 kx if ((got_type & GOT_TLS_IE) && GOT_TLS_GD_ANY_P (got_type))
33 kx got_type &= ~ (GOT_TLSDESC_GD | GOT_TLS_GD);
33 kx
33 kx if (old_got_type != got_type)
33 kx {
33 kx if (h != NULL)
33 kx elf_aarch64_hash_entry (h)->got_type = got_type;
33 kx else
33 kx {
33 kx struct elf_aarch64_local_symbol *locals;
33 kx locals = elf_aarch64_locals (abfd);
33 kx BFD_ASSERT (r_symndx < symtab_hdr->sh_info);
33 kx locals[r_symndx].got_type = got_type;
33 kx }
33 kx }
33 kx
33 kx if (htab->root.dynobj == NULL)
33 kx htab->root.dynobj = abfd;
33 kx if (! aarch64_elf_create_got_section (htab->root.dynobj, info))
33 kx return false;
33 kx break;
33 kx }
33 kx
33 kx case BFD_RELOC_AARCH64_CALL26:
33 kx case BFD_RELOC_AARCH64_JUMP26:
33 kx /* If this is a local symbol then we resolve it
33 kx directly without creating a PLT entry. */
33 kx if (h == NULL)
33 kx continue;
33 kx
33 kx h->needs_plt = 1;
33 kx if (h->plt.refcount <= 0)
33 kx h->plt.refcount = 1;
33 kx else
33 kx h->plt.refcount += 1;
33 kx break;
33 kx
33 kx default:
33 kx break;
33 kx }
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Treat mapping symbols as special target symbols. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_is_target_special_symbol (bfd *abfd ATTRIBUTE_UNUSED,
33 kx asymbol *sym)
33 kx {
33 kx return bfd_is_aarch64_special_symbol_name (sym->name,
33 kx BFD_AARCH64_SPECIAL_SYM_TYPE_ANY);
33 kx }
33 kx
33 kx /* If the ELF symbol SYM might be a function in SEC, return the
33 kx function size and set *CODE_OFF to the function's entry point,
33 kx otherwise return zero. */
33 kx
33 kx static bfd_size_type
33 kx elfNN_aarch64_maybe_function_sym (const asymbol *sym, asection *sec,
33 kx bfd_vma *code_off)
33 kx {
33 kx bfd_size_type size;
33 kx elf_symbol_type * elf_sym = (elf_symbol_type *) sym;
33 kx
33 kx if ((sym->flags & (BSF_SECTION_SYM | BSF_FILE | BSF_OBJECT
33 kx | BSF_THREAD_LOCAL | BSF_RELC | BSF_SRELC)) != 0
33 kx || sym->section != sec)
33 kx return 0;
33 kx
33 kx size = (sym->flags & BSF_SYNTHETIC) ? 0 : elf_sym->internal_elf_sym.st_size;
33 kx
33 kx if (!(sym->flags & BSF_SYNTHETIC))
33 kx switch (ELF_ST_TYPE (elf_sym->internal_elf_sym.st_info))
33 kx {
33 kx case STT_NOTYPE:
33 kx /* Ignore symbols created by the annobin plugin for gcc and clang.
33 kx These symbols are hidden, local, notype and have a size of 0. */
33 kx if (size == 0
33 kx && sym->flags & BSF_LOCAL
33 kx && ELF_ST_VISIBILITY (elf_sym->internal_elf_sym.st_other) == STV_HIDDEN)
33 kx return 0;
33 kx /* Fall through. */
33 kx case STT_FUNC:
33 kx /* FIXME: Allow STT_GNU_IFUNC as well ? */
33 kx break;
33 kx default:
33 kx return 0;
33 kx }
33 kx
33 kx if ((sym->flags & BSF_LOCAL)
33 kx && bfd_is_aarch64_special_symbol_name (sym->name,
33 kx BFD_AARCH64_SPECIAL_SYM_TYPE_ANY))
33 kx return 0;
33 kx
33 kx *code_off = sym->value;
33 kx
33 kx /* Do not return 0 for the function's size. */
33 kx return size ? size : 1;
33 kx }
33 kx
33 kx static bool
33 kx elfNN_aarch64_find_inliner_info (bfd *abfd,
33 kx const char **filename_ptr,
33 kx const char **functionname_ptr,
33 kx unsigned int *line_ptr)
33 kx {
33 kx bool found;
33 kx found = _bfd_dwarf2_find_inliner_info
33 kx (abfd, filename_ptr,
33 kx functionname_ptr, line_ptr, &elf_tdata (abfd)->dwarf2_find_line_info);
33 kx return found;
33 kx }
33 kx
33 kx
33 kx static bool
33 kx elfNN_aarch64_init_file_header (bfd *abfd, struct bfd_link_info *link_info)
33 kx {
33 kx Elf_Internal_Ehdr *i_ehdrp; /* ELF file header, internal form. */
33 kx
33 kx if (!_bfd_elf_init_file_header (abfd, link_info))
33 kx return false;
33 kx
33 kx i_ehdrp = elf_elfheader (abfd);
33 kx i_ehdrp->e_ident[EI_ABIVERSION] = AARCH64_ELF_ABI_VERSION;
33 kx return true;
33 kx }
33 kx
33 kx static enum elf_reloc_type_class
33 kx elfNN_aarch64_reloc_type_class (const struct bfd_link_info *info ATTRIBUTE_UNUSED,
33 kx const asection *rel_sec ATTRIBUTE_UNUSED,
33 kx const Elf_Internal_Rela *rela)
33 kx {
33 kx struct elf_aarch64_link_hash_table *htab = elf_aarch64_hash_table (info);
33 kx
33 kx if (htab->root.dynsym != NULL
33 kx && htab->root.dynsym->contents != NULL)
33 kx {
33 kx /* Check relocation against STT_GNU_IFUNC symbol if there are
33 kx dynamic symbols. */
33 kx bfd *abfd = info->output_bfd;
33 kx const struct elf_backend_data *bed = get_elf_backend_data (abfd);
33 kx unsigned long r_symndx = ELFNN_R_SYM (rela->r_info);
33 kx if (r_symndx != STN_UNDEF)
33 kx {
33 kx Elf_Internal_Sym sym;
33 kx if (!bed->s->swap_symbol_in (abfd,
33 kx (htab->root.dynsym->contents
33 kx + r_symndx * bed->s->sizeof_sym),
33 kx 0, &sym))
33 kx {
33 kx /* xgettext:c-format */
33 kx _bfd_error_handler (_("%pB symbol number %lu references"
33 kx " nonexistent SHT_SYMTAB_SHNDX section"),
33 kx abfd, r_symndx);
33 kx /* Ideally an error class should be returned here. */
33 kx }
33 kx else if (ELF_ST_TYPE (sym.st_info) == STT_GNU_IFUNC)
33 kx return reloc_class_ifunc;
33 kx }
33 kx }
33 kx
33 kx switch ((int) ELFNN_R_TYPE (rela->r_info))
33 kx {
33 kx case AARCH64_R (IRELATIVE):
33 kx return reloc_class_ifunc;
33 kx case AARCH64_R (RELATIVE):
33 kx return reloc_class_relative;
33 kx case AARCH64_R (JUMP_SLOT):
33 kx return reloc_class_plt;
33 kx case AARCH64_R (COPY):
33 kx return reloc_class_copy;
33 kx default:
33 kx return reloc_class_normal;
33 kx }
33 kx }
33 kx
33 kx /* Handle an AArch64 specific section when reading an object file. This is
33 kx called when bfd_section_from_shdr finds a section with an unknown
33 kx type. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_section_from_shdr (bfd *abfd,
33 kx Elf_Internal_Shdr *hdr,
33 kx const char *name, int shindex)
33 kx {
33 kx /* There ought to be a place to keep ELF backend specific flags, but
33 kx at the moment there isn't one. We just keep track of the
33 kx sections by their name, instead. Fortunately, the ABI gives
33 kx names for all the AArch64 specific sections, so we will probably get
33 kx away with this. */
33 kx switch (hdr->sh_type)
33 kx {
33 kx case SHT_AARCH64_ATTRIBUTES:
33 kx break;
33 kx
33 kx default:
33 kx return false;
33 kx }
33 kx
33 kx if (!_bfd_elf_make_section_from_shdr (abfd, hdr, name, shindex))
33 kx return false;
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Process any AArch64-specific program segment types. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_section_from_phdr (bfd *abfd ATTRIBUTE_UNUSED,
33 kx Elf_Internal_Phdr *hdr,
33 kx int hdr_index ATTRIBUTE_UNUSED,
33 kx const char *name ATTRIBUTE_UNUSED)
33 kx {
33 kx /* Right now we only handle the PT_AARCH64_MEMTAG_MTE segment type. */
33 kx if (hdr == NULL || hdr->p_type != PT_AARCH64_MEMTAG_MTE)
33 kx return false;
33 kx
33 kx if (hdr->p_filesz > 0)
33 kx {
33 kx /* Sections created from memory tag p_type's are always named
33 kx "memtag". This makes it easier for tools (for example, GDB)
33 kx to find them. */
33 kx asection *newsect = bfd_make_section_anyway (abfd, "memtag");
33 kx
33 kx if (newsect == NULL)
33 kx return false;
33 kx
33 kx unsigned int opb = bfd_octets_per_byte (abfd, NULL);
33 kx
33 kx /* p_vaddr holds the original start address of the tagged memory
33 kx range. */
33 kx newsect->vma = hdr->p_vaddr / opb;
33 kx
33 kx /* p_filesz holds the storage size of the packed tags. */
33 kx newsect->size = hdr->p_filesz;
33 kx newsect->filepos = hdr->p_offset;
33 kx
33 kx /* p_memsz holds the size of the memory range that contains tags. The
33 kx section's rawsize field is reused for this purpose. */
33 kx newsect->rawsize = hdr->p_memsz;
33 kx
33 kx /* Make sure the section's flags has SEC_HAS_CONTENTS set, otherwise
33 kx BFD will return all zeroes when attempting to get contents from this
33 kx section. */
33 kx newsect->flags |= SEC_HAS_CONTENTS;
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Implements the bfd_elf_modify_headers hook for aarch64. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_modify_headers (bfd *abfd,
33 kx struct bfd_link_info *info)
33 kx {
33 kx struct elf_segment_map *m;
33 kx unsigned int segment_count = 0;
33 kx Elf_Internal_Phdr *p;
33 kx
33 kx for (m = elf_seg_map (abfd); m != NULL; m = m->next, segment_count++)
33 kx {
33 kx /* We are only interested in the memory tag segment that will be dumped
33 kx to a core file. If we have no memory tags or this isn't a core file we
33 kx are dealing with, just skip this segment. */
33 kx if (m->p_type != PT_AARCH64_MEMTAG_MTE
33 kx || bfd_get_format (abfd) != bfd_core)
33 kx continue;
33 kx
33 kx /* For memory tag segments in core files, the size of the file contents
33 kx is smaller than the size of the memory range. Adjust the memory size
33 kx accordingly. The real memory size is held in the section's rawsize
33 kx field. */
33 kx if (m->count > 0)
33 kx {
33 kx p = elf_tdata (abfd)->phdr;
33 kx p += m->idx;
33 kx p->p_memsz = m->sections[0]->rawsize;
33 kx p->p_flags = 0;
33 kx p->p_paddr = 0;
33 kx p->p_align = 0;
33 kx }
33 kx }
33 kx
33 kx /* Give the generic code a chance to handle the headers. */
33 kx return _bfd_elf_modify_headers (abfd, info);
33 kx }
33 kx
33 kx /* A structure used to record a list of sections, independently
33 kx of the next and prev fields in the asection structure. */
33 kx typedef struct section_list
33 kx {
33 kx asection *sec;
33 kx struct section_list *next;
33 kx struct section_list *prev;
33 kx }
33 kx section_list;
33 kx
33 kx /* Unfortunately we need to keep a list of sections for which
33 kx an _aarch64_elf_section_data structure has been allocated. This
33 kx is because it is possible for functions like elfNN_aarch64_write_section
33 kx to be called on a section which has had an elf_data_structure
33 kx allocated for it (and so the used_by_bfd field is valid) but
33 kx for which the AArch64 extended version of this structure - the
33 kx _aarch64_elf_section_data structure - has not been allocated. */
33 kx static section_list *sections_with_aarch64_elf_section_data = NULL;
33 kx
33 kx static void
33 kx record_section_with_aarch64_elf_section_data (asection *sec)
33 kx {
33 kx struct section_list *entry;
33 kx
33 kx entry = bfd_malloc (sizeof (*entry));
33 kx if (entry == NULL)
33 kx return;
33 kx entry->sec = sec;
33 kx entry->next = sections_with_aarch64_elf_section_data;
33 kx entry->prev = NULL;
33 kx if (entry->next != NULL)
33 kx entry->next->prev = entry;
33 kx sections_with_aarch64_elf_section_data = entry;
33 kx }
33 kx
33 kx static struct section_list *
33 kx find_aarch64_elf_section_entry (asection *sec)
33 kx {
33 kx struct section_list *entry;
33 kx static struct section_list *last_entry = NULL;
33 kx
33 kx /* This is a short cut for the typical case where the sections are added
33 kx to the sections_with_aarch64_elf_section_data list in forward order and
33 kx then looked up here in backwards order. This makes a real difference
33 kx to the ld-srec/sec64k.exp linker test. */
33 kx entry = sections_with_aarch64_elf_section_data;
33 kx if (last_entry != NULL)
33 kx {
33 kx if (last_entry->sec == sec)
33 kx entry = last_entry;
33 kx else if (last_entry->next != NULL && last_entry->next->sec == sec)
33 kx entry = last_entry->next;
33 kx }
33 kx
33 kx for (; entry; entry = entry->next)
33 kx if (entry->sec == sec)
33 kx break;
33 kx
33 kx if (entry)
33 kx /* Record the entry prior to this one - it is the entry we are
33 kx most likely to want to locate next time. Also this way if we
33 kx have been called from
33 kx unrecord_section_with_aarch64_elf_section_data () we will not
33 kx be caching a pointer that is about to be freed. */
33 kx last_entry = entry->prev;
33 kx
33 kx return entry;
33 kx }
33 kx
33 kx static void
33 kx unrecord_section_with_aarch64_elf_section_data (asection *sec)
33 kx {
33 kx struct section_list *entry;
33 kx
33 kx entry = find_aarch64_elf_section_entry (sec);
33 kx
33 kx if (entry)
33 kx {
33 kx if (entry->prev != NULL)
33 kx entry->prev->next = entry->next;
33 kx if (entry->next != NULL)
33 kx entry->next->prev = entry->prev;
33 kx if (entry == sections_with_aarch64_elf_section_data)
33 kx sections_with_aarch64_elf_section_data = entry->next;
33 kx free (entry);
33 kx }
33 kx }
33 kx
33 kx
33 kx typedef struct
33 kx {
33 kx void *finfo;
33 kx struct bfd_link_info *info;
33 kx asection *sec;
33 kx int sec_shndx;
33 kx int (*func) (void *, const char *, Elf_Internal_Sym *,
33 kx asection *, struct elf_link_hash_entry *);
33 kx } output_arch_syminfo;
33 kx
33 kx enum map_symbol_type
33 kx {
33 kx AARCH64_MAP_INSN,
33 kx AARCH64_MAP_DATA
33 kx };
33 kx
33 kx
33 kx /* Output a single mapping symbol. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_output_map_sym (output_arch_syminfo *osi,
33 kx enum map_symbol_type type, bfd_vma offset)
33 kx {
33 kx static const char *names[2] = { "$x", "$d" };
33 kx Elf_Internal_Sym sym;
33 kx
33 kx sym.st_value = (osi->sec->output_section->vma
33 kx + osi->sec->output_offset + offset);
33 kx sym.st_size = 0;
33 kx sym.st_other = 0;
33 kx sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_NOTYPE);
33 kx sym.st_shndx = osi->sec_shndx;
33 kx return osi->func (osi->finfo, names[type], &sym, osi->sec, NULL) == 1;
33 kx }
33 kx
33 kx /* Output a single local symbol for a generated stub. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_output_stub_sym (output_arch_syminfo *osi, const char *name,
33 kx bfd_vma offset, bfd_vma size)
33 kx {
33 kx Elf_Internal_Sym sym;
33 kx
33 kx sym.st_value = (osi->sec->output_section->vma
33 kx + osi->sec->output_offset + offset);
33 kx sym.st_size = size;
33 kx sym.st_other = 0;
33 kx sym.st_info = ELF_ST_INFO (STB_LOCAL, STT_FUNC);
33 kx sym.st_shndx = osi->sec_shndx;
33 kx return osi->func (osi->finfo, name, &sym, osi->sec, NULL) == 1;
33 kx }
33 kx
33 kx static bool
33 kx aarch64_map_one_stub (struct bfd_hash_entry *gen_entry, void *in_arg)
33 kx {
33 kx struct elf_aarch64_stub_hash_entry *stub_entry;
33 kx asection *stub_sec;
33 kx bfd_vma addr;
33 kx char *stub_name;
33 kx output_arch_syminfo *osi;
33 kx
33 kx /* Massage our args to the form they really have. */
33 kx stub_entry = (struct elf_aarch64_stub_hash_entry *) gen_entry;
33 kx osi = (output_arch_syminfo *) in_arg;
33 kx
33 kx stub_sec = stub_entry->stub_sec;
33 kx
33 kx /* Ensure this stub is attached to the current section being
33 kx processed. */
33 kx if (stub_sec != osi->sec)
33 kx return true;
33 kx
33 kx addr = (bfd_vma) stub_entry->stub_offset;
33 kx
33 kx stub_name = stub_entry->output_name;
33 kx
33 kx switch (stub_entry->stub_type)
33 kx {
33 kx case aarch64_stub_adrp_branch:
33 kx if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
33 kx sizeof (aarch64_adrp_branch_stub)))
33 kx return false;
33 kx if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
33 kx return false;
33 kx break;
33 kx case aarch64_stub_long_branch:
33 kx if (!elfNN_aarch64_output_stub_sym
33 kx (osi, stub_name, addr, sizeof (aarch64_long_branch_stub)))
33 kx return false;
33 kx if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
33 kx return false;
33 kx if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_DATA, addr + 16))
33 kx return false;
33 kx break;
33 kx case aarch64_stub_erratum_835769_veneer:
33 kx if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
33 kx sizeof (aarch64_erratum_835769_stub)))
33 kx return false;
33 kx if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
33 kx return false;
33 kx break;
33 kx case aarch64_stub_erratum_843419_veneer:
33 kx if (!elfNN_aarch64_output_stub_sym (osi, stub_name, addr,
33 kx sizeof (aarch64_erratum_843419_stub)))
33 kx return false;
33 kx if (!elfNN_aarch64_output_map_sym (osi, AARCH64_MAP_INSN, addr))
33 kx return false;
33 kx break;
33 kx case aarch64_stub_none:
33 kx break;
33 kx
33 kx default:
33 kx abort ();
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Output mapping symbols for linker generated sections. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_output_arch_local_syms (bfd *output_bfd,
33 kx struct bfd_link_info *info,
33 kx void *finfo,
33 kx int (*func) (void *, const char *,
33 kx Elf_Internal_Sym *,
33 kx asection *,
33 kx struct elf_link_hash_entry
33 kx *))
33 kx {
33 kx output_arch_syminfo osi;
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx
33 kx if (info->strip == strip_all
33 kx && !info->emitrelocations
33 kx && !bfd_link_relocatable (info))
33 kx return true;
33 kx
33 kx htab = elf_aarch64_hash_table (info);
33 kx
33 kx osi.finfo = finfo;
33 kx osi.info = info;
33 kx osi.func = func;
33 kx
33 kx /* Long calls stubs. */
33 kx if (htab->stub_bfd && htab->stub_bfd->sections)
33 kx {
33 kx asection *stub_sec;
33 kx
33 kx for (stub_sec = htab->stub_bfd->sections;
33 kx stub_sec != NULL; stub_sec = stub_sec->next)
33 kx {
33 kx /* Ignore non-stub sections. */
33 kx if (!strstr (stub_sec->name, STUB_SUFFIX))
33 kx continue;
33 kx
33 kx osi.sec = stub_sec;
33 kx
33 kx osi.sec_shndx = _bfd_elf_section_from_bfd_section
33 kx (output_bfd, osi.sec->output_section);
33 kx
33 kx /* The first instruction in a stub is always a branch. */
33 kx if (!elfNN_aarch64_output_map_sym (&osi, AARCH64_MAP_INSN, 0))
33 kx return false;
33 kx
33 kx bfd_hash_traverse (&htab->stub_hash_table, aarch64_map_one_stub,
33 kx &osi);
33 kx }
33 kx }
33 kx
33 kx /* Finally, output mapping symbols for the PLT. */
33 kx if (!htab->root.splt || htab->root.splt->size == 0)
33 kx return true;
33 kx
33 kx osi.sec_shndx = _bfd_elf_section_from_bfd_section
33 kx (output_bfd, htab->root.splt->output_section);
33 kx osi.sec = htab->root.splt;
33 kx
33 kx elfNN_aarch64_output_map_sym (&osi, AARCH64_MAP_INSN, 0);
33 kx
33 kx return true;
33 kx
33 kx }
33 kx
33 kx /* Allocate target specific section data. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_new_section_hook (bfd *abfd, asection *sec)
33 kx {
33 kx if (!sec->used_by_bfd)
33 kx {
33 kx _aarch64_elf_section_data *sdata;
33 kx size_t amt = sizeof (*sdata);
33 kx
33 kx sdata = bfd_zalloc (abfd, amt);
33 kx if (sdata == NULL)
33 kx return false;
33 kx sec->used_by_bfd = sdata;
33 kx }
33 kx
33 kx record_section_with_aarch64_elf_section_data (sec);
33 kx
33 kx return _bfd_elf_new_section_hook (abfd, sec);
33 kx }
33 kx
33 kx
33 kx static void
33 kx unrecord_section_via_map_over_sections (bfd *abfd ATTRIBUTE_UNUSED,
33 kx asection *sec,
33 kx void *ignore ATTRIBUTE_UNUSED)
33 kx {
33 kx unrecord_section_with_aarch64_elf_section_data (sec);
33 kx }
33 kx
33 kx static bool
33 kx elfNN_aarch64_close_and_cleanup (bfd *abfd)
33 kx {
33 kx if (abfd->sections)
33 kx bfd_map_over_sections (abfd,
33 kx unrecord_section_via_map_over_sections, NULL);
33 kx
33 kx return _bfd_elf_close_and_cleanup (abfd);
33 kx }
33 kx
33 kx static bool
33 kx elfNN_aarch64_bfd_free_cached_info (bfd *abfd)
33 kx {
33 kx if (abfd->sections)
33 kx bfd_map_over_sections (abfd,
33 kx unrecord_section_via_map_over_sections, NULL);
33 kx
33 kx return _bfd_free_cached_info (abfd);
33 kx }
33 kx
33 kx /* Create dynamic sections. This is different from the ARM backend in that
33 kx the got, plt, gotplt and their relocation sections are all created in the
33 kx standard part of the bfd elf backend. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_create_dynamic_sections (bfd *dynobj,
33 kx struct bfd_link_info *info)
33 kx {
33 kx /* We need to create .got section. */
33 kx if (!aarch64_elf_create_got_section (dynobj, info))
33 kx return false;
33 kx
33 kx return _bfd_elf_create_dynamic_sections (dynobj, info);
33 kx }
33 kx
33 kx
33 kx /* Allocate space in .plt, .got and associated reloc sections for
33 kx dynamic relocs. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_allocate_dynrelocs (struct elf_link_hash_entry *h, void *inf)
33 kx {
33 kx struct bfd_link_info *info;
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx struct elf_aarch64_link_hash_entry *eh;
33 kx struct elf_dyn_relocs *p;
33 kx
33 kx /* An example of a bfd_link_hash_indirect symbol is versioned
33 kx symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
33 kx -> __gxx_personality_v0(bfd_link_hash_defined)
33 kx
33 kx There is no need to process bfd_link_hash_indirect symbols here
33 kx because we will also be presented with the concrete instance of
33 kx the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
33 kx called to copy all relevant data from the generic to the concrete
33 kx symbol instance. */
33 kx if (h->root.type == bfd_link_hash_indirect)
33 kx return true;
33 kx
33 kx if (h->root.type == bfd_link_hash_warning)
33 kx h = (struct elf_link_hash_entry *) h->root.u.i.link;
33 kx
33 kx info = (struct bfd_link_info *) inf;
33 kx htab = elf_aarch64_hash_table (info);
33 kx
33 kx /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
33 kx here if it is defined and referenced in a non-shared object. */
33 kx if (h->type == STT_GNU_IFUNC
33 kx && h->def_regular)
33 kx return true;
33 kx else if (htab->root.dynamic_sections_created && h->plt.refcount > 0)
33 kx {
33 kx /* Make sure this symbol is output as a dynamic symbol.
33 kx Undefined weak syms won't yet be marked as dynamic. */
33 kx if (h->dynindx == -1 && !h->forced_local
33 kx && h->root.type == bfd_link_hash_undefweak)
33 kx {
33 kx if (!bfd_elf_link_record_dynamic_symbol (info, h))
33 kx return false;
33 kx }
33 kx
33 kx if (bfd_link_pic (info) || WILL_CALL_FINISH_DYNAMIC_SYMBOL (1, 0, h))
33 kx {
33 kx asection *s = htab->root.splt;
33 kx
33 kx /* If this is the first .plt entry, make room for the special
33 kx first entry. */
33 kx if (s->size == 0)
33 kx s->size += htab->plt_header_size;
33 kx
33 kx h->plt.offset = s->size;
33 kx
33 kx /* If this symbol is not defined in a regular file, and we are
33 kx not generating a shared library, then set the symbol to this
33 kx location in the .plt. This is required to make function
33 kx pointers compare as equal between the normal executable and
33 kx the shared library. */
33 kx if (!bfd_link_pic (info) && !h->def_regular)
33 kx {
33 kx h->root.u.def.section = s;
33 kx h->root.u.def.value = h->plt.offset;
33 kx }
33 kx
33 kx /* Make room for this entry. For now we only create the
33 kx small model PLT entries. We later need to find a way
33 kx of relaxing into these from the large model PLT entries. */
33 kx s->size += htab->plt_entry_size;
33 kx
33 kx /* We also need to make an entry in the .got.plt section, which
33 kx will be placed in the .got section by the linker script. */
33 kx htab->root.sgotplt->size += GOT_ENTRY_SIZE;
33 kx
33 kx /* We also need to make an entry in the .rela.plt section. */
33 kx htab->root.srelplt->size += RELOC_SIZE (htab);
33 kx
33 kx /* We need to ensure that all GOT entries that serve the PLT
33 kx are consecutive with the special GOT slots [0] [1] and
33 kx [2]. Any addtional relocations, such as
33 kx R_AARCH64_TLSDESC, must be placed after the PLT related
33 kx entries. We abuse the reloc_count such that during
33 kx sizing we adjust reloc_count to indicate the number of
33 kx PLT related reserved entries. In subsequent phases when
33 kx filling in the contents of the reloc entries, PLT related
33 kx entries are placed by computing their PLT index (0
33 kx .. reloc_count). While other none PLT relocs are placed
33 kx at the slot indicated by reloc_count and reloc_count is
33 kx updated. */
33 kx
33 kx htab->root.srelplt->reloc_count++;
33 kx
33 kx /* Mark the DSO in case R_<CLS>_JUMP_SLOT relocs against
33 kx variant PCS symbols are present. */
33 kx if (h->other & STO_AARCH64_VARIANT_PCS)
33 kx htab->variant_pcs = 1;
33 kx
33 kx }
33 kx else
33 kx {
33 kx h->plt.offset = (bfd_vma) - 1;
33 kx h->needs_plt = 0;
33 kx }
33 kx }
33 kx else
33 kx {
33 kx h->plt.offset = (bfd_vma) - 1;
33 kx h->needs_plt = 0;
33 kx }
33 kx
33 kx eh = (struct elf_aarch64_link_hash_entry *) h;
33 kx eh->tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
33 kx
33 kx if (h->got.refcount > 0)
33 kx {
33 kx bool dyn;
33 kx unsigned got_type = elf_aarch64_hash_entry (h)->got_type;
33 kx
33 kx h->got.offset = (bfd_vma) - 1;
33 kx
33 kx dyn = htab->root.dynamic_sections_created;
33 kx
33 kx /* Make sure this symbol is output as a dynamic symbol.
33 kx Undefined weak syms won't yet be marked as dynamic. */
33 kx if (dyn && h->dynindx == -1 && !h->forced_local
33 kx && h->root.type == bfd_link_hash_undefweak)
33 kx {
33 kx if (!bfd_elf_link_record_dynamic_symbol (info, h))
33 kx return false;
33 kx }
33 kx
33 kx if (got_type == GOT_UNKNOWN)
33 kx {
33 kx }
33 kx else if (got_type == GOT_NORMAL)
33 kx {
33 kx h->got.offset = htab->root.sgot->size;
33 kx htab->root.sgot->size += GOT_ENTRY_SIZE;
33 kx if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
33 kx || h->root.type != bfd_link_hash_undefweak)
33 kx && (bfd_link_pic (info)
33 kx || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h))
33 kx /* Undefined weak symbol in static PIE resolves to 0 without
33 kx any dynamic relocations. */
33 kx && !UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
33 kx {
33 kx htab->root.srelgot->size += RELOC_SIZE (htab);
33 kx }
33 kx }
33 kx else
33 kx {
33 kx int indx;
33 kx if (got_type & GOT_TLSDESC_GD)
33 kx {
33 kx eh->tlsdesc_got_jump_table_offset =
33 kx (htab->root.sgotplt->size
33 kx - aarch64_compute_jump_table_size (htab));
33 kx htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
33 kx h->got.offset = (bfd_vma) - 2;
33 kx }
33 kx
33 kx if (got_type & GOT_TLS_GD)
33 kx {
33 kx h->got.offset = htab->root.sgot->size;
33 kx htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
33 kx }
33 kx
33 kx if (got_type & GOT_TLS_IE)
33 kx {
33 kx h->got.offset = htab->root.sgot->size;
33 kx htab->root.sgot->size += GOT_ENTRY_SIZE;
33 kx }
33 kx
33 kx indx = h && h->dynindx != -1 ? h->dynindx : 0;
33 kx if ((ELF_ST_VISIBILITY (h->other) == STV_DEFAULT
33 kx || h->root.type != bfd_link_hash_undefweak)
33 kx && (!bfd_link_executable (info)
33 kx || indx != 0
33 kx || WILL_CALL_FINISH_DYNAMIC_SYMBOL (dyn, 0, h)))
33 kx {
33 kx if (got_type & GOT_TLSDESC_GD)
33 kx {
33 kx htab->root.srelplt->size += RELOC_SIZE (htab);
33 kx /* Note reloc_count not incremented here! We have
33 kx already adjusted reloc_count for this relocation
33 kx type. */
33 kx
33 kx /* TLSDESC PLT is now needed, but not yet determined. */
33 kx htab->root.tlsdesc_plt = (bfd_vma) - 1;
33 kx }
33 kx
33 kx if (got_type & GOT_TLS_GD)
33 kx htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
33 kx
33 kx if (got_type & GOT_TLS_IE)
33 kx htab->root.srelgot->size += RELOC_SIZE (htab);
33 kx }
33 kx }
33 kx }
33 kx else
33 kx {
33 kx h->got.offset = (bfd_vma) - 1;
33 kx }
33 kx
33 kx if (h->dyn_relocs == NULL)
33 kx return true;
33 kx
33 kx for (p = h->dyn_relocs; p != NULL; p = p->next)
33 kx if (eh->def_protected)
33 kx {
33 kx /* Disallow copy relocations against protected symbol. */
33 kx asection *s = p->sec->output_section;
33 kx if (s != NULL && (s->flags & SEC_READONLY) != 0)
33 kx {
33 kx info->callbacks->einfo
33 kx /* xgettext:c-format */
33 kx (_ ("%F%P: %pB: copy relocation against non-copyable "
33 kx "protected symbol `%s'\n"),
33 kx p->sec->owner, h->root.root.string);
33 kx return false;
33 kx }
33 kx }
33 kx
33 kx /* In the shared -Bsymbolic case, discard space allocated for
33 kx dynamic pc-relative relocs against symbols which turn out to be
33 kx defined in regular objects. For the normal shared case, discard
33 kx space for pc-relative relocs that have become local due to symbol
33 kx visibility changes. */
33 kx
33 kx if (bfd_link_pic (info))
33 kx {
33 kx /* Relocs that use pc_count are those that appear on a call
33 kx insn, or certain REL relocs that can generated via assembly.
33 kx We want calls to protected symbols to resolve directly to the
33 kx function rather than going via the plt. If people want
33 kx function pointer comparisons to work as expected then they
33 kx should avoid writing weird assembly. */
33 kx if (SYMBOL_CALLS_LOCAL (info, h))
33 kx {
33 kx struct elf_dyn_relocs **pp;
33 kx
33 kx for (pp = &h->dyn_relocs; (p = *pp) != NULL;)
33 kx {
33 kx p->count -= p->pc_count;
33 kx p->pc_count = 0;
33 kx if (p->count == 0)
33 kx *pp = p->next;
33 kx else
33 kx pp = &p->next;
33 kx }
33 kx }
33 kx
33 kx /* Also discard relocs on undefined weak syms with non-default
33 kx visibility. */
33 kx if (h->dyn_relocs != NULL && h->root.type == bfd_link_hash_undefweak)
33 kx {
33 kx if (ELF_ST_VISIBILITY (h->other) != STV_DEFAULT
33 kx || UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
33 kx h->dyn_relocs = NULL;
33 kx
33 kx /* Make sure undefined weak symbols are output as a dynamic
33 kx symbol in PIEs. */
33 kx else if (h->dynindx == -1
33 kx && !h->forced_local
33 kx && h->root.type == bfd_link_hash_undefweak
33 kx && !bfd_elf_link_record_dynamic_symbol (info, h))
33 kx return false;
33 kx }
33 kx
33 kx }
33 kx else if (ELIMINATE_COPY_RELOCS)
33 kx {
33 kx /* For the non-shared case, discard space for relocs against
33 kx symbols which turn out to need copy relocs or are not
33 kx dynamic. */
33 kx
33 kx if (!h->non_got_ref
33 kx && ((h->def_dynamic
33 kx && !h->def_regular)
33 kx || (htab->root.dynamic_sections_created
33 kx && (h->root.type == bfd_link_hash_undefweak
33 kx || h->root.type == bfd_link_hash_undefined))))
33 kx {
33 kx /* Make sure this symbol is output as a dynamic symbol.
33 kx Undefined weak syms won't yet be marked as dynamic. */
33 kx if (h->dynindx == -1
33 kx && !h->forced_local
33 kx && h->root.type == bfd_link_hash_undefweak
33 kx && !bfd_elf_link_record_dynamic_symbol (info, h))
33 kx return false;
33 kx
33 kx /* If that succeeded, we know we'll be keeping all the
33 kx relocs. */
33 kx if (h->dynindx != -1)
33 kx goto keep;
33 kx }
33 kx
33 kx h->dyn_relocs = NULL;
33 kx
33 kx keep:;
33 kx }
33 kx
33 kx /* Finally, allocate space. */
33 kx for (p = h->dyn_relocs; p != NULL; p = p->next)
33 kx {
33 kx asection *sreloc;
33 kx
33 kx sreloc = elf_section_data (p->sec)->sreloc;
33 kx
33 kx BFD_ASSERT (sreloc != NULL);
33 kx
33 kx sreloc->size += p->count * RELOC_SIZE (htab);
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Allocate space in .plt, .got and associated reloc sections for
33 kx ifunc dynamic relocs. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_allocate_ifunc_dynrelocs (struct elf_link_hash_entry *h,
33 kx void *inf)
33 kx {
33 kx struct bfd_link_info *info;
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx
33 kx /* An example of a bfd_link_hash_indirect symbol is versioned
33 kx symbol. For example: __gxx_personality_v0(bfd_link_hash_indirect)
33 kx -> __gxx_personality_v0(bfd_link_hash_defined)
33 kx
33 kx There is no need to process bfd_link_hash_indirect symbols here
33 kx because we will also be presented with the concrete instance of
33 kx the symbol and elfNN_aarch64_copy_indirect_symbol () will have been
33 kx called to copy all relevant data from the generic to the concrete
33 kx symbol instance. */
33 kx if (h->root.type == bfd_link_hash_indirect)
33 kx return true;
33 kx
33 kx if (h->root.type == bfd_link_hash_warning)
33 kx h = (struct elf_link_hash_entry *) h->root.u.i.link;
33 kx
33 kx info = (struct bfd_link_info *) inf;
33 kx htab = elf_aarch64_hash_table (info);
33 kx
33 kx /* Since STT_GNU_IFUNC symbol must go through PLT, we handle it
33 kx here if it is defined and referenced in a non-shared object. */
33 kx if (h->type == STT_GNU_IFUNC
33 kx && h->def_regular)
33 kx return _bfd_elf_allocate_ifunc_dyn_relocs (info, h,
33 kx &h->dyn_relocs,
33 kx htab->plt_entry_size,
33 kx htab->plt_header_size,
33 kx GOT_ENTRY_SIZE,
33 kx false);
33 kx return true;
33 kx }
33 kx
33 kx /* Allocate space in .plt, .got and associated reloc sections for
33 kx local ifunc dynamic relocs. */
33 kx
33 kx static int
33 kx elfNN_aarch64_allocate_local_ifunc_dynrelocs (void **slot, void *inf)
33 kx {
33 kx struct elf_link_hash_entry *h
33 kx = (struct elf_link_hash_entry *) *slot;
33 kx
33 kx if (h->type != STT_GNU_IFUNC
33 kx || !h->def_regular
33 kx || !h->ref_regular
33 kx || !h->forced_local
33 kx || h->root.type != bfd_link_hash_defined)
33 kx abort ();
33 kx
33 kx return elfNN_aarch64_allocate_ifunc_dynrelocs (h, inf);
33 kx }
33 kx
33 kx /* This is the most important function of all . Innocuosly named
33 kx though ! */
33 kx
33 kx static bool
33 kx elfNN_aarch64_size_dynamic_sections (bfd *output_bfd ATTRIBUTE_UNUSED,
33 kx struct bfd_link_info *info)
33 kx {
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx bfd *dynobj;
33 kx asection *s;
33 kx bool relocs;
33 kx bfd *ibfd;
33 kx
33 kx htab = elf_aarch64_hash_table ((info));
33 kx dynobj = htab->root.dynobj;
33 kx
33 kx BFD_ASSERT (dynobj != NULL);
33 kx
33 kx if (htab->root.dynamic_sections_created)
33 kx {
33 kx if (bfd_link_executable (info) && !info->nointerp)
33 kx {
33 kx s = bfd_get_linker_section (dynobj, ".interp");
33 kx if (s == NULL)
33 kx abort ();
33 kx s->size = sizeof ELF_DYNAMIC_INTERPRETER;
33 kx s->contents = (unsigned char *) ELF_DYNAMIC_INTERPRETER;
33 kx }
33 kx }
33 kx
33 kx /* Set up .got offsets for local syms, and space for local dynamic
33 kx relocs. */
33 kx for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
33 kx {
33 kx struct elf_aarch64_local_symbol *locals = NULL;
33 kx Elf_Internal_Shdr *symtab_hdr;
33 kx asection *srel;
33 kx unsigned int i;
33 kx
33 kx if (!is_aarch64_elf (ibfd))
33 kx continue;
33 kx
33 kx for (s = ibfd->sections; s != NULL; s = s->next)
33 kx {
33 kx struct elf_dyn_relocs *p;
33 kx
33 kx for (p = (struct elf_dyn_relocs *)
33 kx (elf_section_data (s)->local_dynrel); p != NULL; p = p->next)
33 kx {
33 kx if (!bfd_is_abs_section (p->sec)
33 kx && bfd_is_abs_section (p->sec->output_section))
33 kx {
33 kx /* Input section has been discarded, either because
33 kx it is a copy of a linkonce section or due to
33 kx linker script /DISCARD/, so we'll be discarding
33 kx the relocs too. */
33 kx }
33 kx else if (p->count != 0)
33 kx {
33 kx srel = elf_section_data (p->sec)->sreloc;
33 kx srel->size += p->count * RELOC_SIZE (htab);
33 kx if ((p->sec->output_section->flags & SEC_READONLY) != 0)
33 kx info->flags |= DF_TEXTREL;
33 kx }
33 kx }
33 kx }
33 kx
33 kx locals = elf_aarch64_locals (ibfd);
33 kx if (!locals)
33 kx continue;
33 kx
33 kx symtab_hdr = &elf_symtab_hdr (ibfd);
33 kx srel = htab->root.srelgot;
33 kx for (i = 0; i < symtab_hdr->sh_info; i++)
33 kx {
33 kx locals[i].got_offset = (bfd_vma) - 1;
33 kx locals[i].tlsdesc_got_jump_table_offset = (bfd_vma) - 1;
33 kx if (locals[i].got_refcount > 0)
33 kx {
33 kx unsigned got_type = locals[i].got_type;
33 kx if (got_type & GOT_TLSDESC_GD)
33 kx {
33 kx locals[i].tlsdesc_got_jump_table_offset =
33 kx (htab->root.sgotplt->size
33 kx - aarch64_compute_jump_table_size (htab));
33 kx htab->root.sgotplt->size += GOT_ENTRY_SIZE * 2;
33 kx locals[i].got_offset = (bfd_vma) - 2;
33 kx }
33 kx
33 kx if (got_type & GOT_TLS_GD)
33 kx {
33 kx locals[i].got_offset = htab->root.sgot->size;
33 kx htab->root.sgot->size += GOT_ENTRY_SIZE * 2;
33 kx }
33 kx
33 kx if (got_type & GOT_TLS_IE
33 kx || got_type & GOT_NORMAL)
33 kx {
33 kx locals[i].got_offset = htab->root.sgot->size;
33 kx htab->root.sgot->size += GOT_ENTRY_SIZE;
33 kx }
33 kx
33 kx if (got_type == GOT_UNKNOWN)
33 kx {
33 kx }
33 kx
33 kx if (bfd_link_pic (info))
33 kx {
33 kx if (got_type & GOT_TLSDESC_GD)
33 kx {
33 kx htab->root.srelplt->size += RELOC_SIZE (htab);
33 kx /* Note RELOC_COUNT not incremented here! */
33 kx htab->root.tlsdesc_plt = (bfd_vma) - 1;
33 kx }
33 kx
33 kx if (got_type & GOT_TLS_GD)
33 kx htab->root.srelgot->size += RELOC_SIZE (htab) * 2;
33 kx
33 kx if (got_type & GOT_TLS_IE
33 kx || got_type & GOT_NORMAL)
33 kx htab->root.srelgot->size += RELOC_SIZE (htab);
33 kx }
33 kx }
33 kx else
33 kx {
33 kx locals[i].got_refcount = (bfd_vma) - 1;
33 kx }
33 kx }
33 kx }
33 kx
33 kx
33 kx /* Allocate global sym .plt and .got entries, and space for global
33 kx sym dynamic relocs. */
33 kx elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_dynrelocs,
33 kx info);
33 kx
33 kx /* Allocate global ifunc sym .plt and .got entries, and space for global
33 kx ifunc sym dynamic relocs. */
33 kx elf_link_hash_traverse (&htab->root, elfNN_aarch64_allocate_ifunc_dynrelocs,
33 kx info);
33 kx
33 kx /* Allocate .plt and .got entries, and space for local ifunc symbols. */
33 kx htab_traverse (htab->loc_hash_table,
33 kx elfNN_aarch64_allocate_local_ifunc_dynrelocs,
33 kx info);
33 kx
33 kx /* For every jump slot reserved in the sgotplt, reloc_count is
33 kx incremented. However, when we reserve space for TLS descriptors,
33 kx it's not incremented, so in order to compute the space reserved
33 kx for them, it suffices to multiply the reloc count by the jump
33 kx slot size. */
33 kx
33 kx if (htab->root.srelplt)
33 kx htab->sgotplt_jump_table_size = aarch64_compute_jump_table_size (htab);
33 kx
33 kx if (htab->root.tlsdesc_plt)
33 kx {
33 kx if (htab->root.splt->size == 0)
33 kx htab->root.splt->size += htab->plt_header_size;
33 kx
33 kx /* If we're not using lazy TLS relocations, don't generate the
33 kx GOT and PLT entry required. */
33 kx if ((info->flags & DF_BIND_NOW))
33 kx htab->root.tlsdesc_plt = 0;
33 kx else
33 kx {
33 kx htab->root.tlsdesc_plt = htab->root.splt->size;
33 kx htab->root.splt->size += htab->tlsdesc_plt_entry_size;
33 kx
33 kx htab->root.tlsdesc_got = htab->root.sgot->size;
33 kx htab->root.sgot->size += GOT_ENTRY_SIZE;
33 kx }
33 kx }
33 kx
33 kx /* Init mapping symbols information to use later to distingush between
33 kx code and data while scanning for errata. */
33 kx if (htab->fix_erratum_835769 || htab->fix_erratum_843419)
33 kx for (ibfd = info->input_bfds; ibfd != NULL; ibfd = ibfd->link.next)
33 kx {
33 kx if (!is_aarch64_elf (ibfd))
33 kx continue;
33 kx bfd_elfNN_aarch64_init_maps (ibfd);
33 kx }
33 kx
33 kx /* We now have determined the sizes of the various dynamic sections.
33 kx Allocate memory for them. */
33 kx relocs = false;
33 kx for (s = dynobj->sections; s != NULL; s = s->next)
33 kx {
33 kx if ((s->flags & SEC_LINKER_CREATED) == 0)
33 kx continue;
33 kx
33 kx if (s == htab->root.splt
33 kx || s == htab->root.sgot
33 kx || s == htab->root.sgotplt
33 kx || s == htab->root.iplt
33 kx || s == htab->root.igotplt
33 kx || s == htab->root.sdynbss
33 kx || s == htab->root.sdynrelro)
33 kx {
33 kx /* Strip this section if we don't need it; see the
33 kx comment below. */
33 kx }
33 kx else if (startswith (bfd_section_name (s), ".rela"))
33 kx {
33 kx if (s->size != 0 && s != htab->root.srelplt)
33 kx relocs = true;
33 kx
33 kx /* We use the reloc_count field as a counter if we need
33 kx to copy relocs into the output file. */
33 kx if (s != htab->root.srelplt)
33 kx s->reloc_count = 0;
33 kx }
33 kx else
33 kx {
33 kx /* It's not one of our sections, so don't allocate space. */
33 kx continue;
33 kx }
33 kx
33 kx if (s->size == 0)
33 kx {
33 kx /* If we don't need this section, strip it from the
33 kx output file. This is mostly to handle .rela.bss and
33 kx .rela.plt. We must create both sections in
33 kx create_dynamic_sections, because they must be created
33 kx before the linker maps input sections to output
33 kx sections. The linker does that before
33 kx adjust_dynamic_symbol is called, and it is that
33 kx function which decides whether anything needs to go
33 kx into these sections. */
33 kx s->flags |= SEC_EXCLUDE;
33 kx continue;
33 kx }
33 kx
33 kx if ((s->flags & SEC_HAS_CONTENTS) == 0)
33 kx continue;
33 kx
33 kx /* Allocate memory for the section contents. We use bfd_zalloc
33 kx here in case unused entries are not reclaimed before the
33 kx section's contents are written out. This should not happen,
33 kx but this way if it does, we get a R_AARCH64_NONE reloc instead
33 kx of garbage. */
33 kx s->contents = (bfd_byte *) bfd_zalloc (dynobj, s->size);
33 kx if (s->contents == NULL)
33 kx return false;
33 kx }
33 kx
33 kx if (htab->root.dynamic_sections_created)
33 kx {
33 kx /* Add some entries to the .dynamic section. We fill in the
33 kx values later, in elfNN_aarch64_finish_dynamic_sections, but we
33 kx must add the entries now so that we get the correct size for
33 kx the .dynamic section. The DT_DEBUG entry is filled in by the
33 kx dynamic linker and used by the debugger. */
33 kx #define add_dynamic_entry(TAG, VAL) \
33 kx _bfd_elf_add_dynamic_entry (info, TAG, VAL)
33 kx
33 kx if (!_bfd_elf_add_dynamic_tags (output_bfd, info, relocs))
33 kx return false;
33 kx
33 kx if (htab->root.splt->size != 0)
33 kx {
33 kx if (htab->variant_pcs
33 kx && !add_dynamic_entry (DT_AARCH64_VARIANT_PCS, 0))
33 kx return false;
33 kx
33 kx if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_BTI_PAC)
33 kx && (!add_dynamic_entry (DT_AARCH64_BTI_PLT, 0)
33 kx || !add_dynamic_entry (DT_AARCH64_PAC_PLT, 0)))
33 kx return false;
33 kx
33 kx else if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_BTI)
33 kx && !add_dynamic_entry (DT_AARCH64_BTI_PLT, 0))
33 kx return false;
33 kx
33 kx else if ((elf_aarch64_tdata (output_bfd)->plt_type == PLT_PAC)
33 kx && !add_dynamic_entry (DT_AARCH64_PAC_PLT, 0))
33 kx return false;
33 kx }
33 kx }
33 kx #undef add_dynamic_entry
33 kx
33 kx return true;
33 kx }
33 kx
33 kx static inline void
33 kx elf_aarch64_update_plt_entry (bfd *output_bfd,
33 kx bfd_reloc_code_real_type r_type,
33 kx bfd_byte *plt_entry, bfd_vma value)
33 kx {
33 kx reloc_howto_type *howto = elfNN_aarch64_howto_from_bfd_reloc (r_type);
33 kx
33 kx /* FIXME: We should check the return value from this function call. */
33 kx (void) _bfd_aarch64_elf_put_addend (output_bfd, plt_entry, r_type, howto, value);
33 kx }
33 kx
33 kx static void
33 kx elfNN_aarch64_create_small_pltn_entry (struct elf_link_hash_entry *h,
33 kx struct elf_aarch64_link_hash_table
33 kx *htab, bfd *output_bfd,
33 kx struct bfd_link_info *info)
33 kx {
33 kx bfd_byte *plt_entry;
33 kx bfd_vma plt_index;
33 kx bfd_vma got_offset;
33 kx bfd_vma gotplt_entry_address;
33 kx bfd_vma plt_entry_address;
33 kx Elf_Internal_Rela rela;
33 kx bfd_byte *loc;
33 kx asection *plt, *gotplt, *relplt;
33 kx
33 kx /* When building a static executable, use .iplt, .igot.plt and
33 kx .rela.iplt sections for STT_GNU_IFUNC symbols. */
33 kx if (htab->root.splt != NULL)
33 kx {
33 kx plt = htab->root.splt;
33 kx gotplt = htab->root.sgotplt;
33 kx relplt = htab->root.srelplt;
33 kx }
33 kx else
33 kx {
33 kx plt = htab->root.iplt;
33 kx gotplt = htab->root.igotplt;
33 kx relplt = htab->root.irelplt;
33 kx }
33 kx
33 kx /* Get the index in the procedure linkage table which
33 kx corresponds to this symbol. This is the index of this symbol
33 kx in all the symbols for which we are making plt entries. The
33 kx first entry in the procedure linkage table is reserved.
33 kx
33 kx Get the offset into the .got table of the entry that
33 kx corresponds to this function. Each .got entry is GOT_ENTRY_SIZE
33 kx bytes. The first three are reserved for the dynamic linker.
33 kx
33 kx For static executables, we don't reserve anything. */
33 kx
33 kx if (plt == htab->root.splt)
33 kx {
33 kx plt_index = (h->plt.offset - htab->plt_header_size) / htab->plt_entry_size;
33 kx got_offset = (plt_index + 3) * GOT_ENTRY_SIZE;
33 kx }
33 kx else
33 kx {
33 kx plt_index = h->plt.offset / htab->plt_entry_size;
33 kx got_offset = plt_index * GOT_ENTRY_SIZE;
33 kx }
33 kx
33 kx plt_entry = plt->contents + h->plt.offset;
33 kx plt_entry_address = plt->output_section->vma
33 kx + plt->output_offset + h->plt.offset;
33 kx gotplt_entry_address = gotplt->output_section->vma +
33 kx gotplt->output_offset + got_offset;
33 kx
33 kx /* Copy in the boiler-plate for the PLTn entry. */
33 kx memcpy (plt_entry, htab->plt_entry, htab->plt_entry_size);
33 kx
33 kx /* First instruction in BTI enabled PLT stub is a BTI
33 kx instruction so skip it. */
33 kx if (elf_aarch64_tdata (output_bfd)->plt_type & PLT_BTI
33 kx && elf_elfheader (output_bfd)->e_type == ET_EXEC)
33 kx plt_entry = plt_entry + 4;
33 kx
33 kx /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
33 kx ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
33 kx elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
33 kx plt_entry,
33 kx PG (gotplt_entry_address) -
33 kx PG (plt_entry_address));
33 kx
33 kx /* Fill in the lo12 bits for the load from the pltgot. */
33 kx elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
33 kx plt_entry + 4,
33 kx PG_OFFSET (gotplt_entry_address));
33 kx
33 kx /* Fill in the lo12 bits for the add from the pltgot entry. */
33 kx elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
33 kx plt_entry + 8,
33 kx PG_OFFSET (gotplt_entry_address));
33 kx
33 kx /* All the GOTPLT Entries are essentially initialized to PLT0. */
33 kx bfd_put_NN (output_bfd,
33 kx plt->output_section->vma + plt->output_offset,
33 kx gotplt->contents + got_offset);
33 kx
33 kx rela.r_offset = gotplt_entry_address;
33 kx
33 kx if (h->dynindx == -1
33 kx || ((bfd_link_executable (info)
33 kx || ELF_ST_VISIBILITY (h->other) != STV_DEFAULT)
33 kx && h->def_regular
33 kx && h->type == STT_GNU_IFUNC))
33 kx {
33 kx /* If an STT_GNU_IFUNC symbol is locally defined, generate
33 kx R_AARCH64_IRELATIVE instead of R_AARCH64_JUMP_SLOT. */
33 kx rela.r_info = ELFNN_R_INFO (0, AARCH64_R (IRELATIVE));
33 kx rela.r_addend = (h->root.u.def.value
33 kx + h->root.u.def.section->output_section->vma
33 kx + h->root.u.def.section->output_offset);
33 kx }
33 kx else
33 kx {
33 kx /* Fill in the entry in the .rela.plt section. */
33 kx rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (JUMP_SLOT));
33 kx rela.r_addend = 0;
33 kx }
33 kx
33 kx /* Compute the relocation entry to used based on PLT index and do
33 kx not adjust reloc_count. The reloc_count has already been adjusted
33 kx to account for this entry. */
33 kx loc = relplt->contents + plt_index * RELOC_SIZE (htab);
33 kx bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
33 kx }
33 kx
33 kx /* Size sections even though they're not dynamic. We use it to setup
33 kx _TLS_MODULE_BASE_, if needed. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_always_size_sections (bfd *output_bfd,
33 kx struct bfd_link_info *info)
33 kx {
33 kx asection *tls_sec;
33 kx
33 kx if (bfd_link_relocatable (info))
33 kx return true;
33 kx
33 kx tls_sec = elf_hash_table (info)->tls_sec;
33 kx
33 kx if (tls_sec)
33 kx {
33 kx struct elf_link_hash_entry *tlsbase;
33 kx
33 kx tlsbase = elf_link_hash_lookup (elf_hash_table (info),
33 kx "_TLS_MODULE_BASE_", true, true, false);
33 kx
33 kx if (tlsbase)
33 kx {
33 kx struct bfd_link_hash_entry *h = NULL;
33 kx const struct elf_backend_data *bed =
33 kx get_elf_backend_data (output_bfd);
33 kx
33 kx if (!(_bfd_generic_link_add_one_symbol
33 kx (info, output_bfd, "_TLS_MODULE_BASE_", BSF_LOCAL,
33 kx tls_sec, 0, NULL, false, bed->collect, &h)))
33 kx return false;
33 kx
33 kx tlsbase->type = STT_TLS;
33 kx tlsbase = (struct elf_link_hash_entry *) h;
33 kx tlsbase->def_regular = 1;
33 kx tlsbase->other = STV_HIDDEN;
33 kx (*bed->elf_backend_hide_symbol) (info, tlsbase, true);
33 kx }
33 kx }
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Finish up dynamic symbol handling. We set the contents of various
33 kx dynamic sections here. */
33 kx
33 kx static bool
33 kx elfNN_aarch64_finish_dynamic_symbol (bfd *output_bfd,
33 kx struct bfd_link_info *info,
33 kx struct elf_link_hash_entry *h,
33 kx Elf_Internal_Sym *sym)
33 kx {
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx htab = elf_aarch64_hash_table (info);
33 kx
33 kx if (h->plt.offset != (bfd_vma) - 1)
33 kx {
33 kx asection *plt, *gotplt, *relplt;
33 kx
33 kx /* This symbol has an entry in the procedure linkage table. Set
33 kx it up. */
33 kx
33 kx /* When building a static executable, use .iplt, .igot.plt and
33 kx .rela.iplt sections for STT_GNU_IFUNC symbols. */
33 kx if (htab->root.splt != NULL)
33 kx {
33 kx plt = htab->root.splt;
33 kx gotplt = htab->root.sgotplt;
33 kx relplt = htab->root.srelplt;
33 kx }
33 kx else
33 kx {
33 kx plt = htab->root.iplt;
33 kx gotplt = htab->root.igotplt;
33 kx relplt = htab->root.irelplt;
33 kx }
33 kx
33 kx /* This symbol has an entry in the procedure linkage table. Set
33 kx it up. */
33 kx if ((h->dynindx == -1
33 kx && !((h->forced_local || bfd_link_executable (info))
33 kx && h->def_regular
33 kx && h->type == STT_GNU_IFUNC))
33 kx || plt == NULL
33 kx || gotplt == NULL
33 kx || relplt == NULL)
33 kx return false;
33 kx
33 kx elfNN_aarch64_create_small_pltn_entry (h, htab, output_bfd, info);
33 kx if (!h->def_regular)
33 kx {
33 kx /* Mark the symbol as undefined, rather than as defined in
33 kx the .plt section. */
33 kx sym->st_shndx = SHN_UNDEF;
33 kx /* If the symbol is weak we need to clear the value.
33 kx Otherwise, the PLT entry would provide a definition for
33 kx the symbol even if the symbol wasn't defined anywhere,
33 kx and so the symbol would never be NULL. Leave the value if
33 kx there were any relocations where pointer equality matters
33 kx (this is a clue for the dynamic linker, to make function
33 kx pointer comparisons work between an application and shared
33 kx library). */
33 kx if (!h->ref_regular_nonweak || !h->pointer_equality_needed)
33 kx sym->st_value = 0;
33 kx }
33 kx }
33 kx
33 kx if (h->got.offset != (bfd_vma) - 1
33 kx && elf_aarch64_hash_entry (h)->got_type == GOT_NORMAL
33 kx /* Undefined weak symbol in static PIE resolves to 0 without
33 kx any dynamic relocations. */
33 kx && !UNDEFWEAK_NO_DYNAMIC_RELOC (info, h))
33 kx {
33 kx Elf_Internal_Rela rela;
33 kx bfd_byte *loc;
33 kx
33 kx /* This symbol has an entry in the global offset table. Set it
33 kx up. */
33 kx if (htab->root.sgot == NULL || htab->root.srelgot == NULL)
33 kx abort ();
33 kx
33 kx rela.r_offset = (htab->root.sgot->output_section->vma
33 kx + htab->root.sgot->output_offset
33 kx + (h->got.offset & ~(bfd_vma) 1));
33 kx
33 kx if (h->def_regular
33 kx && h->type == STT_GNU_IFUNC)
33 kx {
33 kx if (bfd_link_pic (info))
33 kx {
33 kx /* Generate R_AARCH64_GLOB_DAT. */
33 kx goto do_glob_dat;
33 kx }
33 kx else
33 kx {
33 kx asection *plt;
33 kx
33 kx if (!h->pointer_equality_needed)
33 kx abort ();
33 kx
33 kx /* For non-shared object, we can't use .got.plt, which
33 kx contains the real function address if we need pointer
33 kx equality. We load the GOT entry with the PLT entry. */
33 kx plt = htab->root.splt ? htab->root.splt : htab->root.iplt;
33 kx bfd_put_NN (output_bfd, (plt->output_section->vma
33 kx + plt->output_offset
33 kx + h->plt.offset),
33 kx htab->root.sgot->contents
33 kx + (h->got.offset & ~(bfd_vma) 1));
33 kx return true;
33 kx }
33 kx }
33 kx else if (bfd_link_pic (info) && SYMBOL_REFERENCES_LOCAL (info, h))
33 kx {
33 kx if (!(h->def_regular || ELF_COMMON_DEF_P (h)))
33 kx return false;
33 kx
33 kx BFD_ASSERT ((h->got.offset & 1) != 0);
33 kx rela.r_info = ELFNN_R_INFO (0, AARCH64_R (RELATIVE));
33 kx rela.r_addend = (h->root.u.def.value
33 kx + h->root.u.def.section->output_section->vma
33 kx + h->root.u.def.section->output_offset);
33 kx }
33 kx else
33 kx {
33 kx do_glob_dat:
33 kx BFD_ASSERT ((h->got.offset & 1) == 0);
33 kx bfd_put_NN (output_bfd, (bfd_vma) 0,
33 kx htab->root.sgot->contents + h->got.offset);
33 kx rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (GLOB_DAT));
33 kx rela.r_addend = 0;
33 kx }
33 kx
33 kx loc = htab->root.srelgot->contents;
33 kx loc += htab->root.srelgot->reloc_count++ * RELOC_SIZE (htab);
33 kx bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
33 kx }
33 kx
33 kx if (h->needs_copy)
33 kx {
33 kx Elf_Internal_Rela rela;
33 kx asection *s;
33 kx bfd_byte *loc;
33 kx
33 kx /* This symbol needs a copy reloc. Set it up. */
33 kx if (h->dynindx == -1
33 kx || (h->root.type != bfd_link_hash_defined
33 kx && h->root.type != bfd_link_hash_defweak)
33 kx || htab->root.srelbss == NULL)
33 kx abort ();
33 kx
33 kx rela.r_offset = (h->root.u.def.value
33 kx + h->root.u.def.section->output_section->vma
33 kx + h->root.u.def.section->output_offset);
33 kx rela.r_info = ELFNN_R_INFO (h->dynindx, AARCH64_R (COPY));
33 kx rela.r_addend = 0;
33 kx if (h->root.u.def.section == htab->root.sdynrelro)
33 kx s = htab->root.sreldynrelro;
33 kx else
33 kx s = htab->root.srelbss;
33 kx loc = s->contents + s->reloc_count++ * RELOC_SIZE (htab);
33 kx bfd_elfNN_swap_reloca_out (output_bfd, &rela, loc);
33 kx }
33 kx
33 kx /* Mark _DYNAMIC and _GLOBAL_OFFSET_TABLE_ as absolute. SYM may
33 kx be NULL for local symbols. */
33 kx if (sym != NULL
33 kx && (h == elf_hash_table (info)->hdynamic
33 kx || h == elf_hash_table (info)->hgot))
33 kx sym->st_shndx = SHN_ABS;
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Finish up local dynamic symbol handling. We set the contents of
33 kx various dynamic sections here. */
33 kx
33 kx static int
33 kx elfNN_aarch64_finish_local_dynamic_symbol (void **slot, void *inf)
33 kx {
33 kx struct elf_link_hash_entry *h
33 kx = (struct elf_link_hash_entry *) *slot;
33 kx struct bfd_link_info *info
33 kx = (struct bfd_link_info *) inf;
33 kx
33 kx return elfNN_aarch64_finish_dynamic_symbol (info->output_bfd,
33 kx info, h, NULL);
33 kx }
33 kx
33 kx static void
33 kx elfNN_aarch64_init_small_plt0_entry (bfd *output_bfd ATTRIBUTE_UNUSED,
33 kx struct elf_aarch64_link_hash_table
33 kx *htab)
33 kx {
33 kx /* Fill in PLT0. Fixme:RR Note this doesn't distinguish between
33 kx small and large plts and at the minute just generates
33 kx the small PLT. */
33 kx
33 kx /* PLT0 of the small PLT looks like this in ELF64 -
33 kx stp x16, x30, [sp, #-16]! // Save the reloc and lr on stack.
33 kx adrp x16, PLT_GOT + 16 // Get the page base of the GOTPLT
33 kx ldr x17, [x16, #:lo12:PLT_GOT+16] // Load the address of the
33 kx // symbol resolver
33 kx add x16, x16, #:lo12:PLT_GOT+16 // Load the lo12 bits of the
33 kx // GOTPLT entry for this.
33 kx br x17
33 kx PLT0 will be slightly different in ELF32 due to different got entry
33 kx size. */
33 kx bfd_vma plt_got_2nd_ent; /* Address of GOT[2]. */
33 kx bfd_vma plt_base;
33 kx
33 kx
33 kx memcpy (htab->root.splt->contents, htab->plt0_entry,
33 kx htab->plt_header_size);
33 kx
33 kx /* PR 26312: Explicitly set the sh_entsize to 0 so that
33 kx consumers do not think that the section contains fixed
33 kx sized objects. */
33 kx elf_section_data (htab->root.splt->output_section)->this_hdr.sh_entsize = 0;
33 kx
33 kx plt_got_2nd_ent = (htab->root.sgotplt->output_section->vma
33 kx + htab->root.sgotplt->output_offset
33 kx + GOT_ENTRY_SIZE * 2);
33 kx
33 kx plt_base = htab->root.splt->output_section->vma +
33 kx htab->root.splt->output_offset;
33 kx
33 kx /* First instruction in BTI enabled PLT stub is a BTI
33 kx instruction so skip it. */
33 kx bfd_byte *plt0_entry = htab->root.splt->contents;
33 kx if (elf_aarch64_tdata (output_bfd)->plt_type & PLT_BTI)
33 kx plt0_entry = plt0_entry + 4;
33 kx
33 kx /* Fill in the top 21 bits for this: ADRP x16, PLT_GOT + n * 8.
33 kx ADRP: ((PG(S+A)-PG(P)) >> 12) & 0x1fffff */
33 kx elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADR_HI21_PCREL,
33 kx plt0_entry + 4,
33 kx PG (plt_got_2nd_ent) - PG (plt_base + 4));
33 kx
33 kx elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_LDSTNN_LO12,
33 kx plt0_entry + 8,
33 kx PG_OFFSET (plt_got_2nd_ent));
33 kx
33 kx elf_aarch64_update_plt_entry (output_bfd, BFD_RELOC_AARCH64_ADD_LO12,
33 kx plt0_entry + 12,
33 kx PG_OFFSET (plt_got_2nd_ent));
33 kx }
33 kx
33 kx static bool
33 kx elfNN_aarch64_finish_dynamic_sections (bfd *output_bfd,
33 kx struct bfd_link_info *info)
33 kx {
33 kx struct elf_aarch64_link_hash_table *htab;
33 kx bfd *dynobj;
33 kx asection *sdyn;
33 kx
33 kx htab = elf_aarch64_hash_table (info);
33 kx dynobj = htab->root.dynobj;
33 kx sdyn = bfd_get_linker_section (dynobj, ".dynamic");
33 kx
33 kx if (htab->root.dynamic_sections_created)
33 kx {
33 kx ElfNN_External_Dyn *dyncon, *dynconend;
33 kx
33 kx if (sdyn == NULL || htab->root.sgot == NULL)
33 kx abort ();
33 kx
33 kx dyncon = (ElfNN_External_Dyn *) sdyn->contents;
33 kx dynconend = (ElfNN_External_Dyn *) (sdyn->contents + sdyn->size);
33 kx for (; dyncon < dynconend; dyncon++)
33 kx {
33 kx Elf_Internal_Dyn dyn;
33 kx asection *s;
33 kx
33 kx bfd_elfNN_swap_dyn_in (dynobj, dyncon, &dyn);
33 kx
33 kx switch (dyn.d_tag)
33 kx {
33 kx default:
33 kx continue;
33 kx
33 kx case DT_PLTGOT:
33 kx s = htab->root.sgotplt;
33 kx dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
33 kx break;
33 kx
33 kx case DT_JMPREL:
33 kx s = htab->root.srelplt;
33 kx dyn.d_un.d_ptr = s->output_section->vma + s->output_offset;
33 kx break;
33 kx
33 kx case DT_PLTRELSZ:
33 kx s = htab->root.srelplt;
33 kx dyn.d_un.d_val = s->size;
33 kx break;
33 kx
33 kx case DT_TLSDESC_PLT:
33 kx s = htab->root.splt;
33 kx dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
33 kx + htab->root.tlsdesc_plt;
33 kx break;
33 kx
33 kx case DT_TLSDESC_GOT:
33 kx s = htab->root.sgot;
33 kx BFD_ASSERT (htab->root.tlsdesc_got != (bfd_vma)-1);
33 kx dyn.d_un.d_ptr = s->output_section->vma + s->output_offset
33 kx + htab->root.tlsdesc_got;
33 kx break;
33 kx }
33 kx
33 kx bfd_elfNN_swap_dyn_out (output_bfd, &dyn, dyncon);
33 kx }
33 kx
33 kx }
33 kx
33 kx /* Fill in the special first entry in the procedure linkage table. */
33 kx if (htab->root.splt && htab->root.splt->size > 0)
33 kx {
33 kx elfNN_aarch64_init_small_plt0_entry (output_bfd, htab);
33 kx
33 kx if (htab->root.tlsdesc_plt && !(info->flags & DF_BIND_NOW))
33 kx {
33 kx BFD_ASSERT (htab->root.tlsdesc_got != (bfd_vma)-1);
33 kx bfd_put_NN (output_bfd, (bfd_vma) 0,
33 kx htab->root.sgot->contents + htab->root.tlsdesc_got);
33 kx
33 kx const bfd_byte *entry = elfNN_aarch64_tlsdesc_small_plt_entry;
33 kx htab->tlsdesc_plt_entry_size = PLT_TLSDESC_ENTRY_SIZE;
33 kx
33 kx aarch64_plt_type type = elf_aarch64_tdata (output_bfd)->plt_type;
33 kx if (type == PLT_BTI || type == PLT_BTI_PAC)
33 kx {
33 kx entry = elfNN_aarch64_tlsdesc_small_plt_bti_entry;
33 kx }
33 kx
33 kx memcpy (htab->root.splt->contents + htab->root.tlsdesc_plt,
33 kx entry, htab->tlsdesc_plt_entry_size);
33 kx
33 kx {
33 kx bfd_vma adrp1_addr =
33 kx htab->root.splt->output_section->vma
33 kx + htab->root.splt->output_offset
33 kx + htab->root.tlsdesc_plt + 4;
33 kx
33 kx bfd_vma adrp2_addr = adrp1_addr + 4;
33 kx
33 kx bfd_vma got_addr =
33 kx htab->root.sgot->output_section->vma
33 kx + htab->root.sgot->output_offset;
33 kx
33 kx bfd_vma pltgot_addr =
33 kx htab->root.sgotplt->output_section->vma
33 kx + htab->root.sgotplt->output_offset;
33 kx
33 kx bfd_vma dt_tlsdesc_got = got_addr + htab->root.tlsdesc_got;
33 kx
33 kx bfd_byte *plt_entry =
33 kx htab->root.splt->contents + htab->root.tlsdesc_plt;
33 kx
33 kx /* First instruction in BTI enabled PLT stub is a BTI
33 kx instruction so skip it. */
33 kx if (type & PLT_BTI)
33 kx {
33 kx plt_entry = plt_entry + 4;
33 kx adrp1_addr = adrp1_addr + 4;
33 kx adrp2_addr = adrp2_addr + 4;
33 kx }
33 kx
33 kx /* adrp x2, DT_TLSDESC_GOT */
33 kx elf_aarch64_update_plt_entry (output_bfd,
33 kx BFD_RELOC_AARCH64_ADR_HI21_PCREL,
33 kx plt_entry + 4,
33 kx (PG (dt_tlsdesc_got)
33 kx - PG (adrp1_addr)));
33 kx
33 kx /* adrp x3, 0 */
33 kx elf_aarch64_update_plt_entry (output_bfd,
33 kx BFD_RELOC_AARCH64_ADR_HI21_PCREL,
33 kx plt_entry + 8,
33 kx (PG (pltgot_addr)
33 kx - PG (adrp2_addr)));
33 kx
33 kx /* ldr x2, [x2, #0] */
33 kx elf_aarch64_update_plt_entry (output_bfd,
33 kx BFD_RELOC_AARCH64_LDSTNN_LO12,
33 kx plt_entry + 12,
33 kx PG_OFFSET (dt_tlsdesc_got));
33 kx
33 kx /* add x3, x3, 0 */
33 kx elf_aarch64_update_plt_entry (output_bfd,
33 kx BFD_RELOC_AARCH64_ADD_LO12,
33 kx plt_entry + 16,
33 kx PG_OFFSET (pltgot_addr));
33 kx }
33 kx }
33 kx }
33 kx
33 kx if (htab->root.sgotplt)
33 kx {
33 kx if (bfd_is_abs_section (htab->root.sgotplt->output_section))
33 kx {
33 kx _bfd_error_handler
33 kx (_("discarded output section: `%pA'"), htab->root.sgotplt);
33 kx return false;
33 kx }
33 kx
33 kx /* Fill in the first three entries in the global offset table. */
33 kx if (htab->root.sgotplt->size > 0)
33 kx {
33 kx bfd_put_NN (output_bfd, (bfd_vma) 0, htab->root.sgotplt->contents);
33 kx
33 kx /* Write GOT[1] and GOT[2], needed for the dynamic linker. */
33 kx bfd_put_NN (output_bfd,
33 kx (bfd_vma) 0,
33 kx htab->root.sgotplt->contents + GOT_ENTRY_SIZE);
33 kx bfd_put_NN (output_bfd,
33 kx (bfd_vma) 0,
33 kx htab->root.sgotplt->contents + GOT_ENTRY_SIZE * 2);
33 kx }
33 kx
33 kx if (htab->root.sgot)
33 kx {
33 kx if (htab->root.sgot->size > 0)
33 kx {
33 kx bfd_vma addr =
33 kx sdyn ? sdyn->output_section->vma + sdyn->output_offset : 0;
33 kx bfd_put_NN (output_bfd, addr, htab->root.sgot->contents);
33 kx }
33 kx }
33 kx
33 kx elf_section_data (htab->root.sgotplt->output_section)->
33 kx this_hdr.sh_entsize = GOT_ENTRY_SIZE;
33 kx }
33 kx
33 kx if (htab->root.sgot && htab->root.sgot->size > 0)
33 kx elf_section_data (htab->root.sgot->output_section)->this_hdr.sh_entsize
33 kx = GOT_ENTRY_SIZE;
33 kx
33 kx /* Fill PLT and GOT entries for local STT_GNU_IFUNC symbols. */
33 kx htab_traverse (htab->loc_hash_table,
33 kx elfNN_aarch64_finish_local_dynamic_symbol,
33 kx info);
33 kx
33 kx return true;
33 kx }
33 kx
33 kx /* Check if BTI enabled PLTs are needed. Returns the type needed. */
33 kx static aarch64_plt_type
33 kx get_plt_type (bfd *abfd)
33 kx {
33 kx aarch64_plt_type ret = PLT_NORMAL;
33 kx bfd_byte *contents, *extdyn, *extdynend;
33 kx asection *sec = bfd_get_section_by_name (abfd, ".dynamic");
33 kx if (!sec
33 kx || sec->size < sizeof (ElfNN_External_Dyn)
33 kx || !bfd_malloc_and_get_section (abfd, sec, &contents))
33 kx return ret;
33 kx extdyn = contents;
33 kx extdynend = contents + sec->size - sizeof (ElfNN_External_Dyn);
33 kx for (; extdyn <= extdynend; extdyn += sizeof (ElfNN_External_Dyn))
33 kx {
33 kx Elf_Internal_Dyn dyn;
33 kx bfd_elfNN_swap_dyn_in (abfd, extdyn, &dyn);
33 kx
33 kx /* Let's check the processor specific dynamic array tags. */
33 kx bfd_vma tag = dyn.d_tag;
33 kx if (tag < DT_LOPROC || tag > DT_HIPROC)
33 kx continue;
33 kx
33 kx switch (tag)
33 kx {
33 kx case DT_AARCH64_BTI_PLT:
33 kx ret |= PLT_BTI;
33 kx break;
33 kx
33 kx case DT_AARCH64_PAC_PLT:
33 kx ret |= PLT_PAC;
33 kx break;
33 kx
33 kx default: break;
33 kx }
33 kx }
33 kx free (contents);
33 kx return ret;
33 kx }
33 kx
33 kx static long
33 kx elfNN_aarch64_get_synthetic_symtab (bfd *abfd,
33 kx long symcount,
33 kx asymbol **syms,
33 kx long dynsymcount,
33 kx asymbol **dynsyms,
33 kx asymbol **ret)
33 kx {
33 kx elf_aarch64_tdata (abfd)->plt_type = get_plt_type (abfd);
33 kx return _bfd_elf_get_synthetic_symtab (abfd, symcount, syms,
33 kx dynsymcount, dynsyms, ret);
33 kx }
33 kx
33 kx /* Return address for Ith PLT stub in section PLT, for relocation REL
33 kx or (bfd_vma) -1 if it should not be included. */
33 kx
33 kx static bfd_vma
33 kx elfNN_aarch64_plt_sym_val (bfd_vma i, const asection *plt,
33 kx const arelent *rel ATTRIBUTE_UNUSED)
33 kx {
33 kx size_t plt0_size = PLT_ENTRY_SIZE;
33 kx size_t pltn_size = PLT_SMALL_ENTRY_SIZE;
33 kx
33 kx if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_BTI_PAC)
33 kx {
33 kx if (elf_elfheader (plt->owner)->e_type == ET_EXEC)
33 kx pltn_size = PLT_BTI_PAC_SMALL_ENTRY_SIZE;
33 kx else
33 kx pltn_size = PLT_PAC_SMALL_ENTRY_SIZE;
33 kx }
33 kx else if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_BTI)
33 kx {
33 kx if (elf_elfheader (plt->owner)->e_type == ET_EXEC)
33 kx pltn_size = PLT_BTI_SMALL_ENTRY_SIZE;
33 kx }
33 kx else if (elf_aarch64_tdata (plt->owner)->plt_type == PLT_PAC)
33 kx {
33 kx pltn_size = PLT_PAC_SMALL_ENTRY_SIZE;
33 kx }
33 kx
33 kx return plt->vma + plt0_size + i * pltn_size;
33 kx }
33 kx
33 kx /* Returns TRUE if NAME is an AArch64 mapping symbol.
33 kx The ARM ELF standard defines $x (for A64 code) and $d (for data).
33 kx It also allows a period initiated suffix to be added to the symbol, ie:
33 kx "$[adtx]\.[:sym_char]+". */
33 kx
33 kx static bool
33 kx is_aarch64_mapping_symbol (const char * name)
33 kx {
33 kx return name != NULL /* Paranoia. */
33 kx && name[0] == '$' /* Note: if objcopy --prefix-symbols has been used then
33 kx the mapping symbols could have acquired a prefix.
33 kx We do not support this here, since such symbols no
33 kx longer conform to the ARM ELF ABI. */
33 kx && (name[1] == 'd' || name[1] == 'x')
33 kx && (name[2] == 0 || name[2] == '.');
33 kx /* FIXME: Strictly speaking the symbol is only a valid mapping symbol if
33 kx any characters that follow the period are legal characters for the body
33 kx of a symbol's name. For now we just assume that this is the case. */
33 kx }
33 kx
33 kx /* Make sure that mapping symbols in object files are not removed via the
33 kx "strip --strip-unneeded" tool. These symbols might needed in order to
33 kx correctly generate linked files. Once an object file has been linked,
33 kx it should be safe to remove them. */
33 kx
33 kx static void
33 kx elfNN_aarch64_backend_symbol_processing (bfd *abfd, asymbol *sym)
33 kx {
33 kx if (((abfd->flags & (EXEC_P | DYNAMIC)) == 0)
33 kx && sym->section != bfd_abs_section_ptr
33 kx && is_aarch64_mapping_symbol (sym->name))
33 kx sym->flags |= BSF_KEEP;
33 kx }
33 kx
33 kx /* Implement elf_backend_setup_gnu_properties for AArch64. It serves as a
33 kx wrapper function for _bfd_aarch64_elf_link_setup_gnu_properties to account
33 kx for the effect of GNU properties of the output_bfd. */
33 kx static bfd *
33 kx elfNN_aarch64_link_setup_gnu_properties (struct bfd_link_info *info)
33 kx {
33 kx uint32_t prop = elf_aarch64_tdata (info->output_bfd)->gnu_and_prop;
33 kx bfd *pbfd = _bfd_aarch64_elf_link_setup_gnu_properties (info, &prop);
33 kx elf_aarch64_tdata (info->output_bfd)->gnu_and_prop = prop;
33 kx elf_aarch64_tdata (info->output_bfd)->plt_type
33 kx |= (prop & GNU_PROPERTY_AARCH64_FEATURE_1_BTI) ? PLT_BTI : 0;
33 kx setup_plt_values (info, elf_aarch64_tdata (info->output_bfd)->plt_type);
33 kx return pbfd;
33 kx }
33 kx
33 kx /* Implement elf_backend_merge_gnu_properties for AArch64. It serves as a
33 kx wrapper function for _bfd_aarch64_elf_merge_gnu_properties to account
33 kx for the effect of GNU properties of the output_bfd. */
33 kx static bool
33 kx elfNN_aarch64_merge_gnu_properties (struct bfd_link_info *info,
33 kx bfd *abfd, bfd *bbfd,
33 kx elf_property *aprop,
33 kx elf_property *bprop)
33 kx {
33 kx uint32_t prop
33 kx = elf_aarch64_tdata (info->output_bfd)->gnu_and_prop;
33 kx
33 kx /* If output has been marked with BTI using command line argument, give out
33 kx warning if necessary. */
33 kx /* Properties are merged per type, hence only check for warnings when merging
33 kx GNU_PROPERTY_AARCH64_FEATURE_1_AND. */
33 kx if (((aprop && aprop->pr_type == GNU_PROPERTY_AARCH64_FEATURE_1_AND)
33 kx || (bprop && bprop->pr_type == GNU_PROPERTY_AARCH64_FEATURE_1_AND))
33 kx && (prop & GNU_PROPERTY_AARCH64_FEATURE_1_BTI)
33 kx && (!elf_aarch64_tdata (info->output_bfd)->no_bti_warn))
33 kx {
33 kx if ((aprop && !(aprop->u.number & GNU_PROPERTY_AARCH64_FEATURE_1_BTI))
33 kx || !aprop)
33 kx {
33 kx _bfd_error_handler (_("%pB: warning: BTI turned on by -z force-bti when "
33 kx "all inputs do not have BTI in NOTE section."),
33 kx abfd);
33 kx }
33 kx if ((bprop && !(bprop->u.number & GNU_PROPERTY_AARCH64_FEATURE_1_BTI))
33 kx || !bprop)
33 kx {
33 kx _bfd_error_handler (_("%pB: warning: BTI turned on by -z force-bti when "
33 kx "all inputs do not have BTI in NOTE section."),
33 kx bbfd);
33 kx }
33 kx }
33 kx
33 kx return _bfd_aarch64_elf_merge_gnu_properties (info, abfd, aprop,
33 kx bprop, prop);
33 kx }
33 kx
33 kx /* We use this so we can override certain functions
33 kx (though currently we don't). */
33 kx
33 kx const struct elf_size_info elfNN_aarch64_size_info =
33 kx {
33 kx sizeof (ElfNN_External_Ehdr),
33 kx sizeof (ElfNN_External_Phdr),
33 kx sizeof (ElfNN_External_Shdr),
33 kx sizeof (ElfNN_External_Rel),
33 kx sizeof (ElfNN_External_Rela),
33 kx sizeof (ElfNN_External_Sym),
33 kx sizeof (ElfNN_External_Dyn),
33 kx sizeof (Elf_External_Note),
33 kx 4, /* Hash table entry size. */
33 kx 1, /* Internal relocs per external relocs. */
33 kx ARCH_SIZE, /* Arch size. */
33 kx LOG_FILE_ALIGN, /* Log_file_align. */
33 kx ELFCLASSNN, EV_CURRENT,
33 kx bfd_elfNN_write_out_phdrs,
33 kx bfd_elfNN_write_shdrs_and_ehdr,
33 kx bfd_elfNN_checksum_contents,
33 kx bfd_elfNN_write_relocs,
33 kx bfd_elfNN_swap_symbol_in,
33 kx bfd_elfNN_swap_symbol_out,
33 kx bfd_elfNN_slurp_reloc_table,
33 kx bfd_elfNN_slurp_symbol_table,
33 kx bfd_elfNN_swap_dyn_in,
33 kx bfd_elfNN_swap_dyn_out,
33 kx bfd_elfNN_swap_reloc_in,
33 kx bfd_elfNN_swap_reloc_out,
33 kx bfd_elfNN_swap_reloca_in,
33 kx bfd_elfNN_swap_reloca_out
33 kx };
33 kx
33 kx #define ELF_ARCH bfd_arch_aarch64
33 kx #define ELF_MACHINE_CODE EM_AARCH64
33 kx #define ELF_MAXPAGESIZE 0x10000
33 kx #define ELF_COMMONPAGESIZE 0x1000
33 kx
33 kx #define bfd_elfNN_close_and_cleanup \
33 kx elfNN_aarch64_close_and_cleanup
33 kx
33 kx #define bfd_elfNN_bfd_free_cached_info \
33 kx elfNN_aarch64_bfd_free_cached_info
33 kx
33 kx #define bfd_elfNN_bfd_is_target_special_symbol \
33 kx elfNN_aarch64_is_target_special_symbol
33 kx
33 kx #define bfd_elfNN_bfd_link_hash_table_create \
33 kx elfNN_aarch64_link_hash_table_create
33 kx
33 kx #define bfd_elfNN_bfd_merge_private_bfd_data \
33 kx elfNN_aarch64_merge_private_bfd_data
33 kx
33 kx #define bfd_elfNN_bfd_print_private_bfd_data \
33 kx elfNN_aarch64_print_private_bfd_data
33 kx
33 kx #define bfd_elfNN_bfd_reloc_type_lookup \
33 kx elfNN_aarch64_reloc_type_lookup
33 kx
33 kx #define bfd_elfNN_bfd_reloc_name_lookup \
33 kx elfNN_aarch64_reloc_name_lookup
33 kx
33 kx #define bfd_elfNN_bfd_set_private_flags \
33 kx elfNN_aarch64_set_private_flags
33 kx
33 kx #define bfd_elfNN_find_inliner_info \
33 kx elfNN_aarch64_find_inliner_info
33 kx
33 kx #define bfd_elfNN_get_synthetic_symtab \
33 kx elfNN_aarch64_get_synthetic_symtab
33 kx
33 kx #define bfd_elfNN_mkobject \
33 kx elfNN_aarch64_mkobject
33 kx
33 kx #define bfd_elfNN_new_section_hook \
33 kx elfNN_aarch64_new_section_hook
33 kx
33 kx #define elf_backend_adjust_dynamic_symbol \
33 kx elfNN_aarch64_adjust_dynamic_symbol
33 kx
33 kx #define elf_backend_always_size_sections \
33 kx elfNN_aarch64_always_size_sections
33 kx
33 kx #define elf_backend_check_relocs \
33 kx elfNN_aarch64_check_relocs
33 kx
33 kx #define elf_backend_copy_indirect_symbol \
33 kx elfNN_aarch64_copy_indirect_symbol
33 kx
33 kx #define elf_backend_merge_symbol_attribute \
33 kx elfNN_aarch64_merge_symbol_attribute
33 kx
33 kx /* Create .dynbss, and .rela.bss sections in DYNOBJ, and set up shortcuts
33 kx to them in our hash. */
33 kx #define elf_backend_create_dynamic_sections \
33 kx elfNN_aarch64_create_dynamic_sections
33 kx
33 kx #define elf_backend_init_index_section \
33 kx _bfd_elf_init_2_index_sections
33 kx
33 kx #define elf_backend_finish_dynamic_sections \
33 kx elfNN_aarch64_finish_dynamic_sections
33 kx
33 kx #define elf_backend_finish_dynamic_symbol \
33 kx elfNN_aarch64_finish_dynamic_symbol
33 kx
33 kx #define elf_backend_object_p \
33 kx elfNN_aarch64_object_p
33 kx
33 kx #define elf_backend_output_arch_local_syms \
33 kx elfNN_aarch64_output_arch_local_syms
33 kx
33 kx #define elf_backend_maybe_function_sym \
33 kx elfNN_aarch64_maybe_function_sym
33 kx
33 kx #define elf_backend_plt_sym_val \
33 kx elfNN_aarch64_plt_sym_val
33 kx
33 kx #define elf_backend_init_file_header \
33 kx elfNN_aarch64_init_file_header
33 kx
33 kx #define elf_backend_relocate_section \
33 kx elfNN_aarch64_relocate_section
33 kx
33 kx #define elf_backend_reloc_type_class \
33 kx elfNN_aarch64_reloc_type_class
33 kx
33 kx #define elf_backend_section_from_shdr \
33 kx elfNN_aarch64_section_from_shdr
33 kx
33 kx #define elf_backend_section_from_phdr \
33 kx elfNN_aarch64_section_from_phdr
33 kx
33 kx #define elf_backend_modify_headers \
33 kx elfNN_aarch64_modify_headers
33 kx
33 kx #define elf_backend_size_dynamic_sections \
33 kx elfNN_aarch64_size_dynamic_sections
33 kx
33 kx #define elf_backend_size_info \
33 kx elfNN_aarch64_size_info
33 kx
33 kx #define elf_backend_write_section \
33 kx elfNN_aarch64_write_section
33 kx
33 kx #define elf_backend_symbol_processing \
33 kx elfNN_aarch64_backend_symbol_processing
33 kx
33 kx #define elf_backend_setup_gnu_properties \
33 kx elfNN_aarch64_link_setup_gnu_properties
33 kx
33 kx #define elf_backend_merge_gnu_properties \
33 kx elfNN_aarch64_merge_gnu_properties
33 kx
33 kx #define elf_backend_can_refcount 1
33 kx #define elf_backend_can_gc_sections 1
33 kx #define elf_backend_plt_readonly 1
33 kx #define elf_backend_want_got_plt 1
33 kx #define elf_backend_want_plt_sym 0
33 kx #define elf_backend_want_dynrelro 1
33 kx #define elf_backend_may_use_rel_p 0
33 kx #define elf_backend_may_use_rela_p 1
33 kx #define elf_backend_default_use_rela_p 1
33 kx #define elf_backend_rela_normal 1
33 kx #define elf_backend_dtrel_excludes_plt 1
33 kx #define elf_backend_got_header_size (GOT_ENTRY_SIZE * 3)
33 kx #define elf_backend_default_execstack 0
33 kx #define elf_backend_extern_protected_data 0
33 kx #define elf_backend_hash_symbol elf_aarch64_hash_symbol
33 kx
33 kx #undef elf_backend_obj_attrs_section
33 kx #define elf_backend_obj_attrs_section ".ARM.attributes"
33 kx
33 kx #include "elfNN-target.h"
33 kx
33 kx /* CloudABI support. */
33 kx
33 kx #undef TARGET_LITTLE_SYM
33 kx #define TARGET_LITTLE_SYM aarch64_elfNN_le_cloudabi_vec
33 kx #undef TARGET_LITTLE_NAME
33 kx #define TARGET_LITTLE_NAME "elfNN-littleaarch64-cloudabi"
33 kx #undef TARGET_BIG_SYM
33 kx #define TARGET_BIG_SYM aarch64_elfNN_be_cloudabi_vec
33 kx #undef TARGET_BIG_NAME
33 kx #define TARGET_BIG_NAME "elfNN-bigaarch64-cloudabi"
33 kx
33 kx #undef ELF_OSABI
33 kx #define ELF_OSABI ELFOSABI_CLOUDABI
33 kx
33 kx #undef elfNN_bed
33 kx #define elfNN_bed elfNN_aarch64_cloudabi_bed
33 kx
33 kx #include "elfNN-target.h"
Radix cross Linux
The main Radix cross Linux repository contains the build scripts of packages, which have the most complete and common functionality for desktop machines
452 Commits
2 Branches
1 Tag