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