projects / deliverable / binutils-gdb.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
gold/
[deliverable/binutils-gdb.git] / gold / sparc.cc
CommitLineData
f5314dd5
DM		 1// sparc.cc -- sparc target support for gold.
2
0e804863 3// Copyright 2008, 2009, 2010, 2011, 2012, 2013 Free Software Foundation, Inc.
f5314dd5
DM		 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"
12c0daef 37#include "copy-relocs.h"
f5314dd5
DM		 38#include "target.h"
39#include "target-reloc.h"
40#include "target-select.h"
41#include "tls.h"
42#include "errors.h"
f345227a 43#include "gc.h"
f5314dd5
DM		 44
45namespace
46{
47
48using namespace gold;
49
50template<int size, bool big_endian>
51class Output_data_plt_sparc;
52
53template<int size, bool big_endian>
54class 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),
8c2bf391 61 got_(NULL), plt_(NULL), rela_dyn_(NULL), rela_ifunc_(NULL),
12c0daef 62 copy_relocs_(elfcpp::R_SPARC_COPY), dynbss_(NULL),
a4d85145
DM		 63 got_mod_index_offset_(-1U), tls_get_addr_sym_(NULL),
64 elf_machine_(sparc_info.machine_code), elf_flags_(0),
65 elf_flags_set_(false)
f5314dd5
DM		 66 {
67 }
68
2e702c99 69 // Process the relocations to determine unreferenced sections for
6d03d481
ST		 70 // garbage collection.
71 void
ad0f2072 72 gc_process_relocs(Symbol_table* symtab,
2e702c99
RM		 73 Layout* layout,
74 Sized_relobj_file<size, big_endian>* object,
75 unsigned int data_shndx,
76 unsigned int sh_type,
77 const unsigned char* prelocs,
78 size_t reloc_count,
79 Output_section* output_section,
80 bool needs_special_offset_handling,
81 size_t local_symbol_count,
82 const unsigned char* plocal_symbols);
6d03d481 83
f5314dd5
DM		 84 // Scan the relocations to look for symbol adjustments.
85 void
ad0f2072 86 scan_relocs(Symbol_table* symtab,
f5314dd5 87 Layout* layout,
6fa2a40b 88 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 89 unsigned int data_shndx,
90 unsigned int sh_type,
91 const unsigned char* prelocs,
92 size_t reloc_count,
93 Output_section* output_section,
94 bool needs_special_offset_handling,
95 size_t local_symbol_count,
96 const unsigned char* plocal_symbols);
97 // Finalize the sections.
98 void
f59f41f3 99 do_finalize_sections(Layout*, const Input_objects*, Symbol_table*);
f5314dd5
DM		 100
101 // Return the value to use for a dynamic which requires special
102 // treatment.
103 uint64_t
104 do_dynsym_value(const Symbol*) const;
105
106 // Relocate a section.
107 void
108 relocate_section(const Relocate_info<size, big_endian>*,
109 unsigned int sh_type,
110 const unsigned char* prelocs,
111 size_t reloc_count,
112 Output_section* output_section,
113 bool needs_special_offset_handling,
114 unsigned char* view,
115 typename elfcpp::Elf_types<size>::Elf_Addr view_address,
364c7fa5
ILT		 116 section_size_type view_size,
117 const Reloc_symbol_changes*);
f5314dd5
DM		 118
119 // Scan the relocs during a relocatable link.
120 void
ad0f2072 121 scan_relocatable_relocs(Symbol_table* symtab,
f5314dd5 122 Layout* layout,
6fa2a40b 123 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 124 unsigned int data_shndx,
125 unsigned int sh_type,
126 const unsigned char* prelocs,
127 size_t reloc_count,
128 Output_section* output_section,
129 bool needs_special_offset_handling,
130 size_t local_symbol_count,
131 const unsigned char* plocal_symbols,
132 Relocatable_relocs*);
133
7404fe1b 134 // Emit relocations for a section.
f5314dd5 135 void
7404fe1b
AM		 136 relocate_relocs(const Relocate_info<size, big_endian>*,
137 unsigned int sh_type,
138 const unsigned char* prelocs,
139 size_t reloc_count,
140 Output_section* output_section,
62fe925a
RM		 141 typename elfcpp::Elf_types<size>::Elf_Off
142 offset_in_output_section,
7404fe1b
AM		 143 const Relocatable_relocs*,
144 unsigned char* view,
145 typename elfcpp::Elf_types<size>::Elf_Addr view_address,
146 section_size_type view_size,
147 unsigned char* reloc_view,
148 section_size_type reloc_view_size);
149
f5314dd5
DM		 150 // Return whether SYM is defined by the ABI.
151 bool
9c2d0ef9 152 do_is_defined_by_abi(const Symbol* sym) const
f5314dd5
DM		 153 {
154 // XXX Really need to support this better...
155 if (sym->type() == elfcpp::STT_SPARC_REGISTER)
156 return 1;
157
158 return strcmp(sym->name(), "___tls_get_addr") == 0;
159 }
160
8c2bf391
DM		 161 // Return the PLT address to use for a global symbol.
162 uint64_t
163 do_plt_address_for_global(const Symbol* gsym) const
164 { return this->plt_section()->address_for_global(gsym); }
165
166 uint64_t
167 do_plt_address_for_local(const Relobj* relobj, unsigned int symndx) const
168 { return this->plt_section()->address_for_local(relobj, symndx); }
169
9efe6174
ILT		 170 // Return whether there is a GOT section.
171 bool
172 has_got_section() const
173 { return this->got_ != NULL; }
174
f5314dd5
DM		 175 // Return the size of the GOT section.
176 section_size_type
0e70b911 177 got_size() const
f5314dd5
DM		 178 {
179 gold_assert(this->got_ != NULL);
180 return this->got_->data_size();
181 }
182
0e70b911
CC		 183 // Return the number of entries in the GOT.
184 unsigned int
185 got_entry_count() const
186 {
187 if (this->got_ == NULL)
188 return 0;
189 return this->got_size() / (size / 8);
190 }
191
2a1079e8
DM		 192 // Return the address of the GOT.
193 uint64_t
194 got_address() const
195 {
196 if (this->got_ == NULL)
197 return 0;
198 return this->got_->address();
199 }
200
0e70b911
CC		 201 // Return the number of entries in the PLT.
202 unsigned int
203 plt_entry_count() const;
204
205 // Return the offset of the first non-reserved PLT entry.
206 unsigned int
207 first_plt_entry_offset() const;
208
209 // Return the size of each PLT entry.
210 unsigned int
211 plt_entry_size() const;
212
a4d85145
DM		 213 protected:
214 // Make an ELF object.
215 Object*
216 do_make_elf_object(const std::string&, Input_file*, off_t,
217 const elfcpp::Ehdr<size, big_endian>& ehdr);
218
219 void
220 do_adjust_elf_header(unsigned char* view, int len) const;
221
f5314dd5
DM		 222 private:
223
224 // The class which scans relocations.
32b769e1 225 class Scan
f5314dd5 226 {
32b769e1
DM		 227 public:
228 Scan()
229 : issued_non_pic_error_(false)
230 { }
231
95a2c8d6
RS		 232 static inline int
233 get_reference_flags(unsigned int r_type);
234
f5314dd5 235 inline void
ad0f2072 236 local(Symbol_table* symtab, Layout* layout, Target_sparc* target,
6fa2a40b 237 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 238 unsigned int data_shndx,
239 Output_section* output_section,
240 const elfcpp::Rela<size, big_endian>& reloc, unsigned int r_type,
bfdfa4cd
AM		 241 const elfcpp::Sym<size, big_endian>& lsym,
242 bool is_discarded);
f5314dd5
DM		 243
244 inline void
ad0f2072 245 global(Symbol_table* symtab, Layout* layout, Target_sparc* target,
6fa2a40b 246 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 247 unsigned int data_shndx,
248 Output_section* output_section,
249 const elfcpp::Rela<size, big_endian>& reloc, unsigned int r_type,
250 Symbol* gsym);
251
21bb3914
ST		 252 inline bool
253 local_reloc_may_be_function_pointer(Symbol_table* , Layout* ,
2e702c99
RM		 254 Target_sparc* ,
255 Sized_relobj_file<size, big_endian>* ,
21bb3914 256 unsigned int ,
2e702c99
RM		 257 Output_section* ,
258 const elfcpp::Rela<size, big_endian>& ,
259 unsigned int ,
260 const elfcpp::Sym<size, big_endian>&)
21bb3914
ST		 261 { return false; }
262
263 inline bool
264 global_reloc_may_be_function_pointer(Symbol_table* , Layout* ,
2e702c99
RM		 265 Target_sparc* ,
266 Sized_relobj_file<size, big_endian>* ,
267 unsigned int ,
268 Output_section* ,
269 const elfcpp::Rela<size,
270 big_endian>& ,
271 unsigned int , Symbol*)
21bb3914
ST		 272 { return false; }
273
274
32b769e1 275 private:
f5314dd5 276 static void
6fa2a40b 277 unsupported_reloc_local(Sized_relobj_file<size, big_endian>*,
f5314dd5
DM		 278 unsigned int r_type);
279
280 static void
6fa2a40b 281 unsupported_reloc_global(Sized_relobj_file<size, big_endian>*,
f5314dd5
DM		 282 unsigned int r_type, Symbol*);
283
284 static void
285 generate_tls_call(Symbol_table* symtab, Layout* layout,
286 Target_sparc* target);
32b769e1
DM		 287
288 void
289 check_non_pic(Relobj*, unsigned int r_type);
290
8c2bf391
DM		 291 bool
292 reloc_needs_plt_for_ifunc(Sized_relobj_file<size, big_endian>*,
293 unsigned int r_type);
294
32b769e1
DM		 295 // Whether we have issued an error about a non-PIC compilation.
296 bool issued_non_pic_error_;
f5314dd5
DM		 297 };
298
299 // The class which implements relocation.
300 class Relocate
301 {
302 public:
303 Relocate()
abd242a9 304 : ignore_gd_add_(false), reloc_adjust_addr_(NULL)
f5314dd5
DM		 305 { }
306
307 ~Relocate()
308 {
309 if (this->ignore_gd_add_)
310 {
311 // FIXME: This needs to specify the location somehow.
312 gold_error(_("missing expected TLS relocation"));
313 }
314 }
315
316 // Do a relocation. Return false if the caller should not issue
317 // any warnings about this relocation.
318 inline bool
319 relocate(const Relocate_info<size, big_endian>*, Target_sparc*,
031cdbed
ILT		 320 Output_section*, size_t relnum,
321 const elfcpp::Rela<size, big_endian>&,
f5314dd5
DM		 322 unsigned int r_type, const Sized_symbol<size>*,
323 const Symbol_value<size>*,
324 unsigned char*,
325 typename elfcpp::Elf_types<size>::Elf_Addr,
326 section_size_type);
327
328 private:
329 // Do a TLS relocation.
330 inline void
331 relocate_tls(const Relocate_info<size, big_endian>*, Target_sparc* target,
2e702c99 332 size_t relnum, const elfcpp::Rela<size, big_endian>&,
f5314dd5
DM		 333 unsigned int r_type, const Sized_symbol<size>*,
334 const Symbol_value<size>*,
335 unsigned char*,
336 typename elfcpp::Elf_types<size>::Elf_Addr,
337 section_size_type);
338
a5a5f7a3
DM		 339 inline void
340 relax_call(Target_sparc<size, big_endian>* target,
341 unsigned char* view,
342 const elfcpp::Rela<size, big_endian>& rela,
343 section_size_type view_size);
344
f5314dd5
DM		 345 // Ignore the next relocation which should be R_SPARC_TLS_GD_ADD
346 bool ignore_gd_add_;
abd242a9
DM		 347
348 // If we hit a reloc at this view address, adjust it back by 4 bytes.
349 unsigned char *reloc_adjust_addr_;
f5314dd5
DM		 350 };
351
352 // A class which returns the size required for a relocation type,
353 // used while scanning relocs during a relocatable link.
354 class Relocatable_size_for_reloc
355 {
356 public:
357 unsigned int
358 get_size_for_reloc(unsigned int, Relobj*);
359 };
360
361 // Get the GOT section, creating it if necessary.
362 Output_data_got<size, big_endian>*
363 got_section(Symbol_table*, Layout*);
364
8c2bf391
DM		 365 // Create the PLT section.
366 void
367 make_plt_section(Symbol_table* symtab, Layout* layout);
368
f5314dd5
DM		 369 // Create a PLT entry for a global symbol.
370 void
371 make_plt_entry(Symbol_table*, Layout*, Symbol*);
372
8c2bf391
DM		 373 // Create a PLT entry for a local STT_GNU_IFUNC symbol.
374 void
375 make_local_ifunc_plt_entry(Symbol_table*, Layout*,
376 Sized_relobj_file<size, big_endian>* relobj,
377 unsigned int local_sym_index);
378
f5314dd5
DM		 379 // Create a GOT entry for the TLS module index.
380 unsigned int
381 got_mod_index_entry(Symbol_table* symtab, Layout* layout,
6fa2a40b 382 Sized_relobj_file<size, big_endian>* object);
f5314dd5
DM		 383
384 // Return the gsym for "__tls_get_addr". Cache if not already
385 // cached.
386 Symbol*
387 tls_get_addr_sym(Symbol_table* symtab)
388 {
389 if (!this->tls_get_addr_sym_)
390 this->tls_get_addr_sym_ = symtab->lookup("__tls_get_addr", NULL);
391 gold_assert(this->tls_get_addr_sym_);
392 return this->tls_get_addr_sym_;
393 }
394
395 // Get the PLT section.
8c2bf391 396 Output_data_plt_sparc<size, big_endian>*
f5314dd5
DM		 397 plt_section() const
398 {
399 gold_assert(this->plt_ != NULL);
400 return this->plt_;
401 }
402
403 // Get the dynamic reloc section, creating it if necessary.
404 Reloc_section*
405 rela_dyn_section(Layout*);
406
8c2bf391
DM		 407 // Get the section to use for IFUNC relocations.
408 Reloc_section*
409 rela_ifunc_section(Layout*);
410
f5314dd5
DM		 411 // Copy a relocation against a global symbol.
412 void
ef9beddf 413 copy_reloc(Symbol_table* symtab, Layout* layout,
2e702c99 414 Sized_relobj_file<size, big_endian>* object,
12c0daef
ILT		 415 unsigned int shndx, Output_section* output_section,
416 Symbol* sym, const elfcpp::Rela<size, big_endian>& reloc)
417 {
418 this->copy_relocs_.copy_reloc(symtab, layout,
419 symtab->get_sized_symbol<size>(sym),
420 object, shndx, output_section,
421 reloc, this->rela_dyn_section(layout));
422 }
f5314dd5
DM		 423
424 // Information about this specific target which we pass to the
425 // general Target structure.
426 static Target::Target_info sparc_info;
427
428 // The types of GOT entries needed for this platform.
0e70b911
CC		 429 // These values are exposed to the ABI in an incremental link.
430 // Do not renumber existing values without changing the version
431 // number of the .gnu_incremental_inputs section.
f5314dd5
DM		 432 enum Got_type
433 {
434 GOT_TYPE_STANDARD = 0, // GOT entry for a regular symbol
435 GOT_TYPE_TLS_OFFSET = 1, // GOT entry for TLS offset
436 GOT_TYPE_TLS_PAIR = 2, // GOT entry for TLS module/offset pair
437 };
438
439 // The GOT section.
440 Output_data_got<size, big_endian>* got_;
441 // The PLT section.
442 Output_data_plt_sparc<size, big_endian>* plt_;
443 // The dynamic reloc section.
444 Reloc_section* rela_dyn_;
8c2bf391
DM		 445 // The section to use for IFUNC relocs.
446 Reloc_section* rela_ifunc_;
f5314dd5 447 // Relocs saved to avoid a COPY reloc.
12c0daef 448 Copy_relocs<elfcpp::SHT_RELA, size, big_endian> copy_relocs_;
f5314dd5
DM		 449 // Space for variables copied with a COPY reloc.
450 Output_data_space* dynbss_;
451 // Offset of the GOT entry for the TLS module index;
452 unsigned int got_mod_index_offset_;
453 // Cached pointer to __tls_get_addr symbol
454 Symbol* tls_get_addr_sym_;
a4d85145
DM		 455 // Accumulated elf machine type
456 elfcpp::Elf_Half elf_machine_;
457 // Accumulated elf header flags
458 elfcpp::Elf_Word elf_flags_;
459 // Whether elf_flags_ has been set for the first time yet
460 bool elf_flags_set_;
f5314dd5
DM		 461};
462
463template<>
464Target::Target_info Target_sparc<32, true>::sparc_info =
465{
466 32, // size
467 true, // is_big_endian
468 elfcpp::EM_SPARC, // machine_code
469 false, // has_make_symbol
470 false, // has_resolve
471 false, // has_code_fill
472 true, // is_default_stack_executable
b3ce541e 473 false, // can_icf_inline_merge_sections
f5314dd5
DM		 474 '\0', // wrap_char
475 "/usr/lib/ld.so.1", // dynamic_linker
476 0x00010000, // default_text_segment_address
477 64 * 1024, // abi_pagesize (overridable by -z max-page-size)
8a5e3e08 478 8 * 1024, // common_pagesize (overridable by -z common-page-size)
2e702c99
RM		 479 false, // isolate_execinstr
480 0, // rosegment_gap
8a5e3e08
ILT		 481 elfcpp::SHN_UNDEF, // small_common_shndx
482 elfcpp::SHN_UNDEF, // large_common_shndx
483 0, // small_common_section_flags
05a352e6
DK		 484 0, // large_common_section_flags
485 NULL, // attributes_section
a67858e0
CC		 486 NULL, // attributes_vendor
487 "_start" // entry_symbol_name
f5314dd5
DM		 488};
489
490template<>
491Target::Target_info Target_sparc<64, true>::sparc_info =
492{
493 64, // size
494 true, // is_big_endian
495 elfcpp::EM_SPARCV9, // machine_code
496 false, // has_make_symbol
497 false, // has_resolve
498 false, // has_code_fill
499 true, // is_default_stack_executable
b3ce541e 500 false, // can_icf_inline_merge_sections
f5314dd5
DM		 501 '\0', // wrap_char
502 "/usr/lib/sparcv9/ld.so.1", // dynamic_linker
503 0x100000, // default_text_segment_address
504 64 * 1024, // abi_pagesize (overridable by -z max-page-size)
8a5e3e08 505 8 * 1024, // common_pagesize (overridable by -z common-page-size)
2e702c99
RM		 506 false, // isolate_execinstr
507 0, // rosegment_gap
8a5e3e08
ILT		 508 elfcpp::SHN_UNDEF, // small_common_shndx
509 elfcpp::SHN_UNDEF, // large_common_shndx
510 0, // small_common_section_flags
05a352e6
DK		 511 0, // large_common_section_flags
512 NULL, // attributes_section
a67858e0
CC		 513 NULL, // attributes_vendor
514 "_start" // entry_symbol_name
f5314dd5
DM		 515};
516
517// We have to take care here, even when operating in little-endian
518// mode, sparc instructions are still big endian.
519template<int size, bool big_endian>
520class Sparc_relocate_functions
521{
522private:
523 // Do a simple relocation with the addend in the relocation.
524 template<int valsize>
525 static inline void
526 rela(unsigned char* view,
527 unsigned int right_shift,
528 typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
2ea97941 529 typename elfcpp::Swap<size, big_endian>::Valtype value,
f5314dd5
DM		 530 typename elfcpp::Swap<size, big_endian>::Valtype addend)
531 {
532 typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
533 Valtype* wv = reinterpret_cast<Valtype*>(view);
534 Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
2ea97941 535 Valtype reloc = ((value + addend) >> right_shift);
f5314dd5
DM		 536
537 val &= ~dst_mask;
538 reloc &= dst_mask;
539
540 elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
541 }
542
543 // Do a simple relocation using a symbol value with the addend in
544 // the relocation.
545 template<int valsize>
546 static inline void
547 rela(unsigned char* view,
548 unsigned int right_shift,
549 typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
6fa2a40b 550 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 551 const Symbol_value<size>* psymval,
552 typename elfcpp::Swap<valsize, big_endian>::Valtype addend)
553 {
554 typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
555 Valtype* wv = reinterpret_cast<Valtype*>(view);
556 Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
557 Valtype reloc = (psymval->value(object, addend) >> right_shift);
558
559 val &= ~dst_mask;
560 reloc &= dst_mask;
561
562 elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
563 }
564
565 // Do a simple relocation using a symbol value with the addend in
566 // the relocation, unaligned.
567 template<int valsize>
568 static inline void
569 rela_ua(unsigned char* view,
570 unsigned int right_shift, elfcpp::Elf_Xword dst_mask,
6fa2a40b 571 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 572 const Symbol_value<size>* psymval,
573 typename elfcpp::Swap<size, big_endian>::Valtype addend)
574 {
575 typedef typename elfcpp::Swap_unaligned<valsize,
576 big_endian>::Valtype Valtype;
577 unsigned char* wv = view;
578 Valtype val = elfcpp::Swap_unaligned<valsize, big_endian>::readval(wv);
579 Valtype reloc = (psymval->value(object, addend) >> right_shift);
580
581 val &= ~dst_mask;
582 reloc &= dst_mask;
583
584 elfcpp::Swap_unaligned<valsize, big_endian>::writeval(wv, val | reloc);
585 }
586
587 // Do a simple PC relative relocation with a Symbol_value with the
588 // addend in the relocation.
589 template<int valsize>
590 static inline void
591 pcrela(unsigned char* view,
592 unsigned int right_shift,
593 typename elfcpp::Elf_types<valsize>::Elf_Addr dst_mask,
6fa2a40b 594 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 595 const Symbol_value<size>* psymval,
596 typename elfcpp::Swap<size, big_endian>::Valtype addend,
597 typename elfcpp::Elf_types<size>::Elf_Addr address)
598 {
599 typedef typename elfcpp::Swap<valsize, big_endian>::Valtype Valtype;
600 Valtype* wv = reinterpret_cast<Valtype*>(view);
601 Valtype val = elfcpp::Swap<valsize, big_endian>::readval(wv);
602 Valtype reloc = ((psymval->value(object, addend) - address)
603 >> right_shift);
604
605 val &= ~dst_mask;
606 reloc &= dst_mask;
607
608 elfcpp::Swap<valsize, big_endian>::writeval(wv, val | reloc);
609 }
610
611 template<int valsize>
612 static inline void
613 pcrela_unaligned(unsigned char* view,
6fa2a40b 614 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 615 const Symbol_value<size>* psymval,
616 typename elfcpp::Swap<size, big_endian>::Valtype addend,
617 typename elfcpp::Elf_types<size>::Elf_Addr address)
618 {
619 typedef typename elfcpp::Swap_unaligned<valsize,
620 big_endian>::Valtype Valtype;
621 unsigned char* wv = view;
622 Valtype reloc = (psymval->value(object, addend) - address);
623
624 elfcpp::Swap_unaligned<valsize, big_endian>::writeval(wv, reloc);
625 }
626
627 typedef Sparc_relocate_functions<size, big_endian> This;
628 typedef Sparc_relocate_functions<size, true> This_insn;
629
630public:
631 // R_SPARC_WDISP30: (Symbol + Addend - Address) >> 2
632 static inline void
633 wdisp30(unsigned char* view,
6fa2a40b 634 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 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, 2, 0x3fffffff, object,
640 psymval, addend, address);
641 }
642
643 // R_SPARC_WDISP22: (Symbol + Addend - Address) >> 2
644 static inline void
645 wdisp22(unsigned char* view,
6fa2a40b 646 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 647 const Symbol_value<size>* psymval,
648 typename elfcpp::Elf_types<size>::Elf_Addr addend,
649 typename elfcpp::Elf_types<size>::Elf_Addr address)
650 {
651 This_insn::template pcrela<32>(view, 2, 0x003fffff, object,
652 psymval, addend, address);
653 }
654
655 // R_SPARC_WDISP19: (Symbol + Addend - Address) >> 2
656 static inline void
657 wdisp19(unsigned char* view,
6fa2a40b 658 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 659 const Symbol_value<size>* psymval,
660 typename elfcpp::Elf_types<size>::Elf_Addr addend,
661 typename elfcpp::Elf_types<size>::Elf_Addr address)
662 {
663 This_insn::template pcrela<32>(view, 2, 0x0007ffff, object,
664 psymval, addend, address);
665 }
666
667 // R_SPARC_WDISP16: (Symbol + Addend - Address) >> 2
668 static inline void
669 wdisp16(unsigned char* view,
6fa2a40b 670 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 671 const Symbol_value<size>* psymval,
672 typename elfcpp::Elf_types<size>::Elf_Addr addend,
673 typename elfcpp::Elf_types<size>::Elf_Addr address)
674 {
675 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
676 Valtype* wv = reinterpret_cast<Valtype*>(view);
677 Valtype val = elfcpp::Swap<32, true>::readval(wv);
678 Valtype reloc = ((psymval->value(object, addend) - address)
679 >> 2);
680
681 // The relocation value is split between the low 14 bits,
682 // and bits 20-21.
683 val &= ~((0x3 << 20) | 0x3fff);
684 reloc = (((reloc & 0xc000) << (20 - 14))
685 | (reloc & 0x3ffff));
686
687 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
688 }
689
2615994e
DM		 690 // R_SPARC_WDISP10: (Symbol + Addend - Address) >> 2
691 static inline void
692 wdisp10(unsigned char* view,
693 const Sized_relobj_file<size, big_endian>* object,
694 const Symbol_value<size>* psymval,
695 typename elfcpp::Elf_types<size>::Elf_Addr addend,
696 typename elfcpp::Elf_types<size>::Elf_Addr address)
697 {
698 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
699 Valtype* wv = reinterpret_cast<Valtype*>(view);
700 Valtype val = elfcpp::Swap<32, true>::readval(wv);
701 Valtype reloc = ((psymval->value(object, addend) - address)
702 >> 2);
703
704 // The relocation value is split between the low bits 5-12,
705 // and high bits 19-20.
706 val &= ~((0x3 << 19) | (0xff << 5));
707 reloc = (((reloc & 0x300) << (19 - 8))
708 | ((reloc & 0xff) << (5 - 0)));
709
710 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
711 }
712
f5314dd5
DM		 713 // R_SPARC_PC22: (Symbol + Addend - Address) >> 10
714 static inline void
715 pc22(unsigned char* view,
6fa2a40b 716 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 717 const Symbol_value<size>* psymval,
718 typename elfcpp::Elf_types<size>::Elf_Addr addend,
719 typename elfcpp::Elf_types<size>::Elf_Addr address)
720 {
721 This_insn::template pcrela<32>(view, 10, 0x003fffff, object,
722 psymval, addend, address);
723 }
724
725 // R_SPARC_PC10: (Symbol + Addend - Address) & 0x3ff
726 static inline void
727 pc10(unsigned char* view,
6fa2a40b 728 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 729 const Symbol_value<size>* psymval,
730 typename elfcpp::Elf_types<size>::Elf_Addr addend,
731 typename elfcpp::Elf_types<size>::Elf_Addr address)
732 {
733 This_insn::template pcrela<32>(view, 0, 0x000003ff, object,
734 psymval, addend, address);
735 }
736
737 // R_SPARC_HI22: (Symbol + Addend) >> 10
738 static inline void
739 hi22(unsigned char* view,
2ea97941 740 typename elfcpp::Elf_types<size>::Elf_Addr value,
f5314dd5
DM		 741 typename elfcpp::Elf_types<size>::Elf_Addr addend)
742 {
2ea97941 743 This_insn::template rela<32>(view, 10, 0x003fffff, value, addend);
f5314dd5
DM		 744 }
745
746 // R_SPARC_HI22: (Symbol + Addend) >> 10
747 static inline void
748 hi22(unsigned char* view,
6fa2a40b 749 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 750 const Symbol_value<size>* psymval,
751 typename elfcpp::Elf_types<size>::Elf_Addr addend)
752 {
753 This_insn::template rela<32>(view, 10, 0x003fffff, object, psymval, addend);
754 }
755
756 // R_SPARC_PCPLT22: (Symbol + Addend - Address) >> 10
757 static inline void
758 pcplt22(unsigned char* view,
6fa2a40b 759 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 760 const Symbol_value<size>* psymval,
761 typename elfcpp::Elf_types<size>::Elf_Addr addend,
762 typename elfcpp::Elf_types<size>::Elf_Addr address)
763 {
764 This_insn::template pcrela<32>(view, 10, 0x003fffff, object,
765 psymval, addend, address);
766 }
767
768 // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
769 static inline void
770 lo10(unsigned char* view,
2ea97941 771 typename elfcpp::Elf_types<size>::Elf_Addr value,
f5314dd5
DM		 772 typename elfcpp::Elf_types<size>::Elf_Addr addend)
773 {
2ea97941 774 This_insn::template rela<32>(view, 0, 0x000003ff, value, addend);
f5314dd5
DM		 775 }
776
777 // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
778 static inline void
779 lo10(unsigned char* view,
6fa2a40b 780 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 781 const Symbol_value<size>* psymval,
782 typename elfcpp::Elf_types<size>::Elf_Addr addend)
783 {
784 This_insn::template rela<32>(view, 0, 0x000003ff, object, psymval, addend);
785 }
786
787 // R_SPARC_LO10: (Symbol + Addend) & 0x3ff
788 static inline void
789 lo10(unsigned char* view,
6fa2a40b 790 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 791 const Symbol_value<size>* psymval,
792 typename elfcpp::Elf_types<size>::Elf_Addr addend,
793 typename elfcpp::Elf_types<size>::Elf_Addr address)
794 {
795 This_insn::template pcrela<32>(view, 0, 0x000003ff, object,
796 psymval, addend, address);
797 }
798
799 // R_SPARC_OLO10: ((Symbol + Addend) & 0x3ff) + Addend2
800 static inline void
801 olo10(unsigned char* view,
6fa2a40b 802 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 803 const Symbol_value<size>* psymval,
804 typename elfcpp::Elf_types<size>::Elf_Addr addend,
805 typename elfcpp::Elf_types<size>::Elf_Addr addend2)
806 {
807 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
808 Valtype* wv = reinterpret_cast<Valtype*>(view);
809 Valtype val = elfcpp::Swap<32, true>::readval(wv);
810 Valtype reloc = psymval->value(object, addend);
811
812 val &= ~0x1fff;
813 reloc &= 0x3ff;
814 reloc += addend2;
815 reloc &= 0x1fff;
816
817 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
818 }
819
820 // R_SPARC_22: (Symbol + Addend)
821 static inline void
822 rela32_22(unsigned char* view,
6fa2a40b 823 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 824 const Symbol_value<size>* psymval,
825 typename elfcpp::Elf_types<size>::Elf_Addr addend)
826 {
827 This_insn::template rela<32>(view, 0, 0x003fffff, object, psymval, addend);
828 }
829
830 // R_SPARC_13: (Symbol + Addend)
831 static inline void
832 rela32_13(unsigned char* view,
2ea97941 833 typename elfcpp::Elf_types<size>::Elf_Addr value,
f5314dd5
DM		 834 typename elfcpp::Elf_types<size>::Elf_Addr addend)
835 {
2ea97941 836 This_insn::template rela<32>(view, 0, 0x00001fff, value, addend);
f5314dd5
DM		 837 }
838
839 // R_SPARC_13: (Symbol + Addend)
840 static inline void
841 rela32_13(unsigned char* view,
6fa2a40b 842 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 843 const Symbol_value<size>* psymval,
844 typename elfcpp::Elf_types<size>::Elf_Addr addend)
845 {
846 This_insn::template rela<32>(view, 0, 0x00001fff, object, psymval, addend);
847 }
848
849 // R_SPARC_UA16: (Symbol + Addend)
850 static inline void
851 ua16(unsigned char* view,
6fa2a40b 852 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 853 const Symbol_value<size>* psymval,
854 typename elfcpp::Elf_types<size>::Elf_Addr addend)
855 {
856 This::template rela_ua<16>(view, 0, 0xffff, object, psymval, addend);
857 }
858
859 // R_SPARC_UA32: (Symbol + Addend)
860 static inline void
861 ua32(unsigned char* view,
6fa2a40b 862 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 863 const Symbol_value<size>* psymval,
864 typename elfcpp::Elf_types<size>::Elf_Addr addend)
865 {
866 This::template rela_ua<32>(view, 0, 0xffffffff, object, psymval, addend);
867 }
868
869 // R_SPARC_UA64: (Symbol + Addend)
870 static inline void
871 ua64(unsigned char* view,
6fa2a40b 872 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 873 const Symbol_value<size>* psymval,
874 typename elfcpp::Elf_types<size>::Elf_Addr addend)
875 {
876 This::template rela_ua<64>(view, 0, ~(elfcpp::Elf_Xword) 0,
877 object, psymval, addend);
878 }
879
880 // R_SPARC_DISP8: (Symbol + Addend - Address)
881 static inline void
882 disp8(unsigned char* view,
6fa2a40b 883 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 884 const Symbol_value<size>* psymval,
885 typename elfcpp::Elf_types<size>::Elf_Addr addend,
886 typename elfcpp::Elf_types<size>::Elf_Addr address)
887 {
888 This::template pcrela_unaligned<8>(view, object, psymval,
889 addend, address);
890 }
891
892 // R_SPARC_DISP16: (Symbol + Addend - Address)
893 static inline void
894 disp16(unsigned char* view,
6fa2a40b 895 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 896 const Symbol_value<size>* psymval,
897 typename elfcpp::Elf_types<size>::Elf_Addr addend,
898 typename elfcpp::Elf_types<size>::Elf_Addr address)
899 {
900 This::template pcrela_unaligned<16>(view, object, psymval,
901 addend, address);
902 }
903
904 // R_SPARC_DISP32: (Symbol + Addend - Address)
905 static inline void
906 disp32(unsigned char* view,
6fa2a40b 907 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 908 const Symbol_value<size>* psymval,
909 typename elfcpp::Elf_types<size>::Elf_Addr addend,
910 typename elfcpp::Elf_types<size>::Elf_Addr address)
911 {
912 This::template pcrela_unaligned<32>(view, object, psymval,
913 addend, address);
914 }
915
916 // R_SPARC_DISP64: (Symbol + Addend - Address)
917 static inline void
918 disp64(unsigned char* view,
6fa2a40b 919 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 920 const Symbol_value<size>* psymval,
921 elfcpp::Elf_Xword addend,
922 typename elfcpp::Elf_types<size>::Elf_Addr address)
923 {
924 This::template pcrela_unaligned<64>(view, object, psymval,
925 addend, address);
926 }
927
2615994e
DM		 928 // R_SPARC_H34: (Symbol + Addend) >> 12
929 static inline void
930 h34(unsigned char* view,
931 const Sized_relobj_file<size, big_endian>* object,
932 const Symbol_value<size>* psymval,
933 typename elfcpp::Elf_types<size>::Elf_Addr addend)
934 {
935 This_insn::template rela<32>(view, 12, 0x003fffff, object, psymval, addend);
936 }
937
f5314dd5
DM		 938 // R_SPARC_H44: (Symbol + Addend) >> 22
939 static inline void
940 h44(unsigned char* view,
6fa2a40b 941 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 942 const Symbol_value<size>* psymval,
943 typename elfcpp::Elf_types<size>::Elf_Addr addend)
944 {
945 This_insn::template rela<32>(view, 22, 0x003fffff, object, psymval, addend);
946 }
947
948 // R_SPARC_M44: ((Symbol + Addend) >> 12) & 0x3ff
949 static inline void
950 m44(unsigned char* view,
6fa2a40b 951 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 952 const Symbol_value<size>* psymval,
953 typename elfcpp::Elf_types<size>::Elf_Addr addend)
954 {
955 This_insn::template rela<32>(view, 12, 0x000003ff, object, psymval, addend);
956 }
957
958 // R_SPARC_L44: (Symbol + Addend) & 0xfff
959 static inline void
960 l44(unsigned char* view,
6fa2a40b 961 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 962 const Symbol_value<size>* psymval,
963 typename elfcpp::Elf_types<size>::Elf_Addr addend)
964 {
965 This_insn::template rela<32>(view, 0, 0x00000fff, object, psymval, addend);
966 }
967
968 // R_SPARC_HH22: (Symbol + Addend) >> 42
969 static inline void
970 hh22(unsigned char* view,
6fa2a40b 971 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 972 const Symbol_value<size>* psymval,
973 typename elfcpp::Elf_types<size>::Elf_Addr addend)
974 {
975 This_insn::template rela<32>(view, 42, 0x003fffff, object, psymval, addend);
976 }
977
978 // R_SPARC_PC_HH22: (Symbol + Addend - Address) >> 42
979 static inline void
980 pc_hh22(unsigned char* view,
6fa2a40b 981 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 982 const Symbol_value<size>* psymval,
983 typename elfcpp::Elf_types<size>::Elf_Addr addend,
984 typename elfcpp::Elf_types<size>::Elf_Addr address)
985 {
986 This_insn::template pcrela<32>(view, 42, 0x003fffff, object,
987 psymval, addend, address);
988 }
989
990 // R_SPARC_HM10: ((Symbol + Addend) >> 32) & 0x3ff
991 static inline void
992 hm10(unsigned char* view,
6fa2a40b 993 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 994 const Symbol_value<size>* psymval,
995 typename elfcpp::Elf_types<size>::Elf_Addr addend)
996 {
997 This_insn::template rela<32>(view, 32, 0x000003ff, object, psymval, addend);
998 }
999
1000 // R_SPARC_PC_HM10: ((Symbol + Addend - Address) >> 32) & 0x3ff
1001 static inline void
1002 pc_hm10(unsigned char* view,
6fa2a40b 1003 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 1004 const Symbol_value<size>* psymval,
1005 typename elfcpp::Elf_types<size>::Elf_Addr addend,
1006 typename elfcpp::Elf_types<size>::Elf_Addr address)
1007 {
1008 This_insn::template pcrela<32>(view, 32, 0x000003ff, object,
1009 psymval, addend, address);
1010 }
1011
1012 // R_SPARC_11: (Symbol + Addend)
1013 static inline void
1014 rela32_11(unsigned char* view,
6fa2a40b 1015 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 1016 const Symbol_value<size>* psymval,
1017 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1018 {
1019 This_insn::template rela<32>(view, 0, 0x000007ff, object, psymval, addend);
1020 }
1021
1022 // R_SPARC_10: (Symbol + Addend)
1023 static inline void
1024 rela32_10(unsigned char* view,
6fa2a40b 1025 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 1026 const Symbol_value<size>* psymval,
1027 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1028 {
1029 This_insn::template rela<32>(view, 0, 0x000003ff, object, psymval, addend);
1030 }
1031
1032 // R_SPARC_7: (Symbol + Addend)
1033 static inline void
1034 rela32_7(unsigned char* view,
6fa2a40b 1035 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 1036 const Symbol_value<size>* psymval,
1037 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1038 {
1039 This_insn::template rela<32>(view, 0, 0x0000007f, object, psymval, addend);
1040 }
1041
1042 // R_SPARC_6: (Symbol + Addend)
1043 static inline void
1044 rela32_6(unsigned char* view,
6fa2a40b 1045 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 1046 const Symbol_value<size>* psymval,
1047 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1048 {
1049 This_insn::template rela<32>(view, 0, 0x0000003f, object, psymval, addend);
1050 }
1051
1052 // R_SPARC_5: (Symbol + Addend)
1053 static inline void
1054 rela32_5(unsigned char* view,
6fa2a40b 1055 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 1056 const Symbol_value<size>* psymval,
1057 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1058 {
1059 This_insn::template rela<32>(view, 0, 0x0000001f, object, psymval, addend);
1060 }
1061
1062 // R_SPARC_TLS_LDO_HIX22: @dtpoff(Symbol + Addend) >> 10
1063 static inline void
1064 ldo_hix22(unsigned char* view,
2ea97941 1065 typename elfcpp::Elf_types<size>::Elf_Addr value,
f5314dd5
DM		 1066 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1067 {
2ea97941 1068 This_insn::hi22(view, value, addend);
f5314dd5
DM		 1069 }
1070
1071 // R_SPARC_TLS_LDO_LOX10: @dtpoff(Symbol + Addend) & 0x3ff
1072 static inline void
1073 ldo_lox10(unsigned char* view,
2ea97941 1074 typename elfcpp::Elf_types<size>::Elf_Addr value,
f5314dd5
DM		 1075 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1076 {
1077 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1078 Valtype* wv = reinterpret_cast<Valtype*>(view);
1079 Valtype val = elfcpp::Swap<32, true>::readval(wv);
2ea97941 1080 Valtype reloc = (value + addend);
f5314dd5
DM		 1081
1082 val &= ~0x1fff;
1083 reloc &= 0x3ff;
1084
1085 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1086 }
1087
1088 // R_SPARC_TLS_LE_HIX22: (@tpoff(Symbol + Addend) ^ 0xffffffffffffffff) >> 10
1089 static inline void
1090 hix22(unsigned char* view,
2ea97941 1091 typename elfcpp::Elf_types<size>::Elf_Addr value,
f5314dd5
DM		 1092 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1093 {
1094 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1095 Valtype* wv = reinterpret_cast<Valtype*>(view);
1096 Valtype val = elfcpp::Swap<32, true>::readval(wv);
2ea97941 1097 Valtype reloc = (value + addend);
f5314dd5
DM		 1098
1099 val &= ~0x3fffff;
1100
1101 reloc ^= ~(Valtype)0;
1102 reloc >>= 10;
1103
1104 reloc &= 0x3fffff;
1105
1106 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1107 }
1108
2a1079e8
DM		 1109 // R_SPARC_GOTDATA_OP_HIX22: @gdopoff(Symbol + Addend) >> 10
1110 static inline void
1111 gdop_hix22(unsigned char* view,
1112 typename elfcpp::Elf_types<size>::Elf_Addr value,
1113 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1114 {
1115 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1116 Valtype* wv = reinterpret_cast<Valtype*>(view);
1117 Valtype val = elfcpp::Swap<32, true>::readval(wv);
1118 int32_t reloc = static_cast<int32_t>(value + addend);
1119
1120 val &= ~0x3fffff;
1121
1122 if (reloc < 0)
1123 reloc ^= ~static_cast<int32_t>(0);
1124 reloc >>= 10;
1125
1126 reloc &= 0x3fffff;
1127
1128 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1129 }
1130
f5314dd5
DM		 1131 // R_SPARC_HIX22: ((Symbol + Addend) ^ 0xffffffffffffffff) >> 10
1132 static inline void
1133 hix22(unsigned char* view,
6fa2a40b 1134 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 1135 const Symbol_value<size>* psymval,
1136 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1137 {
1138 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1139 Valtype* wv = reinterpret_cast<Valtype*>(view);
1140 Valtype val = elfcpp::Swap<32, true>::readval(wv);
1141 Valtype reloc = psymval->value(object, addend);
1142
1143 val &= ~0x3fffff;
1144
1145 reloc ^= ~(Valtype)0;
1146 reloc >>= 10;
1147
1148 reloc &= 0x3fffff;
1149
1150 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1151 }
1152
1153
1154 // R_SPARC_TLS_LE_LOX10: (@tpoff(Symbol + Addend) & 0x3ff) | 0x1c00
1155 static inline void
1156 lox10(unsigned char* view,
2ea97941 1157 typename elfcpp::Elf_types<size>::Elf_Addr value,
f5314dd5
DM		 1158 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1159 {
1160 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1161 Valtype* wv = reinterpret_cast<Valtype*>(view);
1162 Valtype val = elfcpp::Swap<32, true>::readval(wv);
2ea97941 1163 Valtype reloc = (value + addend);
f5314dd5
DM		 1164
1165 val &= ~0x1fff;
1166 reloc &= 0x3ff;
1167 reloc |= 0x1c00;
1168
1169 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1170 }
1171
2a1079e8
DM		 1172 // R_SPARC_GOTDATA_OP_LOX10: (@gdopoff(Symbol + Addend) & 0x3ff) | 0x1c00
1173 static inline void
1174 gdop_lox10(unsigned char* view,
1175 typename elfcpp::Elf_types<size>::Elf_Addr value,
1176 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1177 {
1178 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1179 Valtype* wv = reinterpret_cast<Valtype*>(view);
1180 Valtype val = elfcpp::Swap<32, true>::readval(wv);
1181 int32_t reloc = static_cast<int32_t>(value + addend);
1182
1183 if (reloc < 0)
1184 reloc = (reloc & 0x3ff) | 0x1c00;
1185 else
1186 reloc = (reloc & 0x3ff);
1187
1188 val &= ~0x1fff;
1189 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1190 }
1191
f5314dd5
DM		 1192 // R_SPARC_LOX10: ((Symbol + Addend) & 0x3ff) | 0x1c00
1193 static inline void
1194 lox10(unsigned char* view,
6fa2a40b 1195 const Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 1196 const Symbol_value<size>* psymval,
1197 typename elfcpp::Elf_types<size>::Elf_Addr addend)
1198 {
1199 typedef typename elfcpp::Swap<32, true>::Valtype Valtype;
1200 Valtype* wv = reinterpret_cast<Valtype*>(view);
1201 Valtype val = elfcpp::Swap<32, true>::readval(wv);
1202 Valtype reloc = psymval->value(object, addend);
1203
1204 val &= ~0x1fff;
1205 reloc &= 0x3ff;
1206 reloc |= 0x1c00;
1207
1208 elfcpp::Swap<32, true>::writeval(wv, val | reloc);
1209 }
1210};
1211
1212// Get the GOT section, creating it if necessary.
1213
1214template<int size, bool big_endian>
1215Output_data_got<size, big_endian>*
1216Target_sparc<size, big_endian>::got_section(Symbol_table* symtab,
1217 Layout* layout)
1218{
1219 if (this->got_ == NULL)
1220 {
1221 gold_assert(symtab != NULL && layout != NULL);
1222
1223 this->got_ = new Output_data_got<size, big_endian>();
1224
82742395
ILT		 1225 layout->add_output_section_data(".got", elfcpp::SHT_PROGBITS,
1226 (elfcpp::SHF_ALLOC
1227 | elfcpp::SHF_WRITE),
22f0da72 1228 this->got_, ORDER_RELRO, true);
f5314dd5
DM		 1229
1230 // Define _GLOBAL_OFFSET_TABLE_ at the start of the .got section.
1231 symtab->define_in_output_data("_GLOBAL_OFFSET_TABLE_", NULL,
99fff23b 1232 Symbol_table::PREDEFINED,
f5314dd5
DM		 1233 this->got_,
1234 0, 0, elfcpp::STT_OBJECT,
1235 elfcpp::STB_LOCAL,
1236 elfcpp::STV_HIDDEN, 0,
1237 false, false);
1238 }
1239
1240 return this->got_;
1241}
1242
1243// Get the dynamic reloc section, creating it if necessary.
1244
1245template<int size, bool big_endian>
1246typename Target_sparc<size, big_endian>::Reloc_section*
1247Target_sparc<size, big_endian>::rela_dyn_section(Layout* layout)
1248{
1249 if (this->rela_dyn_ == NULL)
1250 {
1251 gold_assert(layout != NULL);
d98bc257 1252 this->rela_dyn_ = new Reloc_section(parameters->options().combreloc());
f5314dd5 1253 layout->add_output_section_data(".rela.dyn", elfcpp::SHT_RELA,
22f0da72
ILT		 1254 elfcpp::SHF_ALLOC, this->rela_dyn_,
1255 ORDER_DYNAMIC_RELOCS, false);
f5314dd5
DM		 1256 }
1257 return this->rela_dyn_;
1258}
1259
8c2bf391
DM		 1260// Get the section to use for IFUNC relocs, creating it if
1261// necessary. These go in .rela.dyn, but only after all other dynamic
1262// relocations. They need to follow the other dynamic relocations so
1263// that they can refer to global variables initialized by those
1264// relocs.
1265
1266template<int size, bool big_endian>
1267typename Target_sparc<size, big_endian>::Reloc_section*
1268Target_sparc<size, big_endian>::rela_ifunc_section(Layout* layout)
1269{
1270 if (this->rela_ifunc_ == NULL)
1271 {
1272 // Make sure we have already created the dynamic reloc section.
1273 this->rela_dyn_section(layout);
1274 this->rela_ifunc_ = new Reloc_section(false);
1275 layout->add_output_section_data(".rela.dyn", elfcpp::SHT_RELA,
1276 elfcpp::SHF_ALLOC, this->rela_ifunc_,
1277 ORDER_DYNAMIC_RELOCS, false);
1278 gold_assert(this->rela_dyn_->output_section()
1279 == this->rela_ifunc_->output_section());
1280 }
1281 return this->rela_ifunc_;
1282}
1283
f5314dd5
DM		 1284// A class to handle the PLT data.
1285
1286template<int size, bool big_endian>
1287class Output_data_plt_sparc : public Output_section_data
1288{
1289 public:
1290 typedef Output_data_reloc<elfcpp::SHT_RELA, true,
1291 size, big_endian> Reloc_section;
1292
1293 Output_data_plt_sparc(Layout*);
1294
1295 // Add an entry to the PLT.
8c2bf391
DM		 1296 void add_entry(Symbol_table* symtab, Layout* layout, Symbol* gsym);
1297
1298 // Add an entry to the PLT for a local STT_GNU_IFUNC symbol.
1299 unsigned int
1300 add_local_ifunc_entry(Symbol_table*, Layout*,
1301 Sized_relobj_file<size, big_endian>* relobj,
1302 unsigned int local_sym_index);
f5314dd5
DM		 1303
1304 // Return the .rela.plt section data.
1305 const Reloc_section* rel_plt() const
1306 {
1307 return this->rel_;
1308 }
1309
8c2bf391
DM		 1310 // Return where the IFUNC relocations should go.
1311 Reloc_section*
1312 rela_ifunc(Symbol_table*, Layout*);
1313
1314 void
1315 emit_pending_ifunc_relocs();
1316
1317 // Return whether we created a section for IFUNC relocations.
1318 bool
1319 has_ifunc_section() const
1320 { return this->ifunc_rel_ != NULL; }
1321
0e70b911
CC		 1322 // Return the number of PLT entries.
1323 unsigned int
1324 entry_count() const
8c2bf391 1325 { return this->count_ + this->ifunc_count_; }
0e70b911
CC		 1326
1327 // Return the offset of the first non-reserved PLT entry.
1328 static unsigned int
1329 first_plt_entry_offset()
1330 { return 4 * base_plt_entry_size; }
1331
1332 // Return the size of a PLT entry.
1333 static unsigned int
1334 get_plt_entry_size()
1335 { return base_plt_entry_size; }
1336
8c2bf391
DM		 1337 // Return the PLT address to use for a global symbol.
1338 uint64_t
1339 address_for_global(const Symbol*);
1340
1341 // Return the PLT address to use for a local symbol.
1342 uint64_t
1343 address_for_local(const Relobj*, unsigned int symndx);
1344
f5314dd5
DM		 1345 protected:
1346 void do_adjust_output_section(Output_section* os);
1347
7d9e3d98
ILT		 1348 // Write to a map file.
1349 void
1350 do_print_to_mapfile(Mapfile* mapfile) const
1351 { mapfile->print_output_data(this, _("** PLT")); }
1352
f5314dd5
DM		 1353 private:
1354 // The size of an entry in the PLT.
1355 static const int base_plt_entry_size = (size == 32 ? 12 : 32);
1356
1357 static const unsigned int plt_entries_per_block = 160;
1358 static const unsigned int plt_insn_chunk_size = 24;
1359 static const unsigned int plt_pointer_chunk_size = 8;
1360 static const unsigned int plt_block_size =
1361 (plt_entries_per_block
1362 * (plt_insn_chunk_size + plt_pointer_chunk_size));
1363
8c2bf391
DM		 1364 section_offset_type
1365 plt_index_to_offset(unsigned int index)
f5314dd5 1366 {
8c2bf391 1367 section_offset_type offset;
f5314dd5 1368
8c2bf391
DM		 1369 if (size == 32 || index < 32768)
1370 offset = index * base_plt_entry_size;
f5314dd5
DM		 1371 else
1372 {
8c2bf391 1373 unsigned int ext_index = index - 32768;
f5314dd5 1374
8c2bf391
DM		 1375 offset = (32768 * base_plt_entry_size)
1376 + ((ext_index / plt_entries_per_block)
1377 * plt_block_size)
1378 + ((ext_index % plt_entries_per_block)
1379 * plt_insn_chunk_size);
f5314dd5 1380 }
8c2bf391
DM		 1381 return offset;
1382 }
1383
1384 // Set the final size.
1385 void
1386 set_final_data_size()
1387 {
1388 unsigned int full_count = this->entry_count() + 4;
1389 unsigned int extra = (size == 32 ? 4 : 0);
1390 section_offset_type sz = plt_index_to_offset(full_count) + extra;
1391
1392 return this->set_data_size(sz);
f5314dd5
DM		 1393 }
1394
1395 // Write out the PLT data.
1396 void
1397 do_write(Output_file*);
1398
8c2bf391
DM		 1399 struct Global_ifunc
1400 {
1401 Reloc_section* rel;
1402 Symbol* gsym;
1403 unsigned int plt_index;
1404 };
1405
1406 struct Local_ifunc
1407 {
1408 Reloc_section* rel;
1409 Sized_relobj_file<size, big_endian>* object;
1410 unsigned int local_sym_index;
1411 unsigned int plt_index;
1412 };
1413
f5314dd5
DM		 1414 // The reloc section.
1415 Reloc_section* rel_;
8c2bf391
DM		 1416 // The IFUNC relocations, if necessary. These must follow the
1417 // regular relocations.
1418 Reloc_section* ifunc_rel_;
f5314dd5
DM		 1419 // The number of PLT entries.
1420 unsigned int count_;
8c2bf391
DM		 1421 // The number of PLT entries for IFUNC symbols.
1422 unsigned int ifunc_count_;
1423 // Global STT_GNU_IFUNC symbols.
1424 std::vector<Global_ifunc> global_ifuncs_;
1425 // Local STT_GNU_IFUNC symbols.
1426 std::vector<Local_ifunc> local_ifuncs_;
f5314dd5
DM		 1427};
1428
4f2a9edd
ILT		 1429// Define the constants as required by C++ standard.
1430
1431template<int size, bool big_endian>
1432const int Output_data_plt_sparc<size, big_endian>::base_plt_entry_size;
1433
1434template<int size, bool big_endian>
1435const unsigned int
1436Output_data_plt_sparc<size, big_endian>::plt_entries_per_block;
1437
1438template<int size, bool big_endian>
1439const unsigned int Output_data_plt_sparc<size, big_endian>::plt_insn_chunk_size;
1440
1441template<int size, bool big_endian>
1442const unsigned int
1443Output_data_plt_sparc<size, big_endian>::plt_pointer_chunk_size;
1444
1445template<int size, bool big_endian>
1446const unsigned int Output_data_plt_sparc<size, big_endian>::plt_block_size;
1447
f5314dd5
DM		 1448// Create the PLT section. The ordinary .got section is an argument,
1449// since we need to refer to the start.
1450
1451template<int size, bool big_endian>
1452Output_data_plt_sparc<size, big_endian>::Output_data_plt_sparc(Layout* layout)
8c2bf391
DM		 1453 : Output_section_data(size == 32 ? 4 : 8), ifunc_rel_(NULL),
1454 count_(0), ifunc_count_(0), global_ifuncs_(), local_ifuncs_()
f5314dd5 1455{
d98bc257 1456 this->rel_ = new Reloc_section(false);
f5314dd5 1457 layout->add_output_section_data(".rela.plt", elfcpp::SHT_RELA,
22f0da72
ILT		 1458 elfcpp::SHF_ALLOC, this->rel_,
1459 ORDER_DYNAMIC_PLT_RELOCS, false);
f5314dd5
DM		 1460}
1461
1462template<int size, bool big_endian>
1463void
1464Output_data_plt_sparc<size, big_endian>::do_adjust_output_section(Output_section* os)
1465{
1466 os->set_entsize(0);
1467}
1468
1469// Add an entry to the PLT.
1470
1471template<int size, bool big_endian>
1472void
8c2bf391
DM		 1473Output_data_plt_sparc<size, big_endian>::add_entry(Symbol_table* symtab,
1474 Layout* layout,
1475 Symbol* gsym)
f5314dd5
DM		 1476{
1477 gold_assert(!gsym->has_plt_offset());
1478
f5314dd5 1479 section_offset_type plt_offset;
8c2bf391 1480 unsigned int index;
f5314dd5 1481
8c2bf391
DM		 1482 if (gsym->type() == elfcpp::STT_GNU_IFUNC
1483 && gsym->can_use_relative_reloc(false))
1484 {
1485 index = this->ifunc_count_;
1486 plt_offset = plt_index_to_offset(index);
1487 gsym->set_plt_offset(plt_offset);
1488 ++this->ifunc_count_;
1489 Reloc_section* rel = this->rela_ifunc(symtab, layout);
1490
1491 struct Global_ifunc gi;
1492 gi.rel = rel;
1493 gi.gsym = gsym;
1494 gi.plt_index = index;
1495 this->global_ifuncs_.push_back(gi);
1496 }
f5314dd5
DM		 1497 else
1498 {
8c2bf391
DM		 1499 plt_offset = plt_index_to_offset(this->count_ + 4);
1500 gsym->set_plt_offset(plt_offset);
1501 ++this->count_;
1502 gsym->set_needs_dynsym_entry();
1503 this->rel_->add_global(gsym, elfcpp::R_SPARC_JMP_SLOT, this,
1504 plt_offset, 0);
1505 }
f5314dd5 1506
8c2bf391
DM		 1507 // Note that we don't need to save the symbol. The contents of the
1508 // PLT are independent of which symbols are used. The symbols only
1509 // appear in the relocations.
1510}
1511
1512template<int size, bool big_endian>
1513unsigned int
1514Output_data_plt_sparc<size, big_endian>::add_local_ifunc_entry(
1515 Symbol_table* symtab,
1516 Layout* layout,
1517 Sized_relobj_file<size, big_endian>* relobj,
1518 unsigned int local_sym_index)
1519{
1520 unsigned int index = this->ifunc_count_;
1521 section_offset_type plt_offset;
1522
1523 plt_offset = plt_index_to_offset(index);
1524 ++this->ifunc_count_;
1525
1526 Reloc_section* rel = this->rela_ifunc(symtab, layout);
1527
1528 struct Local_ifunc li;
1529 li.rel = rel;
1530 li.object = relobj;
1531 li.local_sym_index = local_sym_index;
1532 li.plt_index = index;
1533 this->local_ifuncs_.push_back(li);
1534
1535 return plt_offset;
1536}
1537
1538// Emit any pending IFUNC plt relocations.
1539
1540template<int size, bool big_endian>
1541void
1542Output_data_plt_sparc<size, big_endian>::emit_pending_ifunc_relocs()
1543{
1544 // Emit any pending IFUNC relocs.
1545 for (typename std::vector<Global_ifunc>::const_iterator p =
1546 this->global_ifuncs_.begin();
1547 p != this->global_ifuncs_.end();
1548 ++p)
1549 {
1550 section_offset_type plt_offset;
1551 unsigned int index;
1552
1553 index = this->count_ + p->plt_index + 4;
1554 plt_offset = this->plt_index_to_offset(index);
1555 p->rel->add_symbolless_global_addend(p->gsym, elfcpp::R_SPARC_JMP_IREL,
1556 this, plt_offset, 0);
1557 }
1558
1559 for (typename std::vector<Local_ifunc>::const_iterator p =
1560 this->local_ifuncs_.begin();
1561 p != this->local_ifuncs_.end();
1562 ++p)
1563 {
1564 section_offset_type plt_offset;
1565 unsigned int index;
1566
1567 index = this->count_ + p->plt_index + 4;
1568 plt_offset = this->plt_index_to_offset(index);
1569 p->rel->add_symbolless_local_addend(p->object, p->local_sym_index,
1570 elfcpp::R_SPARC_JMP_IREL,
1571 this, plt_offset, 0);
f5314dd5 1572 }
8c2bf391 1573}
f5314dd5 1574
8c2bf391
DM		 1575// Return where the IFUNC relocations should go in the PLT. These
1576// follow the non-IFUNC relocations.
f5314dd5 1577
8c2bf391
DM		 1578template<int size, bool big_endian>
1579typename Output_data_plt_sparc<size, big_endian>::Reloc_section*
1580Output_data_plt_sparc<size, big_endian>::rela_ifunc(
1581 Symbol_table* symtab,
1582 Layout* layout)
1583{
1584 if (this->ifunc_rel_ == NULL)
1585 {
1586 this->ifunc_rel_ = new Reloc_section(false);
1587 layout->add_output_section_data(".rela.plt", elfcpp::SHT_RELA,
1588 elfcpp::SHF_ALLOC, this->ifunc_rel_,
1589 ORDER_DYNAMIC_PLT_RELOCS, false);
1590 gold_assert(this->ifunc_rel_->output_section()
1591 == this->rel_->output_section());
1592
1593 if (parameters->doing_static_link())
1594 {
1595 // A statically linked executable will only have a .rel.plt
1596 // section to hold R_SPARC_IRELATIVE and R_SPARC_JMP_IREL
1597 // relocs for STT_GNU_IFUNC symbols. The library will use
1598 // these symbols to locate the IRELATIVE and JMP_IREL relocs
1599 // at program startup time.
1600 symtab->define_in_output_data("__rela_iplt_start", NULL,
1601 Symbol_table::PREDEFINED,
1602 this->ifunc_rel_, 0, 0,
1603 elfcpp::STT_NOTYPE, elfcpp::STB_GLOBAL,
1604 elfcpp::STV_HIDDEN, 0, false, true);
1605 symtab->define_in_output_data("__rela_iplt_end", NULL,
1606 Symbol_table::PREDEFINED,
1607 this->ifunc_rel_, 0, 0,
1608 elfcpp::STT_NOTYPE, elfcpp::STB_GLOBAL,
1609 elfcpp::STV_HIDDEN, 0, true, true);
1610 }
1611 }
1612 return this->ifunc_rel_;
1613}
f5314dd5 1614
8c2bf391 1615// Return the PLT address to use for a global symbol.
f5314dd5 1616
8c2bf391
DM		 1617template<int size, bool big_endian>
1618uint64_t
1619Output_data_plt_sparc<size, big_endian>::address_for_global(const Symbol* gsym)
1620{
1621 uint64_t offset = 0;
1622 if (gsym->type() == elfcpp::STT_GNU_IFUNC
1623 && gsym->can_use_relative_reloc(false))
1624 offset = plt_index_to_offset(this->count_ + 4);
19fec8c1 1625 return this->address() + offset + gsym->plt_offset();
8c2bf391
DM		 1626}
1627
1628// Return the PLT address to use for a local symbol. These are always
1629// IRELATIVE relocs.
1630
1631template<int size, bool big_endian>
1632uint64_t
1633Output_data_plt_sparc<size, big_endian>::address_for_local(
19fec8c1
AM		 1634 const Relobj* object,
1635 unsigned int r_sym)
8c2bf391 1636{
19fec8c1
AM		 1637 return (this->address()
1638 + plt_index_to_offset(this->count_ + 4)
1639 + object->local_plt_offset(r_sym));
f5314dd5
DM		 1640}
1641
1642static const unsigned int sparc_nop = 0x01000000;
1643static const unsigned int sparc_sethi_g1 = 0x03000000;
1644static const unsigned int sparc_branch_always = 0x30800000;
1645static const unsigned int sparc_branch_always_pt = 0x30680000;
1646static const unsigned int sparc_mov = 0x80100000;
1647static const unsigned int sparc_mov_g0_o0 = 0x90100000;
1648static const unsigned int sparc_mov_o7_g5 = 0x8a10000f;
1649static const unsigned int sparc_call_plus_8 = 0x40000002;
1650static const unsigned int sparc_ldx_o7_imm_g1 = 0xc25be000;
1651static const unsigned int sparc_jmpl_o7_g1_g1 = 0x83c3c001;
1652static const unsigned int sparc_mov_g5_o7 = 0x9e100005;
1653
1654// Write out the PLT.
1655
1656template<int size, bool big_endian>
1657void
1658Output_data_plt_sparc<size, big_endian>::do_write(Output_file* of)
1659{
2ea97941 1660 const off_t offset = this->offset();
f5314dd5
DM		 1661 const section_size_type oview_size =
1662 convert_to_section_size_type(this->data_size());
2ea97941 1663 unsigned char* const oview = of->get_output_view(offset, oview_size);
f5314dd5
DM		 1664 unsigned char* pov = oview;
1665
1666 memset(pov, 0, base_plt_entry_size * 4);
8c2bf391 1667 pov += this->first_plt_entry_offset();
f5314dd5
DM		 1668
1669 unsigned int plt_offset = base_plt_entry_size * 4;
8c2bf391 1670 const unsigned int count = this->entry_count();
f5314dd5
DM		 1671
1672 if (size == 64)
1673 {
1674 unsigned int limit;
1675
1676 limit = (count > 32768 ? 32768 : count);
1677
1678 for (unsigned int i = 0; i < limit; ++i)
1679 {
1680 elfcpp::Swap<32, true>::writeval(pov + 0x00,
1681 sparc_sethi_g1 + plt_offset);
1682 elfcpp::Swap<32, true>::writeval(pov + 0x04,
1683 sparc_branch_always_pt +
1684 (((base_plt_entry_size -
1685 (plt_offset + 4)) >> 2) &
1686 0x7ffff));
1687 elfcpp::Swap<32, true>::writeval(pov + 0x08, sparc_nop);
1688 elfcpp::Swap<32, true>::writeval(pov + 0x0c, sparc_nop);
1689 elfcpp::Swap<32, true>::writeval(pov + 0x10, sparc_nop);
1690 elfcpp::Swap<32, true>::writeval(pov + 0x14, sparc_nop);
1691 elfcpp::Swap<32, true>::writeval(pov + 0x18, sparc_nop);
1692 elfcpp::Swap<32, true>::writeval(pov + 0x1c, sparc_nop);
1693
1694 pov += base_plt_entry_size;
1695 plt_offset += base_plt_entry_size;
1696 }
1697
1698 if (count > 32768)
1699 {
1700 unsigned int ext_cnt = count - 32768;
1701 unsigned int blks = ext_cnt / plt_entries_per_block;
1702
1703 for (unsigned int i = 0; i < blks; ++i)
1704 {
1705 unsigned int data_off = (plt_entries_per_block
1706 * plt_insn_chunk_size) - 4;
1707
1708 for (unsigned int j = 0; j < plt_entries_per_block; ++j)
1709 {
1710 elfcpp::Swap<32, true>::writeval(pov + 0x00,
1711 sparc_mov_o7_g5);
1712 elfcpp::Swap<32, true>::writeval(pov + 0x04,
1713 sparc_call_plus_8);
1714 elfcpp::Swap<32, true>::writeval(pov + 0x08,
1715 sparc_nop);
1716 elfcpp::Swap<32, true>::writeval(pov + 0x0c,
1717 sparc_ldx_o7_imm_g1 +
1718 (data_off & 0x1fff));
1719 elfcpp::Swap<32, true>::writeval(pov + 0x10,
1720 sparc_jmpl_o7_g1_g1);
1721 elfcpp::Swap<32, true>::writeval(pov + 0x14,
1722 sparc_mov_g5_o7);
1723
1724 elfcpp::Swap<64, big_endian>::writeval(
1725 pov + 0x4 + data_off,
1726 (elfcpp::Elf_Xword) (oview - (pov + 0x04)));
1727
1728 pov += plt_insn_chunk_size;
1729 data_off -= 16;
1730 }
1731 }
1732
1733 unsigned int sub_blk_cnt = ext_cnt % plt_entries_per_block;
1734 for (unsigned int i = 0; i < sub_blk_cnt; ++i)
1735 {
1736 unsigned int data_off = (sub_blk_cnt
1737 * plt_insn_chunk_size) - 4;
1738
1739 for (unsigned int j = 0; j < plt_entries_per_block; ++j)
1740 {
1741 elfcpp::Swap<32, true>::writeval(pov + 0x00,
1742 sparc_mov_o7_g5);
1743 elfcpp::Swap<32, true>::writeval(pov + 0x04,
1744 sparc_call_plus_8);
1745 elfcpp::Swap<32, true>::writeval(pov + 0x08,
1746 sparc_nop);
1747 elfcpp::Swap<32, true>::writeval(pov + 0x0c,
1748 sparc_ldx_o7_imm_g1 +
1749 (data_off & 0x1fff));
1750 elfcpp::Swap<32, true>::writeval(pov + 0x10,
1751 sparc_jmpl_o7_g1_g1);
1752 elfcpp::Swap<32, true>::writeval(pov + 0x14,
1753 sparc_mov_g5_o7);
1754
1755 elfcpp::Swap<64, big_endian>::writeval(
1756 pov + 0x4 + data_off,
1757 (elfcpp::Elf_Xword) (oview - (pov + 0x04)));
1758
1759 pov += plt_insn_chunk_size;
1760 data_off -= 16;
1761 }
1762 }
1763 }
1764 }
1765 else
1766 {
1767 for (unsigned int i = 0; i < count; ++i)
1768 {
1769 elfcpp::Swap<32, true>::writeval(pov + 0x00,
1770 sparc_sethi_g1 + plt_offset);
1771 elfcpp::Swap<32, true>::writeval(pov + 0x04,
1772 sparc_branch_always +
1773 (((- (plt_offset + 4)) >> 2) &
1774 0x003fffff));
1775 elfcpp::Swap<32, true>::writeval(pov + 0x08, sparc_nop);
1776
1777 pov += base_plt_entry_size;
1778 plt_offset += base_plt_entry_size;
1779 }
1780
1781 elfcpp::Swap<32, true>::writeval(pov, sparc_nop);
1782 pov += 4;
1783 }
1784
1785 gold_assert(static_cast<section_size_type>(pov - oview) == oview_size);
1786
2ea97941 1787 of->write_output_view(offset, oview_size, oview);
f5314dd5
DM		 1788}
1789
8c2bf391
DM		 1790// Create the PLT section.
1791
1792template<int size, bool big_endian>
1793void
1794Target_sparc<size, big_endian>::make_plt_section(Symbol_table* symtab,
1795 Layout* layout)
1796{
1797 // Create the GOT sections first.
1798 this->got_section(symtab, layout);
1799
1800 // Ensure that .rela.dyn always appears before .rela.plt This is
1801 // necessary due to how, on Sparc and some other targets, .rela.dyn
1802 // needs to include .rela.plt in it's range.
1803 this->rela_dyn_section(layout);
1804
1805 this->plt_ = new Output_data_plt_sparc<size, big_endian>(layout);
1806 layout->add_output_section_data(".plt", elfcpp::SHT_PROGBITS,
1807 (elfcpp::SHF_ALLOC
1808 | elfcpp::SHF_EXECINSTR
1809 | elfcpp::SHF_WRITE),
1810 this->plt_, ORDER_NON_RELRO_FIRST, false);
1811
1812 // Define _PROCEDURE_LINKAGE_TABLE_ at the start of the .plt section.
1813 symtab->define_in_output_data("_PROCEDURE_LINKAGE_TABLE_", NULL,
1814 Symbol_table::PREDEFINED,
1815 this->plt_,
1816 0, 0, elfcpp::STT_OBJECT,
1817 elfcpp::STB_LOCAL,
1818 elfcpp::STV_HIDDEN, 0,
1819 false, false);
1820}
1821
f5314dd5
DM		 1822// Create a PLT entry for a global symbol.
1823
1824template<int size, bool big_endian>
1825void
1826Target_sparc<size, big_endian>::make_plt_entry(Symbol_table* symtab,
1827 Layout* layout,
1828 Symbol* gsym)
1829{
1830 if (gsym->has_plt_offset())
1831 return;
1832
1833 if (this->plt_ == NULL)
8c2bf391 1834 this->make_plt_section(symtab, layout);
f5314dd5 1835
8c2bf391
DM		 1836 this->plt_->add_entry(symtab, layout, gsym);
1837}
f5314dd5 1838
8c2bf391 1839// Make a PLT entry for a local STT_GNU_IFUNC symbol.
f5314dd5 1840
8c2bf391
DM		 1841template<int size, bool big_endian>
1842void
1843Target_sparc<size, big_endian>::make_local_ifunc_plt_entry(
1844 Symbol_table* symtab,
1845 Layout* layout,
1846 Sized_relobj_file<size, big_endian>* relobj,
1847 unsigned int local_sym_index)
1848{
1849 if (relobj->local_has_plt_offset(local_sym_index))
1850 return;
1851 if (this->plt_ == NULL)
1852 this->make_plt_section(symtab, layout);
1853 unsigned int plt_offset = this->plt_->add_local_ifunc_entry(symtab, layout,
1854 relobj,
1855 local_sym_index);
1856 relobj->set_local_plt_offset(local_sym_index, plt_offset);
f5314dd5
DM		 1857}
1858
0e70b911
CC		 1859// Return the number of entries in the PLT.
1860
1861template<int size, bool big_endian>
1862unsigned int
1863Target_sparc<size, big_endian>::plt_entry_count() const
1864{
1865 if (this->plt_ == NULL)
1866 return 0;
1867 return this->plt_->entry_count();
1868}
1869
1870// Return the offset of the first non-reserved PLT entry.
1871
1872template<int size, bool big_endian>
1873unsigned int
1874Target_sparc<size, big_endian>::first_plt_entry_offset() const
1875{
1876 return Output_data_plt_sparc<size, big_endian>::first_plt_entry_offset();
1877}
1878
1879// Return the size of each PLT entry.
1880
1881template<int size, bool big_endian>
1882unsigned int
1883Target_sparc<size, big_endian>::plt_entry_size() const
1884{
1885 return Output_data_plt_sparc<size, big_endian>::get_plt_entry_size();
1886}
1887
f5314dd5
DM		 1888// Create a GOT entry for the TLS module index.
1889
1890template<int size, bool big_endian>
1891unsigned int
6fa2a40b
CC		 1892Target_sparc<size, big_endian>::got_mod_index_entry(
1893 Symbol_table* symtab,
1894 Layout* layout,
1895 Sized_relobj_file<size, big_endian>* object)
f5314dd5
DM		 1896{
1897 if (this->got_mod_index_offset_ == -1U)
1898 {
1899 gold_assert(symtab != NULL && layout != NULL && object != NULL);
1900 Reloc_section* rela_dyn = this->rela_dyn_section(layout);
1901 Output_data_got<size, big_endian>* got;
1902 unsigned int got_offset;
1903
1904 got = this->got_section(symtab, layout);
1905 got_offset = got->add_constant(0);
1906 rela_dyn->add_local(object, 0,
1907 (size == 64 ?
1908 elfcpp::R_SPARC_TLS_DTPMOD64 :
1909 elfcpp::R_SPARC_TLS_DTPMOD32), got,
1910 got_offset, 0);
1911 got->add_constant(0);
1912 this->got_mod_index_offset_ = got_offset;
1913 }
1914 return this->got_mod_index_offset_;
1915}
1916
f5314dd5
DM		 1917// Optimize the TLS relocation type based on what we know about the
1918// symbol. IS_FINAL is true if the final address of this symbol is
1919// known at link time.
1920
1921static tls::Tls_optimization
1922optimize_tls_reloc(bool is_final, int r_type)
1923{
1924 // If we are generating a shared library, then we can't do anything
1925 // in the linker.
1926 if (parameters->options().shared())
1927 return tls::TLSOPT_NONE;
1928
1929 switch (r_type)
1930 {
1931 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
1932 case elfcpp::R_SPARC_TLS_GD_LO10:
1933 case elfcpp::R_SPARC_TLS_GD_ADD:
1934 case elfcpp::R_SPARC_TLS_GD_CALL:
1935 // These are General-Dynamic which permits fully general TLS
1936 // access. Since we know that we are generating an executable,
1937 // we can convert this to Initial-Exec. If we also know that
1938 // this is a local symbol, we can further switch to Local-Exec.
1939 if (is_final)
1940 return tls::TLSOPT_TO_LE;
1941 return tls::TLSOPT_TO_IE;
1942
1943 case elfcpp::R_SPARC_TLS_LDM_HI22: // Local-dynamic
1944 case elfcpp::R_SPARC_TLS_LDM_LO10:
1945 case elfcpp::R_SPARC_TLS_LDM_ADD:
1946 case elfcpp::R_SPARC_TLS_LDM_CALL:
1947 // This is Local-Dynamic, which refers to a local symbol in the
1948 // dynamic TLS block. Since we know that we generating an
1949 // executable, we can switch to Local-Exec.
1950 return tls::TLSOPT_TO_LE;
1951
1952 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
1953 case elfcpp::R_SPARC_TLS_LDO_LOX10:
1954 case elfcpp::R_SPARC_TLS_LDO_ADD:
1955 // Another type of Local-Dynamic relocation.
1956 return tls::TLSOPT_TO_LE;
1957
1958 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
1959 case elfcpp::R_SPARC_TLS_IE_LO10:
1960 case elfcpp::R_SPARC_TLS_IE_LD:
1961 case elfcpp::R_SPARC_TLS_IE_LDX:
9efe6174 1962 case elfcpp::R_SPARC_TLS_IE_ADD:
f5314dd5
DM		 1963 // These are Initial-Exec relocs which get the thread offset
1964 // from the GOT. If we know that we are linking against the
1965 // local symbol, we can switch to Local-Exec, which links the
1966 // thread offset into the instruction.
1967 if (is_final)
1968 return tls::TLSOPT_TO_LE;
1969 return tls::TLSOPT_NONE;
1970
1971 case elfcpp::R_SPARC_TLS_LE_HIX22: // Local-exec
1972 case elfcpp::R_SPARC_TLS_LE_LOX10:
1973 // When we already have Local-Exec, there is nothing further we
1974 // can do.
1975 return tls::TLSOPT_NONE;
1976
1977 default:
1978 gold_unreachable();
1979 }
1980}
1981
95a2c8d6
RS		 1982// Get the Reference_flags for a particular relocation.
1983
1984template<int size, bool big_endian>
1985int
1986Target_sparc<size, big_endian>::Scan::get_reference_flags(unsigned int r_type)
1987{
1988 r_type &= 0xff;
1989 switch (r_type)
1990 {
1991 case elfcpp::R_SPARC_NONE:
1992 case elfcpp::R_SPARC_REGISTER:
1993 case elfcpp::R_SPARC_GNU_VTINHERIT:
1994 case elfcpp::R_SPARC_GNU_VTENTRY:
1995 // No symbol reference.
1996 return 0;
1997
1998 case elfcpp::R_SPARC_UA64:
1999 case elfcpp::R_SPARC_64:
2000 case elfcpp::R_SPARC_HIX22:
2001 case elfcpp::R_SPARC_LOX10:
2615994e 2002 case elfcpp::R_SPARC_H34:
95a2c8d6
RS		 2003 case elfcpp::R_SPARC_H44:
2004 case elfcpp::R_SPARC_M44:
2005 case elfcpp::R_SPARC_L44:
2006 case elfcpp::R_SPARC_HH22:
2007 case elfcpp::R_SPARC_HM10:
2008 case elfcpp::R_SPARC_LM22:
2009 case elfcpp::R_SPARC_HI22:
2010 case elfcpp::R_SPARC_LO10:
2011 case elfcpp::R_SPARC_OLO10:
2012 case elfcpp::R_SPARC_UA32:
2013 case elfcpp::R_SPARC_32:
2014 case elfcpp::R_SPARC_UA16:
2015 case elfcpp::R_SPARC_16:
2016 case elfcpp::R_SPARC_11:
2017 case elfcpp::R_SPARC_10:
2018 case elfcpp::R_SPARC_8:
2019 case elfcpp::R_SPARC_7:
2020 case elfcpp::R_SPARC_6:
2021 case elfcpp::R_SPARC_5:
2022 return Symbol::ABSOLUTE_REF;
2023
2024 case elfcpp::R_SPARC_DISP8:
2025 case elfcpp::R_SPARC_DISP16:
2026 case elfcpp::R_SPARC_DISP32:
2027 case elfcpp::R_SPARC_DISP64:
2028 case elfcpp::R_SPARC_PC_HH22:
2029 case elfcpp::R_SPARC_PC_HM10:
2030 case elfcpp::R_SPARC_PC_LM22:
2031 case elfcpp::R_SPARC_PC10:
2032 case elfcpp::R_SPARC_PC22:
2033 case elfcpp::R_SPARC_WDISP30:
2034 case elfcpp::R_SPARC_WDISP22:
2035 case elfcpp::R_SPARC_WDISP19:
2036 case elfcpp::R_SPARC_WDISP16:
2615994e 2037 case elfcpp::R_SPARC_WDISP10:
95a2c8d6
RS		 2038 return Symbol::RELATIVE_REF;
2039
2040 case elfcpp::R_SPARC_PLT64:
2041 case elfcpp::R_SPARC_PLT32:
2042 case elfcpp::R_SPARC_HIPLT22:
2043 case elfcpp::R_SPARC_LOPLT10:
2044 case elfcpp::R_SPARC_PCPLT10:
2045 return Symbol::FUNCTION_CALL | Symbol::ABSOLUTE_REF;
2046
2047 case elfcpp::R_SPARC_PCPLT32:
2048 case elfcpp::R_SPARC_PCPLT22:
2049 case elfcpp::R_SPARC_WPLT30:
2050 return Symbol::FUNCTION_CALL | Symbol::RELATIVE_REF;
2051
2052 case elfcpp::R_SPARC_GOTDATA_OP:
2053 case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2054 case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2055 case elfcpp::R_SPARC_GOT10:
2056 case elfcpp::R_SPARC_GOT13:
2057 case elfcpp::R_SPARC_GOT22:
2058 // Absolute in GOT.
2059 return Symbol::ABSOLUTE_REF;
2060
2061 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2062 case elfcpp::R_SPARC_TLS_GD_LO10:
2063 case elfcpp::R_SPARC_TLS_GD_ADD:
2064 case elfcpp::R_SPARC_TLS_GD_CALL:
2065 case elfcpp::R_SPARC_TLS_LDM_HI22: // Local-dynamic
2066 case elfcpp::R_SPARC_TLS_LDM_LO10:
2067 case elfcpp::R_SPARC_TLS_LDM_ADD:
2068 case elfcpp::R_SPARC_TLS_LDM_CALL:
2069 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2070 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2071 case elfcpp::R_SPARC_TLS_LDO_ADD:
2072 case elfcpp::R_SPARC_TLS_LE_HIX22:
2073 case elfcpp::R_SPARC_TLS_LE_LOX10:
2074 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
2075 case elfcpp::R_SPARC_TLS_IE_LO10:
2076 case elfcpp::R_SPARC_TLS_IE_LD:
2077 case elfcpp::R_SPARC_TLS_IE_LDX:
2078 case elfcpp::R_SPARC_TLS_IE_ADD:
2079 return Symbol::TLS_REF;
2080
2081 case elfcpp::R_SPARC_COPY:
2082 case elfcpp::R_SPARC_GLOB_DAT:
2083 case elfcpp::R_SPARC_JMP_SLOT:
8c2bf391 2084 case elfcpp::R_SPARC_JMP_IREL:
95a2c8d6 2085 case elfcpp::R_SPARC_RELATIVE:
8c2bf391 2086 case elfcpp::R_SPARC_IRELATIVE:
95a2c8d6
RS		 2087 case elfcpp::R_SPARC_TLS_DTPMOD64:
2088 case elfcpp::R_SPARC_TLS_DTPMOD32:
2089 case elfcpp::R_SPARC_TLS_DTPOFF64:
2090 case elfcpp::R_SPARC_TLS_DTPOFF32:
2091 case elfcpp::R_SPARC_TLS_TPOFF64:
2092 case elfcpp::R_SPARC_TLS_TPOFF32:
2093 default:
2094 // Not expected. We will give an error later.
2095 return 0;
2096 }
2097}
2098
f5314dd5
DM		 2099// Generate a PLT entry slot for a call to __tls_get_addr
2100template<int size, bool big_endian>
2101void
2102Target_sparc<size, big_endian>::Scan::generate_tls_call(Symbol_table* symtab,
2103 Layout* layout,
2104 Target_sparc<size, big_endian>* target)
2105{
2106 Symbol* gsym = target->tls_get_addr_sym(symtab);
2107
2108 target->make_plt_entry(symtab, layout, gsym);
2109}
2110
2111// Report an unsupported relocation against a local symbol.
2112
2113template<int size, bool big_endian>
2114void
2115Target_sparc<size, big_endian>::Scan::unsupported_reloc_local(
6fa2a40b 2116 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 2117 unsigned int r_type)
2118{
2119 gold_error(_("%s: unsupported reloc %u against local symbol"),
2120 object->name().c_str(), r_type);
2121}
2122
32b769e1
DM		 2123// We are about to emit a dynamic relocation of type R_TYPE. If the
2124// dynamic linker does not support it, issue an error.
2125
2126template<int size, bool big_endian>
2127void
2128Target_sparc<size, big_endian>::Scan::check_non_pic(Relobj* object, unsigned int r_type)
2129{
2130 gold_assert(r_type != elfcpp::R_SPARC_NONE);
2131
2132 if (size == 64)
2133 {
2134 switch (r_type)
2135 {
2136 // These are the relocation types supported by glibc for sparc 64-bit.
2137 case elfcpp::R_SPARC_RELATIVE:
8c2bf391 2138 case elfcpp::R_SPARC_IRELATIVE:
32b769e1
DM		 2139 case elfcpp::R_SPARC_COPY:
2140 case elfcpp::R_SPARC_64:
2141 case elfcpp::R_SPARC_GLOB_DAT:
2142 case elfcpp::R_SPARC_JMP_SLOT:
8c2bf391 2143 case elfcpp::R_SPARC_JMP_IREL:
32b769e1
DM		 2144 case elfcpp::R_SPARC_TLS_DTPMOD64:
2145 case elfcpp::R_SPARC_TLS_DTPOFF64:
2146 case elfcpp::R_SPARC_TLS_TPOFF64:
2147 case elfcpp::R_SPARC_TLS_LE_HIX22:
2148 case elfcpp::R_SPARC_TLS_LE_LOX10:
2149 case elfcpp::R_SPARC_8:
2150 case elfcpp::R_SPARC_16:
2151 case elfcpp::R_SPARC_DISP8:
2152 case elfcpp::R_SPARC_DISP16:
2153 case elfcpp::R_SPARC_DISP32:
2154 case elfcpp::R_SPARC_WDISP30:
2155 case elfcpp::R_SPARC_LO10:
2156 case elfcpp::R_SPARC_HI22:
2157 case elfcpp::R_SPARC_OLO10:
2615994e 2158 case elfcpp::R_SPARC_H34:
32b769e1
DM		 2159 case elfcpp::R_SPARC_H44:
2160 case elfcpp::R_SPARC_M44:
2161 case elfcpp::R_SPARC_L44:
2162 case elfcpp::R_SPARC_HH22:
2163 case elfcpp::R_SPARC_HM10:
2164 case elfcpp::R_SPARC_LM22:
2165 case elfcpp::R_SPARC_UA16:
2166 case elfcpp::R_SPARC_UA32:
2167 case elfcpp::R_SPARC_UA64:
2168 return;
2169
2170 default:
2171 break;
2172 }
2173 }
2174 else
2175 {
2176 switch (r_type)
2177 {
2178 // These are the relocation types supported by glibc for sparc 32-bit.
2179 case elfcpp::R_SPARC_RELATIVE:
8c2bf391 2180 case elfcpp::R_SPARC_IRELATIVE:
32b769e1
DM		 2181 case elfcpp::R_SPARC_COPY:
2182 case elfcpp::R_SPARC_GLOB_DAT:
2183 case elfcpp::R_SPARC_32:
2184 case elfcpp::R_SPARC_JMP_SLOT:
8c2bf391 2185 case elfcpp::R_SPARC_JMP_IREL:
32b769e1
DM		 2186 case elfcpp::R_SPARC_TLS_DTPMOD32:
2187 case elfcpp::R_SPARC_TLS_DTPOFF32:
2188 case elfcpp::R_SPARC_TLS_TPOFF32:
2189 case elfcpp::R_SPARC_TLS_LE_HIX22:
2190 case elfcpp::R_SPARC_TLS_LE_LOX10:
2191 case elfcpp::R_SPARC_8:
2192 case elfcpp::R_SPARC_16:
2193 case elfcpp::R_SPARC_DISP8:
2194 case elfcpp::R_SPARC_DISP16:
2195 case elfcpp::R_SPARC_DISP32:
2196 case elfcpp::R_SPARC_LO10:
2197 case elfcpp::R_SPARC_WDISP30:
2198 case elfcpp::R_SPARC_HI22:
2199 case elfcpp::R_SPARC_UA16:
2200 case elfcpp::R_SPARC_UA32:
2201 return;
2202
2203 default:
2204 break;
2205 }
2206 }
2207
2208 // This prevents us from issuing more than one error per reloc
2209 // section. But we can still wind up issuing more than one
2210 // error per object file.
2211 if (this->issued_non_pic_error_)
2212 return;
33aea2fd 2213 gold_assert(parameters->options().output_is_position_independent());
32b769e1
DM		 2214 object->error(_("requires unsupported dynamic reloc; "
2215 "recompile with -fPIC"));
2216 this->issued_non_pic_error_ = true;
2217 return;
2218}
2219
8c2bf391
DM		 2220// Return whether we need to make a PLT entry for a relocation of the
2221// given type against a STT_GNU_IFUNC symbol.
2222
2223template<int size, bool big_endian>
2224bool
2225Target_sparc<size, big_endian>::Scan::reloc_needs_plt_for_ifunc(
2226 Sized_relobj_file<size, big_endian>* object,
2227 unsigned int r_type)
2228{
2229 int flags = Scan::get_reference_flags(r_type);
2230 if (flags & Symbol::TLS_REF)
2231 gold_error(_("%s: unsupported TLS reloc %u for IFUNC symbol"),
2e702c99 2232 object->name().c_str(), r_type);
8c2bf391
DM		 2233 return flags != 0;
2234}
2235
f5314dd5
DM		 2236// Scan a relocation for a local symbol.
2237
2238template<int size, bool big_endian>
2239inline void
2240Target_sparc<size, big_endian>::Scan::local(
f5314dd5
DM		 2241 Symbol_table* symtab,
2242 Layout* layout,
2243 Target_sparc<size, big_endian>* target,
6fa2a40b 2244 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 2245 unsigned int data_shndx,
2246 Output_section* output_section,
2247 const elfcpp::Rela<size, big_endian>& reloc,
2248 unsigned int r_type,
bfdfa4cd
AM		 2249 const elfcpp::Sym<size, big_endian>& lsym,
2250 bool is_discarded)
f5314dd5 2251{
bfdfa4cd
AM		 2252 if (is_discarded)
2253 return;
2254
8c2bf391 2255 bool is_ifunc = lsym.get_st_type() == elfcpp::STT_GNU_IFUNC;
f5314dd5 2256 unsigned int orig_r_type = r_type;
f5314dd5 2257 r_type &= 0xff;
8c2bf391
DM		 2258
2259 if (is_ifunc
2260 && this->reloc_needs_plt_for_ifunc(object, r_type))
2261 {
2262 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2263 target->make_local_ifunc_plt_entry(symtab, layout, object, r_sym);
2264 }
2265
f5314dd5
DM		 2266 switch (r_type)
2267 {
2268 case elfcpp::R_SPARC_NONE:
2269 case elfcpp::R_SPARC_REGISTER:
2270 case elfcpp::R_SPARC_GNU_VTINHERIT:
2271 case elfcpp::R_SPARC_GNU_VTENTRY:
2272 break;
2273
2274 case elfcpp::R_SPARC_64:
2275 case elfcpp::R_SPARC_32:
2276 // If building a shared library (or a position-independent
2277 // executable), we need to create a dynamic relocation for
2278 // this location. The relocation applied at link time will
2279 // apply the link-time value, so we flag the location with
2280 // an R_SPARC_RELATIVE relocation so the dynamic loader can
2281 // relocate it easily.
2282 if (parameters->options().output_is_position_independent())
2e702c99
RM		 2283 {
2284 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2285 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2286 rela_dyn->add_local_relative(object, r_sym, elfcpp::R_SPARC_RELATIVE,
f5314dd5
DM		 2287 output_section, data_shndx,
2288 reloc.get_r_offset(),
8c2bf391 2289 reloc.get_r_addend(), is_ifunc);
2e702c99 2290 }
f5314dd5
DM		 2291 break;
2292
2293 case elfcpp::R_SPARC_HIX22:
2294 case elfcpp::R_SPARC_LOX10:
2615994e 2295 case elfcpp::R_SPARC_H34:
f5314dd5
DM		 2296 case elfcpp::R_SPARC_H44:
2297 case elfcpp::R_SPARC_M44:
2298 case elfcpp::R_SPARC_L44:
2299 case elfcpp::R_SPARC_HH22:
2300 case elfcpp::R_SPARC_HM10:
2301 case elfcpp::R_SPARC_LM22:
2302 case elfcpp::R_SPARC_UA64:
2303 case elfcpp::R_SPARC_UA32:
2304 case elfcpp::R_SPARC_UA16:
2305 case elfcpp::R_SPARC_HI22:
2306 case elfcpp::R_SPARC_LO10:
2307 case elfcpp::R_SPARC_OLO10:
2308 case elfcpp::R_SPARC_16:
2309 case elfcpp::R_SPARC_11:
2310 case elfcpp::R_SPARC_10:
2311 case elfcpp::R_SPARC_8:
2312 case elfcpp::R_SPARC_7:
2313 case elfcpp::R_SPARC_6:
2314 case elfcpp::R_SPARC_5:
2315 // If building a shared library (or a position-independent
2316 // executable), we need to create a dynamic relocation for
2317 // this location.
2318 if (parameters->options().output_is_position_independent())
2e702c99
RM		 2319 {
2320 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2321 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
32b769e1
DM		 2322
2323 check_non_pic(object, r_type);
2e702c99
RM		 2324 if (lsym.get_st_type() != elfcpp::STT_SECTION)
2325 {
2326 rela_dyn->add_local(object, r_sym, orig_r_type, output_section,
f5314dd5
DM		 2327 data_shndx, reloc.get_r_offset(),
2328 reloc.get_r_addend());
2e702c99
RM		 2329 }
2330 else
2331 {
2332 gold_assert(lsym.get_st_value() == 0);
0da6fa6c
DM		 2333 rela_dyn->add_symbolless_local_addend(object, r_sym, orig_r_type,
2334 output_section, data_shndx,
2335 reloc.get_r_offset(),
2336 reloc.get_r_addend());
2e702c99
RM		 2337 }
2338 }
f5314dd5
DM		 2339 break;
2340
2341 case elfcpp::R_SPARC_WDISP30:
8861f32b 2342 case elfcpp::R_SPARC_WPLT30:
f5314dd5
DM		 2343 case elfcpp::R_SPARC_WDISP22:
2344 case elfcpp::R_SPARC_WDISP19:
2345 case elfcpp::R_SPARC_WDISP16:
2615994e 2346 case elfcpp::R_SPARC_WDISP10:
f5314dd5
DM		 2347 case elfcpp::R_SPARC_DISP8:
2348 case elfcpp::R_SPARC_DISP16:
2349 case elfcpp::R_SPARC_DISP32:
2350 case elfcpp::R_SPARC_DISP64:
2351 case elfcpp::R_SPARC_PC10:
2352 case elfcpp::R_SPARC_PC22:
2353 break;
2354
024c4466
DM		 2355 case elfcpp::R_SPARC_GOTDATA_OP:
2356 case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2357 case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2a1079e8
DM		 2358 // We will optimize this into a GOT relative relocation
2359 // and code transform the GOT load into an addition.
2360 break;
2361
f5314dd5
DM		 2362 case elfcpp::R_SPARC_GOT10:
2363 case elfcpp::R_SPARC_GOT13:
2364 case elfcpp::R_SPARC_GOT22:
2365 {
2e702c99
RM		 2366 // The symbol requires a GOT entry.
2367 Output_data_got<size, big_endian>* got;
2368 unsigned int r_sym;
f5314dd5
DM		 2369
2370 got = target->got_section(symtab, layout);
2371 r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2372
2373 // If we are generating a shared object, we need to add a
2374 // dynamic relocation for this symbol's GOT entry.
2375 if (parameters->options().output_is_position_independent())
2376 {
2377 if (!object->local_has_got_offset(r_sym, GOT_TYPE_STANDARD))
2378 {
2379 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
8c2bf391 2380 unsigned int off = got->add_constant(0);
f5314dd5
DM		 2381 object->set_local_got_offset(r_sym, GOT_TYPE_STANDARD, off);
2382 rela_dyn->add_local_relative(object, r_sym,
2383 elfcpp::R_SPARC_RELATIVE,
8c2bf391 2384 got, off, 0, is_ifunc);
f5314dd5
DM		 2385 }
2386 }
2387 else
2388 got->add_local(object, r_sym, GOT_TYPE_STANDARD);
2389 }
2390 break;
2391
2392 // These are initial TLS relocs, which are expected when
2393 // linking.
2394 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2395 case elfcpp::R_SPARC_TLS_GD_LO10:
2396 case elfcpp::R_SPARC_TLS_GD_ADD:
2397 case elfcpp::R_SPARC_TLS_GD_CALL:
2398 case elfcpp::R_SPARC_TLS_LDM_HI22 : // Local-dynamic
2399 case elfcpp::R_SPARC_TLS_LDM_LO10:
2400 case elfcpp::R_SPARC_TLS_LDM_ADD:
2401 case elfcpp::R_SPARC_TLS_LDM_CALL:
2402 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2403 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2404 case elfcpp::R_SPARC_TLS_LDO_ADD:
2405 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
2406 case elfcpp::R_SPARC_TLS_IE_LO10:
2407 case elfcpp::R_SPARC_TLS_IE_LD:
2408 case elfcpp::R_SPARC_TLS_IE_LDX:
9efe6174 2409 case elfcpp::R_SPARC_TLS_IE_ADD:
f5314dd5
DM		 2410 case elfcpp::R_SPARC_TLS_LE_HIX22: // Local-exec
2411 case elfcpp::R_SPARC_TLS_LE_LOX10:
2412 {
2413 bool output_is_shared = parameters->options().shared();
2414 const tls::Tls_optimization optimized_type
2e702c99 2415 = optimize_tls_reloc(!output_is_shared, r_type);
f5314dd5
DM		 2416 switch (r_type)
2417 {
2418 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2419 case elfcpp::R_SPARC_TLS_GD_LO10:
2420 case elfcpp::R_SPARC_TLS_GD_ADD:
2421 case elfcpp::R_SPARC_TLS_GD_CALL:
2422 if (optimized_type == tls::TLSOPT_NONE)
2423 {
2e702c99
RM		 2424 // Create a pair of GOT entries for the module index and
2425 // dtv-relative offset.
2426 Output_data_got<size, big_endian>* got
2427 = target->got_section(symtab, layout);
2428 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
d491d34e
ILT		 2429 unsigned int shndx = lsym.get_st_shndx();
2430 bool is_ordinary;
2431 shndx = object->adjust_sym_shndx(r_sym, shndx, &is_ordinary);
2432 if (!is_ordinary)
2433 object->error(_("local symbol %u has bad shndx %u"),
2434 r_sym, shndx);
2435 else
2e702c99 2436 got->add_local_pair_with_rel(object, r_sym,
83896202
ILT		 2437 lsym.get_st_shndx(),
2438 GOT_TYPE_TLS_PAIR,
2439 target->rela_dyn_section(layout),
2440 (size == 64
2441 ? elfcpp::R_SPARC_TLS_DTPMOD64
bd73a62d 2442 : elfcpp::R_SPARC_TLS_DTPMOD32));
f5314dd5
DM		 2443 if (r_type == elfcpp::R_SPARC_TLS_GD_CALL)
2444 generate_tls_call(symtab, layout, target);
2445 }
2446 else if (optimized_type != tls::TLSOPT_TO_LE)
2447 unsupported_reloc_local(object, r_type);
2448 break;
2449
2450 case elfcpp::R_SPARC_TLS_LDM_HI22 : // Local-dynamic
2451 case elfcpp::R_SPARC_TLS_LDM_LO10:
2452 case elfcpp::R_SPARC_TLS_LDM_ADD:
2453 case elfcpp::R_SPARC_TLS_LDM_CALL:
2454 if (optimized_type == tls::TLSOPT_NONE)
2455 {
2456 // Create a GOT entry for the module index.
2457 target->got_mod_index_entry(symtab, layout, object);
2458
2459 if (r_type == elfcpp::R_SPARC_TLS_LDM_CALL)
2460 generate_tls_call(symtab, layout, target);
2461 }
2462 else if (optimized_type != tls::TLSOPT_TO_LE)
2463 unsupported_reloc_local(object, r_type);
2464 break;
2465
2466 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2467 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2468 case elfcpp::R_SPARC_TLS_LDO_ADD:
2469 break;
2470
2471 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
2472 case elfcpp::R_SPARC_TLS_IE_LO10:
2473 case elfcpp::R_SPARC_TLS_IE_LD:
2474 case elfcpp::R_SPARC_TLS_IE_LDX:
9efe6174 2475 case elfcpp::R_SPARC_TLS_IE_ADD:
f5314dd5
DM		 2476 layout->set_has_static_tls();
2477 if (optimized_type == tls::TLSOPT_NONE)
2478 {
2479 // Create a GOT entry for the tp-relative offset.
2480 Output_data_got<size, big_endian>* got
2481 = target->got_section(symtab, layout);
2482 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2483
2484 if (!object->local_has_got_offset(r_sym, GOT_TYPE_TLS_OFFSET))
2485 {
2486 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
0da6fa6c
DM		 2487 unsigned int off = got->add_constant(0);
2488
2489 object->set_local_got_offset(r_sym, GOT_TYPE_TLS_OFFSET, off);
684b268a 2490
0da6fa6c
DM		 2491 rela_dyn->add_symbolless_local_addend(object, r_sym,
2492 (size == 64 ?
2493 elfcpp::R_SPARC_TLS_TPOFF64 :
2494 elfcpp::R_SPARC_TLS_TPOFF32),
2495 got, off, 0);
f5314dd5
DM		 2496 }
2497 }
2498 else if (optimized_type != tls::TLSOPT_TO_LE)
2499 unsupported_reloc_local(object, r_type);
2500 break;
2501
2502 case elfcpp::R_SPARC_TLS_LE_HIX22: // Local-exec
2503 case elfcpp::R_SPARC_TLS_LE_LOX10:
2504 layout->set_has_static_tls();
2505 if (output_is_shared)
2506 {
2e702c99
RM		 2507 // We need to create a dynamic relocation.
2508 gold_assert(lsym.get_st_type() != elfcpp::STT_SECTION);
2509 unsigned int r_sym = elfcpp::elf_r_sym<size>(reloc.get_r_info());
2510 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2511 rela_dyn->add_symbolless_local_addend(object, r_sym, r_type,
0da6fa6c
DM		 2512 output_section, data_shndx,
2513 reloc.get_r_offset(), 0);
f5314dd5
DM		 2514 }
2515 break;
2516 }
2517 }
2518 break;
2519
2520 // These are relocations which should only be seen by the
2521 // dynamic linker, and should never be seen here.
2522 case elfcpp::R_SPARC_COPY:
2523 case elfcpp::R_SPARC_GLOB_DAT:
2524 case elfcpp::R_SPARC_JMP_SLOT:
8c2bf391 2525 case elfcpp::R_SPARC_JMP_IREL:
f5314dd5 2526 case elfcpp::R_SPARC_RELATIVE:
8c2bf391 2527 case elfcpp::R_SPARC_IRELATIVE:
f5314dd5
DM		 2528 case elfcpp::R_SPARC_TLS_DTPMOD64:
2529 case elfcpp::R_SPARC_TLS_DTPMOD32:
2530 case elfcpp::R_SPARC_TLS_DTPOFF64:
2531 case elfcpp::R_SPARC_TLS_DTPOFF32:
2532 case elfcpp::R_SPARC_TLS_TPOFF64:
2533 case elfcpp::R_SPARC_TLS_TPOFF32:
2534 gold_error(_("%s: unexpected reloc %u in object file"),
2535 object->name().c_str(), r_type);
2536 break;
2537
2538 default:
2539 unsupported_reloc_local(object, r_type);
2540 break;
2541 }
2542}
2543
2544// Report an unsupported relocation against a global symbol.
2545
2546template<int size, bool big_endian>
2547void
2548Target_sparc<size, big_endian>::Scan::unsupported_reloc_global(
6fa2a40b 2549 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 2550 unsigned int r_type,
2551 Symbol* gsym)
2552{
2553 gold_error(_("%s: unsupported reloc %u against global symbol %s"),
2554 object->name().c_str(), r_type, gsym->demangled_name().c_str());
2555}
2556
2557// Scan a relocation for a global symbol.
2558
2559template<int size, bool big_endian>
2560inline void
2561Target_sparc<size, big_endian>::Scan::global(
f5314dd5
DM		 2562 Symbol_table* symtab,
2563 Layout* layout,
2564 Target_sparc<size, big_endian>* target,
6fa2a40b 2565 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 2566 unsigned int data_shndx,
2567 Output_section* output_section,
2568 const elfcpp::Rela<size, big_endian>& reloc,
2569 unsigned int r_type,
2570 Symbol* gsym)
2571{
2572 unsigned int orig_r_type = r_type;
8c2bf391 2573 bool is_ifunc = gsym->type() == elfcpp::STT_GNU_IFUNC;
f5314dd5 2574
9efe6174
ILT		 2575 // A reference to _GLOBAL_OFFSET_TABLE_ implies that we need a got
2576 // section. We check here to avoid creating a dynamic reloc against
2577 // _GLOBAL_OFFSET_TABLE_.
2578 if (!target->has_got_section()
2579 && strcmp(gsym->name(), "_GLOBAL_OFFSET_TABLE_") == 0)
2580 target->got_section(symtab, layout);
2581
f5314dd5 2582 r_type &= 0xff;
8c2bf391
DM		 2583
2584 // A STT_GNU_IFUNC symbol may require a PLT entry.
2585 if (is_ifunc
2586 && this->reloc_needs_plt_for_ifunc(object, r_type))
2587 target->make_plt_entry(symtab, layout, gsym);
2588
f5314dd5
DM		 2589 switch (r_type)
2590 {
2591 case elfcpp::R_SPARC_NONE:
2592 case elfcpp::R_SPARC_REGISTER:
2593 case elfcpp::R_SPARC_GNU_VTINHERIT:
2594 case elfcpp::R_SPARC_GNU_VTENTRY:
2595 break;
2596
2597 case elfcpp::R_SPARC_PLT64:
2598 case elfcpp::R_SPARC_PLT32:
2599 case elfcpp::R_SPARC_HIPLT22:
2600 case elfcpp::R_SPARC_LOPLT10:
2601 case elfcpp::R_SPARC_PCPLT32:
2602 case elfcpp::R_SPARC_PCPLT22:
2603 case elfcpp::R_SPARC_PCPLT10:
2604 case elfcpp::R_SPARC_WPLT30:
2605 // If the symbol is fully resolved, this is just a PC32 reloc.
2606 // Otherwise we need a PLT entry.
2607 if (gsym->final_value_is_known())
2608 break;
2609 // If building a shared library, we can also skip the PLT entry
2610 // if the symbol is defined in the output file and is protected
2611 // or hidden.
2612 if (gsym->is_defined()
2e702c99
RM		 2613 && !gsym->is_from_dynobj()
2614 && !gsym->is_preemptible())
f5314dd5
DM		 2615 break;
2616 target->make_plt_entry(symtab, layout, gsym);
2617 break;
2618
2619 case elfcpp::R_SPARC_DISP8:
2620 case elfcpp::R_SPARC_DISP16:
2621 case elfcpp::R_SPARC_DISP32:
2622 case elfcpp::R_SPARC_DISP64:
2623 case elfcpp::R_SPARC_PC_HH22:
2624 case elfcpp::R_SPARC_PC_HM10:
2625 case elfcpp::R_SPARC_PC_LM22:
2626 case elfcpp::R_SPARC_PC10:
2627 case elfcpp::R_SPARC_PC22:
2628 case elfcpp::R_SPARC_WDISP30:
2629 case elfcpp::R_SPARC_WDISP22:
2630 case elfcpp::R_SPARC_WDISP19:
2631 case elfcpp::R_SPARC_WDISP16:
2615994e 2632 case elfcpp::R_SPARC_WDISP10:
f5314dd5
DM		 2633 {
2634 if (gsym->needs_plt_entry())
2635 target->make_plt_entry(symtab, layout, gsym);
2636 // Make a dynamic relocation if necessary.
95a2c8d6 2637 if (gsym->needs_dynamic_reloc(Scan::get_reference_flags(r_type)))
f5314dd5 2638 {
966d4097 2639 if (gsym->may_need_copy_reloc())
f5314dd5 2640 {
12c0daef 2641 target->copy_reloc(symtab, layout, object,
f5314dd5
DM		 2642 data_shndx, output_section, gsym,
2643 reloc);
2644 }
2645 else
2646 {
2647 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
32b769e1 2648 check_non_pic(object, r_type);
f5314dd5
DM		 2649 rela_dyn->add_global(gsym, orig_r_type, output_section, object,
2650 data_shndx, reloc.get_r_offset(),
2651 reloc.get_r_addend());
2652 }
2653 }
2654 }
2655 break;
2656
2657 case elfcpp::R_SPARC_UA64:
2658 case elfcpp::R_SPARC_64:
2659 case elfcpp::R_SPARC_HIX22:
2660 case elfcpp::R_SPARC_LOX10:
2615994e 2661 case elfcpp::R_SPARC_H34:
f5314dd5
DM		 2662 case elfcpp::R_SPARC_H44:
2663 case elfcpp::R_SPARC_M44:
2664 case elfcpp::R_SPARC_L44:
2665 case elfcpp::R_SPARC_HH22:
2666 case elfcpp::R_SPARC_HM10:
2667 case elfcpp::R_SPARC_LM22:
2668 case elfcpp::R_SPARC_HI22:
2669 case elfcpp::R_SPARC_LO10:
2670 case elfcpp::R_SPARC_OLO10:
2671 case elfcpp::R_SPARC_UA32:
2672 case elfcpp::R_SPARC_32:
2673 case elfcpp::R_SPARC_UA16:
2674 case elfcpp::R_SPARC_16:
2675 case elfcpp::R_SPARC_11:
2676 case elfcpp::R_SPARC_10:
2677 case elfcpp::R_SPARC_8:
2678 case elfcpp::R_SPARC_7:
2679 case elfcpp::R_SPARC_6:
2680 case elfcpp::R_SPARC_5:
2681 {
2e702c99
RM		 2682 // Make a PLT entry if necessary.
2683 if (gsym->needs_plt_entry())
2684 {
2685 target->make_plt_entry(symtab, layout, gsym);
2686 // Since this is not a PC-relative relocation, we may be
2687 // taking the address of a function. In that case we need to
2688 // set the entry in the dynamic symbol table to the address of
2689 // the PLT entry.
2690 if (gsym->is_from_dynobj() && !parameters->options().shared())
2691 gsym->set_needs_dynsym_value();
2692 }
2693 // Make a dynamic relocation if necessary.
2694 if (gsym->needs_dynamic_reloc(Scan::get_reference_flags(r_type)))
2695 {
0da6fa6c
DM		 2696 unsigned int r_off = reloc.get_r_offset();
2697
2698 // The assembler can sometimes emit unaligned relocations
2e702c99 2699 // for dwarf2 cfi directives.
0da6fa6c
DM		 2700 switch (r_type)
2701 {
2702 case elfcpp::R_SPARC_16:
2703 if (r_off & 0x1)
2704 orig_r_type = r_type = elfcpp::R_SPARC_UA16;
2705 break;
2706 case elfcpp::R_SPARC_32:
2707 if (r_off & 0x3)
2708 orig_r_type = r_type = elfcpp::R_SPARC_UA32;
2709 break;
2710 case elfcpp::R_SPARC_64:
2711 if (r_off & 0x7)
2712 orig_r_type = r_type = elfcpp::R_SPARC_UA64;
2713 break;
2714 case elfcpp::R_SPARC_UA16:
2715 if (!(r_off & 0x1))
2716 orig_r_type = r_type = elfcpp::R_SPARC_16;
2717 break;
2718 case elfcpp::R_SPARC_UA32:
2719 if (!(r_off & 0x3))
2720 orig_r_type = r_type = elfcpp::R_SPARC_32;
2721 break;
2722 case elfcpp::R_SPARC_UA64:
2723 if (!(r_off & 0x7))
2724 orig_r_type = r_type = elfcpp::R_SPARC_64;
2725 break;
2726 }
2727
2e702c99
RM		 2728 if (gsym->may_need_copy_reloc())
2729 {
2730 target->copy_reloc(symtab, layout, object,
2731 data_shndx, output_section, gsym, reloc);
2732 }
8c2bf391
DM		 2733 else if (((size == 64 && r_type == elfcpp::R_SPARC_64)
2734 || (size == 32 && r_type == elfcpp::R_SPARC_32))
2735 && gsym->type() == elfcpp::STT_GNU_IFUNC
2736 && gsym->can_use_relative_reloc(false)
2737 && !gsym->is_from_dynobj()
2738 && !gsym->is_undefined()
2739 && !gsym->is_preemptible())
2740 {
2741 // Use an IRELATIVE reloc for a locally defined
2742 // STT_GNU_IFUNC symbol. This makes a function
2743 // address in a PIE executable match the address in a
2744 // shared library that it links against.
2745 Reloc_section* rela_dyn =
2746 target->rela_ifunc_section(layout);
2747 unsigned int r_type = elfcpp::R_SPARC_IRELATIVE;
2748 rela_dyn->add_symbolless_global_addend(gsym, r_type,
2749 output_section, object,
2750 data_shndx,
2751 reloc.get_r_offset(),
2752 reloc.get_r_addend());
2753 }
2e702c99 2754 else if ((r_type == elfcpp::R_SPARC_32
f5314dd5 2755 || r_type == elfcpp::R_SPARC_64)
2e702c99
RM		 2756 && gsym->can_use_relative_reloc(false))
2757 {
2758 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2759 rela_dyn->add_global_relative(gsym, elfcpp::R_SPARC_RELATIVE,
f5314dd5
DM		 2760 output_section, object,
2761 data_shndx, reloc.get_r_offset(),
8c2bf391 2762 reloc.get_r_addend(), is_ifunc);
2e702c99
RM		 2763 }
2764 else
2765 {
2766 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
f5314dd5 2767
32b769e1 2768 check_non_pic(object, r_type);
0da6fa6c
DM		 2769 if (gsym->is_from_dynobj()
2770 || gsym->is_undefined()
2771 || gsym->is_preemptible())
2772 rela_dyn->add_global(gsym, orig_r_type, output_section,
2773 object, data_shndx,
2774 reloc.get_r_offset(),
2775 reloc.get_r_addend());
2776 else
2777 rela_dyn->add_symbolless_global_addend(gsym, orig_r_type,
2778 output_section,
2779 object, data_shndx,
2780 reloc.get_r_offset(),
2781 reloc.get_r_addend());
2e702c99
RM		 2782 }
2783 }
f5314dd5
DM		 2784 }
2785 break;
2786
024c4466
DM		 2787 case elfcpp::R_SPARC_GOTDATA_OP:
2788 case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2789 case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2a1079e8 2790 if (gsym->is_defined()
2e702c99
RM		 2791 && !gsym->is_from_dynobj()
2792 && !gsym->is_preemptible()
2a1079e8
DM		 2793 && !is_ifunc)
2794 {
2795 // We will optimize this into a GOT relative relocation
2796 // and code transform the GOT load into an addition.
2797 break;
2798 }
f5314dd5
DM		 2799 case elfcpp::R_SPARC_GOT10:
2800 case elfcpp::R_SPARC_GOT13:
2801 case elfcpp::R_SPARC_GOT22:
2802 {
2e702c99
RM		 2803 // The symbol requires a GOT entry.
2804 Output_data_got<size, big_endian>* got;
f5314dd5
DM		 2805
2806 got = target->got_section(symtab, layout);
2e702c99 2807 if (gsym->final_value_is_known())
8c2bf391
DM		 2808 {
2809 // For a STT_GNU_IFUNC symbol we want the PLT address.
2810 if (gsym->type() == elfcpp::STT_GNU_IFUNC)
2811 got->add_global_plt(gsym, GOT_TYPE_STANDARD);
2812 else
2813 got->add_global(gsym, GOT_TYPE_STANDARD);
2814 }
2e702c99
RM		 2815 else
2816 {
2817 // If this symbol is not fully resolved, we need to add a
2818 // GOT entry with a dynamic relocation.
8c2bf391
DM		 2819 bool is_ifunc = gsym->type() == elfcpp::STT_GNU_IFUNC;
2820
2821 // Use a GLOB_DAT rather than a RELATIVE reloc if:
2822 //
2823 // 1) The symbol may be defined in some other module.
2824 //
2825 // 2) We are building a shared library and this is a
2826 // protected symbol; using GLOB_DAT means that the dynamic
2827 // linker can use the address of the PLT in the main
2828 // executable when appropriate so that function address
2829 // comparisons work.
2830 //
2831 // 3) This is a STT_GNU_IFUNC symbol in position dependent
2832 // code, again so that function address comparisons work.
2e702c99
RM		 2833 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
2834 if (gsym->is_from_dynobj()
2835 || gsym->is_undefined()
2836 || gsym->is_preemptible()
8c2bf391
DM		 2837 || (gsym->visibility() == elfcpp::STV_PROTECTED
2838 && parameters->options().shared())
2839 || (gsym->type() == elfcpp::STT_GNU_IFUNC
2840 && parameters->options().output_is_position_independent()
2841 && !gsym->is_forced_local()))
2842 {
2843 unsigned int r_type = elfcpp::R_SPARC_GLOB_DAT;
2844
2845 // If this symbol is forced local, this relocation will
2846 // not work properly. That's because ld.so on sparc
2847 // (and 32-bit powerpc) expects st_value in the r_addend
2848 // of relocations for STB_LOCAL symbols. Curiously the
2849 // BFD linker does not promote global hidden symbols to be
2850 // STB_LOCAL in the dynamic symbol table like Gold does.
2851 gold_assert(!gsym->is_forced_local());
2852 got->add_global_with_rel(gsym, GOT_TYPE_STANDARD, rela_dyn,
2853 r_type);
2854 }
2e702c99
RM		 2855 else if (!gsym->has_got_offset(GOT_TYPE_STANDARD))
2856 {
f5314dd5
DM		 2857 unsigned int off = got->add_constant(0);
2858
2859 gsym->set_got_offset(GOT_TYPE_STANDARD, off);
8c2bf391
DM		 2860 if (is_ifunc)
2861 {
2862 // Tell the dynamic linker to use the PLT address
2863 // when resolving relocations.
2864 if (gsym->is_from_dynobj()
2865 && !parameters->options().shared())
2866 gsym->set_needs_dynsym_value();
2867 }
f5314dd5 2868 rela_dyn->add_global_relative(gsym, elfcpp::R_SPARC_RELATIVE,
8c2bf391 2869 got, off, 0, is_ifunc);
f5314dd5 2870 }
2e702c99 2871 }
f5314dd5
DM		 2872 }
2873 break;
2874
2875 // These are initial tls relocs, which are expected when
2876 // linking.
2877 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2878 case elfcpp::R_SPARC_TLS_GD_LO10:
2879 case elfcpp::R_SPARC_TLS_GD_ADD:
2880 case elfcpp::R_SPARC_TLS_GD_CALL:
2881 case elfcpp::R_SPARC_TLS_LDM_HI22: // Local-dynamic
2882 case elfcpp::R_SPARC_TLS_LDM_LO10:
2883 case elfcpp::R_SPARC_TLS_LDM_ADD:
2884 case elfcpp::R_SPARC_TLS_LDM_CALL:
2885 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2886 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2887 case elfcpp::R_SPARC_TLS_LDO_ADD:
2888 case elfcpp::R_SPARC_TLS_LE_HIX22:
2889 case elfcpp::R_SPARC_TLS_LE_LOX10:
2890 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
2891 case elfcpp::R_SPARC_TLS_IE_LO10:
2892 case elfcpp::R_SPARC_TLS_IE_LD:
2893 case elfcpp::R_SPARC_TLS_IE_LDX:
9efe6174 2894 case elfcpp::R_SPARC_TLS_IE_ADD:
f5314dd5
DM		 2895 {
2896 const bool is_final = gsym->final_value_is_known();
2897 const tls::Tls_optimization optimized_type
2e702c99 2898 = optimize_tls_reloc(is_final, r_type);
f5314dd5
DM		 2899 switch (r_type)
2900 {
2901 case elfcpp::R_SPARC_TLS_GD_HI22: // Global-dynamic
2902 case elfcpp::R_SPARC_TLS_GD_LO10:
2903 case elfcpp::R_SPARC_TLS_GD_ADD:
2904 case elfcpp::R_SPARC_TLS_GD_CALL:
2905 if (optimized_type == tls::TLSOPT_NONE)
2906 {
2e702c99
RM		 2907 // Create a pair of GOT entries for the module index and
2908 // dtv-relative offset.
2909 Output_data_got<size, big_endian>* got
2910 = target->got_section(symtab, layout);
2911 got->add_global_pair_with_rel(gsym, GOT_TYPE_TLS_PAIR,
83896202
ILT		 2912 target->rela_dyn_section(layout),
2913 (size == 64
2914 ? elfcpp::R_SPARC_TLS_DTPMOD64
2915 : elfcpp::R_SPARC_TLS_DTPMOD32),
2916 (size == 64
2917 ? elfcpp::R_SPARC_TLS_DTPOFF64
2918 : elfcpp::R_SPARC_TLS_DTPOFF32));
f5314dd5
DM		 2919
2920 // Emit R_SPARC_WPLT30 against "__tls_get_addr"
2921 if (r_type == elfcpp::R_SPARC_TLS_GD_CALL)
2922 generate_tls_call(symtab, layout, target);
2923 }
2924 else if (optimized_type == tls::TLSOPT_TO_IE)
2925 {
2e702c99
RM		 2926 // Create a GOT entry for the tp-relative offset.
2927 Output_data_got<size, big_endian>* got
2928 = target->got_section(symtab, layout);
2929 got->add_global_with_rel(gsym, GOT_TYPE_TLS_OFFSET,
83896202
ILT		 2930 target->rela_dyn_section(layout),
2931 (size == 64 ?
2932 elfcpp::R_SPARC_TLS_TPOFF64 :
2933 elfcpp::R_SPARC_TLS_TPOFF32));
f5314dd5
DM		 2934 }
2935 else if (optimized_type != tls::TLSOPT_TO_LE)
2936 unsupported_reloc_global(object, r_type, gsym);
2937 break;
2938
2939 case elfcpp::R_SPARC_TLS_LDM_HI22: // Local-dynamic
2940 case elfcpp::R_SPARC_TLS_LDM_LO10:
2941 case elfcpp::R_SPARC_TLS_LDM_ADD:
2942 case elfcpp::R_SPARC_TLS_LDM_CALL:
2943 if (optimized_type == tls::TLSOPT_NONE)
2944 {
2945 // Create a GOT entry for the module index.
2946 target->got_mod_index_entry(symtab, layout, object);
2947
2948 if (r_type == elfcpp::R_SPARC_TLS_LDM_CALL)
2949 generate_tls_call(symtab, layout, target);
2950 }
2951 else if (optimized_type != tls::TLSOPT_TO_LE)
2952 unsupported_reloc_global(object, r_type, gsym);
2953 break;
2954
2955 case elfcpp::R_SPARC_TLS_LDO_HIX22: // Alternate local-dynamic
2956 case elfcpp::R_SPARC_TLS_LDO_LOX10:
2957 case elfcpp::R_SPARC_TLS_LDO_ADD:
2958 break;
2959
2960 case elfcpp::R_SPARC_TLS_LE_HIX22:
2961 case elfcpp::R_SPARC_TLS_LE_LOX10:
2962 layout->set_has_static_tls();
2963 if (parameters->options().shared())
2964 {
2965 Reloc_section* rela_dyn = target->rela_dyn_section(layout);
0da6fa6c
DM		 2966 rela_dyn->add_symbolless_global_addend(gsym, orig_r_type,
2967 output_section, object,
2968 data_shndx, reloc.get_r_offset(),
2969 0);
f5314dd5
DM		 2970 }
2971 break;
2972
2973 case elfcpp::R_SPARC_TLS_IE_HI22: // Initial-exec
2974 case elfcpp::R_SPARC_TLS_IE_LO10:
2975 case elfcpp::R_SPARC_TLS_IE_LD:
2976 case elfcpp::R_SPARC_TLS_IE_LDX:
9efe6174 2977 case elfcpp::R_SPARC_TLS_IE_ADD:
f5314dd5
DM		 2978 layout->set_has_static_tls();
2979 if (optimized_type == tls::TLSOPT_NONE)
2980 {
2981 // Create a GOT entry for the tp-relative offset.
2982 Output_data_got<size, big_endian>* got
2983 = target->got_section(symtab, layout);
83896202
ILT		 2984 got->add_global_with_rel(gsym, GOT_TYPE_TLS_OFFSET,
2985 target->rela_dyn_section(layout),
2986 (size == 64
2987 ? elfcpp::R_SPARC_TLS_TPOFF64
2988 : elfcpp::R_SPARC_TLS_TPOFF32));
f5314dd5
DM		 2989 }
2990 else if (optimized_type != tls::TLSOPT_TO_LE)
2991 unsupported_reloc_global(object, r_type, gsym);
2992 break;
2993 }
2994 }
2995 break;
2996
2997 // These are relocations which should only be seen by the
2998 // dynamic linker, and should never be seen here.
2999 case elfcpp::R_SPARC_COPY:
3000 case elfcpp::R_SPARC_GLOB_DAT:
3001 case elfcpp::R_SPARC_JMP_SLOT:
8c2bf391 3002 case elfcpp::R_SPARC_JMP_IREL:
f5314dd5 3003 case elfcpp::R_SPARC_RELATIVE:
8c2bf391 3004 case elfcpp::R_SPARC_IRELATIVE:
f5314dd5
DM		 3005 case elfcpp::R_SPARC_TLS_DTPMOD64:
3006 case elfcpp::R_SPARC_TLS_DTPMOD32:
3007 case elfcpp::R_SPARC_TLS_DTPOFF64:
3008 case elfcpp::R_SPARC_TLS_DTPOFF32:
3009 case elfcpp::R_SPARC_TLS_TPOFF64:
3010 case elfcpp::R_SPARC_TLS_TPOFF32:
3011 gold_error(_("%s: unexpected reloc %u in object file"),
3012 object->name().c_str(), r_type);
3013 break;
3014
3015 default:
3016 unsupported_reloc_global(object, r_type, gsym);
3017 break;
3018 }
3019}
3020
6d03d481
ST		 3021// Process relocations for gc.
3022
3023template<int size, bool big_endian>
3024void
3025Target_sparc<size, big_endian>::gc_process_relocs(
6d03d481
ST		 3026 Symbol_table* symtab,
3027 Layout* layout,
6fa2a40b 3028 Sized_relobj_file<size, big_endian>* object,
6d03d481
ST		 3029 unsigned int data_shndx,
3030 unsigned int,
3031 const unsigned char* prelocs,
3032 size_t reloc_count,
3033 Output_section* output_section,
3034 bool needs_special_offset_handling,
3035 size_t local_symbol_count,
3036 const unsigned char* plocal_symbols)
3037{
3038 typedef Target_sparc<size, big_endian> Sparc;
2ea97941 3039 typedef typename Target_sparc<size, big_endian>::Scan Scan;
6d03d481 3040
41cbeecc 3041 gold::gc_process_relocs<size, big_endian, Sparc, elfcpp::SHT_RELA, Scan,
3ff2ccb0 3042 typename Target_sparc::Relocatable_size_for_reloc>(
6d03d481
ST		 3043 symtab,
3044 layout,
3045 this,
3046 object,
3047 data_shndx,
3048 prelocs,
3049 reloc_count,
3050 output_section,
3051 needs_special_offset_handling,
3052 local_symbol_count,
3053 plocal_symbols);
3054}
3055
f5314dd5
DM		 3056// Scan relocations for a section.
3057
3058template<int size, bool big_endian>
3059void
3060Target_sparc<size, big_endian>::scan_relocs(
f5314dd5
DM		 3061 Symbol_table* symtab,
3062 Layout* layout,
6fa2a40b 3063 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 3064 unsigned int data_shndx,
3065 unsigned int sh_type,
3066 const unsigned char* prelocs,
3067 size_t reloc_count,
3068 Output_section* output_section,
3069 bool needs_special_offset_handling,
3070 size_t local_symbol_count,
3071 const unsigned char* plocal_symbols)
3072{
3073 typedef Target_sparc<size, big_endian> Sparc;
2ea97941 3074 typedef typename Target_sparc<size, big_endian>::Scan Scan;
f5314dd5
DM		 3075
3076 if (sh_type == elfcpp::SHT_REL)
3077 {
3078 gold_error(_("%s: unsupported REL reloc section"),
3079 object->name().c_str());
3080 return;
3081 }
3082
2ea97941 3083 gold::scan_relocs<size, big_endian, Sparc, elfcpp::SHT_RELA, Scan>(
f5314dd5
DM		 3084 symtab,
3085 layout,
3086 this,
3087 object,
3088 data_shndx,
3089 prelocs,
3090 reloc_count,
3091 output_section,
3092 needs_special_offset_handling,
3093 local_symbol_count,
3094 plocal_symbols);
3095}
3096
3097// Finalize the sections.
3098
3099template<int size, bool big_endian>
3100void
d5b40221
DK		 3101Target_sparc<size, big_endian>::do_finalize_sections(
3102 Layout* layout,
f59f41f3 3103 const Input_objects*,
8c2bf391 3104 Symbol_table* symtab)
f5314dd5 3105{
8c2bf391
DM		 3106 if (this->plt_)
3107 this->plt_->emit_pending_ifunc_relocs();
3108
f5314dd5 3109 // Fill in some more dynamic tags.
ea715a34
ILT		 3110 const Reloc_section* rel_plt = (this->plt_ == NULL
3111 ? NULL
3112 : this->plt_->rel_plt());
3113 layout->add_target_dynamic_tags(false, this->plt_, rel_plt,
612a8d3d 3114 this->rela_dyn_, true, true);
f5314dd5
DM		 3115
3116 // Emit any relocs we saved in an attempt to avoid generating COPY
3117 // relocs.
12c0daef
ILT		 3118 if (this->copy_relocs_.any_saved_relocs())
3119 this->copy_relocs_.emit(this->rela_dyn_section(layout));
8c2bf391
DM		 3120
3121 if (parameters->doing_static_link()
3122 && (this->plt_ == NULL || !this->plt_->has_ifunc_section()))
3123 {
3124 // If linking statically, make sure that the __rela_iplt symbols
3125 // were defined if necessary, even if we didn't create a PLT.
3126 static const Define_symbol_in_segment syms[] =
3127 {
3128 {
3129 "__rela_iplt_start", // name
3130 elfcpp::PT_LOAD, // segment_type
3131 elfcpp::PF_W, // segment_flags_set
3132 elfcpp::PF(0), // segment_flags_clear
3133 0, // value
3134 0, // size
3135 elfcpp::STT_NOTYPE, // type
3136 elfcpp::STB_GLOBAL, // binding
3137 elfcpp::STV_HIDDEN, // visibility
3138 0, // nonvis
3139 Symbol::SEGMENT_START, // offset_from_base
3140 true // only_if_ref
3141 },
3142 {
3143 "__rela_iplt_end", // name
3144 elfcpp::PT_LOAD, // segment_type
3145 elfcpp::PF_W, // segment_flags_set
3146 elfcpp::PF(0), // segment_flags_clear
3147 0, // value
3148 0, // size
3149 elfcpp::STT_NOTYPE, // type
3150 elfcpp::STB_GLOBAL, // binding
3151 elfcpp::STV_HIDDEN, // visibility
3152 0, // nonvis
3153 Symbol::SEGMENT_START, // offset_from_base
3154 true // only_if_ref
3155 }
3156 };
3157
3158 symtab->define_symbols(layout, 2, syms,
3159 layout->script_options()->saw_sections_clause());
3160 }
f5314dd5
DM		 3161}
3162
3163// Perform a relocation.
3164
3165template<int size, bool big_endian>
3166inline bool
3167Target_sparc<size, big_endian>::Relocate::relocate(
3168 const Relocate_info<size, big_endian>* relinfo,
3169 Target_sparc* target,
031cdbed 3170 Output_section*,
f5314dd5
DM		 3171 size_t relnum,
3172 const elfcpp::Rela<size, big_endian>& rela,
3173 unsigned int r_type,
3174 const Sized_symbol<size>* gsym,
3175 const Symbol_value<size>* psymval,
3176 unsigned char* view,
3177 typename elfcpp::Elf_types<size>::Elf_Addr address,
3178 section_size_type view_size)
3179{
2a1079e8 3180 bool orig_is_ifunc = psymval->is_ifunc_symbol();
f5314dd5
DM		 3181 r_type &= 0xff;
3182
3183 if (this->ignore_gd_add_)
3184 {
3185 if (r_type != elfcpp::R_SPARC_TLS_GD_ADD)
3186 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3187 _("missing expected TLS relocation"));
3188 else
3189 {
3190 this->ignore_gd_add_ = false;
3191 return false;
3192 }
3193 }
0e804863
ILT		 3194
3195 if (view == NULL)
3196 return true;
3197
abd242a9
DM		 3198 if (this->reloc_adjust_addr_ == view)
3199 view -= 4;
f5314dd5
DM		 3200
3201 typedef Sparc_relocate_functions<size, big_endian> Reloc;
8c2bf391 3202 const Sized_relobj_file<size, big_endian>* object = relinfo->object;
f5314dd5
DM		 3203
3204 // Pick the value to use for symbols defined in shared objects.
3205 Symbol_value<size> symval;
3206 if (gsym != NULL
95a2c8d6 3207 && gsym->use_plt_offset(Scan::get_reference_flags(r_type)))
f5314dd5 3208 {
2ea97941 3209 elfcpp::Elf_Xword value;
f5314dd5 3210
19fec8c1 3211 value = target->plt_address_for_global(gsym);
f5314dd5 3212
2ea97941 3213 symval.set_output_value(value);
f5314dd5
DM		 3214
3215 psymval = &symval;
3216 }
2a1079e8 3217 else if (gsym == NULL && orig_is_ifunc)
8c2bf391
DM		 3218 {
3219 unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3220 if (object->local_has_plt_offset(r_sym))
3221 {
19fec8c1 3222 symval.set_output_value(target->plt_address_for_local(object, r_sym));
8c2bf391
DM		 3223 psymval = &symval;
3224 }
3225 }
f5314dd5 3226
f5314dd5
DM		 3227 const elfcpp::Elf_Xword addend = rela.get_r_addend();
3228
3229 // Get the GOT offset if needed. Unlike i386 and x86_64, our GOT
3230 // pointer points to the beginning, not the end, of the table.
3231 // So we just use the plain offset.
f5314dd5 3232 unsigned int got_offset = 0;
2a1079e8 3233 bool gdop_valid = false;
f5314dd5
DM		 3234 switch (r_type)
3235 {
024c4466
DM		 3236 case elfcpp::R_SPARC_GOTDATA_OP:
3237 case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
3238 case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2a1079e8
DM		 3239 // If this is local, we did not create a GOT entry because we
3240 // intend to transform this into a GOT relative relocation.
3241 if (gsym == NULL
3242 || (gsym->is_defined()
3243 && !gsym->is_from_dynobj()
3244 && !gsym->is_preemptible()
3245 && !orig_is_ifunc))
3246 {
3247 got_offset = psymval->value(object, 0) - target->got_address();
3248 gdop_valid = true;
3249 break;
3250 }
f5314dd5
DM		 3251 case elfcpp::R_SPARC_GOT10:
3252 case elfcpp::R_SPARC_GOT13:
3253 case elfcpp::R_SPARC_GOT22:
3254 if (gsym != NULL)
2e702c99
RM		 3255 {
3256 gold_assert(gsym->has_got_offset(GOT_TYPE_STANDARD));
3257 got_offset = gsym->got_offset(GOT_TYPE_STANDARD);
3258 }
f5314dd5 3259 else
2e702c99
RM		 3260 {
3261 unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3262 gold_assert(object->local_has_got_offset(r_sym, GOT_TYPE_STANDARD));
3263 got_offset = object->local_got_offset(r_sym, GOT_TYPE_STANDARD);
3264 }
f5314dd5
DM		 3265 break;
3266
3267 default:
3268 break;
3269 }
3270
3271 switch (r_type)
3272 {
3273 case elfcpp::R_SPARC_NONE:
3274 case elfcpp::R_SPARC_REGISTER:
3275 case elfcpp::R_SPARC_GNU_VTINHERIT:
3276 case elfcpp::R_SPARC_GNU_VTENTRY:
3277 break;
3278
3279 case elfcpp::R_SPARC_8:
3280 Relocate_functions<size, big_endian>::rela8(view, object,
3281 psymval, addend);
3282 break;
3283
3284 case elfcpp::R_SPARC_16:
705b5121
DM		 3285 if (rela.get_r_offset() & 0x1)
3286 {
3287 // The assembler can sometimes emit unaligned relocations
2e702c99 3288 // for dwarf2 cfi directives.
705b5121
DM		 3289 Reloc::ua16(view, object, psymval, addend);
3290 }
3291 else
3292 Relocate_functions<size, big_endian>::rela16(view, object,
3293 psymval, addend);
f5314dd5
DM		 3294 break;
3295
3296 case elfcpp::R_SPARC_32:
3297 if (!parameters->options().output_is_position_independent())
705b5121
DM		 3298 {
3299 if (rela.get_r_offset() & 0x3)
3300 {
3301 // The assembler can sometimes emit unaligned relocations
2e702c99 3302 // for dwarf2 cfi directives.
705b5121
DM		 3303 Reloc::ua32(view, object, psymval, addend);
3304 }
3305 else
3306 Relocate_functions<size, big_endian>::rela32(view, object,
3307 psymval, addend);
3308 }
f5314dd5
DM		 3309 break;
3310
3311 case elfcpp::R_SPARC_DISP8:
3312 Reloc::disp8(view, object, psymval, addend, address);
3313 break;
3314
3315 case elfcpp::R_SPARC_DISP16:
3316 Reloc::disp16(view, object, psymval, addend, address);
3317 break;
3318
3319 case elfcpp::R_SPARC_DISP32:
3320 Reloc::disp32(view, object, psymval, addend, address);
3321 break;
3322
3323 case elfcpp::R_SPARC_DISP64:
3324 Reloc::disp64(view, object, psymval, addend, address);
3325 break;
3326
3327 case elfcpp::R_SPARC_WDISP30:
3328 case elfcpp::R_SPARC_WPLT30:
3329 Reloc::wdisp30(view, object, psymval, addend, address);
a5a5f7a3
DM		 3330 if (target->may_relax())
3331 relax_call(target, view, rela, view_size);
f5314dd5
DM		 3332 break;
3333
3334 case elfcpp::R_SPARC_WDISP22:
3335 Reloc::wdisp22(view, object, psymval, addend, address);
3336 break;
3337
3338 case elfcpp::R_SPARC_WDISP19:
3339 Reloc::wdisp19(view, object, psymval, addend, address);
3340 break;
3341
3342 case elfcpp::R_SPARC_WDISP16:
3343 Reloc::wdisp16(view, object, psymval, addend, address);
3344 break;
3345
2615994e
DM		 3346 case elfcpp::R_SPARC_WDISP10:
3347 Reloc::wdisp10(view, object, psymval, addend, address);
3348 break;
3349
f5314dd5
DM		 3350 case elfcpp::R_SPARC_HI22:
3351 Reloc::hi22(view, object, psymval, addend);
3352 break;
3353
3354 case elfcpp::R_SPARC_22:
3355 Reloc::rela32_22(view, object, psymval, addend);
3356 break;
3357
3358 case elfcpp::R_SPARC_13:
3359 Reloc::rela32_13(view, object, psymval, addend);
3360 break;
3361
3362 case elfcpp::R_SPARC_LO10:
3363 Reloc::lo10(view, object, psymval, addend);
3364 break;
3365
3366 case elfcpp::R_SPARC_GOT10:
3367 Reloc::lo10(view, got_offset, addend);
3368 break;
3369
024c4466 3370 case elfcpp::R_SPARC_GOTDATA_OP:
2a1079e8
DM		 3371 if (gdop_valid)
3372 {
3373 typedef typename elfcpp::Swap<32, true>::Valtype Insntype;
3374 Insntype* wv = reinterpret_cast<Insntype*>(view);
3375 Insntype val;
3376
3377 // {ld,ldx} [%rs1 + %rs2], %rd --> add %rs1, %rs2, %rd
3378 val = elfcpp::Swap<32, true>::readval(wv);
3379 val = 0x80000000 | (val & 0x3e07c01f);
3380 elfcpp::Swap<32, true>::writeval(wv, val);
3381 }
024c4466
DM		 3382 break;
3383
3384 case elfcpp::R_SPARC_GOTDATA_OP_LOX10:
2a1079e8
DM		 3385 if (gdop_valid)
3386 {
3387 Reloc::gdop_lox10(view, got_offset, addend);
3388 break;
3389 }
3390 /* Fall through. */
f5314dd5
DM		 3391 case elfcpp::R_SPARC_GOT13:
3392 Reloc::rela32_13(view, got_offset, addend);
3393 break;
3394
024c4466 3395 case elfcpp::R_SPARC_GOTDATA_OP_HIX22:
2a1079e8
DM		 3396 if (gdop_valid)
3397 {
3398 Reloc::gdop_hix22(view, got_offset, addend);
3399 break;
3400 }
3401 /* Fall through. */
f5314dd5
DM		 3402 case elfcpp::R_SPARC_GOT22:
3403 Reloc::hi22(view, got_offset, addend);
3404 break;
3405
3406 case elfcpp::R_SPARC_PC10:
3407 Reloc::pc10(view, object, psymval, addend, address);
3408 break;
3409
3410 case elfcpp::R_SPARC_PC22:
3411 Reloc::pc22(view, object, psymval, addend, address);
3412 break;
3413
3414 case elfcpp::R_SPARC_TLS_DTPOFF32:
3415 case elfcpp::R_SPARC_UA32:
3416 Reloc::ua32(view, object, psymval, addend);
3417 break;
3418
3419 case elfcpp::R_SPARC_PLT64:
3420 Relocate_functions<size, big_endian>::rela64(view, object,
3421 psymval, addend);
3422 break;
3423
3424 case elfcpp::R_SPARC_PLT32:
3425 Relocate_functions<size, big_endian>::rela32(view, object,
3426 psymval, addend);
3427 break;
3428
3429 case elfcpp::R_SPARC_HIPLT22:
3430 Reloc::hi22(view, object, psymval, addend);
3431 break;
3432
3433 case elfcpp::R_SPARC_LOPLT10:
3434 Reloc::lo10(view, object, psymval, addend);
3435 break;
3436
3437 case elfcpp::R_SPARC_PCPLT32:
3438 Reloc::disp32(view, object, psymval, addend, address);
3439 break;
3440
3441 case elfcpp::R_SPARC_PCPLT22:
3442 Reloc::pcplt22(view, object, psymval, addend, address);
3443 break;
3444
3445 case elfcpp::R_SPARC_PCPLT10:
3446 Reloc::lo10(view, object, psymval, addend, address);
3447 break;
3448
3449 case elfcpp::R_SPARC_64:
3450 if (!parameters->options().output_is_position_independent())
705b5121
DM		 3451 {
3452 if (rela.get_r_offset() & 0x7)
3453 {
3454 // The assembler can sometimes emit unaligned relocations
2e702c99 3455 // for dwarf2 cfi directives.
705b5121
DM		 3456 Reloc::ua64(view, object, psymval, addend);
3457 }
3458 else
3459 Relocate_functions<size, big_endian>::rela64(view, object,
3460 psymval, addend);
3461 }
f5314dd5
DM		 3462 break;
3463
3464 case elfcpp::R_SPARC_OLO10:
3465 {
3466 unsigned int addend2 = rela.get_r_info() & 0xffffffff;
3467 addend2 = ((addend2 >> 8) ^ 0x800000) - 0x800000;
3468 Reloc::olo10(view, object, psymval, addend, addend2);
3469 }
3470 break;
3471
3472 case elfcpp::R_SPARC_HH22:
3473 Reloc::hh22(view, object, psymval, addend);
3474 break;
3475
3476 case elfcpp::R_SPARC_PC_HH22:
3477 Reloc::pc_hh22(view, object, psymval, addend, address);
3478 break;
3479
3480 case elfcpp::R_SPARC_HM10:
3481 Reloc::hm10(view, object, psymval, addend);
3482 break;
3483
3484 case elfcpp::R_SPARC_PC_HM10:
3485 Reloc::pc_hm10(view, object, psymval, addend, address);
3486 break;
3487
3488 case elfcpp::R_SPARC_LM22:
3489 Reloc::hi22(view, object, psymval, addend);
3490 break;
3491
3492 case elfcpp::R_SPARC_PC_LM22:
3493 Reloc::pcplt22(view, object, psymval, addend, address);
3494 break;
3495
3496 case elfcpp::R_SPARC_11:
3497 Reloc::rela32_11(view, object, psymval, addend);
3498 break;
3499
3500 case elfcpp::R_SPARC_10:
3501 Reloc::rela32_10(view, object, psymval, addend);
3502 break;
3503
3504 case elfcpp::R_SPARC_7:
3505 Reloc::rela32_7(view, object, psymval, addend);
3506 break;
3507
3508 case elfcpp::R_SPARC_6:
3509 Reloc::rela32_6(view, object, psymval, addend);
3510 break;
3511
3512 case elfcpp::R_SPARC_5:
3513 Reloc::rela32_5(view, object, psymval, addend);
3514 break;
3515
3516 case elfcpp::R_SPARC_HIX22:
3517 Reloc::hix22(view, object, psymval, addend);
3518 break;
3519
3520 case elfcpp::R_SPARC_LOX10:
3521 Reloc::lox10(view, object, psymval, addend);
3522 break;
3523
2615994e
DM		 3524 case elfcpp::R_SPARC_H34:
3525 Reloc::h34(view, object, psymval, addend);
3526 break;
3527
f5314dd5
DM		 3528 case elfcpp::R_SPARC_H44:
3529 Reloc::h44(view, object, psymval, addend);
3530 break;
3531
3532 case elfcpp::R_SPARC_M44:
3533 Reloc::m44(view, object, psymval, addend);
3534 break;
3535
3536 case elfcpp::R_SPARC_L44:
3537 Reloc::l44(view, object, psymval, addend);
3538 break;
3539
3540 case elfcpp::R_SPARC_TLS_DTPOFF64:
3541 case elfcpp::R_SPARC_UA64:
3542 Reloc::ua64(view, object, psymval, addend);
3543 break;
3544
3545 case elfcpp::R_SPARC_UA16:
3546 Reloc::ua16(view, object, psymval, addend);
3547 break;
3548
3549 case elfcpp::R_SPARC_TLS_GD_HI22:
3550 case elfcpp::R_SPARC_TLS_GD_LO10:
3551 case elfcpp::R_SPARC_TLS_GD_ADD:
3552 case elfcpp::R_SPARC_TLS_GD_CALL:
3553 case elfcpp::R_SPARC_TLS_LDM_HI22:
3554 case elfcpp::R_SPARC_TLS_LDM_LO10:
3555 case elfcpp::R_SPARC_TLS_LDM_ADD:
3556 case elfcpp::R_SPARC_TLS_LDM_CALL:
3557 case elfcpp::R_SPARC_TLS_LDO_HIX22:
3558 case elfcpp::R_SPARC_TLS_LDO_LOX10:
3559 case elfcpp::R_SPARC_TLS_LDO_ADD:
3560 case elfcpp::R_SPARC_TLS_IE_HI22:
3561 case elfcpp::R_SPARC_TLS_IE_LO10:
3562 case elfcpp::R_SPARC_TLS_IE_LD:
3563 case elfcpp::R_SPARC_TLS_IE_LDX:
9efe6174 3564 case elfcpp::R_SPARC_TLS_IE_ADD:
f5314dd5
DM		 3565 case elfcpp::R_SPARC_TLS_LE_HIX22:
3566 case elfcpp::R_SPARC_TLS_LE_LOX10:
3567 this->relocate_tls(relinfo, target, relnum, rela,
3568 r_type, gsym, psymval, view,
3569 address, view_size);
3570 break;
3571
3572 case elfcpp::R_SPARC_COPY:
3573 case elfcpp::R_SPARC_GLOB_DAT:
3574 case elfcpp::R_SPARC_JMP_SLOT:
8c2bf391 3575 case elfcpp::R_SPARC_JMP_IREL:
f5314dd5 3576 case elfcpp::R_SPARC_RELATIVE:
8c2bf391 3577 case elfcpp::R_SPARC_IRELATIVE:
f5314dd5
DM		 3578 // These are outstanding tls relocs, which are unexpected when
3579 // linking.
3580 case elfcpp::R_SPARC_TLS_DTPMOD64:
3581 case elfcpp::R_SPARC_TLS_DTPMOD32:
3582 case elfcpp::R_SPARC_TLS_TPOFF64:
3583 case elfcpp::R_SPARC_TLS_TPOFF32:
3584 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3585 _("unexpected reloc %u in object file"),
3586 r_type);
3587 break;
3588
3589 default:
3590 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3591 _("unsupported reloc %u"),
3592 r_type);
3593 break;
3594 }
3595
3596 return true;
3597}
3598
3599// Perform a TLS relocation.
3600
3601template<int size, bool big_endian>
3602inline void
3603Target_sparc<size, big_endian>::Relocate::relocate_tls(
3604 const Relocate_info<size, big_endian>* relinfo,
3605 Target_sparc<size, big_endian>* target,
3606 size_t relnum,
3607 const elfcpp::Rela<size, big_endian>& rela,
3608 unsigned int r_type,
3609 const Sized_symbol<size>* gsym,
3610 const Symbol_value<size>* psymval,
3611 unsigned char* view,
3612 typename elfcpp::Elf_types<size>::Elf_Addr address,
3613 section_size_type)
3614{
3615 Output_segment* tls_segment = relinfo->layout->tls_segment();
3616 typedef Sparc_relocate_functions<size, big_endian> Reloc;
6fa2a40b 3617 const Sized_relobj_file<size, big_endian>* object = relinfo->object;
f5314dd5
DM		 3618 typedef typename elfcpp::Swap<32, true>::Valtype Insntype;
3619
3620 const elfcpp::Elf_Xword addend = rela.get_r_addend();
2ea97941 3621 typename elfcpp::Elf_types<size>::Elf_Addr value = psymval->value(object, 0);
f5314dd5
DM		 3622
3623 const bool is_final =
3624 (gsym == NULL
3625 ? !parameters->options().output_is_position_independent()
3626 : gsym->final_value_is_known());
3627 const tls::Tls_optimization optimized_type
3628 = optimize_tls_reloc(is_final, r_type);
3629
3630 switch (r_type)
3631 {
3632 case elfcpp::R_SPARC_TLS_GD_HI22:
3633 case elfcpp::R_SPARC_TLS_GD_LO10:
3634 case elfcpp::R_SPARC_TLS_GD_ADD:
3635 case elfcpp::R_SPARC_TLS_GD_CALL:
3636 if (optimized_type == tls::TLSOPT_TO_LE)
3637 {
3638 Insntype* wv = reinterpret_cast<Insntype*>(view);
3639 Insntype val;
3640
2ea97941 3641 value -= tls_segment->memsz();
f5314dd5
DM		 3642
3643 switch (r_type)
3644 {
3645 case elfcpp::R_SPARC_TLS_GD_HI22:
3646 // TLS_GD_HI22 --> TLS_LE_HIX22
2ea97941 3647 Reloc::hix22(view, value, addend);
f5314dd5
DM		 3648 break;
3649
3650 case elfcpp::R_SPARC_TLS_GD_LO10:
3651 // TLS_GD_LO10 --> TLS_LE_LOX10
2ea97941 3652 Reloc::lox10(view, value, addend);
f5314dd5
DM		 3653 break;
3654
3655 case elfcpp::R_SPARC_TLS_GD_ADD:
3656 // add %reg1, %reg2, %reg3 --> mov %g7, %reg2, %reg3
3657 val = elfcpp::Swap<32, true>::readval(wv);
3658 val = (val & ~0x7c000) | 0x1c000;
3659 elfcpp::Swap<32, true>::writeval(wv, val);
3660 break;
3661 case elfcpp::R_SPARC_TLS_GD_CALL:
3662 // call __tls_get_addr --> nop
3663 elfcpp::Swap<32, true>::writeval(wv, sparc_nop);
3664 break;
3665 }
3666 break;
3667 }
3668 else
2e702c99
RM		 3669 {
3670 unsigned int got_type = (optimized_type == tls::TLSOPT_TO_IE
3671 ? GOT_TYPE_TLS_OFFSET
3672 : GOT_TYPE_TLS_PAIR);
3673 if (gsym != NULL)
3674 {
3675 gold_assert(gsym->has_got_offset(got_type));
3676 value = gsym->got_offset(got_type);
3677 }
3678 else
3679 {
3680 unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3681 gold_assert(object->local_has_got_offset(r_sym, got_type));
3682 value = object->local_got_offset(r_sym, got_type);
3683 }
3684 if (optimized_type == tls::TLSOPT_TO_IE)
f5314dd5
DM		 3685 {
3686 Insntype* wv = reinterpret_cast<Insntype*>(view);
3687 Insntype val;
3688
3689 switch (r_type)
3690 {
3691 case elfcpp::R_SPARC_TLS_GD_HI22:
3692 // TLS_GD_HI22 --> TLS_IE_HI22
2ea97941 3693 Reloc::hi22(view, value, addend);
f5314dd5
DM		 3694 break;
3695
3696 case elfcpp::R_SPARC_TLS_GD_LO10:
3697 // TLS_GD_LO10 --> TLS_IE_LO10
2ea97941 3698 Reloc::lo10(view, value, addend);
f5314dd5
DM		 3699 break;
3700
3701 case elfcpp::R_SPARC_TLS_GD_ADD:
3702 // add %reg1, %reg2, %reg3 --> ld [%reg1 + %reg2], %reg3
3703 val = elfcpp::Swap<32, true>::readval(wv);
3704
3705 if (size == 64)
3706 val |= 0xc0580000;
3707 else
3708 val |= 0xc0000000;
3709
3710 elfcpp::Swap<32, true>::writeval(wv, val);
3711 break;
3712
3713 case elfcpp::R_SPARC_TLS_GD_CALL:
3714 // The compiler can put the TLS_GD_ADD instruction
3715 // into the delay slot of the call. If so, we need
3716 // to transpose the two instructions so that the
9b547ce6 3717 // new sequence works properly.
f5314dd5
DM		 3718 //
3719 // The test we use is if the instruction in the
3720 // delay slot is an add with destination register
3721 // equal to %o0
3722 val = elfcpp::Swap<32, true>::readval(wv + 1);
3723 if ((val & 0x81f80000) == 0x80000000
3724 && ((val >> 25) & 0x1f) == 0x8)
3725 {
3726 if (size == 64)
3727 val |= 0xc0580000;
3728 else
3729 val |= 0xc0000000;
3730
3731 elfcpp::Swap<32, true>::writeval(wv, val);
3732
3733 wv += 1;
3734 this->ignore_gd_add_ = true;
3735 }
abd242a9
DM		 3736 else
3737 {
3738 // Even if the delay slot isn't the TLS_GD_ADD
3739 // instruction, we still have to handle the case
3740 // where it sets up %o0 in some other way.
3741 elfcpp::Swap<32, true>::writeval(wv, val);
3742 wv += 1;
3743 this->reloc_adjust_addr_ = view + 4;
3744 }
f5314dd5
DM		 3745 // call __tls_get_addr --> add %g7, %o0, %o0
3746 elfcpp::Swap<32, true>::writeval(wv, 0x9001c008);
3747 break;
3748 }
2e702c99 3749 break;
f5314dd5 3750 }
2e702c99
RM		 3751 else if (optimized_type == tls::TLSOPT_NONE)
3752 {
f5314dd5
DM		 3753 switch (r_type)
3754 {
3755 case elfcpp::R_SPARC_TLS_GD_HI22:
2ea97941 3756 Reloc::hi22(view, value, addend);
f5314dd5
DM		 3757 break;
3758 case elfcpp::R_SPARC_TLS_GD_LO10:
2ea97941 3759 Reloc::lo10(view, value, addend);
f5314dd5
DM		 3760 break;
3761 case elfcpp::R_SPARC_TLS_GD_ADD:
3762 break;
3763 case elfcpp::R_SPARC_TLS_GD_CALL:
3764 {
3765 Symbol_value<size> symval;
2ea97941 3766 elfcpp::Elf_Xword value;
f5314dd5
DM		 3767 Symbol* tsym;
3768
3769 tsym = target->tls_get_addr_sym_;
3770 gold_assert(tsym);
2ea97941
ILT		 3771 value = (target->plt_section()->address() +
3772 tsym->plt_offset());
3773 symval.set_output_value(value);
f5314dd5
DM		 3774 Reloc::wdisp30(view, object, &symval, addend, address);
3775 }
3776 break;
3777 }
3778 break;
2e702c99
RM		 3779 }
3780 }
f5314dd5
DM		 3781 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3782 _("unsupported reloc %u"),
3783 r_type);
3784 break;
3785
3786 case elfcpp::R_SPARC_TLS_LDM_HI22:
3787 case elfcpp::R_SPARC_TLS_LDM_LO10:
3788 case elfcpp::R_SPARC_TLS_LDM_ADD:
3789 case elfcpp::R_SPARC_TLS_LDM_CALL:
3790 if (optimized_type == tls::TLSOPT_TO_LE)
3791 {
3792 Insntype* wv = reinterpret_cast<Insntype*>(view);
3793
3794 switch (r_type)
3795 {
3796 case elfcpp::R_SPARC_TLS_LDM_HI22:
3797 case elfcpp::R_SPARC_TLS_LDM_LO10:
3798 case elfcpp::R_SPARC_TLS_LDM_ADD:
3799 elfcpp::Swap<32, true>::writeval(wv, sparc_nop);
3800 break;
3801
3802 case elfcpp::R_SPARC_TLS_LDM_CALL:
3803 elfcpp::Swap<32, true>::writeval(wv, sparc_mov_g0_o0);
3804 break;
3805 }
3806 break;
3807 }
3808 else if (optimized_type == tls::TLSOPT_NONE)
2e702c99
RM		 3809 {
3810 // Relocate the field with the offset of the GOT entry for
3811 // the module index.
3812 unsigned int got_offset;
f5314dd5
DM		 3813
3814 got_offset = target->got_mod_index_entry(NULL, NULL, NULL);
3815 switch (r_type)
3816 {
3817 case elfcpp::R_SPARC_TLS_LDM_HI22:
3818 Reloc::hi22(view, got_offset, addend);
3819 break;
3820 case elfcpp::R_SPARC_TLS_LDM_LO10:
3821 Reloc::lo10(view, got_offset, addend);
3822 break;
3823 case elfcpp::R_SPARC_TLS_LDM_ADD:
3824 break;
3825 case elfcpp::R_SPARC_TLS_LDM_CALL:
3826 {
3827 Symbol_value<size> symval;
2ea97941 3828 elfcpp::Elf_Xword value;
f5314dd5
DM		 3829 Symbol* tsym;
3830
3831 tsym = target->tls_get_addr_sym_;
3832 gold_assert(tsym);
2ea97941
ILT		 3833 value = (target->plt_section()->address() +
3834 tsym->plt_offset());
3835 symval.set_output_value(value);
f5314dd5
DM		 3836 Reloc::wdisp30(view, object, &symval, addend, address);
3837 }
3838 break;
3839 }
2e702c99
RM		 3840 break;
3841 }
f5314dd5
DM		 3842 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3843 _("unsupported reloc %u"),
3844 r_type);
3845 break;
3846
3847 // These relocs can appear in debugging sections, in which case
3848 // we won't see the TLS_LDM relocs. The local_dynamic_type
3849 // field tells us this.
3850 case elfcpp::R_SPARC_TLS_LDO_HIX22:
3851 if (optimized_type == tls::TLSOPT_TO_LE)
3852 {
2ea97941
ILT		 3853 value -= tls_segment->memsz();
3854 Reloc::hix22(view, value, addend);
f5314dd5
DM		 3855 }
3856 else
2ea97941 3857 Reloc::ldo_hix22(view, value, addend);
f5314dd5
DM		 3858 break;
3859 case elfcpp::R_SPARC_TLS_LDO_LOX10:
3860 if (optimized_type == tls::TLSOPT_TO_LE)
3861 {
2ea97941
ILT		 3862 value -= tls_segment->memsz();
3863 Reloc::lox10(view, value, addend);
f5314dd5
DM		 3864 }
3865 else
2ea97941 3866 Reloc::ldo_lox10(view, value, addend);
f5314dd5
DM		 3867 break;
3868 case elfcpp::R_SPARC_TLS_LDO_ADD:
3869 if (optimized_type == tls::TLSOPT_TO_LE)
3870 {
3871 Insntype* wv = reinterpret_cast<Insntype*>(view);
3872 Insntype val;
3873
3874 // add %reg1, %reg2, %reg3 --> add %g7, %reg2, %reg3
3875 val = elfcpp::Swap<32, true>::readval(wv);
3876 val = (val & ~0x7c000) | 0x1c000;
3877 elfcpp::Swap<32, true>::writeval(wv, val);
3878 }
3879 break;
3880
3881 // When optimizing IE --> LE, the only relocation that is handled
3882 // differently is R_SPARC_TLS_IE_LD, it is rewritten from
3883 // 'ld{,x} [rs1 + rs2], rd' into 'mov rs2, rd' or simply a NOP is
3884 // rs2 and rd are the same.
3885 case elfcpp::R_SPARC_TLS_IE_LD:
3886 case elfcpp::R_SPARC_TLS_IE_LDX:
3887 if (optimized_type == tls::TLSOPT_TO_LE)
3888 {
3889 Insntype* wv = reinterpret_cast<Insntype*>(view);
3890 Insntype val = elfcpp::Swap<32, true>::readval(wv);
3891 Insntype rs2 = val & 0x1f;
3892 Insntype rd = (val >> 25) & 0x1f;
3893
3894 if (rs2 == rd)
3895 val = sparc_nop;
3896 else
3897 val = sparc_mov | (val & 0x3e00001f);
3898
3899 elfcpp::Swap<32, true>::writeval(wv, val);
3900 }
3901 break;
3902
3903 case elfcpp::R_SPARC_TLS_IE_HI22:
3904 case elfcpp::R_SPARC_TLS_IE_LO10:
3905 if (optimized_type == tls::TLSOPT_TO_LE)
3906 {
2ea97941 3907 value -= tls_segment->memsz();
f5314dd5
DM		 3908 switch (r_type)
3909 {
3910 case elfcpp::R_SPARC_TLS_IE_HI22:
3911 // IE_HI22 --> LE_HIX22
2ea97941 3912 Reloc::hix22(view, value, addend);
f5314dd5
DM		 3913 break;
3914 case elfcpp::R_SPARC_TLS_IE_LO10:
3915 // IE_LO10 --> LE_LOX10
2ea97941 3916 Reloc::lox10(view, value, addend);
f5314dd5
DM		 3917 break;
3918 }
3919 break;
3920 }
3921 else if (optimized_type == tls::TLSOPT_NONE)
3922 {
3923 // Relocate the field with the offset of the GOT entry for
3924 // the tp-relative offset of the symbol.
3925 if (gsym != NULL)
3926 {
3927 gold_assert(gsym->has_got_offset(GOT_TYPE_TLS_OFFSET));
2ea97941 3928 value = gsym->got_offset(GOT_TYPE_TLS_OFFSET);
f5314dd5
DM		 3929 }
3930 else
3931 {
3932 unsigned int r_sym = elfcpp::elf_r_sym<size>(rela.get_r_info());
3933 gold_assert(object->local_has_got_offset(r_sym,
3934 GOT_TYPE_TLS_OFFSET));
2ea97941
ILT		 3935 value = object->local_got_offset(r_sym,
3936 GOT_TYPE_TLS_OFFSET);
f5314dd5
DM		 3937 }
3938 switch (r_type)
3939 {
3940 case elfcpp::R_SPARC_TLS_IE_HI22:
2ea97941 3941 Reloc::hi22(view, value, addend);
f5314dd5
DM		 3942 break;
3943 case elfcpp::R_SPARC_TLS_IE_LO10:
2ea97941 3944 Reloc::lo10(view, value, addend);
f5314dd5
DM		 3945 break;
3946 }
3947 break;
3948 }
3949 gold_error_at_location(relinfo, relnum, rela.get_r_offset(),
3950 _("unsupported reloc %u"),
3951 r_type);
3952 break;
3953
9efe6174
ILT		 3954 case elfcpp::R_SPARC_TLS_IE_ADD:
3955 // This seems to be mainly so that we can find the addition
3956 // instruction if there is one. There doesn't seem to be any
3957 // actual relocation to apply.
3958 break;
3959
f5314dd5
DM		 3960 case elfcpp::R_SPARC_TLS_LE_HIX22:
3961 // If we're creating a shared library, a dynamic relocation will
3962 // have been created for this location, so do not apply it now.
3963 if (!parameters->options().shared())
3964 {
2ea97941
ILT		 3965 value -= tls_segment->memsz();
3966 Reloc::hix22(view, value, addend);
f5314dd5
DM		 3967 }
3968 break;
3969
3970 case elfcpp::R_SPARC_TLS_LE_LOX10:
3971 // If we're creating a shared library, a dynamic relocation will
3972 // have been created for this location, so do not apply it now.
3973 if (!parameters->options().shared())
3974 {
2ea97941
ILT		 3975 value -= tls_segment->memsz();
3976 Reloc::lox10(view, value, addend);
f5314dd5
DM		 3977 }
3978 break;
3979 }
3980}
3981
a5a5f7a3
DM		 3982// Relax a call instruction.
3983
3984template<int size, bool big_endian>
3985inline void
3986Target_sparc<size, big_endian>::Relocate::relax_call(
3987 Target_sparc<size, big_endian>* target,
3988 unsigned char* view,
3989 const elfcpp::Rela<size, big_endian>& rela,
3990 section_size_type view_size)
3991{
3992 typedef typename elfcpp::Swap<32, true>::Valtype Insntype;
3993 Insntype *wv = reinterpret_cast<Insntype*>(view);
3994 Insntype call_insn, delay_insn, set_insn;
3995 uint32_t op3, reg, off;
3996
3997 // This code tries to relax call instructions that meet
3998 // certain criteria.
3999 //
4000 // The first criteria is that the call must be such that the return
4001 // address which the call writes into %o7 is unused. Two sequences
4002 // meet this criteria, and are used to implement tail calls.
4003 //
4004 // Leaf function tail call:
4005 //
4006 // or %o7, %g0, %ANY_REG
4007 // call FUNC
4008 // or %ANY_REG, %g0, %o7
4009 //
4010 // Non-leaf function tail call:
4011 //
4012 // call FUNC
4013 // restore
4014 //
4015 // The second criteria is that the call destination is close. If
4016 // the displacement can fit in a signed 22-bit immediate field of a
4017 // pre-V9 branch, we can do it. If we are generating a 64-bit
4018 // object or a 32-bit object with ELF machine type EF_SPARC32PLUS,
4019 // and the displacement fits in a signed 19-bit immediate field,
4020 // then we can use a V9 branch.
4021
4022 // Make sure the delay instruction can be safely accessed.
4023 if (rela.get_r_offset() + 8 > view_size)
4024 return;
4025
4026 call_insn = elfcpp::Swap<32, true>::readval(wv);
4027 delay_insn = elfcpp::Swap<32, true>::readval(wv + 1);
4028
4029 // Make sure it is really a call instruction.
4030 if (((call_insn >> 30) & 0x3) != 1)
4031 return;
4032
4033 if (((delay_insn >> 30) & 0x3) != 2)
4034 return;
4035
4036 // Accept only a restore or an integer arithmetic operation whose
4037 // sole side effect is to write the %o7 register (and perhaps set
4038 // the condition codes, which are considered clobbered across
4039 // function calls).
4040 //
4041 // For example, we don't want to match a tagged addition or
4042 // subtraction. We also don't want to match something like a
4043 // divide.
4044 //
4045 // Specifically we accept add{,cc}, and{,cc}, or{,cc},
4046 // xor{,cc}, sub{,cc}, andn{,cc}, orn{,cc}, and xnor{,cc}.
4047
4048 op3 = (delay_insn >> 19) & 0x3f;
4049 reg = (delay_insn >> 25) & 0x1f;
4050 if (op3 != 0x3d
4051 && ((op3 & 0x28) != 0 || reg != 15))
4052 return;
4053
4054 // For non-restore instructions, make sure %o7 isn't
4055 // an input.
4056 if (op3 != 0x3d)
4057 {
4058 // First check RS1
4059 reg = (delay_insn >> 14) & 0x15;
4060 if (reg == 15)
4061 return;
4062
4063 // And if non-immediate, check RS2
4064 if (((delay_insn >> 13) & 1) == 0)
4065 {
4066 reg = (delay_insn & 0x1f);
4067 if (reg == 15)
4068 return;
4069 }
4070 }
4071
4072 // Now check the branch distance. We are called after the
4073 // call has been relocated, so we just have to peek at the
4074 // offset contained in the instruction.
4075 off = call_insn & 0x3fffffff;
4076 if ((off & 0x3fe00000) != 0
4077 && (off & 0x3fe00000) != 0x3fe00000)
4078 return;
4079
4080 if ((size == 64 || target->elf_machine_ == elfcpp::EM_SPARC32PLUS)
4081 && ((off & 0x3c0000) == 0
4082 || (off & 0x3c0000) == 0x3c0000))
4083 {
4084 // ba,pt %xcc, FUNC
4085 call_insn = 0x10680000 | (off & 0x07ffff);
4086 }
4087 else
4088 {
4089 // ba FUNC
4090 call_insn = 0x10800000 | (off & 0x3fffff);
4091 }
4092 elfcpp::Swap<32, true>::writeval(wv, call_insn);
4093
4094 // See if we can NOP out the delay slot instruction. We peek
4095 // at the instruction before the call to make sure we're dealing
4096 // with exactly the:
4097 //
4098 // or %o7, %g0, %ANY_REG
4099 // call
4100 // or %ANY_REG, %g0, %o7
4101 //
4102 // case. Otherwise this might be a tricky piece of hand written
4103 // assembler calculating %o7 in some non-trivial way, and therefore
4104 // we can't be sure that NOP'ing out the delay slot is safe.
4105 if (op3 == 0x02
4106 && rela.get_r_offset() >= 4)
4107 {
4108 if ((delay_insn & ~(0x1f << 14)) != 0x9e100000)
4109 return;
4110
4111 set_insn = elfcpp::Swap<32, true>::readval(wv - 1);
4112 if ((set_insn & ~(0x1f << 25)) != 0x8013c000)
4113 return;
4114
4115 reg = (set_insn >> 25) & 0x1f;
4116 if (reg == 0 || reg == 15)
4117 return;
4118 if (reg != ((delay_insn >> 14) & 0x1f))
4119 return;
4120
4121 // All tests pass, nop it out.
4122 elfcpp::Swap<32, true>::writeval(wv + 1, sparc_nop);
4123 }
4124}
4125
f5314dd5
DM		 4126// Relocate section data.
4127
4128template<int size, bool big_endian>
4129void
4130Target_sparc<size, big_endian>::relocate_section(
4131 const Relocate_info<size, big_endian>* relinfo,
4132 unsigned int sh_type,
4133 const unsigned char* prelocs,
4134 size_t reloc_count,
4135 Output_section* output_section,
4136 bool needs_special_offset_handling,
4137 unsigned char* view,
4138 typename elfcpp::Elf_types<size>::Elf_Addr address,
364c7fa5
ILT		 4139 section_size_type view_size,
4140 const Reloc_symbol_changes* reloc_symbol_changes)
f5314dd5
DM		 4141{
4142 typedef Target_sparc<size, big_endian> Sparc;
4143 typedef typename Target_sparc<size, big_endian>::Relocate Sparc_relocate;
4144
4145 gold_assert(sh_type == elfcpp::SHT_RELA);
4146
4147 gold::relocate_section<size, big_endian, Sparc, elfcpp::SHT_RELA,
168a4726 4148 Sparc_relocate, gold::Default_comdat_behavior>(
f5314dd5
DM		 4149 relinfo,
4150 this,
4151 prelocs,
4152 reloc_count,
4153 output_section,
4154 needs_special_offset_handling,
4155 view,
4156 address,
364c7fa5
ILT		 4157 view_size,
4158 reloc_symbol_changes);
f5314dd5
DM		 4159}
4160
4161// Return the size of a relocation while scanning during a relocatable
4162// link.
4163
4164template<int size, bool big_endian>
4165unsigned int
4166Target_sparc<size, big_endian>::Relocatable_size_for_reloc::get_size_for_reloc(
4167 unsigned int,
4168 Relobj*)
4169{
4170 // We are always SHT_RELA, so we should never get here.
4171 gold_unreachable();
4172 return 0;
4173}
4174
4175// Scan the relocs during a relocatable link.
4176
4177template<int size, bool big_endian>
4178void
4179Target_sparc<size, big_endian>::scan_relocatable_relocs(
f5314dd5
DM		 4180 Symbol_table* symtab,
4181 Layout* layout,
6fa2a40b 4182 Sized_relobj_file<size, big_endian>* object,
f5314dd5
DM		 4183 unsigned int data_shndx,
4184 unsigned int sh_type,
4185 const unsigned char* prelocs,
4186 size_t reloc_count,
4187 Output_section* output_section,
4188 bool needs_special_offset_handling,
4189 size_t local_symbol_count,
4190 const unsigned char* plocal_symbols,
4191 Relocatable_relocs* rr)
4192{
4193 gold_assert(sh_type == elfcpp::SHT_RELA);
4194
4195 typedef gold::Default_scan_relocatable_relocs<elfcpp::SHT_RELA,
4196 Relocatable_size_for_reloc> Scan_relocatable_relocs;
4197
4198 gold::scan_relocatable_relocs<size, big_endian, elfcpp::SHT_RELA,
4199 Scan_relocatable_relocs>(
f5314dd5
DM		 4200 symtab,
4201 layout,
4202 object,
4203 data_shndx,
4204 prelocs,
4205 reloc_count,
4206 output_section,
4207 needs_special_offset_handling,
4208 local_symbol_count,
4209 plocal_symbols,
4210 rr);
4211}
4212
7404fe1b 4213// Emit relocations for a section.
f5314dd5
DM		 4214
4215template<int size, bool big_endian>
4216void
7404fe1b 4217Target_sparc<size, big_endian>::relocate_relocs(
f5314dd5
DM		 4218 const Relocate_info<size, big_endian>* relinfo,
4219 unsigned int sh_type,
4220 const unsigned char* prelocs,
4221 size_t reloc_count,
4222 Output_section* output_section,
62fe925a 4223 typename elfcpp::Elf_types<size>::Elf_Off offset_in_output_section,
f5314dd5
DM		 4224 const Relocatable_relocs* rr,
4225 unsigned char* view,
4226 typename elfcpp::Elf_types<size>::Elf_Addr view_address,
4227 section_size_type view_size,
4228 unsigned char* reloc_view,
4229 section_size_type reloc_view_size)
4230{
4231 gold_assert(sh_type == elfcpp::SHT_RELA);
4232
7404fe1b 4233 gold::relocate_relocs<size, big_endian, elfcpp::SHT_RELA>(
f5314dd5
DM		 4234 relinfo,
4235 prelocs,
4236 reloc_count,
4237 output_section,
4238 offset_in_output_section,
4239 rr,
4240 view,
4241 view_address,
4242 view_size,
4243 reloc_view,
4244 reloc_view_size);
4245}
4246
4247// Return the value to use for a dynamic which requires special
4248// treatment. This is how we support equality comparisons of function
4249// pointers across shared library boundaries, as described in the
4250// processor specific ABI supplement.
4251
4252template<int size, bool big_endian>
4253uint64_t
4254Target_sparc<size, big_endian>::do_dynsym_value(const Symbol* gsym) const
4255{
4256 gold_assert(gsym->is_from_dynobj() && gsym->has_plt_offset());
4257 return this->plt_section()->address() + gsym->plt_offset();
4258}
4259
a4d85145
DM		 4260// do_make_elf_object to override the same function in the base class.
4261// We need to use a target-specific sub-class of
4262// Sized_relobj_file<size, big_endian> to process SPARC specific bits
4263// of the ELF headers. Hence we need to have our own ELF object creation.
4264
4265template<int size, bool big_endian>
4266Object*
4267Target_sparc<size, big_endian>::do_make_elf_object(
4268 const std::string& name,
4269 Input_file* input_file,
4270 off_t offset, const elfcpp::Ehdr<size, big_endian>& ehdr)
4271{
4272 elfcpp::Elf_Half machine = ehdr.get_e_machine();
4273 elfcpp::Elf_Word flags = ehdr.get_e_flags();
4274 elfcpp::Elf_Word omm, mm;
2e702c99 4275
a4d85145
DM		 4276 switch (machine)
4277 {
4278 case elfcpp::EM_SPARC32PLUS:
4279 this->elf_machine_ = elfcpp::EM_SPARC32PLUS;
4280 break;
4281
4282 case elfcpp::EM_SPARC:
4283 case elfcpp::EM_SPARCV9:
4284 break;
4285
4286 default:
4287 break;
4288 }
4289
4290 if (!this->elf_flags_set_)
4291 {
4292 this->elf_flags_ = flags;
4293 this->elf_flags_set_ = true;
4294 }
4295 else
4296 {
4297 // Accumulate cpu feature bits.
4298 this->elf_flags_ |= (flags & (elfcpp::EF_SPARC_32PLUS
4299 | elfcpp::EF_SPARC_SUN_US1
4300 | elfcpp::EF_SPARC_HAL_R1
4301 | elfcpp::EF_SPARC_SUN_US3));
4302
4303 // Bump the memory model setting to the most restrictive
4304 // one we encounter.
4305 omm = (this->elf_flags_ & elfcpp::EF_SPARCV9_MM);
4306 mm = (flags & elfcpp::EF_SPARCV9_MM);
4307 if (omm != mm)
4308 {
4309 if (mm == elfcpp::EF_SPARCV9_TSO)
4310 {
4311 this->elf_flags_ &= ~elfcpp::EF_SPARCV9_MM;
4312 this->elf_flags_ |= elfcpp::EF_SPARCV9_TSO;
4313 }
4314 else if (mm == elfcpp::EF_SPARCV9_PSO
4315 && omm == elfcpp::EF_SPARCV9_RMO)
4316 {
4317 this->elf_flags_ &= ~elfcpp::EF_SPARCV9_MM;
4318 this->elf_flags_ |= elfcpp::EF_SPARCV9_PSO;
4319 }
4320 }
4321 }
4322
4323 // Validate that the little-endian flag matches how we've
4324 // been instantiated.
4325 if (!(flags & elfcpp::EF_SPARC_LEDATA) != big_endian)
4326 {
4327 if (big_endian)
4328 gold_error(_("%s: little endian elf flag set on BE object"),
4329 name.c_str());
4330 else
4331 gold_error(_("%s: little endian elf flag clear on LE object"),
4332 name.c_str());
4333 }
4334
4335 return Target::do_make_elf_object(name, input_file, offset, ehdr);
4336}
4337
4338// Adjust ELF file header.
4339
4340template<int size, bool big_endian>
4341void
4342Target_sparc<size, big_endian>::do_adjust_elf_header(
4343 unsigned char* view,
4344 int len) const
4345{
4346 elfcpp::Ehdr_write<size, big_endian> oehdr(view);
4347
4348 oehdr.put_e_machine(this->elf_machine_);
4349 oehdr.put_e_flags(this->elf_flags_);
4350
4351 Sized_target<size, big_endian>::do_adjust_elf_header(view, len);
4352}
4353
f5314dd5
DM		 4354// The selector for sparc object files.
4355
4356template<int size, bool big_endian>
4357class Target_selector_sparc : public Target_selector
4358{
4359public:
4360 Target_selector_sparc()
4361 : Target_selector(elfcpp::EM_NONE, size, big_endian,
03ef7571
ILT		 4362 (size == 64 ? "elf64-sparc" : "elf32-sparc"),
4363 (size == 64 ? "elf64_sparc" : "elf32_sparc"))
f5314dd5
DM		 4364 { }
4365
2e702c99
RM		 4366 virtual Target*
4367 do_recognize(Input_file*, off_t, int machine, int, int)
f5314dd5
DM		 4368 {
4369 switch (size)
4370 {
4371 case 64:
2ea97941 4372 if (machine != elfcpp::EM_SPARCV9)
f5314dd5
DM		 4373 return NULL;
4374 break;
4375
4376 case 32:
2ea97941
ILT		 4377 if (machine != elfcpp::EM_SPARC
4378 && machine != elfcpp::EM_SPARC32PLUS)
f5314dd5
DM		 4379 return NULL;
4380 break;
4381
4382 default:
4383 return NULL;
4384 }
4385
7f055c20 4386 return this->instantiate_target();
f5314dd5
DM		 4387 }
4388
2e702c99
RM		 4389 virtual Target*
4390 do_instantiate_target()
7f055c20 4391 { return new Target_sparc<size, big_endian>(); }
f5314dd5
DM		 4392};
4393
4394Target_selector_sparc<32, true> target_selector_sparc32;
4395Target_selector_sparc<64, true> target_selector_sparc64;
4396
4397} // End anonymous namespace.
GDB Binutils - Deliverables
This page took 0.619865 seconds and 4 git commands to generate.