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