gold/dynobj.cc

   1 // dynobj.cc -- dynamic object support for gold
   2
   3 // Copyright 2006, 2007, 2008 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 <vector>
  26 #include <cstring>
  27
  28 #include "elfcpp.h"
  29 #include "parameters.h"
  30 #include "options.h"
  31 #include "script.h"
  32 #include "symtab.h"
  33 #include "dynobj.h"
  34
  35 namespace gold
  36 {
  37
  38 // Class Dynobj.
  39
  40 // Sets up the default soname_ to use, in the (rare) cases we never
  41 // see a DT_SONAME entry.
  42
  43 Dynobj::Dynobj(const std::string& name, Input_file* input_file, off_t offset)
  44   : Object(name, input_file, true, offset),
  45     needed_(),
  46     unknown_needed_(UNKNOWN_NEEDED_UNSET)
  47 {
  48   // This will be overridden by a DT_SONAME entry, hopefully.  But if
  49   // we never see a DT_SONAME entry, our rule is to use the dynamic
  50   // object's filename.  The only exception is when the dynamic object
  51   // is part of an archive (so the filename is the archive's
  52   // filename).  In that case, we use just the dynobj's name-in-archive.
  53   this->soname_ = this->input_file()->found_name();
  54   if (this->offset() != 0)
  55     {
  56       std::string::size_type open_paren = this->name().find('(');
  57       std::string::size_type close_paren = this->name().find(')');
  58       if (open_paren != std::string::npos && close_paren != std::string::npos)
  59         {
  60           // It's an archive, and name() is of the form 'foo.a(bar.so)'.
  61           this->soname_ = this->name().substr(open_paren + 1,
  62                                               close_paren - (open_paren + 1));
  63         }
  64     }
  65 }
  66
  67 // Class Sized_dynobj.
  68
  69 template<int size, bool big_endian>
  70 Sized_dynobj<size, big_endian>::Sized_dynobj(
  71     const std::string& name,
  72     Input_file* input_file,
  73     off_t offset,
  74     const elfcpp::Ehdr<size, big_endian>& ehdr)
  75   : Dynobj(name, input_file, offset),
  76     elf_file_(this, ehdr)
  77 {
  78 }
  79
  80 // Set up the object.
  81
  82 template<int size, bool big_endian>
  83 void
  84 Sized_dynobj<size, big_endian>::setup(
  85     const elfcpp::Ehdr<size, big_endian>& ehdr)
  86 {
  87   this->set_target(ehdr.get_e_machine(), size, big_endian,
  88                    ehdr.get_e_ident()[elfcpp::EI_OSABI],
  89                    ehdr.get_e_ident()[elfcpp::EI_ABIVERSION]);
  90
  91   const unsigned int shnum = this->elf_file_.shnum();
  92   this->set_shnum(shnum);
  93 }
  94
  95 // Find the SHT_DYNSYM section and the various version sections, and
  96 // the dynamic section, given the section headers.
  97
  98 template<int size, bool big_endian>
  99 void
 100 Sized_dynobj<size, big_endian>::find_dynsym_sections(
 101     const unsigned char* pshdrs,
 102     unsigned int* pdynsym_shndx,
 103     unsigned int* pversym_shndx,
 104     unsigned int* pverdef_shndx,
 105     unsigned int* pverneed_shndx,
 106     unsigned int* pdynamic_shndx)
 107 {
 108   *pdynsym_shndx = -1U;
 109   *pversym_shndx = -1U;
 110   *pverdef_shndx = -1U;
 111   *pverneed_shndx = -1U;
 112   *pdynamic_shndx = -1U;
 113
 114   const unsigned int shnum = this->shnum();
 115   const unsigned char* p = pshdrs;
 116   for (unsigned int i = 0; i < shnum; ++i, p += This::shdr_size)
 117     {
 118       typename This::Shdr shdr(p);
 119
 120       unsigned int* pi;
 121       switch (shdr.get_sh_type())
 122         {
 123         case elfcpp::SHT_DYNSYM:
 124           pi = pdynsym_shndx;
 125           break;
 126         case elfcpp::SHT_GNU_versym:
 127           pi = pversym_shndx;
 128           break;
 129         case elfcpp::SHT_GNU_verdef:
 130           pi = pverdef_shndx;
 131           break;
 132         case elfcpp::SHT_GNU_verneed:
 133           pi = pverneed_shndx;
 134           break;
 135         case elfcpp::SHT_DYNAMIC:
 136           pi = pdynamic_shndx;
 137           break;
 138         default:
 139           pi = NULL;
 140           break;
 141         }
 142
 143       if (pi == NULL)
 144         continue;
 145
 146       if (*pi != -1U)
 147         this->error(_("unexpected duplicate type %u section: %u, %u"),
 148                     shdr.get_sh_type(), *pi, i);
 149
 150       *pi = i;
 151     }
 152 }
 153
 154 // Read the contents of section SHNDX.  PSHDRS points to the section
 155 // headers.  TYPE is the expected section type.  LINK is the expected
 156 // section link.  Store the data in *VIEW and *VIEW_SIZE.  The
 157 // section's sh_info field is stored in *VIEW_INFO.
 158
 159 template<int size, bool big_endian>
 160 void
 161 Sized_dynobj<size, big_endian>::read_dynsym_section(
 162     const unsigned char* pshdrs,
 163     unsigned int shndx,
 164     elfcpp::SHT type,
 165     unsigned int link,
 166     File_view** view,
 167     section_size_type* view_size,
 168     unsigned int* view_info)
 169 {
 170   if (shndx == -1U)
 171     {
 172       *view = NULL;
 173       *view_size = 0;
 174       *view_info = 0;
 175       return;
 176     }
 177
 178   typename This::Shdr shdr(pshdrs + shndx * This::shdr_size);
 179
 180   gold_assert(shdr.get_sh_type() == type);
 181
 182   if (shdr.get_sh_link() != link)
 183     this->error(_("unexpected link in section %u header: %u != %u"),
 184                 shndx, shdr.get_sh_link(), link);
 185
 186   *view = this->get_lasting_view(shdr.get_sh_offset(), shdr.get_sh_size(),
 187                                  false);
 188   *view_size = convert_to_section_size_type(shdr.get_sh_size());
 189   *view_info = shdr.get_sh_info();
 190 }
 191
 192 // Read the dynamic tags.  Set the soname field if this shared object
 193 // has a DT_SONAME tag.  Record the DT_NEEDED tags.  PSHDRS points to
 194 // the section headers.  DYNAMIC_SHNDX is the section index of the
 195 // SHT_DYNAMIC section.  STRTAB_SHNDX, STRTAB, and STRTAB_SIZE are the
 196 // section index and contents of a string table which may be the one
 197 // associated with the SHT_DYNAMIC section.
 198
 199 template<int size, bool big_endian>
 200 void
 201 Sized_dynobj<size, big_endian>::read_dynamic(const unsigned char* pshdrs,
 202                                              unsigned int dynamic_shndx,
 203                                              unsigned int strtab_shndx,
 204                                              const unsigned char* strtabu,
 205                                              off_t strtab_size)
 206 {
 207   typename This::Shdr dynamicshdr(pshdrs + dynamic_shndx * This::shdr_size);
 208   gold_assert(dynamicshdr.get_sh_type() == elfcpp::SHT_DYNAMIC);
 209
 210   const off_t dynamic_size = dynamicshdr.get_sh_size();
 211   const unsigned char* pdynamic = this->get_view(dynamicshdr.get_sh_offset(),
 212                                                  dynamic_size, false);
 213
 214   const unsigned int link = dynamicshdr.get_sh_link();
 215   if (link != strtab_shndx)
 216     {
 217       if (link >= this->shnum())
 218         {
 219           this->error(_("DYNAMIC section %u link out of range: %u"),
 220                       dynamic_shndx, link);
 221           return;
 222         }
 223
 224       typename This::Shdr strtabshdr(pshdrs + link * This::shdr_size);
 225       if (strtabshdr.get_sh_type() != elfcpp::SHT_STRTAB)
 226         {
 227           this->error(_("DYNAMIC section %u link %u is not a strtab"),
 228                       dynamic_shndx, link);
 229           return;
 230         }
 231
 232       strtab_size = strtabshdr.get_sh_size();
 233       strtabu = this->get_view(strtabshdr.get_sh_offset(), strtab_size, false);
 234     }
 235
 236   const char* const strtab = reinterpret_cast<const char*>(strtabu);
 237
 238   for (const unsigned char* p = pdynamic;
 239        p < pdynamic + dynamic_size;
 240        p += This::dyn_size)
 241     {
 242       typename This::Dyn dyn(p);
 243
 244       switch (dyn.get_d_tag())
 245         {
 246         case elfcpp::DT_NULL:
 247           // We should always see DT_NULL at the end of the dynamic
 248           // tags.
 249           return;
 250
 251         case elfcpp::DT_SONAME:
 252           {
 253             off_t val = dyn.get_d_val();
 254             if (val >= strtab_size)
 255               this->error(_("DT_SONAME value out of range: %lld >= %lld"),
 256                           static_cast<long long>(val),
 257                           static_cast<long long>(strtab_size));
 258             else
 259               this->set_soname_string(strtab + val);
 260           }
 261           break;
 262
 263         case elfcpp::DT_NEEDED:
 264           {
 265             off_t val = dyn.get_d_val();
 266             if (val >= strtab_size)
 267               this->error(_("DT_NEEDED value out of range: %lld >= %lld"),
 268                           static_cast<long long>(val),
 269                           static_cast<long long>(strtab_size));
 270             else
 271               this->add_needed(strtab + val);
 272           }
 273           break;
 274
 275         default:
 276           break;
 277         }
 278     }
 279
 280   this->error(_("missing DT_NULL in dynamic segment"));
 281 }
 282
 283 // Read the symbols and sections from a dynamic object.  We read the
 284 // dynamic symbols, not the normal symbols.
 285
 286 template<int size, bool big_endian>
 287 void
 288 Sized_dynobj<size, big_endian>::do_read_symbols(Read_symbols_data* sd)
 289 {
 290   this->read_section_data(&this->elf_file_, sd);
 291
 292   const unsigned char* const pshdrs = sd->section_headers->data();
 293
 294   unsigned int dynsym_shndx;
 295   unsigned int versym_shndx;
 296   unsigned int verdef_shndx;
 297   unsigned int verneed_shndx;
 298   unsigned int dynamic_shndx;
 299   this->find_dynsym_sections(pshdrs, &dynsym_shndx, &versym_shndx,
 300                              &verdef_shndx, &verneed_shndx, &dynamic_shndx);
 301
 302   unsigned int strtab_shndx = -1U;
 303
 304   sd->symbols = NULL;
 305   sd->symbols_size = 0;
 306   sd->external_symbols_offset = 0;
 307   sd->symbol_names = NULL;
 308   sd->symbol_names_size = 0;
 309
 310   if (dynsym_shndx != -1U)
 311     {
 312       // Get the dynamic symbols.
 313       typename This::Shdr dynsymshdr(pshdrs + dynsym_shndx * This::shdr_size);
 314       gold_assert(dynsymshdr.get_sh_type() == elfcpp::SHT_DYNSYM);
 315
 316       sd->symbols = this->get_lasting_view(dynsymshdr.get_sh_offset(),
 317                                            dynsymshdr.get_sh_size(), false);
 318       sd->symbols_size =
 319         convert_to_section_size_type(dynsymshdr.get_sh_size());
 320
 321       // Get the symbol names.
 322       strtab_shndx = dynsymshdr.get_sh_link();
 323       if (strtab_shndx >= this->shnum())
 324         {
 325           this->error(_("invalid dynamic symbol table name index: %u"),
 326                       strtab_shndx);
 327           return;
 328         }
 329       typename This::Shdr strtabshdr(pshdrs + strtab_shndx * This::shdr_size);
 330       if (strtabshdr.get_sh_type() != elfcpp::SHT_STRTAB)
 331         {
 332           this->error(_("dynamic symbol table name section "
 333                         "has wrong type: %u"),
 334                       static_cast<unsigned int>(strtabshdr.get_sh_type()));
 335           return;
 336         }
 337
 338       sd->symbol_names = this->get_lasting_view(strtabshdr.get_sh_offset(),
 339                                                 strtabshdr.get_sh_size(),
 340                                                 false);
 341       sd->symbol_names_size =
 342         convert_to_section_size_type(strtabshdr.get_sh_size());
 343
 344       // Get the version information.
 345
 346       unsigned int dummy;
 347       this->read_dynsym_section(pshdrs, versym_shndx, elfcpp::SHT_GNU_versym,
 348                                 dynsym_shndx, &sd->versym, &sd->versym_size,
 349                                 &dummy);
 350
 351       // We require that the version definition and need section link
 352       // to the same string table as the dynamic symbol table.  This
 353       // is not a technical requirement, but it always happens in
 354       // practice.  We could change this if necessary.
 355
 356       this->read_dynsym_section(pshdrs, verdef_shndx, elfcpp::SHT_GNU_verdef,
 357                                 strtab_shndx, &sd->verdef, &sd->verdef_size,
 358                                 &sd->verdef_info);
 359
 360       this->read_dynsym_section(pshdrs, verneed_shndx, elfcpp::SHT_GNU_verneed,
 361                                 strtab_shndx, &sd->verneed, &sd->verneed_size,
 362                                 &sd->verneed_info);
 363     }
 364
 365   // Read the SHT_DYNAMIC section to find whether this shared object
 366   // has a DT_SONAME tag and to record any DT_NEEDED tags.  This
 367   // doesn't really have anything to do with reading the symbols, but
 368   // this is a convenient place to do it.
 369   if (dynamic_shndx != -1U)
 370     this->read_dynamic(pshdrs, dynamic_shndx, strtab_shndx,
 371                        (sd->symbol_names == NULL
 372                         ? NULL
 373                         : sd->symbol_names->data()),
 374                        sd->symbol_names_size);
 375 }
 376
 377 // Lay out the input sections for a dynamic object.  We don't want to
 378 // include sections from a dynamic object, so all that we actually do
 379 // here is check for .gnu.warning sections.
 380
 381 template<int size, bool big_endian>
 382 void
 383 Sized_dynobj<size, big_endian>::do_layout(Symbol_table* symtab,
 384                                           Layout*,
 385                                           Read_symbols_data* sd)
 386 {
 387   const unsigned int shnum = this->shnum();
 388   if (shnum == 0)
 389     return;
 390
 391   // Get the section headers.
 392   const unsigned char* pshdrs = sd->section_headers->data();
 393
 394   // Get the section names.
 395   const unsigned char* pnamesu = sd->section_names->data();
 396   const char* pnames = reinterpret_cast<const char*>(pnamesu);
 397
 398   // Skip the first, dummy, section.
 399   pshdrs += This::shdr_size;
 400   for (unsigned int i = 1; i < shnum; ++i, pshdrs += This::shdr_size)
 401     {
 402       typename This::Shdr shdr(pshdrs);
 403
 404       if (shdr.get_sh_name() >= sd->section_names_size)
 405         {
 406           this->error(_("bad section name offset for section %u: %lu"),
 407                       i, static_cast<unsigned long>(shdr.get_sh_name()));
 408           return;
 409         }
 410
 411       const char* name = pnames + shdr.get_sh_name();
 412
 413       this->handle_gnu_warning_section(name, i, symtab);
 414     }
 415
 416   delete sd->section_headers;
 417   sd->section_headers = NULL;
 418   delete sd->section_names;
 419   sd->section_names = NULL;
 420 }
 421
 422 // Add an entry to the vector mapping version numbers to version
 423 // strings.
 424
 425 template<int size, bool big_endian>
 426 void
 427 Sized_dynobj<size, big_endian>::set_version_map(
 428     Version_map* version_map,
 429     unsigned int ndx,
 430     const char* name) const
 431 {
 432   if (ndx >= version_map->size())
 433     version_map->resize(ndx + 1);
 434   if ((*version_map)[ndx] != NULL)
 435     this->error(_("duplicate definition for version %u"), ndx);
 436   (*version_map)[ndx] = name;
 437 }
 438
 439 // Add mappings for the version definitions to VERSION_MAP.
 440
 441 template<int size, bool big_endian>
 442 void
 443 Sized_dynobj<size, big_endian>::make_verdef_map(
 444     Read_symbols_data* sd,
 445     Version_map* version_map) const
 446 {
 447   if (sd->verdef == NULL)
 448     return;
 449
 450   const char* names = reinterpret_cast<const char*>(sd->symbol_names->data());
 451   section_size_type names_size = sd->symbol_names_size;
 452
 453   const unsigned char* pverdef = sd->verdef->data();
 454   section_size_type verdef_size = sd->verdef_size;
 455   const unsigned int count = sd->verdef_info;
 456
 457   const unsigned char* p = pverdef;
 458   for (unsigned int i = 0; i < count; ++i)
 459     {
 460       elfcpp::Verdef<size, big_endian> verdef(p);
 461
 462       if (verdef.get_vd_version() != elfcpp::VER_DEF_CURRENT)
 463         {
 464           this->error(_("unexpected verdef version %u"),
 465                       verdef.get_vd_version());
 466           return;
 467         }
 468
 469       const section_size_type vd_ndx = verdef.get_vd_ndx();
 470
 471       // The GNU linker clears the VERSYM_HIDDEN bit.  I'm not
 472       // sure why.
 473
 474       // The first Verdaux holds the name of this version.  Subsequent
 475       // ones are versions that this one depends upon, which we don't
 476       // care about here.
 477       const section_size_type vd_cnt = verdef.get_vd_cnt();
 478       if (vd_cnt < 1)
 479         {
 480           this->error(_("verdef vd_cnt field too small: %u"),
 481                       static_cast<unsigned int>(vd_cnt));
 482           return;
 483         }
 484
 485       const section_size_type vd_aux = verdef.get_vd_aux();
 486       if ((p - pverdef) + vd_aux >= verdef_size)
 487         {
 488           this->error(_("verdef vd_aux field out of range: %u"),
 489                       static_cast<unsigned int>(vd_aux));
 490           return;
 491         }
 492
 493       const unsigned char* pvda = p + vd_aux;
 494       elfcpp::Verdaux<size, big_endian> verdaux(pvda);
 495
 496       const section_size_type vda_name = verdaux.get_vda_name();
 497       if (vda_name >= names_size)
 498         {
 499           this->error(_("verdaux vda_name field out of range: %u"),
 500                       static_cast<unsigned int>(vda_name));
 501           return;
 502         }
 503
 504       this->set_version_map(version_map, vd_ndx, names + vda_name);
 505
 506       const section_size_type vd_next = verdef.get_vd_next();
 507       if ((p - pverdef) + vd_next >= verdef_size)
 508         {
 509           this->error(_("verdef vd_next field out of range: %u"),
 510                       static_cast<unsigned int>(vd_next));
 511           return;
 512         }
 513
 514       p += vd_next;
 515     }
 516 }
 517
 518 // Add mappings for the required versions to VERSION_MAP.
 519
 520 template<int size, bool big_endian>
 521 void
 522 Sized_dynobj<size, big_endian>::make_verneed_map(
 523     Read_symbols_data* sd,
 524     Version_map* version_map) const
 525 {
 526   if (sd->verneed == NULL)
 527     return;
 528
 529   const char* names = reinterpret_cast<const char*>(sd->symbol_names->data());
 530   section_size_type names_size = sd->symbol_names_size;
 531
 532   const unsigned char* pverneed = sd->verneed->data();
 533   const section_size_type verneed_size = sd->verneed_size;
 534   const unsigned int count = sd->verneed_info;
 535
 536   const unsigned char* p = pverneed;
 537   for (unsigned int i = 0; i < count; ++i)
 538     {
 539       elfcpp::Verneed<size, big_endian> verneed(p);
 540
 541       if (verneed.get_vn_version() != elfcpp::VER_NEED_CURRENT)
 542         {
 543           this->error(_("unexpected verneed version %u"),
 544                       verneed.get_vn_version());
 545           return;
 546         }
 547
 548       const section_size_type vn_aux = verneed.get_vn_aux();
 549
 550       if ((p - pverneed) + vn_aux >= verneed_size)
 551         {
 552           this->error(_("verneed vn_aux field out of range: %u"),
 553                       static_cast<unsigned int>(vn_aux));
 554           return;
 555         }
 556
 557       const unsigned int vn_cnt = verneed.get_vn_cnt();
 558       const unsigned char* pvna = p + vn_aux;
 559       for (unsigned int j = 0; j < vn_cnt; ++j)
 560         {
 561           elfcpp::Vernaux<size, big_endian> vernaux(pvna);
 562
 563           const unsigned int vna_name = vernaux.get_vna_name();
 564           if (vna_name >= names_size)
 565             {
 566               this->error(_("vernaux vna_name field out of range: %u"),
 567                           static_cast<unsigned int>(vna_name));
 568               return;
 569             }
 570
 571           this->set_version_map(version_map, vernaux.get_vna_other(),
 572                                 names + vna_name);
 573
 574           const section_size_type vna_next = vernaux.get_vna_next();
 575           if ((pvna - pverneed) + vna_next >= verneed_size)
 576             {
 577               this->error(_("verneed vna_next field out of range: %u"),
 578                           static_cast<unsigned int>(vna_next));
 579               return;
 580             }
 581
 582           pvna += vna_next;
 583         }
 584
 585       const section_size_type vn_next = verneed.get_vn_next();
 586       if ((p - pverneed) + vn_next >= verneed_size)
 587         {
 588           this->error(_("verneed vn_next field out of range: %u"),
 589                       static_cast<unsigned int>(vn_next));
 590           return;
 591         }
 592
 593       p += vn_next;
 594     }
 595 }
 596
 597 // Create a vector mapping version numbers to version strings.
 598
 599 template<int size, bool big_endian>
 600 void
 601 Sized_dynobj<size, big_endian>::make_version_map(
 602     Read_symbols_data* sd,
 603     Version_map* version_map) const
 604 {
 605   if (sd->verdef == NULL && sd->verneed == NULL)
 606     return;
 607
 608   // A guess at the maximum version number we will see.  If this is
 609   // wrong we will be less efficient but still correct.
 610   version_map->reserve(sd->verdef_info + sd->verneed_info * 10);
 611
 612   this->make_verdef_map(sd, version_map);
 613   this->make_verneed_map(sd, version_map);
 614 }
 615
 616 // Add the dynamic symbols to the symbol table.
 617
 618 template<int size, bool big_endian>
 619 void
 620 Sized_dynobj<size, big_endian>::do_add_symbols(Symbol_table* symtab,
 621                                                Read_symbols_data* sd)
 622 {
 623   if (sd->symbols == NULL)
 624     {
 625       gold_assert(sd->symbol_names == NULL);
 626       gold_assert(sd->versym == NULL && sd->verdef == NULL
 627                   && sd->verneed == NULL);
 628       return;
 629     }
 630
 631   const int sym_size = This::sym_size;
 632   const size_t symcount = sd->symbols_size / sym_size;
 633   gold_assert(sd->external_symbols_offset == 0);
 634   if (symcount * sym_size != sd->symbols_size)
 635     {
 636       this->error(_("size of dynamic symbols is not multiple of symbol size"));
 637       return;
 638     }
 639
 640   Version_map version_map;
 641   this->make_version_map(sd, &version_map);
 642
 643   const char* sym_names =
 644     reinterpret_cast<const char*>(sd->symbol_names->data());
 645   symtab->add_from_dynobj(this, sd->symbols->data(), symcount,
 646                           sym_names, sd->symbol_names_size,
 647                           (sd->versym == NULL
 648                            ? NULL
 649                            : sd->versym->data()),
 650                           sd->versym_size,
 651                           &version_map);
 652
 653   delete sd->symbols;
 654   sd->symbols = NULL;
 655   delete sd->symbol_names;
 656   sd->symbol_names = NULL;
 657   if (sd->versym != NULL)
 658     {
 659       delete sd->versym;
 660       sd->versym = NULL;
 661     }
 662   if (sd->verdef != NULL)
 663     {
 664       delete sd->verdef;
 665       sd->verdef = NULL;
 666     }
 667   if (sd->verneed != NULL)
 668     {
 669       delete sd->verneed;
 670       sd->verneed = NULL;
 671     }
 672
 673   // This is normally the last time we will read any data from this
 674   // file.
 675   this->clear_view_cache_marks();
 676 }
 677
 678 // Given a vector of hash codes, compute the number of hash buckets to
 679 // use.
 680
 681 unsigned int
 682 Dynobj::compute_bucket_count(const std::vector<uint32_t>& hashcodes,
 683                              bool for_gnu_hash_table)
 684 {
 685   // FIXME: Implement optional hash table optimization.
 686
 687   // Array used to determine the number of hash table buckets to use
 688   // based on the number of symbols there are.  If there are fewer
 689   // than 3 symbols we use 1 bucket, fewer than 17 symbols we use 3
 690   // buckets, fewer than 37 we use 17 buckets, and so forth.  We never
 691   // use more than 32771 buckets.  This is straight from the old GNU
 692   // linker.
 693   static const unsigned int buckets[] =
 694   {
 695     1, 3, 17, 37, 67, 97, 131, 197, 263, 521, 1031, 2053, 4099, 8209,
 696     16411, 32771
 697   };
 698   const int buckets_count = sizeof buckets / sizeof buckets[0];
 699
 700   unsigned int symcount = hashcodes.size();
 701   unsigned int ret = 1;
 702   for (int i = 0; i < buckets_count; ++i)
 703     {
 704       if (symcount < buckets[i])
 705         break;
 706       ret = buckets[i];
 707     }
 708
 709   if (for_gnu_hash_table && ret < 2)
 710     ret = 2;
 711
 712   return ret;
 713 }
 714
 715 // The standard ELF hash function.  This hash function must not
 716 // change, as the dynamic linker uses it also.
 717
 718 uint32_t
 719 Dynobj::elf_hash(const char* name)
 720 {
 721   const unsigned char* nameu = reinterpret_cast<const unsigned char*>(name);
 722   uint32_t h = 0;
 723   unsigned char c;
 724   while ((c = *nameu++) != '\0')
 725     {
 726       h = (h << 4) + c;
 727       uint32_t g = h & 0xf0000000;
 728       if (g != 0)
 729         {
 730           h ^= g >> 24;
 731           // The ELF ABI says h &= ~g, but using xor is equivalent in
 732           // this case (since g was set from h) and may save one
 733           // instruction.
 734           h ^= g;
 735         }
 736     }
 737   return h;
 738 }
 739
 740 // Create a standard ELF hash table, setting *PPHASH and *PHASHLEN.
 741 // DYNSYMS is a vector with all the global dynamic symbols.
 742 // LOCAL_DYNSYM_COUNT is the number of local symbols in the dynamic
 743 // symbol table.
 744
 745 void
 746 Dynobj::create_elf_hash_table(const std::vector<Symbol*>& dynsyms,
 747                               unsigned int local_dynsym_count,
 748                               unsigned char** pphash,
 749                               unsigned int* phashlen)
 750 {
 751   unsigned int dynsym_count = dynsyms.size();
 752
 753   // Get the hash values for all the symbols.
 754   std::vector<uint32_t> dynsym_hashvals(dynsym_count);
 755   for (unsigned int i = 0; i < dynsym_count; ++i)
 756     dynsym_hashvals[i] = Dynobj::elf_hash(dynsyms[i]->name());
 757
 758   const unsigned int bucketcount =
 759     Dynobj::compute_bucket_count(dynsym_hashvals, false);
 760
 761   std::vector<uint32_t> bucket(bucketcount);
 762   std::vector<uint32_t> chain(local_dynsym_count + dynsym_count);
 763
 764   for (unsigned int i = 0; i < dynsym_count; ++i)
 765     {
 766       unsigned int dynsym_index = dynsyms[i]->dynsym_index();
 767       unsigned int bucketpos = dynsym_hashvals[i] % bucketcount;
 768       chain[dynsym_index] = bucket[bucketpos];
 769       bucket[bucketpos] = dynsym_index;
 770     }
 771
 772   unsigned int hashlen = ((2
 773                            + bucketcount
 774                            + local_dynsym_count
 775                            + dynsym_count)
 776                           * 4);
 777   unsigned char* phash = new unsigned char[hashlen];
 778
 779   if (parameters->is_big_endian())
 780     {
 781 #if defined(HAVE_TARGET_32_BIG) || defined(HAVE_TARGET_64_BIG)
 782       Dynobj::sized_create_elf_hash_table<true>(bucket, chain, phash,
 783                                                 hashlen);
 784 #else
 785       gold_unreachable();
 786 #endif
 787     }
 788   else
 789     {
 790 #if defined(HAVE_TARGET_32_LITTLE) || defined(HAVE_TARGET_64_LITTLE)
 791       Dynobj::sized_create_elf_hash_table<false>(bucket, chain, phash,
 792                                                  hashlen);
 793 #else
 794       gold_unreachable();
 795 #endif
 796     }
 797
 798   *pphash = phash;
 799   *phashlen = hashlen;
 800 }
 801
 802 // Fill in an ELF hash table.
 803
 804 template<bool big_endian>
 805 void
 806 Dynobj::sized_create_elf_hash_table(const std::vector<uint32_t>& bucket,
 807                                     const std::vector<uint32_t>& chain,
 808                                     unsigned char* phash,
 809                                     unsigned int hashlen)
 810 {
 811   unsigned char* p = phash;
 812
 813   const unsigned int bucketcount = bucket.size();
 814   const unsigned int chaincount = chain.size();
 815
 816   elfcpp::Swap<32, big_endian>::writeval(p, bucketcount);
 817   p += 4;
 818   elfcpp::Swap<32, big_endian>::writeval(p, chaincount);
 819   p += 4;
 820
 821   for (unsigned int i = 0; i < bucketcount; ++i)
 822     {
 823       elfcpp::Swap<32, big_endian>::writeval(p, bucket[i]);
 824       p += 4;
 825     }
 826
 827   for (unsigned int i = 0; i < chaincount; ++i)
 828     {
 829       elfcpp::Swap<32, big_endian>::writeval(p, chain[i]);
 830       p += 4;
 831     }
 832
 833   gold_assert(static_cast<unsigned int>(p - phash) == hashlen);
 834 }
 835
 836 // The hash function used for the GNU hash table.  This hash function
 837 // must not change, as the dynamic linker uses it also.
 838
 839 uint32_t
 840 Dynobj::gnu_hash(const char* name)
 841 {
 842   const unsigned char* nameu = reinterpret_cast<const unsigned char*>(name);
 843   uint32_t h = 5381;
 844   unsigned char c;
 845   while ((c = *nameu++) != '\0')
 846     h = (h << 5) + h + c;
 847   return h;
 848 }
 849
 850 // Create a GNU hash table, setting *PPHASH and *PHASHLEN.  GNU hash
 851 // tables are an extension to ELF which are recognized by the GNU
 852 // dynamic linker.  They are referenced using dynamic tag DT_GNU_HASH.
 853 // TARGET is the target.  DYNSYMS is a vector with all the global
 854 // symbols which will be going into the dynamic symbol table.
 855 // LOCAL_DYNSYM_COUNT is the number of local symbols in the dynamic
 856 // symbol table.
 857
 858 void
 859 Dynobj::create_gnu_hash_table(const std::vector<Symbol*>& dynsyms,
 860                               unsigned int local_dynsym_count,
 861                               unsigned char** pphash,
 862                               unsigned int* phashlen)
 863 {
 864   const unsigned int count = dynsyms.size();
 865
 866   // Sort the dynamic symbols into two vectors.  Symbols which we do
 867   // not want to put into the hash table we store into
 868   // UNHASHED_DYNSYMS.  Symbols which we do want to store we put into
 869   // HASHED_DYNSYMS.  DYNSYM_HASHVALS is parallel to HASHED_DYNSYMS,
 870   // and records the hash codes.
 871
 872   std::vector<Symbol*> unhashed_dynsyms;
 873   unhashed_dynsyms.reserve(count);
 874
 875   std::vector<Symbol*> hashed_dynsyms;
 876   hashed_dynsyms.reserve(count);
 877
 878   std::vector<uint32_t> dynsym_hashvals;
 879   dynsym_hashvals.reserve(count);
 880
 881   for (unsigned int i = 0; i < count; ++i)
 882     {
 883       Symbol* sym = dynsyms[i];
 884
 885       // FIXME: Should put on unhashed_dynsyms if the symbol is
 886       // hidden.
 887       if (sym->is_undefined())
 888         unhashed_dynsyms.push_back(sym);
 889       else
 890         {
 891           hashed_dynsyms.push_back(sym);
 892           dynsym_hashvals.push_back(Dynobj::gnu_hash(sym->name()));
 893         }
 894     }
 895
 896   // Put the unhashed symbols at the start of the global portion of
 897   // the dynamic symbol table.
 898   const unsigned int unhashed_count = unhashed_dynsyms.size();
 899   unsigned int unhashed_dynsym_index = local_dynsym_count;
 900   for (unsigned int i = 0; i < unhashed_count; ++i)
 901     {
 902       unhashed_dynsyms[i]->set_dynsym_index(unhashed_dynsym_index);
 903       ++unhashed_dynsym_index;
 904     }
 905
 906   // For the actual data generation we call out to a templatized
 907   // function.
 908   int size = parameters->get_size();
 909   bool big_endian = parameters->is_big_endian();
 910   if (size == 32)
 911     {
 912       if (big_endian)
 913         {
 914 #ifdef HAVE_TARGET_32_BIG
 915           Dynobj::sized_create_gnu_hash_table<32, true>(hashed_dynsyms,
 916                                                         dynsym_hashvals,
 917                                                         unhashed_dynsym_index,
 918                                                         pphash,
 919                                                         phashlen);
 920 #else
 921           gold_unreachable();
 922 #endif
 923         }
 924       else
 925         {
 926 #ifdef HAVE_TARGET_32_LITTLE
 927           Dynobj::sized_create_gnu_hash_table<32, false>(hashed_dynsyms,
 928                                                          dynsym_hashvals,
 929                                                          unhashed_dynsym_index,
 930                                                          pphash,
 931                                                          phashlen);
 932 #else
 933           gold_unreachable();
 934 #endif
 935         }
 936     }
 937   else if (size == 64)
 938     {
 939       if (big_endian)
 940         {
 941 #ifdef HAVE_TARGET_64_BIG
 942           Dynobj::sized_create_gnu_hash_table<64, true>(hashed_dynsyms,
 943                                                         dynsym_hashvals,
 944                                                         unhashed_dynsym_index,
 945                                                         pphash,
 946                                                         phashlen);
 947 #else
 948           gold_unreachable();
 949 #endif
 950         }
 951       else
 952         {
 953 #ifdef HAVE_TARGET_64_LITTLE
 954           Dynobj::sized_create_gnu_hash_table<64, false>(hashed_dynsyms,
 955                                                          dynsym_hashvals,
 956                                                          unhashed_dynsym_index,
 957                                                          pphash,
 958                                                          phashlen);
 959 #else
 960           gold_unreachable();
 961 #endif
 962         }
 963     }
 964   else
 965     gold_unreachable();
 966 }
 967
 968 // Create the actual data for a GNU hash table.  This is just a copy
 969 // of the code from the old GNU linker.
 970
 971 template<int size, bool big_endian>
 972 void
 973 Dynobj::sized_create_gnu_hash_table(
 974     const std::vector<Symbol*>& hashed_dynsyms,
 975     const std::vector<uint32_t>& dynsym_hashvals,
 976     unsigned int unhashed_dynsym_count,
 977     unsigned char** pphash,
 978     unsigned int* phashlen)
 979 {
 980   if (hashed_dynsyms.empty())
 981     {
 982       // Special case for the empty hash table.
 983       unsigned int hashlen = 5 * 4 + size / 8;
 984       unsigned char* phash = new unsigned char[hashlen];
 985       // One empty bucket.
 986       elfcpp::Swap<32, big_endian>::writeval(phash, 1);
 987       // Symbol index above unhashed symbols.
 988       elfcpp::Swap<32, big_endian>::writeval(phash + 4, unhashed_dynsym_count);
 989       // One word for bitmask.
 990       elfcpp::Swap<32, big_endian>::writeval(phash + 8, 1);
 991       // Only bloom filter.
 992       elfcpp::Swap<32, big_endian>::writeval(phash + 12, 0);
 993       // No valid hashes.
 994       elfcpp::Swap<size, big_endian>::writeval(phash + 16, 0);
 995       // No hashes in only bucket.
 996       elfcpp::Swap<32, big_endian>::writeval(phash + 16 + size / 8, 0);
 997
 998       *phashlen = hashlen;
 999       *pphash = phash;
1000
1001       return;
1002     }
1003
1004   const unsigned int bucketcount =
1005     Dynobj::compute_bucket_count(dynsym_hashvals, true);
1006
1007   const unsigned int nsyms = hashed_dynsyms.size();
1008
1009   uint32_t maskbitslog2 = 1;
1010   uint32_t x = nsyms >> 1;
1011   while (x != 0)
1012     {
1013       ++maskbitslog2;
1014       x >>= 1;
1015     }
1016   if (maskbitslog2 < 3)
1017     maskbitslog2 = 5;
1018   else if (((1U << (maskbitslog2 - 2)) & nsyms) != 0)
1019     maskbitslog2 += 3;
1020   else
1021     maskbitslog2 += 2;
1022
1023   uint32_t shift1;
1024   if (size == 32)
1025     shift1 = 5;
1026   else
1027     {
1028       if (maskbitslog2 == 5)
1029         maskbitslog2 = 6;
1030       shift1 = 6;
1031     }
1032   uint32_t mask = (1U << shift1) - 1U;
1033   uint32_t shift2 = maskbitslog2;
1034   uint32_t maskbits = 1U << maskbitslog2;
1035   uint32_t maskwords = 1U << (maskbitslog2 - shift1);
1036
1037   typedef typename elfcpp::Elf_types<size>::Elf_WXword Word;
1038   std::vector<Word> bitmask(maskwords);
1039   std::vector<uint32_t> counts(bucketcount);
1040   std::vector<uint32_t> indx(bucketcount);
1041   uint32_t symindx = unhashed_dynsym_count;
1042
1043   // Count the number of times each hash bucket is used.
1044   for (unsigned int i = 0; i < nsyms; ++i)
1045     ++counts[dynsym_hashvals[i] % bucketcount];
1046
1047   unsigned int cnt = symindx;
1048   for (unsigned int i = 0; i < bucketcount; ++i)
1049     {
1050       indx[i] = cnt;
1051       cnt += counts[i];
1052     }
1053
1054   unsigned int hashlen = (4 + bucketcount + nsyms) * 4;
1055   hashlen += maskbits / 8;
1056   unsigned char* phash = new unsigned char[hashlen];
1057
1058   elfcpp::Swap<32, big_endian>::writeval(phash, bucketcount);
1059   elfcpp::Swap<32, big_endian>::writeval(phash + 4, symindx);
1060   elfcpp::Swap<32, big_endian>::writeval(phash + 8, maskwords);
1061   elfcpp::Swap<32, big_endian>::writeval(phash + 12, shift2);
1062
1063   unsigned char* p = phash + 16 + maskbits / 8;
1064   for (unsigned int i = 0; i < bucketcount; ++i)
1065     {
1066       if (counts[i] == 0)
1067         elfcpp::Swap<32, big_endian>::writeval(p, 0);
1068       else
1069         elfcpp::Swap<32, big_endian>::writeval(p, indx[i]);
1070       p += 4;
1071     }
1072
1073   for (unsigned int i = 0; i < nsyms; ++i)
1074     {
1075       Symbol* sym = hashed_dynsyms[i];
1076       uint32_t hashval = dynsym_hashvals[i];
1077
1078       unsigned int bucket = hashval % bucketcount;
1079       unsigned int val = ((hashval >> shift1)
1080                           & ((maskbits >> shift1) - 1));
1081       bitmask[val] |= (static_cast<Word>(1U)) << (hashval & mask);
1082       bitmask[val] |= (static_cast<Word>(1U)) << ((hashval >> shift2) & mask);
1083       val = hashval & ~ 1U;
1084       if (counts[bucket] == 1)
1085         {
1086           // Last element terminates the chain.
1087           val |= 1;
1088         }
1089       elfcpp::Swap<32, big_endian>::writeval(p + (indx[bucket] - symindx) * 4,
1090                                              val);
1091       --counts[bucket];
1092
1093       sym->set_dynsym_index(indx[bucket]);
1094       ++indx[bucket];
1095     }
1096
1097   p = phash + 16;
1098   for (unsigned int i = 0; i < maskwords; ++i)
1099     {
1100       elfcpp::Swap<size, big_endian>::writeval(p, bitmask[i]);
1101       p += size / 8;
1102     }
1103
1104   *phashlen = hashlen;
1105   *pphash = phash;
1106 }
1107
1108 // Verdef methods.
1109
1110 // Write this definition to a buffer for the output section.
1111
1112 template<int size, bool big_endian>
1113 unsigned char*
1114 Verdef::write(const Stringpool* dynpool, bool is_last, unsigned char* pb
1115               ACCEPT_SIZE_ENDIAN) const
1116 {
1117   const int verdef_size = elfcpp::Elf_sizes<size>::verdef_size;
1118   const int verdaux_size = elfcpp::Elf_sizes<size>::verdaux_size;
1119
1120   elfcpp::Verdef_write<size, big_endian> vd(pb);
1121   vd.set_vd_version(elfcpp::VER_DEF_CURRENT);
1122   vd.set_vd_flags((this->is_base_ ? elfcpp::VER_FLG_BASE : 0)
1123                   | (this->is_weak_ ? elfcpp::VER_FLG_WEAK : 0));
1124   vd.set_vd_ndx(this->index());
1125   vd.set_vd_cnt(1 + this->deps_.size());
1126   vd.set_vd_hash(Dynobj::elf_hash(this->name()));
1127   vd.set_vd_aux(verdef_size);
1128   vd.set_vd_next(is_last
1129                  ? 0
1130                  : verdef_size + (1 + this->deps_.size()) * verdaux_size);
1131   pb += verdef_size;
1132
1133   elfcpp::Verdaux_write<size, big_endian> vda(pb);
1134   vda.set_vda_name(dynpool->get_offset(this->name()));
1135   vda.set_vda_next(this->deps_.empty() ? 0 : verdaux_size);
1136   pb += verdaux_size;
1137
1138   Deps::const_iterator p;
1139   unsigned int i;
1140   for (p = this->deps_.begin(), i = 0;
1141        p != this->deps_.end();
1142        ++p, ++i)
1143     {
1144       elfcpp::Verdaux_write<size, big_endian> vda(pb);
1145       vda.set_vda_name(dynpool->get_offset(*p));
1146       vda.set_vda_next(i + 1 >= this->deps_.size() ? 0 : verdaux_size);
1147       pb += verdaux_size;
1148     }
1149
1150   return pb;
1151 }
1152
1153 // Verneed methods.
1154
1155 Verneed::~Verneed()
1156 {
1157   for (Need_versions::iterator p = this->need_versions_.begin();
1158        p != this->need_versions_.end();
1159        ++p)
1160     delete *p;
1161 }
1162
1163 // Add a new version to this file reference.
1164
1165 Verneed_version*
1166 Verneed::add_name(const char* name)
1167 {
1168   Verneed_version* vv = new Verneed_version(name);
1169   this->need_versions_.push_back(vv);
1170   return vv;
1171 }
1172
1173 // Set the version indexes starting at INDEX.
1174
1175 unsigned int
1176 Verneed::finalize(unsigned int index)
1177 {
1178   for (Need_versions::iterator p = this->need_versions_.begin();
1179        p != this->need_versions_.end();
1180        ++p)
1181     {
1182       (*p)->set_index(index);
1183       ++index;
1184     }
1185   return index;
1186 }
1187
1188 // Write this list of referenced versions to a buffer for the output
1189 // section.
1190
1191 template<int size, bool big_endian>
1192 unsigned char*
1193 Verneed::write(const Stringpool* dynpool, bool is_last,
1194                unsigned char* pb ACCEPT_SIZE_ENDIAN) const
1195 {
1196   const int verneed_size = elfcpp::Elf_sizes<size>::verneed_size;
1197   const int vernaux_size = elfcpp::Elf_sizes<size>::vernaux_size;
1198
1199   elfcpp::Verneed_write<size, big_endian> vn(pb);
1200   vn.set_vn_version(elfcpp::VER_NEED_CURRENT);
1201   vn.set_vn_cnt(this->need_versions_.size());
1202   vn.set_vn_file(dynpool->get_offset(this->filename()));
1203   vn.set_vn_aux(verneed_size);
1204   vn.set_vn_next(is_last
1205                  ? 0
1206                  : verneed_size + this->need_versions_.size() * vernaux_size);
1207   pb += verneed_size;
1208
1209   Need_versions::const_iterator p;
1210   unsigned int i;
1211   for (p = this->need_versions_.begin(), i = 0;
1212        p != this->need_versions_.end();
1213        ++p, ++i)
1214     {
1215       elfcpp::Vernaux_write<size, big_endian> vna(pb);
1216       vna.set_vna_hash(Dynobj::elf_hash((*p)->version()));
1217       // FIXME: We need to sometimes set VER_FLG_WEAK here.
1218       vna.set_vna_flags(0);
1219       vna.set_vna_other((*p)->index());
1220       vna.set_vna_name(dynpool->get_offset((*p)->version()));
1221       vna.set_vna_next(i + 1 >= this->need_versions_.size()
1222                        ? 0
1223                        : vernaux_size);
1224       pb += vernaux_size;
1225     }
1226
1227   return pb;
1228 }
1229
1230 // Versions methods.
1231
1232 Versions::Versions(const General_options& options, Stringpool* dynpool)
1233   : defs_(), needs_(), version_table_(),
1234     is_finalized_(false), version_script_(options.version_script())
1235 {
1236   // We always need a base version, so define that first. Nothing
1237   // explicitly declares itself as part of base, so it doesn't need to
1238   // be in version_table_.
1239   // FIXME: Should use soname here when creating a shared object. Is
1240   // this fixme still valid? It looks like it's doing the right thing
1241   // to me.
1242   if (parameters->output_is_shared())
1243     {
1244       const char* name = dynpool->add(parameters->output_file_name(),
1245                                       false, NULL);
1246       Verdef* vdbase = new Verdef(name, std::vector<std::string>(),
1247                                   true, false, true);
1248       this->defs_.push_back(vdbase);
1249     }
1250
1251   if (!this->version_script_.empty())
1252     {
1253       // Parse the version script, and insert each declared version into
1254       // defs_ and version_table_.
1255       std::vector<std::string> versions = this->version_script_.get_versions();
1256       for (size_t k = 0; k < versions.size(); ++k)
1257         {
1258           Stringpool::Key version_key;
1259           const char* version = dynpool->add(versions[k].c_str(),
1260                                              true, &version_key);
1261           Verdef* const vd = new Verdef(
1262               version,
1263               options.version_script().get_dependencies(version),
1264               false, false, false);
1265           this->defs_.push_back(vd);
1266           Key key(version_key, 0);
1267           this->version_table_.insert(std::make_pair(key, vd));
1268         }
1269     }
1270 }
1271
1272 Versions::~Versions()
1273 {
1274   for (Defs::iterator p = this->defs_.begin();
1275        p != this->defs_.end();
1276        ++p)
1277     delete *p;
1278
1279   for (Needs::iterator p = this->needs_.begin();
1280        p != this->needs_.end();
1281        ++p)
1282     delete *p;
1283 }
1284
1285 // Return the dynamic object which a symbol refers to.
1286
1287 Dynobj*
1288 Versions::get_dynobj_for_sym(const Symbol_table* symtab,
1289                              const Symbol* sym) const
1290 {
1291   if (sym->is_copied_from_dynobj())
1292     return symtab->get_copy_source(sym);
1293   else
1294     {
1295       Object* object = sym->object();
1296       gold_assert(object->is_dynamic());
1297       return static_cast<Dynobj*>(object);
1298     }
1299 }
1300
1301 // Record version information for a symbol going into the dynamic
1302 // symbol table.
1303
1304 void
1305 Versions::record_version(const Symbol_table* symtab,
1306                          Stringpool* dynpool, const Symbol* sym)
1307 {
1308   gold_assert(!this->is_finalized_);
1309   gold_assert(sym->version() != NULL);
1310
1311   Stringpool::Key version_key;
1312   const char* version = dynpool->add(sym->version(), false, &version_key);
1313
1314   if (!sym->is_from_dynobj() && !sym->is_copied_from_dynobj())
1315     {
1316       if (parameters->output_is_shared())
1317         this->add_def(sym, version, version_key);
1318     }
1319   else
1320     {
1321       // This is a version reference.
1322       Dynobj* dynobj = this->get_dynobj_for_sym(symtab, sym);
1323       this->add_need(dynpool, dynobj->soname(), version, version_key);
1324     }
1325 }
1326
1327 // We've found a symbol SYM defined in version VERSION.
1328
1329 void
1330 Versions::add_def(const Symbol* sym, const char* version,
1331                   Stringpool::Key version_key)
1332 {
1333   Key k(version_key, 0);
1334   Version_base* const vbnull = NULL;
1335   std::pair<Version_table::iterator, bool> ins =
1336     this->version_table_.insert(std::make_pair(k, vbnull));
1337
1338   if (!ins.second)
1339     {
1340       // We already have an entry for this version.
1341       Version_base* vb = ins.first->second;
1342
1343       // We have now seen a symbol in this version, so it is not
1344       // weak.
1345       gold_assert(vb != NULL);
1346       vb->clear_weak();
1347     }
1348   else
1349     {
1350       // If we are creating a shared object, it is an error to
1351       // find a definition of a symbol with a version which is not
1352       // in the version script.
1353       if (parameters->output_is_shared())
1354         {
1355           gold_error(_("symbol %s has undefined version %s"),
1356                      sym->demangled_name().c_str(), version);
1357           return;
1358         }
1359
1360       // When creating a regular executable, automatically define
1361       // a new version.
1362       Verdef* vd = new Verdef(version, std::vector<std::string>(),
1363                               false, false, false);
1364       this->defs_.push_back(vd);
1365       ins.first->second = vd;
1366     }
1367 }
1368
1369 // Add a reference to version NAME in file FILENAME.
1370
1371 void
1372 Versions::add_need(Stringpool* dynpool, const char* filename, const char* name,
1373                    Stringpool::Key name_key)
1374 {
1375   Stringpool::Key filename_key;
1376   filename = dynpool->add(filename, true, &filename_key);
1377
1378   Key k(name_key, filename_key);
1379   Version_base* const vbnull = NULL;
1380   std::pair<Version_table::iterator, bool> ins =
1381     this->version_table_.insert(std::make_pair(k, vbnull));
1382
1383   if (!ins.second)
1384     {
1385       // We already have an entry for this filename/version.
1386       return;
1387     }
1388
1389   // See whether we already have this filename.  We don't expect many
1390   // version references, so we just do a linear search.  This could be
1391   // replaced by a hash table.
1392   Verneed* vn = NULL;
1393   for (Needs::iterator p = this->needs_.begin();
1394        p != this->needs_.end();
1395        ++p)
1396     {
1397       if ((*p)->filename() == filename)
1398         {
1399           vn = *p;
1400           break;
1401         }
1402     }
1403
1404   if (vn == NULL)
1405     {
1406       // We have a new filename.
1407       vn = new Verneed(filename);
1408       this->needs_.push_back(vn);
1409     }
1410
1411   ins.first->second = vn->add_name(name);
1412 }
1413
1414 // Set the version indexes.  Create a new dynamic version symbol for
1415 // each new version definition.
1416
1417 unsigned int
1418 Versions::finalize(Symbol_table* symtab, unsigned int dynsym_index,
1419                    std::vector<Symbol*>* syms)
1420 {
1421   gold_assert(!this->is_finalized_);
1422
1423   unsigned int vi = 1;
1424
1425   for (Defs::iterator p = this->defs_.begin();
1426        p != this->defs_.end();
1427        ++p)
1428     {
1429       (*p)->set_index(vi);
1430       ++vi;
1431
1432       // Create a version symbol if necessary.
1433       if (!(*p)->is_symbol_created())
1434         {
1435           Symbol* vsym = symtab->define_as_constant((*p)->name(),
1436                                                     (*p)->name(), 0, 0,
1437                                                     elfcpp::STT_OBJECT,
1438                                                     elfcpp::STB_GLOBAL,
1439                                                     elfcpp::STV_DEFAULT, 0,
1440                                                     false);
1441           vsym->set_needs_dynsym_entry();
1442           vsym->set_dynsym_index(dynsym_index);
1443           ++dynsym_index;
1444           syms->push_back(vsym);
1445           // The name is already in the dynamic pool.
1446         }
1447     }
1448
1449   // Index 1 is used for global symbols.
1450   if (vi == 1)
1451     {
1452       gold_assert(this->defs_.empty());
1453       vi = 2;
1454     }
1455
1456   for (Needs::iterator p = this->needs_.begin();
1457        p != this->needs_.end();
1458        ++p)
1459     vi = (*p)->finalize(vi);
1460
1461   this->is_finalized_ = true;
1462
1463   return dynsym_index;
1464 }
1465
1466 // Return the version index to use for a symbol.  This does two hash
1467 // table lookups: one in DYNPOOL and one in this->version_table_.
1468 // Another approach alternative would be store a pointer in SYM, which
1469 // would increase the size of the symbol table.  Or perhaps we could
1470 // use a hash table from dynamic symbol pointer values to Version_base
1471 // pointers.
1472
1473 unsigned int
1474 Versions::version_index(const Symbol_table* symtab, const Stringpool* dynpool,
1475                         const Symbol* sym) const
1476 {
1477   Stringpool::Key version_key;
1478   const char* version = dynpool->find(sym->version(), &version_key);
1479   gold_assert(version != NULL);
1480
1481   Key k;
1482   if (!sym->is_from_dynobj() && !sym->is_copied_from_dynobj())
1483     {
1484       if (!parameters->output_is_shared())
1485         return elfcpp::VER_NDX_GLOBAL;
1486       k = Key(version_key, 0);
1487     }
1488   else
1489     {
1490       Dynobj* dynobj = this->get_dynobj_for_sym(symtab, sym);
1491
1492       Stringpool::Key filename_key;
1493       const char* filename = dynpool->find(dynobj->soname(), &filename_key);
1494       gold_assert(filename != NULL);
1495
1496       k = Key(version_key, filename_key);
1497     }
1498
1499   Version_table::const_iterator p = this->version_table_.find(k);
1500   gold_assert(p != this->version_table_.end());
1501
1502   return p->second->index();
1503 }
1504
1505 // Return an allocated buffer holding the contents of the symbol
1506 // version section.
1507
1508 template<int size, bool big_endian>
1509 void
1510 Versions::symbol_section_contents(const Symbol_table* symtab,
1511                                   const Stringpool* dynpool,
1512                                   unsigned int local_symcount,
1513                                   const std::vector<Symbol*>& syms,
1514                                   unsigned char** pp,
1515                                   unsigned int* psize
1516                                   ACCEPT_SIZE_ENDIAN) const
1517 {
1518   gold_assert(this->is_finalized_);
1519
1520   unsigned int sz = (local_symcount + syms.size()) * 2;
1521   unsigned char* pbuf = new unsigned char[sz];
1522
1523   for (unsigned int i = 0; i < local_symcount; ++i)
1524     elfcpp::Swap<16, big_endian>::writeval(pbuf + i * 2,
1525                                            elfcpp::VER_NDX_LOCAL);
1526
1527   for (std::vector<Symbol*>::const_iterator p = syms.begin();
1528        p != syms.end();
1529        ++p)
1530     {
1531       unsigned int version_index;
1532       const char* version = (*p)->version();
1533       if (version == NULL)
1534         version_index = elfcpp::VER_NDX_GLOBAL;
1535       else
1536         version_index = this->version_index(symtab, dynpool, *p);
1537       // If the symbol was defined as foo@V1 instead of foo@@V1, add
1538       // the hidden bit.
1539       if ((*p)->version() != NULL && !(*p)->is_default())
1540         version_index |= elfcpp::VERSYM_HIDDEN;
1541       elfcpp::Swap<16, big_endian>::writeval(pbuf + (*p)->dynsym_index() * 2,
1542                                              version_index);
1543     }
1544
1545   *pp = pbuf;
1546   *psize = sz;
1547 }
1548
1549 // Return an allocated buffer holding the contents of the version
1550 // definition section.
1551
1552 template<int size, bool big_endian>
1553 void
1554 Versions::def_section_contents(const Stringpool* dynpool,
1555                                unsigned char** pp, unsigned int* psize,
1556                                unsigned int* pentries
1557                                ACCEPT_SIZE_ENDIAN) const
1558 {
1559   gold_assert(this->is_finalized_);
1560   gold_assert(!this->defs_.empty());
1561
1562   const int verdef_size = elfcpp::Elf_sizes<size>::verdef_size;
1563   const int verdaux_size = elfcpp::Elf_sizes<size>::verdaux_size;
1564
1565   unsigned int sz = 0;
1566   for (Defs::const_iterator p = this->defs_.begin();
1567        p != this->defs_.end();
1568        ++p)
1569     {
1570       sz += verdef_size + verdaux_size;
1571       sz += (*p)->count_dependencies() * verdaux_size;
1572     }
1573
1574   unsigned char* pbuf = new unsigned char[sz];
1575
1576   unsigned char* pb = pbuf;
1577   Defs::const_iterator p;
1578   unsigned int i;
1579   for (p = this->defs_.begin(), i = 0;
1580        p != this->defs_.end();
1581        ++p, ++i)
1582     pb = (*p)->write SELECT_SIZE_ENDIAN_NAME(size, big_endian)(
1583             dynpool, i + 1 >= this->defs_.size(), pb
1584             SELECT_SIZE_ENDIAN(size, big_endian));
1585
1586   gold_assert(static_cast<unsigned int>(pb - pbuf) == sz);
1587
1588   *pp = pbuf;
1589   *psize = sz;
1590   *pentries = this->defs_.size();
1591 }
1592
1593 // Return an allocated buffer holding the contents of the version
1594 // reference section.
1595
1596 template<int size, bool big_endian>
1597 void
1598 Versions::need_section_contents(const Stringpool* dynpool,
1599                                 unsigned char** pp, unsigned int *psize,
1600                                 unsigned int *pentries
1601                                 ACCEPT_SIZE_ENDIAN) const
1602 {
1603   gold_assert(this->is_finalized_);
1604   gold_assert(!this->needs_.empty());
1605
1606   const int verneed_size = elfcpp::Elf_sizes<size>::verneed_size;
1607   const int vernaux_size = elfcpp::Elf_sizes<size>::vernaux_size;
1608
1609   unsigned int sz = 0;
1610   for (Needs::const_iterator p = this->needs_.begin();
1611        p != this->needs_.end();
1612        ++p)
1613     {
1614       sz += verneed_size;
1615       sz += (*p)->count_versions() * vernaux_size;
1616     }
1617
1618   unsigned char* pbuf = new unsigned char[sz];
1619
1620   unsigned char* pb = pbuf;
1621   Needs::const_iterator p;
1622   unsigned int i;
1623   for (p = this->needs_.begin(), i = 0;
1624        p != this->needs_.end();
1625        ++p, ++i)
1626     pb = (*p)->write SELECT_SIZE_ENDIAN_NAME(size, big_endian)(
1627             dynpool, i + 1 >= this->needs_.size(), pb
1628             SELECT_SIZE_ENDIAN(size, big_endian));
1629
1630   gold_assert(static_cast<unsigned int>(pb - pbuf) == sz);
1631
1632   *pp = pbuf;
1633   *psize = sz;
1634   *pentries = this->needs_.size();
1635 }
1636
1637 // Instantiate the templates we need.  We could use the configure
1638 // script to restrict this to only the ones for implemented targets.
1639
1640 #ifdef HAVE_TARGET_32_LITTLE
1641 template
1642 class Sized_dynobj<32, false>;
1643 #endif
1644
1645 #ifdef HAVE_TARGET_32_BIG
1646 template
1647 class Sized_dynobj<32, true>;
1648 #endif
1649
1650 #ifdef HAVE_TARGET_64_LITTLE
1651 template
1652 class Sized_dynobj<64, false>;
1653 #endif
1654
1655 #ifdef HAVE_TARGET_64_BIG
1656 template
1657 class Sized_dynobj<64, true>;
1658 #endif
1659
1660 #ifdef HAVE_TARGET_32_LITTLE
1661 template
1662 void
1663 Versions::symbol_section_contents<32, false>(
1664     const Symbol_table*,
1665     const Stringpool*,
1666     unsigned int,
1667     const std::vector<Symbol*>&,
1668     unsigned char**,
1669     unsigned int*
1670     ACCEPT_SIZE_ENDIAN_EXPLICIT(32, false)) const;
1671 #endif
1672
1673 #ifdef HAVE_TARGET_32_BIG
1674 template
1675 void
1676 Versions::symbol_section_contents<32, true>(
1677     const Symbol_table*,
1678     const Stringpool*,
1679     unsigned int,
1680     const std::vector<Symbol*>&,
1681     unsigned char**,
1682     unsigned int*
1683     ACCEPT_SIZE_ENDIAN_EXPLICIT(32, true)) const;
1684 #endif
1685
1686 #ifdef HAVE_TARGET_64_LITTLE
1687 template
1688 void
1689 Versions::symbol_section_contents<64, false>(
1690     const Symbol_table*,
1691     const Stringpool*,
1692     unsigned int,
1693     const std::vector<Symbol*>&,
1694     unsigned char**,
1695     unsigned int*
1696     ACCEPT_SIZE_ENDIAN_EXPLICIT(64, false)) const;
1697 #endif
1698
1699 #ifdef HAVE_TARGET_64_BIG
1700 template
1701 void
1702 Versions::symbol_section_contents<64, true>(
1703     const Symbol_table*,
1704     const Stringpool*,
1705     unsigned int,
1706     const std::vector<Symbol*>&,
1707     unsigned char**,
1708     unsigned int*
1709     ACCEPT_SIZE_ENDIAN_EXPLICIT(64, true)) const;
1710 #endif
1711
1712 #ifdef HAVE_TARGET_32_LITTLE
1713 template
1714 void
1715 Versions::def_section_contents<32, false>(
1716     const Stringpool*,
1717     unsigned char**,
1718     unsigned int*,
1719     unsigned int*
1720     ACCEPT_SIZE_ENDIAN_EXPLICIT(32, false)) const;
1721 #endif
1722
1723 #ifdef HAVE_TARGET_32_BIG
1724 template
1725 void
1726 Versions::def_section_contents<32, true>(
1727     const Stringpool*,
1728     unsigned char**,
1729     unsigned int*,
1730     unsigned int*
1731     ACCEPT_SIZE_ENDIAN_EXPLICIT(32, true)) const;
1732 #endif
1733
1734 #ifdef HAVE_TARGET_64_LITTLE
1735 template
1736 void
1737 Versions::def_section_contents<64, false>(
1738     const Stringpool*,
1739     unsigned char**,
1740     unsigned int*,
1741     unsigned int*
1742     ACCEPT_SIZE_ENDIAN_EXPLICIT(64, false)) const;
1743 #endif
1744
1745 #ifdef HAVE_TARGET_64_BIG
1746 template
1747 void
1748 Versions::def_section_contents<64, true>(
1749     const Stringpool*,
1750     unsigned char**,
1751     unsigned int*,
1752     unsigned int*
1753     ACCEPT_SIZE_ENDIAN_EXPLICIT(64, true)) const;
1754 #endif
1755
1756 #ifdef HAVE_TARGET_32_LITTLE
1757 template
1758 void
1759 Versions::need_section_contents<32, false>(
1760     const Stringpool*,
1761     unsigned char**,
1762     unsigned int*,
1763     unsigned int*
1764     ACCEPT_SIZE_ENDIAN_EXPLICIT(32, false)) const;
1765 #endif
1766
1767 #ifdef HAVE_TARGET_32_BIG
1768 template
1769 void
1770 Versions::need_section_contents<32, true>(
1771     const Stringpool*,
1772     unsigned char**,
1773     unsigned int*,
1774     unsigned int*
1775     ACCEPT_SIZE_ENDIAN_EXPLICIT(32, true)) const;
1776 #endif
1777
1778 #ifdef HAVE_TARGET_64_LITTLE
1779 template
1780 void
1781 Versions::need_section_contents<64, false>(
1782     const Stringpool*,
1783     unsigned char**,
1784     unsigned int*,
1785     unsigned int*
1786     ACCEPT_SIZE_ENDIAN_EXPLICIT(64, false)) const;
1787 #endif
1788
1789 #ifdef HAVE_TARGET_64_BIG
1790 template
1791 void
1792 Versions::need_section_contents<64, true>(
1793     const Stringpool*,
1794     unsigned char**,
1795     unsigned int*,
1796     unsigned int*
1797     ACCEPT_SIZE_ENDIAN_EXPLICIT(64, true)) const;
1798 #endif
1799
1800 } // End namespace gold.