gold/sparc.cc

   1 // sparc.cc -- sparc target support for gold.
   2
   3 // Copyright (C) 2008-2018 Free Software Foundation, Inc.
   4 // Written by David S. Miller <davem@davemloft.net>.
   5
   6 // This file is part of gold.
   7
   8 // This program is free software; you can redistribute it and/or modify
   9 // it under the terms of the GNU General Public License as published by
  10 // the Free Software Foundation; either version 3 of the License, or
  11 // (at your option) any later version.
  12
  13 // This program is distributed in the hope that it will be useful,
  14 // but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 // GNU General Public License for more details.
  17
  18 // You should have received a copy of the GNU General Public License
  19 // along with this program; if not, write to the Free Software
  20 // Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
  21 // MA 02110-1301, USA.
  22
  23 #include "gold.h"
  24
  25 #include <cstdlib>
  26 #include <cstdio>
  27 #include <cstring>
  28
  29 #include "elfcpp.h"
  30 #include "parameters.h"
  31 #include "reloc.h"
  32 #include "sparc.h"
  33 #include "object.h"
  34 #include "symtab.h"
  35 #include "layout.h"
  36 #include "output.h"
  37 #include "copy-relocs.h"
  38 #include "target.h"
  39 #include "target-reloc.h"
  40 #include "target-select.h"
  41 #include "tls.h"
  42 #include "errors.h"
  43 #include "gc.h"
  44
  45 namespace
  46 {
  47
  48 using namespace gold;
  49
  50 template<int size, bool big_endian>
  51 class Output_data_plt_sparc;
  52
  53 template<int size, bool big_endian>
  54 class Target_sparc : public Sized_target<size, big_endian>
  55 {
  56  public:
  57   typedef Output_data_reloc<elfcpp::SHT_RELA, true, size, big_endian> Reloc_section;
  58
  59   Target_sparc()
  60     : Sized_target<size, big_endian>(&sparc_info),
  61       got_(NULL), plt_(NULL), rela_dyn_(NULL), rela_ifunc_(NULL),
  62       copy_relocs_(elfcpp::R_SPARC_COPY),
  63       got_mod_index_offset_(-1U), tls_get_addr_sym_(NULL),
  64       elf_machine_(sparc_info.machine_code), elf_flags_(0),
  65       elf_flags_set_(false), register_syms_()
  66   {
  67   }
  68
  69   // Make a new symbol table entry.
  70   Sized_symbol<size>*
  71   make_symbol(const char*, elfcpp::STT, Object*, unsigned int, uint64_t);
  72
  73   // Process the relocations to determine unreferenced sections for
  74   // garbage collection.
  75   void
  76   gc_process_relocs(Symbol_table* symtab,
  77                     Layout* layout,
  78                     Sized_relobj_file<size, big_endian>* object,
  79                     unsigned int data_shndx,
  80                     unsigned int sh_type,
  81                     const unsigned char* prelocs,
  82                     size_t reloc_count,
  83                     Output_section* output_section,
  84                     bool needs_special_offset_handling,
  85                     size_t local_symbol_count,
  86                     const unsigned char* plocal_symbols);
  87
  88   // Scan the relocations to look for symbol adjustments.
  89   void
  90   scan_relocs(Symbol_table* symtab,
  91               Layout* layout,
  92               Sized_relobj_file<size, big_endian>* object,
  93               unsigned int data_shndx,
  94               unsigned int sh_type,
  95               const unsigned char* prelocs,
  96               size_t reloc_count,
  97               Output_section* output_section,
  98               bool needs_special_offset_handling,
  99               size_t local_symbol_count,
 100               const unsigned char* plocal_symbols);
 101   // Finalize the sections.
 102   void
 103   do_finalize_sections(Layout*, const Input_objects*, Symbol_table*);
 104
 105   // Return the value to use for a dynamic which requires special
 106   // treatment.
 107   uint64_t
 108   do_dynsym_value(const Symbol*) const;
 109
 110   // Relocate a section.
 111   void
 112   relocate_section(const Relocate_info<size, big_endian>*,
 113                    unsigned int sh_type,
 114                    const unsigned char* prelocs,
 115                    size_t reloc_count,
 116                    Output_section* output_section,
 117                    bool needs_special_offset_handling,
 118                    unsigned char* view,
 119                    typename elfcpp::Elf_types<size>::Elf_Addr view_address,
 120                    section_size_type view_size,
 121                    const Reloc_symbol_changes*);
 122
 123   // Scan the relocs during a relocatable link.
 124   void
 125   scan_relocatable_relocs(Symbol_table* symtab,
 126                           Layout* layout,
 127                           Sized_relobj_file<size, big_endian>* object,
 128                           unsigned int data_shndx,
 129                           unsigned int sh_type,
 130                           const unsigned char* prelocs,
 131                           size_t reloc_count,
 132                           Output_section* output_section,
 133                           bool needs_special_offset_handling,
 134                           size_t local_symbol_count,
 135                           const unsigned char* plocal_symbols,
 136                           Relocatable_relocs*);
 137
 138   // Scan the relocs for --emit-relocs.
 139   void
 140   emit_relocs_scan(Symbol_table* symtab,
 141                    Layout* layout,
 142                    Sized_relobj_file<size, big_endian>* object,
 143                    unsigned int data_shndx,
 144                    unsigned int sh_type,
 145                    const unsigned char* prelocs,
 146                    size_t reloc_count,
 147                    Output_section* output_section,
 148                    bool needs_special_offset_handling,
 149                    size_t local_symbol_count,
 150                    const unsigned char* plocal_syms,
 151                    Relocatable_relocs* rr);
 152
 153   // Emit relocations for a section.
 154   void
 155   relocate_relocs(const Relocate_info<size, big_endian>*,
 156                   unsigned int sh_type,
 157                   const unsigned char* prelocs,
 158                   size_t reloc_count,
 159                   Output_section* output_section,
 160                   typename elfcpp::Elf_types<size>::Elf_Off
 161                     offset_in_output_section,
 162                   unsigned char* view,
 163                   typename elfcpp::Elf_types<size>::Elf_Addr view_address,
 164                   section_size_type view_size,
 165                   unsigned char* reloc_view,
 166                   section_size_type reloc_view_size);
 167
 168   // Return whether SYM is defined by the ABI.
 169   bool
 170   do_is_defined_by_abi(const Symbol* sym) const
 171   { return strcmp(sym->name(), "___tls_get_addr") == 0; }
 172
 173   // Return the PLT address to use for a global symbol.
 174   uint64_t
 175   do_plt_address_for_global(const Symbol* gsym) const
 176   { return this->plt_section()->address_for_global(gsym); }
 177
 178   uint64_t
 179   do_plt_address_for_local(const Relobj* relobj, unsigned int symndx) const
 180   { return this->plt_section()->address_for_local(relobj, symndx); }
 181
 182   // Return whether there is a GOT section.
 183   bool
 184   has_got_section() const
 185   { return this->got_ != NULL; }
 186
 187   // Return the size of the GOT section.
 188   section_size_type
 189   got_size() const
 190   {
 191     gold_assert(this->got_ != NULL);
 192     return this->got_->data_size();
 193   }
 194
 195   // Return the number of entries in the GOT.
 196   unsigned int
 197   got_entry_count() const
 198   {
 199     if (this->got_ == NULL)
 200       return 0;
 201     return this->got_size() / (size / 8);
 202   }
 203
 204   // Return the address of the GOT.
 205   uint64_t
 206   got_address() const
 207   {
 208     if (this->got_ == NULL)
 209       return 0;
 210     return this->got_->address();
 211   }
 212
 213   // Return the number of entries in the PLT.
 214   unsigned int
 215   plt_entry_count() const;
 216
 217   // Return the offset of the first non-reserved PLT entry.
 218   unsigned int
 219   first_plt_entry_offset() const;
 220
 221   // Return the size of each PLT entry.
 222   unsigned int
 223   plt_entry_size() const;
 224
 225  protected:
 226   // Make an ELF object.
 227   Object*
 228   do_make_elf_object(const std::string&, Input_file*, off_t,
 229                      const elfcpp::Ehdr<size, big_endian>& ehdr);
 230
 231   void
 232   do_adjust_elf_header(unsigned char* view, int len);
 233
 234  private:
 235
 236   // The class which scans relocations.
 237   class Scan
 238   {
 239   public:
 240     Scan()
 241       : issued_non_pic_error_(false)
 242     { }
 243
 244     static inline int
 245     get_reference_flags(unsigned int r_type);
 246
 247     inline void
 248     local(Symbol_table* symtab, Layout* layout, Target_sparc* target,
 249           Sized_relobj_file<size, big_endian>* object,
 250           unsigned int data_shndx,
 251           Output_section* output_section,
 252           const elfcpp::Rela<size, big_endian>& reloc, unsigned int r_type,
 253           const elfcpp::Sym<size, big_endian>& lsym,
 254           bool is_discarded);
 255
 256     inline void
 257     global(Symbol_table* symtab, Layout* layout, Target_sparc* target,
 258            Sized_relobj_file<size, big_endian>* object,
 259            unsigned int data_shndx,
 260            Output_section* output_section,
 261            const elfcpp::Rela<size, big_endian>& reloc, unsigned int r_type,
 262            Symbol* gsym);
 263
 264     inline bool
 265     local_reloc_may_be_function_pointer(Symbol_table* , Layout* ,
 266                                         Target_sparc* ,
 267                                         Sized_relobj_file<size, big_endian>* ,
 268                                         unsigned int ,
 269                                         Output_section* ,
 270                                         const elfcpp::Rela<size, big_endian>& ,
 271                                         unsigned int ,
 272                                         const elfcpp::Sym<size, big_endian>&)
 273     { return false; }
 274
 275     inline bool
 276     global_reloc_may_be_function_pointer(Symbol_table* , Layout* ,
 277                                          Target_sparc* ,
 278                                          Sized_relobj_file<size, big_endian>* ,
 279                                          unsigned int ,
 280                                          Output_section* ,
 281                                          const elfcpp::Rela<size,
 282                                                             big_endian>& ,
 283                                          unsigned int , Symbol*)
 284     { return false; }
 285
 286
 287   private:
 288     static void
 289     unsupported_reloc_local(Sized_relobj_file<size, big_endian>*,
 290                             unsigned int r_type);
 291
 292     static void
 293     unsupported_reloc_global(Sized_relobj_file<size, big_endian>*,
 294                              unsigned int r_type, Symbol*);
 295
 296     static void
 297     generate_tls_call(Symbol_table* symtab, Layout* layout,
 298                       Target_sparc* target);
 299
 300     void
 301     check_non_pic(Relobj*, unsigned int r_type);
 302
 303     bool
 304     reloc_needs_plt_for_ifunc(Sized_relobj_file<size, big_endian>*,
 305                               unsigned int r_type);
 306
 307     // Whether we have issued an error about a non-PIC compilation.
 308     bool issued_non_pic_error_;
 309   };
 310
 311   // The class which implements relocation.
 312   class Relocate
 313   {
 314    public:
 315     Relocate()
 316       : ignore_gd_add_(false), reloc_adjust_addr_(NULL)
 317     { }
 318
 319     ~Relocate()
 320     {
 321       if (this->ignore_gd_add_)
 322         {
 323           // FIXME: This needs to specify the location somehow.
 324           gold_error(_("missing expected TLS relocation"));
 325         }
 326     }
 327
 328     // Do a relocation.  Return false if the caller should not issue
 329     // any warnings about this relocation.
 330     inline bool
 331     relocate(const Relocate_info<size, big_endian>*, unsigned int,
 332              Target_sparc*, Output_section*, size_t, const unsigned char*,
 333              const Sized_symbol<size>*, const Symbol_value<size>*,
 334              unsigned char*, typename elfcpp::Elf_types<size>::Elf_Addr,
 335              section_size_type);
 336
 337    private:
 338     // Do a TLS relocation.
 339     inline void
 340     relocate_tls(const Relocate_info<size, big_endian>*, Target_sparc* target,
 341                  size_t relnum, const elfcpp::Rela<size, big_endian>&,
 342                  unsigned int r_type, const Sized_symbol<size>*,
 343                  const Symbol_value<size>*,
 344                  unsigned char*,
 345                  typename elfcpp::Elf_types<size>::Elf_Addr,
 346                  section_size_type);
 347
 348     inline void
 349     relax_call(Target_sparc<size, big_endian>* target,
 350                unsigned char* view,
 351                const elfcpp::Rela<size, big_endian>& rela,
 352                section_size_type view_size);
 353
 354     // Ignore the next relocation which should be R_SPARC_TLS_GD_ADD
 355     bool ignore_gd_add_;
 356
 357     // If we hit a reloc at this view address, adjust it back by 4 bytes.
 358     unsigned char *reloc_adjust_addr_;
 359   };
 360
 361   // Get the GOT section, creating it if necessary.
 362   Output_data_got<size, big_endian>*
 363   got_section(Symbol_table*, Layout*);
 364
 365   // Create the PLT section.
 366   void
 367   make_plt_section(Symbol_table* symtab, Layout* layout);
 368
 369   // Create a PLT entry for a global symbol.
 370   void
 371   make_plt_entry(Symbol_table*, Layout*, Symbol*);
 372
 373   // Create a PLT entry for a local STT_GNU_IFUNC symbol.
 374   void
 375   make_local_ifunc_plt_entry(Symbol_table*, Layout*,
 376                              Sized_relobj_file<size, big_endian>* relobj,
 377                              unsigned int local_sym_index);
 378
 379   // Create a GOT entry for the TLS module index.
 380   unsigned int
 381   got_mod_index_entry(Symbol_table* symtab, Layout* layout,
 382                       Sized_relobj_file<size, big_endian>* object);
 383
 384   // Return the gsym for "__tls_get_addr".  Cache if not already
 385   // cached.
 386   Symbol*
 387   tls_get_addr_sym(Symbol_table* symtab)
 388   {
 389     if (!this->tls_get_addr_sym_)
 390       this->tls_get_addr_sym_ = symtab->lookup("__tls_get_addr", NULL);
 391     gold_assert(this->tls_get_addr_sym_);
 392     return this->tls_get_addr_sym_;
 393   }
 394
 395   // Get the PLT section.
 396   Output_data_plt_sparc<size, big_endian>*
 397   plt_section() const
 398   {
 399     gold_assert(this->plt_ != NULL);
 400     return this->plt_;
 401   }
 402
 403   // Get the dynamic reloc section, creating it if necessary.
 404   Reloc_section*
 405   rela_dyn_section(Layout*);
 406
 407   // Get the section to use for IFUNC relocations.
 408   Reloc_section*
 409   rela_ifunc_section(Layout*);
 410
 411   // Copy a relocation against a global symbol.
 412   void
 413   copy_reloc(Symbol_table* symtab, Layout* layout,
 414              Sized_relobj_file<size, big_endian>* object,
 415              unsigned int shndx, Output_section* output_section,
 416              Symbol* sym, const elfcpp::Rela<size, big_endian>& reloc)
 417   {
 418     unsigned int r_type = elfcpp::elf_r_type<size>(reloc.get_r_info());
 419     this->copy_relocs_.copy_reloc(symtab, layout,
 420                                   symtab->get_sized_symbol<size>(sym),
 421                                   object, shndx, output_section,
 422                                   r_type, reloc.get_r_offset(),
 423                                   reloc.get_r_addend(),
 424                                   this->rela_dyn_section(layout));
 425   }
 426
 427   // Information about this specific target which we pass to the
 428   // general Target structure.
 429   static Target::Target_info sparc_info;
 430
 431   // The types of GOT entries needed for this platform.
 432   // These values are exposed to the ABI in an incremental link.
 433   // Do not renumber existing values without changing the version
 434   // number of the .gnu_incremental_inputs section.
 435   enum Got_type
 436   {
 437     GOT_TYPE_STANDARD = 0,      // GOT entry for a regular symbol
 438     GOT_TYPE_TLS_OFFSET = 1,    // GOT entry for TLS offset
 439     GOT_TYPE_TLS_PAIR = 2,      // GOT entry for TLS module/offset pair
 440   };
 441
 442   struct Register_symbol
 443   {
 444     Register_symbol()
 445       : name(NULL), shndx(0), obj(NULL)
 446     { }
 447     const char* name;
 448     unsigned int shndx;
 449     Object* obj;
 450   };
 451
 452   // The GOT section.
 453   Output_data_got<size, big_endian>* got_;
 454   // The PLT section.
 455   Output_data_plt_sparc<size, big_endian>* plt_;
 456   // The dynamic reloc section.
 457   Reloc_section* rela_dyn_;
 458   // The section to use for IFUNC relocs.
 459   Reloc_section* rela_ifunc_;
 460   // Relocs saved to avoid a COPY reloc.
 461   Copy_relocs<elfcpp::SHT_RELA, size, big_endian> copy_relocs_;
 462   // Offset of the GOT entry for the TLS module index;
 463   unsigned int got_mod_index_offset_;
 464   // Cached pointer to __tls_get_addr symbol
 465   Symbol* tls_get_addr_sym_;
 466   // Accumulated elf machine type
 467   elfcpp::Elf_Half elf_machine_;
 468   // Accumulated elf header flags
 469   elfcpp::Elf_Word elf_flags_;
 470   // Whether elf_flags_ has been set for the first time yet
 471   bool elf_flags_set_;
 472   // STT_SPARC_REGISTER symbols (%g2, %g3, %g6, %g7).
 473   Register_symbol register_syms_[4];
 474 };
 475
 476 template<>
 477 Target::Target_info Target_sparc<32, true>::sparc_info =
 478 {
 479   32,                   // size
 480   true,                 // is_big_endian
 481   elfcpp::EM_SPARC,     // machine_code
 482   false,                // has_make_symbol
 483   false,                // has_resolve
 484   false,                // has_code_fill
 485   true,                 // is_default_stack_executable
 486   false,                // can_icf_inline_merge_sections
 487   '\0',                 // wrap_char
 488   "/usr/lib/ld.so.1",   // dynamic_linker
 489   0x00010000,           // default_text_segment_address
 490   64 * 1024,            // abi_pagesize (overridable by -z max-page-size)
 491   8 * 1024,             // common_pagesize (overridable by -z common-page-size)
 492   false,                // isolate_execinstr
 493   0,                    // rosegment_gap
 494   elfcpp::SHN_UNDEF,    // small_common_shndx
 495   elfcpp::SHN_UNDEF,    // large_common_shndx
 496   0,                    // small_common_section_flags
 497   0,                    // large_common_section_flags
 498   NULL,                 // attributes_section
 499   NULL,                 // attributes_vendor
 500   "_start",             // entry_symbol_name
 501   32,                   // hash_entry_size
 502 };
 503
 504 template<>
 505 Target::Target_info Target_sparc<64, true>::sparc_info =
 506 {
 507   64,                   // size
 508   true,                 // is_big_endian
 509   elfcpp::EM_SPARCV9,   // machine_code
 510   true,                 // has_make_symbol
 511   false,                // has_resolve
 512   false,                // has_code_fill
 513   true,                 // is_default_stack_executable
 514   false,                // can_icf_inline_merge_sections
 515   '\0',                 // wrap_char
 516   "/usr/lib/sparcv9/ld.so.1",   // dynamic_linker
 517   0x100000,             // default_text_segment_address
 518   64 * 1024,            // abi_pagesize (overridable by -z max-page-size)
 519   8 * 1024,             // common_pagesize (overridable by -z common-page-size)
 520   false,                // isolate_execinstr
 521   0,                    // rosegment_gap
 522   elfcpp::SHN_UNDEF,    // small_common_shndx
 523   elfcpp::SHN_UNDEF,    // large_common_shndx
 524   0,                    // small_common_section_flags
 525   0,                    // large_common_section_flags
 526   NULL,                 // attributes_section
 527   NULL,                 // attributes_vendor
 528   "_start",             // entry_symbol_name
 529   32,                   // hash_entry_size
 530 };
 531
 532 // We have to take care here, even when operating in little-endian
 533 // mode, sparc instructions are still big endian.
 534 template<int size, bool big_endian>
 535 class Sparc_relocate_functions
 536 {
 537 private:
 538   // Do a simple relocation with the addend in the relocation.
 539   template<int valsize>
 540   static inline void
 541   rela(unsigned char* view,
 542        unsigned int right_shift,
 543        typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
 544        typename elfcpp::Swap<size, big_endian>::Valtype value,
 545        typename elfcpp::Swap<size, big_endian>::Valtype addend)
 546   {
 547     typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
 548     Valtype* wv = reinterpret_cast<Valtype*>(view);
 549     Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
 550     Valtype reloc = ((value + addend) >> right_shift);
 551
 552     val &= ~dst_mask;
 553     reloc &= dst_mask;
 554
 555     elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
 556   }
 557
 558   // Do a simple relocation using a symbol value with the addend in
 559   // the relocation.
 560   template<int valsize>
 561   static inline void
 562   rela(unsigned char* view,
 563        unsigned int right_shift,
 564        typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
 565        const Sized_relobj_file<size, big_endian>* object,
 566        const Symbol_value<size>* psymval,
 567        typename elfcpp::Swap<valsize, big_endian>::Valtype addend)
 568   {
 569     typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
 570     Valtype* wv = reinterpret_cast<Valtype*>(view);
 571     Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
 572     Valtype reloc = (psymval->value(object, addend) >> right_shift);
 573
 574     val &= ~dst_mask;
 575     reloc &= dst_mask;
 576
 577     elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
 578   }
 579
 580   // Do a simple relocation using a symbol value with the addend in
 581   // the relocation, unaligned.
 582   template<int valsize>
 583   static inline void
 584   rela_ua(unsigned char* view,
 585           unsigned int right_shift, elfcpp::Elf_Xword dst_mask,
 586           const Sized_relobj_file<size, big_endian>* object,
 587           const Symbol_value<size>* psymval,
 588           typename elfcpp::Swap<size, big_endian>::Valtype addend)
 589   {
 590     typedef typename elfcpp::Swap_unaligned<valsize,
 591             big_endian>::Valtype Valtype;
 592     unsigned char* wv = view;
 593     Valtype val = elfcpp::Swap_unaligned<valsize, big_endian>::readval(wv);
 594     Valtype reloc = (psymval->value(object, addend) >> right_shift);
 595
 596     val &= ~dst_mask;
 597     reloc &= dst_mask;
 598
 599     elfcpp::Swap_unaligned<valsize, big_endian>::writeval(wv, val | reloc);
 600   }
 601
 602   // Do a simple PC relative relocation with a Symbol_value with the
 603   // addend in the relocation.
 604   template<int valsize>
 605   static inline void
 606   pcrela(unsigned char* view,
 607          unsigned int right_shift,
 608          typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
 609          const Sized_relobj_file<size, big_endian>* object,
 610          const Symbol_value<size>* psymval,
 611          typename elfcpp::Swap<size, big_endian>::Valtype addend,
 612          typename elfcpp::Elf_types<size>::Elf_Addr address)
 613   {
 614     typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
 615     Valtype* wv = reinterpret_cast<Valtype*>(view);
 616     Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
 617     Valtype reloc = ((psymval->value(object, addend) - address)
 618                      >> right_shift);
 619
 620     val &= ~dst_mask;
 621     reloc &= dst_mask;
 622
 623     elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
 624   }
 625
 626   template<int valsize>
 627   static inline void
 628   pcrela_unaligned(unsigned char* view,
 629                    const Sized_relobj_file<size, big_endian>* object,
 630                    const Symbol_value<size>* psymval,
 631                    typename elfcpp::Swap<size, big_endian>::Valtype addend,
 632                    typename elfcpp::Elf_types<size>::Elf_Addr address)
 633   {
 634     typedef typename elfcpp::Swap_unaligned<valsize,
 635             big_endian>::Valtype Valtype;
 636     unsigned char* wv = view;
 637     Valtype reloc = (psymval->value(object, addend) - address);
 638
 639     elfcpp::Swap_unaligned<valsize, big_endian>::writeval(wv, reloc);
 640   }
 641
 642   typedef Sparc_relocate_functions<size, big_endian> This;
 643   typedef Sparc_relocate_functions<size, true> This_insn;
 644
 645 public:
 646   // R_SPARC_WDISP30: (Symbol + Addend - Address) >> 2
 647   static inline void
 648   wdisp30(unsigned char* view,
 649            const Sized_relobj_file<size, big_endian>* object,
 650            const Symbol_value<size>* psymval,
 651            typename elfcpp::Elf_types<size>::Elf_Addr addend,
 652            typename elfcpp::Elf_types<size>::Elf_Addr address)
 653   {
 654     This_insn::template pcrela<32>(view, 2, 0x3fffffff, object,
 655                                    psymval, addend, address);
 656   }
 657
 658   // R_SPARC_WDISP22: (Symbol + Addend - Address) >> 2
 659   static inline void
 660   wdisp22(unsigned char* view,
 661            const Sized_relobj_file<size, big_endian>* object,
 662            const Symbol_value<size>* psymval,
 663            typename elfcpp::Elf_types<size>::Elf_Addr addend,
 664            typename elfcpp::Elf_types<size>::Elf_Addr address)
 665   {
 666     This_insn::template pcrela<32>(view, 2, 0x003fffff, object,
 667                                    psymval, addend, address);
 668   }
 669
 670   // R_SPARC_WDISP19: (Symbol + Addend - Address) >> 2
 671   static inline void
 672   wdisp19(unsigned char* view,
 673           const Sized_relobj_file<size, big_endian>* object,
 674           const Symbol_value<size>* psymval,
 675           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 676           typename elfcpp::Elf_types<size>::Elf_Addr address)
 677   {
 678     This_insn::template pcrela<32>(view, 2, 0x0007ffff, object,
 679                                    psymval, addend, address);
 680   }
 681
 682   // R_SPARC_WDISP16: (Symbol + Addend - Address) >> 2
 683   static inline void
 684   wdisp16(unsigned char* view,
 685           const Sized_relobj_file<size, big_endian>* object,
 686           const Symbol_value<size>* psymval,
 687           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 688           typename elfcpp::Elf_types<size>::Elf_Addr address)
 689   {
 690     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
 691     Valtype* wv = reinterpret_cast<Valtype*>(view);
 692     Valtype val = elfcpp::Swap<32, true>::readval(wv);
 693     Valtype reloc = ((psymval->value(object, addend) - address)
 694                      >> 2);
 695
 696     // The relocation value is split between the low 14 bits,
 697     // and bits 20-21.
 698     val &= ~((0x3 << 20) | 0x3fff);
 699     reloc = (((reloc & 0xc000) << (20 - 14))
 700              | (reloc & 0x3ffff));
 701
 702     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
 703   }
 704
 705   // R_SPARC_WDISP10: (Symbol + Addend - Address) >> 2
 706   static inline void
 707   wdisp10(unsigned char* view,
 708           const Sized_relobj_file<size, big_endian>* object,
 709           const Symbol_value<size>* psymval,
 710           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 711           typename elfcpp::Elf_types<size>::Elf_Addr address)
 712   {
 713     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
 714     Valtype* wv = reinterpret_cast<Valtype*>(view);
 715     Valtype val = elfcpp::Swap<32, true>::readval(wv);
 716     Valtype reloc = ((psymval->value(object, addend) - address)
 717                      >> 2);
 718
 719     // The relocation value is split between the low bits 5-12,
 720     // and high bits 19-20.
 721     val &= ~((0x3 << 19) | (0xff << 5));
 722     reloc = (((reloc & 0x300) << (19 - 8))
 723              | ((reloc & 0xff) << (5 - 0)));
 724
 725     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
 726   }
 727
 728   // R_SPARC_PC22: (Symbol + Addend - Address) >> 10
 729   static inline void
 730   pc22(unsigned char* view,
 731        const Sized_relobj_file<size, big_endian>* object,
 732        const Symbol_value<size>* psymval,
 733        typename elfcpp::Elf_types<size>::Elf_Addr addend,
 734        typename elfcpp::Elf_types<size>::Elf_Addr address)
 735   {
 736     This_insn::template pcrela<32>(view, 10, 0x003fffff, object,
 737                                    psymval, addend, address);
 738   }
 739
 740   // R_SPARC_PC10: (Symbol + Addend - Address) & 0x3ff
 741   static inline void
 742   pc10(unsigned char* view,
 743        const Sized_relobj_file<size, big_endian>* object,
 744        const Symbol_value<size>* psymval,
 745        typename elfcpp::Elf_types<size>::Elf_Addr addend,
 746        typename elfcpp::Elf_types<size>::Elf_Addr address)
 747   {
 748     This_insn::template pcrela<32>(view, 0, 0x000003ff, object,
 749                                    psymval, addend, address);
 750   }
 751
 752   // R_SPARC_HI22: (Symbol + Addend) >> 10
 753   static inline void
 754   hi22(unsigned char* view,
 755        typename elfcpp::Elf_types<size>::Elf_Addr value,
 756        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 757   {
 758     This_insn::template rela<32>(view, 10, 0x003fffff, value, addend);
 759   }
 760
 761   // R_SPARC_HI22: (Symbol + Addend) >> 10
 762   static inline void
 763   hi22(unsigned char* view,
 764        const Sized_relobj_file<size, big_endian>* object,
 765        const Symbol_value<size>* psymval,
 766        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 767   {
 768     This_insn::template rela<32>(view, 10, 0x003fffff, object, psymval, addend);
 769   }
 770
 771   // R_SPARC_PCPLT22: (Symbol + Addend - Address) >> 10
 772   static inline void
 773   pcplt22(unsigned char* view,
 774           const Sized_relobj_file<size, big_endian>* object,
 775           const Symbol_value<size>* psymval,
 776           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 777           typename elfcpp::Elf_types<size>::Elf_Addr address)
 778   {
 779     This_insn::template pcrela<32>(view, 10, 0x003fffff, object,
 780                                    psymval, addend, address);
 781   }
 782
 783   // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
 784   static inline void
 785   lo10(unsigned char* view,
 786        typename elfcpp::Elf_types<size>::Elf_Addr value,
 787        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 788   {
 789     This_insn::template rela<32>(view, 0, 0x000003ff, value, addend);
 790   }
 791
 792   // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
 793   static inline void
 794   lo10(unsigned char* view,
 795        const Sized_relobj_file<size, big_endian>* object,
 796        const Symbol_value<size>* psymval,
 797        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 798   {
 799     This_insn::template rela<32>(view, 0, 0x000003ff, object, psymval, addend);
 800   }
 801
 802   // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
 803   static inline void
 804   lo10(unsigned char* view,
 805        const Sized_relobj_file<size, big_endian>* object,
 806        const Symbol_value<size>* psymval,
 807        typename elfcpp::Elf_types<size>::Elf_Addr addend,
 808        typename elfcpp::Elf_types<size>::Elf_Addr address)
 809   {
 810     This_insn::template pcrela<32>(view, 0, 0x000003ff, object,
 811                                    psymval, addend, address);
 812   }
 813
 814   // R_SPARC_OLO10: ((Symbol + Addend) & 0x3ff) + Addend2
 815   static inline void
 816   olo10(unsigned char* view,
 817         const Sized_relobj_file<size, big_endian>* object,
 818         const Symbol_value<size>* psymval,
 819         typename elfcpp::Elf_types<size>::Elf_Addr addend,
 820         typename elfcpp::Elf_types<size>::Elf_Addr addend2)
 821   {
 822     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
 823     Valtype* wv = reinterpret_cast<Valtype*>(view);
 824     Valtype val = elfcpp::Swap<32, true>::readval(wv);
 825     Valtype reloc = psymval->value(object, addend);
 826
 827     val &= ~0x1fff;
 828     reloc &= 0x3ff;
 829     reloc += addend2;
 830     reloc &= 0x1fff;
 831
 832     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
 833   }
 834
 835   // R_SPARC_22: (Symbol + Addend)
 836   static inline void
 837   rela32_22(unsigned char* view,
 838             const Sized_relobj_file<size, big_endian>* object,
 839             const Symbol_value<size>* psymval,
 840             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 841   {
 842     This_insn::template rela<32>(view, 0, 0x003fffff, object, psymval, addend);
 843   }
 844
 845   // R_SPARC_13: (Symbol + Addend)
 846   static inline void
 847   rela32_13(unsigned char* view,
 848             typename elfcpp::Elf_types<size>::Elf_Addr value,
 849             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 850   {
 851     This_insn::template rela<32>(view, 0, 0x00001fff, value, addend);
 852   }
 853
 854   // R_SPARC_13: (Symbol + Addend)
 855   static inline void
 856   rela32_13(unsigned char* view,
 857             const Sized_relobj_file<size, big_endian>* object,
 858             const Symbol_value<size>* psymval,
 859             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 860   {
 861     This_insn::template rela<32>(view, 0, 0x00001fff, object, psymval, addend);
 862   }
 863
 864   // R_SPARC_UA16: (Symbol + Addend)
 865   static inline void
 866   ua16(unsigned char* view,
 867        const Sized_relobj_file<size, big_endian>* object,
 868        const Symbol_value<size>* psymval,
 869        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 870   {
 871     This::template rela_ua<16>(view, 0, 0xffff, object, psymval, addend);
 872   }
 873
 874   // R_SPARC_UA32: (Symbol + Addend)
 875   static inline void
 876   ua32(unsigned char* view,
 877        const Sized_relobj_file<size, big_endian>* object,
 878        const Symbol_value<size>* psymval,
 879        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 880   {
 881     This::template rela_ua<32>(view, 0, 0xffffffff, object, psymval, addend);
 882   }
 883
 884   // R_SPARC_UA64: (Symbol + Addend)
 885   static inline void
 886   ua64(unsigned char* view,
 887        const Sized_relobj_file<size, big_endian>* object,
 888        const Symbol_value<size>* psymval,
 889        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 890   {
 891     This::template rela_ua<64>(view, 0, ~(elfcpp::Elf_Xword) 0,
 892                                object, psymval, addend);
 893   }
 894
 895   // R_SPARC_DISP8: (Symbol + Addend - Address)
 896   static inline void
 897   disp8(unsigned char* view,
 898         const Sized_relobj_file<size, big_endian>* object,
 899         const Symbol_value<size>* psymval,
 900         typename elfcpp::Elf_types<size>::Elf_Addr addend,
 901         typename elfcpp::Elf_types<size>::Elf_Addr address)
 902   {
 903     This::template pcrela_unaligned<8>(view, object, psymval,
 904                                        addend, address);
 905   }
 906
 907   // R_SPARC_DISP16: (Symbol + Addend - Address)
 908   static inline void
 909   disp16(unsigned char* view,
 910          const Sized_relobj_file<size, big_endian>* object,
 911          const Symbol_value<size>* psymval,
 912          typename elfcpp::Elf_types<size>::Elf_Addr addend,
 913          typename elfcpp::Elf_types<size>::Elf_Addr address)
 914   {
 915     This::template pcrela_unaligned<16>(view, object, psymval,
 916                                         addend, address);
 917   }
 918
 919   // R_SPARC_DISP32: (Symbol + Addend - Address)
 920   static inline void
 921   disp32(unsigned char* view,
 922          const Sized_relobj_file<size, big_endian>* object,
 923          const Symbol_value<size>* psymval,
 924          typename elfcpp::Elf_types<size>::Elf_Addr addend,
 925          typename elfcpp::Elf_types<size>::Elf_Addr address)
 926   {
 927     This::template pcrela_unaligned<32>(view, object, psymval,
 928                                         addend, address);
 929   }
 930
 931   // R_SPARC_DISP64: (Symbol + Addend - Address)
 932   static inline void
 933   disp64(unsigned char* view,
 934          const Sized_relobj_file<size, big_endian>* object,
 935          const Symbol_value<size>* psymval,
 936          elfcpp::Elf_Xword addend,
 937          typename elfcpp::Elf_types<size>::Elf_Addr address)
 938   {
 939     This::template pcrela_unaligned<64>(view, object, psymval,
 940                                         addend, address);
 941   }
 942
 943   // R_SPARC_H34: (Symbol + Addend) >> 12
 944   static inline void
 945   h34(unsigned char* view,
 946       const Sized_relobj_file<size, big_endian>* object,
 947       const Symbol_value<size>* psymval,
 948       typename elfcpp::Elf_types<size>::Elf_Addr  addend)
 949   {
 950     This_insn::template rela<32>(view, 12, 0x003fffff, object, psymval, addend);
 951   }
 952
 953   // R_SPARC_H44: (Symbol + Addend) >> 22
 954   static inline void
 955   h44(unsigned char* view,
 956       const Sized_relobj_file<size, big_endian>* object,
 957       const Symbol_value<size>* psymval,
 958       typename elfcpp::Elf_types<size>::Elf_Addr  addend)
 959   {
 960     This_insn::template rela<32>(view, 22, 0x003fffff, object, psymval, addend);
 961   }
 962
 963   // R_SPARC_M44: ((Symbol + Addend) >> 12) & 0x3ff
 964   static inline void
 965   m44(unsigned char* view,
 966       const Sized_relobj_file<size, big_endian>* object,
 967       const Symbol_value<size>* psymval,
 968       typename elfcpp::Elf_types<size>::Elf_Addr  addend)
 969   {
 970     This_insn::template rela<32>(view, 12, 0x000003ff, object, psymval, addend);
 971   }
 972
 973   // R_SPARC_L44: (Symbol + Addend) & 0xfff
 974   static inline void
 975   l44(unsigned char* view,
 976       const Sized_relobj_file<size, big_endian>* object,
 977       const Symbol_value<size>* psymval,
 978       typename elfcpp::Elf_types<size>::Elf_Addr  addend)
 979   {
 980     This_insn::template rela<32>(view, 0, 0x00000fff, object, psymval, addend);
 981   }
 982
 983   // R_SPARC_HH22: (Symbol + Addend) >> 42
 984   static inline void
 985   hh22(unsigned char* view,
 986        const Sized_relobj_file<size, big_endian>* object,
 987        const Symbol_value<size>* psymval,
 988        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 989   {
 990     This_insn::template rela<32>(view, 42, 0x003fffff, object, psymval, addend);
 991   }
 992
 993   // R_SPARC_PC_HH22: (Symbol + Addend - Address) >> 42
 994   static inline void
 995   pc_hh22(unsigned char* view,
 996           const Sized_relobj_file<size, big_endian>* object,
 997           const Symbol_value<size>* psymval,
 998           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 999           typename elfcpp::Elf_types<size>::Elf_Addr address)
1000   {
1001     This_insn::template pcrela<32>(view, 42, 0x003fffff, object,
1002                                    psymval, addend, address);
1003   }
1004
1005   // R_SPARC_HM10: ((Symbol + Addend) >> 32) & 0x3ff
1006   static inline void
1007   hm10(unsigned char* view,
1008        const Sized_relobj_file<size, big_endian>* object,
1009        const Symbol_value<size>* psymval,
1010        typename elfcpp::Elf_types<size>::Elf_Addr addend)
1011   {
1012     This_insn::template rela<32>(view, 32, 0x000003ff, object, psymval, addend);
1013   }
1014
1015   // R_SPARC_PC_HM10: ((Symbol + Addend - Address) >> 32) & 0x3ff
1016   static inline void
1017   pc_hm10(unsigned char* view,
1018           const Sized_relobj_file<size, big_endian>* object,
1019           const Symbol_value<size>* psymval,
1020           typename elfcpp::Elf_types<size>::Elf_Addr addend,
1021           typename elfcpp::Elf_types<size>::Elf_Addr address)
1022   {
1023     This_insn::template pcrela<32>(view, 32, 0x000003ff, object,
1024                                    psymval, addend, address);
1025   }
1026
1027   // R_SPARC_11: (Symbol + Addend)
1028   static inline void
1029   rela32_11(unsigned char* view,
1030             const Sized_relobj_file<size, big_endian>* object,
1031             const Symbol_value<size>* psymval,
1032             typename elfcpp::Elf_types<size>::Elf_Addr addend)
1033   {
1034     This_insn::template rela<32>(view, 0, 0x000007ff, object, psymval, addend);
1035   }
1036
1037   // R_SPARC_10: (Symbol + Addend)
1038   static inline void
1039   rela32_10(unsigned char* view,
1040             const Sized_relobj_file<size, big_endian>* object,
1041             const Symbol_value<size>* psymval,
1042             typename elfcpp::Elf_types<size>::Elf_Addr addend)
1043   {
1044     This_insn::template rela<32>(view, 0, 0x000003ff, object, psymval, addend);
1045   }
1046
1047   // R_SPARC_7: (Symbol + Addend)
1048   static inline void
1049   rela32_7(unsigned char* view,
1050            const Sized_relobj_file<size, big_endian>* object,
1051            const Symbol_value<size>* psymval,
1052            typename elfcpp::Elf_types<size>::Elf_Addr addend)
1053   {
1054     This_insn::template rela<32>(view, 0, 0x0000007f, object, psymval, addend);
1055   }
1056
1057   // R_SPARC_6: (Symbol + Addend)
1058   static inline void
1059   rela32_6(unsigned char* view,
1060            const Sized_relobj_file<size, big_endian>* object,
1061            const Symbol_value<size>* psymval,
1062            typename elfcpp::Elf_types<size>::Elf_Addr addend)
1063   {
1064     This_insn::template rela<32>(view, 0, 0x0000003f, object, psymval, addend);
1065   }
1066
1067   // R_SPARC_5: (Symbol + Addend)
1068   static inline void
1069   rela32_5(unsigned char* view,
1070            const Sized_relobj_file<size, big_endian>* object,
1071            const Symbol_value<size>* psymval,
1072            typename elfcpp::Elf_types<size>::Elf_Addr addend)
1073   {
1074     This_insn::template rela<32>(view, 0, 0x0000001f, object, psymval, addend);
1075   }
1076
1077   // R_SPARC_TLS_LDO_HIX22: @dtpoff(Symbol + Addend) >> 10
1078   static inline void
1079   ldo_hix22(unsigned char* view,
1080             typename elfcpp::Elf_types<size>::Elf_Addr value,
1081             typename elfcpp::Elf_types<size>::Elf_Addr addend)
1082   {
1083     This_insn::hi22(view, value, addend);
1084   }
1085
1086   // R_SPARC_TLS_LDO_LOX10: @dtpoff(Symbol + Addend) & 0x3ff
1087   static inline void
1088   ldo_lox10(unsigned char* view,
1089             typename elfcpp::Elf_types<size>::Elf_Addr value,
1090             typename elfcpp::Elf_types<size>::Elf_Addr addend)
1091   {
1092     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1093     Valtype* wv = reinterpret_cast<Valtype*>(view);
1094     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1095     Valtype reloc = (value + addend);
1096
1097     val &= ~0x1fff;
1098     reloc &= 0x3ff;
1099
1100     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1101   }
1102
1103   // R_SPARC_TLS_LE_HIX22: (@tpoff(Symbol + Addend) ^ 0xffffffffffffffff) >> 10
1104   static inline void
1105   hix22(unsigned char* view,
1106         typename elfcpp::Elf_types<size>::Elf_Addr value,
1107         typename elfcpp::Elf_types<size>::Elf_Addr addend)
1108   {
1109     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1110     Valtype* wv = reinterpret_cast<Valtype*>(view);
1111     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1112     Valtype reloc = (value + addend);
1113
1114     val &= ~0x3fffff;
1115
1116     reloc ^= ~(Valtype)0;
1117     reloc >>= 10;
1118
1119     reloc &= 0x3fffff;
1120
1121     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1122   }
1123
1124   // R_SPARC_GOTDATA_OP_HIX22: @gdopoff(Symbol + Addend) >> 10
1125   static inline void
1126   gdop_hix22(unsigned char* view,
1127              typename elfcpp::Elf_types<size>::Elf_Addr value)
1128   {
1129     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1130     Valtype* wv = reinterpret_cast<Valtype*>(view);
1131     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1132     int32_t reloc = static_cast<int32_t>(value);
1133
1134     val &= ~0x3fffff;
1135
1136     if (reloc < 0)
1137       reloc ^= ~static_cast<int32_t>(0);
1138     reloc >>= 10;
1139
1140     reloc &= 0x3fffff;
1141
1142     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1143   }
1144
1145   // R_SPARC_HIX22: ((Symbol + Addend) ^ 0xffffffffffffffff) >> 10
1146   static inline void
1147   hix22(unsigned char* view,
1148         const Sized_relobj_file<size, big_endian>* object,
1149         const Symbol_value<size>* psymval,
1150         typename elfcpp::Elf_types<size>::Elf_Addr addend)
1151   {
1152     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1153     Valtype* wv = reinterpret_cast<Valtype*>(view);
1154     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1155     Valtype reloc = psymval->value(object, addend);
1156
1157     val &= ~0x3fffff;
1158
1159     reloc ^= ~(Valtype)0;
1160     reloc >>= 10;
1161
1162     reloc &= 0x3fffff;
1163
1164     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1165   }
1166
1167
1168   // R_SPARC_TLS_LE_LOX10: (@tpoff(Symbol + Addend) & 0x3ff) | 0x1c00
1169   static inline void
1170   lox10(unsigned char* view,
1171         typename elfcpp::Elf_types<size>::Elf_Addr value,
1172         typename elfcpp::Elf_types<size>::Elf_Addr addend)
1173   {
1174     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1175     Valtype* wv = reinterpret_cast<Valtype*>(view);
1176     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1177     Valtype reloc = (value + addend);
1178
1179     val &= ~0x1fff;
1180     reloc &= 0x3ff;
1181     reloc |= 0x1c00;
1182
1183     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1184   }
1185
1186   // R_SPARC_GOTDATA_OP_LOX10: (@gdopoff(Symbol + Addend) & 0x3ff) | 0x1c00
1187   static inline void
1188   gdop_lox10(unsigned char* view,
1189              typename elfcpp::Elf_types<size>::Elf_Addr value)
1190   {
1191     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1192     Valtype* wv = reinterpret_cast<Valtype*>(view);
1193     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1194     int32_t reloc = static_cast<int32_t>(value);
1195
1196     if (reloc < 0)
1197       reloc = (reloc & 0x3ff) | 0x1c00;
1198     else
1199       reloc = (reloc & 0x3ff);
1200
1201     val &= ~0x1fff;
1202     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1203   }
1204
1205   // R_SPARC_LOX10: ((Symbol + Addend) & 0x3ff) | 0x1c00
1206   static inline void
1207   lox10(unsigned char* view,
1208         const Sized_relobj_file<size, big_endian>* object,
1209         const Symbol_value<size>* psymval,
1210         typename elfcpp::Elf_types<size>::Elf_Addr addend)
1211   {
1212     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1213     Valtype* wv = reinterpret_cast<Valtype*>(view);
1214     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1215     Valtype reloc = psymval->value(object, addend);
1216
1217     val &= ~0x1fff;
1218     reloc &= 0x3ff;
1219     reloc |= 0x1c00;
1220
1221     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1222   }
1223 };
1224
1225 // Get the GOT section, creating it if necessary.
1226
1227 template<int size, bool big_endian>
1228 Output_data_got<size, big_endian>*
1229 Target_sparc<size, big_endian>::got_section(Symbol_table* symtab,
1230                                             Layout* layout)
1231 {
1232   if (this->got_ == NULL)
1233     {
1234       gold_assert(symtab != NULL && layout != NULL);
1235
1236       this->got_ = new Output_data_got<size, big_endian>();
1237
1238       layout->add_output_section_data(".got", elfcpp::SHT_PROGBITS,
1239                                       (elfcpp::SHF_ALLOC
1240                                        | elfcpp::SHF_WRITE),
1241                                       this->got_, ORDER_RELRO, true);
1242
1243       // Define _GLOBAL_OFFSET_TABLE_ at the start of the .got section.
1244       symtab->define_in_output_data("_GLOBAL_OFFSET_TABLE_", NULL,
1245                                     Symbol_table::PREDEFINED,
1246                                     this->got_,
1247                                     0, 0, elfcpp::STT_OBJECT,
1248                                     elfcpp::STB_LOCAL,
1249                                     elfcpp::STV_HIDDEN, 0,
1250                                     false, false);
1251     }
1252
1253   return this->got_;
1254 }
1255
1256 // Get the dynamic reloc section, creating it if necessary.
1257
1258 template<int size, bool big_endian>
1259 typename Target_sparc<size, big_endian>::Reloc_section*
1260 Target_sparc<size, big_endian>::rela_dyn_section(Layout* layout)
1261 {
1262   if (this->rela_dyn_ == NULL)
1263     {
1264       gold_assert(layout != NULL);
1265       this->rela_dyn_ = new Reloc_section(parameters->options().combreloc());
1266       layout->add_output_section_data(".rela.dyn", elfcpp::SHT_RELA,
1267                                       elfcpp::SHF_ALLOC, this->rela_dyn_,
1268                                       ORDER_DYNAMIC_RELOCS, false);
1269     }
1270   return this->rela_dyn_;
1271 }
1272
1273 // Get the section to use for IFUNC relocs, creating it if
1274 // necessary.  These go in .rela.dyn, but only after all other dynamic
1275 // relocations.  They need to follow the other dynamic relocations so
1276 // that they can refer to global variables initialized by those
1277 // relocs.
1278
1279 template<int size, bool big_endian>
1280 typename Target_sparc<size, big_endian>::Reloc_section*
1281 Target_sparc<size, big_endian>::rela_ifunc_section(Layout* layout)
1282 {
1283   if (this->rela_ifunc_ == NULL)
1284     {
1285       // Make sure we have already created the dynamic reloc section.
1286       this->rela_dyn_section(layout);
1287       this->rela_ifunc_ = new Reloc_section(false);
1288       layout->add_output_section_data(".rela.dyn", elfcpp::SHT_RELA,
1289                                       elfcpp::SHF_ALLOC, this->rela_ifunc_,
1290                                       ORDER_DYNAMIC_RELOCS, false);
1291       gold_assert(this->rela_dyn_->output_section()
1292                   == this->rela_ifunc_->output_section());
1293     }
1294   return this->rela_ifunc_;
1295 }
1296
1297 // A class to handle the PLT data.
1298
1299 template<int size, bool big_endian>
1300 class Output_data_plt_sparc : public Output_section_data
1301 {
1302  public:
1303   typedef Output_data_reloc<elfcpp::SHT_RELA, true,
1304                             size, big_endian> Reloc_section;
1305
1306   Output_data_plt_sparc(Layout*);
1307
1308   // Add an entry to the PLT.
1309   void add_entry(Symbol_table* symtab, Layout* layout, Symbol* gsym);
1310
1311   // Add an entry to the PLT for a local STT_GNU_IFUNC symbol.
1312   unsigned int
1313   add_local_ifunc_entry(Symbol_table*, Layout*,
1314                         Sized_relobj_file<size, big_endian>* relobj,
1315                         unsigned int local_sym_index);
1316
1317   // Return the .rela.plt section data.
1318   const Reloc_section* rel_plt() const
1319   {
1320     return this->rel_;
1321   }
1322
1323   // Return where the IFUNC relocations should go.
1324   Reloc_section*
1325   rela_ifunc(Symbol_table*, Layout*);
1326
1327   void
1328   emit_pending_ifunc_relocs();
1329
1330   // Return whether we created a section for IFUNC relocations.
1331   bool
1332   has_ifunc_section() const
1333   { return this->ifunc_rel_ != NULL; }
1334
1335   // Return the number of PLT entries.
1336   unsigned int
1337   entry_count() const
1338   { return this->count_ + this->ifunc_count_; }
1339
1340   // Return the offset of the first non-reserved PLT entry.
1341   static unsigned int
1342   first_plt_entry_offset()
1343   { return 4 * base_plt_entry_size; }
1344
1345   // Return the size of a PLT entry.
1346   static unsigned int
1347   get_plt_entry_size()
1348   { return base_plt_entry_size; }
1349
1350   // Return the PLT address to use for a global symbol.
1351   uint64_t
1352   address_for_global(const Symbol*);
1353
1354   // Return the PLT address to use for a local symbol.
1355   uint64_t
1356   address_for_local(const Relobj*, unsigned int symndx);
1357
1358  protected:
1359   void do_adjust_output_section(Output_section* os);
1360
1361   // Write to a map file.
1362   void
1363   do_print_to_mapfile(Mapfile* mapfile) const
1364   { mapfile->print_output_data(this, _("** PLT")); }
1365
1366  private:
1367   // The size of an entry in the PLT.
1368   static const int base_plt_entry_size = (size == 32 ? 12 : 32);
1369
1370   static const unsigned int plt_entries_per_block = 160;
1371   static const unsigned int plt_insn_chunk_size = 24;
1372   static const unsigned int plt_pointer_chunk_size = 8;
1373   static const unsigned int plt_block_size =
1374     (plt_entries_per_block
1375      * (plt_insn_chunk_size + plt_pointer_chunk_size));
1376
1377   section_offset_type
1378   plt_index_to_offset(unsigned int index)
1379   {
1380     section_offset_type offset;
1381
1382     if (size == 32 || index < 32768)
1383       offset = index * base_plt_entry_size;
1384     else
1385       {
1386         unsigned int ext_index = index - 32768;
1387
1388         offset = (32768 * base_plt_entry_size)
1389           + ((ext_index / plt_entries_per_block)
1390              * plt_block_size)
1391           + ((ext_index % plt_entries_per_block)
1392              * plt_insn_chunk_size);
1393       }
1394     return offset;
1395   }
1396
1397   // Set the final size.
1398   void
1399   set_final_data_size()
1400   {
1401     unsigned int full_count = this->entry_count() + 4;
1402     unsigned int extra = (size == 32 ? 4 : 0);
1403     section_offset_type sz = plt_index_to_offset(full_count) + extra;
1404
1405     return this->set_data_size(sz);
1406   }
1407
1408   // Write out the PLT data.
1409   void
1410   do_write(Output_file*);
1411
1412   struct Global_ifunc
1413   {
1414     Reloc_section* rel;
1415     Symbol* gsym;
1416     unsigned int plt_index;
1417   };
1418
1419   struct Local_ifunc
1420   {
1421     Reloc_section* rel;
1422     Sized_relobj_file<size, big_endian>* object;
1423     unsigned int local_sym_index;
1424     unsigned int plt_index;
1425   };
1426
1427   // The reloc section.
1428   Reloc_section* rel_;
1429   // The IFUNC relocations, if necessary.  These must follow the
1430   // regular relocations.
1431   Reloc_section* ifunc_rel_;
1432   // The number of PLT entries.
1433   unsigned int count_;
1434   // The number of PLT entries for IFUNC symbols.
1435   unsigned int ifunc_count_;
1436   // Global STT_GNU_IFUNC symbols.
1437   std::vector<Global_ifunc> global_ifuncs_;
1438   // Local STT_GNU_IFUNC symbols.
1439   std::vector<Local_ifunc> local_ifuncs_;
1440 };
1441
1442 // Define the constants as required by C++ standard.
1443
1444 template<int size, bool big_endian>
1445 const int Output_data_plt_sparc<size, big_endian>::base_plt_entry_size;
1446
1447 template<int size, bool big_endian>
1448 const unsigned int
1449 Output_data_plt_sparc<size, big_endian>::plt_entries_per_block;
1450
1451 template<int size, bool big_endian>
1452 const unsigned int Output_data_plt_sparc<size, big_endian>::plt_insn_chunk_size;
1453
1454 template<int size, bool big_endian>
1455 const unsigned int
1456 Output_data_plt_sparc<size, big_endian>::plt_pointer_chunk_size;
1457
1458 template<int size, bool big_endian>
1459 const unsigned int Output_data_plt_sparc<size, big_endian>::plt_block_size;
1460
1461 // Create the PLT section.  The ordinary .got section is an argument,
1462 // since we need to refer to the start.
1463
1464 template<int size, bool big_endian>
1465 Output_data_plt_sparc<size, big_endian>::Output_data_plt_sparc(Layout* layout)
1466   : Output_section_data(size == 32 ? 4 : 8), ifunc_rel_(NULL),
1467     count_(0), ifunc_count_(0), global_ifuncs_(), local_ifuncs_()
1468 {
1469   this->rel_ = new Reloc_section(false);
1470   layout->add_output_section_data(".rela.plt", elfcpp::SHT_RELA,
1471                                   elfcpp::SHF_ALLOC, this->rel_,
1472                                   ORDER_DYNAMIC_PLT_RELOCS, false);
1473 }
1474
1475 template<int size, bool big_endian>
1476 void
1477 Output_data_plt_sparc<size, big_endian>::do_adjust_output_section(Output_section* os)
1478 {
1479   os->set_entsize(0);
1480 }
1481
1482 // Add an entry to the PLT.
1483
1484 template<int size, bool big_endian>
1485 void
1486 Output_data_plt_sparc<size, big_endian>::add_entry(Symbol_table* symtab,
1487                                                    Layout* layout,
1488                                                    Symbol* gsym)
1489 {
1490   gold_assert(!gsym->has_plt_offset());
1491
1492   section_offset_type plt_offset;
1493   unsigned int index;
1494
1495   if (gsym->type() == elfcpp::STT_GNU_IFUNC
1496       && gsym->can_use_relative_reloc(false))
1497     {
1498       index = this->ifunc_count_;
1499       plt_offset = plt_index_to_offset(index);
1500       gsym->set_plt_offset(plt_offset);
1501       ++this->ifunc_count_;
1502       Reloc_section* rel = this->rela_ifunc(symtab, layout);
1503
1504       struct Global_ifunc gi;
1505       gi.rel = rel;
1506       gi.gsym = gsym;
1507       gi.plt_index = index;
1508       this->global_ifuncs_.push_back(gi);
1509     }
1510   else
1511     {
1512       plt_offset = plt_index_to_offset(this->count_ + 4);
1513       gsym->set_plt_offset(plt_offset);
1514       ++this->count_;
1515       gsym->set_needs_dynsym_entry();
1516       this->rel_->add_global(gsym, elfcpp::R_SPARC_JMP_SLOT, this,
1517                              plt_offset, 0);
1518     }
1519
1520   // Note that we don't need to save the symbol.  The contents of the
1521   // PLT are independent of which symbols are used.  The symbols only
1522   // appear in the relocations.
1523 }
1524
1525 template<int size, bool big_endian>
1526 unsigned int
1527 Output_data_plt_sparc<size, big_endian>::add_local_ifunc_entry(
1528     Symbol_table* symtab,
1529     Layout* layout,
1530     Sized_relobj_file<size, big_endian>* relobj,
1531     unsigned int local_sym_index)
1532 {
1533   unsigned int index = this->ifunc_count_;
1534   section_offset_type plt_offset;
1535
1536   plt_offset = plt_index_to_offset(index);
1537   ++this->ifunc_count_;
1538
1539   Reloc_section* rel = this->rela_ifunc(symtab, layout);
1540
1541   struct Local_ifunc li;
1542   li.rel = rel;
1543   li.object = relobj;
1544   li.local_sym_index = local_sym_index;
1545   li.plt_index = index;
1546   this->local_ifuncs_.push_back(li);
1547
1548   return plt_offset;
1549 }
1550
1551 // Emit any pending IFUNC plt relocations.
1552
1553 template<int size, bool big_endian>
1554 void
1555 Output_data_plt_sparc<size, big_endian>::emit_pending_ifunc_relocs()
1556 {
1557   // Emit any pending IFUNC relocs.
1558   for (typename std::vector<Global_ifunc>::const_iterator p =
1559          this->global_ifuncs_.begin();
1560        p != this->global_ifuncs_.end();
1561        ++p)
1562     {
1563       section_offset_type plt_offset;
1564       unsigned int index;
1565
1566       index = this->count_ + p->plt_index + 4;
1567       plt_offset = this->plt_index_to_offset(index);
1568       p->rel->add_symbolless_global_addend(p->gsym, elfcpp::R_SPARC_JMP_IREL,
1569                                            this, plt_offset, 0);
1570     }
1571
1572   for (typename std::vector<Local_ifunc>::const_iterator p =
1573          this->local_ifuncs_.begin();
1574        p != this->local_ifuncs_.end();
1575        ++p)
1576     {
1577       section_offset_type plt_offset;
1578       unsigned int index;
1579
1580       index = this->count_ + p->plt_index + 4;
1581       plt_offset = this->plt_index_to_offset(index);
1582       p->rel->add_symbolless_local_addend(p->object, p->local_sym_index,
1583                                           elfcpp::R_SPARC_JMP_IREL,
1584                                           this, plt_offset, 0);
1585     }
1586 }
1587
1588 // Return where the IFUNC relocations should go in the PLT.  These
1589 // follow the non-IFUNC relocations.
1590
1591 template<int size, bool big_endian>
1592 typename Output_data_plt_sparc<size, big_endian>::Reloc_section*
1593 Output_data_plt_sparc<size, big_endian>::rela_ifunc(
1594         Symbol_table* symtab,
1595         Layout* layout)
1596 {
1597   if (this->ifunc_rel_ == NULL)
1598     {
1599       this->ifunc_rel_ = new Reloc_section(false);
1600       layout->add_output_section_data(".rela.plt", elfcpp::SHT_RELA,
1601                                       elfcpp::SHF_ALLOC, this->ifunc_rel_,
1602                                       ORDER_DYNAMIC_PLT_RELOCS, false);
1603       gold_assert(this->ifunc_rel_->output_section()
1604                   == this->rel_->output_section());
1605
1606       if (parameters->doing_static_link())
1607         {
1608           // A statically linked executable will only have a .rel.plt
1609           // section to hold R_SPARC_IRELATIVE and R_SPARC_JMP_IREL
1610           // relocs for STT_GNU_IFUNC symbols.  The library will use
1611           // these symbols to locate the IRELATIVE and JMP_IREL relocs
1612           // at program startup time.
1613           symtab->define_in_output_data("__rela_iplt_start", NULL,
1614                                         Symbol_table::PREDEFINED,
1615                                         this->ifunc_rel_, 0, 0,
1616                                         elfcpp::STT_NOTYPE, elfcpp::STB_GLOBAL,
1617                                         elfcpp::STV_HIDDEN, 0, false, true);
1618           symtab->define_in_output_data("__rela_iplt_end", NULL,
1619                                         Symbol_table::PREDEFINED,
1620                                         this->ifunc_rel_, 0, 0,
1621                                         elfcpp::STT_NOTYPE, elfcpp::STB_GLOBAL,
1622                                         elfcpp::STV_HIDDEN, 0, true, true);
1623         }
1624     }
1625   return this->ifunc_rel_;
1626 }
1627
1628 // Return the PLT address to use for a global symbol.
1629
1630 template<int size, bool big_endian>
1631 uint64_t
1632 Output_data_plt_sparc<size, big_endian>::address_for_global(const Symbol* gsym)
1633 {
1634   uint64_t offset = 0;
1635   if (gsym->type() == elfcpp::STT_GNU_IFUNC
1636       && gsym->can_use_relative_reloc(false))
1637     offset = plt_index_to_offset(this->count_ + 4);
1638   return this->address() + offset + gsym->plt_offset();
1639 }
1640
1641 // Return the PLT address to use for a local symbol.  These are always
1642 // IRELATIVE relocs.
1643
1644 template<int size, bool big_endian>
1645 uint64_t
1646 Output_data_plt_sparc<size, big_endian>::address_for_local(
1647         const Relobj* object,
1648         unsigned int r_sym)
1649 {
1650   return (this->address()
1651           + plt_index_to_offset(this->count_ + 4)
1652           + object->local_plt_offset(r_sym));
1653 }
1654
1655 static const unsigned int sparc_nop = 0x01000000;
1656 static const unsigned int sparc_sethi_g1 = 0x03000000;
1657 static const unsigned int sparc_branch_always = 0x30800000;
1658 static const unsigned int sparc_branch_always_pt = 0x30680000;
1659 static const unsigned int sparc_mov = 0x80100000;
1660 static const unsigned int sparc_mov_g0_o0 = 0x90100000;
1661 static const unsigned int sparc_mov_o7_g5 = 0x8a10000f;
1662 static const unsigned int sparc_call_plus_8 = 0x40000002;
1663 static const unsigned int sparc_ldx_o7_imm_g1 = 0xc25be000;
1664 static const unsigned int sparc_jmpl_o7_g1_g1 = 0x83c3c001;
1665 static const unsigned int sparc_mov_g5_o7 = 0x9e100005;
1666
1667 // Write out the PLT.
1668
1669 template<int size, bool big_endian>
1670 void
1671 Output_data_plt_sparc<size, big_endian>::do_write(Output_file* of)
1672 {
1673   const off_t offset = this->offset();
1674   const section_size_type oview_size =
1675     convert_to_section_size_type(this->data_size());
1676   unsigned char* const oview = of->get_output_view(offset, oview_size);
1677   unsigned char* pov = oview;
1678
1679   memset(pov, 0, base_plt_entry_size * 4);
1680   pov += this->first_plt_entry_offset();
1681
1682   unsigned int plt_offset = base_plt_entry_size * 4;
1683   const unsigned int count = this->entry_count();
1684
1685   if (size == 64)
1686     {
1687       unsigned int limit;
1688
1689       limit = (count > 32768 ? 32768 : count);
1690
1691       for (unsigned int i = 0; i < limit; ++i)
1692         {
1693           elfcpp::Swap<32, true>::writeval(pov + 0x00,
1694                                            sparc_sethi_g1 + plt_offset);
1695           elfcpp::Swap<32, true>::writeval(pov + 0x04,
1696                                            sparc_branch_always_pt +
1697                                            (((base_plt_entry_size -
1698                                               (plt_offset + 4)) >> 2) &
1699                                             0x7ffff));
1700           elfcpp::Swap<32, true>::writeval(pov + 0x08, sparc_nop);
1701           elfcpp::Swap<32, true>::writeval(pov + 0x0c, sparc_nop);
1702           elfcpp::Swap<32, true>::writeval(pov + 0x10, sparc_nop);
1703           elfcpp::Swap<32, true>::writeval(pov + 0x14, sparc_nop);
1704           elfcpp::Swap<32, true>::writeval(pov + 0x18, sparc_nop);
1705           elfcpp::Swap<32, true>::writeval(pov + 0x1c, sparc_nop);
1706
1707           pov += base_plt_entry_size;
1708           plt_offset += base_plt_entry_size;
1709         }
1710
1711       if (count > 32768)
1712         {
1713           unsigned int ext_cnt = count - 32768;
1714           unsigned int blks = ext_cnt / plt_entries_per_block;
1715
1716           for (unsigned int i = 0; i < blks; ++i)
1717             {
1718               unsigned int data_off = (plt_entries_per_block
1719                                        * plt_insn_chunk_size) - 4;
1720
1721               for (unsigned int j = 0; j < plt_entries_per_block; ++j)
1722                 {
1723                   elfcpp::Swap<32, true>::writeval(pov + 0x00,
1724                                                    sparc_mov_o7_g5);
1725                   elfcpp::Swap<32, true>::writeval(pov + 0x04,
1726                                                    sparc_call_plus_8);
1727                   elfcpp::Swap<32, true>::writeval(pov + 0x08,
1728                                                    sparc_nop);
1729                   elfcpp::Swap<32, true>::writeval(pov + 0x0c,
1730                                                    sparc_ldx_o7_imm_g1 +
1731                                                    (data_off & 0x1fff));
1732                   elfcpp::Swap<32, true>::writeval(pov + 0x10,
1733                                                    sparc_jmpl_o7_g1_g1);
1734                   elfcpp::Swap<32, true>::writeval(pov + 0x14,
1735                                                    sparc_mov_g5_o7);
1736
1737                   elfcpp::Swap<64, big_endian>::writeval(
1738                                 pov + 0x4 + data_off,
1739                                 (elfcpp::Elf_Xword) (oview - (pov + 0x04)));
1740
1741                   pov += plt_insn_chunk_size;
1742                   data_off -= 16;
1743                 }
1744             }
1745
1746           unsigned int sub_blk_cnt = ext_cnt % plt_entries_per_block;
1747           for (unsigned int i = 0; i < sub_blk_cnt; ++i)
1748             {
1749               unsigned int data_off = (sub_blk_cnt
1750                                        * plt_insn_chunk_size) - 4;
1751
1752               for (unsigned int j = 0; j < plt_entries_per_block; ++j)
1753                 {
1754                   elfcpp::Swap<32, true>::writeval(pov + 0x00,
1755                                                    sparc_mov_o7_g5);
1756                   elfcpp::Swap<32, true>::writeval(pov + 0x04,
1757                                                    sparc_call_plus_8);
1758                   elfcpp::Swap<32, true>::writeval(pov + 0x08,
1759                                                    sparc_nop);
1760                   elfcpp::Swap<32, true>::writeval(pov + 0x0c,
1761                                                    sparc_ldx_o7_imm_g1 +
1762                                                    (data_off & 0x1fff));
1763                   elfcpp::Swap<32, true>::writeval(pov + 0x10,
1764                                                    sparc_jmpl_o7_g1_g1);
1765                   elfcpp::Swap<32, true>::writeval(pov + 0x14,
1766                                                    sparc_mov_g5_o7);
1767
1768                   elfcpp::Swap<64, big_endian>::writeval(
1769                                 pov + 0x4 + data_off,
1770                                 (elfcpp::Elf_Xword) (oview - (pov + 0x04)));
1771
1772                   pov += plt_insn_chunk_size;
1773                   data_off -= 16;
1774                 }
1775             }
1776         }
1777     }
1778   else
1779     {
1780       for (unsigned int i = 0; i < count; ++i)
1781         {
1782           elfcpp::Swap<32, true>::writeval(pov + 0x00,
1783                                            sparc_sethi_g1 + plt_offset);
1784           elfcpp::Swap<32, true>::writeval(pov + 0x04,
1785                                            sparc_branch_always +
1786                                            (((- (plt_offset + 4)) >> 2) &
1787                                             0x003fffff));
1788           elfcpp::Swap<32, true>::writeval(pov + 0x08, sparc_nop);
1789
1790           pov += base_plt_entry_size;
1791           plt_offset += base_plt_entry_size;
1792         }
1793
1794       elfcpp::Swap<32, true>::writeval(pov, sparc_nop);
1795       pov += 4;
1796     }
1797
1798   gold_assert(static_cast<section_size_type>(pov - oview) == oview_size);
1799
1800   of->write_output_view(offset, oview_size, oview);
1801 }
1802
1803 // Create the PLT section.
1804
1805 template<int size, bool big_endian>
1806 void
1807 Target_sparc<size, big_endian>::make_plt_section(Symbol_table* symtab,
1808                                                  Layout* layout)
1809 {
1810   // Create the GOT sections first.
1811   this->got_section(symtab, layout);
1812
1813   // Ensure that .rela.dyn always appears before .rela.plt  This is
1814   // necessary due to how, on Sparc and some other targets, .rela.dyn
1815   // needs to include .rela.plt in it's range.
1816   this->rela_dyn_section(layout);
1817
1818   this->plt_ = new Output_data_plt_sparc<size, big_endian>(layout);
1819   layout->add_output_section_data(".plt", elfcpp::SHT_PROGBITS,
1820                                   (elfcpp::SHF_ALLOC
1821                                    | elfcpp::SHF_EXECINSTR
1822                                    | elfcpp::SHF_WRITE),
1823                                   this->plt_, ORDER_NON_RELRO_FIRST, false);
1824
1825   // Define _PROCEDURE_LINKAGE_TABLE_ at the start of the .plt section.
1826   symtab->define_in_output_data("_PROCEDURE_LINKAGE_TABLE_", NULL,
1827                                 Symbol_table::PREDEFINED,
1828                                 this->plt_,
1829                                 0, 0, elfcpp::STT_OBJECT,
1830                                 elfcpp::STB_LOCAL,
1831                                 elfcpp::STV_HIDDEN, 0,
1832                                 false, false);
1833 }
1834
1835 // Create a PLT entry for a global symbol.
1836
1837 template<int size, bool big_endian>
1838 void
1839 Target_sparc<size, big_endian>::make_plt_entry(Symbol_table* symtab,
1840                                                Layout* layout,
1841                                                Symbol* gsym)
1842 {
1843   if (gsym->has_plt_offset())
1844     return;
1845
1846   if (this->plt_ == NULL)
1847     this->make_plt_section(symtab, layout);
1848
1849   this->plt_->add_entry(symtab, layout, gsym);
1850 }
1851
1852 // Make a PLT entry for a local STT_GNU_IFUNC symbol.
1853
1854 template<int size, bool big_endian>
1855 void
1856 Target_sparc<size, big_endian>::make_local_ifunc_plt_entry(
1857         Symbol_table* symtab,
1858         Layout* layout,
1859         Sized_relobj_file<size, big_endian>* relobj,
1860         unsigned int local_sym_index)
1861 {
1862   if (relobj->local_has_plt_offset(local_sym_index))
1863     return;
1864   if (this->plt_ == NULL)
1865     this->make_plt_section(symtab, layout);
1866   unsigned int plt_offset = this->plt_->add_local_ifunc_entry(symtab, layout,
1867                                                               relobj,
1868                                                               local_sym_index);
1869   relobj->set_local_plt_offset(local_sym_index, plt_offset);
1870 }
1871
1872 // Return the number of entries in the PLT.
1873
1874 template<int size, bool big_endian>
1875 unsigned int
1876 Target_sparc<size, big_endian>::plt_entry_count() const
1877 {
1878   if (this->plt_ == NULL)
1879     return 0;
1880   return this->plt_->entry_count();
1881 }
1882
1883 // Return the offset of the first non-reserved PLT entry.
1884
1885 template<int size, bool big_endian>
1886 unsigned int
1887 Target_sparc<size, big_endian>::first_plt_entry_offset() const
1888 {
1889   return Output_data_plt_sparc<size, big_endian>::first_plt_entry_offset();
1890 }
1891
1892 // Return the size of each PLT entry.
1893
1894 template<int size, bool big_endian>
1895 unsigned int
1896 Target_sparc<size, big_endian>::plt_entry_size() const
1897 {
1898   return Output_data_plt_sparc<size, big_endian>::get_plt_entry_size();
1899 }
1900
1901 // Create a GOT entry for the TLS module index.
1902
1903 template<int size, bool big_endian>
1904 unsigned int
1905 Target_sparc<size, big_endian>::got_mod_index_entry(
1906      Symbol_table* symtab,
1907      Layout* layout,
1908      Sized_relobj_file<size, big_endian>* object)
1909 {
1910   if (this->got_mod_index_offset_ == -1U)
1911     {
1912       gold_assert(symtab != NULL && layout != NULL && object != NULL);
1913       Reloc_section* rela_dyn = this->rela_dyn_section(layout);
1914       Output_data_got<size, big_endian>* got;
1915       unsigned int got_offset;
1916
1917       got = this->got_section(symtab, layout);
1918       got_offset = got->add_constant(0);
1919       rela_dyn->add_local(object, 0,
1920                           (size == 64 ?
1921                            elfcpp::R_SPARC_TLS_DTPMOD64 :
1922                            elfcpp::R_SPARC_TLS_DTPMOD32), got,
1923                           got_offset, 0);
1924       got->add_constant(0);
1925       this->got_mod_index_offset_ = got_offset;
1926     }
1927   return this->got_mod_index_offset_;
1928 }
1929
1930 // Optimize the TLS relocation type based on what we know about the
1931 // symbol.  IS_FINAL is true if the final address of this symbol is
1932 // known at link time.
1933
1934 static tls::Tls_optimization
1935 optimize_tls_reloc(bool is_final, int r_type)
1936 {
1937   // If we are generating a shared library, then we can't do anything
1938   // in the linker.
1939   if (parameters->options().shared())
1940     return tls::TLSOPT_NONE;
1941
1942   switch (r_type)
1943     {
1944     case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1945     case elfcpp::R_SPARC_TLS_GD_LO10:
1946     case elfcpp::R_SPARC_TLS_GD_ADD:
1947     case elfcpp::R_SPARC_TLS_GD_CALL:
1948       // These are General-Dynamic which permits fully general TLS
1949       // access.  Since we know that we are generating an executable,
1950       // we can convert this to Initial-Exec.  If we also know that
1951       // this is a local symbol, we can further switch to Local-Exec.
1952       if (is_final)
1953         return tls::TLSOPT_TO_LE;
1954       return tls::TLSOPT_TO_IE;
1955
1956     case elfcpp::R_SPARC_TLS_LDM_HI22:  // Local-dynamic
1957     case elfcpp::R_SPARC_TLS_LDM_LO10:
1958     case elfcpp::R_SPARC_TLS_LDM_ADD:
1959     case elfcpp::R_SPARC_TLS_LDM_CALL:
1960       // This is Local-Dynamic, which refers to a local symbol in the
1961       // dynamic TLS block.  Since we know that we generating an
1962       // executable, we can switch to Local-Exec.
1963       return tls::TLSOPT_TO_LE;
1964
1965     case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
1966     case elfcpp::R_SPARC_TLS_LDO_LOX10:
1967     case elfcpp::R_SPARC_TLS_LDO_ADD:
1968       // Another type of Local-Dynamic relocation.
1969       return tls::TLSOPT_TO_LE;
1970
1971     case elfcpp::R_SPARC_TLS_IE_HI22:   // Initial-exec
1972     case elfcpp::R_SPARC_TLS_IE_LO10:
1973     case elfcpp::R_SPARC_TLS_IE_LD:
1974     case elfcpp::R_SPARC_TLS_IE_LDX:
1975     case elfcpp::R_SPARC_TLS_IE_ADD:
1976       // These are Initial-Exec relocs which get the thread offset
1977       // from the GOT.  If we know that we are linking against the
1978       // local symbol, we can switch to Local-Exec, which links the
1979       // thread offset into the instruction.
1980       if (is_final)
1981         return tls::TLSOPT_TO_LE;
1982       return tls::TLSOPT_NONE;
1983
1984     case elfcpp::R_SPARC_TLS_LE_HIX22:  // Local-exec
1985     case elfcpp::R_SPARC_TLS_LE_LOX10:
1986       // When we already have Local-Exec, there is nothing further we
1987       // can do.
1988       return tls::TLSOPT_NONE;
1989
1990     default:
1991       gold_unreachable();
1992     }
1993 }
1994
1995 // Get the Reference_flags for a particular relocation.
1996
1997 template<int size, bool big_endian>
1998 int
1999 Target_sparc<size, big_endian>::Scan::get_reference_flags(unsigned int r_type)
2000 {
2001   r_type &= 0xff;
2002   switch (r_type)
2003     {
2004     case elfcpp::R_SPARC_NONE:
2005     case elfcpp::R_SPARC_REGISTER:
2006     case elfcpp::R_SPARC_GNU_VTINHERIT:
2007     case elfcpp::R_SPARC_GNU_VTENTRY:
2008       // No symbol reference.
2009       return 0;
2010
2011     case elfcpp::R_SPARC_UA64:
2012     case elfcpp::R_SPARC_64:
2013     case elfcpp::R_SPARC_HIX22:
2014     case elfcpp::R_SPARC_LOX10:
2015     case elfcpp::R_SPARC_H34:
2016     case elfcpp::R_SPARC_H44:
2017     case elfcpp::R_SPARC_M44:
2018     case elfcpp::R_SPARC_L44:
2019     case elfcpp::R_SPARC_HH22:
2020     case elfcpp::R_SPARC_HM10:
2021     case elfcpp::R_SPARC_LM22:
2022     case elfcpp::R_SPARC_HI22:
2023     case elfcpp::R_SPARC_LO10:
2024     case elfcpp::R_SPARC_OLO10:
2025     case elfcpp::R_SPARC_UA32:
2026     case elfcpp::R_SPARC_32:
2027     case elfcpp::R_SPARC_UA16:
2028     case elfcpp::R_SPARC_16:
2029     case elfcpp::R_SPARC_11:
2030     case elfcpp::R_SPARC_10:
2031     case elfcpp::R_SPARC_8:
2032     case elfcpp::R_SPARC_7:
2033     case elfcpp::R_SPARC_6:
2034     case elfcpp::R_SPARC_5:
2035       return Symbol::ABSOLUTE_REF;
2036
2037     case elfcpp::R_SPARC_DISP8:
2038     case elfcpp::R_SPARC_DISP16:
2039     case elfcpp::R_SPARC_DISP32:
2040     case elfcpp::R_SPARC_DISP64:
2041     case elfcpp::R_SPARC_PC_HH22:
2042     case elfcpp::R_SPARC_PC_HM10:
2043     case elfcpp::R_SPARC_PC_LM22:
2044     case elfcpp::R_SPARC_PC10:
2045     case elfcpp::R_SPARC_PC22:
2046     case elfcpp::R_SPARC_WDISP30:
2047     case elfcpp::R_SPARC_WDISP22:
2048     case elfcpp::R_SPARC_WDISP19:
2049     case elfcpp::R_SPARC_WDISP16:
2050     case elfcpp::R_SPARC_WDISP10:
2051       return Symbol::RELATIVE_REF;
2052
2053     case elfcpp::R_SPARC_PLT64:
2054     case elfcpp::R_SPARC_PLT32:
2055     case elfcpp::R_SPARC_HIPLT22:
2056     case elfcpp::R_SPARC_LOPLT10:
2057     case elfcpp::R_SPARC_PCPLT10:
2058       return Symbol::FUNCTION_CALL | Symbol::ABSOLUTE_REF;
2059
2060     case elfcpp::R_SPARC_PCPLT32:
2061     case elfcpp::R_SPARC_PCPLT22:
2062     case elfcpp::R_SPARC_WPLT30:
2063       return Symbol::FUNCTION_CALL | Symbol::RELATIVE_REF;
2064
2065     case elfcpp::R_SPARC_GOTDATA_OP:
2066     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2067     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2068     case elfcpp::R_SPARC_GOT10:
2069     case elfcpp::R_SPARC_GOT13:
2070     case elfcpp::R_SPARC_GOT22:
2071       // Absolute in GOT.
2072       return Symbol::ABSOLUTE_REF;
2073
2074     case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2075     case elfcpp::R_SPARC_TLS_GD_LO10:
2076     case elfcpp::R_SPARC_TLS_GD_ADD:
2077     case elfcpp::R_SPARC_TLS_GD_CALL:
2078     case elfcpp::R_SPARC_TLS_LDM_HI22:  // Local-dynamic
2079     case elfcpp::R_SPARC_TLS_LDM_LO10:
2080     case elfcpp::R_SPARC_TLS_LDM_ADD:
2081     case elfcpp::R_SPARC_TLS_LDM_CALL:
2082     case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2083     case elfcpp::R_SPARC_TLS_LDO_LOX10:
2084     case elfcpp::R_SPARC_TLS_LDO_ADD:
2085     case elfcpp::R_SPARC_TLS_LE_HIX22:
2086     case elfcpp::R_SPARC_TLS_LE_LOX10:
2087     case elfcpp::R_SPARC_TLS_IE_HI22:   // Initial-exec
2088     case elfcpp::R_SPARC_TLS_IE_LO10:
2089     case elfcpp::R_SPARC_TLS_IE_LD:
2090     case elfcpp::R_SPARC_TLS_IE_LDX:
2091     case elfcpp::R_SPARC_TLS_IE_ADD:
2092       return Symbol::TLS_REF;
2093
2094     case elfcpp::R_SPARC_COPY:
2095     case elfcpp::R_SPARC_GLOB_DAT:
2096     case elfcpp::R_SPARC_JMP_SLOT:
2097     case elfcpp::R_SPARC_JMP_IREL:
2098     case elfcpp::R_SPARC_RELATIVE:
2099     case elfcpp::R_SPARC_IRELATIVE:
2100     case elfcpp::R_SPARC_TLS_DTPMOD64:
2101     case elfcpp::R_SPARC_TLS_DTPMOD32:
2102     case elfcpp::R_SPARC_TLS_DTPOFF64:
2103     case elfcpp::R_SPARC_TLS_DTPOFF32:
2104     case elfcpp::R_SPARC_TLS_TPOFF64:
2105     case elfcpp::R_SPARC_TLS_TPOFF32:
2106     default:
2107       // Not expected.  We will give an error later.
2108       return 0;
2109     }
2110 }
2111
2112 // Generate a PLT entry slot for a call to __tls_get_addr
2113 template<int size, bool big_endian>
2114 void
2115 Target_sparc<size, big_endian>::Scan::generate_tls_call(Symbol_table* symtab,
2116                                                         Layout* layout,
2117                                                         Target_sparc<size, big_endian>* target)
2118 {
2119   Symbol* gsym = target->tls_get_addr_sym(symtab);
2120
2121   target->make_plt_entry(symtab, layout, gsym);
2122 }
2123
2124 // Report an unsupported relocation against a local symbol.
2125
2126 template<int size, bool big_endian>
2127 void
2128 Target_sparc<size, big_endian>::Scan::unsupported_reloc_local(
2129                         Sized_relobj_file<size, big_endian>* object,
2130                         unsigned int r_type)
2131 {
2132   gold_error(_("%s: unsupported reloc %u against local symbol"),
2133              object->name().c_str(), r_type);
2134 }
2135
2136 // We are about to emit a dynamic relocation of type R_TYPE.  If the
2137 // dynamic linker does not support it, issue an error.
2138
2139 template<int size, bool big_endian>
2140 void
2141 Target_sparc<size, big_endian>::Scan::check_non_pic(Relobj* object, unsigned int r_type)
2142 {
2143   gold_assert(r_type != elfcpp::R_SPARC_NONE);
2144
2145   if (size == 64)
2146     {
2147       switch (r_type)
2148         {
2149           // These are the relocation types supported by glibc for sparc 64-bit.
2150         case elfcpp::R_SPARC_RELATIVE:
2151         case elfcpp::R_SPARC_IRELATIVE:
2152         case elfcpp::R_SPARC_COPY:
2153         case elfcpp::R_SPARC_32:
2154         case elfcpp::R_SPARC_64:
2155         case elfcpp::R_SPARC_GLOB_DAT:
2156         case elfcpp::R_SPARC_JMP_SLOT:
2157         case elfcpp::R_SPARC_JMP_IREL:
2158         case elfcpp::R_SPARC_TLS_DTPMOD64:
2159         case elfcpp::R_SPARC_TLS_DTPOFF64:
2160         case elfcpp::R_SPARC_TLS_TPOFF64:
2161         case elfcpp::R_SPARC_TLS_LE_HIX22:
2162         case elfcpp::R_SPARC_TLS_LE_LOX10:
2163         case elfcpp::R_SPARC_8:
2164         case elfcpp::R_SPARC_16:
2165         case elfcpp::R_SPARC_DISP8:
2166         case elfcpp::R_SPARC_DISP16:
2167         case elfcpp::R_SPARC_DISP32:
2168         case elfcpp::R_SPARC_WDISP30:
2169         case elfcpp::R_SPARC_LO10:
2170         case elfcpp::R_SPARC_HI22:
2171         case elfcpp::R_SPARC_OLO10:
2172         case elfcpp::R_SPARC_H34:
2173         case elfcpp::R_SPARC_H44:
2174         case elfcpp::R_SPARC_M44:
2175         case elfcpp::R_SPARC_L44:
2176         case elfcpp::R_SPARC_HH22:
2177         case elfcpp::R_SPARC_HM10:
2178         case elfcpp::R_SPARC_LM22:
2179         case elfcpp::R_SPARC_UA16:
2180         case elfcpp::R_SPARC_UA32:
2181         case elfcpp::R_SPARC_UA64:
2182           return;
2183
2184         default:
2185           break;
2186         }
2187     }
2188   else
2189     {
2190       switch (r_type)
2191         {
2192           // These are the relocation types supported by glibc for sparc 32-bit.
2193         case elfcpp::R_SPARC_RELATIVE:
2194         case elfcpp::R_SPARC_IRELATIVE:
2195         case elfcpp::R_SPARC_COPY:
2196         case elfcpp::R_SPARC_GLOB_DAT:
2197         case elfcpp::R_SPARC_32:
2198         case elfcpp::R_SPARC_JMP_SLOT:
2199         case elfcpp::R_SPARC_JMP_IREL:
2200         case elfcpp::R_SPARC_TLS_DTPMOD32:
2201         case elfcpp::R_SPARC_TLS_DTPOFF32:
2202         case elfcpp::R_SPARC_TLS_TPOFF32:
2203         case elfcpp::R_SPARC_TLS_LE_HIX22:
2204         case elfcpp::R_SPARC_TLS_LE_LOX10:
2205         case elfcpp::R_SPARC_8:
2206         case elfcpp::R_SPARC_16:
2207         case elfcpp::R_SPARC_DISP8:
2208         case elfcpp::R_SPARC_DISP16:
2209         case elfcpp::R_SPARC_DISP32:
2210         case elfcpp::R_SPARC_LO10:
2211         case elfcpp::R_SPARC_WDISP30:
2212         case elfcpp::R_SPARC_HI22:
2213         case elfcpp::R_SPARC_UA16:
2214         case elfcpp::R_SPARC_UA32:
2215           return;
2216
2217         default:
2218           break;
2219         }
2220     }
2221
2222   // This prevents us from issuing more than one error per reloc
2223   // section.  But we can still wind up issuing more than one
2224   // error per object file.
2225   if (this->issued_non_pic_error_)
2226     return;
2227   gold_assert(parameters->options().output_is_position_independent());
2228   object->error(_("requires unsupported dynamic reloc; "
2229                   "recompile with -fPIC"));
2230   this->issued_non_pic_error_ = true;
2231   return;
2232 }
2233
2234 // Return whether we need to make a PLT entry for a relocation of the
2235 // given type against a STT_GNU_IFUNC symbol.
2236
2237 template<int size, bool big_endian>
2238 bool
2239 Target_sparc<size, big_endian>::Scan::reloc_needs_plt_for_ifunc(
2240      Sized_relobj_file<size, big_endian>* object,
2241      unsigned int r_type)
2242 {
2243   int flags = Scan::get_reference_flags(r_type);
2244   if (flags & Symbol::TLS_REF)
2245     gold_error(_("%s: unsupported TLS reloc %u for IFUNC symbol"),
2246                object->name().c_str(), r_type);
2247   return flags != 0;
2248 }
2249
2250 // Scan a relocation for a local symbol.
2251
2252 template<int size, bool big_endian>
2253 inline void
2254 Target_sparc<size, big_endian>::Scan::local(
2255                         Symbol_table* symtab,
2256                         Layout* layout,
2257                         Target_sparc<size, big_endian>* target,
2258                         Sized_relobj_file<size, big_endian>* object,
2259                         unsigned int data_shndx,
2260                         Output_section* output_section,
2261                         const elfcpp::Rela<size, big_endian>& reloc,
2262                         unsigned int r_type,
2263                         const elfcpp::Sym<size, big_endian>& lsym,
2264                         bool is_discarded)
2265 {
2266   if (is_discarded)
2267     return;
2268
2269   bool is_ifunc = lsym.get_st_type() == elfcpp::STT_GNU_IFUNC;
2270   unsigned int orig_r_type = r_type;
2271   r_type &= 0xff;
2272
2273   if (is_ifunc
2274       && this->reloc_needs_plt_for_ifunc(object, r_type))
2275     {
2276       unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2277       target->make_local_ifunc_plt_entry(symtab, layout, object, r_sym);
2278     }
2279
2280   switch (r_type)
2281     {
2282     case elfcpp::R_SPARC_NONE:
2283     case elfcpp::R_SPARC_REGISTER:
2284     case elfcpp::R_SPARC_GNU_VTINHERIT:
2285     case elfcpp::R_SPARC_GNU_VTENTRY:
2286       break;
2287
2288     case elfcpp::R_SPARC_64:
2289     case elfcpp::R_SPARC_32:
2290       // If building a shared library (or a position-independent
2291       // executable), we need to create a dynamic relocation for
2292       // this location. The relocation applied at link time will
2293       // apply the link-time value, so we flag the location with
2294       // an R_SPARC_RELATIVE relocation so the dynamic loader can
2295       // relocate it easily.
2296       if (parameters->options().output_is_position_independent()
2297           && ((size == 64 && r_type == elfcpp::R_SPARC_64)
2298               || (size == 32 && r_type == elfcpp::R_SPARC_32)))
2299         {
2300           Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2301           unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2302           rela_dyn->add_local_relative(object, r_sym, elfcpp::R_SPARC_RELATIVE,
2303                                        output_section, data_shndx,
2304                                        reloc.get_r_offset(),
2305                                        reloc.get_r_addend(), is_ifunc);
2306           break;
2307         }
2308       // Fall through.
2309
2310     case elfcpp::R_SPARC_HIX22:
2311     case elfcpp::R_SPARC_LOX10:
2312     case elfcpp::R_SPARC_H34:
2313     case elfcpp::R_SPARC_H44:
2314     case elfcpp::R_SPARC_M44:
2315     case elfcpp::R_SPARC_L44:
2316     case elfcpp::R_SPARC_HH22:
2317     case elfcpp::R_SPARC_HM10:
2318     case elfcpp::R_SPARC_LM22:
2319     case elfcpp::R_SPARC_UA64:
2320     case elfcpp::R_SPARC_UA32:
2321     case elfcpp::R_SPARC_UA16:
2322     case elfcpp::R_SPARC_HI22:
2323     case elfcpp::R_SPARC_LO10:
2324     case elfcpp::R_SPARC_OLO10:
2325     case elfcpp::R_SPARC_16:
2326     case elfcpp::R_SPARC_11:
2327     case elfcpp::R_SPARC_10:
2328     case elfcpp::R_SPARC_8:
2329     case elfcpp::R_SPARC_7:
2330     case elfcpp::R_SPARC_6:
2331     case elfcpp::R_SPARC_5:
2332       // If building a shared library (or a position-independent
2333       // executable), we need to create a dynamic relocation for
2334       // this location.
2335       if (parameters->options().output_is_position_independent())
2336         {
2337           Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2338           unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2339
2340           check_non_pic(object, r_type);
2341           if (lsym.get_st_type() != elfcpp::STT_SECTION)
2342             {
2343               rela_dyn->add_local(object, r_sym, orig_r_type, output_section,
2344                                   data_shndx, reloc.get_r_offset(),
2345                                   reloc.get_r_addend());
2346             }
2347           else
2348             {
2349               gold_assert(lsym.get_st_value() == 0);
2350               rela_dyn->add_symbolless_local_addend(object, r_sym, orig_r_type,
2351                                                     output_section, data_shndx,
2352                                                     reloc.get_r_offset(),
2353                                                     reloc.get_r_addend());
2354             }
2355         }
2356       break;
2357
2358     case elfcpp::R_SPARC_WDISP30:
2359     case elfcpp::R_SPARC_WPLT30:
2360     case elfcpp::R_SPARC_WDISP22:
2361     case elfcpp::R_SPARC_WDISP19:
2362     case elfcpp::R_SPARC_WDISP16:
2363     case elfcpp::R_SPARC_WDISP10:
2364     case elfcpp::R_SPARC_DISP8:
2365     case elfcpp::R_SPARC_DISP16:
2366     case elfcpp::R_SPARC_DISP32:
2367     case elfcpp::R_SPARC_DISP64:
2368     case elfcpp::R_SPARC_PC10:
2369     case elfcpp::R_SPARC_PC22:
2370       break;
2371
2372     case elfcpp::R_SPARC_GOTDATA_OP:
2373     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2374     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2375       // We will optimize this into a GOT relative relocation
2376       // and code transform the GOT load into an addition.
2377       break;
2378
2379     case elfcpp::R_SPARC_GOT10:
2380     case elfcpp::R_SPARC_GOT13:
2381     case elfcpp::R_SPARC_GOT22:
2382       {
2383         // The symbol requires a GOT entry.
2384         Output_data_got<size, big_endian>* got;
2385         unsigned int r_sym;
2386
2387         got = target->got_section(symtab, layout);
2388         r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2389
2390         // If we are generating a shared object, we need to add a
2391         // dynamic relocation for this symbol's GOT entry.
2392         if (parameters->options().output_is_position_independent())
2393           {
2394             if (!object->local_has_got_offset(r_sym, GOT_TYPE_STANDARD))
2395               {
2396                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2397                 unsigned int off = got->add_constant(0);
2398                 object->set_local_got_offset(r_sym, GOT_TYPE_STANDARD, off);
2399                 rela_dyn->add_local_relative(object, r_sym,
2400                                              elfcpp::R_SPARC_RELATIVE,
2401                                              got, off, 0, is_ifunc);
2402               }
2403           }
2404         else
2405           got->add_local(object, r_sym, GOT_TYPE_STANDARD);
2406       }
2407       break;
2408
2409       // These are initial TLS relocs, which are expected when
2410       // linking.
2411     case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2412     case elfcpp::R_SPARC_TLS_GD_LO10:
2413     case elfcpp::R_SPARC_TLS_GD_ADD:
2414     case elfcpp::R_SPARC_TLS_GD_CALL:
2415     case elfcpp::R_SPARC_TLS_LDM_HI22 : // Local-dynamic
2416     case elfcpp::R_SPARC_TLS_LDM_LO10:
2417     case elfcpp::R_SPARC_TLS_LDM_ADD:
2418     case elfcpp::R_SPARC_TLS_LDM_CALL:
2419     case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2420     case elfcpp::R_SPARC_TLS_LDO_LOX10:
2421     case elfcpp::R_SPARC_TLS_LDO_ADD:
2422     case elfcpp::R_SPARC_TLS_IE_HI22:   // Initial-exec
2423     case elfcpp::R_SPARC_TLS_IE_LO10:
2424     case elfcpp::R_SPARC_TLS_IE_LD:
2425     case elfcpp::R_SPARC_TLS_IE_LDX:
2426     case elfcpp::R_SPARC_TLS_IE_ADD:
2427     case elfcpp::R_SPARC_TLS_LE_HIX22:  // Local-exec
2428     case elfcpp::R_SPARC_TLS_LE_LOX10:
2429       {
2430         bool output_is_shared = parameters->options().shared();
2431         const tls::Tls_optimization optimized_type
2432             = optimize_tls_reloc(!output_is_shared, r_type);
2433         switch (r_type)
2434           {
2435           case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2436           case elfcpp::R_SPARC_TLS_GD_LO10:
2437           case elfcpp::R_SPARC_TLS_GD_ADD:
2438           case elfcpp::R_SPARC_TLS_GD_CALL:
2439             if (optimized_type == tls::TLSOPT_NONE)
2440               {
2441                 // Create a pair of GOT entries for the module index and
2442                 // dtv-relative offset.
2443                 Output_data_got<size, big_endian>* got
2444                     = target->got_section(symtab, layout);
2445                 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2446                 unsigned int shndx = lsym.get_st_shndx();
2447                 bool is_ordinary;
2448                 shndx = object->adjust_sym_shndx(r_sym, shndx, &is_ordinary);
2449                 if (!is_ordinary)
2450                   object->error(_("local symbol %u has bad shndx %u"),
2451                                 r_sym, shndx);
2452                 else
2453                   got->add_local_pair_with_rel(object, r_sym,
2454                                                lsym.get_st_shndx(),
2455                                                GOT_TYPE_TLS_PAIR,
2456                                                target->rela_dyn_section(layout),
2457                                                (size == 64
2458                                                 ? elfcpp::R_SPARC_TLS_DTPMOD64
2459                                                 : elfcpp::R_SPARC_TLS_DTPMOD32));
2460                 if (r_type == elfcpp::R_SPARC_TLS_GD_CALL)
2461                   generate_tls_call(symtab, layout, target);
2462               }
2463             else if (optimized_type != tls::TLSOPT_TO_LE)
2464               unsupported_reloc_local(object, r_type);
2465             break;
2466
2467           case elfcpp::R_SPARC_TLS_LDM_HI22 :   // Local-dynamic
2468           case elfcpp::R_SPARC_TLS_LDM_LO10:
2469           case elfcpp::R_SPARC_TLS_LDM_ADD:
2470           case elfcpp::R_SPARC_TLS_LDM_CALL:
2471             if (optimized_type == tls::TLSOPT_NONE)
2472               {
2473                 // Create a GOT entry for the module index.
2474                 target->got_mod_index_entry(symtab, layout, object);
2475
2476                 if (r_type == elfcpp::R_SPARC_TLS_LDM_CALL)
2477                   generate_tls_call(symtab, layout, target);
2478               }
2479             else if (optimized_type != tls::TLSOPT_TO_LE)
2480               unsupported_reloc_local(object, r_type);
2481             break;
2482
2483           case elfcpp::R_SPARC_TLS_LDO_HIX22:   // Alternate local-dynamic
2484           case elfcpp::R_SPARC_TLS_LDO_LOX10:
2485           case elfcpp::R_SPARC_TLS_LDO_ADD:
2486             break;
2487
2488           case elfcpp::R_SPARC_TLS_IE_HI22:     // Initial-exec
2489           case elfcpp::R_SPARC_TLS_IE_LO10:
2490           case elfcpp::R_SPARC_TLS_IE_LD:
2491           case elfcpp::R_SPARC_TLS_IE_LDX:
2492           case elfcpp::R_SPARC_TLS_IE_ADD:
2493             layout->set_has_static_tls();
2494             if (optimized_type == tls::TLSOPT_NONE)
2495               {
2496                 // Create a GOT entry for the tp-relative offset.
2497                 Output_data_got<size, big_endian>* got
2498                   = target->got_section(symtab, layout);
2499                 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2500
2501                 if (!object->local_has_got_offset(r_sym, GOT_TYPE_TLS_OFFSET))
2502                   {
2503                     Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2504                     unsigned int off = got->add_constant(0);
2505
2506                     object->set_local_got_offset(r_sym, GOT_TYPE_TLS_OFFSET, off);
2507
2508                     rela_dyn->add_symbolless_local_addend(object, r_sym,
2509                                                           (size == 64 ?
2510                                                            elfcpp::R_SPARC_TLS_TPOFF64 :
2511                                                            elfcpp::R_SPARC_TLS_TPOFF32),
2512                                                           got, off, 0);
2513                   }
2514               }
2515             else if (optimized_type != tls::TLSOPT_TO_LE)
2516               unsupported_reloc_local(object, r_type);
2517             break;
2518
2519           case elfcpp::R_SPARC_TLS_LE_HIX22:    // Local-exec
2520           case elfcpp::R_SPARC_TLS_LE_LOX10:
2521             layout->set_has_static_tls();
2522             if (output_is_shared)
2523               {
2524                 // We need to create a dynamic relocation.
2525                 gold_assert(lsym.get_st_type() != elfcpp::STT_SECTION);
2526                 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2527                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2528                 rela_dyn->add_symbolless_local_addend(object, r_sym, r_type,
2529                                                       output_section, data_shndx,
2530                                                       reloc.get_r_offset(), 0);
2531               }
2532             break;
2533           }
2534       }
2535       break;
2536
2537       // These are relocations which should only be seen by the
2538       // dynamic linker, and should never be seen here.
2539     case elfcpp::R_SPARC_COPY:
2540     case elfcpp::R_SPARC_GLOB_DAT:
2541     case elfcpp::R_SPARC_JMP_SLOT:
2542     case elfcpp::R_SPARC_JMP_IREL:
2543     case elfcpp::R_SPARC_RELATIVE:
2544     case elfcpp::R_SPARC_IRELATIVE:
2545     case elfcpp::R_SPARC_TLS_DTPMOD64:
2546     case elfcpp::R_SPARC_TLS_DTPMOD32:
2547     case elfcpp::R_SPARC_TLS_DTPOFF64:
2548     case elfcpp::R_SPARC_TLS_DTPOFF32:
2549     case elfcpp::R_SPARC_TLS_TPOFF64:
2550     case elfcpp::R_SPARC_TLS_TPOFF32:
2551       gold_error(_("%s: unexpected reloc %u in object file"),
2552                  object->name().c_str(), r_type);
2553       break;
2554
2555     default:
2556       unsupported_reloc_local(object, r_type);
2557       break;
2558     }
2559 }
2560
2561 // Report an unsupported relocation against a global symbol.
2562
2563 template<int size, bool big_endian>
2564 void
2565 Target_sparc<size, big_endian>::Scan::unsupported_reloc_global(
2566                         Sized_relobj_file<size, big_endian>* object,
2567                         unsigned int r_type,
2568                         Symbol* gsym)
2569 {
2570   gold_error(_("%s: unsupported reloc %u against global symbol %s"),
2571              object->name().c_str(), r_type, gsym->demangled_name().c_str());
2572 }
2573
2574 // Scan a relocation for a global symbol.
2575
2576 template<int size, bool big_endian>
2577 inline void
2578 Target_sparc<size, big_endian>::Scan::global(
2579                                 Symbol_table* symtab,
2580                                 Layout* layout,
2581                                 Target_sparc<size, big_endian>* target,
2582                                 Sized_relobj_file<size, big_endian>* object,
2583                                 unsigned int data_shndx,
2584                                 Output_section* output_section,
2585                                 const elfcpp::Rela<size, big_endian>& reloc,
2586                                 unsigned int r_type,
2587                                 Symbol* gsym)
2588 {
2589   unsigned int orig_r_type = r_type;
2590   bool is_ifunc = gsym->type() == elfcpp::STT_GNU_IFUNC;
2591
2592   // A reference to _GLOBAL_OFFSET_TABLE_ implies that we need a got
2593   // section.  We check here to avoid creating a dynamic reloc against
2594   // _GLOBAL_OFFSET_TABLE_.
2595   if (!target->has_got_section()
2596       && strcmp(gsym->name(), "_GLOBAL_OFFSET_TABLE_") == 0)
2597     target->got_section(symtab, layout);
2598
2599   r_type &= 0xff;
2600
2601   // A STT_GNU_IFUNC symbol may require a PLT entry.
2602   if (is_ifunc
2603       && this->reloc_needs_plt_for_ifunc(object, r_type))
2604     target->make_plt_entry(symtab, layout, gsym);
2605
2606   switch (r_type)
2607     {
2608     case elfcpp::R_SPARC_NONE:
2609     case elfcpp::R_SPARC_REGISTER:
2610     case elfcpp::R_SPARC_GNU_VTINHERIT:
2611     case elfcpp::R_SPARC_GNU_VTENTRY:
2612       break;
2613
2614     case elfcpp::R_SPARC_PLT64:
2615     case elfcpp::R_SPARC_PLT32:
2616     case elfcpp::R_SPARC_HIPLT22:
2617     case elfcpp::R_SPARC_LOPLT10:
2618     case elfcpp::R_SPARC_PCPLT32:
2619     case elfcpp::R_SPARC_PCPLT22:
2620     case elfcpp::R_SPARC_PCPLT10:
2621     case elfcpp::R_SPARC_WPLT30:
2622       // If the symbol is fully resolved, this is just a PC32 reloc.
2623       // Otherwise we need a PLT entry.
2624       if (gsym->final_value_is_known())
2625         break;
2626       // If building a shared library, we can also skip the PLT entry
2627       // if the symbol is defined in the output file and is protected
2628       // or hidden.
2629       if (gsym->is_defined()
2630           && !gsym->is_from_dynobj()
2631           && !gsym->is_preemptible())
2632         break;
2633       target->make_plt_entry(symtab, layout, gsym);
2634       break;
2635
2636     case elfcpp::R_SPARC_DISP8:
2637     case elfcpp::R_SPARC_DISP16:
2638     case elfcpp::R_SPARC_DISP32:
2639     case elfcpp::R_SPARC_DISP64:
2640     case elfcpp::R_SPARC_PC_HH22:
2641     case elfcpp::R_SPARC_PC_HM10:
2642     case elfcpp::R_SPARC_PC_LM22:
2643     case elfcpp::R_SPARC_PC10:
2644     case elfcpp::R_SPARC_PC22:
2645     case elfcpp::R_SPARC_WDISP30:
2646     case elfcpp::R_SPARC_WDISP22:
2647     case elfcpp::R_SPARC_WDISP19:
2648     case elfcpp::R_SPARC_WDISP16:
2649     case elfcpp::R_SPARC_WDISP10:
2650       {
2651         if (gsym->needs_plt_entry())
2652           target->make_plt_entry(symtab, layout, gsym);
2653         // Make a dynamic relocation if necessary.
2654         if (gsym->needs_dynamic_reloc(Scan::get_reference_flags(r_type)))
2655           {
2656             if (parameters->options().output_is_executable()
2657                 && gsym->may_need_copy_reloc())
2658               {
2659                 target->copy_reloc(symtab, layout, object,
2660                                    data_shndx, output_section, gsym,
2661                                    reloc);
2662               }
2663             else
2664               {
2665                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2666                 check_non_pic(object, r_type);
2667                 rela_dyn->add_global(gsym, orig_r_type, output_section, object,
2668                                      data_shndx, reloc.get_r_offset(),
2669                                      reloc.get_r_addend());
2670               }
2671           }
2672       }
2673       break;
2674
2675     case elfcpp::R_SPARC_UA64:
2676     case elfcpp::R_SPARC_64:
2677     case elfcpp::R_SPARC_HIX22:
2678     case elfcpp::R_SPARC_LOX10:
2679     case elfcpp::R_SPARC_H34:
2680     case elfcpp::R_SPARC_H44:
2681     case elfcpp::R_SPARC_M44:
2682     case elfcpp::R_SPARC_L44:
2683     case elfcpp::R_SPARC_HH22:
2684     case elfcpp::R_SPARC_HM10:
2685     case elfcpp::R_SPARC_LM22:
2686     case elfcpp::R_SPARC_HI22:
2687     case elfcpp::R_SPARC_LO10:
2688     case elfcpp::R_SPARC_OLO10:
2689     case elfcpp::R_SPARC_UA32:
2690     case elfcpp::R_SPARC_32:
2691     case elfcpp::R_SPARC_UA16:
2692     case elfcpp::R_SPARC_16:
2693     case elfcpp::R_SPARC_11:
2694     case elfcpp::R_SPARC_10:
2695     case elfcpp::R_SPARC_8:
2696     case elfcpp::R_SPARC_7:
2697     case elfcpp::R_SPARC_6:
2698     case elfcpp::R_SPARC_5:
2699       {
2700         // Make a PLT entry if necessary.
2701         if (gsym->needs_plt_entry())
2702           {
2703             target->make_plt_entry(symtab, layout, gsym);
2704             // Since this is not a PC-relative relocation, we may be
2705             // taking the address of a function. In that case we need to
2706             // set the entry in the dynamic symbol table to the address of
2707             // the PLT entry.
2708             if (gsym->is_from_dynobj() && !parameters->options().shared())
2709               gsym->set_needs_dynsym_value();
2710           }
2711         // Make a dynamic relocation if necessary.
2712         if (gsym->needs_dynamic_reloc(Scan::get_reference_flags(r_type)))
2713           {
2714             unsigned int r_off = reloc.get_r_offset();
2715
2716             // The assembler can sometimes emit unaligned relocations
2717             // for dwarf2 cfi directives.
2718             switch (r_type)
2719               {
2720               case elfcpp::R_SPARC_16:
2721                 if (r_off & 0x1)
2722                   orig_r_type = r_type = elfcpp::R_SPARC_UA16;
2723                 break;
2724               case elfcpp::R_SPARC_32:
2725                 if (r_off & 0x3)
2726                   orig_r_type = r_type = elfcpp::R_SPARC_UA32;
2727                 break;
2728               case elfcpp::R_SPARC_64:
2729                 if (r_off & 0x7)
2730                   orig_r_type = r_type = elfcpp::R_SPARC_UA64;
2731                 break;
2732               case elfcpp::R_SPARC_UA16:
2733                 if (!(r_off & 0x1))
2734                   orig_r_type = r_type = elfcpp::R_SPARC_16;
2735                 break;
2736               case elfcpp::R_SPARC_UA32:
2737                 if (!(r_off & 0x3))
2738                   orig_r_type = r_type = elfcpp::R_SPARC_32;
2739                 break;
2740               case elfcpp::R_SPARC_UA64:
2741                 if (!(r_off & 0x7))
2742                   orig_r_type = r_type = elfcpp::R_SPARC_64;
2743                 break;
2744               }
2745
2746             if (!parameters->options().output_is_position_independent()
2747                 && gsym->may_need_copy_reloc())
2748               {
2749                 target->copy_reloc(symtab, layout, object,
2750                                    data_shndx, output_section, gsym, reloc);
2751               }
2752             else if (((size == 64 && r_type == elfcpp::R_SPARC_64)
2753                       || (size == 32 && r_type == elfcpp::R_SPARC_32))
2754                      && gsym->type() == elfcpp::STT_GNU_IFUNC
2755                      && gsym->can_use_relative_reloc(false)
2756                      && !gsym->is_from_dynobj()
2757                      && !gsym->is_undefined()
2758                      && !gsym->is_preemptible())
2759               {
2760                 // Use an IRELATIVE reloc for a locally defined
2761                 // STT_GNU_IFUNC symbol.  This makes a function
2762                 // address in a PIE executable match the address in a
2763                 // shared library that it links against.
2764                 Reloc_section* rela_dyn =
2765                   target->rela_ifunc_section(layout);
2766                 unsigned int r_type = elfcpp::R_SPARC_IRELATIVE;
2767                 rela_dyn->add_symbolless_global_addend(gsym, r_type,
2768                                                        output_section, object,
2769                                                        data_shndx,
2770                                                        reloc.get_r_offset(),
2771                                                        reloc.get_r_addend());
2772               }
2773             else if (((size == 64 && r_type == elfcpp::R_SPARC_64)
2774                       || (size == 32 && r_type == elfcpp::R_SPARC_32))
2775                      && gsym->can_use_relative_reloc(false))
2776               {
2777                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2778                 rela_dyn->add_global_relative(gsym, elfcpp::R_SPARC_RELATIVE,
2779                                               output_section, object,
2780                                               data_shndx, reloc.get_r_offset(),
2781                                               reloc.get_r_addend(), is_ifunc);
2782               }
2783             else
2784               {
2785                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2786
2787                 check_non_pic(object, r_type);
2788                 if (gsym->is_from_dynobj()
2789                     || gsym->is_undefined()
2790                     || gsym->is_preemptible())
2791                   rela_dyn->add_global(gsym, orig_r_type, output_section,
2792                                        object, data_shndx,
2793                                        reloc.get_r_offset(),
2794                                        reloc.get_r_addend());
2795                 else
2796                   rela_dyn->add_symbolless_global_addend(gsym, orig_r_type,
2797                                                          output_section,
2798                                                          object, data_shndx,
2799                                                          reloc.get_r_offset(),
2800                                                          reloc.get_r_addend());
2801               }
2802           }
2803       }
2804       break;
2805
2806     case elfcpp::R_SPARC_GOTDATA_OP:
2807     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2808     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2809       if (gsym->is_defined()
2810           && !gsym->is_from_dynobj()
2811           && !gsym->is_preemptible()
2812           && !is_ifunc)
2813         {
2814           // We will optimize this into a GOT relative relocation
2815           // and code transform the GOT load into an addition.
2816           break;
2817         }
2818       // Fall through.
2819     case elfcpp::R_SPARC_GOT10:
2820     case elfcpp::R_SPARC_GOT13:
2821     case elfcpp::R_SPARC_GOT22:
2822       {
2823         // The symbol requires a GOT entry.
2824         Output_data_got<size, big_endian>* got;
2825
2826         got = target->got_section(symtab, layout);
2827         if (gsym->final_value_is_known())
2828           {
2829             // For a STT_GNU_IFUNC symbol we want the PLT address.
2830             if (gsym->type() == elfcpp::STT_GNU_IFUNC)
2831               got->add_global_plt(gsym, GOT_TYPE_STANDARD);
2832             else
2833               got->add_global(gsym, GOT_TYPE_STANDARD);
2834           }
2835         else
2836           {
2837             // If this symbol is not fully resolved, we need to add a
2838             // GOT entry with a dynamic relocation.
2839             bool is_ifunc = gsym->type() == elfcpp::STT_GNU_IFUNC;
2840
2841             // Use a GLOB_DAT rather than a RELATIVE reloc if:
2842             //
2843             // 1) The symbol may be defined in some other module.
2844             //
2845             // 2) We are building a shared library and this is a
2846             // protected symbol; using GLOB_DAT means that the dynamic
2847             // linker can use the address of the PLT in the main
2848             // executable when appropriate so that function address
2849             // comparisons work.
2850             //
2851             // 3) This is a STT_GNU_IFUNC symbol in position dependent
2852             // code, again so that function address comparisons work.
2853             Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2854             if (gsym->is_from_dynobj()
2855                 || gsym->is_undefined()
2856                 || gsym->is_preemptible()
2857                 || (gsym->visibility() == elfcpp::STV_PROTECTED
2858                     && parameters->options().shared())
2859                 || (gsym->type() == elfcpp::STT_GNU_IFUNC
2860                     && parameters->options().output_is_position_independent()
2861                     && !gsym->is_forced_local()))
2862               {
2863                 unsigned int r_type = elfcpp::R_SPARC_GLOB_DAT;
2864
2865                 // If this symbol is forced local, this relocation will
2866                 // not work properly.  That's because ld.so on sparc
2867                 // (and 32-bit powerpc) expects st_value in the r_addend
2868                 // of relocations for STB_LOCAL symbols.  Curiously the
2869                 // BFD linker does not promote global hidden symbols to be
2870                 // STB_LOCAL in the dynamic symbol table like Gold does.
2871                 gold_assert(!gsym->is_forced_local());
2872                 got->add_global_with_rel(gsym, GOT_TYPE_STANDARD, rela_dyn,
2873                                          r_type);
2874               }
2875             else if (!gsym->has_got_offset(GOT_TYPE_STANDARD))
2876               {
2877                 unsigned int off = got->add_constant(0);
2878
2879                 gsym->set_got_offset(GOT_TYPE_STANDARD, off);
2880                 if (is_ifunc)
2881                   {
2882                     // Tell the dynamic linker to use the PLT address
2883                     // when resolving relocations.
2884                     if (gsym->is_from_dynobj()
2885                         && !parameters->options().shared())
2886                       gsym->set_needs_dynsym_value();
2887                   }
2888                 rela_dyn->add_global_relative(gsym, elfcpp::R_SPARC_RELATIVE,
2889                                               got, off, 0, is_ifunc);
2890               }
2891           }
2892       }
2893       break;
2894
2895       // These are initial tls relocs, which are expected when
2896       // linking.
2897     case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2898     case elfcpp::R_SPARC_TLS_GD_LO10:
2899     case elfcpp::R_SPARC_TLS_GD_ADD:
2900     case elfcpp::R_SPARC_TLS_GD_CALL:
2901     case elfcpp::R_SPARC_TLS_LDM_HI22:  // Local-dynamic
2902     case elfcpp::R_SPARC_TLS_LDM_LO10:
2903     case elfcpp::R_SPARC_TLS_LDM_ADD:
2904     case elfcpp::R_SPARC_TLS_LDM_CALL:
2905     case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2906     case elfcpp::R_SPARC_TLS_LDO_LOX10:
2907     case elfcpp::R_SPARC_TLS_LDO_ADD:
2908     case elfcpp::R_SPARC_TLS_LE_HIX22:
2909     case elfcpp::R_SPARC_TLS_LE_LOX10:
2910     case elfcpp::R_SPARC_TLS_IE_HI22:   // Initial-exec
2911     case elfcpp::R_SPARC_TLS_IE_LO10:
2912     case elfcpp::R_SPARC_TLS_IE_LD:
2913     case elfcpp::R_SPARC_TLS_IE_LDX:
2914     case elfcpp::R_SPARC_TLS_IE_ADD:
2915       {
2916         const bool is_final = gsym->final_value_is_known();
2917         const tls::Tls_optimization optimized_type
2918             = optimize_tls_reloc(is_final, r_type);
2919         switch (r_type)
2920           {
2921           case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2922           case elfcpp::R_SPARC_TLS_GD_LO10:
2923           case elfcpp::R_SPARC_TLS_GD_ADD:
2924           case elfcpp::R_SPARC_TLS_GD_CALL:
2925             if (optimized_type == tls::TLSOPT_NONE)
2926               {
2927                 // Create a pair of GOT entries for the module index and
2928                 // dtv-relative offset.
2929                 Output_data_got<size, big_endian>* got
2930                     = target->got_section(symtab, layout);
2931                 got->add_global_pair_with_rel(gsym, GOT_TYPE_TLS_PAIR,
2932                                               target->rela_dyn_section(layout),
2933                                               (size == 64
2934                                                ? elfcpp::R_SPARC_TLS_DTPMOD64
2935                                                : elfcpp::R_SPARC_TLS_DTPMOD32),
2936                                               (size == 64
2937                                                ? elfcpp::R_SPARC_TLS_DTPOFF64
2938                                                : elfcpp::R_SPARC_TLS_DTPOFF32));
2939
2940                 // Emit R_SPARC_WPLT30 against "__tls_get_addr"
2941                 if (r_type == elfcpp::R_SPARC_TLS_GD_CALL)
2942                   generate_tls_call(symtab, layout, target);
2943               }
2944             else if (optimized_type == tls::TLSOPT_TO_IE)
2945               {
2946                 // Create a GOT entry for the tp-relative offset.
2947                 Output_data_got<size, big_endian>* got
2948                     = target->got_section(symtab, layout);
2949                 got->add_global_with_rel(gsym, GOT_TYPE_TLS_OFFSET,
2950                                          target->rela_dyn_section(layout),
2951                                          (size == 64 ?
2952                                           elfcpp::R_SPARC_TLS_TPOFF64 :
2953                                           elfcpp::R_SPARC_TLS_TPOFF32));
2954               }
2955             else if (optimized_type != tls::TLSOPT_TO_LE)
2956               unsupported_reloc_global(object, r_type, gsym);
2957             break;
2958
2959           case elfcpp::R_SPARC_TLS_LDM_HI22:    // Local-dynamic
2960           case elfcpp::R_SPARC_TLS_LDM_LO10:
2961           case elfcpp::R_SPARC_TLS_LDM_ADD:
2962           case elfcpp::R_SPARC_TLS_LDM_CALL:
2963             if (optimized_type == tls::TLSOPT_NONE)
2964               {
2965                 // Create a GOT entry for the module index.
2966                 target->got_mod_index_entry(symtab, layout, object);
2967
2968                 if (r_type == elfcpp::R_SPARC_TLS_LDM_CALL)
2969                   generate_tls_call(symtab, layout, target);
2970               }
2971             else if (optimized_type != tls::TLSOPT_TO_LE)
2972               unsupported_reloc_global(object, r_type, gsym);
2973             break;
2974
2975           case elfcpp::R_SPARC_TLS_LDO_HIX22:   // Alternate local-dynamic
2976           case elfcpp::R_SPARC_TLS_LDO_LOX10:
2977           case elfcpp::R_SPARC_TLS_LDO_ADD:
2978             break;
2979
2980           case elfcpp::R_SPARC_TLS_LE_HIX22:
2981           case elfcpp::R_SPARC_TLS_LE_LOX10:
2982             layout->set_has_static_tls();
2983             if (parameters->options().shared())
2984               {
2985                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2986                 rela_dyn->add_symbolless_global_addend(gsym, orig_r_type,
2987                                                        output_section, object,
2988                                                        data_shndx, reloc.get_r_offset(),
2989                                                        0);
2990               }
2991             break;
2992
2993           case elfcpp::R_SPARC_TLS_IE_HI22:     // Initial-exec
2994           case elfcpp::R_SPARC_TLS_IE_LO10:
2995           case elfcpp::R_SPARC_TLS_IE_LD:
2996           case elfcpp::R_SPARC_TLS_IE_LDX:
2997           case elfcpp::R_SPARC_TLS_IE_ADD:
2998             layout->set_has_static_tls();
2999             if (optimized_type == tls::TLSOPT_NONE)
3000               {
3001                 // Create a GOT entry for the tp-relative offset.
3002                 Output_data_got<size, big_endian>* got
3003                   = target->got_section(symtab, layout);
3004                 got->add_global_with_rel(gsym, GOT_TYPE_TLS_OFFSET,
3005                                          target->rela_dyn_section(layout),
3006                                          (size == 64
3007                                           ? elfcpp::R_SPARC_TLS_TPOFF64
3008                                           : elfcpp::R_SPARC_TLS_TPOFF32));
3009               }
3010             else if (optimized_type != tls::TLSOPT_TO_LE)
3011               unsupported_reloc_global(object, r_type, gsym);
3012             break;
3013           }
3014       }
3015       break;
3016
3017       // These are relocations which should only be seen by the
3018       // dynamic linker, and should never be seen here.
3019     case elfcpp::R_SPARC_COPY:
3020     case elfcpp::R_SPARC_GLOB_DAT:
3021     case elfcpp::R_SPARC_JMP_SLOT:
3022     case elfcpp::R_SPARC_JMP_IREL:
3023     case elfcpp::R_SPARC_RELATIVE:
3024     case elfcpp::R_SPARC_IRELATIVE:
3025     case elfcpp::R_SPARC_TLS_DTPMOD64:
3026     case elfcpp::R_SPARC_TLS_DTPMOD32:
3027     case elfcpp::R_SPARC_TLS_DTPOFF64:
3028     case elfcpp::R_SPARC_TLS_DTPOFF32:
3029     case elfcpp::R_SPARC_TLS_TPOFF64:
3030     case elfcpp::R_SPARC_TLS_TPOFF32:
3031       gold_error(_("%s: unexpected reloc %u in object file"),
3032                  object->name().c_str(), r_type);
3033       break;
3034
3035     default:
3036       unsupported_reloc_global(object, r_type, gsym);
3037       break;
3038     }
3039 }
3040
3041 // Make a new symbol table entry.
3042 // STT_SPARC_REGISTER symbols require special handling,
3043 // so we intercept these symbols and keep track of them separately.
3044 // We will resolve register symbols here and output them at symbol
3045 // finalization time.
3046
3047 template<int size, bool big_endian>
3048 Sized_symbol<size>*
3049 Target_sparc<size, big_endian>::make_symbol(const char* name,
3050                                             elfcpp::STT type,
3051                                             Object* object,
3052                                             unsigned int shndx,
3053                                             uint64_t value)
3054 {
3055   // REGISTER symbols are used only on SPARC-64.
3056   if (size == 64 && type == elfcpp::STT_SPARC_REGISTER)
3057     {
3058       // Ignore REGISTER symbols in dynamic objects.
3059       if (object->is_dynamic())
3060         return NULL;
3061       // Only registers 2, 3, 6, and 7 can be declared global.
3062       int reg = value;
3063       switch (reg)
3064         {
3065         case 2: case 3:
3066           reg -= 2;
3067           break;
3068         case 6: case 7:
3069           reg -= 4;
3070           break;
3071         default:
3072           gold_error(_("%s: only registers %%g[2367] can be declared "
3073                        "using STT_REGISTER"),
3074                      object->name().c_str());
3075           return NULL;
3076         }
3077       Register_symbol& rsym = this->register_syms_[reg];
3078       if (rsym.name == NULL)
3079         {
3080           rsym.name = name;
3081           rsym.shndx = shndx;
3082           rsym.obj = object;
3083         }
3084       else
3085         {
3086           if (strcmp(rsym.name, name) != 0)
3087             {
3088               gold_error(_("%s: register %%g%d declared as '%s'; "
3089                            "previously declared as '%s' in %s"),
3090                          object->name().c_str(),
3091                          static_cast<int>(value),
3092                          *name ? name : "#scratch",
3093                          *rsym.name ? rsym.name : "#scratch",
3094                          rsym.obj->name().c_str());
3095               return NULL;
3096             }
3097         }
3098       return NULL;
3099     }
3100   return new Sized_symbol<size>();
3101 }
3102
3103 // Process relocations for gc.
3104
3105 template<int size, bool big_endian>
3106 void
3107 Target_sparc<size, big_endian>::gc_process_relocs(
3108                         Symbol_table* symtab,
3109                         Layout* layout,
3110                         Sized_relobj_file<size, big_endian>* object,
3111                         unsigned int data_shndx,
3112                         unsigned int,
3113                         const unsigned char* prelocs,
3114                         size_t reloc_count,
3115                         Output_section* output_section,
3116                         bool needs_special_offset_handling,
3117                         size_t local_symbol_count,
3118                         const unsigned char* plocal_symbols)
3119 {
3120   typedef Target_sparc<size, big_endian> Sparc;
3121   typedef typename Target_sparc<size, big_endian>::Scan Scan;
3122   typedef gold::Default_classify_reloc<elfcpp::SHT_RELA, size, big_endian>
3123       Classify_reloc;
3124
3125   gold::gc_process_relocs<size, big_endian, Sparc, Scan, Classify_reloc>(
3126     symtab,
3127     layout,
3128     this,
3129     object,
3130     data_shndx,
3131     prelocs,
3132     reloc_count,
3133     output_section,
3134     needs_special_offset_handling,
3135     local_symbol_count,
3136     plocal_symbols);
3137 }
3138
3139 // Scan relocations for a section.
3140
3141 template<int size, bool big_endian>
3142 void
3143 Target_sparc<size, big_endian>::scan_relocs(
3144                         Symbol_table* symtab,
3145                         Layout* layout,
3146                         Sized_relobj_file<size, big_endian>* object,
3147                         unsigned int data_shndx,
3148                         unsigned int sh_type,
3149                         const unsigned char* prelocs,
3150                         size_t reloc_count,
3151                         Output_section* output_section,
3152                         bool needs_special_offset_handling,
3153                         size_t local_symbol_count,
3154                         const unsigned char* plocal_symbols)
3155 {
3156   typedef Target_sparc<size, big_endian> Sparc;
3157   typedef gold::Default_classify_reloc<elfcpp::SHT_RELA, size, big_endian>
3158       Classify_reloc;
3159
3160   if (sh_type == elfcpp::SHT_REL)
3161     {
3162       gold_error(_("%s: unsupported REL reloc section"),
3163                  object->name().c_str());
3164       return;
3165     }
3166
3167   gold::scan_relocs<size, big_endian, Sparc, Scan, Classify_reloc>(
3168     symtab,
3169     layout,
3170     this,
3171     object,
3172     data_shndx,
3173     prelocs,
3174     reloc_count,
3175     output_section,
3176     needs_special_offset_handling,
3177     local_symbol_count,
3178     plocal_symbols);
3179 }
3180
3181 // Finalize the sections.
3182
3183 template<int size, bool big_endian>
3184 void
3185 Target_sparc<size, big_endian>::do_finalize_sections(
3186     Layout* layout,
3187     const Input_objects*,
3188     Symbol_table* symtab)
3189 {
3190   if (this->plt_)
3191     this->plt_->emit_pending_ifunc_relocs();
3192
3193   // Fill in some more dynamic tags.
3194   const Reloc_section* rel_plt = (this->plt_ == NULL
3195                                   ? NULL
3196                                   : this->plt_->rel_plt());
3197   layout->add_target_dynamic_tags(false, this->plt_, rel_plt,
3198                                   this->rela_dyn_, true, true);
3199
3200   // Emit any relocs we saved in an attempt to avoid generating COPY
3201   // relocs.
3202   if (this->copy_relocs_.any_saved_relocs())
3203     this->copy_relocs_.emit(this->rela_dyn_section(layout));
3204
3205   if (parameters->doing_static_link()
3206       && (this->plt_ == NULL || !this->plt_->has_ifunc_section()))
3207     {
3208       // If linking statically, make sure that the __rela_iplt symbols
3209       // were defined if necessary, even if we didn't create a PLT.
3210       static const Define_symbol_in_segment syms[] =
3211         {
3212           {
3213             "__rela_iplt_start",        // name
3214             elfcpp::PT_LOAD,            // segment_type
3215             elfcpp::PF_W,               // segment_flags_set
3216             elfcpp::PF(0),              // segment_flags_clear
3217             0,                          // value
3218             0,                          // size
3219             elfcpp::STT_NOTYPE,         // type
3220             elfcpp::STB_GLOBAL,         // binding
3221             elfcpp::STV_HIDDEN,         // visibility
3222             0,                          // nonvis
3223             Symbol::SEGMENT_START,      // offset_from_base
3224             true                        // only_if_ref
3225           },
3226           {
3227             "__rela_iplt_end",          // name
3228             elfcpp::PT_LOAD,            // segment_type
3229             elfcpp::PF_W,               // segment_flags_set
3230             elfcpp::PF(0),              // segment_flags_clear
3231             0,                          // value
3232             0,                          // size
3233             elfcpp::STT_NOTYPE,         // type
3234             elfcpp::STB_GLOBAL,         // binding
3235             elfcpp::STV_HIDDEN,         // visibility
3236             0,                          // nonvis
3237             Symbol::SEGMENT_START,      // offset_from_base
3238             true                        // only_if_ref
3239           }
3240         };
3241
3242       symtab->define_symbols(layout, 2, syms,
3243                              layout->script_options()->saw_sections_clause());
3244     }
3245
3246   for (int reg = 0; reg < 4; ++reg)
3247     {
3248       Register_symbol& rsym = this->register_syms_[reg];
3249       if (rsym.name != NULL)
3250         {
3251           int value = reg < 3 ? reg + 2 : reg + 4;
3252           Sized_symbol<size>* sym = new Sized_symbol<size>();
3253           if (rsym.shndx == elfcpp::SHN_UNDEF)
3254             sym->init_undefined(rsym.name, NULL, value,
3255                                 elfcpp::STT_SPARC_REGISTER, elfcpp::STB_GLOBAL,
3256                                 elfcpp::STV_DEFAULT, 0);
3257           else
3258             sym->init_constant(rsym.name, NULL, value, 0,
3259                                elfcpp::STT_SPARC_REGISTER, elfcpp::STB_GLOBAL,
3260                                elfcpp::STV_DEFAULT, 0, false);
3261           symtab->add_target_global_symbol(sym);
3262           layout->add_target_specific_dynamic_tag(elfcpp::DT_SPARC_REGISTER,
3263                                                   value);
3264         }
3265     }
3266 }
3267
3268 // Perform a relocation.
3269
3270 template<int size, bool big_endian>
3271 inline bool
3272 Target_sparc<size, big_endian>::Relocate::relocate(
3273                         const Relocate_info<size, big_endian>* relinfo,
3274                         unsigned int,
3275                         Target_sparc* target,
3276                         Output_section*,
3277                         size_t relnum,
3278                         const unsigned char* preloc,
3279                         const Sized_symbol<size>* gsym,
3280                         const Symbol_value<size>* psymval,
3281                         unsigned char* view,
3282                         typename elfcpp::Elf_types<size>::Elf_Addr address,
3283                         section_size_type view_size)
3284 {
3285   const elfcpp::Rela<size, big_endian> rela(preloc);
3286   unsigned int r_type = elfcpp::elf_r_type<size>(rela.get_r_info());
3287   bool orig_is_ifunc = psymval->is_ifunc_symbol();
3288   r_type &= 0xff;
3289
3290   if (this->ignore_gd_add_)
3291     {
3292       if (r_type != elfcpp::R_SPARC_TLS_GD_ADD)
3293         gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3294                                _("missing expected TLS relocation"));
3295       else
3296         {
3297           this->ignore_gd_add_ = false;
3298           return false;
3299         }
3300     }
3301
3302   if (view == NULL)
3303     return true;
3304
3305   if (this->reloc_adjust_addr_ == view)
3306     view -= 4;
3307
3308   typedef Sparc_relocate_functions<size, big_endian> Reloc;
3309   const Sized_relobj_file<size, big_endian>* object = relinfo->object;
3310
3311   // Pick the value to use for symbols defined in shared objects.
3312   Symbol_value<size> symval;
3313   if (gsym != NULL
3314       && gsym->use_plt_offset(Scan::get_reference_flags(r_type)))
3315     {
3316       elfcpp::Elf_Xword value;
3317
3318       value = target->plt_address_for_global(gsym);
3319
3320       symval.set_output_value(value);
3321
3322       psymval = &symval;
3323     }
3324   else if (gsym == NULL && orig_is_ifunc)
3325     {
3326       unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3327       if (object->local_has_plt_offset(r_sym))
3328         {
3329           symval.set_output_value(target->plt_address_for_local(object, r_sym));
3330           psymval = &symval;
3331         }
3332     }
3333
3334   const elfcpp::Elf_Xword addend = rela.get_r_addend();
3335
3336   // Get the GOT offset if needed.  Unlike i386 and x86_64, our GOT
3337   // pointer points to the beginning, not the end, of the table.
3338   // So we just use the plain offset.
3339   unsigned int got_offset = 0;
3340   bool gdop_valid = false;
3341   switch (r_type)
3342     {
3343     case elfcpp::R_SPARC_GOTDATA_OP:
3344     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
3345     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
3346       // If this is local, we did not create a GOT entry because we
3347       // intend to transform this into a GOT relative relocation.
3348       if (gsym == NULL
3349           || (gsym->is_defined()
3350               && !gsym->is_from_dynobj()
3351               && !gsym->is_preemptible()
3352               && !orig_is_ifunc))
3353         {
3354           got_offset = psymval->value(object, addend) - target->got_address();
3355           gdop_valid = true;
3356           break;
3357         }
3358       // Fall through.
3359     case elfcpp::R_SPARC_GOT10:
3360     case elfcpp::R_SPARC_GOT13:
3361     case elfcpp::R_SPARC_GOT22:
3362       if (gsym != NULL)
3363         {
3364           gold_assert(gsym->has_got_offset(GOT_TYPE_STANDARD));
3365           got_offset = gsym->got_offset(GOT_TYPE_STANDARD);
3366         }
3367       else
3368         {
3369           unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3370           gold_assert(object->local_has_got_offset(r_sym, GOT_TYPE_STANDARD));
3371           got_offset = object->local_got_offset(r_sym, GOT_TYPE_STANDARD);
3372         }
3373       break;
3374
3375     default:
3376       break;
3377     }
3378
3379   switch (r_type)
3380     {
3381     case elfcpp::R_SPARC_NONE:
3382     case elfcpp::R_SPARC_REGISTER:
3383     case elfcpp::R_SPARC_GNU_VTINHERIT:
3384     case elfcpp::R_SPARC_GNU_VTENTRY:
3385       break;
3386
3387     case elfcpp::R_SPARC_8:
3388       Relocate_functions<size, big_endian>::rela8(view, object,
3389                                                   psymval, addend);
3390       break;
3391
3392     case elfcpp::R_SPARC_16:
3393       if (rela.get_r_offset() & 0x1)
3394         {
3395           // The assembler can sometimes emit unaligned relocations
3396           // for dwarf2 cfi directives.
3397           Reloc::ua16(view, object, psymval, addend);
3398         }
3399       else
3400         Relocate_functions<size, big_endian>::rela16(view, object,
3401                                                      psymval, addend);
3402       break;
3403
3404     case elfcpp::R_SPARC_32:
3405       if (!parameters->options().output_is_position_independent())
3406         {
3407           if (rela.get_r_offset() & 0x3)
3408             {
3409               // The assembler can sometimes emit unaligned relocations
3410               // for dwarf2 cfi directives.
3411               Reloc::ua32(view, object, psymval, addend);
3412             }
3413           else
3414             Relocate_functions<size, big_endian>::rela32(view, object,
3415                                                          psymval, addend);
3416         }
3417       break;
3418
3419     case elfcpp::R_SPARC_DISP8:
3420       Reloc::disp8(view, object, psymval, addend, address);
3421       break;
3422
3423     case elfcpp::R_SPARC_DISP16:
3424       Reloc::disp16(view, object, psymval, addend, address);
3425       break;
3426
3427     case elfcpp::R_SPARC_DISP32:
3428       Reloc::disp32(view, object, psymval, addend, address);
3429       break;
3430
3431     case elfcpp::R_SPARC_DISP64:
3432       Reloc::disp64(view, object, psymval, addend, address);
3433       break;
3434
3435     case elfcpp::R_SPARC_WDISP30:
3436     case elfcpp::R_SPARC_WPLT30:
3437       Reloc::wdisp30(view, object, psymval, addend, address);
3438       if (target->may_relax())
3439         relax_call(target, view, rela, view_size);
3440       break;
3441
3442     case elfcpp::R_SPARC_WDISP22:
3443       Reloc::wdisp22(view, object, psymval, addend, address);
3444       break;
3445
3446     case elfcpp::R_SPARC_WDISP19:
3447       Reloc::wdisp19(view, object, psymval, addend, address);
3448       break;
3449
3450     case elfcpp::R_SPARC_WDISP16:
3451       Reloc::wdisp16(view, object, psymval, addend, address);
3452       break;
3453
3454     case elfcpp::R_SPARC_WDISP10:
3455       Reloc::wdisp10(view, object, psymval, addend, address);
3456       break;
3457
3458     case elfcpp::R_SPARC_HI22:
3459       Reloc::hi22(view, object, psymval, addend);
3460       break;
3461
3462     case elfcpp::R_SPARC_22:
3463       Reloc::rela32_22(view, object, psymval, addend);
3464       break;
3465
3466     case elfcpp::R_SPARC_13:
3467       Reloc::rela32_13(view, object, psymval, addend);
3468       break;
3469
3470     case elfcpp::R_SPARC_LO10:
3471       Reloc::lo10(view, object, psymval, addend);
3472       break;
3473
3474     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
3475       if (gdop_valid)
3476         {
3477           Reloc::gdop_lox10(view, got_offset);
3478           break;
3479         }
3480       // Fall through.
3481     case elfcpp::R_SPARC_GOT10:
3482       Reloc::lo10(view, got_offset, addend);
3483       break;
3484
3485     case elfcpp::R_SPARC_GOTDATA_OP:
3486       if (gdop_valid)
3487         {
3488           typedef typename elfcpp::Swap<32, true>::Valtype Insntype;
3489           Insntype* wv = reinterpret_cast<Insntype*>(view);
3490           Insntype val;
3491
3492           // {ld,ldx} [%rs1 + %rs2], %rd --> add %rs1, %rs2, %rd
3493           val = elfcpp::Swap<32, true>::readval(wv);
3494           val = 0x80000000 | (val & 0x3e07c01f);
3495           elfcpp::Swap<32, true>::writeval(wv, val);
3496         }
3497       break;
3498
3499     case elfcpp::R_SPARC_GOT13:
3500       Reloc::rela32_13(view, got_offset, addend);
3501       break;
3502
3503     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
3504       if (gdop_valid)
3505         {
3506           Reloc::gdop_hix22(view, got_offset);
3507           break;
3508         }
3509       // Fall through.
3510     case elfcpp::R_SPARC_GOT22:
3511       Reloc::hi22(view, got_offset, addend);
3512       break;
3513
3514     case elfcpp::R_SPARC_PC10:
3515       Reloc::pc10(view, object, psymval, addend, address);
3516       break;
3517
3518     case elfcpp::R_SPARC_PC22:
3519       Reloc::pc22(view, object, psymval, addend, address);
3520       break;
3521
3522     case elfcpp::R_SPARC_TLS_DTPOFF32:
3523     case elfcpp::R_SPARC_UA32:
3524       Reloc::ua32(view, object, psymval, addend);
3525       break;
3526
3527     case elfcpp::R_SPARC_PLT64:
3528       Relocate_functions<size, big_endian>::rela64(view, object,
3529                                                    psymval, addend);
3530       break;
3531
3532     case elfcpp::R_SPARC_PLT32:
3533       Relocate_functions<size, big_endian>::rela32(view, object,
3534                                                    psymval, addend);
3535       break;
3536
3537     case elfcpp::R_SPARC_HIPLT22:
3538       Reloc::hi22(view, object, psymval, addend);
3539       break;
3540
3541     case elfcpp::R_SPARC_LOPLT10:
3542       Reloc::lo10(view, object, psymval, addend);
3543       break;
3544
3545     case elfcpp::R_SPARC_PCPLT32:
3546       Reloc::disp32(view, object, psymval, addend, address);
3547       break;
3548
3549     case elfcpp::R_SPARC_PCPLT22:
3550       Reloc::pcplt22(view, object, psymval, addend, address);
3551       break;
3552
3553     case elfcpp::R_SPARC_PCPLT10:
3554       Reloc::lo10(view, object, psymval, addend, address);
3555       break;
3556
3557     case elfcpp::R_SPARC_64:
3558       if (!parameters->options().output_is_position_independent())
3559         {
3560           if (rela.get_r_offset() & 0x7)
3561             {
3562               // The assembler can sometimes emit unaligned relocations
3563               // for dwarf2 cfi directives.
3564               Reloc::ua64(view, object, psymval, addend);
3565             }
3566           else
3567             Relocate_functions<size, big_endian>::rela64(view, object,
3568                                                          psymval, addend);
3569         }
3570       break;
3571
3572     case elfcpp::R_SPARC_OLO10:
3573       {
3574         unsigned int addend2 = rela.get_r_info() & 0xffffffff;
3575         addend2 = ((addend2 >> 8) ^ 0x800000) - 0x800000;
3576         Reloc::olo10(view, object, psymval, addend, addend2);
3577       }
3578       break;
3579
3580     case elfcpp::R_SPARC_HH22:
3581       Reloc::hh22(view, object, psymval, addend);
3582       break;
3583
3584     case elfcpp::R_SPARC_PC_HH22:
3585       Reloc::pc_hh22(view, object, psymval, addend, address);
3586       break;
3587
3588     case elfcpp::R_SPARC_HM10:
3589       Reloc::hm10(view, object, psymval, addend);
3590       break;
3591
3592     case elfcpp::R_SPARC_PC_HM10:
3593       Reloc::pc_hm10(view, object, psymval, addend, address);
3594       break;
3595
3596     case elfcpp::R_SPARC_LM22:
3597       Reloc::hi22(view, object, psymval, addend);
3598       break;
3599
3600     case elfcpp::R_SPARC_PC_LM22:
3601       Reloc::pcplt22(view, object, psymval, addend, address);
3602       break;
3603
3604     case elfcpp::R_SPARC_11:
3605       Reloc::rela32_11(view, object, psymval, addend);
3606       break;
3607
3608     case elfcpp::R_SPARC_10:
3609       Reloc::rela32_10(view, object, psymval, addend);
3610       break;
3611
3612     case elfcpp::R_SPARC_7:
3613       Reloc::rela32_7(view, object, psymval, addend);
3614       break;
3615
3616     case elfcpp::R_SPARC_6:
3617       Reloc::rela32_6(view, object, psymval, addend);
3618       break;
3619
3620     case elfcpp::R_SPARC_5:
3621       Reloc::rela32_5(view, object, psymval, addend);
3622       break;
3623
3624     case elfcpp::R_SPARC_HIX22:
3625       Reloc::hix22(view, object, psymval, addend);
3626       break;
3627
3628     case elfcpp::R_SPARC_LOX10:
3629       Reloc::lox10(view, object, psymval, addend);
3630       break;
3631
3632     case elfcpp::R_SPARC_H34:
3633       Reloc::h34(view, object, psymval, addend);
3634       break;
3635
3636     case elfcpp::R_SPARC_H44:
3637       Reloc::h44(view, object, psymval, addend);
3638       break;
3639
3640     case elfcpp::R_SPARC_M44:
3641       Reloc::m44(view, object, psymval, addend);
3642       break;
3643
3644     case elfcpp::R_SPARC_L44:
3645       Reloc::l44(view, object, psymval, addend);
3646       break;
3647
3648     case elfcpp::R_SPARC_TLS_DTPOFF64:
3649     case elfcpp::R_SPARC_UA64:
3650       Reloc::ua64(view, object, psymval, addend);
3651       break;
3652
3653     case elfcpp::R_SPARC_UA16:
3654       Reloc::ua16(view, object, psymval, addend);
3655       break;
3656
3657     case elfcpp::R_SPARC_TLS_GD_HI22:
3658     case elfcpp::R_SPARC_TLS_GD_LO10:
3659     case elfcpp::R_SPARC_TLS_GD_ADD:
3660     case elfcpp::R_SPARC_TLS_GD_CALL:
3661     case elfcpp::R_SPARC_TLS_LDM_HI22:
3662     case elfcpp::R_SPARC_TLS_LDM_LO10:
3663     case elfcpp::R_SPARC_TLS_LDM_ADD:
3664     case elfcpp::R_SPARC_TLS_LDM_CALL:
3665     case elfcpp::R_SPARC_TLS_LDO_HIX22:
3666     case elfcpp::R_SPARC_TLS_LDO_LOX10:
3667     case elfcpp::R_SPARC_TLS_LDO_ADD:
3668     case elfcpp::R_SPARC_TLS_IE_HI22:
3669     case elfcpp::R_SPARC_TLS_IE_LO10:
3670     case elfcpp::R_SPARC_TLS_IE_LD:
3671     case elfcpp::R_SPARC_TLS_IE_LDX:
3672     case elfcpp::R_SPARC_TLS_IE_ADD:
3673     case elfcpp::R_SPARC_TLS_LE_HIX22:
3674     case elfcpp::R_SPARC_TLS_LE_LOX10:
3675       this->relocate_tls(relinfo, target, relnum, rela,
3676                          r_type, gsym, psymval, view,
3677                          address, view_size);
3678       break;
3679
3680     case elfcpp::R_SPARC_COPY:
3681     case elfcpp::R_SPARC_GLOB_DAT:
3682     case elfcpp::R_SPARC_JMP_SLOT:
3683     case elfcpp::R_SPARC_JMP_IREL:
3684     case elfcpp::R_SPARC_RELATIVE:
3685     case elfcpp::R_SPARC_IRELATIVE:
3686       // These are outstanding tls relocs, which are unexpected when
3687       // linking.
3688     case elfcpp::R_SPARC_TLS_DTPMOD64:
3689     case elfcpp::R_SPARC_TLS_DTPMOD32:
3690     case elfcpp::R_SPARC_TLS_TPOFF64:
3691     case elfcpp::R_SPARC_TLS_TPOFF32:
3692       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3693                              _("unexpected reloc %u in object file"),
3694                              r_type);
3695       break;
3696
3697     default:
3698       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3699                              _("unsupported reloc %u"),
3700                              r_type);
3701       break;
3702     }
3703
3704   return true;
3705 }
3706
3707 // Perform a TLS relocation.
3708
3709 template<int size, bool big_endian>
3710 inline void
3711 Target_sparc<size, big_endian>::Relocate::relocate_tls(
3712                         const Relocate_info<size, big_endian>* relinfo,
3713                         Target_sparc<size, big_endian>* target,
3714                         size_t relnum,
3715                         const elfcpp::Rela<size, big_endian>& rela,
3716                         unsigned int r_type,
3717                         const Sized_symbol<size>* gsym,
3718                         const Symbol_value<size>* psymval,
3719                         unsigned char* view,
3720                         typename elfcpp::Elf_types<size>::Elf_Addr address,
3721                         section_size_type)
3722 {
3723   Output_segment* tls_segment = relinfo->layout->tls_segment();
3724   typedef Sparc_relocate_functions<size, big_endian> Reloc;
3725   const Sized_relobj_file<size, big_endian>* object = relinfo->object;
3726   typedef typename elfcpp::Swap<32, true>::Valtype Insntype;
3727
3728   const elfcpp::Elf_Xword addend = rela.get_r_addend();
3729   typename elfcpp::Elf_types<size>::Elf_Addr value = psymval->value(object, 0);
3730
3731   const bool is_final =
3732     (gsym == NULL
3733      ? !parameters->options().shared()
3734      : gsym->final_value_is_known());
3735   const tls::Tls_optimization optimized_type
3736       = optimize_tls_reloc(is_final, r_type);
3737
3738   switch (r_type)
3739     {
3740     case elfcpp::R_SPARC_TLS_GD_HI22:
3741     case elfcpp::R_SPARC_TLS_GD_LO10:
3742     case elfcpp::R_SPARC_TLS_GD_ADD:
3743     case elfcpp::R_SPARC_TLS_GD_CALL:
3744       if (optimized_type == tls::TLSOPT_TO_LE)
3745         {
3746           Insntype* wv = reinterpret_cast<Insntype*>(view);
3747           Insntype val;
3748
3749           value -= tls_segment->memsz();
3750
3751           switch (r_type)
3752             {
3753             case elfcpp::R_SPARC_TLS_GD_HI22:
3754               // TLS_GD_HI22 --> TLS_LE_HIX22
3755               Reloc::hix22(view, value, addend);
3756               break;
3757
3758             case elfcpp::R_SPARC_TLS_GD_LO10:
3759               // TLS_GD_LO10 --> TLS_LE_LOX10
3760               Reloc::lox10(view, value, addend);
3761               break;
3762
3763             case elfcpp::R_SPARC_TLS_GD_ADD:
3764               // add %reg1, %reg2, %reg3 --> mov %g7, %reg2, %reg3
3765               val = elfcpp::Swap<32, true>::readval(wv);
3766               val = (val & ~0x7c000) | 0x1c000;
3767               elfcpp::Swap<32, true>::writeval(wv, val);
3768               break;
3769             case elfcpp::R_SPARC_TLS_GD_CALL:
3770               // call __tls_get_addr --> nop
3771               elfcpp::Swap<32, true>::writeval(wv, sparc_nop);
3772               break;
3773             }
3774           break;
3775         }
3776       else
3777         {
3778           unsigned int got_type = (optimized_type == tls::TLSOPT_TO_IE
3779                                    ? GOT_TYPE_TLS_OFFSET
3780                                    : GOT_TYPE_TLS_PAIR);
3781           if (gsym != NULL)
3782             {
3783               gold_assert(gsym->has_got_offset(got_type));
3784               value = gsym->got_offset(got_type);
3785             }
3786           else
3787             {
3788               unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3789               gold_assert(object->local_has_got_offset(r_sym, got_type));
3790               value = object->local_got_offset(r_sym, got_type);
3791             }
3792           if (optimized_type == tls::TLSOPT_TO_IE)
3793             {
3794               Insntype* wv = reinterpret_cast<Insntype*>(view);
3795               Insntype val;
3796
3797               switch (r_type)
3798                 {
3799                 case elfcpp::R_SPARC_TLS_GD_HI22:
3800                   // TLS_GD_HI22 --> TLS_IE_HI22
3801                   Reloc::hi22(view, value, addend);
3802                   break;
3803
3804                 case elfcpp::R_SPARC_TLS_GD_LO10:
3805                   // TLS_GD_LO10 --> TLS_IE_LO10
3806                   Reloc::lo10(view, value, addend);
3807                   break;
3808
3809                 case elfcpp::R_SPARC_TLS_GD_ADD:
3810                   // add %reg1, %reg2, %reg3 --> ld [%reg1 + %reg2], %reg3
3811                   val = elfcpp::Swap<32, true>::readval(wv);
3812
3813                   if (size == 64)
3814                     val |= 0xc0580000;
3815                   else
3816                     val |= 0xc0000000;
3817
3818                   elfcpp::Swap<32, true>::writeval(wv, val);
3819                   break;
3820
3821                 case elfcpp::R_SPARC_TLS_GD_CALL:
3822                   // The compiler can put the TLS_GD_ADD instruction
3823                   // into the delay slot of the call.  If so, we need
3824                   // to transpose the two instructions so that the
3825                   // new sequence works properly.
3826                   //
3827                   // The test we use is if the instruction in the
3828                   // delay slot is an add with destination register
3829                   // equal to %o0
3830                   val = elfcpp::Swap<32, true>::readval(wv + 1);
3831                   if ((val & 0x81f80000) == 0x80000000
3832                       && ((val >> 25) & 0x1f) == 0x8)
3833                     {
3834                       if (size == 64)
3835                         val |= 0xc0580000;
3836                       else
3837                         val |= 0xc0000000;
3838
3839                       elfcpp::Swap<32, true>::writeval(wv, val);
3840
3841                       wv += 1;
3842                       this->ignore_gd_add_ = true;
3843                     }
3844                   else
3845                     {
3846                       // Even if the delay slot isn't the TLS_GD_ADD
3847                       // instruction, we still have to handle the case
3848                       // where it sets up %o0 in some other way.
3849                       elfcpp::Swap<32, true>::writeval(wv, val);
3850                       wv += 1;
3851                       this->reloc_adjust_addr_ = view + 4;
3852                     }
3853                   // call __tls_get_addr --> add %g7, %o0, %o0
3854                   elfcpp::Swap<32, true>::writeval(wv, 0x9001c008);
3855                   break;
3856                 }
3857               break;
3858             }
3859           else if (optimized_type == tls::TLSOPT_NONE)
3860             {
3861               switch (r_type)
3862                 {
3863                 case elfcpp::R_SPARC_TLS_GD_HI22:
3864                   Reloc::hi22(view, value, addend);
3865                   break;
3866                 case elfcpp::R_SPARC_TLS_GD_LO10:
3867                   Reloc::lo10(view, value, addend);
3868                   break;
3869                 case elfcpp::R_SPARC_TLS_GD_ADD:
3870                   break;
3871                 case elfcpp::R_SPARC_TLS_GD_CALL:
3872                   {
3873                     Symbol_value<size> symval;
3874                     elfcpp::Elf_Xword value;
3875                     Symbol* tsym;
3876
3877                     tsym = target->tls_get_addr_sym_;
3878                     gold_assert(tsym);
3879                     value = (target->plt_section()->address() +
3880                              tsym->plt_offset());
3881                     symval.set_output_value(value);
3882                     Reloc::wdisp30(view, object, &symval, addend, address);
3883                   }
3884                   break;
3885                 }
3886               break;
3887             }
3888         }
3889       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3890                              _("unsupported reloc %u"),
3891                              r_type);
3892       break;
3893
3894     case elfcpp::R_SPARC_TLS_LDM_HI22:
3895     case elfcpp::R_SPARC_TLS_LDM_LO10:
3896     case elfcpp::R_SPARC_TLS_LDM_ADD:
3897     case elfcpp::R_SPARC_TLS_LDM_CALL:
3898       if (optimized_type == tls::TLSOPT_TO_LE)
3899         {
3900           Insntype* wv = reinterpret_cast<Insntype*>(view);
3901
3902           switch (r_type)
3903             {
3904             case elfcpp::R_SPARC_TLS_LDM_HI22:
3905             case elfcpp::R_SPARC_TLS_LDM_LO10:
3906             case elfcpp::R_SPARC_TLS_LDM_ADD:
3907               elfcpp::Swap<32, true>::writeval(wv, sparc_nop);
3908               break;
3909
3910             case elfcpp::R_SPARC_TLS_LDM_CALL:
3911               elfcpp::Swap<32, true>::writeval(wv, sparc_mov_g0_o0);
3912               break;
3913             }
3914           break;
3915         }
3916       else if (optimized_type == tls::TLSOPT_NONE)
3917         {
3918           // Relocate the field with the offset of the GOT entry for
3919           // the module index.
3920           unsigned int got_offset;
3921
3922           got_offset = target->got_mod_index_entry(NULL, NULL, NULL);
3923           switch (r_type)
3924             {
3925             case elfcpp::R_SPARC_TLS_LDM_HI22:
3926               Reloc::hi22(view, got_offset, addend);
3927               break;
3928             case elfcpp::R_SPARC_TLS_LDM_LO10:
3929               Reloc::lo10(view, got_offset, addend);
3930               break;
3931             case elfcpp::R_SPARC_TLS_LDM_ADD:
3932               break;
3933             case elfcpp::R_SPARC_TLS_LDM_CALL:
3934               {
3935                 Symbol_value<size> symval;
3936                 elfcpp::Elf_Xword value;
3937                 Symbol* tsym;
3938
3939                 tsym = target->tls_get_addr_sym_;
3940                 gold_assert(tsym);
3941                 value = (target->plt_section()->address() +
3942                          tsym->plt_offset());
3943                 symval.set_output_value(value);
3944                 Reloc::wdisp30(view, object, &symval, addend, address);
3945               }
3946               break;
3947             }
3948           break;
3949         }
3950       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3951                              _("unsupported reloc %u"),
3952                              r_type);
3953       break;
3954
3955       // These relocs can appear in debugging sections, in which case
3956       // we won't see the TLS_LDM relocs.  The local_dynamic_type
3957       // field tells us this.
3958     case elfcpp::R_SPARC_TLS_LDO_HIX22:
3959       if (optimized_type == tls::TLSOPT_TO_LE)
3960         {
3961           value -= tls_segment->memsz();
3962           Reloc::hix22(view, value, addend);
3963         }
3964       else
3965         Reloc::ldo_hix22(view, value, addend);
3966       break;
3967     case elfcpp::R_SPARC_TLS_LDO_LOX10:
3968       if (optimized_type == tls::TLSOPT_TO_LE)
3969         {
3970           value -= tls_segment->memsz();
3971           Reloc::lox10(view, value, addend);
3972         }
3973       else
3974         Reloc::ldo_lox10(view, value, addend);
3975       break;
3976     case elfcpp::R_SPARC_TLS_LDO_ADD:
3977       if (optimized_type == tls::TLSOPT_TO_LE)
3978         {
3979           Insntype* wv = reinterpret_cast<Insntype*>(view);
3980           Insntype val;
3981
3982           // add %reg1, %reg2, %reg3 --> add %g7, %reg2, %reg3
3983           val = elfcpp::Swap<32, true>::readval(wv);
3984           val = (val & ~0x7c000) | 0x1c000;
3985           elfcpp::Swap<32, true>::writeval(wv, val);
3986         }
3987       break;
3988
3989       // When optimizing IE --> LE, the only relocation that is handled
3990       // differently is R_SPARC_TLS_IE_LD, it is rewritten from
3991       // 'ld{,x} [rs1 + rs2], rd' into 'mov rs2, rd' or simply a NOP is
3992       // rs2 and rd are the same.
3993     case elfcpp::R_SPARC_TLS_IE_LD:
3994     case elfcpp::R_SPARC_TLS_IE_LDX:
3995       if (optimized_type == tls::TLSOPT_TO_LE)
3996         {
3997           Insntype* wv = reinterpret_cast<Insntype*>(view);
3998           Insntype val = elfcpp::Swap<32, true>::readval(wv);
3999           Insntype rs2 = val & 0x1f;
4000           Insntype rd = (val >> 25) & 0x1f;
4001
4002           if (rs2 == rd)
4003             val = sparc_nop;
4004           else
4005             val = sparc_mov | (val & 0x3e00001f);
4006
4007           elfcpp::Swap<32, true>::writeval(wv, val);
4008         }
4009       break;
4010
4011     case elfcpp::R_SPARC_TLS_IE_HI22:
4012     case elfcpp::R_SPARC_TLS_IE_LO10:
4013       if (optimized_type == tls::TLSOPT_TO_LE)
4014         {
4015           value -= tls_segment->memsz();
4016           switch (r_type)
4017             {
4018             case elfcpp::R_SPARC_TLS_IE_HI22:
4019               // IE_HI22 --> LE_HIX22
4020               Reloc::hix22(view, value, addend);
4021               break;
4022             case elfcpp::R_SPARC_TLS_IE_LO10:
4023               // IE_LO10 --> LE_LOX10
4024               Reloc::lox10(view, value, addend);
4025               break;
4026             }
4027           break;
4028         }
4029       else if (optimized_type == tls::TLSOPT_NONE)
4030         {
4031           // Relocate the field with the offset of the GOT entry for
4032           // the tp-relative offset of the symbol.
4033           if (gsym != NULL)
4034             {
4035               gold_assert(gsym->has_got_offset(GOT_TYPE_TLS_OFFSET));
4036               value = gsym->got_offset(GOT_TYPE_TLS_OFFSET);
4037             }
4038           else
4039             {
4040               unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
4041               gold_assert(object->local_has_got_offset(r_sym,
4042                                                        GOT_TYPE_TLS_OFFSET));
4043               value = object->local_got_offset(r_sym,
4044                                                GOT_TYPE_TLS_OFFSET);
4045             }
4046           switch (r_type)
4047             {
4048             case elfcpp::R_SPARC_TLS_IE_HI22:
4049               Reloc::hi22(view, value, addend);
4050               break;
4051             case elfcpp::R_SPARC_TLS_IE_LO10:
4052               Reloc::lo10(view, value, addend);
4053               break;
4054             }
4055           break;
4056         }
4057       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
4058                              _("unsupported reloc %u"),
4059                              r_type);
4060       break;
4061
4062     case elfcpp::R_SPARC_TLS_IE_ADD:
4063       // This seems to be mainly so that we can find the addition
4064       // instruction if there is one.  There doesn't seem to be any
4065       // actual relocation to apply.
4066       break;
4067
4068     case elfcpp::R_SPARC_TLS_LE_HIX22:
4069       // If we're creating a shared library, a dynamic relocation will
4070       // have been created for this location, so do not apply it now.
4071       if (!parameters->options().shared())
4072         {
4073           value -= tls_segment->memsz();
4074           Reloc::hix22(view, value, addend);
4075         }
4076       break;
4077
4078     case elfcpp::R_SPARC_TLS_LE_LOX10:
4079       // If we're creating a shared library, a dynamic relocation will
4080       // have been created for this location, so do not apply it now.
4081       if (!parameters->options().shared())
4082         {
4083           value -= tls_segment->memsz();
4084           Reloc::lox10(view, value, addend);
4085         }
4086       break;
4087     }
4088 }
4089
4090 // Relax a call instruction.
4091
4092 template<int size, bool big_endian>
4093 inline void
4094 Target_sparc<size, big_endian>::Relocate::relax_call(
4095     Target_sparc<size, big_endian>* target,
4096     unsigned char* view,
4097     const elfcpp::Rela<size, big_endian>& rela,
4098     section_size_type view_size)
4099 {
4100   typedef typename elfcpp::Swap<32, true>::Valtype Insntype;
4101   Insntype *wv = reinterpret_cast<Insntype*>(view);
4102   Insntype call_insn, delay_insn, set_insn;
4103   uint32_t op3, reg, off;
4104
4105   // This code tries to relax call instructions that meet
4106   // certain criteria.
4107   //
4108   // The first criteria is that the call must be such that the return
4109   // address which the call writes into %o7 is unused.  Two sequences
4110   // meet this criteria, and are used to implement tail calls.
4111   //
4112   // Leaf function tail call:
4113   //
4114   // or %o7, %g0, %ANY_REG
4115   // call FUNC
4116   //  or %ANY_REG, %g0, %o7
4117   //
4118   // Non-leaf function tail call:
4119   //
4120   // call FUNC
4121   //  restore
4122   //
4123   // The second criteria is that the call destination is close.  If
4124   // the displacement can fit in a signed 22-bit immediate field of a
4125   // pre-V9 branch, we can do it.  If we are generating a 64-bit
4126   // object or a 32-bit object with ELF machine type EF_SPARC32PLUS,
4127   // and the displacement fits in a signed 19-bit immediate field,
4128   // then we can use a V9 branch.
4129
4130   // Make sure the delay instruction can be safely accessed.
4131   if (rela.get_r_offset() + 8 > view_size)
4132     return;
4133
4134   call_insn = elfcpp::Swap<32, true>::readval(wv);
4135   delay_insn = elfcpp::Swap<32, true>::readval(wv + 1);
4136
4137   // Make sure it is really a call instruction.
4138   if (((call_insn >> 30) & 0x3) != 1)
4139     return;
4140
4141   if (((delay_insn >> 30) & 0x3) != 2)
4142     return;
4143
4144   // Accept only a restore or an integer arithmetic operation whose
4145   // sole side effect is to write the %o7 register (and perhaps set
4146   // the condition codes, which are considered clobbered across
4147   // function calls).
4148   //
4149   // For example, we don't want to match a tagged addition or
4150   // subtraction.  We also don't want to match something like a
4151   // divide.
4152   //
4153   // Specifically we accept add{,cc}, and{,cc}, or{,cc},
4154   // xor{,cc}, sub{,cc}, andn{,cc}, orn{,cc}, and xnor{,cc}.
4155
4156   op3 = (delay_insn >> 19) & 0x3f;
4157   reg = (delay_insn >> 25) & 0x1f;
4158   if (op3 != 0x3d
4159       && ((op3 & 0x28) != 0 || reg != 15))
4160     return;
4161
4162   // For non-restore instructions, make sure %o7 isn't
4163   // an input.
4164   if (op3 != 0x3d)
4165     {
4166       // First check RS1
4167       reg = (delay_insn >> 14) & 0x1f;
4168       if (reg == 15)
4169         return;
4170
4171       // And if non-immediate, check RS2
4172       if (((delay_insn >> 13) & 1) == 0)
4173         {
4174           reg = (delay_insn & 0x1f);
4175           if (reg == 15)
4176             return;
4177         }
4178     }
4179
4180   // Now check the branch distance.  We are called after the
4181   // call has been relocated, so we just have to peek at the
4182   // offset contained in the instruction.
4183   off = call_insn & 0x3fffffff;
4184   if ((off & 0x3fe00000) != 0
4185       && (off & 0x3fe00000) != 0x3fe00000)
4186     return;
4187
4188   if ((size == 64 || target->elf_machine_ == elfcpp::EM_SPARC32PLUS)
4189       && ((off & 0x3c0000) == 0
4190           || (off & 0x3c0000) == 0x3c0000))
4191     {
4192       // ba,pt %xcc, FUNC
4193       call_insn = 0x10680000 | (off & 0x07ffff);
4194     }
4195   else
4196     {
4197       // ba FUNC
4198       call_insn = 0x10800000 | (off & 0x3fffff);
4199     }
4200   elfcpp::Swap<32, true>::writeval(wv, call_insn);
4201
4202   // See if we can NOP out the delay slot instruction.  We peek
4203   // at the instruction before the call to make sure we're dealing
4204   // with exactly the:
4205   //
4206   // or %o7, %g0, %ANY_REG
4207   // call
4208   //  or %ANY_REG, %g0, %o7
4209   //
4210   // case.  Otherwise this might be a tricky piece of hand written
4211   // assembler calculating %o7 in some non-trivial way, and therefore
4212   // we can't be sure that NOP'ing out the delay slot is safe.
4213   if (op3 == 0x02
4214       && rela.get_r_offset() >= 4)
4215     {
4216       if ((delay_insn & ~(0x1f << 14)) != 0x9e100000)
4217         return;
4218
4219       set_insn = elfcpp::Swap<32, true>::readval(wv - 1);
4220       if ((set_insn & ~(0x1f << 25)) != 0x8013c000)
4221         return;
4222
4223       reg = (set_insn >> 25) & 0x1f;
4224       if (reg == 0 || reg == 15)
4225         return;
4226       if (reg != ((delay_insn >> 14) & 0x1f))
4227         return;
4228
4229       // All tests pass, nop it out.
4230       elfcpp::Swap<32, true>::writeval(wv + 1, sparc_nop);
4231     }
4232 }
4233
4234 // Relocate section data.
4235
4236 template<int size, bool big_endian>
4237 void
4238 Target_sparc<size, big_endian>::relocate_section(
4239                         const Relocate_info<size, big_endian>* relinfo,
4240                         unsigned int sh_type,
4241                         const unsigned char* prelocs,
4242                         size_t reloc_count,
4243                         Output_section* output_section,
4244                         bool needs_special_offset_handling,
4245                         unsigned char* view,
4246                         typename elfcpp::Elf_types<size>::Elf_Addr address,
4247                         section_size_type view_size,
4248                         const Reloc_symbol_changes* reloc_symbol_changes)
4249 {
4250   typedef Target_sparc<size, big_endian> Sparc;
4251   typedef typename Target_sparc<size, big_endian>::Relocate Sparc_relocate;
4252   typedef gold::Default_classify_reloc<elfcpp::SHT_RELA, size, big_endian>
4253       Classify_reloc;
4254
4255   gold_assert(sh_type == elfcpp::SHT_RELA);
4256
4257   gold::relocate_section<size, big_endian, Sparc, Sparc_relocate,
4258                          gold::Default_comdat_behavior, Classify_reloc>(
4259     relinfo,
4260     this,
4261     prelocs,
4262     reloc_count,
4263     output_section,
4264     needs_special_offset_handling,
4265     view,
4266     address,
4267     view_size,
4268     reloc_symbol_changes);
4269 }
4270
4271 // Scan the relocs during a relocatable link.
4272
4273 template<int size, bool big_endian>
4274 void
4275 Target_sparc<size, big_endian>::scan_relocatable_relocs(
4276                         Symbol_table* symtab,
4277                         Layout* layout,
4278                         Sized_relobj_file<size, big_endian>* object,
4279                         unsigned int data_shndx,
4280                         unsigned int sh_type,
4281                         const unsigned char* prelocs,
4282                         size_t reloc_count,
4283                         Output_section* output_section,
4284                         bool needs_special_offset_handling,
4285                         size_t local_symbol_count,
4286                         const unsigned char* plocal_symbols,
4287                         Relocatable_relocs* rr)
4288 {
4289   typedef gold::Default_classify_reloc<elfcpp::SHT_RELA, size, big_endian>
4290       Classify_reloc;
4291   typedef gold::Default_scan_relocatable_relocs<Classify_reloc>
4292       Scan_relocatable_relocs;
4293
4294   gold_assert(sh_type == elfcpp::SHT_RELA);
4295
4296   gold::scan_relocatable_relocs<size, big_endian, Scan_relocatable_relocs>(
4297     symtab,
4298     layout,
4299     object,
4300     data_shndx,
4301     prelocs,
4302     reloc_count,
4303     output_section,
4304     needs_special_offset_handling,
4305     local_symbol_count,
4306     plocal_symbols,
4307     rr);
4308 }
4309
4310 // Scan the relocs for --emit-relocs.
4311
4312 template<int size, bool big_endian>
4313 void
4314 Target_sparc<size, big_endian>::emit_relocs_scan(
4315     Symbol_table* symtab,
4316     Layout* layout,
4317     Sized_relobj_file<size, big_endian>* object,
4318     unsigned int data_shndx,
4319     unsigned int sh_type,
4320     const unsigned char* prelocs,
4321     size_t reloc_count,
4322     Output_section* output_section,
4323     bool needs_special_offset_handling,
4324     size_t local_symbol_count,
4325     const unsigned char* plocal_syms,
4326     Relocatable_relocs* rr)
4327 {
4328   typedef gold::Default_classify_reloc<elfcpp::SHT_RELA, size, big_endian>
4329       Classify_reloc;
4330   typedef gold::Default_emit_relocs_strategy<Classify_reloc>
4331       Emit_relocs_strategy;
4332
4333   gold_assert(sh_type == elfcpp::SHT_RELA);
4334
4335   gold::scan_relocatable_relocs<size, big_endian, Emit_relocs_strategy>(
4336     symtab,
4337     layout,
4338     object,
4339     data_shndx,
4340     prelocs,
4341     reloc_count,
4342     output_section,
4343     needs_special_offset_handling,
4344     local_symbol_count,
4345     plocal_syms,
4346     rr);
4347 }
4348
4349 // Emit relocations for a section.
4350
4351 template<int size, bool big_endian>
4352 void
4353 Target_sparc<size, big_endian>::relocate_relocs(
4354     const Relocate_info<size, big_endian>* relinfo,
4355     unsigned int sh_type,
4356     const unsigned char* prelocs,
4357     size_t reloc_count,
4358     Output_section* output_section,
4359     typename elfcpp::Elf_types<size>::Elf_Off offset_in_output_section,
4360     unsigned char* view,
4361     typename elfcpp::Elf_types<size>::Elf_Addr view_address,
4362     section_size_type view_size,
4363     unsigned char* reloc_view,
4364     section_size_type reloc_view_size)
4365 {
4366   typedef gold::Default_classify_reloc<elfcpp::SHT_RELA, size, big_endian>
4367       Classify_reloc;
4368
4369   gold_assert(sh_type == elfcpp::SHT_RELA);
4370
4371   gold::relocate_relocs<size, big_endian, Classify_reloc>(
4372     relinfo,
4373     prelocs,
4374     reloc_count,
4375     output_section,
4376     offset_in_output_section,
4377     view,
4378     view_address,
4379     view_size,
4380     reloc_view,
4381     reloc_view_size);
4382 }
4383
4384 // Return the value to use for a dynamic which requires special
4385 // treatment.  This is how we support equality comparisons of function
4386 // pointers across shared library boundaries, as described in the
4387 // processor specific ABI supplement.
4388
4389 template<int size, bool big_endian>
4390 uint64_t
4391 Target_sparc<size, big_endian>::do_dynsym_value(const Symbol* gsym) const
4392 {
4393   gold_assert(gsym->is_from_dynobj() && gsym->has_plt_offset());
4394   return this->plt_section()->address() + gsym->plt_offset();
4395 }
4396
4397 // do_make_elf_object to override the same function in the base class.
4398 // We need to use a target-specific sub-class of
4399 // Sized_relobj_file<size, big_endian> to process SPARC specific bits
4400 // of the ELF headers.  Hence we need to have our own ELF object creation.
4401
4402 template<int size, bool big_endian>
4403 Object*
4404 Target_sparc<size, big_endian>::do_make_elf_object(
4405     const std::string& name,
4406     Input_file* input_file,
4407     off_t offset, const elfcpp::Ehdr<size, big_endian>& ehdr)
4408 {
4409   elfcpp::Elf_Half machine = ehdr.get_e_machine();
4410   elfcpp::Elf_Word flags = ehdr.get_e_flags();
4411   elfcpp::Elf_Word omm, mm;
4412
4413   switch (machine)
4414     {
4415     case elfcpp::EM_SPARC32PLUS:
4416       this->elf_machine_ = elfcpp::EM_SPARC32PLUS;
4417       break;
4418
4419     case elfcpp::EM_SPARC:
4420     case elfcpp::EM_SPARCV9:
4421       break;
4422
4423     default:
4424       break;
4425     }
4426
4427   if (!this->elf_flags_set_)
4428     {
4429       this->elf_flags_ = flags;
4430       this->elf_flags_set_ = true;
4431     }
4432   else
4433     {
4434       // Accumulate cpu feature bits.
4435       this->elf_flags_ |= (flags & (elfcpp::EF_SPARC_32PLUS
4436                                     | elfcpp::EF_SPARC_SUN_US1
4437                                     | elfcpp::EF_SPARC_HAL_R1
4438                                     | elfcpp::EF_SPARC_SUN_US3));
4439
4440       // Bump the memory model setting to the most restrictive
4441       // one we encounter.
4442       omm = (this->elf_flags_ & elfcpp::EF_SPARCV9_MM);
4443       mm = (flags & elfcpp::EF_SPARCV9_MM);
4444       if (omm != mm)
4445         {
4446           if (mm == elfcpp::EF_SPARCV9_TSO)
4447             {
4448               this->elf_flags_ &= ~elfcpp::EF_SPARCV9_MM;
4449               this->elf_flags_ |= elfcpp::EF_SPARCV9_TSO;
4450             }
4451           else if (mm == elfcpp::EF_SPARCV9_PSO
4452                    && omm == elfcpp::EF_SPARCV9_RMO)
4453             {
4454               this->elf_flags_ &= ~elfcpp::EF_SPARCV9_MM;
4455               this->elf_flags_ |= elfcpp::EF_SPARCV9_PSO;
4456             }
4457         }
4458     }
4459
4460   // Validate that the little-endian flag matches how we've
4461   // been instantiated.
4462   if (!(flags & elfcpp::EF_SPARC_LEDATA) != big_endian)
4463     {
4464       if (big_endian)
4465         gold_error(_("%s: little endian elf flag set on BE object"),
4466                      name.c_str());
4467       else
4468         gold_error(_("%s: little endian elf flag clear on LE object"),
4469                      name.c_str());
4470     }
4471
4472   return Target::do_make_elf_object(name, input_file, offset, ehdr);
4473 }
4474
4475 // Adjust ELF file header.
4476
4477 template<int size, bool big_endian>
4478 void
4479 Target_sparc<size, big_endian>::do_adjust_elf_header(
4480     unsigned char* view,
4481     int len)
4482 {
4483   elfcpp::Ehdr_write<size, big_endian> oehdr(view);
4484
4485   oehdr.put_e_machine(this->elf_machine_);
4486   oehdr.put_e_flags(this->elf_flags_);
4487
4488   Sized_target<size, big_endian>::do_adjust_elf_header(view, len);
4489 }
4490
4491 // The selector for sparc object files.
4492
4493 template<int size, bool big_endian>
4494 class Target_selector_sparc : public Target_selector
4495 {
4496 public:
4497   Target_selector_sparc()
4498     : Target_selector(elfcpp::EM_NONE, size, big_endian,
4499                       (size == 64 ? "elf64-sparc" : "elf32-sparc"),
4500                       (size == 64 ? "elf64_sparc" : "elf32_sparc"))
4501   { }
4502
4503   virtual Target*
4504   do_recognize(Input_file*, off_t, int machine, int, int)
4505   {
4506     switch (size)
4507       {
4508       case 64:
4509         if (machine != elfcpp::EM_SPARCV9)
4510           return NULL;
4511         break;
4512
4513       case 32:
4514         if (machine != elfcpp::EM_SPARC
4515             && machine != elfcpp::EM_SPARC32PLUS)
4516           return NULL;
4517         break;
4518
4519       default:
4520         return NULL;
4521       }
4522
4523     return this->instantiate_target();
4524   }
4525
4526   virtual Target*
4527   do_instantiate_target()
4528   { return new Target_sparc<size, big_endian>(); }
4529 };
4530
4531 Target_selector_sparc<32, true> target_selector_sparc32;
4532 Target_selector_sparc<64, true> target_selector_sparc64;
4533
4534 } // End anonymous namespace.