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