gold/sparc.cc

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