bfd/elfnn-aarch64.c

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