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