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