gold/sparc.cc

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