gold/sparc.cc

   1 // sparc.cc -- sparc target support for gold.
   2
   3 // Copyright 2008, 2009, 2010, 2011 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),
  62       copy_relocs_(elfcpp::R_SPARC_COPY), dynbss_(NULL),
  63       got_mod_index_offset_(-1U), tls_get_addr_sym_(NULL)
  64   {
  65   }
  66
  67   // Process the relocations to determine unreferenced sections for
  68   // garbage collection.
  69   void
  70   gc_process_relocs(Symbol_table* symtab,
  71                     Layout* layout,
  72                     Sized_relobj_file<size, big_endian>* object,
  73                     unsigned int data_shndx,
  74                     unsigned int sh_type,
  75                     const unsigned char* prelocs,
  76                     size_t reloc_count,
  77                     Output_section* output_section,
  78                     bool needs_special_offset_handling,
  79                     size_t local_symbol_count,
  80                     const unsigned char* plocal_symbols);
  81
  82   // Scan the relocations to look for symbol adjustments.
  83   void
  84   scan_relocs(Symbol_table* symtab,
  85               Layout* layout,
  86               Sized_relobj_file<size, big_endian>* object,
  87               unsigned int data_shndx,
  88               unsigned int sh_type,
  89               const unsigned char* prelocs,
  90               size_t reloc_count,
  91               Output_section* output_section,
  92               bool needs_special_offset_handling,
  93               size_t local_symbol_count,
  94               const unsigned char* plocal_symbols);
  95   // Finalize the sections.
  96   void
  97   do_finalize_sections(Layout*, const Input_objects*, Symbol_table*);
  98
  99   // Return the value to use for a dynamic which requires special
 100   // treatment.
 101   uint64_t
 102   do_dynsym_value(const Symbol*) const;
 103
 104   // Relocate a section.
 105   void
 106   relocate_section(const Relocate_info<size, big_endian>*,
 107                    unsigned int sh_type,
 108                    const unsigned char* prelocs,
 109                    size_t reloc_count,
 110                    Output_section* output_section,
 111                    bool needs_special_offset_handling,
 112                    unsigned char* view,
 113                    typename elfcpp::Elf_types<size>::Elf_Addr view_address,
 114                    section_size_type view_size,
 115                    const Reloc_symbol_changes*);
 116
 117   // Scan the relocs during a relocatable link.
 118   void
 119   scan_relocatable_relocs(Symbol_table* symtab,
 120                           Layout* layout,
 121                           Sized_relobj_file<size, big_endian>* object,
 122                           unsigned int data_shndx,
 123                           unsigned int sh_type,
 124                           const unsigned char* prelocs,
 125                           size_t reloc_count,
 126                           Output_section* output_section,
 127                           bool needs_special_offset_handling,
 128                           size_t local_symbol_count,
 129                           const unsigned char* plocal_symbols,
 130                           Relocatable_relocs*);
 131
 132   // Relocate a section during a relocatable link.
 133   void
 134   relocate_for_relocatable(const Relocate_info<size, big_endian>*,
 135                            unsigned int sh_type,
 136                            const unsigned char* prelocs,
 137                            size_t reloc_count,
 138                            Output_section* output_section,
 139                            off_t offset_in_output_section,
 140                            const Relocatable_relocs*,
 141                            unsigned char* view,
 142                            typename elfcpp::Elf_types<size>::Elf_Addr view_address,
 143                            section_size_type view_size,
 144                            unsigned char* reloc_view,
 145                            section_size_type reloc_view_size);
 146   // Return whether SYM is defined by the ABI.
 147   bool
 148   do_is_defined_by_abi(const Symbol* sym) const
 149   {
 150     // XXX Really need to support this better...
 151     if (sym->type() == elfcpp::STT_SPARC_REGISTER)
 152       return 1;
 153
 154     return strcmp(sym->name(), "___tls_get_addr") == 0;
 155   }
 156
 157   // Return whether there is a GOT section.
 158   bool
 159   has_got_section() const
 160   { return this->got_ != NULL; }
 161
 162   // Return the size of the GOT section.
 163   section_size_type
 164   got_size() const
 165   {
 166     gold_assert(this->got_ != NULL);
 167     return this->got_->data_size();
 168   }
 169
 170   // Return the number of entries in the GOT.
 171   unsigned int
 172   got_entry_count() const
 173   {
 174     if (this->got_ == NULL)
 175       return 0;
 176     return this->got_size() / (size / 8);
 177   }
 178
 179   // Return the number of entries in the PLT.
 180   unsigned int
 181   plt_entry_count() const;
 182
 183   // Return the offset of the first non-reserved PLT entry.
 184   unsigned int
 185   first_plt_entry_offset() const;
 186
 187   // Return the size of each PLT entry.
 188   unsigned int
 189   plt_entry_size() const;
 190
 191  private:
 192
 193   // The class which scans relocations.
 194   class Scan
 195   {
 196   public:
 197     Scan()
 198       : issued_non_pic_error_(false)
 199     { }
 200
 201     static inline int
 202     get_reference_flags(unsigned int r_type);
 203
 204     inline void
 205     local(Symbol_table* symtab, Layout* layout, Target_sparc* target,
 206           Sized_relobj_file<size, big_endian>* object,
 207           unsigned int data_shndx,
 208           Output_section* output_section,
 209           const elfcpp::Rela<size, big_endian>& reloc, unsigned int r_type,
 210           const elfcpp::Sym<size, big_endian>& lsym);
 211
 212     inline void
 213     global(Symbol_table* symtab, Layout* layout, Target_sparc* target,
 214            Sized_relobj_file<size, big_endian>* object,
 215            unsigned int data_shndx,
 216            Output_section* output_section,
 217            const elfcpp::Rela<size, big_endian>& reloc, unsigned int r_type,
 218            Symbol* gsym);
 219
 220     inline bool
 221     local_reloc_may_be_function_pointer(Symbol_table* , Layout* ,
 222                                         Target_sparc* ,
 223                                         Sized_relobj_file<size, big_endian>* ,
 224                                         unsigned int ,
 225                                         Output_section* ,
 226                                         const elfcpp::Rela<size, big_endian>& ,
 227                                         unsigned int ,
 228                                         const elfcpp::Sym<size, big_endian>&)
 229     { return false; }
 230
 231     inline bool
 232     global_reloc_may_be_function_pointer(Symbol_table* , Layout* ,
 233                                          Target_sparc* ,
 234                                          Sized_relobj_file<size, big_endian>* ,
 235                                          unsigned int ,
 236                                          Output_section* ,
 237                                          const elfcpp::Rela<size,
 238                                                             big_endian>& ,
 239                                          unsigned int , Symbol*)
 240     { return false; }
 241
 242
 243   private:
 244     static void
 245     unsupported_reloc_local(Sized_relobj_file<size, big_endian>*,
 246                             unsigned int r_type);
 247
 248     static void
 249     unsupported_reloc_global(Sized_relobj_file<size, big_endian>*,
 250                              unsigned int r_type, Symbol*);
 251
 252     static void
 253     generate_tls_call(Symbol_table* symtab, Layout* layout,
 254                       Target_sparc* target);
 255
 256     void
 257     check_non_pic(Relobj*, unsigned int r_type);
 258
 259     // Whether we have issued an error about a non-PIC compilation.
 260     bool issued_non_pic_error_;
 261   };
 262
 263   // The class which implements relocation.
 264   class Relocate
 265   {
 266    public:
 267     Relocate()
 268       : ignore_gd_add_(false)
 269     { }
 270
 271     ~Relocate()
 272     {
 273       if (this->ignore_gd_add_)
 274         {
 275           // FIXME: This needs to specify the location somehow.
 276           gold_error(_("missing expected TLS relocation"));
 277         }
 278     }
 279
 280     // Do a relocation.  Return false if the caller should not issue
 281     // any warnings about this relocation.
 282     inline bool
 283     relocate(const Relocate_info<size, big_endian>*, Target_sparc*,
 284              Output_section*, size_t relnum,
 285              const elfcpp::Rela<size, big_endian>&,
 286              unsigned int r_type, const Sized_symbol<size>*,
 287              const Symbol_value<size>*,
 288              unsigned char*,
 289              typename elfcpp::Elf_types<size>::Elf_Addr,
 290              section_size_type);
 291
 292    private:
 293     // Do a TLS relocation.
 294     inline void
 295     relocate_tls(const Relocate_info<size, big_endian>*, Target_sparc* target,
 296                  size_t relnum, const elfcpp::Rela<size, big_endian>&,
 297                  unsigned int r_type, const Sized_symbol<size>*,
 298                  const Symbol_value<size>*,
 299                  unsigned char*,
 300                  typename elfcpp::Elf_types<size>::Elf_Addr,
 301                  section_size_type);
 302
 303     // Ignore the next relocation which should be R_SPARC_TLS_GD_ADD
 304     bool ignore_gd_add_;
 305   };
 306
 307   // A class which returns the size required for a relocation type,
 308   // used while scanning relocs during a relocatable link.
 309   class Relocatable_size_for_reloc
 310   {
 311    public:
 312     unsigned int
 313     get_size_for_reloc(unsigned int, Relobj*);
 314   };
 315
 316   // Get the GOT section, creating it if necessary.
 317   Output_data_got<size, big_endian>*
 318   got_section(Symbol_table*, Layout*);
 319
 320   // Create a PLT entry for a global symbol.
 321   void
 322   make_plt_entry(Symbol_table*, Layout*, Symbol*);
 323
 324   // Create a GOT entry for the TLS module index.
 325   unsigned int
 326   got_mod_index_entry(Symbol_table* symtab, Layout* layout,
 327                       Sized_relobj_file<size, big_endian>* object);
 328
 329   // Return the gsym for "__tls_get_addr".  Cache if not already
 330   // cached.
 331   Symbol*
 332   tls_get_addr_sym(Symbol_table* symtab)
 333   {
 334     if (!this->tls_get_addr_sym_)
 335       this->tls_get_addr_sym_ = symtab->lookup("__tls_get_addr", NULL);
 336     gold_assert(this->tls_get_addr_sym_);
 337     return this->tls_get_addr_sym_;
 338   }
 339
 340   // Get the PLT section.
 341   const Output_data_plt_sparc<size, big_endian>*
 342   plt_section() const
 343   {
 344     gold_assert(this->plt_ != NULL);
 345     return this->plt_;
 346   }
 347
 348   // Get the dynamic reloc section, creating it if necessary.
 349   Reloc_section*
 350   rela_dyn_section(Layout*);
 351
 352   // Copy a relocation against a global symbol.
 353   void
 354   copy_reloc(Symbol_table* symtab, Layout* layout,
 355              Sized_relobj_file<size, big_endian>* object,
 356              unsigned int shndx, Output_section* output_section,
 357              Symbol* sym, const elfcpp::Rela<size, big_endian>& reloc)
 358   {
 359     this->copy_relocs_.copy_reloc(symtab, layout,
 360                                   symtab->get_sized_symbol<size>(sym),
 361                                   object, shndx, output_section,
 362                                   reloc, this->rela_dyn_section(layout));
 363   }
 364
 365   // Information about this specific target which we pass to the
 366   // general Target structure.
 367   static Target::Target_info sparc_info;
 368
 369   // The types of GOT entries needed for this platform.
 370   // These values are exposed to the ABI in an incremental link.
 371   // Do not renumber existing values without changing the version
 372   // number of the .gnu_incremental_inputs section.
 373   enum Got_type
 374   {
 375     GOT_TYPE_STANDARD = 0,      // GOT entry for a regular symbol
 376     GOT_TYPE_TLS_OFFSET = 1,    // GOT entry for TLS offset
 377     GOT_TYPE_TLS_PAIR = 2,      // GOT entry for TLS module/offset pair
 378   };
 379
 380   // The GOT section.
 381   Output_data_got<size, big_endian>* got_;
 382   // The PLT section.
 383   Output_data_plt_sparc<size, big_endian>* plt_;
 384   // The dynamic reloc section.
 385   Reloc_section* rela_dyn_;
 386   // Relocs saved to avoid a COPY reloc.
 387   Copy_relocs<elfcpp::SHT_RELA, size, big_endian> copy_relocs_;
 388   // Space for variables copied with a COPY reloc.
 389   Output_data_space* dynbss_;
 390   // Offset of the GOT entry for the TLS module index;
 391   unsigned int got_mod_index_offset_;
 392   // Cached pointer to __tls_get_addr symbol
 393   Symbol* tls_get_addr_sym_;
 394 };
 395
 396 template<>
 397 Target::Target_info Target_sparc<32, true>::sparc_info =
 398 {
 399   32,                   // size
 400   true,                 // is_big_endian
 401   elfcpp::EM_SPARC,     // machine_code
 402   false,                // has_make_symbol
 403   false,                // has_resolve
 404   false,                // has_code_fill
 405   true,                 // is_default_stack_executable
 406   false,                // can_icf_inline_merge_sections
 407   '\0',                 // wrap_char
 408   "/usr/lib/ld.so.1",   // dynamic_linker
 409   0x00010000,           // default_text_segment_address
 410   64 * 1024,            // abi_pagesize (overridable by -z max-page-size)
 411   8 * 1024,             // common_pagesize (overridable by -z common-page-size)
 412   elfcpp::SHN_UNDEF,    // small_common_shndx
 413   elfcpp::SHN_UNDEF,    // large_common_shndx
 414   0,                    // small_common_section_flags
 415   0,                    // large_common_section_flags
 416   NULL,                 // attributes_section
 417   NULL                  // attributes_vendor
 418 };
 419
 420 template<>
 421 Target::Target_info Target_sparc<64, true>::sparc_info =
 422 {
 423   64,                   // size
 424   true,                 // is_big_endian
 425   elfcpp::EM_SPARCV9,   // machine_code
 426   false,                // has_make_symbol
 427   false,                // has_resolve
 428   false,                // has_code_fill
 429   true,                 // is_default_stack_executable
 430   false,                // can_icf_inline_merge_sections
 431   '\0',                 // wrap_char
 432   "/usr/lib/sparcv9/ld.so.1",   // dynamic_linker
 433   0x100000,             // default_text_segment_address
 434   64 * 1024,            // abi_pagesize (overridable by -z max-page-size)
 435   8 * 1024,             // common_pagesize (overridable by -z common-page-size)
 436   elfcpp::SHN_UNDEF,    // small_common_shndx
 437   elfcpp::SHN_UNDEF,    // large_common_shndx
 438   0,                    // small_common_section_flags
 439   0,                    // large_common_section_flags
 440   NULL,                 // attributes_section
 441   NULL                  // attributes_vendor
 442 };
 443
 444 // We have to take care here, even when operating in little-endian
 445 // mode, sparc instructions are still big endian.
 446 template<int size, bool big_endian>
 447 class Sparc_relocate_functions
 448 {
 449 private:
 450   // Do a simple relocation with the addend in the relocation.
 451   template<int valsize>
 452   static inline void
 453   rela(unsigned char* view,
 454        unsigned int right_shift,
 455        typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
 456        typename elfcpp::Swap<size, big_endian>::Valtype value,
 457        typename elfcpp::Swap<size, big_endian>::Valtype addend)
 458   {
 459     typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
 460     Valtype* wv = reinterpret_cast<Valtype*>(view);
 461     Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
 462     Valtype reloc = ((value + addend) >> right_shift);
 463
 464     val &= ~dst_mask;
 465     reloc &= dst_mask;
 466
 467     elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
 468   }
 469
 470   // Do a simple relocation using a symbol value with the addend in
 471   // the relocation.
 472   template<int valsize>
 473   static inline void
 474   rela(unsigned char* view,
 475        unsigned int right_shift,
 476        typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
 477        const Sized_relobj_file<size, big_endian>* object,
 478        const Symbol_value<size>* psymval,
 479        typename elfcpp::Swap<valsize, big_endian>::Valtype addend)
 480   {
 481     typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
 482     Valtype* wv = reinterpret_cast<Valtype*>(view);
 483     Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
 484     Valtype reloc = (psymval->value(object, addend) >> right_shift);
 485
 486     val &= ~dst_mask;
 487     reloc &= dst_mask;
 488
 489     elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
 490   }
 491
 492   // Do a simple relocation using a symbol value with the addend in
 493   // the relocation, unaligned.
 494   template<int valsize>
 495   static inline void
 496   rela_ua(unsigned char* view,
 497           unsigned int right_shift, elfcpp::Elf_Xword dst_mask,
 498           const Sized_relobj_file<size, big_endian>* object,
 499           const Symbol_value<size>* psymval,
 500           typename elfcpp::Swap<size, big_endian>::Valtype addend)
 501   {
 502     typedef typename elfcpp::Swap_unaligned<valsize,
 503             big_endian>::Valtype Valtype;
 504     unsigned char* wv = view;
 505     Valtype val = elfcpp::Swap_unaligned<valsize, big_endian>::readval(wv);
 506     Valtype reloc = (psymval->value(object, addend) >> right_shift);
 507
 508     val &= ~dst_mask;
 509     reloc &= dst_mask;
 510
 511     elfcpp::Swap_unaligned<valsize, big_endian>::writeval(wv, val | reloc);
 512   }
 513
 514   // Do a simple PC relative relocation with a Symbol_value with the
 515   // addend in the relocation.
 516   template<int valsize>
 517   static inline void
 518   pcrela(unsigned char* view,
 519          unsigned int right_shift,
 520          typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
 521          const Sized_relobj_file<size, big_endian>* object,
 522          const Symbol_value<size>* psymval,
 523          typename elfcpp::Swap<size, big_endian>::Valtype addend,
 524          typename elfcpp::Elf_types<size>::Elf_Addr address)
 525   {
 526     typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
 527     Valtype* wv = reinterpret_cast<Valtype*>(view);
 528     Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
 529     Valtype reloc = ((psymval->value(object, addend) - address)
 530                      >> right_shift);
 531
 532     val &= ~dst_mask;
 533     reloc &= dst_mask;
 534
 535     elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
 536   }
 537
 538   template<int valsize>
 539   static inline void
 540   pcrela_unaligned(unsigned char* view,
 541                    const Sized_relobj_file<size, big_endian>* object,
 542                    const Symbol_value<size>* psymval,
 543                    typename elfcpp::Swap<size, big_endian>::Valtype addend,
 544                    typename elfcpp::Elf_types<size>::Elf_Addr address)
 545   {
 546     typedef typename elfcpp::Swap_unaligned<valsize,
 547             big_endian>::Valtype Valtype;
 548     unsigned char* wv = view;
 549     Valtype reloc = (psymval->value(object, addend) - address);
 550
 551     elfcpp::Swap_unaligned<valsize, big_endian>::writeval(wv, reloc);
 552   }
 553
 554   typedef Sparc_relocate_functions<size, big_endian> This;
 555   typedef Sparc_relocate_functions<size, true> This_insn;
 556
 557 public:
 558   // R_SPARC_WDISP30: (Symbol + Addend - Address) >> 2
 559   static inline void
 560   wdisp30(unsigned char* view,
 561            const Sized_relobj_file<size, big_endian>* object,
 562            const Symbol_value<size>* psymval,
 563            typename elfcpp::Elf_types<size>::Elf_Addr addend,
 564            typename elfcpp::Elf_types<size>::Elf_Addr address)
 565   {
 566     This_insn::template pcrela<32>(view, 2, 0x3fffffff, object,
 567                                    psymval, addend, address);
 568   }
 569
 570   // R_SPARC_WDISP22: (Symbol + Addend - Address) >> 2
 571   static inline void
 572   wdisp22(unsigned char* view,
 573            const Sized_relobj_file<size, big_endian>* object,
 574            const Symbol_value<size>* psymval,
 575            typename elfcpp::Elf_types<size>::Elf_Addr addend,
 576            typename elfcpp::Elf_types<size>::Elf_Addr address)
 577   {
 578     This_insn::template pcrela<32>(view, 2, 0x003fffff, object,
 579                                    psymval, addend, address);
 580   }
 581
 582   // R_SPARC_WDISP19: (Symbol + Addend - Address) >> 2
 583   static inline void
 584   wdisp19(unsigned char* view,
 585           const Sized_relobj_file<size, big_endian>* object,
 586           const Symbol_value<size>* psymval,
 587           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 588           typename elfcpp::Elf_types<size>::Elf_Addr address)
 589   {
 590     This_insn::template pcrela<32>(view, 2, 0x0007ffff, object,
 591                                    psymval, addend, address);
 592   }
 593
 594   // R_SPARC_WDISP16: (Symbol + Addend - Address) >> 2
 595   static inline void
 596   wdisp16(unsigned char* view,
 597           const Sized_relobj_file<size, big_endian>* object,
 598           const Symbol_value<size>* psymval,
 599           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 600           typename elfcpp::Elf_types<size>::Elf_Addr address)
 601   {
 602     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
 603     Valtype* wv = reinterpret_cast<Valtype*>(view);
 604     Valtype val = elfcpp::Swap<32, true>::readval(wv);
 605     Valtype reloc = ((psymval->value(object, addend) - address)
 606                      >> 2);
 607
 608     // The relocation value is split between the low 14 bits,
 609     // and bits 20-21.
 610     val &= ~((0x3 << 20) | 0x3fff);
 611     reloc = (((reloc & 0xc000) << (20 - 14))
 612              | (reloc & 0x3ffff));
 613
 614     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
 615   }
 616
 617   // R_SPARC_PC22: (Symbol + Addend - Address) >> 10
 618   static inline void
 619   pc22(unsigned char* view,
 620        const Sized_relobj_file<size, big_endian>* object,
 621        const Symbol_value<size>* psymval,
 622        typename elfcpp::Elf_types<size>::Elf_Addr addend,
 623        typename elfcpp::Elf_types<size>::Elf_Addr address)
 624   {
 625     This_insn::template pcrela<32>(view, 10, 0x003fffff, object,
 626                                    psymval, addend, address);
 627   }
 628
 629   // R_SPARC_PC10: (Symbol + Addend - Address) & 0x3ff
 630   static inline void
 631   pc10(unsigned char* view,
 632        const Sized_relobj_file<size, big_endian>* object,
 633        const Symbol_value<size>* psymval,
 634        typename elfcpp::Elf_types<size>::Elf_Addr addend,
 635        typename elfcpp::Elf_types<size>::Elf_Addr address)
 636   {
 637     This_insn::template pcrela<32>(view, 0, 0x000003ff, object,
 638                                    psymval, addend, address);
 639   }
 640
 641   // R_SPARC_HI22: (Symbol + Addend) >> 10
 642   static inline void
 643   hi22(unsigned char* view,
 644        typename elfcpp::Elf_types<size>::Elf_Addr value,
 645        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 646   {
 647     This_insn::template rela<32>(view, 10, 0x003fffff, value, addend);
 648   }
 649
 650   // R_SPARC_HI22: (Symbol + Addend) >> 10
 651   static inline void
 652   hi22(unsigned char* view,
 653        const Sized_relobj_file<size, big_endian>* object,
 654        const Symbol_value<size>* psymval,
 655        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 656   {
 657     This_insn::template rela<32>(view, 10, 0x003fffff, object, psymval, addend);
 658   }
 659
 660   // R_SPARC_PCPLT22: (Symbol + Addend - Address) >> 10
 661   static inline void
 662   pcplt22(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, 10, 0x003fffff, object,
 669                                    psymval, addend, address);
 670   }
 671
 672   // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
 673   static inline void
 674   lo10(unsigned char* view,
 675        typename elfcpp::Elf_types<size>::Elf_Addr value,
 676        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 677   {
 678     This_insn::template rela<32>(view, 0, 0x000003ff, value, addend);
 679   }
 680
 681   // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
 682   static inline void
 683   lo10(unsigned char* view,
 684        const Sized_relobj_file<size, big_endian>* object,
 685        const Symbol_value<size>* psymval,
 686        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 687   {
 688     This_insn::template rela<32>(view, 0, 0x000003ff, object, psymval, addend);
 689   }
 690
 691   // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
 692   static inline void
 693   lo10(unsigned char* view,
 694        const Sized_relobj_file<size, big_endian>* object,
 695        const Symbol_value<size>* psymval,
 696        typename elfcpp::Elf_types<size>::Elf_Addr addend,
 697        typename elfcpp::Elf_types<size>::Elf_Addr address)
 698   {
 699     This_insn::template pcrela<32>(view, 0, 0x000003ff, object,
 700                                    psymval, addend, address);
 701   }
 702
 703   // R_SPARC_OLO10: ((Symbol + Addend) & 0x3ff) + Addend2
 704   static inline void
 705   olo10(unsigned char* view,
 706         const Sized_relobj_file<size, big_endian>* object,
 707         const Symbol_value<size>* psymval,
 708         typename elfcpp::Elf_types<size>::Elf_Addr addend,
 709         typename elfcpp::Elf_types<size>::Elf_Addr addend2)
 710   {
 711     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
 712     Valtype* wv = reinterpret_cast<Valtype*>(view);
 713     Valtype val = elfcpp::Swap<32, true>::readval(wv);
 714     Valtype reloc = psymval->value(object, addend);
 715
 716     val &= ~0x1fff;
 717     reloc &= 0x3ff;
 718     reloc += addend2;
 719     reloc &= 0x1fff;
 720
 721     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
 722   }
 723
 724   // R_SPARC_22: (Symbol + Addend)
 725   static inline void
 726   rela32_22(unsigned char* view,
 727             const Sized_relobj_file<size, big_endian>* object,
 728             const Symbol_value<size>* psymval,
 729             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 730   {
 731     This_insn::template rela<32>(view, 0, 0x003fffff, object, psymval, addend);
 732   }
 733
 734   // R_SPARC_13: (Symbol + Addend)
 735   static inline void
 736   rela32_13(unsigned char* view,
 737             typename elfcpp::Elf_types<size>::Elf_Addr value,
 738             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 739   {
 740     This_insn::template rela<32>(view, 0, 0x00001fff, value, addend);
 741   }
 742
 743   // R_SPARC_13: (Symbol + Addend)
 744   static inline void
 745   rela32_13(unsigned char* view,
 746             const Sized_relobj_file<size, big_endian>* object,
 747             const Symbol_value<size>* psymval,
 748             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 749   {
 750     This_insn::template rela<32>(view, 0, 0x00001fff, object, psymval, addend);
 751   }
 752
 753   // R_SPARC_UA16: (Symbol + Addend)
 754   static inline void
 755   ua16(unsigned char* view,
 756        const Sized_relobj_file<size, big_endian>* object,
 757        const Symbol_value<size>* psymval,
 758        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 759   {
 760     This::template rela_ua<16>(view, 0, 0xffff, object, psymval, addend);
 761   }
 762
 763   // R_SPARC_UA32: (Symbol + Addend)
 764   static inline void
 765   ua32(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::template rela_ua<32>(view, 0, 0xffffffff, object, psymval, addend);
 771   }
 772
 773   // R_SPARC_UA64: (Symbol + Addend)
 774   static inline void
 775   ua64(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   {
 780     This::template rela_ua<64>(view, 0, ~(elfcpp::Elf_Xword) 0,
 781                                object, psymval, addend);
 782   }
 783
 784   // R_SPARC_DISP8: (Symbol + Addend - Address)
 785   static inline void
 786   disp8(unsigned char* view,
 787         const Sized_relobj_file<size, big_endian>* object,
 788         const Symbol_value<size>* psymval,
 789         typename elfcpp::Elf_types<size>::Elf_Addr addend,
 790         typename elfcpp::Elf_types<size>::Elf_Addr address)
 791   {
 792     This::template pcrela_unaligned<8>(view, object, psymval,
 793                                        addend, address);
 794   }
 795
 796   // R_SPARC_DISP16: (Symbol + Addend - Address)
 797   static inline void
 798   disp16(unsigned char* view,
 799          const Sized_relobj_file<size, big_endian>* object,
 800          const Symbol_value<size>* psymval,
 801          typename elfcpp::Elf_types<size>::Elf_Addr addend,
 802          typename elfcpp::Elf_types<size>::Elf_Addr address)
 803   {
 804     This::template pcrela_unaligned<16>(view, object, psymval,
 805                                         addend, address);
 806   }
 807
 808   // R_SPARC_DISP32: (Symbol + Addend - Address)
 809   static inline void
 810   disp32(unsigned char* view,
 811          const Sized_relobj_file<size, big_endian>* object,
 812          const Symbol_value<size>* psymval,
 813          typename elfcpp::Elf_types<size>::Elf_Addr addend,
 814          typename elfcpp::Elf_types<size>::Elf_Addr address)
 815   {
 816     This::template pcrela_unaligned<32>(view, object, psymval,
 817                                         addend, address);
 818   }
 819
 820   // R_SPARC_DISP64: (Symbol + Addend - Address)
 821   static inline void
 822   disp64(unsigned char* view,
 823          const Sized_relobj_file<size, big_endian>* object,
 824          const Symbol_value<size>* psymval,
 825          elfcpp::Elf_Xword addend,
 826          typename elfcpp::Elf_types<size>::Elf_Addr address)
 827   {
 828     This::template pcrela_unaligned<64>(view, object, psymval,
 829                                         addend, address);
 830   }
 831
 832   // R_SPARC_H44: (Symbol + Addend) >> 22
 833   static inline void
 834   h44(unsigned char* view,
 835       const Sized_relobj_file<size, big_endian>* object,
 836       const Symbol_value<size>* psymval,
 837       typename elfcpp::Elf_types<size>::Elf_Addr  addend)
 838   {
 839     This_insn::template rela<32>(view, 22, 0x003fffff, object, psymval, addend);
 840   }
 841
 842   // R_SPARC_M44: ((Symbol + Addend) >> 12) & 0x3ff
 843   static inline void
 844   m44(unsigned char* view,
 845       const Sized_relobj_file<size, big_endian>* object,
 846       const Symbol_value<size>* psymval,
 847       typename elfcpp::Elf_types<size>::Elf_Addr  addend)
 848   {
 849     This_insn::template rela<32>(view, 12, 0x000003ff, object, psymval, addend);
 850   }
 851
 852   // R_SPARC_L44: (Symbol + Addend) & 0xfff
 853   static inline void
 854   l44(unsigned char* view,
 855       const Sized_relobj_file<size, big_endian>* object,
 856       const Symbol_value<size>* psymval,
 857       typename elfcpp::Elf_types<size>::Elf_Addr  addend)
 858   {
 859     This_insn::template rela<32>(view, 0, 0x00000fff, object, psymval, addend);
 860   }
 861
 862   // R_SPARC_HH22: (Symbol + Addend) >> 42
 863   static inline void
 864   hh22(unsigned char* view,
 865        const Sized_relobj_file<size, big_endian>* object,
 866        const Symbol_value<size>* psymval,
 867        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 868   {
 869     This_insn::template rela<32>(view, 42, 0x003fffff, object, psymval, addend);
 870   }
 871
 872   // R_SPARC_PC_HH22: (Symbol + Addend - Address) >> 42
 873   static inline void
 874   pc_hh22(unsigned char* view,
 875           const Sized_relobj_file<size, big_endian>* object,
 876           const Symbol_value<size>* psymval,
 877           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 878           typename elfcpp::Elf_types<size>::Elf_Addr address)
 879   {
 880     This_insn::template pcrela<32>(view, 42, 0x003fffff, object,
 881                                    psymval, addend, address);
 882   }
 883
 884   // R_SPARC_HM10: ((Symbol + Addend) >> 32) & 0x3ff
 885   static inline void
 886   hm10(unsigned char* view,
 887        const Sized_relobj_file<size, big_endian>* object,
 888        const Symbol_value<size>* psymval,
 889        typename elfcpp::Elf_types<size>::Elf_Addr addend)
 890   {
 891     This_insn::template rela<32>(view, 32, 0x000003ff, object, psymval, addend);
 892   }
 893
 894   // R_SPARC_PC_HM10: ((Symbol + Addend - Address) >> 32) & 0x3ff
 895   static inline void
 896   pc_hm10(unsigned char* view,
 897           const Sized_relobj_file<size, big_endian>* object,
 898           const Symbol_value<size>* psymval,
 899           typename elfcpp::Elf_types<size>::Elf_Addr addend,
 900           typename elfcpp::Elf_types<size>::Elf_Addr address)
 901   {
 902     This_insn::template pcrela<32>(view, 32, 0x000003ff, object,
 903                                    psymval, addend, address);
 904   }
 905
 906   // R_SPARC_11: (Symbol + Addend)
 907   static inline void
 908   rela32_11(unsigned char* view,
 909             const Sized_relobj_file<size, big_endian>* object,
 910             const Symbol_value<size>* psymval,
 911             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 912   {
 913     This_insn::template rela<32>(view, 0, 0x000007ff, object, psymval, addend);
 914   }
 915
 916   // R_SPARC_10: (Symbol + Addend)
 917   static inline void
 918   rela32_10(unsigned char* view,
 919             const Sized_relobj_file<size, big_endian>* object,
 920             const Symbol_value<size>* psymval,
 921             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 922   {
 923     This_insn::template rela<32>(view, 0, 0x000003ff, object, psymval, addend);
 924   }
 925
 926   // R_SPARC_7: (Symbol + Addend)
 927   static inline void
 928   rela32_7(unsigned char* view,
 929            const Sized_relobj_file<size, big_endian>* object,
 930            const Symbol_value<size>* psymval,
 931            typename elfcpp::Elf_types<size>::Elf_Addr addend)
 932   {
 933     This_insn::template rela<32>(view, 0, 0x0000007f, object, psymval, addend);
 934   }
 935
 936   // R_SPARC_6: (Symbol + Addend)
 937   static inline void
 938   rela32_6(unsigned char* view,
 939            const Sized_relobj_file<size, big_endian>* object,
 940            const Symbol_value<size>* psymval,
 941            typename elfcpp::Elf_types<size>::Elf_Addr addend)
 942   {
 943     This_insn::template rela<32>(view, 0, 0x0000003f, object, psymval, addend);
 944   }
 945
 946   // R_SPARC_5: (Symbol + Addend)
 947   static inline void
 948   rela32_5(unsigned char* view,
 949            const Sized_relobj_file<size, big_endian>* object,
 950            const Symbol_value<size>* psymval,
 951            typename elfcpp::Elf_types<size>::Elf_Addr addend)
 952   {
 953     This_insn::template rela<32>(view, 0, 0x0000001f, object, psymval, addend);
 954   }
 955
 956   // R_SPARC_TLS_LDO_HIX22: @dtpoff(Symbol + Addend) >> 10
 957   static inline void
 958   ldo_hix22(unsigned char* view,
 959             typename elfcpp::Elf_types<size>::Elf_Addr value,
 960             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 961   {
 962     This_insn::hi22(view, value, addend);
 963   }
 964
 965   // R_SPARC_TLS_LDO_LOX10: @dtpoff(Symbol + Addend) & 0x3ff
 966   static inline void
 967   ldo_lox10(unsigned char* view,
 968             typename elfcpp::Elf_types<size>::Elf_Addr value,
 969             typename elfcpp::Elf_types<size>::Elf_Addr addend)
 970   {
 971     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
 972     Valtype* wv = reinterpret_cast<Valtype*>(view);
 973     Valtype val = elfcpp::Swap<32, true>::readval(wv);
 974     Valtype reloc = (value + addend);
 975
 976     val &= ~0x1fff;
 977     reloc &= 0x3ff;
 978
 979     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
 980   }
 981
 982   // R_SPARC_TLS_LE_HIX22: (@tpoff(Symbol + Addend) ^ 0xffffffffffffffff) >> 10
 983   static inline void
 984   hix22(unsigned char* view,
 985         typename elfcpp::Elf_types<size>::Elf_Addr value,
 986         typename elfcpp::Elf_types<size>::Elf_Addr addend)
 987   {
 988     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
 989     Valtype* wv = reinterpret_cast<Valtype*>(view);
 990     Valtype val = elfcpp::Swap<32, true>::readval(wv);
 991     Valtype reloc = (value + addend);
 992
 993     val &= ~0x3fffff;
 994
 995     reloc ^= ~(Valtype)0;
 996     reloc >>= 10;
 997
 998     reloc &= 0x3fffff;
 999
1000     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1001   }
1002
1003   // R_SPARC_HIX22: ((Symbol + Addend) ^ 0xffffffffffffffff) >> 10
1004   static inline void
1005   hix22(unsigned char* view,
1006         const Sized_relobj_file<size, big_endian>* object,
1007         const Symbol_value<size>* psymval,
1008         typename elfcpp::Elf_types<size>::Elf_Addr addend)
1009   {
1010     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1011     Valtype* wv = reinterpret_cast<Valtype*>(view);
1012     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1013     Valtype reloc = psymval->value(object, addend);
1014
1015     val &= ~0x3fffff;
1016
1017     reloc ^= ~(Valtype)0;
1018     reloc >>= 10;
1019
1020     reloc &= 0x3fffff;
1021
1022     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1023   }
1024
1025
1026   // R_SPARC_TLS_LE_LOX10: (@tpoff(Symbol + Addend) & 0x3ff) | 0x1c00
1027   static inline void
1028   lox10(unsigned char* view,
1029         typename elfcpp::Elf_types<size>::Elf_Addr value,
1030         typename elfcpp::Elf_types<size>::Elf_Addr addend)
1031   {
1032     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1033     Valtype* wv = reinterpret_cast<Valtype*>(view);
1034     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1035     Valtype reloc = (value + addend);
1036
1037     val &= ~0x1fff;
1038     reloc &= 0x3ff;
1039     reloc |= 0x1c00;
1040
1041     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1042   }
1043
1044   // R_SPARC_LOX10: ((Symbol + Addend) & 0x3ff) | 0x1c00
1045   static inline void
1046   lox10(unsigned char* view,
1047         const Sized_relobj_file<size, big_endian>* object,
1048         const Symbol_value<size>* psymval,
1049         typename elfcpp::Elf_types<size>::Elf_Addr addend)
1050   {
1051     typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1052     Valtype* wv = reinterpret_cast<Valtype*>(view);
1053     Valtype val = elfcpp::Swap<32, true>::readval(wv);
1054     Valtype reloc = psymval->value(object, addend);
1055
1056     val &= ~0x1fff;
1057     reloc &= 0x3ff;
1058     reloc |= 0x1c00;
1059
1060     elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1061   }
1062 };
1063
1064 // Get the GOT section, creating it if necessary.
1065
1066 template<int size, bool big_endian>
1067 Output_data_got<size, big_endian>*
1068 Target_sparc<size, big_endian>::got_section(Symbol_table* symtab,
1069                                             Layout* layout)
1070 {
1071   if (this->got_ == NULL)
1072     {
1073       gold_assert(symtab != NULL && layout != NULL);
1074
1075       this->got_ = new Output_data_got<size, big_endian>();
1076
1077       layout->add_output_section_data(".got", elfcpp::SHT_PROGBITS,
1078                                       (elfcpp::SHF_ALLOC
1079                                        | elfcpp::SHF_WRITE),
1080                                       this->got_, ORDER_RELRO, true);
1081
1082       // Define _GLOBAL_OFFSET_TABLE_ at the start of the .got section.
1083       symtab->define_in_output_data("_GLOBAL_OFFSET_TABLE_", NULL,
1084                                     Symbol_table::PREDEFINED,
1085                                     this->got_,
1086                                     0, 0, elfcpp::STT_OBJECT,
1087                                     elfcpp::STB_LOCAL,
1088                                     elfcpp::STV_HIDDEN, 0,
1089                                     false, false);
1090     }
1091
1092   return this->got_;
1093 }
1094
1095 // Get the dynamic reloc section, creating it if necessary.
1096
1097 template<int size, bool big_endian>
1098 typename Target_sparc<size, big_endian>::Reloc_section*
1099 Target_sparc<size, big_endian>::rela_dyn_section(Layout* layout)
1100 {
1101   if (this->rela_dyn_ == NULL)
1102     {
1103       gold_assert(layout != NULL);
1104       this->rela_dyn_ = new Reloc_section(parameters->options().combreloc());
1105       layout->add_output_section_data(".rela.dyn", elfcpp::SHT_RELA,
1106                                       elfcpp::SHF_ALLOC, this->rela_dyn_,
1107                                       ORDER_DYNAMIC_RELOCS, false);
1108     }
1109   return this->rela_dyn_;
1110 }
1111
1112 // A class to handle the PLT data.
1113
1114 template<int size, bool big_endian>
1115 class Output_data_plt_sparc : public Output_section_data
1116 {
1117  public:
1118   typedef Output_data_reloc<elfcpp::SHT_RELA, true,
1119                             size, big_endian> Reloc_section;
1120
1121   Output_data_plt_sparc(Layout*);
1122
1123   // Add an entry to the PLT.
1124   void add_entry(Symbol* gsym);
1125
1126   // Return the .rela.plt section data.
1127   const Reloc_section* rel_plt() const
1128   {
1129     return this->rel_;
1130   }
1131
1132   // Return the number of PLT entries.
1133   unsigned int
1134   entry_count() const
1135   { return this->count_; }
1136
1137   // Return the offset of the first non-reserved PLT entry.
1138   static unsigned int
1139   first_plt_entry_offset()
1140   { return 4 * base_plt_entry_size; }
1141
1142   // Return the size of a PLT entry.
1143   static unsigned int
1144   get_plt_entry_size()
1145   { return base_plt_entry_size; }
1146
1147  protected:
1148   void do_adjust_output_section(Output_section* os);
1149
1150   // Write to a map file.
1151   void
1152   do_print_to_mapfile(Mapfile* mapfile) const
1153   { mapfile->print_output_data(this, _("** PLT")); }
1154
1155  private:
1156   // The size of an entry in the PLT.
1157   static const int base_plt_entry_size = (size == 32 ? 12 : 32);
1158
1159   static const unsigned int plt_entries_per_block = 160;
1160   static const unsigned int plt_insn_chunk_size = 24;
1161   static const unsigned int plt_pointer_chunk_size = 8;
1162   static const unsigned int plt_block_size =
1163     (plt_entries_per_block
1164      * (plt_insn_chunk_size + plt_pointer_chunk_size));
1165
1166   // Set the final size.
1167   void
1168   set_final_data_size()
1169   {
1170     unsigned int full_count = this->count_ + 4;
1171     unsigned int extra = (size == 32 ? 4 : 0);
1172
1173     if (size == 32 || full_count < 32768)
1174       this->set_data_size((full_count * base_plt_entry_size) + extra);
1175     else
1176       {
1177         unsigned int ext_cnt = full_count - 32768;
1178
1179         this->set_data_size((32768 * base_plt_entry_size)
1180                             + (ext_cnt
1181                                * (plt_insn_chunk_size
1182                                   + plt_pointer_chunk_size)));
1183       }
1184   }
1185
1186   // Write out the PLT data.
1187   void
1188   do_write(Output_file*);
1189
1190   // The reloc section.
1191   Reloc_section* rel_;
1192   // The number of PLT entries.
1193   unsigned int count_;
1194 };
1195
1196 // Define the constants as required by C++ standard.
1197
1198 template<int size, bool big_endian>
1199 const int Output_data_plt_sparc<size, big_endian>::base_plt_entry_size;
1200
1201 template<int size, bool big_endian>
1202 const unsigned int
1203 Output_data_plt_sparc<size, big_endian>::plt_entries_per_block;
1204
1205 template<int size, bool big_endian>
1206 const unsigned int Output_data_plt_sparc<size, big_endian>::plt_insn_chunk_size;
1207
1208 template<int size, bool big_endian>
1209 const unsigned int
1210 Output_data_plt_sparc<size, big_endian>::plt_pointer_chunk_size;
1211
1212 template<int size, bool big_endian>
1213 const unsigned int Output_data_plt_sparc<size, big_endian>::plt_block_size;
1214
1215 // Create the PLT section.  The ordinary .got section is an argument,
1216 // since we need to refer to the start.
1217
1218 template<int size, bool big_endian>
1219 Output_data_plt_sparc<size, big_endian>::Output_data_plt_sparc(Layout* layout)
1220   : Output_section_data(size == 32 ? 4 : 8), count_(0)
1221 {
1222   this->rel_ = new Reloc_section(false);
1223   layout->add_output_section_data(".rela.plt", elfcpp::SHT_RELA,
1224                                   elfcpp::SHF_ALLOC, this->rel_,
1225                                   ORDER_DYNAMIC_PLT_RELOCS, false);
1226 }
1227
1228 template<int size, bool big_endian>
1229 void
1230 Output_data_plt_sparc<size, big_endian>::do_adjust_output_section(Output_section* os)
1231 {
1232   os->set_entsize(0);
1233 }
1234
1235 // Add an entry to the PLT.
1236
1237 template<int size, bool big_endian>
1238 void
1239 Output_data_plt_sparc<size, big_endian>::add_entry(Symbol* gsym)
1240 {
1241   gold_assert(!gsym->has_plt_offset());
1242
1243   unsigned int index = this->count_ + 4;
1244   section_offset_type plt_offset;
1245
1246   if (size == 32 || index < 32768)
1247     plt_offset = index * base_plt_entry_size;
1248   else
1249     {
1250         unsigned int ext_index = index - 32768;
1251
1252         plt_offset = (32768 * base_plt_entry_size)
1253           + ((ext_index / plt_entries_per_block)
1254              * plt_block_size)
1255           + ((ext_index % plt_entries_per_block)
1256              * plt_insn_chunk_size);
1257     }
1258
1259   gsym->set_plt_offset(plt_offset);
1260
1261   ++this->count_;
1262
1263   // Every PLT entry needs a reloc.
1264   gsym->set_needs_dynsym_entry();
1265   this->rel_->add_global(gsym, elfcpp::R_SPARC_JMP_SLOT, this,
1266                          plt_offset, 0);
1267
1268   // Note that we don't need to save the symbol.  The contents of the
1269   // PLT are independent of which symbols are used.  The symbols only
1270   // appear in the relocations.
1271 }
1272
1273 static const unsigned int sparc_nop = 0x01000000;
1274 static const unsigned int sparc_sethi_g1 = 0x03000000;
1275 static const unsigned int sparc_branch_always = 0x30800000;
1276 static const unsigned int sparc_branch_always_pt = 0x30680000;
1277 static const unsigned int sparc_mov = 0x80100000;
1278 static const unsigned int sparc_mov_g0_o0 = 0x90100000;
1279 static const unsigned int sparc_mov_o7_g5 = 0x8a10000f;
1280 static const unsigned int sparc_call_plus_8 = 0x40000002;
1281 static const unsigned int sparc_ldx_o7_imm_g1 = 0xc25be000;
1282 static const unsigned int sparc_jmpl_o7_g1_g1 = 0x83c3c001;
1283 static const unsigned int sparc_mov_g5_o7 = 0x9e100005;
1284
1285 // Write out the PLT.
1286
1287 template<int size, bool big_endian>
1288 void
1289 Output_data_plt_sparc<size, big_endian>::do_write(Output_file* of)
1290 {
1291   const off_t offset = this->offset();
1292   const section_size_type oview_size =
1293     convert_to_section_size_type(this->data_size());
1294   unsigned char* const oview = of->get_output_view(offset, oview_size);
1295   unsigned char* pov = oview;
1296
1297   memset(pov, 0, base_plt_entry_size * 4);
1298   pov += base_plt_entry_size * 4;
1299
1300   unsigned int plt_offset = base_plt_entry_size * 4;
1301   const unsigned int count = this->count_;
1302
1303   if (size == 64)
1304     {
1305       unsigned int limit;
1306
1307       limit = (count > 32768 ? 32768 : count);
1308
1309       for (unsigned int i = 0; i < limit; ++i)
1310         {
1311           elfcpp::Swap<32, true>::writeval(pov + 0x00,
1312                                            sparc_sethi_g1 + plt_offset);
1313           elfcpp::Swap<32, true>::writeval(pov + 0x04,
1314                                            sparc_branch_always_pt +
1315                                            (((base_plt_entry_size -
1316                                               (plt_offset + 4)) >> 2) &
1317                                             0x7ffff));
1318           elfcpp::Swap<32, true>::writeval(pov + 0x08, sparc_nop);
1319           elfcpp::Swap<32, true>::writeval(pov + 0x0c, sparc_nop);
1320           elfcpp::Swap<32, true>::writeval(pov + 0x10, sparc_nop);
1321           elfcpp::Swap<32, true>::writeval(pov + 0x14, sparc_nop);
1322           elfcpp::Swap<32, true>::writeval(pov + 0x18, sparc_nop);
1323           elfcpp::Swap<32, true>::writeval(pov + 0x1c, sparc_nop);
1324
1325           pov += base_plt_entry_size;
1326           plt_offset += base_plt_entry_size;
1327         }
1328
1329       if (count > 32768)
1330         {
1331           unsigned int ext_cnt = count - 32768;
1332           unsigned int blks = ext_cnt / plt_entries_per_block;
1333
1334           for (unsigned int i = 0; i < blks; ++i)
1335             {
1336               unsigned int data_off = (plt_entries_per_block
1337                                        * plt_insn_chunk_size) - 4;
1338
1339               for (unsigned int j = 0; j < plt_entries_per_block; ++j)
1340                 {
1341                   elfcpp::Swap<32, true>::writeval(pov + 0x00,
1342                                                    sparc_mov_o7_g5);
1343                   elfcpp::Swap<32, true>::writeval(pov + 0x04,
1344                                                    sparc_call_plus_8);
1345                   elfcpp::Swap<32, true>::writeval(pov + 0x08,
1346                                                    sparc_nop);
1347                   elfcpp::Swap<32, true>::writeval(pov + 0x0c,
1348                                                    sparc_ldx_o7_imm_g1 +
1349                                                    (data_off & 0x1fff));
1350                   elfcpp::Swap<32, true>::writeval(pov + 0x10,
1351                                                    sparc_jmpl_o7_g1_g1);
1352                   elfcpp::Swap<32, true>::writeval(pov + 0x14,
1353                                                    sparc_mov_g5_o7);
1354
1355                   elfcpp::Swap<64, big_endian>::writeval(
1356                                 pov + 0x4 + data_off,
1357                                 (elfcpp::Elf_Xword) (oview - (pov + 0x04)));
1358
1359                   pov += plt_insn_chunk_size;
1360                   data_off -= 16;
1361                 }
1362             }
1363
1364           unsigned int sub_blk_cnt = ext_cnt % plt_entries_per_block;
1365           for (unsigned int i = 0; i < sub_blk_cnt; ++i)
1366             {
1367               unsigned int data_off = (sub_blk_cnt
1368                                        * plt_insn_chunk_size) - 4;
1369
1370               for (unsigned int j = 0; j < plt_entries_per_block; ++j)
1371                 {
1372                   elfcpp::Swap<32, true>::writeval(pov + 0x00,
1373                                                    sparc_mov_o7_g5);
1374                   elfcpp::Swap<32, true>::writeval(pov + 0x04,
1375                                                    sparc_call_plus_8);
1376                   elfcpp::Swap<32, true>::writeval(pov + 0x08,
1377                                                    sparc_nop);
1378                   elfcpp::Swap<32, true>::writeval(pov + 0x0c,
1379                                                    sparc_ldx_o7_imm_g1 +
1380                                                    (data_off & 0x1fff));
1381                   elfcpp::Swap<32, true>::writeval(pov + 0x10,
1382                                                    sparc_jmpl_o7_g1_g1);
1383                   elfcpp::Swap<32, true>::writeval(pov + 0x14,
1384                                                    sparc_mov_g5_o7);
1385
1386                   elfcpp::Swap<64, big_endian>::writeval(
1387                                 pov + 0x4 + data_off,
1388                                 (elfcpp::Elf_Xword) (oview - (pov + 0x04)));
1389
1390                   pov += plt_insn_chunk_size;
1391                   data_off -= 16;
1392                 }
1393             }
1394         }
1395     }
1396   else
1397     {
1398       for (unsigned int i = 0; i < count; ++i)
1399         {
1400           elfcpp::Swap<32, true>::writeval(pov + 0x00,
1401                                            sparc_sethi_g1 + plt_offset);
1402           elfcpp::Swap<32, true>::writeval(pov + 0x04,
1403                                            sparc_branch_always +
1404                                            (((- (plt_offset + 4)) >> 2) &
1405                                             0x003fffff));
1406           elfcpp::Swap<32, true>::writeval(pov + 0x08, sparc_nop);
1407
1408           pov += base_plt_entry_size;
1409           plt_offset += base_plt_entry_size;
1410         }
1411
1412       elfcpp::Swap<32, true>::writeval(pov, sparc_nop);
1413       pov += 4;
1414     }
1415
1416   gold_assert(static_cast<section_size_type>(pov - oview) == oview_size);
1417
1418   of->write_output_view(offset, oview_size, oview);
1419 }
1420
1421 // Create a PLT entry for a global symbol.
1422
1423 template<int size, bool big_endian>
1424 void
1425 Target_sparc<size, big_endian>::make_plt_entry(Symbol_table* symtab,
1426                                                Layout* layout,
1427                                                Symbol* gsym)
1428 {
1429   if (gsym->has_plt_offset())
1430     return;
1431
1432   if (this->plt_ == NULL)
1433     {
1434       // Create the GOT sections first.
1435       this->got_section(symtab, layout);
1436
1437       // Ensure that .rela.dyn always appears before .rela.plt  This is
1438       // necessary due to how, on Sparc and some other targets, .rela.dyn
1439       // needs to include .rela.plt in it's range.
1440       this->rela_dyn_section(layout);
1441
1442       this->plt_ = new Output_data_plt_sparc<size, big_endian>(layout);
1443       layout->add_output_section_data(".plt", elfcpp::SHT_PROGBITS,
1444                                       (elfcpp::SHF_ALLOC
1445                                        | elfcpp::SHF_EXECINSTR
1446                                        | elfcpp::SHF_WRITE),
1447                                       this->plt_, ORDER_PLT, false);
1448
1449       // Define _PROCEDURE_LINKAGE_TABLE_ at the start of the .plt section.
1450       symtab->define_in_output_data("_PROCEDURE_LINKAGE_TABLE_", NULL,
1451                                     Symbol_table::PREDEFINED,
1452                                     this->plt_,
1453                                     0, 0, elfcpp::STT_OBJECT,
1454                                     elfcpp::STB_LOCAL,
1455                                     elfcpp::STV_HIDDEN, 0,
1456                                     false, false);
1457     }
1458
1459   this->plt_->add_entry(gsym);
1460 }
1461
1462 // Return the number of entries in the PLT.
1463
1464 template<int size, bool big_endian>
1465 unsigned int
1466 Target_sparc<size, big_endian>::plt_entry_count() const
1467 {
1468   if (this->plt_ == NULL)
1469     return 0;
1470   return this->plt_->entry_count();
1471 }
1472
1473 // Return the offset of the first non-reserved PLT entry.
1474
1475 template<int size, bool big_endian>
1476 unsigned int
1477 Target_sparc<size, big_endian>::first_plt_entry_offset() const
1478 {
1479   return Output_data_plt_sparc<size, big_endian>::first_plt_entry_offset();
1480 }
1481
1482 // Return the size of each PLT entry.
1483
1484 template<int size, bool big_endian>
1485 unsigned int
1486 Target_sparc<size, big_endian>::plt_entry_size() const
1487 {
1488   return Output_data_plt_sparc<size, big_endian>::get_plt_entry_size();
1489 }
1490
1491 // Create a GOT entry for the TLS module index.
1492
1493 template<int size, bool big_endian>
1494 unsigned int
1495 Target_sparc<size, big_endian>::got_mod_index_entry(
1496      Symbol_table* symtab,
1497      Layout* layout,
1498      Sized_relobj_file<size, big_endian>* object)
1499 {
1500   if (this->got_mod_index_offset_ == -1U)
1501     {
1502       gold_assert(symtab != NULL && layout != NULL && object != NULL);
1503       Reloc_section* rela_dyn = this->rela_dyn_section(layout);
1504       Output_data_got<size, big_endian>* got;
1505       unsigned int got_offset;
1506
1507       got = this->got_section(symtab, layout);
1508       got_offset = got->add_constant(0);
1509       rela_dyn->add_local(object, 0,
1510                           (size == 64 ?
1511                            elfcpp::R_SPARC_TLS_DTPMOD64 :
1512                            elfcpp::R_SPARC_TLS_DTPMOD32), got,
1513                           got_offset, 0);
1514       got->add_constant(0);
1515       this->got_mod_index_offset_ = got_offset;
1516     }
1517   return this->got_mod_index_offset_;
1518 }
1519
1520 // Optimize the TLS relocation type based on what we know about the
1521 // symbol.  IS_FINAL is true if the final address of this symbol is
1522 // known at link time.
1523
1524 static tls::Tls_optimization
1525 optimize_tls_reloc(bool is_final, int r_type)
1526 {
1527   // If we are generating a shared library, then we can't do anything
1528   // in the linker.
1529   if (parameters->options().shared())
1530     return tls::TLSOPT_NONE;
1531
1532   switch (r_type)
1533     {
1534     case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1535     case elfcpp::R_SPARC_TLS_GD_LO10:
1536     case elfcpp::R_SPARC_TLS_GD_ADD:
1537     case elfcpp::R_SPARC_TLS_GD_CALL:
1538       // These are General-Dynamic which permits fully general TLS
1539       // access.  Since we know that we are generating an executable,
1540       // we can convert this to Initial-Exec.  If we also know that
1541       // this is a local symbol, we can further switch to Local-Exec.
1542       if (is_final)
1543         return tls::TLSOPT_TO_LE;
1544       return tls::TLSOPT_TO_IE;
1545
1546     case elfcpp::R_SPARC_TLS_LDM_HI22:  // Local-dynamic
1547     case elfcpp::R_SPARC_TLS_LDM_LO10:
1548     case elfcpp::R_SPARC_TLS_LDM_ADD:
1549     case elfcpp::R_SPARC_TLS_LDM_CALL:
1550       // This is Local-Dynamic, which refers to a local symbol in the
1551       // dynamic TLS block.  Since we know that we generating an
1552       // executable, we can switch to Local-Exec.
1553       return tls::TLSOPT_TO_LE;
1554
1555     case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
1556     case elfcpp::R_SPARC_TLS_LDO_LOX10:
1557     case elfcpp::R_SPARC_TLS_LDO_ADD:
1558       // Another type of Local-Dynamic relocation.
1559       return tls::TLSOPT_TO_LE;
1560
1561     case elfcpp::R_SPARC_TLS_IE_HI22:   // Initial-exec
1562     case elfcpp::R_SPARC_TLS_IE_LO10:
1563     case elfcpp::R_SPARC_TLS_IE_LD:
1564     case elfcpp::R_SPARC_TLS_IE_LDX:
1565     case elfcpp::R_SPARC_TLS_IE_ADD:
1566       // These are Initial-Exec relocs which get the thread offset
1567       // from the GOT.  If we know that we are linking against the
1568       // local symbol, we can switch to Local-Exec, which links the
1569       // thread offset into the instruction.
1570       if (is_final)
1571         return tls::TLSOPT_TO_LE;
1572       return tls::TLSOPT_NONE;
1573
1574     case elfcpp::R_SPARC_TLS_LE_HIX22:  // Local-exec
1575     case elfcpp::R_SPARC_TLS_LE_LOX10:
1576       // When we already have Local-Exec, there is nothing further we
1577       // can do.
1578       return tls::TLSOPT_NONE;
1579
1580     default:
1581       gold_unreachable();
1582     }
1583 }
1584
1585 // Get the Reference_flags for a particular relocation.
1586
1587 template<int size, bool big_endian>
1588 int
1589 Target_sparc<size, big_endian>::Scan::get_reference_flags(unsigned int r_type)
1590 {
1591   r_type &= 0xff;
1592   switch (r_type)
1593     {
1594     case elfcpp::R_SPARC_NONE:
1595     case elfcpp::R_SPARC_REGISTER:
1596     case elfcpp::R_SPARC_GNU_VTINHERIT:
1597     case elfcpp::R_SPARC_GNU_VTENTRY:
1598       // No symbol reference.
1599       return 0;
1600
1601     case elfcpp::R_SPARC_UA64:
1602     case elfcpp::R_SPARC_64:
1603     case elfcpp::R_SPARC_HIX22:
1604     case elfcpp::R_SPARC_LOX10:
1605     case elfcpp::R_SPARC_H44:
1606     case elfcpp::R_SPARC_M44:
1607     case elfcpp::R_SPARC_L44:
1608     case elfcpp::R_SPARC_HH22:
1609     case elfcpp::R_SPARC_HM10:
1610     case elfcpp::R_SPARC_LM22:
1611     case elfcpp::R_SPARC_HI22:
1612     case elfcpp::R_SPARC_LO10:
1613     case elfcpp::R_SPARC_OLO10:
1614     case elfcpp::R_SPARC_UA32:
1615     case elfcpp::R_SPARC_32:
1616     case elfcpp::R_SPARC_UA16:
1617     case elfcpp::R_SPARC_16:
1618     case elfcpp::R_SPARC_11:
1619     case elfcpp::R_SPARC_10:
1620     case elfcpp::R_SPARC_8:
1621     case elfcpp::R_SPARC_7:
1622     case elfcpp::R_SPARC_6:
1623     case elfcpp::R_SPARC_5:
1624       return Symbol::ABSOLUTE_REF;
1625
1626     case elfcpp::R_SPARC_DISP8:
1627     case elfcpp::R_SPARC_DISP16:
1628     case elfcpp::R_SPARC_DISP32:
1629     case elfcpp::R_SPARC_DISP64:
1630     case elfcpp::R_SPARC_PC_HH22:
1631     case elfcpp::R_SPARC_PC_HM10:
1632     case elfcpp::R_SPARC_PC_LM22:
1633     case elfcpp::R_SPARC_PC10:
1634     case elfcpp::R_SPARC_PC22:
1635     case elfcpp::R_SPARC_WDISP30:
1636     case elfcpp::R_SPARC_WDISP22:
1637     case elfcpp::R_SPARC_WDISP19:
1638     case elfcpp::R_SPARC_WDISP16:
1639       return Symbol::RELATIVE_REF;
1640
1641     case elfcpp::R_SPARC_PLT64:
1642     case elfcpp::R_SPARC_PLT32:
1643     case elfcpp::R_SPARC_HIPLT22:
1644     case elfcpp::R_SPARC_LOPLT10:
1645     case elfcpp::R_SPARC_PCPLT10:
1646       return Symbol::FUNCTION_CALL | Symbol::ABSOLUTE_REF;
1647
1648     case elfcpp::R_SPARC_PCPLT32:
1649     case elfcpp::R_SPARC_PCPLT22:
1650     case elfcpp::R_SPARC_WPLT30:
1651       return Symbol::FUNCTION_CALL | Symbol::RELATIVE_REF;
1652
1653     case elfcpp::R_SPARC_GOTDATA_OP:
1654     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
1655     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
1656     case elfcpp::R_SPARC_GOT10:
1657     case elfcpp::R_SPARC_GOT13:
1658     case elfcpp::R_SPARC_GOT22:
1659       // Absolute in GOT.
1660       return Symbol::ABSOLUTE_REF;
1661
1662     case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1663     case elfcpp::R_SPARC_TLS_GD_LO10:
1664     case elfcpp::R_SPARC_TLS_GD_ADD:
1665     case elfcpp::R_SPARC_TLS_GD_CALL:
1666     case elfcpp::R_SPARC_TLS_LDM_HI22:  // Local-dynamic
1667     case elfcpp::R_SPARC_TLS_LDM_LO10:
1668     case elfcpp::R_SPARC_TLS_LDM_ADD:
1669     case elfcpp::R_SPARC_TLS_LDM_CALL:
1670     case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
1671     case elfcpp::R_SPARC_TLS_LDO_LOX10:
1672     case elfcpp::R_SPARC_TLS_LDO_ADD:
1673     case elfcpp::R_SPARC_TLS_LE_HIX22:
1674     case elfcpp::R_SPARC_TLS_LE_LOX10:
1675     case elfcpp::R_SPARC_TLS_IE_HI22:   // Initial-exec
1676     case elfcpp::R_SPARC_TLS_IE_LO10:
1677     case elfcpp::R_SPARC_TLS_IE_LD:
1678     case elfcpp::R_SPARC_TLS_IE_LDX:
1679     case elfcpp::R_SPARC_TLS_IE_ADD:
1680       return Symbol::TLS_REF;
1681
1682     case elfcpp::R_SPARC_COPY:
1683     case elfcpp::R_SPARC_GLOB_DAT:
1684     case elfcpp::R_SPARC_JMP_SLOT:
1685     case elfcpp::R_SPARC_RELATIVE:
1686     case elfcpp::R_SPARC_TLS_DTPMOD64:
1687     case elfcpp::R_SPARC_TLS_DTPMOD32:
1688     case elfcpp::R_SPARC_TLS_DTPOFF64:
1689     case elfcpp::R_SPARC_TLS_DTPOFF32:
1690     case elfcpp::R_SPARC_TLS_TPOFF64:
1691     case elfcpp::R_SPARC_TLS_TPOFF32:
1692     default:
1693       // Not expected.  We will give an error later.
1694       return 0;
1695     }
1696 }
1697
1698 // Generate a PLT entry slot for a call to __tls_get_addr
1699 template<int size, bool big_endian>
1700 void
1701 Target_sparc<size, big_endian>::Scan::generate_tls_call(Symbol_table* symtab,
1702                                                         Layout* layout,
1703                                                         Target_sparc<size, big_endian>* target)
1704 {
1705   Symbol* gsym = target->tls_get_addr_sym(symtab);
1706
1707   target->make_plt_entry(symtab, layout, gsym);
1708 }
1709
1710 // Report an unsupported relocation against a local symbol.
1711
1712 template<int size, bool big_endian>
1713 void
1714 Target_sparc<size, big_endian>::Scan::unsupported_reloc_local(
1715                         Sized_relobj_file<size, big_endian>* object,
1716                         unsigned int r_type)
1717 {
1718   gold_error(_("%s: unsupported reloc %u against local symbol"),
1719              object->name().c_str(), r_type);
1720 }
1721
1722 // We are about to emit a dynamic relocation of type R_TYPE.  If the
1723 // dynamic linker does not support it, issue an error.
1724
1725 template<int size, bool big_endian>
1726 void
1727 Target_sparc<size, big_endian>::Scan::check_non_pic(Relobj* object, unsigned int r_type)
1728 {
1729   gold_assert(r_type != elfcpp::R_SPARC_NONE);
1730
1731   if (size == 64)
1732     {
1733       switch (r_type)
1734         {
1735           // These are the relocation types supported by glibc for sparc 64-bit.
1736         case elfcpp::R_SPARC_RELATIVE:
1737         case elfcpp::R_SPARC_COPY:
1738         case elfcpp::R_SPARC_64:
1739         case elfcpp::R_SPARC_GLOB_DAT:
1740         case elfcpp::R_SPARC_JMP_SLOT:
1741         case elfcpp::R_SPARC_TLS_DTPMOD64:
1742         case elfcpp::R_SPARC_TLS_DTPOFF64:
1743         case elfcpp::R_SPARC_TLS_TPOFF64:
1744         case elfcpp::R_SPARC_TLS_LE_HIX22:
1745         case elfcpp::R_SPARC_TLS_LE_LOX10:
1746         case elfcpp::R_SPARC_8:
1747         case elfcpp::R_SPARC_16:
1748         case elfcpp::R_SPARC_DISP8:
1749         case elfcpp::R_SPARC_DISP16:
1750         case elfcpp::R_SPARC_DISP32:
1751         case elfcpp::R_SPARC_WDISP30:
1752         case elfcpp::R_SPARC_LO10:
1753         case elfcpp::R_SPARC_HI22:
1754         case elfcpp::R_SPARC_OLO10:
1755         case elfcpp::R_SPARC_H44:
1756         case elfcpp::R_SPARC_M44:
1757         case elfcpp::R_SPARC_L44:
1758         case elfcpp::R_SPARC_HH22:
1759         case elfcpp::R_SPARC_HM10:
1760         case elfcpp::R_SPARC_LM22:
1761         case elfcpp::R_SPARC_UA16:
1762         case elfcpp::R_SPARC_UA32:
1763         case elfcpp::R_SPARC_UA64:
1764           return;
1765
1766         default:
1767           break;
1768         }
1769     }
1770   else
1771     {
1772       switch (r_type)
1773         {
1774           // These are the relocation types supported by glibc for sparc 32-bit.
1775         case elfcpp::R_SPARC_RELATIVE:
1776         case elfcpp::R_SPARC_COPY:
1777         case elfcpp::R_SPARC_GLOB_DAT:
1778         case elfcpp::R_SPARC_32:
1779         case elfcpp::R_SPARC_JMP_SLOT:
1780         case elfcpp::R_SPARC_TLS_DTPMOD32:
1781         case elfcpp::R_SPARC_TLS_DTPOFF32:
1782         case elfcpp::R_SPARC_TLS_TPOFF32:
1783         case elfcpp::R_SPARC_TLS_LE_HIX22:
1784         case elfcpp::R_SPARC_TLS_LE_LOX10:
1785         case elfcpp::R_SPARC_8:
1786         case elfcpp::R_SPARC_16:
1787         case elfcpp::R_SPARC_DISP8:
1788         case elfcpp::R_SPARC_DISP16:
1789         case elfcpp::R_SPARC_DISP32:
1790         case elfcpp::R_SPARC_LO10:
1791         case elfcpp::R_SPARC_WDISP30:
1792         case elfcpp::R_SPARC_HI22:
1793         case elfcpp::R_SPARC_UA16:
1794         case elfcpp::R_SPARC_UA32:
1795           return;
1796
1797         default:
1798           break;
1799         }
1800     }
1801
1802   // This prevents us from issuing more than one error per reloc
1803   // section.  But we can still wind up issuing more than one
1804   // error per object file.
1805   if (this->issued_non_pic_error_)
1806     return;
1807   gold_assert(parameters->options().output_is_position_independent());
1808   object->error(_("requires unsupported dynamic reloc; "
1809                   "recompile with -fPIC"));
1810   this->issued_non_pic_error_ = true;
1811   return;
1812 }
1813
1814 // Scan a relocation for a local symbol.
1815
1816 template<int size, bool big_endian>
1817 inline void
1818 Target_sparc<size, big_endian>::Scan::local(
1819                         Symbol_table* symtab,
1820                         Layout* layout,
1821                         Target_sparc<size, big_endian>* target,
1822                         Sized_relobj_file<size, big_endian>* object,
1823                         unsigned int data_shndx,
1824                         Output_section* output_section,
1825                         const elfcpp::Rela<size, big_endian>& reloc,
1826                         unsigned int r_type,
1827                         const elfcpp::Sym<size, big_endian>& lsym)
1828 {
1829   unsigned int orig_r_type = r_type;
1830
1831   r_type &= 0xff;
1832   switch (r_type)
1833     {
1834     case elfcpp::R_SPARC_NONE:
1835     case elfcpp::R_SPARC_REGISTER:
1836     case elfcpp::R_SPARC_GNU_VTINHERIT:
1837     case elfcpp::R_SPARC_GNU_VTENTRY:
1838       break;
1839
1840     case elfcpp::R_SPARC_64:
1841     case elfcpp::R_SPARC_32:
1842       // If building a shared library (or a position-independent
1843       // executable), we need to create a dynamic relocation for
1844       // this location. The relocation applied at link time will
1845       // apply the link-time value, so we flag the location with
1846       // an R_SPARC_RELATIVE relocation so the dynamic loader can
1847       // relocate it easily.
1848       if (parameters->options().output_is_position_independent())
1849         {
1850           Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1851           unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1852           rela_dyn->add_local_relative(object, r_sym, elfcpp::R_SPARC_RELATIVE,
1853                                        output_section, data_shndx,
1854                                        reloc.get_r_offset(),
1855                                        reloc.get_r_addend());
1856         }
1857       break;
1858
1859     case elfcpp::R_SPARC_HIX22:
1860     case elfcpp::R_SPARC_LOX10:
1861     case elfcpp::R_SPARC_H44:
1862     case elfcpp::R_SPARC_M44:
1863     case elfcpp::R_SPARC_L44:
1864     case elfcpp::R_SPARC_HH22:
1865     case elfcpp::R_SPARC_HM10:
1866     case elfcpp::R_SPARC_LM22:
1867     case elfcpp::R_SPARC_UA64:
1868     case elfcpp::R_SPARC_UA32:
1869     case elfcpp::R_SPARC_UA16:
1870     case elfcpp::R_SPARC_HI22:
1871     case elfcpp::R_SPARC_LO10:
1872     case elfcpp::R_SPARC_OLO10:
1873     case elfcpp::R_SPARC_16:
1874     case elfcpp::R_SPARC_11:
1875     case elfcpp::R_SPARC_10:
1876     case elfcpp::R_SPARC_8:
1877     case elfcpp::R_SPARC_7:
1878     case elfcpp::R_SPARC_6:
1879     case elfcpp::R_SPARC_5:
1880       // If building a shared library (or a position-independent
1881       // executable), we need to create a dynamic relocation for
1882       // this location.
1883       if (parameters->options().output_is_position_independent())
1884         {
1885           Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1886           unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1887
1888           check_non_pic(object, r_type);
1889           if (lsym.get_st_type() != elfcpp::STT_SECTION)
1890             {
1891               rela_dyn->add_local(object, r_sym, orig_r_type, output_section,
1892                                   data_shndx, reloc.get_r_offset(),
1893                                   reloc.get_r_addend());
1894             }
1895           else
1896             {
1897               gold_assert(lsym.get_st_value() == 0);
1898               rela_dyn->add_symbolless_local_addend(object, r_sym, orig_r_type,
1899                                                     output_section, data_shndx,
1900                                                     reloc.get_r_offset(),
1901                                                     reloc.get_r_addend());
1902             }
1903         }
1904       break;
1905
1906     case elfcpp::R_SPARC_WDISP30:
1907     case elfcpp::R_SPARC_WPLT30:
1908     case elfcpp::R_SPARC_WDISP22:
1909     case elfcpp::R_SPARC_WDISP19:
1910     case elfcpp::R_SPARC_WDISP16:
1911     case elfcpp::R_SPARC_DISP8:
1912     case elfcpp::R_SPARC_DISP16:
1913     case elfcpp::R_SPARC_DISP32:
1914     case elfcpp::R_SPARC_DISP64:
1915     case elfcpp::R_SPARC_PC10:
1916     case elfcpp::R_SPARC_PC22:
1917       break;
1918
1919     case elfcpp::R_SPARC_GOTDATA_OP:
1920     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
1921     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
1922     case elfcpp::R_SPARC_GOT10:
1923     case elfcpp::R_SPARC_GOT13:
1924     case elfcpp::R_SPARC_GOT22:
1925       {
1926         // The symbol requires a GOT entry.
1927         Output_data_got<size, big_endian>* got;
1928         unsigned int r_sym;
1929
1930         got = target->got_section(symtab, layout);
1931         r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1932
1933         // If we are generating a shared object, we need to add a
1934         // dynamic relocation for this symbol's GOT entry.
1935         if (parameters->options().output_is_position_independent())
1936           {
1937             if (!object->local_has_got_offset(r_sym, GOT_TYPE_STANDARD))
1938               {
1939                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1940                 unsigned int off;
1941
1942                 off = got->add_constant(0);
1943                 object->set_local_got_offset(r_sym, GOT_TYPE_STANDARD, off);
1944                 rela_dyn->add_local_relative(object, r_sym,
1945                                              elfcpp::R_SPARC_RELATIVE,
1946                                              got, off, 0);
1947               }
1948           }
1949         else
1950           got->add_local(object, r_sym, GOT_TYPE_STANDARD);
1951       }
1952       break;
1953
1954       // These are initial TLS relocs, which are expected when
1955       // linking.
1956     case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1957     case elfcpp::R_SPARC_TLS_GD_LO10:
1958     case elfcpp::R_SPARC_TLS_GD_ADD:
1959     case elfcpp::R_SPARC_TLS_GD_CALL:
1960     case elfcpp::R_SPARC_TLS_LDM_HI22 : // Local-dynamic
1961     case elfcpp::R_SPARC_TLS_LDM_LO10:
1962     case elfcpp::R_SPARC_TLS_LDM_ADD:
1963     case elfcpp::R_SPARC_TLS_LDM_CALL:
1964     case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
1965     case elfcpp::R_SPARC_TLS_LDO_LOX10:
1966     case elfcpp::R_SPARC_TLS_LDO_ADD:
1967     case elfcpp::R_SPARC_TLS_IE_HI22:   // Initial-exec
1968     case elfcpp::R_SPARC_TLS_IE_LO10:
1969     case elfcpp::R_SPARC_TLS_IE_LD:
1970     case elfcpp::R_SPARC_TLS_IE_LDX:
1971     case elfcpp::R_SPARC_TLS_IE_ADD:
1972     case elfcpp::R_SPARC_TLS_LE_HIX22:  // Local-exec
1973     case elfcpp::R_SPARC_TLS_LE_LOX10:
1974       {
1975         bool output_is_shared = parameters->options().shared();
1976         const tls::Tls_optimization optimized_type
1977             = optimize_tls_reloc(!output_is_shared, r_type);
1978         switch (r_type)
1979           {
1980           case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1981           case elfcpp::R_SPARC_TLS_GD_LO10:
1982           case elfcpp::R_SPARC_TLS_GD_ADD:
1983           case elfcpp::R_SPARC_TLS_GD_CALL:
1984             if (optimized_type == tls::TLSOPT_NONE)
1985               {
1986                 // Create a pair of GOT entries for the module index and
1987                 // dtv-relative offset.
1988                 Output_data_got<size, big_endian>* got
1989                     = target->got_section(symtab, layout);
1990                 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1991                 unsigned int shndx = lsym.get_st_shndx();
1992                 bool is_ordinary;
1993                 shndx = object->adjust_sym_shndx(r_sym, shndx, &is_ordinary);
1994                 if (!is_ordinary)
1995                   object->error(_("local symbol %u has bad shndx %u"),
1996                                 r_sym, shndx);
1997                 else
1998                   got->add_local_pair_with_rela(object, r_sym,
1999                                                 lsym.get_st_shndx(),
2000                                                 GOT_TYPE_TLS_PAIR,
2001                                                 target->rela_dyn_section(layout),
2002                                                 (size == 64
2003                                                  ? elfcpp::R_SPARC_TLS_DTPMOD64
2004                                                  : elfcpp::R_SPARC_TLS_DTPMOD32),
2005                                                  0);
2006                 if (r_type == elfcpp::R_SPARC_TLS_GD_CALL)
2007                   generate_tls_call(symtab, layout, target);
2008               }
2009             else if (optimized_type != tls::TLSOPT_TO_LE)
2010               unsupported_reloc_local(object, r_type);
2011             break;
2012
2013           case elfcpp::R_SPARC_TLS_LDM_HI22 :   // Local-dynamic
2014           case elfcpp::R_SPARC_TLS_LDM_LO10:
2015           case elfcpp::R_SPARC_TLS_LDM_ADD:
2016           case elfcpp::R_SPARC_TLS_LDM_CALL:
2017             if (optimized_type == tls::TLSOPT_NONE)
2018               {
2019                 // Create a GOT entry for the module index.
2020                 target->got_mod_index_entry(symtab, layout, object);
2021
2022                 if (r_type == elfcpp::R_SPARC_TLS_LDM_CALL)
2023                   generate_tls_call(symtab, layout, target);
2024               }
2025             else if (optimized_type != tls::TLSOPT_TO_LE)
2026               unsupported_reloc_local(object, r_type);
2027             break;
2028
2029           case elfcpp::R_SPARC_TLS_LDO_HIX22:   // Alternate local-dynamic
2030           case elfcpp::R_SPARC_TLS_LDO_LOX10:
2031           case elfcpp::R_SPARC_TLS_LDO_ADD:
2032             break;
2033
2034           case elfcpp::R_SPARC_TLS_IE_HI22:     // Initial-exec
2035           case elfcpp::R_SPARC_TLS_IE_LO10:
2036           case elfcpp::R_SPARC_TLS_IE_LD:
2037           case elfcpp::R_SPARC_TLS_IE_LDX:
2038           case elfcpp::R_SPARC_TLS_IE_ADD:
2039             layout->set_has_static_tls();
2040             if (optimized_type == tls::TLSOPT_NONE)
2041               {
2042                 // Create a GOT entry for the tp-relative offset.
2043                 Output_data_got<size, big_endian>* got
2044                   = target->got_section(symtab, layout);
2045                 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2046
2047                 if (!object->local_has_got_offset(r_sym, GOT_TYPE_TLS_OFFSET))
2048                   {
2049                     Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2050                     unsigned int off = got->add_constant(0);
2051
2052                     object->set_local_got_offset(r_sym, GOT_TYPE_TLS_OFFSET, off);
2053
2054                     rela_dyn->add_symbolless_local_addend(object, r_sym,
2055                                                           (size == 64 ?
2056                                                            elfcpp::R_SPARC_TLS_TPOFF64 :
2057                                                            elfcpp::R_SPARC_TLS_TPOFF32),
2058                                                           got, off, 0);
2059                   }
2060               }
2061             else if (optimized_type != tls::TLSOPT_TO_LE)
2062               unsupported_reloc_local(object, r_type);
2063             break;
2064
2065           case elfcpp::R_SPARC_TLS_LE_HIX22:    // Local-exec
2066           case elfcpp::R_SPARC_TLS_LE_LOX10:
2067             layout->set_has_static_tls();
2068             if (output_is_shared)
2069               {
2070                 // We need to create a dynamic relocation.
2071                 gold_assert(lsym.get_st_type() != elfcpp::STT_SECTION);
2072                 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2073                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2074                 rela_dyn->add_symbolless_local_addend(object, r_sym, r_type,
2075                                                       output_section, data_shndx,
2076                                                       reloc.get_r_offset(), 0);
2077               }
2078             break;
2079           }
2080       }
2081       break;
2082
2083       // These are relocations which should only be seen by the
2084       // dynamic linker, and should never be seen here.
2085     case elfcpp::R_SPARC_COPY:
2086     case elfcpp::R_SPARC_GLOB_DAT:
2087     case elfcpp::R_SPARC_JMP_SLOT:
2088     case elfcpp::R_SPARC_RELATIVE:
2089     case elfcpp::R_SPARC_TLS_DTPMOD64:
2090     case elfcpp::R_SPARC_TLS_DTPMOD32:
2091     case elfcpp::R_SPARC_TLS_DTPOFF64:
2092     case elfcpp::R_SPARC_TLS_DTPOFF32:
2093     case elfcpp::R_SPARC_TLS_TPOFF64:
2094     case elfcpp::R_SPARC_TLS_TPOFF32:
2095       gold_error(_("%s: unexpected reloc %u in object file"),
2096                  object->name().c_str(), r_type);
2097       break;
2098
2099     default:
2100       unsupported_reloc_local(object, r_type);
2101       break;
2102     }
2103 }
2104
2105 // Report an unsupported relocation against a global symbol.
2106
2107 template<int size, bool big_endian>
2108 void
2109 Target_sparc<size, big_endian>::Scan::unsupported_reloc_global(
2110                         Sized_relobj_file<size, big_endian>* object,
2111                         unsigned int r_type,
2112                         Symbol* gsym)
2113 {
2114   gold_error(_("%s: unsupported reloc %u against global symbol %s"),
2115              object->name().c_str(), r_type, gsym->demangled_name().c_str());
2116 }
2117
2118 // Scan a relocation for a global symbol.
2119
2120 template<int size, bool big_endian>
2121 inline void
2122 Target_sparc<size, big_endian>::Scan::global(
2123                                 Symbol_table* symtab,
2124                                 Layout* layout,
2125                                 Target_sparc<size, big_endian>* target,
2126                                 Sized_relobj_file<size, big_endian>* object,
2127                                 unsigned int data_shndx,
2128                                 Output_section* output_section,
2129                                 const elfcpp::Rela<size, big_endian>& reloc,
2130                                 unsigned int r_type,
2131                                 Symbol* gsym)
2132 {
2133   unsigned int orig_r_type = r_type;
2134
2135   // A reference to _GLOBAL_OFFSET_TABLE_ implies that we need a got
2136   // section.  We check here to avoid creating a dynamic reloc against
2137   // _GLOBAL_OFFSET_TABLE_.
2138   if (!target->has_got_section()
2139       && strcmp(gsym->name(), "_GLOBAL_OFFSET_TABLE_") == 0)
2140     target->got_section(symtab, layout);
2141
2142   r_type &= 0xff;
2143   switch (r_type)
2144     {
2145     case elfcpp::R_SPARC_NONE:
2146     case elfcpp::R_SPARC_REGISTER:
2147     case elfcpp::R_SPARC_GNU_VTINHERIT:
2148     case elfcpp::R_SPARC_GNU_VTENTRY:
2149       break;
2150
2151     case elfcpp::R_SPARC_PLT64:
2152     case elfcpp::R_SPARC_PLT32:
2153     case elfcpp::R_SPARC_HIPLT22:
2154     case elfcpp::R_SPARC_LOPLT10:
2155     case elfcpp::R_SPARC_PCPLT32:
2156     case elfcpp::R_SPARC_PCPLT22:
2157     case elfcpp::R_SPARC_PCPLT10:
2158     case elfcpp::R_SPARC_WPLT30:
2159       // If the symbol is fully resolved, this is just a PC32 reloc.
2160       // Otherwise we need a PLT entry.
2161       if (gsym->final_value_is_known())
2162         break;
2163       // If building a shared library, we can also skip the PLT entry
2164       // if the symbol is defined in the output file and is protected
2165       // or hidden.
2166       if (gsym->is_defined()
2167           && !gsym->is_from_dynobj()
2168           && !gsym->is_preemptible())
2169         break;
2170       target->make_plt_entry(symtab, layout, gsym);
2171       break;
2172
2173     case elfcpp::R_SPARC_DISP8:
2174     case elfcpp::R_SPARC_DISP16:
2175     case elfcpp::R_SPARC_DISP32:
2176     case elfcpp::R_SPARC_DISP64:
2177     case elfcpp::R_SPARC_PC_HH22:
2178     case elfcpp::R_SPARC_PC_HM10:
2179     case elfcpp::R_SPARC_PC_LM22:
2180     case elfcpp::R_SPARC_PC10:
2181     case elfcpp::R_SPARC_PC22:
2182     case elfcpp::R_SPARC_WDISP30:
2183     case elfcpp::R_SPARC_WDISP22:
2184     case elfcpp::R_SPARC_WDISP19:
2185     case elfcpp::R_SPARC_WDISP16:
2186       {
2187         if (gsym->needs_plt_entry())
2188           target->make_plt_entry(symtab, layout, gsym);
2189         // Make a dynamic relocation if necessary.
2190         if (gsym->needs_dynamic_reloc(Scan::get_reference_flags(r_type)))
2191           {
2192             if (gsym->may_need_copy_reloc())
2193               {
2194                 target->copy_reloc(symtab, layout, object,
2195                                    data_shndx, output_section, gsym,
2196                                    reloc);
2197               }
2198             else
2199               {
2200                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2201                 check_non_pic(object, r_type);
2202                 rela_dyn->add_global(gsym, orig_r_type, output_section, object,
2203                                      data_shndx, reloc.get_r_offset(),
2204                                      reloc.get_r_addend());
2205               }
2206           }
2207       }
2208       break;
2209
2210     case elfcpp::R_SPARC_UA64:
2211     case elfcpp::R_SPARC_64:
2212     case elfcpp::R_SPARC_HIX22:
2213     case elfcpp::R_SPARC_LOX10:
2214     case elfcpp::R_SPARC_H44:
2215     case elfcpp::R_SPARC_M44:
2216     case elfcpp::R_SPARC_L44:
2217     case elfcpp::R_SPARC_HH22:
2218     case elfcpp::R_SPARC_HM10:
2219     case elfcpp::R_SPARC_LM22:
2220     case elfcpp::R_SPARC_HI22:
2221     case elfcpp::R_SPARC_LO10:
2222     case elfcpp::R_SPARC_OLO10:
2223     case elfcpp::R_SPARC_UA32:
2224     case elfcpp::R_SPARC_32:
2225     case elfcpp::R_SPARC_UA16:
2226     case elfcpp::R_SPARC_16:
2227     case elfcpp::R_SPARC_11:
2228     case elfcpp::R_SPARC_10:
2229     case elfcpp::R_SPARC_8:
2230     case elfcpp::R_SPARC_7:
2231     case elfcpp::R_SPARC_6:
2232     case elfcpp::R_SPARC_5:
2233       {
2234         // Make a PLT entry if necessary.
2235         if (gsym->needs_plt_entry())
2236           {
2237             target->make_plt_entry(symtab, layout, gsym);
2238             // Since this is not a PC-relative relocation, we may be
2239             // taking the address of a function. In that case we need to
2240             // set the entry in the dynamic symbol table to the address of
2241             // the PLT entry.
2242             if (gsym->is_from_dynobj() && !parameters->options().shared())
2243               gsym->set_needs_dynsym_value();
2244           }
2245         // Make a dynamic relocation if necessary.
2246         if (gsym->needs_dynamic_reloc(Scan::get_reference_flags(r_type)))
2247           {
2248             unsigned int r_off = reloc.get_r_offset();
2249
2250             // The assembler can sometimes emit unaligned relocations
2251             // for dwarf2 cfi directives.
2252             switch (r_type)
2253               {
2254               case elfcpp::R_SPARC_16:
2255                 if (r_off & 0x1)
2256                   orig_r_type = r_type = elfcpp::R_SPARC_UA16;
2257                 break;
2258               case elfcpp::R_SPARC_32:
2259                 if (r_off & 0x3)
2260                   orig_r_type = r_type = elfcpp::R_SPARC_UA32;
2261                 break;
2262               case elfcpp::R_SPARC_64:
2263                 if (r_off & 0x7)
2264                   orig_r_type = r_type = elfcpp::R_SPARC_UA64;
2265                 break;
2266               case elfcpp::R_SPARC_UA16:
2267                 if (!(r_off & 0x1))
2268                   orig_r_type = r_type = elfcpp::R_SPARC_16;
2269                 break;
2270               case elfcpp::R_SPARC_UA32:
2271                 if (!(r_off & 0x3))
2272                   orig_r_type = r_type = elfcpp::R_SPARC_32;
2273                 break;
2274               case elfcpp::R_SPARC_UA64:
2275                 if (!(r_off & 0x7))
2276                   orig_r_type = r_type = elfcpp::R_SPARC_64;
2277                 break;
2278               }
2279
2280             if (gsym->may_need_copy_reloc())
2281               {
2282                 target->copy_reloc(symtab, layout, object,
2283                                    data_shndx, output_section, gsym, reloc);
2284               }
2285             else if ((r_type == elfcpp::R_SPARC_32
2286                       || r_type == elfcpp::R_SPARC_64)
2287                      && gsym->can_use_relative_reloc(false))
2288               {
2289                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2290                 rela_dyn->add_global_relative(gsym, elfcpp::R_SPARC_RELATIVE,
2291                                               output_section, object,
2292                                               data_shndx, reloc.get_r_offset(),
2293                                               reloc.get_r_addend());
2294               }
2295             else
2296               {
2297                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2298
2299                 check_non_pic(object, r_type);
2300                 if (gsym->is_from_dynobj()
2301                     || gsym->is_undefined()
2302                     || gsym->is_preemptible())
2303                   rela_dyn->add_global(gsym, orig_r_type, output_section,
2304                                        object, data_shndx,
2305                                        reloc.get_r_offset(),
2306                                        reloc.get_r_addend());
2307                 else
2308                   rela_dyn->add_symbolless_global_addend(gsym, orig_r_type,
2309                                                          output_section,
2310                                                          object, data_shndx,
2311                                                          reloc.get_r_offset(),
2312                                                          reloc.get_r_addend());
2313               }
2314           }
2315       }
2316       break;
2317
2318     case elfcpp::R_SPARC_GOTDATA_OP:
2319     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2320     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2321     case elfcpp::R_SPARC_GOT10:
2322     case elfcpp::R_SPARC_GOT13:
2323     case elfcpp::R_SPARC_GOT22:
2324       {
2325         // The symbol requires a GOT entry.
2326         Output_data_got<size, big_endian>* got;
2327
2328         got = target->got_section(symtab, layout);
2329         if (gsym->final_value_is_known())
2330           got->add_global(gsym, GOT_TYPE_STANDARD);
2331         else
2332           {
2333             // If this symbol is not fully resolved, we need to add a
2334             // dynamic relocation for it.
2335             Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2336             if (gsym->is_from_dynobj()
2337                 || gsym->is_undefined()
2338                 || gsym->is_preemptible())
2339               got->add_global_with_rela(gsym, GOT_TYPE_STANDARD, rela_dyn,
2340                                         elfcpp::R_SPARC_GLOB_DAT);
2341             else if (!gsym->has_got_offset(GOT_TYPE_STANDARD))
2342               {
2343                 unsigned int off = got->add_constant(0);
2344
2345                 gsym->set_got_offset(GOT_TYPE_STANDARD, off);
2346                 rela_dyn->add_global_relative(gsym, elfcpp::R_SPARC_RELATIVE,
2347                                               got, off, 0);
2348               }
2349           }
2350       }
2351       break;
2352
2353       // These are initial tls relocs, which are expected when
2354       // linking.
2355     case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2356     case elfcpp::R_SPARC_TLS_GD_LO10:
2357     case elfcpp::R_SPARC_TLS_GD_ADD:
2358     case elfcpp::R_SPARC_TLS_GD_CALL:
2359     case elfcpp::R_SPARC_TLS_LDM_HI22:  // Local-dynamic
2360     case elfcpp::R_SPARC_TLS_LDM_LO10:
2361     case elfcpp::R_SPARC_TLS_LDM_ADD:
2362     case elfcpp::R_SPARC_TLS_LDM_CALL:
2363     case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2364     case elfcpp::R_SPARC_TLS_LDO_LOX10:
2365     case elfcpp::R_SPARC_TLS_LDO_ADD:
2366     case elfcpp::R_SPARC_TLS_LE_HIX22:
2367     case elfcpp::R_SPARC_TLS_LE_LOX10:
2368     case elfcpp::R_SPARC_TLS_IE_HI22:   // Initial-exec
2369     case elfcpp::R_SPARC_TLS_IE_LO10:
2370     case elfcpp::R_SPARC_TLS_IE_LD:
2371     case elfcpp::R_SPARC_TLS_IE_LDX:
2372     case elfcpp::R_SPARC_TLS_IE_ADD:
2373       {
2374         const bool is_final = gsym->final_value_is_known();
2375         const tls::Tls_optimization optimized_type
2376             = optimize_tls_reloc(is_final, r_type);
2377         switch (r_type)
2378           {
2379           case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2380           case elfcpp::R_SPARC_TLS_GD_LO10:
2381           case elfcpp::R_SPARC_TLS_GD_ADD:
2382           case elfcpp::R_SPARC_TLS_GD_CALL:
2383             if (optimized_type == tls::TLSOPT_NONE)
2384               {
2385                 // Create a pair of GOT entries for the module index and
2386                 // dtv-relative offset.
2387                 Output_data_got<size, big_endian>* got
2388                     = target->got_section(symtab, layout);
2389                 got->add_global_pair_with_rela(gsym, GOT_TYPE_TLS_PAIR,
2390                                                target->rela_dyn_section(layout),
2391                                                (size == 64 ?
2392                                                 elfcpp::R_SPARC_TLS_DTPMOD64 :
2393                                                 elfcpp::R_SPARC_TLS_DTPMOD32),
2394                                                (size == 64 ?
2395                                                 elfcpp::R_SPARC_TLS_DTPOFF64 :
2396                                                 elfcpp::R_SPARC_TLS_DTPOFF32));
2397
2398                 // Emit R_SPARC_WPLT30 against "__tls_get_addr"
2399                 if (r_type == elfcpp::R_SPARC_TLS_GD_CALL)
2400                   generate_tls_call(symtab, layout, target);
2401               }
2402             else if (optimized_type == tls::TLSOPT_TO_IE)
2403               {
2404                 // Create a GOT entry for the tp-relative offset.
2405                 Output_data_got<size, big_endian>* got
2406                     = target->got_section(symtab, layout);
2407                 got->add_global_with_rela(gsym, GOT_TYPE_TLS_OFFSET,
2408                                           target->rela_dyn_section(layout),
2409                                           (size == 64 ?
2410                                            elfcpp::R_SPARC_TLS_TPOFF64 :
2411                                            elfcpp::R_SPARC_TLS_TPOFF32));
2412               }
2413             else if (optimized_type != tls::TLSOPT_TO_LE)
2414               unsupported_reloc_global(object, r_type, gsym);
2415             break;
2416
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             if (optimized_type == tls::TLSOPT_NONE)
2422               {
2423                 // Create a GOT entry for the module index.
2424                 target->got_mod_index_entry(symtab, layout, object);
2425
2426                 if (r_type == elfcpp::R_SPARC_TLS_LDM_CALL)
2427                   generate_tls_call(symtab, layout, target);
2428               }
2429             else if (optimized_type != tls::TLSOPT_TO_LE)
2430               unsupported_reloc_global(object, r_type, gsym);
2431             break;
2432
2433           case elfcpp::R_SPARC_TLS_LDO_HIX22:   // Alternate local-dynamic
2434           case elfcpp::R_SPARC_TLS_LDO_LOX10:
2435           case elfcpp::R_SPARC_TLS_LDO_ADD:
2436             break;
2437
2438           case elfcpp::R_SPARC_TLS_LE_HIX22:
2439           case elfcpp::R_SPARC_TLS_LE_LOX10:
2440             layout->set_has_static_tls();
2441             if (parameters->options().shared())
2442               {
2443                 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2444                 rela_dyn->add_symbolless_global_addend(gsym, orig_r_type,
2445                                                        output_section, object,
2446                                                        data_shndx, reloc.get_r_offset(),
2447                                                        0);
2448               }
2449             break;
2450
2451           case elfcpp::R_SPARC_TLS_IE_HI22:     // Initial-exec
2452           case elfcpp::R_SPARC_TLS_IE_LO10:
2453           case elfcpp::R_SPARC_TLS_IE_LD:
2454           case elfcpp::R_SPARC_TLS_IE_LDX:
2455           case elfcpp::R_SPARC_TLS_IE_ADD:
2456             layout->set_has_static_tls();
2457             if (optimized_type == tls::TLSOPT_NONE)
2458               {
2459                 // Create a GOT entry for the tp-relative offset.
2460                 Output_data_got<size, big_endian>* got
2461                   = target->got_section(symtab, layout);
2462                 got->add_global_with_rela(gsym, GOT_TYPE_TLS_OFFSET,
2463                                           target->rela_dyn_section(layout),
2464                                           (size == 64 ?
2465                                            elfcpp::R_SPARC_TLS_TPOFF64 :
2466                                            elfcpp::R_SPARC_TLS_TPOFF32));
2467               }
2468             else if (optimized_type != tls::TLSOPT_TO_LE)
2469               unsupported_reloc_global(object, r_type, gsym);
2470             break;
2471           }
2472       }
2473       break;
2474
2475       // These are relocations which should only be seen by the
2476       // dynamic linker, and should never be seen here.
2477     case elfcpp::R_SPARC_COPY:
2478     case elfcpp::R_SPARC_GLOB_DAT:
2479     case elfcpp::R_SPARC_JMP_SLOT:
2480     case elfcpp::R_SPARC_RELATIVE:
2481     case elfcpp::R_SPARC_TLS_DTPMOD64:
2482     case elfcpp::R_SPARC_TLS_DTPMOD32:
2483     case elfcpp::R_SPARC_TLS_DTPOFF64:
2484     case elfcpp::R_SPARC_TLS_DTPOFF32:
2485     case elfcpp::R_SPARC_TLS_TPOFF64:
2486     case elfcpp::R_SPARC_TLS_TPOFF32:
2487       gold_error(_("%s: unexpected reloc %u in object file"),
2488                  object->name().c_str(), r_type);
2489       break;
2490
2491     default:
2492       unsupported_reloc_global(object, r_type, gsym);
2493       break;
2494     }
2495 }
2496
2497 // Process relocations for gc.
2498
2499 template<int size, bool big_endian>
2500 void
2501 Target_sparc<size, big_endian>::gc_process_relocs(
2502                         Symbol_table* symtab,
2503                         Layout* layout,
2504                         Sized_relobj_file<size, big_endian>* object,
2505                         unsigned int data_shndx,
2506                         unsigned int,
2507                         const unsigned char* prelocs,
2508                         size_t reloc_count,
2509                         Output_section* output_section,
2510                         bool needs_special_offset_handling,
2511                         size_t local_symbol_count,
2512                         const unsigned char* plocal_symbols)
2513 {
2514   typedef Target_sparc<size, big_endian> Sparc;
2515   typedef typename Target_sparc<size, big_endian>::Scan Scan;
2516
2517   gold::gc_process_relocs<size, big_endian, Sparc, elfcpp::SHT_RELA, Scan,
2518                           typename Target_sparc::Relocatable_size_for_reloc>(
2519     symtab,
2520     layout,
2521     this,
2522     object,
2523     data_shndx,
2524     prelocs,
2525     reloc_count,
2526     output_section,
2527     needs_special_offset_handling,
2528     local_symbol_count,
2529     plocal_symbols);
2530 }
2531
2532 // Scan relocations for a section.
2533
2534 template<int size, bool big_endian>
2535 void
2536 Target_sparc<size, big_endian>::scan_relocs(
2537                         Symbol_table* symtab,
2538                         Layout* layout,
2539                         Sized_relobj_file<size, big_endian>* object,
2540                         unsigned int data_shndx,
2541                         unsigned int sh_type,
2542                         const unsigned char* prelocs,
2543                         size_t reloc_count,
2544                         Output_section* output_section,
2545                         bool needs_special_offset_handling,
2546                         size_t local_symbol_count,
2547                         const unsigned char* plocal_symbols)
2548 {
2549   typedef Target_sparc<size, big_endian> Sparc;
2550   typedef typename Target_sparc<size, big_endian>::Scan Scan;
2551
2552   if (sh_type == elfcpp::SHT_REL)
2553     {
2554       gold_error(_("%s: unsupported REL reloc section"),
2555                  object->name().c_str());
2556       return;
2557     }
2558
2559   gold::scan_relocs<size, big_endian, Sparc, elfcpp::SHT_RELA, Scan>(
2560     symtab,
2561     layout,
2562     this,
2563     object,
2564     data_shndx,
2565     prelocs,
2566     reloc_count,
2567     output_section,
2568     needs_special_offset_handling,
2569     local_symbol_count,
2570     plocal_symbols);
2571 }
2572
2573 // Finalize the sections.
2574
2575 template<int size, bool big_endian>
2576 void
2577 Target_sparc<size, big_endian>::do_finalize_sections(
2578     Layout* layout,
2579     const Input_objects*,
2580     Symbol_table*)
2581 {
2582   // Fill in some more dynamic tags.
2583   const Reloc_section* rel_plt = (this->plt_ == NULL
2584                                   ? NULL
2585                                   : this->plt_->rel_plt());
2586   layout->add_target_dynamic_tags(false, this->plt_, rel_plt,
2587                                   this->rela_dyn_, true, true);
2588
2589   // Emit any relocs we saved in an attempt to avoid generating COPY
2590   // relocs.
2591   if (this->copy_relocs_.any_saved_relocs())
2592     this->copy_relocs_.emit(this->rela_dyn_section(layout));
2593 }
2594
2595 // Perform a relocation.
2596
2597 template<int size, bool big_endian>
2598 inline bool
2599 Target_sparc<size, big_endian>::Relocate::relocate(
2600                         const Relocate_info<size, big_endian>* relinfo,
2601                         Target_sparc* target,
2602                         Output_section*,
2603                         size_t relnum,
2604                         const elfcpp::Rela<size, big_endian>& rela,
2605                         unsigned int r_type,
2606                         const Sized_symbol<size>* gsym,
2607                         const Symbol_value<size>* psymval,
2608                         unsigned char* view,
2609                         typename elfcpp::Elf_types<size>::Elf_Addr address,
2610                         section_size_type view_size)
2611 {
2612   r_type &= 0xff;
2613
2614   if (this->ignore_gd_add_)
2615     {
2616       if (r_type != elfcpp::R_SPARC_TLS_GD_ADD)
2617         gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2618                                _("missing expected TLS relocation"));
2619       else
2620         {
2621           this->ignore_gd_add_ = false;
2622           return false;
2623         }
2624     }
2625
2626   typedef Sparc_relocate_functions<size, big_endian> Reloc;
2627
2628   // Pick the value to use for symbols defined in shared objects.
2629   Symbol_value<size> symval;
2630   if (gsym != NULL
2631       && gsym->use_plt_offset(Scan::get_reference_flags(r_type)))
2632     {
2633       elfcpp::Elf_Xword value;
2634
2635       value = target->plt_section()->address() + gsym->plt_offset();
2636
2637       symval.set_output_value(value);
2638
2639       psymval = &symval;
2640     }
2641
2642   const Sized_relobj_file<size, big_endian>* object = relinfo->object;
2643   const elfcpp::Elf_Xword addend = rela.get_r_addend();
2644
2645   // Get the GOT offset if needed.  Unlike i386 and x86_64, our GOT
2646   // pointer points to the beginning, not the end, of the table.
2647   // So we just use the plain offset.
2648   unsigned int got_offset = 0;
2649   switch (r_type)
2650     {
2651     case elfcpp::R_SPARC_GOTDATA_OP:
2652     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2653     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2654     case elfcpp::R_SPARC_GOT10:
2655     case elfcpp::R_SPARC_GOT13:
2656     case elfcpp::R_SPARC_GOT22:
2657       if (gsym != NULL)
2658         {
2659           gold_assert(gsym->has_got_offset(GOT_TYPE_STANDARD));
2660           got_offset = gsym->got_offset(GOT_TYPE_STANDARD);
2661         }
2662       else
2663         {
2664           unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
2665           gold_assert(object->local_has_got_offset(r_sym, GOT_TYPE_STANDARD));
2666           got_offset = object->local_got_offset(r_sym, GOT_TYPE_STANDARD);
2667         }
2668       break;
2669
2670     default:
2671       break;
2672     }
2673
2674   switch (r_type)
2675     {
2676     case elfcpp::R_SPARC_NONE:
2677     case elfcpp::R_SPARC_REGISTER:
2678     case elfcpp::R_SPARC_GNU_VTINHERIT:
2679     case elfcpp::R_SPARC_GNU_VTENTRY:
2680       break;
2681
2682     case elfcpp::R_SPARC_8:
2683       Relocate_functions<size, big_endian>::rela8(view, object,
2684                                                   psymval, addend);
2685       break;
2686
2687     case elfcpp::R_SPARC_16:
2688       if (rela.get_r_offset() & 0x1)
2689         {
2690           // The assembler can sometimes emit unaligned relocations
2691           // for dwarf2 cfi directives.
2692           Reloc::ua16(view, object, psymval, addend);
2693         }
2694       else
2695         Relocate_functions<size, big_endian>::rela16(view, object,
2696                                                      psymval, addend);
2697       break;
2698
2699     case elfcpp::R_SPARC_32:
2700       if (!parameters->options().output_is_position_independent())
2701         {
2702           if (rela.get_r_offset() & 0x3)
2703             {
2704               // The assembler can sometimes emit unaligned relocations
2705               // for dwarf2 cfi directives.
2706               Reloc::ua32(view, object, psymval, addend);
2707             }
2708           else
2709             Relocate_functions<size, big_endian>::rela32(view, object,
2710                                                          psymval, addend);
2711         }
2712       break;
2713
2714     case elfcpp::R_SPARC_DISP8:
2715       Reloc::disp8(view, object, psymval, addend, address);
2716       break;
2717
2718     case elfcpp::R_SPARC_DISP16:
2719       Reloc::disp16(view, object, psymval, addend, address);
2720       break;
2721
2722     case elfcpp::R_SPARC_DISP32:
2723       Reloc::disp32(view, object, psymval, addend, address);
2724       break;
2725
2726     case elfcpp::R_SPARC_DISP64:
2727       Reloc::disp64(view, object, psymval, addend, address);
2728       break;
2729
2730     case elfcpp::R_SPARC_WDISP30:
2731     case elfcpp::R_SPARC_WPLT30:
2732       Reloc::wdisp30(view, object, psymval, addend, address);
2733       break;
2734
2735     case elfcpp::R_SPARC_WDISP22:
2736       Reloc::wdisp22(view, object, psymval, addend, address);
2737       break;
2738
2739     case elfcpp::R_SPARC_WDISP19:
2740       Reloc::wdisp19(view, object, psymval, addend, address);
2741       break;
2742
2743     case elfcpp::R_SPARC_WDISP16:
2744       Reloc::wdisp16(view, object, psymval, addend, address);
2745       break;
2746
2747     case elfcpp::R_SPARC_HI22:
2748       Reloc::hi22(view, object, psymval, addend);
2749       break;
2750
2751     case elfcpp::R_SPARC_22:
2752       Reloc::rela32_22(view, object, psymval, addend);
2753       break;
2754
2755     case elfcpp::R_SPARC_13:
2756       Reloc::rela32_13(view, object, psymval, addend);
2757       break;
2758
2759     case elfcpp::R_SPARC_LO10:
2760       Reloc::lo10(view, object, psymval, addend);
2761       break;
2762
2763     case elfcpp::R_SPARC_GOT10:
2764       Reloc::lo10(view, got_offset, addend);
2765       break;
2766
2767     case elfcpp::R_SPARC_GOTDATA_OP:
2768       break;
2769
2770     case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2771     case elfcpp::R_SPARC_GOT13:
2772       Reloc::rela32_13(view, got_offset, addend);
2773       break;
2774
2775     case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2776     case elfcpp::R_SPARC_GOT22:
2777       Reloc::hi22(view, got_offset, addend);
2778       break;
2779
2780     case elfcpp::R_SPARC_PC10:
2781       Reloc::pc10(view, object, psymval, addend, address);
2782       break;
2783
2784     case elfcpp::R_SPARC_PC22:
2785       Reloc::pc22(view, object, psymval, addend, address);
2786       break;
2787
2788     case elfcpp::R_SPARC_TLS_DTPOFF32:
2789     case elfcpp::R_SPARC_UA32:
2790       Reloc::ua32(view, object, psymval, addend);
2791       break;
2792
2793     case elfcpp::R_SPARC_PLT64:
2794       Relocate_functions<size, big_endian>::rela64(view, object,
2795                                                    psymval, addend);
2796       break;
2797
2798     case elfcpp::R_SPARC_PLT32:
2799       Relocate_functions<size, big_endian>::rela32(view, object,
2800                                                    psymval, addend);
2801       break;
2802
2803     case elfcpp::R_SPARC_HIPLT22:
2804       Reloc::hi22(view, object, psymval, addend);
2805       break;
2806
2807     case elfcpp::R_SPARC_LOPLT10:
2808       Reloc::lo10(view, object, psymval, addend);
2809       break;
2810
2811     case elfcpp::R_SPARC_PCPLT32:
2812       Reloc::disp32(view, object, psymval, addend, address);
2813       break;
2814
2815     case elfcpp::R_SPARC_PCPLT22:
2816       Reloc::pcplt22(view, object, psymval, addend, address);
2817       break;
2818
2819     case elfcpp::R_SPARC_PCPLT10:
2820       Reloc::lo10(view, object, psymval, addend, address);
2821       break;
2822
2823     case elfcpp::R_SPARC_64:
2824       if (!parameters->options().output_is_position_independent())
2825         {
2826           if (rela.get_r_offset() & 0x7)
2827             {
2828               // The assembler can sometimes emit unaligned relocations
2829               // for dwarf2 cfi directives.
2830               Reloc::ua64(view, object, psymval, addend);
2831             }
2832           else
2833             Relocate_functions<size, big_endian>::rela64(view, object,
2834                                                          psymval, addend);
2835         }
2836       break;
2837
2838     case elfcpp::R_SPARC_OLO10:
2839       {
2840         unsigned int addend2 = rela.get_r_info() & 0xffffffff;
2841         addend2 = ((addend2 >> 8) ^ 0x800000) - 0x800000;
2842         Reloc::olo10(view, object, psymval, addend, addend2);
2843       }
2844       break;
2845
2846     case elfcpp::R_SPARC_HH22:
2847       Reloc::hh22(view, object, psymval, addend);
2848       break;
2849
2850     case elfcpp::R_SPARC_PC_HH22:
2851       Reloc::pc_hh22(view, object, psymval, addend, address);
2852       break;
2853
2854     case elfcpp::R_SPARC_HM10:
2855       Reloc::hm10(view, object, psymval, addend);
2856       break;
2857
2858     case elfcpp::R_SPARC_PC_HM10:
2859       Reloc::pc_hm10(view, object, psymval, addend, address);
2860       break;
2861
2862     case elfcpp::R_SPARC_LM22:
2863       Reloc::hi22(view, object, psymval, addend);
2864       break;
2865
2866     case elfcpp::R_SPARC_PC_LM22:
2867       Reloc::pcplt22(view, object, psymval, addend, address);
2868       break;
2869
2870     case elfcpp::R_SPARC_11:
2871       Reloc::rela32_11(view, object, psymval, addend);
2872       break;
2873
2874     case elfcpp::R_SPARC_10:
2875       Reloc::rela32_10(view, object, psymval, addend);
2876       break;
2877
2878     case elfcpp::R_SPARC_7:
2879       Reloc::rela32_7(view, object, psymval, addend);
2880       break;
2881
2882     case elfcpp::R_SPARC_6:
2883       Reloc::rela32_6(view, object, psymval, addend);
2884       break;
2885
2886     case elfcpp::R_SPARC_5:
2887       Reloc::rela32_5(view, object, psymval, addend);
2888       break;
2889
2890     case elfcpp::R_SPARC_HIX22:
2891       Reloc::hix22(view, object, psymval, addend);
2892       break;
2893
2894     case elfcpp::R_SPARC_LOX10:
2895       Reloc::lox10(view, object, psymval, addend);
2896       break;
2897
2898     case elfcpp::R_SPARC_H44:
2899       Reloc::h44(view, object, psymval, addend);
2900       break;
2901
2902     case elfcpp::R_SPARC_M44:
2903       Reloc::m44(view, object, psymval, addend);
2904       break;
2905
2906     case elfcpp::R_SPARC_L44:
2907       Reloc::l44(view, object, psymval, addend);
2908       break;
2909
2910     case elfcpp::R_SPARC_TLS_DTPOFF64:
2911     case elfcpp::R_SPARC_UA64:
2912       Reloc::ua64(view, object, psymval, addend);
2913       break;
2914
2915     case elfcpp::R_SPARC_UA16:
2916       Reloc::ua16(view, object, psymval, addend);
2917       break;
2918
2919     case elfcpp::R_SPARC_TLS_GD_HI22:
2920     case elfcpp::R_SPARC_TLS_GD_LO10:
2921     case elfcpp::R_SPARC_TLS_GD_ADD:
2922     case elfcpp::R_SPARC_TLS_GD_CALL:
2923     case elfcpp::R_SPARC_TLS_LDM_HI22:
2924     case elfcpp::R_SPARC_TLS_LDM_LO10:
2925     case elfcpp::R_SPARC_TLS_LDM_ADD:
2926     case elfcpp::R_SPARC_TLS_LDM_CALL:
2927     case elfcpp::R_SPARC_TLS_LDO_HIX22:
2928     case elfcpp::R_SPARC_TLS_LDO_LOX10:
2929     case elfcpp::R_SPARC_TLS_LDO_ADD:
2930     case elfcpp::R_SPARC_TLS_IE_HI22:
2931     case elfcpp::R_SPARC_TLS_IE_LO10:
2932     case elfcpp::R_SPARC_TLS_IE_LD:
2933     case elfcpp::R_SPARC_TLS_IE_LDX:
2934     case elfcpp::R_SPARC_TLS_IE_ADD:
2935     case elfcpp::R_SPARC_TLS_LE_HIX22:
2936     case elfcpp::R_SPARC_TLS_LE_LOX10:
2937       this->relocate_tls(relinfo, target, relnum, rela,
2938                          r_type, gsym, psymval, view,
2939                          address, view_size);
2940       break;
2941
2942     case elfcpp::R_SPARC_COPY:
2943     case elfcpp::R_SPARC_GLOB_DAT:
2944     case elfcpp::R_SPARC_JMP_SLOT:
2945     case elfcpp::R_SPARC_RELATIVE:
2946       // These are outstanding tls relocs, which are unexpected when
2947       // linking.
2948     case elfcpp::R_SPARC_TLS_DTPMOD64:
2949     case elfcpp::R_SPARC_TLS_DTPMOD32:
2950     case elfcpp::R_SPARC_TLS_TPOFF64:
2951     case elfcpp::R_SPARC_TLS_TPOFF32:
2952       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2953                              _("unexpected reloc %u in object file"),
2954                              r_type);
2955       break;
2956
2957     default:
2958       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2959                              _("unsupported reloc %u"),
2960                              r_type);
2961       break;
2962     }
2963
2964   return true;
2965 }
2966
2967 // Perform a TLS relocation.
2968
2969 template<int size, bool big_endian>
2970 inline void
2971 Target_sparc<size, big_endian>::Relocate::relocate_tls(
2972                         const Relocate_info<size, big_endian>* relinfo,
2973                         Target_sparc<size, big_endian>* target,
2974                         size_t relnum,
2975                         const elfcpp::Rela<size, big_endian>& rela,
2976                         unsigned int r_type,
2977                         const Sized_symbol<size>* gsym,
2978                         const Symbol_value<size>* psymval,
2979                         unsigned char* view,
2980                         typename elfcpp::Elf_types<size>::Elf_Addr address,
2981                         section_size_type)
2982 {
2983   Output_segment* tls_segment = relinfo->layout->tls_segment();
2984   typedef Sparc_relocate_functions<size, big_endian> Reloc;
2985   const Sized_relobj_file<size, big_endian>* object = relinfo->object;
2986   typedef typename elfcpp::Swap<32, true>::Valtype Insntype;
2987
2988   const elfcpp::Elf_Xword addend = rela.get_r_addend();
2989   typename elfcpp::Elf_types<size>::Elf_Addr value = psymval->value(object, 0);
2990
2991   const bool is_final =
2992     (gsym == NULL
2993      ? !parameters->options().output_is_position_independent()
2994      : gsym->final_value_is_known());
2995   const tls::Tls_optimization optimized_type
2996       = optimize_tls_reloc(is_final, r_type);
2997
2998   switch (r_type)
2999     {
3000     case elfcpp::R_SPARC_TLS_GD_HI22:
3001     case elfcpp::R_SPARC_TLS_GD_LO10:
3002     case elfcpp::R_SPARC_TLS_GD_ADD:
3003     case elfcpp::R_SPARC_TLS_GD_CALL:
3004       if (optimized_type == tls::TLSOPT_TO_LE)
3005         {
3006           Insntype* wv = reinterpret_cast<Insntype*>(view);
3007           Insntype val;
3008
3009           value -= tls_segment->memsz();
3010
3011           switch (r_type)
3012             {
3013             case elfcpp::R_SPARC_TLS_GD_HI22:
3014               // TLS_GD_HI22 --> TLS_LE_HIX22
3015               Reloc::hix22(view, value, addend);
3016               break;
3017
3018             case elfcpp::R_SPARC_TLS_GD_LO10:
3019               // TLS_GD_LO10 --> TLS_LE_LOX10
3020               Reloc::lox10(view, value, addend);
3021               break;
3022
3023             case elfcpp::R_SPARC_TLS_GD_ADD:
3024               // add %reg1, %reg2, %reg3 --> mov %g7, %reg2, %reg3
3025               val = elfcpp::Swap<32, true>::readval(wv);
3026               val = (val & ~0x7c000) | 0x1c000;
3027               elfcpp::Swap<32, true>::writeval(wv, val);
3028               break;
3029             case elfcpp::R_SPARC_TLS_GD_CALL:
3030               // call __tls_get_addr --> nop
3031               elfcpp::Swap<32, true>::writeval(wv, sparc_nop);
3032               break;
3033             }
3034           break;
3035         }
3036       else
3037         {
3038           unsigned int got_type = (optimized_type == tls::TLSOPT_TO_IE
3039                                    ? GOT_TYPE_TLS_OFFSET
3040                                    : GOT_TYPE_TLS_PAIR);
3041           if (gsym != NULL)
3042             {
3043               gold_assert(gsym->has_got_offset(got_type));
3044               value = gsym->got_offset(got_type);
3045             }
3046           else
3047             {
3048               unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3049               gold_assert(object->local_has_got_offset(r_sym, got_type));
3050               value = object->local_got_offset(r_sym, got_type);
3051             }
3052           if (optimized_type == tls::TLSOPT_TO_IE)
3053             {
3054               Insntype* wv = reinterpret_cast<Insntype*>(view);
3055               Insntype val;
3056
3057               switch (r_type)
3058                 {
3059                 case elfcpp::R_SPARC_TLS_GD_HI22:
3060                   // TLS_GD_HI22 --> TLS_IE_HI22
3061                   Reloc::hi22(view, value, addend);
3062                   break;
3063
3064                 case elfcpp::R_SPARC_TLS_GD_LO10:
3065                   // TLS_GD_LO10 --> TLS_IE_LO10
3066                   Reloc::lo10(view, value, addend);
3067                   break;
3068
3069                 case elfcpp::R_SPARC_TLS_GD_ADD:
3070                   // add %reg1, %reg2, %reg3 --> ld [%reg1 + %reg2], %reg3
3071                   val = elfcpp::Swap<32, true>::readval(wv);
3072
3073                   if (size == 64)
3074                     val |= 0xc0580000;
3075                   else
3076                     val |= 0xc0000000;
3077
3078                   elfcpp::Swap<32, true>::writeval(wv, val);
3079                   break;
3080
3081                 case elfcpp::R_SPARC_TLS_GD_CALL:
3082                   // The compiler can put the TLS_GD_ADD instruction
3083                   // into the delay slot of the call.  If so, we need
3084                   // to transpose the two instructions so that the
3085                   // new sequence works properly.
3086                   //
3087                   // The test we use is if the instruction in the
3088                   // delay slot is an add with destination register
3089                   // equal to %o0
3090                   val = elfcpp::Swap<32, true>::readval(wv + 1);
3091                   if ((val & 0x81f80000) == 0x80000000
3092                       && ((val >> 25) & 0x1f) == 0x8)
3093                     {
3094                       if (size == 64)
3095                         val |= 0xc0580000;
3096                       else
3097                         val |= 0xc0000000;
3098
3099                       elfcpp::Swap<32, true>::writeval(wv, val);
3100
3101                       wv += 1;
3102                       this->ignore_gd_add_ = true;
3103                     }
3104
3105                   // call __tls_get_addr --> add %g7, %o0, %o0
3106                   elfcpp::Swap<32, true>::writeval(wv, 0x9001c008);
3107                   break;
3108                 }
3109               break;
3110             }
3111           else if (optimized_type == tls::TLSOPT_NONE)
3112             {
3113               switch (r_type)
3114                 {
3115                 case elfcpp::R_SPARC_TLS_GD_HI22:
3116                   Reloc::hi22(view, value, addend);
3117                   break;
3118                 case elfcpp::R_SPARC_TLS_GD_LO10:
3119                   Reloc::lo10(view, value, addend);
3120                   break;
3121                 case elfcpp::R_SPARC_TLS_GD_ADD:
3122                   break;
3123                 case elfcpp::R_SPARC_TLS_GD_CALL:
3124                   {
3125                     Symbol_value<size> symval;
3126                     elfcpp::Elf_Xword value;
3127                     Symbol* tsym;
3128
3129                     tsym = target->tls_get_addr_sym_;
3130                     gold_assert(tsym);
3131                     value = (target->plt_section()->address() +
3132                              tsym->plt_offset());
3133                     symval.set_output_value(value);
3134                     Reloc::wdisp30(view, object, &symval, addend, address);
3135                   }
3136                   break;
3137                 }
3138               break;
3139             }
3140         }
3141       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3142                              _("unsupported reloc %u"),
3143                              r_type);
3144       break;
3145
3146     case elfcpp::R_SPARC_TLS_LDM_HI22:
3147     case elfcpp::R_SPARC_TLS_LDM_LO10:
3148     case elfcpp::R_SPARC_TLS_LDM_ADD:
3149     case elfcpp::R_SPARC_TLS_LDM_CALL:
3150       if (optimized_type == tls::TLSOPT_TO_LE)
3151         {
3152           Insntype* wv = reinterpret_cast<Insntype*>(view);
3153
3154           switch (r_type)
3155             {
3156             case elfcpp::R_SPARC_TLS_LDM_HI22:
3157             case elfcpp::R_SPARC_TLS_LDM_LO10:
3158             case elfcpp::R_SPARC_TLS_LDM_ADD:
3159               elfcpp::Swap<32, true>::writeval(wv, sparc_nop);
3160               break;
3161
3162             case elfcpp::R_SPARC_TLS_LDM_CALL:
3163               elfcpp::Swap<32, true>::writeval(wv, sparc_mov_g0_o0);
3164               break;
3165             }
3166           break;
3167         }
3168       else if (optimized_type == tls::TLSOPT_NONE)
3169         {
3170           // Relocate the field with the offset of the GOT entry for
3171           // the module index.
3172           unsigned int got_offset;
3173
3174           got_offset = target->got_mod_index_entry(NULL, NULL, NULL);
3175           switch (r_type)
3176             {
3177             case elfcpp::R_SPARC_TLS_LDM_HI22:
3178               Reloc::hi22(view, got_offset, addend);
3179               break;
3180             case elfcpp::R_SPARC_TLS_LDM_LO10:
3181               Reloc::lo10(view, got_offset, addend);
3182               break;
3183             case elfcpp::R_SPARC_TLS_LDM_ADD:
3184               break;
3185             case elfcpp::R_SPARC_TLS_LDM_CALL:
3186               {
3187                 Symbol_value<size> symval;
3188                 elfcpp::Elf_Xword value;
3189                 Symbol* tsym;
3190
3191                 tsym = target->tls_get_addr_sym_;
3192                 gold_assert(tsym);
3193                 value = (target->plt_section()->address() +
3194                          tsym->plt_offset());
3195                 symval.set_output_value(value);
3196                 Reloc::wdisp30(view, object, &symval, addend, address);
3197               }
3198               break;
3199             }
3200           break;
3201         }
3202       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3203                              _("unsupported reloc %u"),
3204                              r_type);
3205       break;
3206
3207       // These relocs can appear in debugging sections, in which case
3208       // we won't see the TLS_LDM relocs.  The local_dynamic_type
3209       // field tells us this.
3210     case elfcpp::R_SPARC_TLS_LDO_HIX22:
3211       if (optimized_type == tls::TLSOPT_TO_LE)
3212         {
3213           value -= tls_segment->memsz();
3214           Reloc::hix22(view, value, addend);
3215         }
3216       else
3217         Reloc::ldo_hix22(view, value, addend);
3218       break;
3219     case elfcpp::R_SPARC_TLS_LDO_LOX10:
3220       if (optimized_type == tls::TLSOPT_TO_LE)
3221         {
3222           value -= tls_segment->memsz();
3223           Reloc::lox10(view, value, addend);
3224         }
3225       else
3226         Reloc::ldo_lox10(view, value, addend);
3227       break;
3228     case elfcpp::R_SPARC_TLS_LDO_ADD:
3229       if (optimized_type == tls::TLSOPT_TO_LE)
3230         {
3231           Insntype* wv = reinterpret_cast<Insntype*>(view);
3232           Insntype val;
3233
3234           // add %reg1, %reg2, %reg3 --> add %g7, %reg2, %reg3
3235           val = elfcpp::Swap<32, true>::readval(wv);
3236           val = (val & ~0x7c000) | 0x1c000;
3237           elfcpp::Swap<32, true>::writeval(wv, val);
3238         }
3239       break;
3240
3241       // When optimizing IE --> LE, the only relocation that is handled
3242       // differently is R_SPARC_TLS_IE_LD, it is rewritten from
3243       // 'ld{,x} [rs1 + rs2], rd' into 'mov rs2, rd' or simply a NOP is
3244       // rs2 and rd are the same.
3245     case elfcpp::R_SPARC_TLS_IE_LD:
3246     case elfcpp::R_SPARC_TLS_IE_LDX:
3247       if (optimized_type == tls::TLSOPT_TO_LE)
3248         {
3249           Insntype* wv = reinterpret_cast<Insntype*>(view);
3250           Insntype val = elfcpp::Swap<32, true>::readval(wv);
3251           Insntype rs2 = val & 0x1f;
3252           Insntype rd = (val >> 25) & 0x1f;
3253
3254           if (rs2 == rd)
3255             val = sparc_nop;
3256           else
3257             val = sparc_mov | (val & 0x3e00001f);
3258
3259           elfcpp::Swap<32, true>::writeval(wv, val);
3260         }
3261       break;
3262
3263     case elfcpp::R_SPARC_TLS_IE_HI22:
3264     case elfcpp::R_SPARC_TLS_IE_LO10:
3265       if (optimized_type == tls::TLSOPT_TO_LE)
3266         {
3267           value -= tls_segment->memsz();
3268           switch (r_type)
3269             {
3270             case elfcpp::R_SPARC_TLS_IE_HI22:
3271               // IE_HI22 --> LE_HIX22
3272               Reloc::hix22(view, value, addend);
3273               break;
3274             case elfcpp::R_SPARC_TLS_IE_LO10:
3275               // IE_LO10 --> LE_LOX10
3276               Reloc::lox10(view, value, addend);
3277               break;
3278             }
3279           break;
3280         }
3281       else if (optimized_type == tls::TLSOPT_NONE)
3282         {
3283           // Relocate the field with the offset of the GOT entry for
3284           // the tp-relative offset of the symbol.
3285           if (gsym != NULL)
3286             {
3287               gold_assert(gsym->has_got_offset(GOT_TYPE_TLS_OFFSET));
3288               value = gsym->got_offset(GOT_TYPE_TLS_OFFSET);
3289             }
3290           else
3291             {
3292               unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3293               gold_assert(object->local_has_got_offset(r_sym,
3294                                                        GOT_TYPE_TLS_OFFSET));
3295               value = object->local_got_offset(r_sym,
3296                                                GOT_TYPE_TLS_OFFSET);
3297             }
3298           switch (r_type)
3299             {
3300             case elfcpp::R_SPARC_TLS_IE_HI22:
3301               Reloc::hi22(view, value, addend);
3302               break;
3303             case elfcpp::R_SPARC_TLS_IE_LO10:
3304               Reloc::lo10(view, value, addend);
3305               break;
3306             }
3307           break;
3308         }
3309       gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3310                              _("unsupported reloc %u"),
3311                              r_type);
3312       break;
3313
3314     case elfcpp::R_SPARC_TLS_IE_ADD:
3315       // This seems to be mainly so that we can find the addition
3316       // instruction if there is one.  There doesn't seem to be any
3317       // actual relocation to apply.
3318       break;
3319
3320     case elfcpp::R_SPARC_TLS_LE_HIX22:
3321       // If we're creating a shared library, a dynamic relocation will
3322       // have been created for this location, so do not apply it now.
3323       if (!parameters->options().shared())
3324         {
3325           value -= tls_segment->memsz();
3326           Reloc::hix22(view, value, addend);
3327         }
3328       break;
3329
3330     case elfcpp::R_SPARC_TLS_LE_LOX10:
3331       // If we're creating a shared library, a dynamic relocation will
3332       // have been created for this location, so do not apply it now.
3333       if (!parameters->options().shared())
3334         {
3335           value -= tls_segment->memsz();
3336           Reloc::lox10(view, value, addend);
3337         }
3338       break;
3339     }
3340 }
3341
3342 // Relocate section data.
3343
3344 template<int size, bool big_endian>
3345 void
3346 Target_sparc<size, big_endian>::relocate_section(
3347                         const Relocate_info<size, big_endian>* relinfo,
3348                         unsigned int sh_type,
3349                         const unsigned char* prelocs,
3350                         size_t reloc_count,
3351                         Output_section* output_section,
3352                         bool needs_special_offset_handling,
3353                         unsigned char* view,
3354                         typename elfcpp::Elf_types<size>::Elf_Addr address,
3355                         section_size_type view_size,
3356                         const Reloc_symbol_changes* reloc_symbol_changes)
3357 {
3358   typedef Target_sparc<size, big_endian> Sparc;
3359   typedef typename Target_sparc<size, big_endian>::Relocate Sparc_relocate;
3360
3361   gold_assert(sh_type == elfcpp::SHT_RELA);
3362
3363   gold::relocate_section<size, big_endian, Sparc, elfcpp::SHT_RELA,
3364     Sparc_relocate>(
3365     relinfo,
3366     this,
3367     prelocs,
3368     reloc_count,
3369     output_section,
3370     needs_special_offset_handling,
3371     view,
3372     address,
3373     view_size,
3374     reloc_symbol_changes);
3375 }
3376
3377 // Return the size of a relocation while scanning during a relocatable
3378 // link.
3379
3380 template<int size, bool big_endian>
3381 unsigned int
3382 Target_sparc<size, big_endian>::Relocatable_size_for_reloc::get_size_for_reloc(
3383     unsigned int,
3384     Relobj*)
3385 {
3386   // We are always SHT_RELA, so we should never get here.
3387   gold_unreachable();
3388   return 0;
3389 }
3390
3391 // Scan the relocs during a relocatable link.
3392
3393 template<int size, bool big_endian>
3394 void
3395 Target_sparc<size, big_endian>::scan_relocatable_relocs(
3396                         Symbol_table* symtab,
3397                         Layout* layout,
3398                         Sized_relobj_file<size, big_endian>* object,
3399                         unsigned int data_shndx,
3400                         unsigned int sh_type,
3401                         const unsigned char* prelocs,
3402                         size_t reloc_count,
3403                         Output_section* output_section,
3404                         bool needs_special_offset_handling,
3405                         size_t local_symbol_count,
3406                         const unsigned char* plocal_symbols,
3407                         Relocatable_relocs* rr)
3408 {
3409   gold_assert(sh_type == elfcpp::SHT_RELA);
3410
3411   typedef gold::Default_scan_relocatable_relocs<elfcpp::SHT_RELA,
3412     Relocatable_size_for_reloc> Scan_relocatable_relocs;
3413
3414   gold::scan_relocatable_relocs<size, big_endian, elfcpp::SHT_RELA,
3415       Scan_relocatable_relocs>(
3416     symtab,
3417     layout,
3418     object,
3419     data_shndx,
3420     prelocs,
3421     reloc_count,
3422     output_section,
3423     needs_special_offset_handling,
3424     local_symbol_count,
3425     plocal_symbols,
3426     rr);
3427 }
3428
3429 // Relocate a section during a relocatable link.
3430
3431 template<int size, bool big_endian>
3432 void
3433 Target_sparc<size, big_endian>::relocate_for_relocatable(
3434     const Relocate_info<size, big_endian>* relinfo,
3435     unsigned int sh_type,
3436     const unsigned char* prelocs,
3437     size_t reloc_count,
3438     Output_section* output_section,
3439     off_t offset_in_output_section,
3440     const Relocatable_relocs* rr,
3441     unsigned char* view,
3442     typename elfcpp::Elf_types<size>::Elf_Addr view_address,
3443     section_size_type view_size,
3444     unsigned char* reloc_view,
3445     section_size_type reloc_view_size)
3446 {
3447   gold_assert(sh_type == elfcpp::SHT_RELA);
3448
3449   gold::relocate_for_relocatable<size, big_endian, elfcpp::SHT_RELA>(
3450     relinfo,
3451     prelocs,
3452     reloc_count,
3453     output_section,
3454     offset_in_output_section,
3455     rr,
3456     view,
3457     view_address,
3458     view_size,
3459     reloc_view,
3460     reloc_view_size);
3461 }
3462
3463 // Return the value to use for a dynamic which requires special
3464 // treatment.  This is how we support equality comparisons of function
3465 // pointers across shared library boundaries, as described in the
3466 // processor specific ABI supplement.
3467
3468 template<int size, bool big_endian>
3469 uint64_t
3470 Target_sparc<size, big_endian>::do_dynsym_value(const Symbol* gsym) const
3471 {
3472   gold_assert(gsym->is_from_dynobj() && gsym->has_plt_offset());
3473   return this->plt_section()->address() + gsym->plt_offset();
3474 }
3475
3476 // The selector for sparc object files.
3477
3478 template<int size, bool big_endian>
3479 class Target_selector_sparc : public Target_selector
3480 {
3481 public:
3482   Target_selector_sparc()
3483     : Target_selector(elfcpp::EM_NONE, size, big_endian,
3484                       (size == 64 ? "elf64-sparc" : "elf32-sparc"),
3485                       (size == 64 ? "elf64_sparc" : "elf32_sparc"))
3486   { }
3487
3488   Target* do_recognize(int machine, int, int)
3489   {
3490     switch (size)
3491       {
3492       case 64:
3493         if (machine != elfcpp::EM_SPARCV9)
3494           return NULL;
3495         break;
3496
3497       case 32:
3498         if (machine != elfcpp::EM_SPARC
3499             && machine != elfcpp::EM_SPARC32PLUS)
3500           return NULL;
3501         break;
3502
3503       default:
3504         return NULL;
3505       }
3506
3507     return this->instantiate_target();
3508   }
3509
3510   Target* do_instantiate_target()
3511   { return new Target_sparc<size, big_endian>(); }
3512 };
3513
3514 Target_selector_sparc<32, true> target_selector_sparc32;
3515 Target_selector_sparc<64, true> target_selector_sparc64;
3516
3517 } // End anonymous namespace.