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