Add support for local GOT offsets.
[external/binutils.git] / gold / object.cc
1 // object.cc -- support for an object file for linking in gold
2
3 // Copyright 2006, 2007 Free Software Foundation, Inc.
4 // Written by Ian Lance Taylor <iant@google.com>.
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 <cerrno>
26 #include <cstring>
27 #include <cstdarg>
28
29 #include "target-select.h"
30 #include "layout.h"
31 #include "output.h"
32 #include "symtab.h"
33 #include "object.h"
34 #include "dynobj.h"
35
36 namespace gold
37 {
38
39 // Class Object.
40
41 // Set the target based on fields in the ELF file header.
42
43 void
44 Object::set_target(int machine, int size, bool big_endian, int osabi,
45                    int abiversion)
46 {
47   Target* target = select_target(machine, size, big_endian, osabi, abiversion);
48   if (target == NULL)
49     {
50       fprintf(stderr, _("%s: %s: unsupported ELF machine number %d\n"),
51               program_name, this->name().c_str(), machine);
52       gold_exit(false);
53     }
54   this->target_ = target;
55 }
56
57 // Report an error for the elfcpp::Elf_file interface.
58
59 void
60 Object::error(const char* format, ...)
61 {
62   va_list args;
63
64   fprintf(stderr, "%s: %s: ", program_name, this->name().c_str());
65   va_start(args, format);
66   vfprintf(stderr, format, args);
67   va_end(args);
68   putc('\n', stderr);
69
70   gold_exit(false);
71 }
72
73 // Return a view of the contents of a section.
74
75 const unsigned char*
76 Object::section_contents(unsigned int shndx, off_t* plen, bool cache)
77 {
78   Location loc(this->do_section_contents(shndx));
79   *plen = loc.data_size;
80   return this->get_view(loc.file_offset, loc.data_size, cache);
81 }
82
83 // Read the section data into SD.  This is code common to Sized_relobj
84 // and Sized_dynobj, so we put it into Object.
85
86 template<int size, bool big_endian>
87 void
88 Object::read_section_data(elfcpp::Elf_file<size, big_endian, Object>* elf_file,
89                           Read_symbols_data* sd)
90 {
91   const int shdr_size = elfcpp::Elf_sizes<size>::shdr_size;
92
93   // Read the section headers.
94   const off_t shoff = elf_file->shoff();
95   const unsigned int shnum = this->shnum();
96   sd->section_headers = this->get_lasting_view(shoff, shnum * shdr_size, true);
97
98   // Read the section names.
99   const unsigned char* pshdrs = sd->section_headers->data();
100   const unsigned char* pshdrnames = pshdrs + elf_file->shstrndx() * shdr_size;
101   typename elfcpp::Shdr<size, big_endian> shdrnames(pshdrnames);
102
103   if (shdrnames.get_sh_type() != elfcpp::SHT_STRTAB)
104     {
105       fprintf(stderr,
106               _("%s: %s: section name section has wrong type: %u\n"),
107               program_name, this->name().c_str(),
108               static_cast<unsigned int>(shdrnames.get_sh_type()));
109       gold_exit(false);
110     }
111
112   sd->section_names_size = shdrnames.get_sh_size();
113   sd->section_names = this->get_lasting_view(shdrnames.get_sh_offset(),
114                                              sd->section_names_size, false);
115 }
116
117 // If NAME is the name of a special .gnu.warning section, arrange for
118 // the warning to be issued.  SHNDX is the section index.  Return
119 // whether it is a warning section.
120
121 bool
122 Object::handle_gnu_warning_section(const char* name, unsigned int shndx,
123                                    Symbol_table* symtab)
124 {
125   const char warn_prefix[] = ".gnu.warning.";
126   const int warn_prefix_len = sizeof warn_prefix - 1;
127   if (strncmp(name, warn_prefix, warn_prefix_len) == 0)
128     {
129       symtab->add_warning(name + warn_prefix_len, this, shndx);
130       return true;
131     }
132   return false;
133 }
134
135 // Class Sized_relobj.
136
137 template<int size, bool big_endian>
138 Sized_relobj<size, big_endian>::Sized_relobj(
139     const std::string& name,
140     Input_file* input_file,
141     off_t offset,
142     const elfcpp::Ehdr<size, big_endian>& ehdr)
143   : Relobj(name, input_file, offset),
144     elf_file_(this, ehdr),
145     symtab_shndx_(-1U),
146     local_symbol_count_(0),
147     output_local_symbol_count_(0),
148     symbols_(NULL),
149     local_symbol_offset_(0),
150     local_values_(),
151     local_got_offsets_()
152 {
153 }
154
155 template<int size, bool big_endian>
156 Sized_relobj<size, big_endian>::~Sized_relobj()
157 {
158 }
159
160 // Set up an object file based on the file header.  This sets up the
161 // target and reads the section information.
162
163 template<int size, bool big_endian>
164 void
165 Sized_relobj<size, big_endian>::setup(
166     const elfcpp::Ehdr<size, big_endian>& ehdr)
167 {
168   this->set_target(ehdr.get_e_machine(), size, big_endian,
169                    ehdr.get_e_ident()[elfcpp::EI_OSABI],
170                    ehdr.get_e_ident()[elfcpp::EI_ABIVERSION]);
171
172   const unsigned int shnum = this->elf_file_.shnum();
173   this->set_shnum(shnum);
174 }
175
176 // Find the SHT_SYMTAB section, given the section headers.  The ELF
177 // standard says that maybe in the future there can be more than one
178 // SHT_SYMTAB section.  Until somebody figures out how that could
179 // work, we assume there is only one.
180
181 template<int size, bool big_endian>
182 void
183 Sized_relobj<size, big_endian>::find_symtab(const unsigned char* pshdrs)
184 {
185   const unsigned int shnum = this->shnum();
186   this->symtab_shndx_ = 0;
187   if (shnum > 0)
188     {
189       // Look through the sections in reverse order, since gas tends
190       // to put the symbol table at the end.
191       const unsigned char* p = pshdrs + shnum * This::shdr_size;
192       unsigned int i = shnum;
193       while (i > 0)
194         {
195           --i;
196           p -= This::shdr_size;
197           typename This::Shdr shdr(p);
198           if (shdr.get_sh_type() == elfcpp::SHT_SYMTAB)
199             {
200               this->symtab_shndx_ = i;
201               break;
202             }
203         }
204     }
205 }
206
207 // Read the sections and symbols from an object file.
208
209 template<int size, bool big_endian>
210 void
211 Sized_relobj<size, big_endian>::do_read_symbols(Read_symbols_data* sd)
212 {
213   this->read_section_data(&this->elf_file_, sd);
214
215   const unsigned char* const pshdrs = sd->section_headers->data();
216
217   this->find_symtab(pshdrs);
218
219   if (this->symtab_shndx_ == 0)
220     {
221       // No symbol table.  Weird but legal.
222       sd->symbols = NULL;
223       sd->symbols_size = 0;
224       sd->symbol_names = NULL;
225       sd->symbol_names_size = 0;
226       return;
227     }
228
229   // Get the symbol table section header.
230   typename This::Shdr symtabshdr(pshdrs
231                                  + this->symtab_shndx_ * This::shdr_size);
232   gold_assert(symtabshdr.get_sh_type() == elfcpp::SHT_SYMTAB);
233
234   // We only need the external symbols.
235   const int sym_size = This::sym_size;
236   const unsigned int loccount = symtabshdr.get_sh_info();
237   this->local_symbol_count_ = loccount;
238   off_t locsize = loccount * sym_size;
239   off_t extoff = symtabshdr.get_sh_offset() + locsize;
240   off_t extsize = symtabshdr.get_sh_size() - locsize;
241
242   // Read the symbol table.
243   File_view* fvsymtab = this->get_lasting_view(extoff, extsize, false);
244
245   // Read the section header for the symbol names.
246   unsigned int strtab_shndx = symtabshdr.get_sh_link();
247   if (strtab_shndx >= this->shnum())
248     {
249       fprintf(stderr, _("%s: %s: invalid symbol table name index: %u\n"),
250               program_name, this->name().c_str(), strtab_shndx);
251       gold_exit(false);
252     }
253   typename This::Shdr strtabshdr(pshdrs + strtab_shndx * This::shdr_size);
254   if (strtabshdr.get_sh_type() != elfcpp::SHT_STRTAB)
255     {
256       fprintf(stderr,
257               _("%s: %s: symbol table name section has wrong type: %u\n"),
258               program_name, this->name().c_str(),
259               static_cast<unsigned int>(strtabshdr.get_sh_type()));
260       gold_exit(false);
261     }
262
263   // Read the symbol names.
264   File_view* fvstrtab = this->get_lasting_view(strtabshdr.get_sh_offset(),
265                                                strtabshdr.get_sh_size(), true);
266
267   sd->symbols = fvsymtab;
268   sd->symbols_size = extsize;
269   sd->symbol_names = fvstrtab;
270   sd->symbol_names_size = strtabshdr.get_sh_size();
271 }
272
273 // Return whether to include a section group in the link.  LAYOUT is
274 // used to keep track of which section groups we have already seen.
275 // INDEX is the index of the section group and SHDR is the section
276 // header.  If we do not want to include this group, we set bits in
277 // OMIT for each section which should be discarded.
278
279 template<int size, bool big_endian>
280 bool
281 Sized_relobj<size, big_endian>::include_section_group(
282     Layout* layout,
283     unsigned int index,
284     const elfcpp::Shdr<size, big_endian>& shdr,
285     std::vector<bool>* omit)
286 {
287   // Read the section contents.
288   const unsigned char* pcon = this->get_view(shdr.get_sh_offset(),
289                                              shdr.get_sh_size(), false);
290   const elfcpp::Elf_Word* pword =
291     reinterpret_cast<const elfcpp::Elf_Word*>(pcon);
292
293   // The first word contains flags.  We only care about COMDAT section
294   // groups.  Other section groups are always included in the link
295   // just like ordinary sections.
296   elfcpp::Elf_Word flags = elfcpp::Swap<32, big_endian>::readval(pword);
297   if ((flags & elfcpp::GRP_COMDAT) == 0)
298     return true;
299
300   // Look up the group signature, which is the name of a symbol.  This
301   // is a lot of effort to go to to read a string.  Why didn't they
302   // just use the name of the SHT_GROUP section as the group
303   // signature?
304
305   // Get the appropriate symbol table header (this will normally be
306   // the single SHT_SYMTAB section, but in principle it need not be).
307   const unsigned int link = shdr.get_sh_link();
308   typename This::Shdr symshdr(this, this->elf_file_.section_header(link));
309
310   // Read the symbol table entry.
311   if (shdr.get_sh_info() >= symshdr.get_sh_size() / This::sym_size)
312     {
313       fprintf(stderr, _("%s: %s: section group %u info %u out of range\n"),
314               program_name, this->name().c_str(), index, shdr.get_sh_info());
315       gold_exit(false);
316     }
317   off_t symoff = symshdr.get_sh_offset() + shdr.get_sh_info() * This::sym_size;
318   const unsigned char* psym = this->get_view(symoff, This::sym_size, true);
319   elfcpp::Sym<size, big_endian> sym(psym);
320
321   // Read the symbol table names.
322   off_t symnamelen;
323   const unsigned char* psymnamesu;
324   psymnamesu = this->section_contents(symshdr.get_sh_link(), &symnamelen,
325                                       true);
326   const char* psymnames = reinterpret_cast<const char*>(psymnamesu);
327
328   // Get the section group signature.
329   if (sym.get_st_name() >= symnamelen)
330     {
331       fprintf(stderr, _("%s: %s: symbol %u name offset %u out of range\n"),
332               program_name, this->name().c_str(), shdr.get_sh_info(),
333               sym.get_st_name());
334       gold_exit(false);
335     }
336
337   const char* signature = psymnames + sym.get_st_name();
338
339   // It seems that some versions of gas will create a section group
340   // associated with a section symbol, and then fail to give a name to
341   // the section symbol.  In such a case, use the name of the section.
342   // FIXME.
343   std::string secname;
344   if (signature[0] == '\0' && sym.get_st_type() == elfcpp::STT_SECTION)
345     {
346       secname = this->section_name(sym.get_st_shndx());
347       signature = secname.c_str();
348     }
349
350   // Record this section group, and see whether we've already seen one
351   // with the same signature.
352   if (layout->add_comdat(signature, true))
353     return true;
354
355   // This is a duplicate.  We want to discard the sections in this
356   // group.
357   size_t count = shdr.get_sh_size() / sizeof(elfcpp::Elf_Word);
358   for (size_t i = 1; i < count; ++i)
359     {
360       elfcpp::Elf_Word secnum =
361         elfcpp::Swap<32, big_endian>::readval(pword + i);
362       if (secnum >= this->shnum())
363         {
364           fprintf(stderr,
365                   _("%s: %s: section %u in section group %u out of range"),
366                   program_name, this->name().c_str(), secnum,
367                   index);
368           gold_exit(false);
369         }
370       (*omit)[secnum] = true;
371     }
372
373   return false;
374 }
375
376 // Whether to include a linkonce section in the link.  NAME is the
377 // name of the section and SHDR is the section header.
378
379 // Linkonce sections are a GNU extension implemented in the original
380 // GNU linker before section groups were defined.  The semantics are
381 // that we only include one linkonce section with a given name.  The
382 // name of a linkonce section is normally .gnu.linkonce.T.SYMNAME,
383 // where T is the type of section and SYMNAME is the name of a symbol.
384 // In an attempt to make linkonce sections interact well with section
385 // groups, we try to identify SYMNAME and use it like a section group
386 // signature.  We want to block section groups with that signature,
387 // but not other linkonce sections with that signature.  We also use
388 // the full name of the linkonce section as a normal section group
389 // signature.
390
391 template<int size, bool big_endian>
392 bool
393 Sized_relobj<size, big_endian>::include_linkonce_section(
394     Layout* layout,
395     const char* name,
396     const elfcpp::Shdr<size, big_endian>&)
397 {
398   const char* symname = strrchr(name, '.') + 1;
399   bool include1 = layout->add_comdat(symname, false);
400   bool include2 = layout->add_comdat(name, true);
401   return include1 && include2;
402 }
403
404 // Lay out the input sections.  We walk through the sections and check
405 // whether they should be included in the link.  If they should, we
406 // pass them to the Layout object, which will return an output section
407 // and an offset.
408
409 template<int size, bool big_endian>
410 void
411 Sized_relobj<size, big_endian>::do_layout(Symbol_table* symtab,
412                                           Layout* layout,
413                                           Read_symbols_data* sd)
414 {
415   const unsigned int shnum = this->shnum();
416   if (shnum == 0)
417     return;
418
419   // Get the section headers.
420   const unsigned char* pshdrs = sd->section_headers->data();
421
422   // Get the section names.
423   const unsigned char* pnamesu = sd->section_names->data();
424   const char* pnames = reinterpret_cast<const char*>(pnamesu);
425
426   std::vector<Map_to_output>& map_sections(this->map_to_output());
427   map_sections.resize(shnum);
428
429   // Keep track of which sections to omit.
430   std::vector<bool> omit(shnum, false);
431
432   // Skip the first, dummy, section.
433   pshdrs += This::shdr_size;
434   for (unsigned int i = 1; i < shnum; ++i, pshdrs += This::shdr_size)
435     {
436       typename This::Shdr shdr(pshdrs);
437
438       if (shdr.get_sh_name() >= sd->section_names_size)
439         {
440           fprintf(stderr,
441                   _("%s: %s: bad section name offset for section %u: %lu\n"),
442                   program_name, this->name().c_str(), i,
443                   static_cast<unsigned long>(shdr.get_sh_name()));
444           gold_exit(false);
445         }
446
447       const char* name = pnames + shdr.get_sh_name();
448
449       if (this->handle_gnu_warning_section(name, i, symtab))
450         {
451           if (!parameters->output_is_object())
452             omit[i] = true;
453         }
454
455       bool discard = omit[i];
456       if (!discard)
457         {
458           if (shdr.get_sh_type() == elfcpp::SHT_GROUP)
459             {
460               if (!this->include_section_group(layout, i, shdr, &omit))
461                 discard = true;
462             }
463           else if ((shdr.get_sh_flags() & elfcpp::SHF_GROUP) == 0
464                    && Layout::is_linkonce(name))
465             {
466               if (!this->include_linkonce_section(layout, name, shdr))
467                 discard = true;
468             }
469         }
470
471       if (discard)
472         {
473           // Do not include this section in the link.
474           map_sections[i].output_section = NULL;
475           continue;
476         }
477
478       off_t offset;
479       Output_section* os = layout->layout(this, i, name, shdr, &offset);
480
481       map_sections[i].output_section = os;
482       map_sections[i].offset = offset;
483     }
484
485   delete sd->section_headers;
486   sd->section_headers = NULL;
487   delete sd->section_names;
488   sd->section_names = NULL;
489 }
490
491 // Add the symbols to the symbol table.
492
493 template<int size, bool big_endian>
494 void
495 Sized_relobj<size, big_endian>::do_add_symbols(Symbol_table* symtab,
496                                                Read_symbols_data* sd)
497 {
498   if (sd->symbols == NULL)
499     {
500       gold_assert(sd->symbol_names == NULL);
501       return;
502     }
503
504   const int sym_size = This::sym_size;
505   size_t symcount = sd->symbols_size / sym_size;
506   if (static_cast<off_t>(symcount * sym_size) != sd->symbols_size)
507     {
508       fprintf(stderr,
509               _("%s: %s: size of symbols is not multiple of symbol size\n"),
510               program_name, this->name().c_str());
511       gold_exit(false);
512     }
513
514   this->symbols_ = new Symbol*[symcount];
515
516   const char* sym_names =
517     reinterpret_cast<const char*>(sd->symbol_names->data());
518   symtab->add_from_relobj(this, sd->symbols->data(), symcount, sym_names,
519                           sd->symbol_names_size, this->symbols_);
520
521   delete sd->symbols;
522   sd->symbols = NULL;
523   delete sd->symbol_names;
524   sd->symbol_names = NULL;
525 }
526
527 // Finalize the local symbols.  Here we record the file offset at
528 // which they should be output, we add their names to *POOL, and we
529 // add their values to THIS->LOCAL_VALUES_.  Return the symbol index.
530 // This function is always called from the main thread.  The actual
531 // output of the local symbols will occur in a separate task.
532
533 template<int size, bool big_endian>
534 unsigned int
535 Sized_relobj<size, big_endian>::do_finalize_local_symbols(unsigned int index,
536                                                           off_t off,
537                                                           Stringpool* pool)
538 {
539   gold_assert(this->symtab_shndx_ != -1U);
540   if (this->symtab_shndx_ == 0)
541     {
542       // This object has no symbols.  Weird but legal.
543       return index;
544     }
545
546   gold_assert(off == static_cast<off_t>(align_address(off, size >> 3)));
547
548   this->local_symbol_offset_ = off;
549
550   // Read the symbol table section header.
551   const unsigned int symtab_shndx = this->symtab_shndx_;
552   typename This::Shdr symtabshdr(this,
553                                  this->elf_file_.section_header(symtab_shndx));
554   gold_assert(symtabshdr.get_sh_type() == elfcpp::SHT_SYMTAB);
555
556   // Read the local symbols.
557   const int sym_size = This::sym_size;
558   const unsigned int loccount = this->local_symbol_count_;
559   gold_assert(loccount == symtabshdr.get_sh_info());
560   off_t locsize = loccount * sym_size;
561   const unsigned char* psyms = this->get_view(symtabshdr.get_sh_offset(),
562                                               locsize, true);
563
564   this->local_values_.resize(loccount);
565
566   // Read the symbol names.
567   const unsigned int strtab_shndx = symtabshdr.get_sh_link();
568   off_t strtab_size;
569   const unsigned char* pnamesu = this->section_contents(strtab_shndx,
570                                                         &strtab_size,
571                                                         true);
572   const char* pnames = reinterpret_cast<const char*>(pnamesu);
573
574   // Loop over the local symbols.
575
576   const std::vector<Map_to_output>& mo(this->map_to_output());
577   unsigned int shnum = this->shnum();
578   unsigned int count = 0;
579   // Skip the first, dummy, symbol.
580   psyms += sym_size;
581   for (unsigned int i = 1; i < loccount; ++i, psyms += sym_size)
582     {
583       elfcpp::Sym<size, big_endian> sym(psyms);
584
585       Symbol_value<size>& lv(this->local_values_[i]);
586
587       unsigned int shndx = sym.get_st_shndx();
588       lv.set_input_shndx(shndx);
589
590       if (sym.get_st_type() == elfcpp::STT_SECTION)
591         lv.set_is_section_symbol();
592
593       if (shndx >= elfcpp::SHN_LORESERVE)
594         {
595           if (shndx == elfcpp::SHN_ABS)
596             lv.set_output_value(sym.get_st_value());
597           else
598             {
599               // FIXME: Handle SHN_XINDEX.
600               fprintf(stderr,
601                       _("%s: %s: unknown section index %u "
602                         "for local symbol %u\n"),
603                       program_name, this->name().c_str(), shndx, i);
604               gold_exit(false);
605             }
606         }
607       else
608         {
609           if (shndx >= shnum)
610             {
611               fprintf(stderr,
612                       _("%s: %s: local symbol %u section index %u "
613                         "out of range\n"),
614                       program_name, this->name().c_str(), i, shndx);
615               gold_exit(false);
616             }
617
618           Output_section* os = mo[shndx].output_section;
619
620           if (os == NULL)
621             {
622               lv.set_output_value(0);
623               lv.set_no_output_symtab_entry();
624               continue;
625             }
626
627           if (mo[shndx].offset == -1)
628             lv.set_input_value(sym.get_st_value());
629           else
630             lv.set_output_value(mo[shndx].output_section->address()
631                                 + mo[shndx].offset
632                                 + sym.get_st_value());
633         }
634
635       // Decide whether this symbol should go into the output file.
636
637       if (sym.get_st_type() == elfcpp::STT_SECTION)
638         {
639           lv.set_no_output_symtab_entry();
640           continue;
641         }
642
643       if (sym.get_st_name() >= strtab_size)
644         {
645           fprintf(stderr,
646                   _("%s: %s: local symbol %u section name "
647                     "out of range: %u >= %u\n"),
648                   program_name, this->name().c_str(),
649                   i, sym.get_st_name(),
650                   static_cast<unsigned int>(strtab_size));
651           gold_exit(false);
652         }
653
654       const char* name = pnames + sym.get_st_name();
655       pool->add(name, NULL);
656       lv.set_output_symtab_index(index);
657       ++index;
658       ++count;
659     }
660
661   this->output_local_symbol_count_ = count;
662
663   return index;
664 }
665
666 // Return the value of the local symbol symndx.
667 template<int size, bool big_endian>
668 typename elfcpp::Elf_types<size>::Elf_Addr
669 Sized_relobj<size, big_endian>::local_symbol_value(unsigned int symndx) const
670 {
671   gold_assert(symndx < this->local_symbol_count_);
672   gold_assert(symndx < this->local_values_.size());
673   const Symbol_value<size>& lv(this->local_values_[symndx]);
674   return lv.value(this, 0);
675 }
676
677 // Return the value of a local symbol defined in input section SHNDX,
678 // with value VALUE, adding addend ADDEND.  IS_SECTION_SYMBOL
679 // indicates whether the symbol is a section symbol.  This handles
680 // SHF_MERGE sections.
681 template<int size, bool big_endian>
682 typename elfcpp::Elf_types<size>::Elf_Addr
683 Sized_relobj<size, big_endian>::local_value(unsigned int shndx,
684                                             Address value,
685                                             bool is_section_symbol,
686                                             Address addend) const
687 {
688   const std::vector<Map_to_output>& mo(this->map_to_output());
689   Output_section* os = mo[shndx].output_section;
690   if (os == NULL)
691     return addend;
692   gold_assert(mo[shndx].offset == -1);
693
694   // Do the mapping required by the output section.  If this is not a
695   // section symbol, then we want to map the symbol value, and then
696   // include the addend.  If this is a section symbol, then we need to
697   // include the addend to figure out where in the section we are,
698   // before we do the mapping.  This will do the right thing provided
699   // the assembler is careful to only convert a relocation in a merged
700   // section to a section symbol if there is a zero addend.  If the
701   // assembler does not do this, then in general we can't know what to
702   // do, because we can't distinguish the addend for the instruction
703   // format from the addend for the section offset.
704
705   if (is_section_symbol)
706     return os->output_address(this, shndx, value + addend);
707   else
708     return addend + os->output_address(this, shndx, value);
709 }
710
711 // Write out the local symbols.
712
713 template<int size, bool big_endian>
714 void
715 Sized_relobj<size, big_endian>::write_local_symbols(Output_file* of,
716                                                     const Stringpool* sympool)
717 {
718   gold_assert(this->symtab_shndx_ != -1U);
719   if (this->symtab_shndx_ == 0)
720     {
721       // This object has no symbols.  Weird but legal.
722       return;
723     }
724
725   // Read the symbol table section header.
726   const unsigned int symtab_shndx = this->symtab_shndx_;
727   typename This::Shdr symtabshdr(this,
728                                  this->elf_file_.section_header(symtab_shndx));
729   gold_assert(symtabshdr.get_sh_type() == elfcpp::SHT_SYMTAB);
730   const unsigned int loccount = this->local_symbol_count_;
731   gold_assert(loccount == symtabshdr.get_sh_info());
732
733   // Read the local symbols.
734   const int sym_size = This::sym_size;
735   off_t locsize = loccount * sym_size;
736   const unsigned char* psyms = this->get_view(symtabshdr.get_sh_offset(),
737                                               locsize, false);
738
739   // Read the symbol names.
740   const unsigned int strtab_shndx = symtabshdr.get_sh_link();
741   off_t strtab_size;
742   const unsigned char* pnamesu = this->section_contents(strtab_shndx,
743                                                         &strtab_size,
744                                                         true);
745   const char* pnames = reinterpret_cast<const char*>(pnamesu);
746
747   // Get a view into the output file.
748   off_t output_size = this->output_local_symbol_count_ * sym_size;
749   unsigned char* oview = of->get_output_view(this->local_symbol_offset_,
750                                              output_size);
751
752   const std::vector<Map_to_output>& mo(this->map_to_output());
753
754   gold_assert(this->local_values_.size() == loccount);
755
756   unsigned char* ov = oview;
757   psyms += sym_size;
758   for (unsigned int i = 1; i < loccount; ++i, psyms += sym_size)
759     {
760       elfcpp::Sym<size, big_endian> isym(psyms);
761
762       if (!this->local_values_[i].needs_output_symtab_entry())
763         continue;
764
765       unsigned int st_shndx = isym.get_st_shndx();
766       if (st_shndx < elfcpp::SHN_LORESERVE)
767         {
768           gold_assert(st_shndx < mo.size());
769           if (mo[st_shndx].output_section == NULL)
770             continue;
771           st_shndx = mo[st_shndx].output_section->out_shndx();
772         }
773
774       elfcpp::Sym_write<size, big_endian> osym(ov);
775
776       gold_assert(isym.get_st_name() < strtab_size);
777       const char* name = pnames + isym.get_st_name();
778       osym.put_st_name(sympool->get_offset(name));
779       osym.put_st_value(this->local_values_[i].value(this, 0));
780       osym.put_st_size(isym.get_st_size());
781       osym.put_st_info(isym.get_st_info());
782       osym.put_st_other(isym.get_st_other());
783       osym.put_st_shndx(st_shndx);
784
785       ov += sym_size;
786     }
787
788   gold_assert(ov - oview == output_size);
789
790   of->write_output_view(this->local_symbol_offset_, output_size, oview);
791 }
792
793 // Input_objects methods.
794
795 // Add a regular relocatable object to the list.  Return false if this
796 // object should be ignored.
797
798 bool
799 Input_objects::add_object(Object* obj)
800 {
801   if (!obj->is_dynamic())
802     this->relobj_list_.push_back(static_cast<Relobj*>(obj));
803   else
804     {
805       // See if this is a duplicate SONAME.
806       Dynobj* dynobj = static_cast<Dynobj*>(obj);
807
808       std::pair<Unordered_set<std::string>::iterator, bool> ins =
809         this->sonames_.insert(dynobj->soname());
810       if (!ins.second)
811         {
812           // We have already seen a dynamic object with this soname.
813           return false;
814         }
815
816       this->dynobj_list_.push_back(dynobj);
817     }
818
819   Target* target = obj->target();
820   if (this->target_ == NULL)
821     this->target_ = target;
822   else if (this->target_ != target)
823     {
824       fprintf(stderr, "%s: %s: incompatible target\n",
825               program_name, obj->name().c_str());
826       gold_exit(false);
827     }
828
829   set_parameters_size_and_endianness(target->get_size(),
830                                      target->is_big_endian());
831
832   return true;
833 }
834
835 // Relocate_info methods.
836
837 // Return a string describing the location of a relocation.  This is
838 // only used in error messages.
839
840 template<int size, bool big_endian>
841 std::string
842 Relocate_info<size, big_endian>::location(size_t relnum, off_t) const
843 {
844   std::string ret(this->object->name());
845   ret += ": reloc ";
846   char buf[100];
847   snprintf(buf, sizeof buf, "%zu", relnum);
848   ret += buf;
849   ret += " in reloc section ";
850   snprintf(buf, sizeof buf, "%u", this->reloc_shndx);
851   ret += buf;
852   ret += " (" + this->object->section_name(this->reloc_shndx);
853   ret += ") for section ";
854   snprintf(buf, sizeof buf, "%u", this->data_shndx);
855   ret += buf;
856   ret += " (" + this->object->section_name(this->data_shndx) + ")";
857   return ret;
858 }
859
860 } // End namespace gold.
861
862 namespace
863 {
864
865 using namespace gold;
866
867 // Read an ELF file with the header and return the appropriate
868 // instance of Object.
869
870 template<int size, bool big_endian>
871 Object*
872 make_elf_sized_object(const std::string& name, Input_file* input_file,
873                       off_t offset, const elfcpp::Ehdr<size, big_endian>& ehdr)
874 {
875   int et = ehdr.get_e_type();
876   if (et == elfcpp::ET_REL)
877     {
878       Sized_relobj<size, big_endian>* obj =
879         new Sized_relobj<size, big_endian>(name, input_file, offset, ehdr);
880       obj->setup(ehdr);
881       return obj;
882     }
883   else if (et == elfcpp::ET_DYN)
884     {
885       Sized_dynobj<size, big_endian>* obj =
886         new Sized_dynobj<size, big_endian>(name, input_file, offset, ehdr);
887       obj->setup(ehdr);
888       return obj;
889     }
890   else
891     {
892       fprintf(stderr, _("%s: %s: unsupported ELF file type %d\n"),
893               program_name, name.c_str(), et);
894       gold_exit(false);
895     }
896 }
897
898 } // End anonymous namespace.
899
900 namespace gold
901 {
902
903 // Read an ELF file and return the appropriate instance of Object.
904
905 Object*
906 make_elf_object(const std::string& name, Input_file* input_file, off_t offset,
907                 const unsigned char* p, off_t bytes)
908 {
909   if (bytes < elfcpp::EI_NIDENT)
910     {
911       fprintf(stderr, _("%s: %s: ELF file too short\n"),
912               program_name, name.c_str());
913       gold_exit(false);
914     }
915
916   int v = p[elfcpp::EI_VERSION];
917   if (v != elfcpp::EV_CURRENT)
918     {
919       if (v == elfcpp::EV_NONE)
920         fprintf(stderr, _("%s: %s: invalid ELF version 0\n"),
921                 program_name, name.c_str());
922       else
923         fprintf(stderr, _("%s: %s: unsupported ELF version %d\n"),
924                 program_name, name.c_str(), v);
925       gold_exit(false);
926     }
927
928   int c = p[elfcpp::EI_CLASS];
929   if (c == elfcpp::ELFCLASSNONE)
930     {
931       fprintf(stderr, _("%s: %s: invalid ELF class 0\n"),
932               program_name, name.c_str());
933       gold_exit(false);
934     }
935   else if (c != elfcpp::ELFCLASS32
936            && c != elfcpp::ELFCLASS64)
937     {
938       fprintf(stderr, _("%s: %s: unsupported ELF class %d\n"),
939               program_name, name.c_str(), c);
940       gold_exit(false);
941     }
942
943   int d = p[elfcpp::EI_DATA];
944   if (d == elfcpp::ELFDATANONE)
945     {
946       fprintf(stderr, _("%s: %s: invalid ELF data encoding\n"),
947               program_name, name.c_str());
948       gold_exit(false);
949     }
950   else if (d != elfcpp::ELFDATA2LSB
951            && d != elfcpp::ELFDATA2MSB)
952     {
953       fprintf(stderr, _("%s: %s: unsupported ELF data encoding %d\n"),
954               program_name, name.c_str(), d);
955       gold_exit(false);
956     }
957
958   bool big_endian = d == elfcpp::ELFDATA2MSB;
959
960   if (c == elfcpp::ELFCLASS32)
961     {
962       if (bytes < elfcpp::Elf_sizes<32>::ehdr_size)
963         {
964           fprintf(stderr, _("%s: %s: ELF file too short\n"),
965                   program_name, name.c_str());
966           gold_exit(false);
967         }
968       if (big_endian)
969         {
970 #ifdef HAVE_TARGET_32_BIG
971           elfcpp::Ehdr<32, true> ehdr(p);
972           return make_elf_sized_object<32, true>(name, input_file,
973                                                  offset, ehdr);
974 #else
975           fprintf(stderr,
976                   _("%s: %s: not configured to support 32-bit big-endian object\n"),
977                   program_name, name.c_str());
978           gold_exit(false);
979 #endif
980         }
981       else
982         {
983 #ifdef HAVE_TARGET_32_LITTLE
984           elfcpp::Ehdr<32, false> ehdr(p);
985           return make_elf_sized_object<32, false>(name, input_file,
986                                                   offset, ehdr);
987 #else
988           fprintf(stderr,
989                   _("%s: %s: not configured to support 32-bit little-endian object\n"),
990                   program_name, name.c_str());
991           gold_exit(false);
992 #endif
993         }
994     }
995   else
996     {
997       if (bytes < elfcpp::Elf_sizes<32>::ehdr_size)
998         {
999           fprintf(stderr, _("%s: %s: ELF file too short\n"),
1000                   program_name, name.c_str());
1001           gold_exit(false);
1002         }
1003       if (big_endian)
1004         {
1005 #ifdef HAVE_TARGET_64_BIG
1006           elfcpp::Ehdr<64, true> ehdr(p);
1007           return make_elf_sized_object<64, true>(name, input_file,
1008                                                  offset, ehdr);
1009 #else
1010           fprintf(stderr,
1011                   _("%s: %s: not configured to support 64-bit big-endian object\n"),
1012                   program_name, name.c_str());
1013           gold_exit(false);
1014 #endif
1015         }
1016       else
1017         {
1018 #ifdef HAVE_TARGET_64_LITTLE
1019           elfcpp::Ehdr<64, false> ehdr(p);
1020           return make_elf_sized_object<64, false>(name, input_file,
1021                                                   offset, ehdr);
1022 #else
1023           fprintf(stderr,
1024                   _("%s: %s: not configured to support 64-bit little-endian object\n"),
1025                   program_name, name.c_str());
1026           gold_exit(false);
1027 #endif
1028         }
1029     }
1030 }
1031
1032 // Instantiate the templates we need.  We could use the configure
1033 // script to restrict this to only the ones for implemented targets.
1034
1035 #ifdef HAVE_TARGET_32_LITTLE
1036 template
1037 class Sized_relobj<32, false>;
1038 #endif
1039
1040 #ifdef HAVE_TARGET_32_BIG
1041 template
1042 class Sized_relobj<32, true>;
1043 #endif
1044
1045 #ifdef HAVE_TARGET_64_LITTLE
1046 template
1047 class Sized_relobj<64, false>;
1048 #endif
1049
1050 #ifdef HAVE_TARGET_64_BIG
1051 template
1052 class Sized_relobj<64, true>;
1053 #endif
1054
1055 #ifdef HAVE_TARGET_32_LITTLE
1056 template
1057 struct Relocate_info<32, false>;
1058 #endif
1059
1060 #ifdef HAVE_TARGET_32_BIG
1061 template
1062 struct Relocate_info<32, true>;
1063 #endif
1064
1065 #ifdef HAVE_TARGET_64_LITTLE
1066 template
1067 struct Relocate_info<64, false>;
1068 #endif
1069
1070 #ifdef HAVE_TARGET_64_BIG
1071 template
1072 struct Relocate_info<64, true>;
1073 #endif
1074
1075 } // End namespace gold.