daily update
[binutils.git] / gold / sparc.cc
blobaa8bbbd912e2d765cdf8402a7c2ac7a22ca6b67e
1 // sparc.cc -- sparc target support for gold.
3 // Copyright 2008 Free Software Foundation, Inc.
4 // Written by David S. Miller <davem@davemloft.net>.
6 // This file is part of gold.
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.
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.
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.
23 #include "gold.h"
25 #include <cstdlib>
26 #include <cstdio>
27 #include <cstring>
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"
44 namespace
47 using namespace gold;
49 template<int size, bool big_endian>
50 class Output_data_plt_sparc;
52 template<int size, bool big_endian>
53 class Target_sparc : public Sized_target<size, big_endian>
55 public:
56 typedef Output_data_reloc<elfcpp::SHT_RELA, true, size, big_endian> Reloc_section;
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)
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*);
84 // Return the value to use for a dynamic which requires special
85 // treatment.
86 uint64_t
87 do_dynsym_value(const Symbol*) const;
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);
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*);
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
135 // XXX Really need to support this better...
136 if (sym->type() == elfcpp::STT_SPARC_REGISTER)
137 return 1;
139 return strcmp(sym->name(), "___tls_get_addr") == 0;
142 // Return the size of the GOT section.
143 section_size_type
144 got_size()
146 gold_assert(this->got_ != NULL);
147 return this->got_->data_size();
150 private:
152 // The class which scans relocations.
153 class Scan
155 public:
156 Scan()
157 : issued_non_pic_error_(false)
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);
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);
178 private:
179 static void
180 unsupported_reloc_local(Sized_relobj<size, big_endian>*,
181 unsigned int r_type);
183 static void
184 unsupported_reloc_global(Sized_relobj<size, big_endian>*,
185 unsigned int r_type, Symbol*);
187 static void
188 generate_tls_call(Symbol_table* symtab, Layout* layout,
189 Target_sparc* target);
191 void
192 check_non_pic(Relobj*, unsigned int r_type);
194 // Whether we have issued an error about a non-PIC compilation.
195 bool issued_non_pic_error_;
198 // The class which implements relocation.
199 class Relocate
201 public:
202 Relocate()
203 : ignore_gd_add_(false)
206 ~Relocate()
208 if (this->ignore_gd_add_)
210 // FIXME: This needs to specify the location somehow.
211 gold_error(_("missing expected TLS relocation"));
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);
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);
237 // Ignore the next relocation which should be R_SPARC_TLS_GD_ADD
238 bool ignore_gd_add_;
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
245 public:
246 unsigned int
247 get_size_for_reloc(unsigned int, Relobj*);
250 // Get the GOT section, creating it if necessary.
251 Output_data_got<size, big_endian>*
252 got_section(Symbol_table*, Layout*);
254 // Create a PLT entry for a global symbol.
255 void
256 make_plt_entry(Symbol_table*, Layout*, Symbol*);
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);
263 // Return the gsym for "__tls_get_addr". Cache if not already
264 // cached.
265 Symbol*
266 tls_get_addr_sym(Symbol_table* symtab)
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_;
274 // Get the PLT section.
275 const Output_data_plt_sparc<size, big_endian>*
276 plt_section() const
278 gold_assert(this->plt_ != NULL);
279 return this->plt_;
282 // Get the dynamic reloc section, creating it if necessary.
283 Reloc_section*
284 rela_dyn_section(Layout*);
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)
292 return (!parameters->options().shared()
293 && gsym->is_from_dynobj()
294 && gsym->type() != elfcpp::STT_FUNC);
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)
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));
309 // Information about this specific target which we pass to the
310 // general Target structure.
311 static Target::Target_info sparc_info;
313 // The types of GOT entries needed for this platform.
314 enum Got_type
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
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_;
337 template<>
338 Target::Target_info Target_sparc<32, true>::sparc_info =
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)
354 template<>
355 Target::Target_info Target_sparc<64, true>::sparc_info =
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)
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
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)
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);
391 val &= ~dst_mask;
392 reloc &= dst_mask;
394 elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
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)
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);
413 val &= ~dst_mask;
414 reloc &= dst_mask;
416 elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
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)
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);
435 val &= ~dst_mask;
436 reloc &= dst_mask;
438 elfcpp::Swap_unaligned<valsize, big_endian>::writeval(wv, val | reloc);
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)
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);
459 val &= ~dst_mask;
460 reloc &= dst_mask;
462 elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
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)
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);
478 elfcpp::Swap_unaligned<valsize, big_endian>::writeval(wv, reloc);
481 typedef Sparc_relocate_functions<size, big_endian> This;
482 typedef Sparc_relocate_functions<size, true> This_insn;
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)
493 This_insn::template pcrela<32>(view, 2, 0x3fffffff, object,
494 psymval, addend, address);
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)
505 This_insn::template pcrela<32>(view, 2, 0x003fffff, object,
506 psymval, addend, address);
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)
517 This_insn::template pcrela<32>(view, 2, 0x0007ffff, object,
518 psymval, addend, address);
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)
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);
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));
541 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
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)
552 This_insn::template pcrela<32>(view, 10, 0x003fffff, object,
553 psymval, addend, address);
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)
564 This_insn::template pcrela<32>(view, 0, 0x000003ff, object,
565 psymval, addend, address);
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)
574 This_insn::template rela<32>(view, 10, 0x003fffff, value, addend);
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)
584 This_insn::template rela<32>(view, 10, 0x003fffff, object, psymval, addend);
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)
595 This_insn::template pcrela<32>(view, 10, 0x003fffff, object,
596 psymval, addend, address);
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)
605 This_insn::template rela<32>(view, 0, 0x000003ff, value, addend);
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)
615 This_insn::template rela<32>(view, 0, 0x000003ff, object, psymval, addend);
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)
626 This_insn::template pcrela<32>(view, 0, 0x000003ff, object,
627 psymval, addend, address);
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)
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);
643 val &= ~0x1fff;
644 reloc &= 0x3ff;
645 reloc += addend2;
646 reloc &= 0x1fff;
648 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
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)
658 This_insn::template rela<32>(view, 0, 0x003fffff, object, psymval, addend);
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)
667 This_insn::template rela<32>(view, 0, 0x00001fff, value, addend);
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)
677 This_insn::template rela<32>(view, 0, 0x00001fff, object, psymval, addend);
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)
687 This::template rela_ua<16>(view, 0, 0xffff, object, psymval, addend);
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)
697 This::template rela_ua<32>(view, 0, 0xffffffff, object, psymval, addend);
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)
707 This::template rela_ua<64>(view, 0, ~(elfcpp::Elf_Xword) 0,
708 object, psymval, addend);
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)
719 This::template pcrela_unaligned<8>(view, object, psymval,
720 addend, address);
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)
731 This::template pcrela_unaligned<16>(view, object, psymval,
732 addend, address);
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)
743 This::template pcrela_unaligned<32>(view, object, psymval,
744 addend, address);
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)
755 This::template pcrela_unaligned<64>(view, object, psymval,
756 addend, address);
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)
766 This_insn::template rela<32>(view, 22, 0x003fffff, object, psymval, addend);
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)
776 This_insn::template rela<32>(view, 12, 0x000003ff, object, psymval, addend);
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)
786 This_insn::template rela<32>(view, 0, 0x00000fff, object, psymval, addend);
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)
796 This_insn::template rela<32>(view, 42, 0x003fffff, object, psymval, addend);
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)
807 This_insn::template pcrela<32>(view, 42, 0x003fffff, object,
808 psymval, addend, address);
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)
818 This_insn::template rela<32>(view, 32, 0x000003ff, object, psymval, addend);
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)
829 This_insn::template pcrela<32>(view, 32, 0x000003ff, object,
830 psymval, addend, address);
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)
840 This_insn::template rela<32>(view, 0, 0x000007ff, object, psymval, addend);
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)
850 This_insn::template rela<32>(view, 0, 0x000003ff, object, psymval, addend);
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)
860 This_insn::template rela<32>(view, 0, 0x0000007f, object, psymval, addend);
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)
870 This_insn::template rela<32>(view, 0, 0x0000003f, object, psymval, addend);
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)
880 This_insn::template rela<32>(view, 0, 0x0000001f, object, psymval, addend);
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)
889 This_insn::hi22(view, value, addend);
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)
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);
903 val &= ~0x1fff;
904 reloc &= 0x3ff;
906 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
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)
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);
920 val &= ~0x3fffff;
922 reloc ^= ~(Valtype)0;
923 reloc >>= 10;
925 reloc &= 0x3fffff;
927 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
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)
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);
942 val &= ~0x3fffff;
944 reloc ^= ~(Valtype)0;
945 reloc >>= 10;
947 reloc &= 0x3fffff;
949 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
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)
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);
964 val &= ~0x1fff;
965 reloc &= 0x3ff;
966 reloc |= 0x1c00;
968 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
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)
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);
983 val &= ~0x1fff;
984 reloc &= 0x3ff;
985 reloc |= 0x1c00;
987 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
991 // Get the GOT section, creating it if necessary.
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)
998 if (this->got_ == NULL)
1000 gold_assert(symtab != NULL && layout != NULL);
1002 this->got_ = new Output_data_got<size, big_endian>();
1004 Output_section* os;
1005 os = layout->add_output_section_data(".got", elfcpp::SHT_PROGBITS,
1006 (elfcpp::SHF_ALLOC
1007 | elfcpp::SHF_WRITE),
1008 this->got_);
1009 os->set_is_relro();
1011 // Define _GLOBAL_OFFSET_TABLE_ at the start of the .got section.
1012 symtab->define_in_output_data("_GLOBAL_OFFSET_TABLE_", NULL,
1013 this->got_,
1014 0, 0, elfcpp::STT_OBJECT,
1015 elfcpp::STB_LOCAL,
1016 elfcpp::STV_HIDDEN, 0,
1017 false, false);
1020 return this->got_;
1023 // Get the dynamic reloc section, creating it if necessary.
1025 template<int size, bool big_endian>
1026 typename Target_sparc<size, big_endian>::Reloc_section*
1027 Target_sparc<size, big_endian>::rela_dyn_section(Layout* layout)
1029 if (this->rela_dyn_ == NULL)
1031 gold_assert(layout != NULL);
1032 this->rela_dyn_ = new Reloc_section(parameters->options().combreloc());
1033 layout->add_output_section_data(".rela.dyn", elfcpp::SHT_RELA,
1034 elfcpp::SHF_ALLOC, this->rela_dyn_);
1036 return this->rela_dyn_;
1039 // A class to handle the PLT data.
1041 template<int size, bool big_endian>
1042 class Output_data_plt_sparc : public Output_section_data
1044 public:
1045 typedef Output_data_reloc<elfcpp::SHT_RELA, true,
1046 size, big_endian> Reloc_section;
1048 Output_data_plt_sparc(Layout*);
1050 // Add an entry to the PLT.
1051 void add_entry(Symbol* gsym);
1053 // Return the .rela.plt section data.
1054 const Reloc_section* rel_plt() const
1056 return this->rel_;
1059 protected:
1060 void do_adjust_output_section(Output_section* os);
1062 // Write to a map file.
1063 void
1064 do_print_to_mapfile(Mapfile* mapfile) const
1065 { mapfile->print_output_data(this, _("** PLT")); }
1067 private:
1068 // The size of an entry in the PLT.
1069 static const int base_plt_entry_size = (size == 32 ? 12 : 32);
1071 static const unsigned int plt_entries_per_block = 160;
1072 static const unsigned int plt_insn_chunk_size = 24;
1073 static const unsigned int plt_pointer_chunk_size = 8;
1074 static const unsigned int plt_block_size =
1075 (plt_entries_per_block
1076 * (plt_insn_chunk_size + plt_pointer_chunk_size));
1078 // Set the final size.
1079 void
1080 set_final_data_size()
1082 unsigned int full_count = this->count_ + 4;
1083 unsigned int extra = (size == 32 ? 4 : 0);
1085 if (size == 32 || full_count < 32768)
1086 this->set_data_size((full_count * base_plt_entry_size) + extra);
1087 else
1089 unsigned int ext_cnt = full_count - 32768;
1091 this->set_data_size((32768 * base_plt_entry_size)
1092 + (ext_cnt
1093 * (plt_insn_chunk_size
1094 + plt_pointer_chunk_size)));
1098 // Write out the PLT data.
1099 void
1100 do_write(Output_file*);
1102 // The reloc section.
1103 Reloc_section* rel_;
1104 // The number of PLT entries.
1105 unsigned int count_;
1108 // Define the constants as required by C++ standard.
1110 template<int size, bool big_endian>
1111 const int Output_data_plt_sparc<size, big_endian>::base_plt_entry_size;
1113 template<int size, bool big_endian>
1114 const unsigned int
1115 Output_data_plt_sparc<size, big_endian>::plt_entries_per_block;
1117 template<int size, bool big_endian>
1118 const unsigned int Output_data_plt_sparc<size, big_endian>::plt_insn_chunk_size;
1120 template<int size, bool big_endian>
1121 const unsigned int
1122 Output_data_plt_sparc<size, big_endian>::plt_pointer_chunk_size;
1124 template<int size, bool big_endian>
1125 const unsigned int Output_data_plt_sparc<size, big_endian>::plt_block_size;
1127 // Create the PLT section. The ordinary .got section is an argument,
1128 // since we need to refer to the start.
1130 template<int size, bool big_endian>
1131 Output_data_plt_sparc<size, big_endian>::Output_data_plt_sparc(Layout* layout)
1132 : Output_section_data(size == 32 ? 4 : 8), count_(0)
1134 this->rel_ = new Reloc_section(false);
1135 layout->add_output_section_data(".rela.plt", elfcpp::SHT_RELA,
1136 elfcpp::SHF_ALLOC, this->rel_);
1139 template<int size, bool big_endian>
1140 void
1141 Output_data_plt_sparc<size, big_endian>::do_adjust_output_section(Output_section* os)
1143 os->set_entsize(0);
1146 // Add an entry to the PLT.
1148 template<int size, bool big_endian>
1149 void
1150 Output_data_plt_sparc<size, big_endian>::add_entry(Symbol* gsym)
1152 gold_assert(!gsym->has_plt_offset());
1154 unsigned int index = this->count_ + 4;
1155 section_offset_type plt_offset;
1157 if (size == 32 || index < 32768)
1158 plt_offset = index * base_plt_entry_size;
1159 else
1161 unsigned int ext_index = index - 32768;
1163 plt_offset = (32768 * base_plt_entry_size)
1164 + ((ext_index / plt_entries_per_block)
1165 * plt_block_size)
1166 + ((ext_index % plt_entries_per_block)
1167 * plt_insn_chunk_size);
1170 gsym->set_plt_offset(plt_offset);
1172 ++this->count_;
1174 // Every PLT entry needs a reloc.
1175 gsym->set_needs_dynsym_entry();
1176 this->rel_->add_global(gsym, elfcpp::R_SPARC_JMP_SLOT, this,
1177 plt_offset, 0);
1179 // Note that we don't need to save the symbol. The contents of the
1180 // PLT are independent of which symbols are used. The symbols only
1181 // appear in the relocations.
1184 static const unsigned int sparc_nop = 0x01000000;
1185 static const unsigned int sparc_sethi_g1 = 0x03000000;
1186 static const unsigned int sparc_branch_always = 0x30800000;
1187 static const unsigned int sparc_branch_always_pt = 0x30680000;
1188 static const unsigned int sparc_mov = 0x80100000;
1189 static const unsigned int sparc_mov_g0_o0 = 0x90100000;
1190 static const unsigned int sparc_mov_o7_g5 = 0x8a10000f;
1191 static const unsigned int sparc_call_plus_8 = 0x40000002;
1192 static const unsigned int sparc_ldx_o7_imm_g1 = 0xc25be000;
1193 static const unsigned int sparc_jmpl_o7_g1_g1 = 0x83c3c001;
1194 static const unsigned int sparc_mov_g5_o7 = 0x9e100005;
1196 // Write out the PLT.
1198 template<int size, bool big_endian>
1199 void
1200 Output_data_plt_sparc<size, big_endian>::do_write(Output_file* of)
1202 const off_t offset = this->offset();
1203 const section_size_type oview_size =
1204 convert_to_section_size_type(this->data_size());
1205 unsigned char* const oview = of->get_output_view(offset, oview_size);
1206 unsigned char* pov = oview;
1208 memset(pov, 0, base_plt_entry_size * 4);
1209 pov += base_plt_entry_size * 4;
1211 unsigned int plt_offset = base_plt_entry_size * 4;
1212 const unsigned int count = this->count_;
1214 if (size == 64)
1216 unsigned int limit;
1218 limit = (count > 32768 ? 32768 : count);
1220 for (unsigned int i = 0; i < limit; ++i)
1222 elfcpp::Swap<32, true>::writeval(pov + 0x00,
1223 sparc_sethi_g1 + plt_offset);
1224 elfcpp::Swap<32, true>::writeval(pov + 0x04,
1225 sparc_branch_always_pt +
1226 (((base_plt_entry_size -
1227 (plt_offset + 4)) >> 2) &
1228 0x7ffff));
1229 elfcpp::Swap<32, true>::writeval(pov + 0x08, sparc_nop);
1230 elfcpp::Swap<32, true>::writeval(pov + 0x0c, sparc_nop);
1231 elfcpp::Swap<32, true>::writeval(pov + 0x10, sparc_nop);
1232 elfcpp::Swap<32, true>::writeval(pov + 0x14, sparc_nop);
1233 elfcpp::Swap<32, true>::writeval(pov + 0x18, sparc_nop);
1234 elfcpp::Swap<32, true>::writeval(pov + 0x1c, sparc_nop);
1236 pov += base_plt_entry_size;
1237 plt_offset += base_plt_entry_size;
1240 if (count > 32768)
1242 unsigned int ext_cnt = count - 32768;
1243 unsigned int blks = ext_cnt / plt_entries_per_block;
1245 for (unsigned int i = 0; i < blks; ++i)
1247 unsigned int data_off = (plt_entries_per_block
1248 * plt_insn_chunk_size) - 4;
1250 for (unsigned int j = 0; j < plt_entries_per_block; ++j)
1252 elfcpp::Swap<32, true>::writeval(pov + 0x00,
1253 sparc_mov_o7_g5);
1254 elfcpp::Swap<32, true>::writeval(pov + 0x04,
1255 sparc_call_plus_8);
1256 elfcpp::Swap<32, true>::writeval(pov + 0x08,
1257 sparc_nop);
1258 elfcpp::Swap<32, true>::writeval(pov + 0x0c,
1259 sparc_ldx_o7_imm_g1 +
1260 (data_off & 0x1fff));
1261 elfcpp::Swap<32, true>::writeval(pov + 0x10,
1262 sparc_jmpl_o7_g1_g1);
1263 elfcpp::Swap<32, true>::writeval(pov + 0x14,
1264 sparc_mov_g5_o7);
1266 elfcpp::Swap<64, big_endian>::writeval(
1267 pov + 0x4 + data_off,
1268 (elfcpp::Elf_Xword) (oview - (pov + 0x04)));
1270 pov += plt_insn_chunk_size;
1271 data_off -= 16;
1275 unsigned int sub_blk_cnt = ext_cnt % plt_entries_per_block;
1276 for (unsigned int i = 0; i < sub_blk_cnt; ++i)
1278 unsigned int data_off = (sub_blk_cnt
1279 * plt_insn_chunk_size) - 4;
1281 for (unsigned int j = 0; j < plt_entries_per_block; ++j)
1283 elfcpp::Swap<32, true>::writeval(pov + 0x00,
1284 sparc_mov_o7_g5);
1285 elfcpp::Swap<32, true>::writeval(pov + 0x04,
1286 sparc_call_plus_8);
1287 elfcpp::Swap<32, true>::writeval(pov + 0x08,
1288 sparc_nop);
1289 elfcpp::Swap<32, true>::writeval(pov + 0x0c,
1290 sparc_ldx_o7_imm_g1 +
1291 (data_off & 0x1fff));
1292 elfcpp::Swap<32, true>::writeval(pov + 0x10,
1293 sparc_jmpl_o7_g1_g1);
1294 elfcpp::Swap<32, true>::writeval(pov + 0x14,
1295 sparc_mov_g5_o7);
1297 elfcpp::Swap<64, big_endian>::writeval(
1298 pov + 0x4 + data_off,
1299 (elfcpp::Elf_Xword) (oview - (pov + 0x04)));
1301 pov += plt_insn_chunk_size;
1302 data_off -= 16;
1307 else
1309 for (unsigned int i = 0; i < count; ++i)
1311 elfcpp::Swap<32, true>::writeval(pov + 0x00,
1312 sparc_sethi_g1 + plt_offset);
1313 elfcpp::Swap<32, true>::writeval(pov + 0x04,
1314 sparc_branch_always +
1315 (((- (plt_offset + 4)) >> 2) &
1316 0x003fffff));
1317 elfcpp::Swap<32, true>::writeval(pov + 0x08, sparc_nop);
1319 pov += base_plt_entry_size;
1320 plt_offset += base_plt_entry_size;
1323 elfcpp::Swap<32, true>::writeval(pov, sparc_nop);
1324 pov += 4;
1327 gold_assert(static_cast<section_size_type>(pov - oview) == oview_size);
1329 of->write_output_view(offset, oview_size, oview);
1332 // Create a PLT entry for a global symbol.
1334 template<int size, bool big_endian>
1335 void
1336 Target_sparc<size, big_endian>::make_plt_entry(Symbol_table* symtab,
1337 Layout* layout,
1338 Symbol* gsym)
1340 if (gsym->has_plt_offset())
1341 return;
1343 if (this->plt_ == NULL)
1345 // Create the GOT sections first.
1346 this->got_section(symtab, layout);
1348 this->plt_ = new Output_data_plt_sparc<size, big_endian>(layout);
1349 layout->add_output_section_data(".plt", elfcpp::SHT_PROGBITS,
1350 (elfcpp::SHF_ALLOC
1351 | elfcpp::SHF_EXECINSTR
1352 | elfcpp::SHF_WRITE),
1353 this->plt_);
1355 // Define _PROCEDURE_LINKAGE_TABLE_ at the start of the .plt section.
1356 symtab->define_in_output_data("_PROCEDURE_LINKAGE_TABLE_", NULL,
1357 this->plt_,
1358 0, 0, elfcpp::STT_OBJECT,
1359 elfcpp::STB_LOCAL,
1360 elfcpp::STV_HIDDEN, 0,
1361 false, false);
1364 this->plt_->add_entry(gsym);
1367 // Create a GOT entry for the TLS module index.
1369 template<int size, bool big_endian>
1370 unsigned int
1371 Target_sparc<size, big_endian>::got_mod_index_entry(Symbol_table* symtab,
1372 Layout* layout,
1373 Sized_relobj<size, big_endian>* object)
1375 if (this->got_mod_index_offset_ == -1U)
1377 gold_assert(symtab != NULL && layout != NULL && object != NULL);
1378 Reloc_section* rela_dyn = this->rela_dyn_section(layout);
1379 Output_data_got<size, big_endian>* got;
1380 unsigned int got_offset;
1382 got = this->got_section(symtab, layout);
1383 got_offset = got->add_constant(0);
1384 rela_dyn->add_local(object, 0,
1385 (size == 64 ?
1386 elfcpp::R_SPARC_TLS_DTPMOD64 :
1387 elfcpp::R_SPARC_TLS_DTPMOD32), got,
1388 got_offset, 0);
1389 got->add_constant(0);
1390 this->got_mod_index_offset_ = got_offset;
1392 return this->got_mod_index_offset_;
1395 // Optimize the TLS relocation type based on what we know about the
1396 // symbol. IS_FINAL is true if the final address of this symbol is
1397 // known at link time.
1399 static tls::Tls_optimization
1400 optimize_tls_reloc(bool is_final, int r_type)
1402 // If we are generating a shared library, then we can't do anything
1403 // in the linker.
1404 if (parameters->options().shared())
1405 return tls::TLSOPT_NONE;
1407 switch (r_type)
1409 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1410 case elfcpp::R_SPARC_TLS_GD_LO10:
1411 case elfcpp::R_SPARC_TLS_GD_ADD:
1412 case elfcpp::R_SPARC_TLS_GD_CALL:
1413 // These are General-Dynamic which permits fully general TLS
1414 // access. Since we know that we are generating an executable,
1415 // we can convert this to Initial-Exec. If we also know that
1416 // this is a local symbol, we can further switch to Local-Exec.
1417 if (is_final)
1418 return tls::TLSOPT_TO_LE;
1419 return tls::TLSOPT_TO_IE;
1421 case elfcpp::R_SPARC_TLS_LDM_HI22: // Local-dynamic
1422 case elfcpp::R_SPARC_TLS_LDM_LO10:
1423 case elfcpp::R_SPARC_TLS_LDM_ADD:
1424 case elfcpp::R_SPARC_TLS_LDM_CALL:
1425 // This is Local-Dynamic, which refers to a local symbol in the
1426 // dynamic TLS block. Since we know that we generating an
1427 // executable, we can switch to Local-Exec.
1428 return tls::TLSOPT_TO_LE;
1430 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
1431 case elfcpp::R_SPARC_TLS_LDO_LOX10:
1432 case elfcpp::R_SPARC_TLS_LDO_ADD:
1433 // Another type of Local-Dynamic relocation.
1434 return tls::TLSOPT_TO_LE;
1436 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
1437 case elfcpp::R_SPARC_TLS_IE_LO10:
1438 case elfcpp::R_SPARC_TLS_IE_LD:
1439 case elfcpp::R_SPARC_TLS_IE_LDX:
1440 // These are Initial-Exec relocs which get the thread offset
1441 // from the GOT. If we know that we are linking against the
1442 // local symbol, we can switch to Local-Exec, which links the
1443 // thread offset into the instruction.
1444 if (is_final)
1445 return tls::TLSOPT_TO_LE;
1446 return tls::TLSOPT_NONE;
1448 case elfcpp::R_SPARC_TLS_LE_HIX22: // Local-exec
1449 case elfcpp::R_SPARC_TLS_LE_LOX10:
1450 // When we already have Local-Exec, there is nothing further we
1451 // can do.
1452 return tls::TLSOPT_NONE;
1454 default:
1455 gold_unreachable();
1459 // Generate a PLT entry slot for a call to __tls_get_addr
1460 template<int size, bool big_endian>
1461 void
1462 Target_sparc<size, big_endian>::Scan::generate_tls_call(Symbol_table* symtab,
1463 Layout* layout,
1464 Target_sparc<size, big_endian>* target)
1466 Symbol* gsym = target->tls_get_addr_sym(symtab);
1468 target->make_plt_entry(symtab, layout, gsym);
1471 // Report an unsupported relocation against a local symbol.
1473 template<int size, bool big_endian>
1474 void
1475 Target_sparc<size, big_endian>::Scan::unsupported_reloc_local(
1476 Sized_relobj<size, big_endian>* object,
1477 unsigned int r_type)
1479 gold_error(_("%s: unsupported reloc %u against local symbol"),
1480 object->name().c_str(), r_type);
1483 // We are about to emit a dynamic relocation of type R_TYPE. If the
1484 // dynamic linker does not support it, issue an error.
1486 template<int size, bool big_endian>
1487 void
1488 Target_sparc<size, big_endian>::Scan::check_non_pic(Relobj* object, unsigned int r_type)
1490 gold_assert(r_type != elfcpp::R_SPARC_NONE);
1492 if (size == 64)
1494 switch (r_type)
1496 // These are the relocation types supported by glibc for sparc 64-bit.
1497 case elfcpp::R_SPARC_RELATIVE:
1498 case elfcpp::R_SPARC_COPY:
1499 case elfcpp::R_SPARC_64:
1500 case elfcpp::R_SPARC_GLOB_DAT:
1501 case elfcpp::R_SPARC_JMP_SLOT:
1502 case elfcpp::R_SPARC_TLS_DTPMOD64:
1503 case elfcpp::R_SPARC_TLS_DTPOFF64:
1504 case elfcpp::R_SPARC_TLS_TPOFF64:
1505 case elfcpp::R_SPARC_TLS_LE_HIX22:
1506 case elfcpp::R_SPARC_TLS_LE_LOX10:
1507 case elfcpp::R_SPARC_8:
1508 case elfcpp::R_SPARC_16:
1509 case elfcpp::R_SPARC_DISP8:
1510 case elfcpp::R_SPARC_DISP16:
1511 case elfcpp::R_SPARC_DISP32:
1512 case elfcpp::R_SPARC_WDISP30:
1513 case elfcpp::R_SPARC_LO10:
1514 case elfcpp::R_SPARC_HI22:
1515 case elfcpp::R_SPARC_OLO10:
1516 case elfcpp::R_SPARC_H44:
1517 case elfcpp::R_SPARC_M44:
1518 case elfcpp::R_SPARC_L44:
1519 case elfcpp::R_SPARC_HH22:
1520 case elfcpp::R_SPARC_HM10:
1521 case elfcpp::R_SPARC_LM22:
1522 case elfcpp::R_SPARC_UA16:
1523 case elfcpp::R_SPARC_UA32:
1524 case elfcpp::R_SPARC_UA64:
1525 return;
1527 default:
1528 break;
1531 else
1533 switch (r_type)
1535 // These are the relocation types supported by glibc for sparc 32-bit.
1536 case elfcpp::R_SPARC_RELATIVE:
1537 case elfcpp::R_SPARC_COPY:
1538 case elfcpp::R_SPARC_GLOB_DAT:
1539 case elfcpp::R_SPARC_32:
1540 case elfcpp::R_SPARC_JMP_SLOT:
1541 case elfcpp::R_SPARC_TLS_DTPMOD32:
1542 case elfcpp::R_SPARC_TLS_DTPOFF32:
1543 case elfcpp::R_SPARC_TLS_TPOFF32:
1544 case elfcpp::R_SPARC_TLS_LE_HIX22:
1545 case elfcpp::R_SPARC_TLS_LE_LOX10:
1546 case elfcpp::R_SPARC_8:
1547 case elfcpp::R_SPARC_16:
1548 case elfcpp::R_SPARC_DISP8:
1549 case elfcpp::R_SPARC_DISP16:
1550 case elfcpp::R_SPARC_DISP32:
1551 case elfcpp::R_SPARC_LO10:
1552 case elfcpp::R_SPARC_WDISP30:
1553 case elfcpp::R_SPARC_HI22:
1554 case elfcpp::R_SPARC_UA16:
1555 case elfcpp::R_SPARC_UA32:
1556 return;
1558 default:
1559 break;
1563 // This prevents us from issuing more than one error per reloc
1564 // section. But we can still wind up issuing more than one
1565 // error per object file.
1566 if (this->issued_non_pic_error_)
1567 return;
1568 object->error(_("requires unsupported dynamic reloc; "
1569 "recompile with -fPIC"));
1570 this->issued_non_pic_error_ = true;
1571 return;
1574 // Scan a relocation for a local symbol.
1576 template<int size, bool big_endian>
1577 inline void
1578 Target_sparc<size, big_endian>::Scan::local(
1579 const General_options&,
1580 Symbol_table* symtab,
1581 Layout* layout,
1582 Target_sparc<size, big_endian>* target,
1583 Sized_relobj<size, big_endian>* object,
1584 unsigned int data_shndx,
1585 Output_section* output_section,
1586 const elfcpp::Rela<size, big_endian>& reloc,
1587 unsigned int r_type,
1588 const elfcpp::Sym<size, big_endian>& lsym)
1590 unsigned int orig_r_type = r_type;
1592 r_type &= 0xff;
1593 switch (r_type)
1595 case elfcpp::R_SPARC_NONE:
1596 case elfcpp::R_SPARC_REGISTER:
1597 case elfcpp::R_SPARC_GNU_VTINHERIT:
1598 case elfcpp::R_SPARC_GNU_VTENTRY:
1599 break;
1601 case elfcpp::R_SPARC_64:
1602 case elfcpp::R_SPARC_32:
1603 // If building a shared library (or a position-independent
1604 // executable), we need to create a dynamic relocation for
1605 // this location. The relocation applied at link time will
1606 // apply the link-time value, so we flag the location with
1607 // an R_SPARC_RELATIVE relocation so the dynamic loader can
1608 // relocate it easily.
1609 if (parameters->options().output_is_position_independent())
1611 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1612 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1613 rela_dyn->add_local_relative(object, r_sym, elfcpp::R_SPARC_RELATIVE,
1614 output_section, data_shndx,
1615 reloc.get_r_offset(),
1616 reloc.get_r_addend());
1618 break;
1620 case elfcpp::R_SPARC_HIX22:
1621 case elfcpp::R_SPARC_LOX10:
1622 case elfcpp::R_SPARC_H44:
1623 case elfcpp::R_SPARC_M44:
1624 case elfcpp::R_SPARC_L44:
1625 case elfcpp::R_SPARC_HH22:
1626 case elfcpp::R_SPARC_HM10:
1627 case elfcpp::R_SPARC_LM22:
1628 case elfcpp::R_SPARC_UA64:
1629 case elfcpp::R_SPARC_UA32:
1630 case elfcpp::R_SPARC_UA16:
1631 case elfcpp::R_SPARC_HI22:
1632 case elfcpp::R_SPARC_LO10:
1633 case elfcpp::R_SPARC_OLO10:
1634 case elfcpp::R_SPARC_16:
1635 case elfcpp::R_SPARC_11:
1636 case elfcpp::R_SPARC_10:
1637 case elfcpp::R_SPARC_8:
1638 case elfcpp::R_SPARC_7:
1639 case elfcpp::R_SPARC_6:
1640 case elfcpp::R_SPARC_5:
1641 // If building a shared library (or a position-independent
1642 // executable), we need to create a dynamic relocation for
1643 // this location.
1644 if (parameters->options().output_is_position_independent())
1646 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1648 check_non_pic(object, r_type);
1649 if (lsym.get_st_type() != elfcpp::STT_SECTION)
1651 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1652 rela_dyn->add_local(object, r_sym, orig_r_type, output_section,
1653 data_shndx, reloc.get_r_offset(),
1654 reloc.get_r_addend());
1656 else
1658 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1659 gold_assert(lsym.get_st_value() == 0);
1660 rela_dyn->add_local_relative(object, r_sym, orig_r_type,
1661 output_section, data_shndx,
1662 reloc.get_r_offset(),
1663 reloc.get_r_addend());
1666 break;
1668 case elfcpp::R_SPARC_WDISP30:
1669 case elfcpp::R_SPARC_WDISP22:
1670 case elfcpp::R_SPARC_WDISP19:
1671 case elfcpp::R_SPARC_WDISP16:
1672 case elfcpp::R_SPARC_DISP8:
1673 case elfcpp::R_SPARC_DISP16:
1674 case elfcpp::R_SPARC_DISP32:
1675 case elfcpp::R_SPARC_DISP64:
1676 case elfcpp::R_SPARC_PC10:
1677 case elfcpp::R_SPARC_PC22:
1678 break;
1680 case elfcpp::R_SPARC_GOT10:
1681 case elfcpp::R_SPARC_GOT13:
1682 case elfcpp::R_SPARC_GOT22:
1684 // The symbol requires a GOT entry.
1685 Output_data_got<size, big_endian>* got;
1686 unsigned int r_sym;
1688 got = target->got_section(symtab, layout);
1689 r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1691 // If we are generating a shared object, we need to add a
1692 // dynamic relocation for this symbol's GOT entry.
1693 if (parameters->options().output_is_position_independent())
1695 if (!object->local_has_got_offset(r_sym, GOT_TYPE_STANDARD))
1697 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1698 unsigned int off;
1700 off = got->add_constant(0);
1701 object->set_local_got_offset(r_sym, GOT_TYPE_STANDARD, off);
1702 rela_dyn->add_local_relative(object, r_sym,
1703 elfcpp::R_SPARC_RELATIVE,
1704 got, off, 0);
1707 else
1708 got->add_local(object, r_sym, GOT_TYPE_STANDARD);
1710 break;
1712 // These are initial TLS relocs, which are expected when
1713 // linking.
1714 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1715 case elfcpp::R_SPARC_TLS_GD_LO10:
1716 case elfcpp::R_SPARC_TLS_GD_ADD:
1717 case elfcpp::R_SPARC_TLS_GD_CALL:
1718 case elfcpp::R_SPARC_TLS_LDM_HI22 : // Local-dynamic
1719 case elfcpp::R_SPARC_TLS_LDM_LO10:
1720 case elfcpp::R_SPARC_TLS_LDM_ADD:
1721 case elfcpp::R_SPARC_TLS_LDM_CALL:
1722 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
1723 case elfcpp::R_SPARC_TLS_LDO_LOX10:
1724 case elfcpp::R_SPARC_TLS_LDO_ADD:
1725 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
1726 case elfcpp::R_SPARC_TLS_IE_LO10:
1727 case elfcpp::R_SPARC_TLS_IE_LD:
1728 case elfcpp::R_SPARC_TLS_IE_LDX:
1729 case elfcpp::R_SPARC_TLS_LE_HIX22: // Local-exec
1730 case elfcpp::R_SPARC_TLS_LE_LOX10:
1732 bool output_is_shared = parameters->options().shared();
1733 const tls::Tls_optimization optimized_type
1734 = optimize_tls_reloc(!output_is_shared, r_type);
1735 switch (r_type)
1737 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1738 case elfcpp::R_SPARC_TLS_GD_LO10:
1739 case elfcpp::R_SPARC_TLS_GD_ADD:
1740 case elfcpp::R_SPARC_TLS_GD_CALL:
1741 if (optimized_type == tls::TLSOPT_NONE)
1743 // Create a pair of GOT entries for the module index and
1744 // dtv-relative offset.
1745 Output_data_got<size, big_endian>* got
1746 = target->got_section(symtab, layout);
1747 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1748 unsigned int shndx = lsym.get_st_shndx();
1749 bool is_ordinary;
1750 shndx = object->adjust_sym_shndx(r_sym, shndx, &is_ordinary);
1751 if (!is_ordinary)
1752 object->error(_("local symbol %u has bad shndx %u"),
1753 r_sym, shndx);
1754 else
1755 got->add_local_pair_with_rela(object, r_sym,
1756 lsym.get_st_shndx(),
1757 GOT_TYPE_TLS_PAIR,
1758 target->rela_dyn_section(layout),
1759 (size == 64
1760 ? elfcpp::R_SPARC_TLS_DTPMOD64
1761 : elfcpp::R_SPARC_TLS_DTPMOD32),
1763 if (r_type == elfcpp::R_SPARC_TLS_GD_CALL)
1764 generate_tls_call(symtab, layout, target);
1766 else if (optimized_type != tls::TLSOPT_TO_LE)
1767 unsupported_reloc_local(object, r_type);
1768 break;
1770 case elfcpp::R_SPARC_TLS_LDM_HI22 : // Local-dynamic
1771 case elfcpp::R_SPARC_TLS_LDM_LO10:
1772 case elfcpp::R_SPARC_TLS_LDM_ADD:
1773 case elfcpp::R_SPARC_TLS_LDM_CALL:
1774 if (optimized_type == tls::TLSOPT_NONE)
1776 // Create a GOT entry for the module index.
1777 target->got_mod_index_entry(symtab, layout, object);
1779 if (r_type == elfcpp::R_SPARC_TLS_LDM_CALL)
1780 generate_tls_call(symtab, layout, target);
1782 else if (optimized_type != tls::TLSOPT_TO_LE)
1783 unsupported_reloc_local(object, r_type);
1784 break;
1786 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
1787 case elfcpp::R_SPARC_TLS_LDO_LOX10:
1788 case elfcpp::R_SPARC_TLS_LDO_ADD:
1789 break;
1791 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
1792 case elfcpp::R_SPARC_TLS_IE_LO10:
1793 case elfcpp::R_SPARC_TLS_IE_LD:
1794 case elfcpp::R_SPARC_TLS_IE_LDX:
1795 layout->set_has_static_tls();
1796 if (optimized_type == tls::TLSOPT_NONE)
1798 // Create a GOT entry for the tp-relative offset.
1799 Output_data_got<size, big_endian>* got
1800 = target->got_section(symtab, layout);
1801 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1803 if (!object->local_has_got_offset(r_sym, GOT_TYPE_TLS_OFFSET))
1805 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1806 unsigned int off = got->add_constant(0);
1808 object->set_local_got_offset(r_sym, GOT_TYPE_TLS_OFFSET,
1809 off);
1810 rela_dyn->add_local_relative(object, r_sym,
1811 (size == 64 ?
1812 elfcpp::R_SPARC_TLS_TPOFF64 :
1813 elfcpp::R_SPARC_TLS_TPOFF32),
1814 got, off, 0);
1817 else if (optimized_type != tls::TLSOPT_TO_LE)
1818 unsupported_reloc_local(object, r_type);
1819 break;
1821 case elfcpp::R_SPARC_TLS_LE_HIX22: // Local-exec
1822 case elfcpp::R_SPARC_TLS_LE_LOX10:
1823 layout->set_has_static_tls();
1824 if (output_is_shared)
1826 // We need to create a dynamic relocation.
1827 gold_assert(lsym.get_st_type() != elfcpp::STT_SECTION);
1828 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
1829 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1830 rela_dyn->add_local_relative(object, r_sym, r_type,
1831 output_section, data_shndx,
1832 reloc.get_r_offset(), 0);
1834 break;
1837 break;
1839 // These are relocations which should only be seen by the
1840 // dynamic linker, and should never be seen here.
1841 case elfcpp::R_SPARC_COPY:
1842 case elfcpp::R_SPARC_GLOB_DAT:
1843 case elfcpp::R_SPARC_JMP_SLOT:
1844 case elfcpp::R_SPARC_RELATIVE:
1845 case elfcpp::R_SPARC_TLS_DTPMOD64:
1846 case elfcpp::R_SPARC_TLS_DTPMOD32:
1847 case elfcpp::R_SPARC_TLS_DTPOFF64:
1848 case elfcpp::R_SPARC_TLS_DTPOFF32:
1849 case elfcpp::R_SPARC_TLS_TPOFF64:
1850 case elfcpp::R_SPARC_TLS_TPOFF32:
1851 gold_error(_("%s: unexpected reloc %u in object file"),
1852 object->name().c_str(), r_type);
1853 break;
1855 default:
1856 unsupported_reloc_local(object, r_type);
1857 break;
1861 // Report an unsupported relocation against a global symbol.
1863 template<int size, bool big_endian>
1864 void
1865 Target_sparc<size, big_endian>::Scan::unsupported_reloc_global(
1866 Sized_relobj<size, big_endian>* object,
1867 unsigned int r_type,
1868 Symbol* gsym)
1870 gold_error(_("%s: unsupported reloc %u against global symbol %s"),
1871 object->name().c_str(), r_type, gsym->demangled_name().c_str());
1874 // Scan a relocation for a global symbol.
1876 template<int size, bool big_endian>
1877 inline void
1878 Target_sparc<size, big_endian>::Scan::global(
1879 const General_options&,
1880 Symbol_table* symtab,
1881 Layout* layout,
1882 Target_sparc<size, big_endian>* target,
1883 Sized_relobj<size, big_endian>* object,
1884 unsigned int data_shndx,
1885 Output_section* output_section,
1886 const elfcpp::Rela<size, big_endian>& reloc,
1887 unsigned int r_type,
1888 Symbol* gsym)
1890 unsigned int orig_r_type = r_type;
1892 r_type &= 0xff;
1893 switch (r_type)
1895 case elfcpp::R_SPARC_NONE:
1896 case elfcpp::R_SPARC_REGISTER:
1897 case elfcpp::R_SPARC_GNU_VTINHERIT:
1898 case elfcpp::R_SPARC_GNU_VTENTRY:
1899 break;
1901 case elfcpp::R_SPARC_PLT64:
1902 case elfcpp::R_SPARC_PLT32:
1903 case elfcpp::R_SPARC_HIPLT22:
1904 case elfcpp::R_SPARC_LOPLT10:
1905 case elfcpp::R_SPARC_PCPLT32:
1906 case elfcpp::R_SPARC_PCPLT22:
1907 case elfcpp::R_SPARC_PCPLT10:
1908 case elfcpp::R_SPARC_WPLT30:
1909 // If the symbol is fully resolved, this is just a PC32 reloc.
1910 // Otherwise we need a PLT entry.
1911 if (gsym->final_value_is_known())
1912 break;
1913 // If building a shared library, we can also skip the PLT entry
1914 // if the symbol is defined in the output file and is protected
1915 // or hidden.
1916 if (gsym->is_defined()
1917 && !gsym->is_from_dynobj()
1918 && !gsym->is_preemptible())
1919 break;
1920 target->make_plt_entry(symtab, layout, gsym);
1921 break;
1923 case elfcpp::R_SPARC_DISP8:
1924 case elfcpp::R_SPARC_DISP16:
1925 case elfcpp::R_SPARC_DISP32:
1926 case elfcpp::R_SPARC_DISP64:
1927 case elfcpp::R_SPARC_PC_HH22:
1928 case elfcpp::R_SPARC_PC_HM10:
1929 case elfcpp::R_SPARC_PC_LM22:
1930 case elfcpp::R_SPARC_PC10:
1931 case elfcpp::R_SPARC_PC22:
1932 case elfcpp::R_SPARC_WDISP30:
1933 case elfcpp::R_SPARC_WDISP22:
1934 case elfcpp::R_SPARC_WDISP19:
1935 case elfcpp::R_SPARC_WDISP16:
1937 if (gsym->needs_plt_entry())
1938 target->make_plt_entry(symtab, layout, gsym);
1939 // Make a dynamic relocation if necessary.
1940 int flags = Symbol::NON_PIC_REF;
1941 if (gsym->type() == elfcpp::STT_FUNC)
1942 flags |= Symbol::FUNCTION_CALL;
1943 if (gsym->needs_dynamic_reloc(flags))
1945 if (target->may_need_copy_reloc(gsym))
1947 target->copy_reloc(symtab, layout, object,
1948 data_shndx, output_section, gsym,
1949 reloc);
1951 else
1953 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
1954 check_non_pic(object, r_type);
1955 rela_dyn->add_global(gsym, orig_r_type, output_section, object,
1956 data_shndx, reloc.get_r_offset(),
1957 reloc.get_r_addend());
1961 break;
1963 case elfcpp::R_SPARC_UA64:
1964 case elfcpp::R_SPARC_64:
1965 case elfcpp::R_SPARC_HIX22:
1966 case elfcpp::R_SPARC_LOX10:
1967 case elfcpp::R_SPARC_H44:
1968 case elfcpp::R_SPARC_M44:
1969 case elfcpp::R_SPARC_L44:
1970 case elfcpp::R_SPARC_HH22:
1971 case elfcpp::R_SPARC_HM10:
1972 case elfcpp::R_SPARC_LM22:
1973 case elfcpp::R_SPARC_HI22:
1974 case elfcpp::R_SPARC_LO10:
1975 case elfcpp::R_SPARC_OLO10:
1976 case elfcpp::R_SPARC_UA32:
1977 case elfcpp::R_SPARC_32:
1978 case elfcpp::R_SPARC_UA16:
1979 case elfcpp::R_SPARC_16:
1980 case elfcpp::R_SPARC_11:
1981 case elfcpp::R_SPARC_10:
1982 case elfcpp::R_SPARC_8:
1983 case elfcpp::R_SPARC_7:
1984 case elfcpp::R_SPARC_6:
1985 case elfcpp::R_SPARC_5:
1987 // Make a PLT entry if necessary.
1988 if (gsym->needs_plt_entry())
1990 target->make_plt_entry(symtab, layout, gsym);
1991 // Since this is not a PC-relative relocation, we may be
1992 // taking the address of a function. In that case we need to
1993 // set the entry in the dynamic symbol table to the address of
1994 // the PLT entry.
1995 if (gsym->is_from_dynobj() && !parameters->options().shared())
1996 gsym->set_needs_dynsym_value();
1998 // Make a dynamic relocation if necessary.
1999 if (gsym->needs_dynamic_reloc(Symbol::ABSOLUTE_REF))
2001 if (target->may_need_copy_reloc(gsym))
2003 target->copy_reloc(symtab, layout, object,
2004 data_shndx, output_section, gsym, reloc);
2006 else if ((r_type == elfcpp::R_SPARC_32
2007 || r_type == elfcpp::R_SPARC_64)
2008 && gsym->can_use_relative_reloc(false))
2010 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2011 rela_dyn->add_global_relative(gsym, elfcpp::R_SPARC_RELATIVE,
2012 output_section, object,
2013 data_shndx, reloc.get_r_offset(),
2014 reloc.get_r_addend());
2016 else
2018 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2020 check_non_pic(object, r_type);
2021 if (gsym->is_from_dynobj()
2022 || gsym->is_undefined()
2023 || gsym->is_preemptible())
2024 rela_dyn->add_global(gsym, orig_r_type, output_section,
2025 object, data_shndx,
2026 reloc.get_r_offset(),
2027 reloc.get_r_addend());
2028 else
2029 rela_dyn->add_global_relative(gsym, orig_r_type,
2030 output_section, object,
2031 data_shndx,
2032 reloc.get_r_offset(),
2033 reloc.get_r_addend());
2037 break;
2039 case elfcpp::R_SPARC_GOT10:
2040 case elfcpp::R_SPARC_GOT13:
2041 case elfcpp::R_SPARC_GOT22:
2043 // The symbol requires a GOT entry.
2044 Output_data_got<size, big_endian>* got;
2046 got = target->got_section(symtab, layout);
2047 if (gsym->final_value_is_known())
2048 got->add_global(gsym, GOT_TYPE_STANDARD);
2049 else
2051 // If this symbol is not fully resolved, we need to add a
2052 // dynamic relocation for it.
2053 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2054 if (gsym->is_from_dynobj()
2055 || gsym->is_undefined()
2056 || gsym->is_preemptible())
2057 got->add_global_with_rela(gsym, GOT_TYPE_STANDARD, rela_dyn,
2058 elfcpp::R_SPARC_GLOB_DAT);
2059 else if (!gsym->has_got_offset(GOT_TYPE_STANDARD))
2061 unsigned int off = got->add_constant(0);
2063 gsym->set_got_offset(GOT_TYPE_STANDARD, off);
2064 rela_dyn->add_global_relative(gsym, elfcpp::R_SPARC_RELATIVE,
2065 got, off, 0);
2069 break;
2071 // These are initial tls relocs, which are expected when
2072 // linking.
2073 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2074 case elfcpp::R_SPARC_TLS_GD_LO10:
2075 case elfcpp::R_SPARC_TLS_GD_ADD:
2076 case elfcpp::R_SPARC_TLS_GD_CALL:
2077 case elfcpp::R_SPARC_TLS_LDM_HI22: // Local-dynamic
2078 case elfcpp::R_SPARC_TLS_LDM_LO10:
2079 case elfcpp::R_SPARC_TLS_LDM_ADD:
2080 case elfcpp::R_SPARC_TLS_LDM_CALL:
2081 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2082 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2083 case elfcpp::R_SPARC_TLS_LDO_ADD:
2084 case elfcpp::R_SPARC_TLS_LE_HIX22:
2085 case elfcpp::R_SPARC_TLS_LE_LOX10:
2086 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
2087 case elfcpp::R_SPARC_TLS_IE_LO10:
2088 case elfcpp::R_SPARC_TLS_IE_LD:
2089 case elfcpp::R_SPARC_TLS_IE_LDX:
2091 const bool is_final = gsym->final_value_is_known();
2092 const tls::Tls_optimization optimized_type
2093 = optimize_tls_reloc(is_final, r_type);
2094 switch (r_type)
2096 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2097 case elfcpp::R_SPARC_TLS_GD_LO10:
2098 case elfcpp::R_SPARC_TLS_GD_ADD:
2099 case elfcpp::R_SPARC_TLS_GD_CALL:
2100 if (optimized_type == tls::TLSOPT_NONE)
2102 // Create a pair of GOT entries for the module index and
2103 // dtv-relative offset.
2104 Output_data_got<size, big_endian>* got
2105 = target->got_section(symtab, layout);
2106 got->add_global_pair_with_rela(gsym, GOT_TYPE_TLS_PAIR,
2107 target->rela_dyn_section(layout),
2108 (size == 64 ?
2109 elfcpp::R_SPARC_TLS_DTPMOD64 :
2110 elfcpp::R_SPARC_TLS_DTPMOD32),
2111 (size == 64 ?
2112 elfcpp::R_SPARC_TLS_DTPOFF64 :
2113 elfcpp::R_SPARC_TLS_DTPOFF32));
2115 // Emit R_SPARC_WPLT30 against "__tls_get_addr"
2116 if (r_type == elfcpp::R_SPARC_TLS_GD_CALL)
2117 generate_tls_call(symtab, layout, target);
2119 else if (optimized_type == tls::TLSOPT_TO_IE)
2121 // Create a GOT entry for the tp-relative offset.
2122 Output_data_got<size, big_endian>* got
2123 = target->got_section(symtab, layout);
2124 got->add_global_with_rela(gsym, GOT_TYPE_TLS_OFFSET,
2125 target->rela_dyn_section(layout),
2126 (size == 64 ?
2127 elfcpp::R_SPARC_TLS_TPOFF64 :
2128 elfcpp::R_SPARC_TLS_TPOFF32));
2130 else if (optimized_type != tls::TLSOPT_TO_LE)
2131 unsupported_reloc_global(object, r_type, gsym);
2132 break;
2134 case elfcpp::R_SPARC_TLS_LDM_HI22: // Local-dynamic
2135 case elfcpp::R_SPARC_TLS_LDM_LO10:
2136 case elfcpp::R_SPARC_TLS_LDM_ADD:
2137 case elfcpp::R_SPARC_TLS_LDM_CALL:
2138 if (optimized_type == tls::TLSOPT_NONE)
2140 // Create a GOT entry for the module index.
2141 target->got_mod_index_entry(symtab, layout, object);
2143 if (r_type == elfcpp::R_SPARC_TLS_LDM_CALL)
2144 generate_tls_call(symtab, layout, target);
2146 else if (optimized_type != tls::TLSOPT_TO_LE)
2147 unsupported_reloc_global(object, r_type, gsym);
2148 break;
2150 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2151 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2152 case elfcpp::R_SPARC_TLS_LDO_ADD:
2153 break;
2155 case elfcpp::R_SPARC_TLS_LE_HIX22:
2156 case elfcpp::R_SPARC_TLS_LE_LOX10:
2157 layout->set_has_static_tls();
2158 if (parameters->options().shared())
2160 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2161 rela_dyn->add_global_relative(gsym, orig_r_type,
2162 output_section, object,
2163 data_shndx, reloc.get_r_offset(),
2166 break;
2168 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
2169 case elfcpp::R_SPARC_TLS_IE_LO10:
2170 case elfcpp::R_SPARC_TLS_IE_LD:
2171 case elfcpp::R_SPARC_TLS_IE_LDX:
2172 layout->set_has_static_tls();
2173 if (optimized_type == tls::TLSOPT_NONE)
2175 // Create a GOT entry for the tp-relative offset.
2176 Output_data_got<size, big_endian>* got
2177 = target->got_section(symtab, layout);
2178 got->add_global_with_rela(gsym, GOT_TYPE_TLS_OFFSET,
2179 target->rela_dyn_section(layout),
2180 (size == 64 ?
2181 elfcpp::R_SPARC_TLS_TPOFF64 :
2182 elfcpp::R_SPARC_TLS_TPOFF32));
2184 else if (optimized_type != tls::TLSOPT_TO_LE)
2185 unsupported_reloc_global(object, r_type, gsym);
2186 break;
2189 break;
2191 // These are relocations which should only be seen by the
2192 // dynamic linker, and should never be seen here.
2193 case elfcpp::R_SPARC_COPY:
2194 case elfcpp::R_SPARC_GLOB_DAT:
2195 case elfcpp::R_SPARC_JMP_SLOT:
2196 case elfcpp::R_SPARC_RELATIVE:
2197 case elfcpp::R_SPARC_TLS_DTPMOD64:
2198 case elfcpp::R_SPARC_TLS_DTPMOD32:
2199 case elfcpp::R_SPARC_TLS_DTPOFF64:
2200 case elfcpp::R_SPARC_TLS_DTPOFF32:
2201 case elfcpp::R_SPARC_TLS_TPOFF64:
2202 case elfcpp::R_SPARC_TLS_TPOFF32:
2203 gold_error(_("%s: unexpected reloc %u in object file"),
2204 object->name().c_str(), r_type);
2205 break;
2207 default:
2208 unsupported_reloc_global(object, r_type, gsym);
2209 break;
2213 // Scan relocations for a section.
2215 template<int size, bool big_endian>
2216 void
2217 Target_sparc<size, big_endian>::scan_relocs(
2218 const General_options& options,
2219 Symbol_table* symtab,
2220 Layout* layout,
2221 Sized_relobj<size, big_endian>* object,
2222 unsigned int data_shndx,
2223 unsigned int sh_type,
2224 const unsigned char* prelocs,
2225 size_t reloc_count,
2226 Output_section* output_section,
2227 bool needs_special_offset_handling,
2228 size_t local_symbol_count,
2229 const unsigned char* plocal_symbols)
2231 typedef Target_sparc<size, big_endian> Sparc;
2232 typedef typename Target_sparc<size, big_endian>::Scan Scan;
2234 if (sh_type == elfcpp::SHT_REL)
2236 gold_error(_("%s: unsupported REL reloc section"),
2237 object->name().c_str());
2238 return;
2241 gold::scan_relocs<size, big_endian, Sparc, elfcpp::SHT_RELA, Scan>(
2242 options,
2243 symtab,
2244 layout,
2245 this,
2246 object,
2247 data_shndx,
2248 prelocs,
2249 reloc_count,
2250 output_section,
2251 needs_special_offset_handling,
2252 local_symbol_count,
2253 plocal_symbols);
2256 // Finalize the sections.
2258 template<int size, bool big_endian>
2259 void
2260 Target_sparc<size, big_endian>::do_finalize_sections(Layout* layout)
2262 // Fill in some more dynamic tags.
2263 Output_data_dynamic* const odyn = layout->dynamic_data();
2264 if (odyn != NULL)
2266 if (this->plt_ != NULL)
2268 const Output_data* od = this->plt_->rel_plt();
2269 odyn->add_section_size(elfcpp::DT_PLTRELSZ, od);
2270 odyn->add_section_address(elfcpp::DT_JMPREL, od);
2271 odyn->add_constant(elfcpp::DT_PLTREL, elfcpp::DT_RELA);
2273 odyn->add_section_address(elfcpp::DT_PLTGOT, this->plt_);
2276 if (this->rela_dyn_ != NULL)
2278 const Output_data* od = this->rela_dyn_;
2279 odyn->add_section_address(elfcpp::DT_RELA, od);
2280 odyn->add_section_size(elfcpp::DT_RELASZ, od);
2281 odyn->add_constant(elfcpp::DT_RELAENT,
2282 elfcpp::Elf_sizes<size>::rela_size);
2285 if (!parameters->options().shared())
2287 // The value of the DT_DEBUG tag is filled in by the dynamic
2288 // linker at run time, and used by the debugger.
2289 odyn->add_constant(elfcpp::DT_DEBUG, 0);
2293 // Emit any relocs we saved in an attempt to avoid generating COPY
2294 // relocs.
2295 if (this->copy_relocs_.any_saved_relocs())
2296 this->copy_relocs_.emit(this->rela_dyn_section(layout));
2299 // Perform a relocation.
2301 template<int size, bool big_endian>
2302 inline bool
2303 Target_sparc<size, big_endian>::Relocate::relocate(
2304 const Relocate_info<size, big_endian>* relinfo,
2305 Target_sparc* target,
2306 size_t relnum,
2307 const elfcpp::Rela<size, big_endian>& rela,
2308 unsigned int r_type,
2309 const Sized_symbol<size>* gsym,
2310 const Symbol_value<size>* psymval,
2311 unsigned char* view,
2312 typename elfcpp::Elf_types<size>::Elf_Addr address,
2313 section_size_type view_size)
2315 r_type &= 0xff;
2317 if (this->ignore_gd_add_)
2319 if (r_type != elfcpp::R_SPARC_TLS_GD_ADD)
2320 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2321 _("missing expected TLS relocation"));
2322 else
2324 this->ignore_gd_add_ = false;
2325 return false;
2329 typedef Sparc_relocate_functions<size, big_endian> Reloc;
2331 // Pick the value to use for symbols defined in shared objects.
2332 Symbol_value<size> symval;
2333 if (gsym != NULL
2334 && (gsym->is_from_dynobj()
2335 || (parameters->options().shared()
2336 && (gsym->is_undefined() || gsym->is_preemptible())))
2337 && gsym->has_plt_offset())
2339 elfcpp::Elf_Xword value;
2341 value = target->plt_section()->address() + gsym->plt_offset();
2343 symval.set_output_value(value);
2345 psymval = &symval;
2348 const Sized_relobj<size, big_endian>* object = relinfo->object;
2349 const elfcpp::Elf_Xword addend = rela.get_r_addend();
2351 // Get the GOT offset if needed. Unlike i386 and x86_64, our GOT
2352 // pointer points to the beginning, not the end, of the table.
2353 // So we just use the plain offset.
2354 bool have_got_offset = false;
2355 unsigned int got_offset = 0;
2356 switch (r_type)
2358 case elfcpp::R_SPARC_GOT10:
2359 case elfcpp::R_SPARC_GOT13:
2360 case elfcpp::R_SPARC_GOT22:
2361 if (gsym != NULL)
2363 gold_assert(gsym->has_got_offset(GOT_TYPE_STANDARD));
2364 got_offset = gsym->got_offset(GOT_TYPE_STANDARD);
2366 else
2368 unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
2369 gold_assert(object->local_has_got_offset(r_sym, GOT_TYPE_STANDARD));
2370 got_offset = object->local_got_offset(r_sym, GOT_TYPE_STANDARD);
2372 have_got_offset = true;
2373 break;
2375 default:
2376 break;
2379 switch (r_type)
2381 case elfcpp::R_SPARC_NONE:
2382 case elfcpp::R_SPARC_REGISTER:
2383 case elfcpp::R_SPARC_GNU_VTINHERIT:
2384 case elfcpp::R_SPARC_GNU_VTENTRY:
2385 break;
2387 case elfcpp::R_SPARC_8:
2388 Relocate_functions<size, big_endian>::rela8(view, object,
2389 psymval, addend);
2390 break;
2392 case elfcpp::R_SPARC_16:
2393 Relocate_functions<size, big_endian>::rela16(view, object,
2394 psymval, addend);
2395 break;
2397 case elfcpp::R_SPARC_32:
2398 if (!parameters->options().output_is_position_independent())
2399 Relocate_functions<size, big_endian>::rela32(view, object,
2400 psymval, addend);
2401 break;
2403 case elfcpp::R_SPARC_DISP8:
2404 Reloc::disp8(view, object, psymval, addend, address);
2405 break;
2407 case elfcpp::R_SPARC_DISP16:
2408 Reloc::disp16(view, object, psymval, addend, address);
2409 break;
2411 case elfcpp::R_SPARC_DISP32:
2412 Reloc::disp32(view, object, psymval, addend, address);
2413 break;
2415 case elfcpp::R_SPARC_DISP64:
2416 Reloc::disp64(view, object, psymval, addend, address);
2417 break;
2419 case elfcpp::R_SPARC_WDISP30:
2420 case elfcpp::R_SPARC_WPLT30:
2421 Reloc::wdisp30(view, object, psymval, addend, address);
2422 break;
2424 case elfcpp::R_SPARC_WDISP22:
2425 Reloc::wdisp22(view, object, psymval, addend, address);
2426 break;
2428 case elfcpp::R_SPARC_WDISP19:
2429 Reloc::wdisp19(view, object, psymval, addend, address);
2430 break;
2432 case elfcpp::R_SPARC_WDISP16:
2433 Reloc::wdisp16(view, object, psymval, addend, address);
2434 break;
2436 case elfcpp::R_SPARC_HI22:
2437 Reloc::hi22(view, object, psymval, addend);
2438 break;
2440 case elfcpp::R_SPARC_22:
2441 Reloc::rela32_22(view, object, psymval, addend);
2442 break;
2444 case elfcpp::R_SPARC_13:
2445 Reloc::rela32_13(view, object, psymval, addend);
2446 break;
2448 case elfcpp::R_SPARC_LO10:
2449 Reloc::lo10(view, object, psymval, addend);
2450 break;
2452 case elfcpp::R_SPARC_GOT10:
2453 Reloc::lo10(view, got_offset, addend);
2454 break;
2456 case elfcpp::R_SPARC_GOT13:
2457 Reloc::rela32_13(view, got_offset, addend);
2458 break;
2460 case elfcpp::R_SPARC_GOT22:
2461 Reloc::hi22(view, got_offset, addend);
2462 break;
2464 case elfcpp::R_SPARC_PC10:
2465 Reloc::pc10(view, object, psymval, addend, address);
2466 break;
2468 case elfcpp::R_SPARC_PC22:
2469 Reloc::pc22(view, object, psymval, addend, address);
2470 break;
2472 case elfcpp::R_SPARC_TLS_DTPOFF32:
2473 case elfcpp::R_SPARC_UA32:
2474 Reloc::ua32(view, object, psymval, addend);
2475 break;
2477 case elfcpp::R_SPARC_PLT64:
2478 Relocate_functions<size, big_endian>::rela64(view, object,
2479 psymval, addend);
2480 break;
2482 case elfcpp::R_SPARC_PLT32:
2483 Relocate_functions<size, big_endian>::rela32(view, object,
2484 psymval, addend);
2485 break;
2487 case elfcpp::R_SPARC_HIPLT22:
2488 Reloc::hi22(view, object, psymval, addend);
2489 break;
2491 case elfcpp::R_SPARC_LOPLT10:
2492 Reloc::lo10(view, object, psymval, addend);
2493 break;
2495 case elfcpp::R_SPARC_PCPLT32:
2496 Reloc::disp32(view, object, psymval, addend, address);
2497 break;
2499 case elfcpp::R_SPARC_PCPLT22:
2500 Reloc::pcplt22(view, object, psymval, addend, address);
2501 break;
2503 case elfcpp::R_SPARC_PCPLT10:
2504 Reloc::lo10(view, object, psymval, addend, address);
2505 break;
2507 case elfcpp::R_SPARC_64:
2508 if (!parameters->options().output_is_position_independent())
2509 Relocate_functions<size, big_endian>::rela64(view, object,
2510 psymval, addend);
2511 break;
2513 case elfcpp::R_SPARC_OLO10:
2515 unsigned int addend2 = rela.get_r_info() & 0xffffffff;
2516 addend2 = ((addend2 >> 8) ^ 0x800000) - 0x800000;
2517 Reloc::olo10(view, object, psymval, addend, addend2);
2519 break;
2521 case elfcpp::R_SPARC_HH22:
2522 Reloc::hh22(view, object, psymval, addend);
2523 break;
2525 case elfcpp::R_SPARC_PC_HH22:
2526 Reloc::pc_hh22(view, object, psymval, addend, address);
2527 break;
2529 case elfcpp::R_SPARC_HM10:
2530 Reloc::hm10(view, object, psymval, addend);
2531 break;
2533 case elfcpp::R_SPARC_PC_HM10:
2534 Reloc::pc_hm10(view, object, psymval, addend, address);
2535 break;
2537 case elfcpp::R_SPARC_LM22:
2538 Reloc::hi22(view, object, psymval, addend);
2539 break;
2541 case elfcpp::R_SPARC_PC_LM22:
2542 Reloc::pcplt22(view, object, psymval, addend, address);
2543 break;
2545 case elfcpp::R_SPARC_11:
2546 Reloc::rela32_11(view, object, psymval, addend);
2547 break;
2549 case elfcpp::R_SPARC_10:
2550 Reloc::rela32_10(view, object, psymval, addend);
2551 break;
2553 case elfcpp::R_SPARC_7:
2554 Reloc::rela32_7(view, object, psymval, addend);
2555 break;
2557 case elfcpp::R_SPARC_6:
2558 Reloc::rela32_6(view, object, psymval, addend);
2559 break;
2561 case elfcpp::R_SPARC_5:
2562 Reloc::rela32_5(view, object, psymval, addend);
2563 break;
2565 case elfcpp::R_SPARC_HIX22:
2566 Reloc::hix22(view, object, psymval, addend);
2567 break;
2569 case elfcpp::R_SPARC_LOX10:
2570 Reloc::lox10(view, object, psymval, addend);
2571 break;
2573 case elfcpp::R_SPARC_H44:
2574 Reloc::h44(view, object, psymval, addend);
2575 break;
2577 case elfcpp::R_SPARC_M44:
2578 Reloc::m44(view, object, psymval, addend);
2579 break;
2581 case elfcpp::R_SPARC_L44:
2582 Reloc::l44(view, object, psymval, addend);
2583 break;
2585 case elfcpp::R_SPARC_TLS_DTPOFF64:
2586 case elfcpp::R_SPARC_UA64:
2587 Reloc::ua64(view, object, psymval, addend);
2588 break;
2590 case elfcpp::R_SPARC_UA16:
2591 Reloc::ua16(view, object, psymval, addend);
2592 break;
2594 case elfcpp::R_SPARC_TLS_GD_HI22:
2595 case elfcpp::R_SPARC_TLS_GD_LO10:
2596 case elfcpp::R_SPARC_TLS_GD_ADD:
2597 case elfcpp::R_SPARC_TLS_GD_CALL:
2598 case elfcpp::R_SPARC_TLS_LDM_HI22:
2599 case elfcpp::R_SPARC_TLS_LDM_LO10:
2600 case elfcpp::R_SPARC_TLS_LDM_ADD:
2601 case elfcpp::R_SPARC_TLS_LDM_CALL:
2602 case elfcpp::R_SPARC_TLS_LDO_HIX22:
2603 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2604 case elfcpp::R_SPARC_TLS_LDO_ADD:
2605 case elfcpp::R_SPARC_TLS_IE_HI22:
2606 case elfcpp::R_SPARC_TLS_IE_LO10:
2607 case elfcpp::R_SPARC_TLS_IE_LD:
2608 case elfcpp::R_SPARC_TLS_IE_LDX:
2609 case elfcpp::R_SPARC_TLS_LE_HIX22:
2610 case elfcpp::R_SPARC_TLS_LE_LOX10:
2611 this->relocate_tls(relinfo, target, relnum, rela,
2612 r_type, gsym, psymval, view,
2613 address, view_size);
2614 break;
2616 case elfcpp::R_SPARC_COPY:
2617 case elfcpp::R_SPARC_GLOB_DAT:
2618 case elfcpp::R_SPARC_JMP_SLOT:
2619 case elfcpp::R_SPARC_RELATIVE:
2620 // These are outstanding tls relocs, which are unexpected when
2621 // linking.
2622 case elfcpp::R_SPARC_TLS_DTPMOD64:
2623 case elfcpp::R_SPARC_TLS_DTPMOD32:
2624 case elfcpp::R_SPARC_TLS_TPOFF64:
2625 case elfcpp::R_SPARC_TLS_TPOFF32:
2626 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2627 _("unexpected reloc %u in object file"),
2628 r_type);
2629 break;
2631 default:
2632 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2633 _("unsupported reloc %u"),
2634 r_type);
2635 break;
2638 return true;
2641 // Perform a TLS relocation.
2643 template<int size, bool big_endian>
2644 inline void
2645 Target_sparc<size, big_endian>::Relocate::relocate_tls(
2646 const Relocate_info<size, big_endian>* relinfo,
2647 Target_sparc<size, big_endian>* target,
2648 size_t relnum,
2649 const elfcpp::Rela<size, big_endian>& rela,
2650 unsigned int r_type,
2651 const Sized_symbol<size>* gsym,
2652 const Symbol_value<size>* psymval,
2653 unsigned char* view,
2654 typename elfcpp::Elf_types<size>::Elf_Addr address,
2655 section_size_type)
2657 Output_segment* tls_segment = relinfo->layout->tls_segment();
2658 typedef Sparc_relocate_functions<size, big_endian> Reloc;
2659 const Sized_relobj<size, big_endian>* object = relinfo->object;
2660 typedef typename elfcpp::Swap<32, true>::Valtype Insntype;
2662 const elfcpp::Elf_Xword addend = rela.get_r_addend();
2663 typename elfcpp::Elf_types<size>::Elf_Addr value = psymval->value(object, 0);
2665 const bool is_final =
2666 (gsym == NULL
2667 ? !parameters->options().output_is_position_independent()
2668 : gsym->final_value_is_known());
2669 const tls::Tls_optimization optimized_type
2670 = optimize_tls_reloc(is_final, r_type);
2672 switch (r_type)
2674 case elfcpp::R_SPARC_TLS_GD_HI22:
2675 case elfcpp::R_SPARC_TLS_GD_LO10:
2676 case elfcpp::R_SPARC_TLS_GD_ADD:
2677 case elfcpp::R_SPARC_TLS_GD_CALL:
2678 if (optimized_type == tls::TLSOPT_TO_LE)
2680 Insntype* wv = reinterpret_cast<Insntype*>(view);
2681 Insntype val;
2683 value -= tls_segment->memsz();
2685 switch (r_type)
2687 case elfcpp::R_SPARC_TLS_GD_HI22:
2688 // TLS_GD_HI22 --> TLS_LE_HIX22
2689 Reloc::hix22(view, value, addend);
2690 break;
2692 case elfcpp::R_SPARC_TLS_GD_LO10:
2693 // TLS_GD_LO10 --> TLS_LE_LOX10
2694 Reloc::lox10(view, value, addend);
2695 break;
2697 case elfcpp::R_SPARC_TLS_GD_ADD:
2698 // add %reg1, %reg2, %reg3 --> mov %g7, %reg2, %reg3
2699 val = elfcpp::Swap<32, true>::readval(wv);
2700 val = (val & ~0x7c000) | 0x1c000;
2701 elfcpp::Swap<32, true>::writeval(wv, val);
2702 break;
2703 case elfcpp::R_SPARC_TLS_GD_CALL:
2704 // call __tls_get_addr --> nop
2705 elfcpp::Swap<32, true>::writeval(wv, sparc_nop);
2706 break;
2708 break;
2710 else
2712 unsigned int got_type = (optimized_type == tls::TLSOPT_TO_IE
2713 ? GOT_TYPE_TLS_OFFSET
2714 : GOT_TYPE_TLS_PAIR);
2715 if (gsym != NULL)
2717 gold_assert(gsym->has_got_offset(got_type));
2718 value = gsym->got_offset(got_type);
2720 else
2722 unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
2723 gold_assert(object->local_has_got_offset(r_sym, got_type));
2724 value = object->local_got_offset(r_sym, got_type);
2726 if (optimized_type == tls::TLSOPT_TO_IE)
2728 Insntype* wv = reinterpret_cast<Insntype*>(view);
2729 Insntype val;
2731 switch (r_type)
2733 case elfcpp::R_SPARC_TLS_GD_HI22:
2734 // TLS_GD_HI22 --> TLS_IE_HI22
2735 Reloc::hi22(view, value, addend);
2736 break;
2738 case elfcpp::R_SPARC_TLS_GD_LO10:
2739 // TLS_GD_LO10 --> TLS_IE_LO10
2740 Reloc::lo10(view, value, addend);
2741 break;
2743 case elfcpp::R_SPARC_TLS_GD_ADD:
2744 // add %reg1, %reg2, %reg3 --> ld [%reg1 + %reg2], %reg3
2745 val = elfcpp::Swap<32, true>::readval(wv);
2747 if (size == 64)
2748 val |= 0xc0580000;
2749 else
2750 val |= 0xc0000000;
2752 elfcpp::Swap<32, true>::writeval(wv, val);
2753 break;
2755 case elfcpp::R_SPARC_TLS_GD_CALL:
2756 // The compiler can put the TLS_GD_ADD instruction
2757 // into the delay slot of the call. If so, we need
2758 // to transpose the two instructions so that the
2759 // the new sequence works properly.
2761 // The test we use is if the instruction in the
2762 // delay slot is an add with destination register
2763 // equal to %o0
2764 val = elfcpp::Swap<32, true>::readval(wv + 1);
2765 if ((val & 0x81f80000) == 0x80000000
2766 && ((val >> 25) & 0x1f) == 0x8)
2768 if (size == 64)
2769 val |= 0xc0580000;
2770 else
2771 val |= 0xc0000000;
2773 elfcpp::Swap<32, true>::writeval(wv, val);
2775 wv += 1;
2776 this->ignore_gd_add_ = true;
2779 // call __tls_get_addr --> add %g7, %o0, %o0
2780 elfcpp::Swap<32, true>::writeval(wv, 0x9001c008);
2781 break;
2783 break;
2785 else if (optimized_type == tls::TLSOPT_NONE)
2787 switch (r_type)
2789 case elfcpp::R_SPARC_TLS_GD_HI22:
2790 Reloc::hi22(view, value, addend);
2791 break;
2792 case elfcpp::R_SPARC_TLS_GD_LO10:
2793 Reloc::lo10(view, value, addend);
2794 break;
2795 case elfcpp::R_SPARC_TLS_GD_ADD:
2796 break;
2797 case elfcpp::R_SPARC_TLS_GD_CALL:
2799 Symbol_value<size> symval;
2800 elfcpp::Elf_Xword value;
2801 Symbol* tsym;
2803 tsym = target->tls_get_addr_sym_;
2804 gold_assert(tsym);
2805 value = (target->plt_section()->address() +
2806 tsym->plt_offset());
2807 symval.set_output_value(value);
2808 Reloc::wdisp30(view, object, &symval, addend, address);
2810 break;
2812 break;
2815 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2816 _("unsupported reloc %u"),
2817 r_type);
2818 break;
2820 case elfcpp::R_SPARC_TLS_LDM_HI22:
2821 case elfcpp::R_SPARC_TLS_LDM_LO10:
2822 case elfcpp::R_SPARC_TLS_LDM_ADD:
2823 case elfcpp::R_SPARC_TLS_LDM_CALL:
2824 if (optimized_type == tls::TLSOPT_TO_LE)
2826 Insntype* wv = reinterpret_cast<Insntype*>(view);
2828 switch (r_type)
2830 case elfcpp::R_SPARC_TLS_LDM_HI22:
2831 case elfcpp::R_SPARC_TLS_LDM_LO10:
2832 case elfcpp::R_SPARC_TLS_LDM_ADD:
2833 elfcpp::Swap<32, true>::writeval(wv, sparc_nop);
2834 break;
2836 case elfcpp::R_SPARC_TLS_LDM_CALL:
2837 elfcpp::Swap<32, true>::writeval(wv, sparc_mov_g0_o0);
2838 break;
2840 break;
2842 else if (optimized_type == tls::TLSOPT_NONE)
2844 // Relocate the field with the offset of the GOT entry for
2845 // the module index.
2846 unsigned int got_offset;
2848 got_offset = target->got_mod_index_entry(NULL, NULL, NULL);
2849 switch (r_type)
2851 case elfcpp::R_SPARC_TLS_LDM_HI22:
2852 Reloc::hi22(view, got_offset, addend);
2853 break;
2854 case elfcpp::R_SPARC_TLS_LDM_LO10:
2855 Reloc::lo10(view, got_offset, addend);
2856 break;
2857 case elfcpp::R_SPARC_TLS_LDM_ADD:
2858 break;
2859 case elfcpp::R_SPARC_TLS_LDM_CALL:
2861 Symbol_value<size> symval;
2862 elfcpp::Elf_Xword value;
2863 Symbol* tsym;
2865 tsym = target->tls_get_addr_sym_;
2866 gold_assert(tsym);
2867 value = (target->plt_section()->address() +
2868 tsym->plt_offset());
2869 symval.set_output_value(value);
2870 Reloc::wdisp30(view, object, &symval, addend, address);
2872 break;
2874 break;
2876 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2877 _("unsupported reloc %u"),
2878 r_type);
2879 break;
2881 // These relocs can appear in debugging sections, in which case
2882 // we won't see the TLS_LDM relocs. The local_dynamic_type
2883 // field tells us this.
2884 case elfcpp::R_SPARC_TLS_LDO_HIX22:
2885 if (optimized_type == tls::TLSOPT_TO_LE)
2887 value -= tls_segment->memsz();
2888 Reloc::hix22(view, value, addend);
2890 else
2891 Reloc::ldo_hix22(view, value, addend);
2892 break;
2893 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2894 if (optimized_type == tls::TLSOPT_TO_LE)
2896 value -= tls_segment->memsz();
2897 Reloc::lox10(view, value, addend);
2899 else
2900 Reloc::ldo_lox10(view, value, addend);
2901 break;
2902 case elfcpp::R_SPARC_TLS_LDO_ADD:
2903 if (optimized_type == tls::TLSOPT_TO_LE)
2905 Insntype* wv = reinterpret_cast<Insntype*>(view);
2906 Insntype val;
2908 // add %reg1, %reg2, %reg3 --> add %g7, %reg2, %reg3
2909 val = elfcpp::Swap<32, true>::readval(wv);
2910 val = (val & ~0x7c000) | 0x1c000;
2911 elfcpp::Swap<32, true>::writeval(wv, val);
2913 break;
2915 // When optimizing IE --> LE, the only relocation that is handled
2916 // differently is R_SPARC_TLS_IE_LD, it is rewritten from
2917 // 'ld{,x} [rs1 + rs2], rd' into 'mov rs2, rd' or simply a NOP is
2918 // rs2 and rd are the same.
2919 case elfcpp::R_SPARC_TLS_IE_LD:
2920 case elfcpp::R_SPARC_TLS_IE_LDX:
2921 if (optimized_type == tls::TLSOPT_TO_LE)
2923 Insntype* wv = reinterpret_cast<Insntype*>(view);
2924 Insntype val = elfcpp::Swap<32, true>::readval(wv);
2925 Insntype rs2 = val & 0x1f;
2926 Insntype rd = (val >> 25) & 0x1f;
2928 if (rs2 == rd)
2929 val = sparc_nop;
2930 else
2931 val = sparc_mov | (val & 0x3e00001f);
2933 elfcpp::Swap<32, true>::writeval(wv, val);
2935 break;
2937 case elfcpp::R_SPARC_TLS_IE_HI22:
2938 case elfcpp::R_SPARC_TLS_IE_LO10:
2939 if (optimized_type == tls::TLSOPT_TO_LE)
2941 value -= tls_segment->memsz();
2942 switch (r_type)
2944 case elfcpp::R_SPARC_TLS_IE_HI22:
2945 // IE_HI22 --> LE_HIX22
2946 Reloc::hix22(view, value, addend);
2947 break;
2948 case elfcpp::R_SPARC_TLS_IE_LO10:
2949 // IE_LO10 --> LE_LOX10
2950 Reloc::lox10(view, value, addend);
2951 break;
2953 break;
2955 else if (optimized_type == tls::TLSOPT_NONE)
2957 // Relocate the field with the offset of the GOT entry for
2958 // the tp-relative offset of the symbol.
2959 if (gsym != NULL)
2961 gold_assert(gsym->has_got_offset(GOT_TYPE_TLS_OFFSET));
2962 value = gsym->got_offset(GOT_TYPE_TLS_OFFSET);
2964 else
2966 unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
2967 gold_assert(object->local_has_got_offset(r_sym,
2968 GOT_TYPE_TLS_OFFSET));
2969 value = object->local_got_offset(r_sym,
2970 GOT_TYPE_TLS_OFFSET);
2972 switch (r_type)
2974 case elfcpp::R_SPARC_TLS_IE_HI22:
2975 Reloc::hi22(view, value, addend);
2976 break;
2977 case elfcpp::R_SPARC_TLS_IE_LO10:
2978 Reloc::lo10(view, value, addend);
2979 break;
2981 break;
2983 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
2984 _("unsupported reloc %u"),
2985 r_type);
2986 break;
2988 case elfcpp::R_SPARC_TLS_LE_HIX22:
2989 // If we're creating a shared library, a dynamic relocation will
2990 // have been created for this location, so do not apply it now.
2991 if (!parameters->options().shared())
2993 value -= tls_segment->memsz();
2994 Reloc::hix22(view, value, addend);
2996 break;
2998 case elfcpp::R_SPARC_TLS_LE_LOX10:
2999 // If we're creating a shared library, a dynamic relocation will
3000 // have been created for this location, so do not apply it now.
3001 if (!parameters->options().shared())
3003 value -= tls_segment->memsz();
3004 Reloc::lox10(view, value, addend);
3006 break;
3010 // Relocate section data.
3012 template<int size, bool big_endian>
3013 void
3014 Target_sparc<size, big_endian>::relocate_section(
3015 const Relocate_info<size, big_endian>* relinfo,
3016 unsigned int sh_type,
3017 const unsigned char* prelocs,
3018 size_t reloc_count,
3019 Output_section* output_section,
3020 bool needs_special_offset_handling,
3021 unsigned char* view,
3022 typename elfcpp::Elf_types<size>::Elf_Addr address,
3023 section_size_type view_size)
3025 typedef Target_sparc<size, big_endian> Sparc;
3026 typedef typename Target_sparc<size, big_endian>::Relocate Sparc_relocate;
3028 gold_assert(sh_type == elfcpp::SHT_RELA);
3030 gold::relocate_section<size, big_endian, Sparc, elfcpp::SHT_RELA,
3031 Sparc_relocate>(
3032 relinfo,
3033 this,
3034 prelocs,
3035 reloc_count,
3036 output_section,
3037 needs_special_offset_handling,
3038 view,
3039 address,
3040 view_size);
3043 // Return the size of a relocation while scanning during a relocatable
3044 // link.
3046 template<int size, bool big_endian>
3047 unsigned int
3048 Target_sparc<size, big_endian>::Relocatable_size_for_reloc::get_size_for_reloc(
3049 unsigned int,
3050 Relobj*)
3052 // We are always SHT_RELA, so we should never get here.
3053 gold_unreachable();
3054 return 0;
3057 // Scan the relocs during a relocatable link.
3059 template<int size, bool big_endian>
3060 void
3061 Target_sparc<size, big_endian>::scan_relocatable_relocs(
3062 const General_options& options,
3063 Symbol_table* symtab,
3064 Layout* layout,
3065 Sized_relobj<size, big_endian>* object,
3066 unsigned int data_shndx,
3067 unsigned int sh_type,
3068 const unsigned char* prelocs,
3069 size_t reloc_count,
3070 Output_section* output_section,
3071 bool needs_special_offset_handling,
3072 size_t local_symbol_count,
3073 const unsigned char* plocal_symbols,
3074 Relocatable_relocs* rr)
3076 gold_assert(sh_type == elfcpp::SHT_RELA);
3078 typedef gold::Default_scan_relocatable_relocs<elfcpp::SHT_RELA,
3079 Relocatable_size_for_reloc> Scan_relocatable_relocs;
3081 gold::scan_relocatable_relocs<size, big_endian, elfcpp::SHT_RELA,
3082 Scan_relocatable_relocs>(
3083 options,
3084 symtab,
3085 layout,
3086 object,
3087 data_shndx,
3088 prelocs,
3089 reloc_count,
3090 output_section,
3091 needs_special_offset_handling,
3092 local_symbol_count,
3093 plocal_symbols,
3094 rr);
3097 // Relocate a section during a relocatable link.
3099 template<int size, bool big_endian>
3100 void
3101 Target_sparc<size, big_endian>::relocate_for_relocatable(
3102 const Relocate_info<size, big_endian>* relinfo,
3103 unsigned int sh_type,
3104 const unsigned char* prelocs,
3105 size_t reloc_count,
3106 Output_section* output_section,
3107 off_t offset_in_output_section,
3108 const Relocatable_relocs* rr,
3109 unsigned char* view,
3110 typename elfcpp::Elf_types<size>::Elf_Addr view_address,
3111 section_size_type view_size,
3112 unsigned char* reloc_view,
3113 section_size_type reloc_view_size)
3115 gold_assert(sh_type == elfcpp::SHT_RELA);
3117 gold::relocate_for_relocatable<size, big_endian, elfcpp::SHT_RELA>(
3118 relinfo,
3119 prelocs,
3120 reloc_count,
3121 output_section,
3122 offset_in_output_section,
3124 view,
3125 view_address,
3126 view_size,
3127 reloc_view,
3128 reloc_view_size);
3131 // Return the value to use for a dynamic which requires special
3132 // treatment. This is how we support equality comparisons of function
3133 // pointers across shared library boundaries, as described in the
3134 // processor specific ABI supplement.
3136 template<int size, bool big_endian>
3137 uint64_t
3138 Target_sparc<size, big_endian>::do_dynsym_value(const Symbol* gsym) const
3140 gold_assert(gsym->is_from_dynobj() && gsym->has_plt_offset());
3141 return this->plt_section()->address() + gsym->plt_offset();
3144 // The selector for sparc object files.
3146 template<int size, bool big_endian>
3147 class Target_selector_sparc : public Target_selector
3149 public:
3150 Target_selector_sparc()
3151 : Target_selector(elfcpp::EM_NONE, size, big_endian,
3152 (size == 64 ? "elf64-sparc" : "elf32-sparc"))
3155 Target* instantiated_target_;
3157 Target* do_recognize(int machine, int, int)
3159 switch (size)
3161 case 64:
3162 if (machine != elfcpp::EM_SPARCV9)
3163 return NULL;
3164 break;
3166 case 32:
3167 if (machine != elfcpp::EM_SPARC
3168 && machine != elfcpp::EM_SPARC32PLUS)
3169 return NULL;
3170 break;
3172 default:
3173 return NULL;
3176 return do_instantiate_target();
3179 Target* do_instantiate_target()
3181 if (this->instantiated_target_ == NULL)
3182 this->instantiated_target_ = new Target_sparc<size, big_endian>();
3183 return this->instantiated_target_;
3187 Target_selector_sparc<32, true> target_selector_sparc32;
3188 Target_selector_sparc<64, true> target_selector_sparc64;
3190 } // End anonymous namespace.