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