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   if (parameters->strip_all())
 719     return;
 720
 721   gold_assert(this->symtab_shndx_ != -1U);
 722   if (this->symtab_shndx_ == 0)
 723     {
 724       // This object has no symbols.  Weird but legal.
 725       return;
 726     }
 727
 728   // Read the symbol table section header.
 729   const unsigned int symtab_shndx = this->symtab_shndx_;
 730   typename This::Shdr symtabshdr(this,
 731                                  this->elf_file_.section_header(symtab_shndx));
 732   gold_assert(symtabshdr.get_sh_type() == elfcpp::SHT_SYMTAB);
 733   const unsigned int loccount = this->local_symbol_count_;
 734   gold_assert(loccount == symtabshdr.get_sh_info());
 735
 736   // Read the local symbols.
 737   const int sym_size = This::sym_size;
 738   off_t locsize = loccount * sym_size;
 739   const unsigned char* psyms = this->get_view(symtabshdr.get_sh_offset(),
 740                                               locsize, false);
 741
 742   // Read the symbol names.
 743   const unsigned int strtab_shndx = symtabshdr.get_sh_link();
 744   off_t strtab_size;
 745   const unsigned char* pnamesu = this->section_contents(strtab_shndx,
 746                                                         &strtab_size,
 747                                                         true);
 748   const char* pnames = reinterpret_cast<const char*>(pnamesu);
 749
 750   // Get a view into the output file.
 751   off_t output_size = this->output_local_symbol_count_ * sym_size;
 752   unsigned char* oview = of->get_output_view(this->local_symbol_offset_,
 753                                              output_size);
 754
 755   const std::vector<Map_to_output>& mo(this->map_to_output());
 756
 757   gold_assert(this->local_values_.size() == loccount);
 758
 759   unsigned char* ov = oview;
 760   psyms += sym_size;
 761   for (unsigned int i = 1; i < loccount; ++i, psyms += sym_size)
 762     {
 763       elfcpp::Sym<size, big_endian> isym(psyms);
 764
 765       if (!this->local_values_[i].needs_output_symtab_entry())
 766         continue;
 767
 768       unsigned int st_shndx = isym.get_st_shndx();
 769       if (st_shndx < elfcpp::SHN_LORESERVE)
 770         {
 771           gold_assert(st_shndx < mo.size());
 772           if (mo[st_shndx].output_section == NULL)
 773             continue;
 774           st_shndx = mo[st_shndx].output_section->out_shndx();
 775         }
 776
 777       elfcpp::Sym_write<size, big_endian> osym(ov);
 778
 779       gold_assert(isym.get_st_name() < strtab_size);
 780       const char* name = pnames + isym.get_st_name();
 781       osym.put_st_name(sympool->get_offset(name));
 782       osym.put_st_value(this->local_values_[i].value(this, 0));
 783       osym.put_st_size(isym.get_st_size());
 784       osym.put_st_info(isym.get_st_info());
 785       osym.put_st_other(isym.get_st_other());
 786       osym.put_st_shndx(st_shndx);
 787
 788       ov += sym_size;
 789     }
 790
 791   gold_assert(ov - oview == output_size);
 792
 793   of->write_output_view(this->local_symbol_offset_, output_size, oview);
 794 }
 795
 796 // Input_objects methods.
 797
 798 // Add a regular relocatable object to the list.  Return false if this
 799 // object should be ignored.
 800
 801 bool
 802 Input_objects::add_object(Object* obj)
 803 {
 804   if (!obj->is_dynamic())
 805     this->relobj_list_.push_back(static_cast<Relobj*>(obj));
 806   else
 807     {
 808       // See if this is a duplicate SONAME.
 809       Dynobj* dynobj = static_cast<Dynobj*>(obj);
 810
 811       std::pair<Unordered_set<std::string>::iterator, bool> ins =
 812         this->sonames_.insert(dynobj->soname());
 813       if (!ins.second)
 814         {
 815           // We have already seen a dynamic object with this soname.
 816           return false;
 817         }
 818
 819       this->dynobj_list_.push_back(dynobj);
 820     }
 821
 822   Target* target = obj->target();
 823   if (this->target_ == NULL)
 824     this->target_ = target;
 825   else if (this->target_ != target)
 826     {
 827       fprintf(stderr, "%s: %s: incompatible target\n",
 828               program_name, obj->name().c_str());
 829       gold_exit(false);
 830     }
 831
 832   set_parameters_size_and_endianness(target->get_size(),
 833                                      target->is_big_endian());
 834
 835   return true;
 836 }
 837
 838 // Relocate_info methods.
 839
 840 // Return a string describing the location of a relocation.  This is
 841 // only used in error messages.
 842
 843 template<int size, bool big_endian>
 844 std::string
 845 Relocate_info<size, big_endian>::location(size_t relnum, off_t) const
 846 {
 847   std::string ret(this->object->name());
 848   ret += ": reloc ";
 849   char buf[100];
 850   snprintf(buf, sizeof buf, "%zu", relnum);
 851   ret += buf;
 852   ret += " in reloc section ";
 853   snprintf(buf, sizeof buf, "%u", this->reloc_shndx);
 854   ret += buf;
 855   ret += " (" + this->object->section_name(this->reloc_shndx);
 856   ret += ") for section ";
 857   snprintf(buf, sizeof buf, "%u", this->data_shndx);
 858   ret += buf;
 859   ret += " (" + this->object->section_name(this->data_shndx) + ")";
 860   return ret;
 861 }
 862
 863 } // End namespace gold.
 864
 865 namespace
 866 {
 867
 868 using namespace gold;
 869
 870 // Read an ELF file with the header and return the appropriate
 871 // instance of Object.
 872
 873 template<int size, bool big_endian>
 874 Object*
 875 make_elf_sized_object(const std::string& name, Input_file* input_file,
 876                       off_t offset, const elfcpp::Ehdr<size, big_endian>& ehdr)
 877 {
 878   int et = ehdr.get_e_type();
 879   if (et == elfcpp::ET_REL)
 880     {
 881       Sized_relobj<size, big_endian>* obj =
 882         new Sized_relobj<size, big_endian>(name, input_file, offset, ehdr);
 883       obj->setup(ehdr);
 884       return obj;
 885     }
 886   else if (et == elfcpp::ET_DYN)
 887     {
 888       Sized_dynobj<size, big_endian>* obj =
 889         new Sized_dynobj<size, big_endian>(name, input_file, offset, ehdr);
 890       obj->setup(ehdr);
 891       return obj;
 892     }
 893   else
 894     {
 895       fprintf(stderr, _("%s: %s: unsupported ELF file type %d\n"),
 896               program_name, name.c_str(), et);
 897       gold_exit(false);
 898     }
 899 }
 900
 901 } // End anonymous namespace.
 902
 903 namespace gold
 904 {
 905
 906 // Read an ELF file and return the appropriate instance of Object.
 907
 908 Object*
 909 make_elf_object(const std::string& name, Input_file* input_file, off_t offset,
 910                 const unsigned char* p, off_t bytes)
 911 {
 912   if (bytes < elfcpp::EI_NIDENT)
 913     {
 914       fprintf(stderr, _("%s: %s: ELF file too short\n"),
 915               program_name, name.c_str());
 916       gold_exit(false);
 917     }
 918
 919   int v = p[elfcpp::EI_VERSION];
 920   if (v != elfcpp::EV_CURRENT)
 921     {
 922       if (v == elfcpp::EV_NONE)
 923         fprintf(stderr, _("%s: %s: invalid ELF version 0\n"),
 924                 program_name, name.c_str());
 925       else
 926         fprintf(stderr, _("%s: %s: unsupported ELF version %d\n"),
 927                 program_name, name.c_str(), v);
 928       gold_exit(false);
 929     }
 930
 931   int c = p[elfcpp::EI_CLASS];
 932   if (c == elfcpp::ELFCLASSNONE)
 933     {
 934       fprintf(stderr, _("%s: %s: invalid ELF class 0\n"),
 935               program_name, name.c_str());
 936       gold_exit(false);
 937     }
 938   else if (c != elfcpp::ELFCLASS32
 939            && c != elfcpp::ELFCLASS64)
 940     {
 941       fprintf(stderr, _("%s: %s: unsupported ELF class %d\n"),
 942               program_name, name.c_str(), c);
 943       gold_exit(false);
 944     }
 945
 946   int d = p[elfcpp::EI_DATA];
 947   if (d == elfcpp::ELFDATANONE)
 948     {
 949       fprintf(stderr, _("%s: %s: invalid ELF data encoding\n"),
 950               program_name, name.c_str());
 951       gold_exit(false);
 952     }
 953   else if (d != elfcpp::ELFDATA2LSB
 954            && d != elfcpp::ELFDATA2MSB)
 955     {
 956       fprintf(stderr, _("%s: %s: unsupported ELF data encoding %d\n"),
 957               program_name, name.c_str(), d);
 958       gold_exit(false);
 959     }
 960
 961   bool big_endian = d == elfcpp::ELFDATA2MSB;
 962
 963   if (c == elfcpp::ELFCLASS32)
 964     {
 965       if (bytes < elfcpp::Elf_sizes<32>::ehdr_size)
 966         {
 967           fprintf(stderr, _("%s: %s: ELF file too short\n"),
 968                   program_name, name.c_str());
 969           gold_exit(false);
 970         }
 971       if (big_endian)
 972         {
 973 #ifdef HAVE_TARGET_32_BIG
 974           elfcpp::Ehdr<32, true> ehdr(p);
 975           return make_elf_sized_object<32, true>(name, input_file,
 976                                                  offset, ehdr);
 977 #else
 978           fprintf(stderr,
 979                   _("%s: %s: not configured to support 32-bit big-endian object\n"),
 980                   program_name, name.c_str());
 981           gold_exit(false);
 982 #endif
 983         }
 984       else
 985         {
 986 #ifdef HAVE_TARGET_32_LITTLE
 987           elfcpp::Ehdr<32, false> ehdr(p);
 988           return make_elf_sized_object<32, false>(name, input_file,
 989                                                   offset, ehdr);
 990 #else
 991           fprintf(stderr,
 992                   _("%s: %s: not configured to support 32-bit little-endian object\n"),
 993                   program_name, name.c_str());
 994           gold_exit(false);
 995 #endif
 996         }
 997     }
 998   else
 999     {
1000       if (bytes < elfcpp::Elf_sizes<32>::ehdr_size)
1001         {
1002           fprintf(stderr, _("%s: %s: ELF file too short\n"),
1003                   program_name, name.c_str());
1004           gold_exit(false);
1005         }
1006       if (big_endian)
1007         {
1008 #ifdef HAVE_TARGET_64_BIG
1009           elfcpp::Ehdr<64, true> ehdr(p);
1010           return make_elf_sized_object<64, true>(name, input_file,
1011                                                  offset, ehdr);
1012 #else
1013           fprintf(stderr,
1014                   _("%s: %s: not configured to support 64-bit big-endian object\n"),
1015                   program_name, name.c_str());
1016           gold_exit(false);
1017 #endif
1018         }
1019       else
1020         {
1021 #ifdef HAVE_TARGET_64_LITTLE
1022           elfcpp::Ehdr<64, false> ehdr(p);
1023           return make_elf_sized_object<64, false>(name, input_file,
1024                                                   offset, ehdr);
1025 #else
1026           fprintf(stderr,
1027                   _("%s: %s: not configured to support 64-bit little-endian object\n"),
1028                   program_name, name.c_str());
1029           gold_exit(false);
1030 #endif
1031         }
1032     }
1033 }
1034
1035 // Instantiate the templates we need.  We could use the configure
1036 // script to restrict this to only the ones for implemented targets.
1037
1038 #ifdef HAVE_TARGET_32_LITTLE
1039 template
1040 class Sized_relobj<32, false>;
1041 #endif
1042
1043 #ifdef HAVE_TARGET_32_BIG
1044 template
1045 class Sized_relobj<32, true>;
1046 #endif
1047
1048 #ifdef HAVE_TARGET_64_LITTLE
1049 template
1050 class Sized_relobj<64, false>;
1051 #endif
1052
1053 #ifdef HAVE_TARGET_64_BIG
1054 template
1055 class Sized_relobj<64, true>;
1056 #endif
1057
1058 #ifdef HAVE_TARGET_32_LITTLE
1059 template
1060 struct Relocate_info<32, false>;
1061 #endif
1062
1063 #ifdef HAVE_TARGET_32_BIG
1064 template
1065 struct Relocate_info<32, true>;
1066 #endif
1067
1068 #ifdef HAVE_TARGET_64_LITTLE
1069 template
1070 struct Relocate_info<64, false>;
1071 #endif
1072
1073 #ifdef HAVE_TARGET_64_BIG
1074 template
1075 struct Relocate_info<64, true>;
1076 #endif
1077
1078 } // End namespace gold.