mirror of
https://github.com/autc04/Retro68.git
synced 2024-09-10 03:54:48 +00:00
2225 lines
63 KiB
C++
2225 lines
63 KiB
C++
|
// dwp.cc -- DWARF packaging utility
|
||
|
|
||
|
// Copyright 2012 Free Software Foundation, Inc.
|
||
|
// Written by Cary Coutant <ccoutant@google.com>.
|
||
|
|
||
|
// This file is part of dwp, the DWARF packaging utility.
|
||
|
|
||
|
// This program is free software; you can redistribute it and/or modify
|
||
|
// it under the terms of the GNU General Public License as published by
|
||
|
// the Free Software Foundation; either version 3 of the License, or
|
||
|
// (at your option) any later version.
|
||
|
|
||
|
// This program is distributed in the hope that it will be useful,
|
||
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
// GNU General Public License for more details.
|
||
|
|
||
|
// You should have received a copy of the GNU General Public License
|
||
|
// along with this program; if not, write to the Free Software
|
||
|
// Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
|
||
|
// MA 02110-1301, USA.
|
||
|
|
||
|
#include "dwp.h"
|
||
|
|
||
|
#include <cstdarg>
|
||
|
#include <cstddef>
|
||
|
#include <cstdio>
|
||
|
#include <cstdlib>
|
||
|
#include <cstring>
|
||
|
#include <cerrno>
|
||
|
|
||
|
#include <vector>
|
||
|
#include <algorithm>
|
||
|
|
||
|
#include "getopt.h"
|
||
|
#include "libiberty.h"
|
||
|
#include "../bfd/bfdver.h"
|
||
|
|
||
|
#include "elfcpp.h"
|
||
|
#include "elfcpp_file.h"
|
||
|
#include "dirsearch.h"
|
||
|
#include "fileread.h"
|
||
|
#include "object.h"
|
||
|
#include "compressed_output.h"
|
||
|
#include "stringpool.h"
|
||
|
#include "dwarf_reader.h"
|
||
|
|
||
|
static void
|
||
|
usage(FILE* fd, int) ATTRIBUTE_NORETURN;
|
||
|
|
||
|
static void
|
||
|
print_version() ATTRIBUTE_NORETURN;
|
||
|
|
||
|
namespace gold {
|
||
|
|
||
|
class Dwp_output_file;
|
||
|
|
||
|
template <int size, bool big_endian>
|
||
|
class Sized_relobj_dwo;
|
||
|
|
||
|
// List of .dwo files to process.
|
||
|
typedef std::vector<std::string> File_list;
|
||
|
|
||
|
// An input file.
|
||
|
// This class may represent a .dwo file, a .dwp file
|
||
|
// produced by an earlier run, or an executable file whose
|
||
|
// debug section identifies a set of .dwo files to read.
|
||
|
|
||
|
class Dwo_file
|
||
|
{
|
||
|
public:
|
||
|
Dwo_file(const char* name)
|
||
|
: name_(name), obj_(NULL), input_file_(NULL), is_compressed_(),
|
||
|
str_offset_map_()
|
||
|
{ }
|
||
|
|
||
|
~Dwo_file();
|
||
|
|
||
|
// Read the input executable file and extract the list of .dwo files
|
||
|
// that it references.
|
||
|
void
|
||
|
read_executable(File_list* files);
|
||
|
|
||
|
// Read the input file and send its contents to OUTPUT_FILE.
|
||
|
void
|
||
|
read(Dwp_output_file* output_file);
|
||
|
|
||
|
private:
|
||
|
// Types for mapping input string offsets to output string offsets.
|
||
|
typedef std::pair<section_offset_type, section_offset_type>
|
||
|
Str_offset_map_entry;
|
||
|
typedef std::vector<Str_offset_map_entry> Str_offset_map;
|
||
|
|
||
|
// A less-than comparison routine for Str_offset_map.
|
||
|
struct Offset_compare
|
||
|
{
|
||
|
bool
|
||
|
operator()(const Str_offset_map_entry& i1,
|
||
|
const Str_offset_map_entry& i2) const
|
||
|
{ return i1.first < i2.first; }
|
||
|
};
|
||
|
|
||
|
// Create a Sized_relobj_dwo of the given size and endianness,
|
||
|
// and record the target info. P is a pointer to the ELF header
|
||
|
// in memory.
|
||
|
Relobj*
|
||
|
make_object(Dwp_output_file* output_file);
|
||
|
|
||
|
template <int size, bool big_endian>
|
||
|
Relobj*
|
||
|
sized_make_object(const unsigned char* p, Input_file* input_file,
|
||
|
Dwp_output_file* output_file);
|
||
|
|
||
|
// Return the number of sections in the input object file.
|
||
|
unsigned int
|
||
|
shnum() const
|
||
|
{ return this->obj_->shnum(); }
|
||
|
|
||
|
// Return section type.
|
||
|
unsigned int
|
||
|
section_type(unsigned int shndx)
|
||
|
{ return this->obj_->section_type(shndx); }
|
||
|
|
||
|
// Get the name of a section.
|
||
|
std::string
|
||
|
section_name(unsigned int shndx)
|
||
|
{ return this->obj_->section_name(shndx); }
|
||
|
|
||
|
// Return a view of the contents of a section, decompressed if necessary.
|
||
|
// Set *PLEN to the size. Set *IS_NEW to true if the contents need to be
|
||
|
// deleted by the caller.
|
||
|
const unsigned char*
|
||
|
section_contents(unsigned int shndx, section_size_type* plen, bool* is_new)
|
||
|
{ return this->obj_->decompressed_section_contents(shndx, plen, is_new); }
|
||
|
|
||
|
// Read the .debug_cu_index section of a .dwp file,
|
||
|
// and process the CU sets.
|
||
|
void
|
||
|
read_compunit_index(unsigned int, Dwp_output_file*);
|
||
|
|
||
|
template <bool big_endian>
|
||
|
void
|
||
|
sized_read_compunit_index(unsigned int, Dwp_output_file*);
|
||
|
|
||
|
// Read the .debug_tu_index section of a .dwp file,
|
||
|
// and process the TU sets.
|
||
|
void
|
||
|
read_typeunit_index(unsigned int, Dwp_output_file*);
|
||
|
|
||
|
template <bool big_endian>
|
||
|
void
|
||
|
sized_read_typeunit_index(unsigned int, Dwp_output_file*);
|
||
|
|
||
|
// Merge the input string table section into the output file.
|
||
|
void
|
||
|
add_strings(Dwp_output_file*, unsigned int);
|
||
|
|
||
|
// Copy a section from the input file to the output file.
|
||
|
unsigned int
|
||
|
copy_section(Dwp_output_file* output_file, unsigned int shndx,
|
||
|
const char* section_name, bool is_str_offsets);
|
||
|
|
||
|
// Remap the string offsets in the .debug_str_offsets.dwo section.
|
||
|
const unsigned char*
|
||
|
remap_str_offsets(const unsigned char* contents, section_size_type len);
|
||
|
|
||
|
template <bool big_endian>
|
||
|
const unsigned char*
|
||
|
sized_remap_str_offsets(const unsigned char* contents, section_size_type len);
|
||
|
|
||
|
// Remap a single string offsets from an offset in the input string table
|
||
|
// to an offset in the output string table.
|
||
|
unsigned int
|
||
|
remap_str_offset(section_offset_type val);
|
||
|
|
||
|
// Add a set of .debug_info and related sections to OUTPUT_FILE.
|
||
|
void
|
||
|
add_cu_set(Dwp_output_file* output_file,
|
||
|
uint64_t dwo_id,
|
||
|
unsigned int debug_info,
|
||
|
unsigned int debug_abbrev,
|
||
|
unsigned int debug_line,
|
||
|
unsigned int debug_loc,
|
||
|
unsigned int debug_str_offsets,
|
||
|
unsigned int debug_macinfo,
|
||
|
unsigned int debug_macro);
|
||
|
|
||
|
// Add a set of .debug_types and related sections to OUTPUT_FILE.
|
||
|
void
|
||
|
add_tu_set(Dwp_output_file* output_file,
|
||
|
uint64_t type_sig,
|
||
|
unsigned int debug_types,
|
||
|
unsigned int debug_abbrev,
|
||
|
unsigned int debug_line,
|
||
|
unsigned int debug_str_offsets);
|
||
|
|
||
|
// The filename.
|
||
|
const char* name_;
|
||
|
// The ELF file, represented as a gold Relobj instance.
|
||
|
Relobj* obj_;
|
||
|
// The Input_file object.
|
||
|
Input_file* input_file_;
|
||
|
// Flags indicating which sections are compressed.
|
||
|
std::vector<bool> is_compressed_;
|
||
|
// Map input section index onto output section index.
|
||
|
std::vector<unsigned int> shndx_map_;
|
||
|
// Map input string offsets to output string offsets.
|
||
|
Str_offset_map str_offset_map_;
|
||
|
};
|
||
|
|
||
|
// An ELF input file.
|
||
|
// We derive from Sized_relobj so that we can use interfaces
|
||
|
// in libgold to access the file.
|
||
|
|
||
|
template <int size, bool big_endian>
|
||
|
class Sized_relobj_dwo : public Sized_relobj<size, big_endian>
|
||
|
{
|
||
|
public:
|
||
|
typedef typename elfcpp::Elf_types<size>::Elf_Addr Address;
|
||
|
typedef typename Sized_relobj<size, big_endian>::Symbols Symbols;
|
||
|
|
||
|
Sized_relobj_dwo(const char* name, Input_file* input_file,
|
||
|
const elfcpp::Ehdr<size, big_endian>& ehdr)
|
||
|
: Sized_relobj<size, big_endian>(name, input_file),
|
||
|
elf_file_(this, ehdr)
|
||
|
{ }
|
||
|
|
||
|
~Sized_relobj_dwo()
|
||
|
{ }
|
||
|
|
||
|
// Setup the section information.
|
||
|
void
|
||
|
setup();
|
||
|
|
||
|
protected:
|
||
|
// Return section type.
|
||
|
unsigned int
|
||
|
do_section_type(unsigned int shndx)
|
||
|
{ return this->elf_file_.section_type(shndx); }
|
||
|
|
||
|
// Get the name of a section.
|
||
|
std::string
|
||
|
do_section_name(unsigned int shndx)
|
||
|
{ return this->elf_file_.section_name(shndx); }
|
||
|
|
||
|
// Get the size of a section.
|
||
|
uint64_t
|
||
|
do_section_size(unsigned int shndx)
|
||
|
{ return this->elf_file_.section_size(shndx); }
|
||
|
|
||
|
// Return a view of the contents of a section.
|
||
|
const unsigned char*
|
||
|
do_section_contents(unsigned int, section_size_type*, bool);
|
||
|
|
||
|
// Return a view of the uncompressed contents of a section. Set *PLEN
|
||
|
// to the size. Set *IS_NEW to true if the contents need to be deleted
|
||
|
// by the caller.
|
||
|
const unsigned char*
|
||
|
do_decompressed_section_contents(unsigned int shndx,
|
||
|
section_size_type* plen,
|
||
|
bool* is_new);
|
||
|
|
||
|
// The following virtual functions are abstract in the base classes,
|
||
|
// but are not used here.
|
||
|
|
||
|
// Read the symbols.
|
||
|
void
|
||
|
do_read_symbols(Read_symbols_data*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Lay out the input sections.
|
||
|
void
|
||
|
do_layout(Symbol_table*, Layout*, Read_symbols_data*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Layout sections whose layout was deferred while waiting for
|
||
|
// input files from a plugin.
|
||
|
void
|
||
|
do_layout_deferred_sections(Layout*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Add the symbols to the symbol table.
|
||
|
void
|
||
|
do_add_symbols(Symbol_table*, Read_symbols_data*, Layout*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
Archive::Should_include
|
||
|
do_should_include_member(Symbol_table*, Layout*, Read_symbols_data*,
|
||
|
std::string*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Iterate over global symbols, calling a visitor class V for each.
|
||
|
void
|
||
|
do_for_all_global_symbols(Read_symbols_data*,
|
||
|
Library_base::Symbol_visitor_base*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return section flags.
|
||
|
uint64_t
|
||
|
do_section_flags(unsigned int)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return section entsize.
|
||
|
uint64_t
|
||
|
do_section_entsize(unsigned int)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return section address.
|
||
|
uint64_t
|
||
|
do_section_address(unsigned int)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return the section link field.
|
||
|
unsigned int
|
||
|
do_section_link(unsigned int)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return the section link field.
|
||
|
unsigned int
|
||
|
do_section_info(unsigned int)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return the section alignment.
|
||
|
uint64_t
|
||
|
do_section_addralign(unsigned int)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return the Xindex structure to use.
|
||
|
Xindex*
|
||
|
do_initialize_xindex()
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Get symbol counts.
|
||
|
void
|
||
|
do_get_global_symbol_counts(const Symbol_table*, size_t*, size_t*) const
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Get global symbols.
|
||
|
const Symbols*
|
||
|
do_get_global_symbols() const
|
||
|
{ return NULL; }
|
||
|
|
||
|
// Return the value of a local symbol.
|
||
|
uint64_t
|
||
|
do_local_symbol_value(unsigned int, uint64_t) const
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
unsigned int
|
||
|
do_local_plt_offset(unsigned int) const
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return whether local symbol SYMNDX is a TLS symbol.
|
||
|
bool
|
||
|
do_local_is_tls(unsigned int) const
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return the number of local symbols.
|
||
|
unsigned int
|
||
|
do_local_symbol_count() const
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return the number of local symbols in the output symbol table.
|
||
|
unsigned int
|
||
|
do_output_local_symbol_count() const
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Return the file offset for local symbols in the output symbol table.
|
||
|
off_t
|
||
|
do_local_symbol_offset() const
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Read the relocs.
|
||
|
void
|
||
|
do_read_relocs(Read_relocs_data*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Process the relocs to find list of referenced sections. Used only
|
||
|
// during garbage collection.
|
||
|
void
|
||
|
do_gc_process_relocs(Symbol_table*, Layout*, Read_relocs_data*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Scan the relocs and adjust the symbol table.
|
||
|
void
|
||
|
do_scan_relocs(Symbol_table*, Layout*, Read_relocs_data*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Count the local symbols.
|
||
|
void
|
||
|
do_count_local_symbols(Stringpool_template<char>*,
|
||
|
Stringpool_template<char>*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Finalize the local symbols.
|
||
|
unsigned int
|
||
|
do_finalize_local_symbols(unsigned int, off_t, Symbol_table*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Set the offset where local dynamic symbol information will be stored.
|
||
|
unsigned int
|
||
|
do_set_local_dynsym_indexes(unsigned int)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Set the offset where local dynamic symbol information will be stored.
|
||
|
unsigned int
|
||
|
do_set_local_dynsym_offset(off_t)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
// Relocate the input sections and write out the local symbols.
|
||
|
void
|
||
|
do_relocate(const Symbol_table*, const Layout*, Output_file*)
|
||
|
{ gold_unreachable(); }
|
||
|
|
||
|
private:
|
||
|
// General access to the ELF file.
|
||
|
elfcpp::Elf_file<size, big_endian, Object> elf_file_;
|
||
|
};
|
||
|
|
||
|
// The output file.
|
||
|
// This class is responsible for collecting the debug index information
|
||
|
// and writing the .dwp file in ELF format.
|
||
|
|
||
|
class Dwp_output_file
|
||
|
{
|
||
|
public:
|
||
|
Dwp_output_file(const char* name)
|
||
|
: name_(name), machine_(0), size_(0), big_endian_(false), osabi_(0),
|
||
|
abiversion_(0), fd_(NULL), next_file_offset_(0), shnum_(1), sections_(),
|
||
|
shoff_(0), shstrndx_(0), have_strings_(false), stringpool_(),
|
||
|
shstrtab_(), cu_index_(), tu_index_(), last_type_sig_(0),
|
||
|
last_tu_slot_(0)
|
||
|
{
|
||
|
this->stringpool_.set_no_zero_null();
|
||
|
}
|
||
|
|
||
|
// Record the target info from an input file.
|
||
|
void
|
||
|
record_target_info(const char* name, int machine, int size, bool big_endian,
|
||
|
int osabi, int abiversion);
|
||
|
|
||
|
// Add a string to the debug strings section.
|
||
|
section_offset_type
|
||
|
add_string(const char* str, size_t len);
|
||
|
|
||
|
// Add a section to the output file, and return the new section index.
|
||
|
unsigned int
|
||
|
add_section(const char* section_name, const unsigned char* contents,
|
||
|
section_size_type len, int align);
|
||
|
|
||
|
// Add a set of .debug_info and related sections to the output file.
|
||
|
void
|
||
|
add_cu_set(uint64_t dwo_id, unsigned int debug_info,
|
||
|
unsigned int debug_abbrev, unsigned int debug_line,
|
||
|
unsigned int debug_loc, unsigned int debug_str_offsets,
|
||
|
unsigned int debug_macinfo, unsigned int debug_macro);
|
||
|
|
||
|
// Lookup a type signature and return TRUE if we have already seen it.
|
||
|
bool
|
||
|
lookup_tu(uint64_t type_sig);
|
||
|
|
||
|
// Add a set of .debug_types and related sections to the output file.
|
||
|
void
|
||
|
add_tu_set(uint64_t type_sig, unsigned int debug_types,
|
||
|
unsigned int debug_abbrev, unsigned int debug_line,
|
||
|
unsigned int debug_str_offsets);
|
||
|
|
||
|
// Finalize the file, write the string tables and index sections,
|
||
|
// and close the file.
|
||
|
void
|
||
|
finalize();
|
||
|
|
||
|
private:
|
||
|
// Sections in the output file.
|
||
|
struct Section
|
||
|
{
|
||
|
const char* name;
|
||
|
off_t offset;
|
||
|
section_size_type size;
|
||
|
int align;
|
||
|
};
|
||
|
|
||
|
// A set of sections for a compilation unit or type unit.
|
||
|
struct Cu_or_tu_set
|
||
|
{
|
||
|
uint64_t signature;
|
||
|
unsigned int debug_info_or_types;
|
||
|
unsigned int debug_abbrev;
|
||
|
unsigned int debug_line;
|
||
|
unsigned int debug_loc;
|
||
|
unsigned int debug_str_offsets;
|
||
|
unsigned int debug_macinfo;
|
||
|
unsigned int debug_macro;
|
||
|
};
|
||
|
|
||
|
// The index sections defined by the DWARF Package File Format spec.
|
||
|
class Dwp_index
|
||
|
{
|
||
|
public:
|
||
|
// Vector for the section index pool.
|
||
|
typedef std::vector<unsigned int> Shndx_pool;
|
||
|
|
||
|
Dwp_index()
|
||
|
: capacity_(0), used_(0), hash_table_(NULL), shndx_pool_()
|
||
|
{ }
|
||
|
|
||
|
~Dwp_index()
|
||
|
{ }
|
||
|
|
||
|
// Find a slot in the hash table for SIGNATURE. Return TRUE
|
||
|
// if the entry already exists.
|
||
|
bool
|
||
|
find_or_add(uint64_t signature, unsigned int* slotp);
|
||
|
|
||
|
// Enter a CU or TU set at the given SLOT in the hash table.
|
||
|
void
|
||
|
enter_set(unsigned int slot, const Cu_or_tu_set& set);
|
||
|
|
||
|
// Return the contents of the given SLOT in the hash table of signatures.
|
||
|
uint64_t
|
||
|
hash_table(unsigned int slot) const
|
||
|
{ return this->hash_table_[slot]; }
|
||
|
|
||
|
// Return the contents of the given SLOT in the parallel table of
|
||
|
// shndx pool indexes.
|
||
|
uint32_t
|
||
|
index_table(unsigned int slot) const
|
||
|
{ return this->index_table_[slot]; }
|
||
|
|
||
|
// Return the total number of slots in the hash table.
|
||
|
unsigned int
|
||
|
hash_table_total_slots() const
|
||
|
{ return this->capacity_; }
|
||
|
|
||
|
// Return the number of used slots in the hash table.
|
||
|
unsigned int
|
||
|
hash_table_used_slots() const
|
||
|
{ return this->used_; }
|
||
|
|
||
|
// Return an iterator into the shndx pool.
|
||
|
Shndx_pool::const_iterator
|
||
|
shndx_pool() const
|
||
|
{ return this->shndx_pool_.begin(); }
|
||
|
|
||
|
Shndx_pool::const_iterator
|
||
|
shndx_pool_end() const
|
||
|
{ return this->shndx_pool_.end(); }
|
||
|
|
||
|
// Return the number of entries in the shndx pool.
|
||
|
unsigned int
|
||
|
shndx_pool_size() const
|
||
|
{ return this->shndx_pool_.size(); }
|
||
|
|
||
|
private:
|
||
|
// Initialize the hash table.
|
||
|
void
|
||
|
initialize();
|
||
|
|
||
|
// Grow the hash table when we reach 2/3 capacity.
|
||
|
void
|
||
|
grow();
|
||
|
|
||
|
// The number of slots in the table, a power of 2 such that
|
||
|
// capacity > 3 * size / 2.
|
||
|
unsigned int capacity_;
|
||
|
// The current number of used slots in the hash table.
|
||
|
unsigned int used_;
|
||
|
// The storage for the hash table of signatures.
|
||
|
uint64_t* hash_table_;
|
||
|
// The storage for the parallel table of shndx pool indexes.
|
||
|
uint32_t* index_table_;
|
||
|
// The pool of section indexes.
|
||
|
Shndx_pool shndx_pool_;
|
||
|
}; // End class Dwp_output_file::Dwp_index.
|
||
|
|
||
|
// Initialize the output file.
|
||
|
void
|
||
|
initialize();
|
||
|
|
||
|
// Write the ELF header.
|
||
|
void
|
||
|
write_ehdr();
|
||
|
|
||
|
template<unsigned int size, bool big_endian>
|
||
|
void
|
||
|
sized_write_ehdr();
|
||
|
|
||
|
// Write a section header.
|
||
|
void
|
||
|
write_shdr(const char* name, unsigned int type, unsigned int flags,
|
||
|
uint64_t addr, off_t offset, section_size_type sect_size,
|
||
|
unsigned int link, unsigned int info,
|
||
|
unsigned int align, unsigned int ent_size);
|
||
|
|
||
|
template<unsigned int size, bool big_endian>
|
||
|
void
|
||
|
sized_write_shdr(const char* name, unsigned int type, unsigned int flags,
|
||
|
uint64_t addr, off_t offset, section_size_type sect_size,
|
||
|
unsigned int link, unsigned int info,
|
||
|
unsigned int align, unsigned int ent_size);
|
||
|
|
||
|
// Write a CU or TU index section.
|
||
|
template<bool big_endian>
|
||
|
void
|
||
|
write_index(const char* sect_name, const Dwp_index& index);
|
||
|
|
||
|
// The output filename.
|
||
|
const char* name_;
|
||
|
// ELF header parameters.
|
||
|
int machine_;
|
||
|
int size_;
|
||
|
int big_endian_;
|
||
|
int osabi_;
|
||
|
int abiversion_;
|
||
|
// The output file descriptor.
|
||
|
FILE* fd_;
|
||
|
// Next available file offset.
|
||
|
off_t next_file_offset_;
|
||
|
// The number of sections.
|
||
|
unsigned int shnum_;
|
||
|
// Section table. The first entry is shndx 1.
|
||
|
std::vector<Section> sections_;
|
||
|
// File offset of the section header table.
|
||
|
off_t shoff_;
|
||
|
// Section index of the section string table.
|
||
|
unsigned int shstrndx_;
|
||
|
// TRUE if we have added any strings to the string pool.
|
||
|
bool have_strings_;
|
||
|
// String pool for the output .debug_str.dwo section.
|
||
|
Stringpool stringpool_;
|
||
|
// String pool for the .shstrtab section.
|
||
|
Stringpool shstrtab_;
|
||
|
// The compilation unit index.
|
||
|
Dwp_index cu_index_;
|
||
|
// The type unit index.
|
||
|
Dwp_index tu_index_;
|
||
|
// Cache of the last type signature looked up.
|
||
|
uint64_t last_type_sig_;
|
||
|
// Cache of the slot index for the last type signature.
|
||
|
unsigned int last_tu_slot_;
|
||
|
};
|
||
|
|
||
|
// A specialization of Dwarf_info_reader, for reading dwo_names from
|
||
|
// DWARF CUs.
|
||
|
|
||
|
class Dwo_name_info_reader : public Dwarf_info_reader
|
||
|
{
|
||
|
public:
|
||
|
Dwo_name_info_reader(Relobj* object, unsigned int shndx)
|
||
|
: Dwarf_info_reader(false, object, NULL, 0, shndx, 0, 0),
|
||
|
files_(NULL)
|
||
|
{ }
|
||
|
|
||
|
~Dwo_name_info_reader()
|
||
|
{ }
|
||
|
|
||
|
// Get the dwo_names from the DWARF compilation unit DIEs.
|
||
|
void
|
||
|
get_dwo_names(File_list* files)
|
||
|
{
|
||
|
this->files_ = files;
|
||
|
this->parse();
|
||
|
}
|
||
|
|
||
|
protected:
|
||
|
// Visit a compilation unit.
|
||
|
virtual void
|
||
|
visit_compilation_unit(off_t cu_offset, off_t cu_length, Dwarf_die*);
|
||
|
|
||
|
private:
|
||
|
// The list of files to populate.
|
||
|
File_list* files_;
|
||
|
};
|
||
|
|
||
|
// A specialization of Dwarf_info_reader, for reading dwo_ids and
|
||
|
// type signatures from DWARF CUs and TUs.
|
||
|
|
||
|
class Dwo_id_info_reader : public Dwarf_info_reader
|
||
|
{
|
||
|
public:
|
||
|
Dwo_id_info_reader(bool is_type_unit,
|
||
|
Relobj* object,
|
||
|
unsigned int shndx)
|
||
|
: Dwarf_info_reader(is_type_unit, object, NULL, 0, shndx, 0, 0),
|
||
|
dwo_id_found_(false), dwo_id_(0), type_sig_found_(false), type_sig_(0)
|
||
|
{ }
|
||
|
|
||
|
~Dwo_id_info_reader()
|
||
|
{ }
|
||
|
|
||
|
// Return the dwo_id from a DWARF compilation unit DIE in *DWO_ID.
|
||
|
bool
|
||
|
get_dwo_id(uint64_t* dwo_id)
|
||
|
{
|
||
|
this->parse();
|
||
|
if (!this->dwo_id_found_)
|
||
|
return false;
|
||
|
*dwo_id = this->dwo_id_;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
// Return the type signature from a DWARF type unit DIE in *TYPE_SIG.
|
||
|
bool
|
||
|
get_type_sig(uint64_t* type_sig)
|
||
|
{
|
||
|
this->parse();
|
||
|
if (!this->type_sig_found_)
|
||
|
return false;
|
||
|
*type_sig = this->type_sig_;
|
||
|
return true;
|
||
|
}
|
||
|
|
||
|
protected:
|
||
|
// Visit a compilation unit.
|
||
|
virtual void
|
||
|
visit_compilation_unit(off_t cu_offset, off_t cu_length, Dwarf_die*);
|
||
|
|
||
|
// Visit a type unit.
|
||
|
virtual void
|
||
|
visit_type_unit(off_t tu_offset, off_t type_offset, uint64_t signature,
|
||
|
Dwarf_die*);
|
||
|
|
||
|
private:
|
||
|
// TRUE if we found a dwo_id.
|
||
|
bool dwo_id_found_;
|
||
|
// The dwo_id.
|
||
|
uint64_t dwo_id_;
|
||
|
// TRUE if we found a type signature.
|
||
|
bool type_sig_found_;
|
||
|
// The type signature.
|
||
|
uint64_t type_sig_;
|
||
|
};
|
||
|
|
||
|
// Class Sized_relobj_dwo.
|
||
|
|
||
|
// Setup the section information.
|
||
|
|
||
|
template <int size, bool big_endian>
|
||
|
void
|
||
|
Sized_relobj_dwo<size, big_endian>::setup()
|
||
|
{
|
||
|
const unsigned int shnum = this->elf_file_.shnum();
|
||
|
this->set_shnum(shnum);
|
||
|
this->section_offsets().resize(shnum);
|
||
|
}
|
||
|
|
||
|
// Return a view of the contents of a section.
|
||
|
|
||
|
template <int size, bool big_endian>
|
||
|
const unsigned char*
|
||
|
Sized_relobj_dwo<size, big_endian>::do_section_contents(
|
||
|
unsigned int shndx,
|
||
|
section_size_type* plen,
|
||
|
bool cache)
|
||
|
{
|
||
|
Object::Location loc(this->elf_file_.section_contents(shndx));
|
||
|
*plen = convert_to_section_size_type(loc.data_size);
|
||
|
if (*plen == 0)
|
||
|
{
|
||
|
static const unsigned char empty[1] = { '\0' };
|
||
|
return empty;
|
||
|
}
|
||
|
return this->get_view(loc.file_offset, *plen, true, cache);
|
||
|
}
|
||
|
|
||
|
// Return a view of the uncompressed contents of a section. Set *PLEN
|
||
|
// to the size. Set *IS_NEW to true if the contents need to be deleted
|
||
|
// by the caller.
|
||
|
|
||
|
template <int size, bool big_endian>
|
||
|
const unsigned char*
|
||
|
Sized_relobj_dwo<size, big_endian>::do_decompressed_section_contents(
|
||
|
unsigned int shndx,
|
||
|
section_size_type* plen,
|
||
|
bool* is_new)
|
||
|
{
|
||
|
section_size_type buffer_size;
|
||
|
const unsigned char* buffer = this->do_section_contents(shndx, &buffer_size,
|
||
|
false);
|
||
|
|
||
|
std::string sect_name = this->do_section_name(shndx);
|
||
|
if (!is_prefix_of(".zdebug_", sect_name.c_str()))
|
||
|
{
|
||
|
*plen = buffer_size;
|
||
|
*is_new = false;
|
||
|
return buffer;
|
||
|
}
|
||
|
|
||
|
section_size_type uncompressed_size = get_uncompressed_size(buffer,
|
||
|
buffer_size);
|
||
|
unsigned char* uncompressed_data = new unsigned char[uncompressed_size];
|
||
|
if (!decompress_input_section(buffer,
|
||
|
buffer_size,
|
||
|
uncompressed_data,
|
||
|
uncompressed_size))
|
||
|
this->error(_("could not decompress section %s"),
|
||
|
this->section_name(shndx).c_str());
|
||
|
*plen = uncompressed_size;
|
||
|
*is_new = true;
|
||
|
return uncompressed_data;
|
||
|
}
|
||
|
|
||
|
// Class Dwo_file.
|
||
|
|
||
|
Dwo_file::~Dwo_file()
|
||
|
{
|
||
|
if (this->obj_ != NULL)
|
||
|
delete this->obj_;
|
||
|
if (this->input_file_ != NULL)
|
||
|
delete this->input_file_;
|
||
|
}
|
||
|
|
||
|
// Read the input executable file and extract the list of .dwo files
|
||
|
// that it references.
|
||
|
|
||
|
void
|
||
|
Dwo_file::read_executable(File_list* files)
|
||
|
{
|
||
|
this->obj_ = this->make_object(NULL);
|
||
|
|
||
|
unsigned int shnum = this->shnum();
|
||
|
this->is_compressed_.resize(shnum);
|
||
|
this->shndx_map_.resize(shnum);
|
||
|
|
||
|
unsigned int debug_info = 0;
|
||
|
unsigned int debug_abbrev = 0;
|
||
|
|
||
|
// Scan the section table and collect the debug sections we need.
|
||
|
// (Section index 0 is a dummy section; skip it.)
|
||
|
for (unsigned int i = 1; i < shnum; i++)
|
||
|
{
|
||
|
if (this->section_type(i) != elfcpp::SHT_PROGBITS)
|
||
|
continue;
|
||
|
std::string sect_name = this->section_name(i);
|
||
|
const char* suffix = sect_name.c_str();
|
||
|
if (is_prefix_of(".debug_", suffix))
|
||
|
suffix += 7;
|
||
|
else if (is_prefix_of(".zdebug_", suffix))
|
||
|
{
|
||
|
this->is_compressed_[i] = true;
|
||
|
suffix += 8;
|
||
|
}
|
||
|
else
|
||
|
continue;
|
||
|
if (strcmp(suffix, "info") == 0)
|
||
|
debug_info = i;
|
||
|
else if (strcmp(suffix, "abbrev") == 0)
|
||
|
debug_abbrev = i;
|
||
|
}
|
||
|
|
||
|
if (debug_info > 0)
|
||
|
{
|
||
|
Dwo_name_info_reader dwarf_reader(this->obj_, debug_info);
|
||
|
dwarf_reader.set_abbrev_shndx(debug_abbrev);
|
||
|
dwarf_reader.get_dwo_names(files);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
// Read the input file and send its contents to OUTPUT_FILE.
|
||
|
|
||
|
void
|
||
|
Dwo_file::read(Dwp_output_file* output_file)
|
||
|
{
|
||
|
this->obj_ = this->make_object(output_file);
|
||
|
|
||
|
unsigned int shnum = this->shnum();
|
||
|
this->is_compressed_.resize(shnum);
|
||
|
this->shndx_map_.resize(shnum);
|
||
|
|
||
|
typedef std::vector<unsigned int> Types_list;
|
||
|
Types_list debug_types;
|
||
|
unsigned int debug_info = 0;
|
||
|
unsigned int debug_abbrev = 0;
|
||
|
unsigned int debug_line = 0;
|
||
|
unsigned int debug_loc = 0;
|
||
|
unsigned int debug_str = 0;
|
||
|
unsigned int debug_str_offsets = 0;
|
||
|
unsigned int debug_macinfo = 0;
|
||
|
unsigned int debug_macro = 0;
|
||
|
unsigned int debug_cu_index = 0;
|
||
|
unsigned int debug_tu_index = 0;
|
||
|
|
||
|
// Scan the section table and look for .dwp index sections.
|
||
|
// (Section index 0 is a dummy section; skip it.)
|
||
|
for (unsigned int i = 1; i < shnum; i++)
|
||
|
{
|
||
|
if (this->section_type(i) != elfcpp::SHT_PROGBITS)
|
||
|
continue;
|
||
|
std::string sect_name = this->section_name(i);
|
||
|
const char* suffix = sect_name.c_str();
|
||
|
if (is_prefix_of(".debug_", suffix))
|
||
|
suffix += 7;
|
||
|
else if (is_prefix_of(".zdebug_", suffix))
|
||
|
{
|
||
|
this->is_compressed_[i] = true;
|
||
|
suffix += 8;
|
||
|
}
|
||
|
else
|
||
|
continue;
|
||
|
if (strcmp(suffix, "cu_index") == 0)
|
||
|
debug_cu_index = i;
|
||
|
else if (strcmp(suffix, "tu_index") == 0)
|
||
|
debug_tu_index = i;
|
||
|
else if (strcmp(suffix, "str.dwo") == 0)
|
||
|
debug_str = i;
|
||
|
}
|
||
|
|
||
|
// Merge the input string table into the output string table.
|
||
|
this->add_strings(output_file, debug_str);
|
||
|
|
||
|
// If we found any .dwp index sections, read those and add the section
|
||
|
// sets to the output file.
|
||
|
if (debug_cu_index > 0 || debug_tu_index > 0)
|
||
|
{
|
||
|
if (debug_cu_index > 0)
|
||
|
this->read_compunit_index(debug_cu_index, output_file);
|
||
|
if (debug_tu_index > 0)
|
||
|
this->read_typeunit_index(debug_tu_index, output_file);
|
||
|
return;
|
||
|
}
|
||
|
|
||
|
// If we found no index sections, this is a .dwo file.
|
||
|
// Scan the section table and collect the debug sections.
|
||
|
for (unsigned int i = 1; i < shnum; i++)
|
||
|
{
|
||
|
if (this->section_type(i) != elfcpp::SHT_PROGBITS)
|
||
|
continue;
|
||
|
std::string sect_name = this->section_name(i);
|
||
|
const char* suffix = sect_name.c_str();
|
||
|
if (is_prefix_of(".debug_", suffix))
|
||
|
suffix += 7;
|
||
|
else if (is_prefix_of(".zdebug_", suffix))
|
||
|
suffix += 8;
|
||
|
else
|
||
|
continue;
|
||
|
// TODO: Check for one of each section (except .debug_types).
|
||
|
if (strcmp(suffix, "info.dwo") == 0)
|
||
|
debug_info = i;
|
||
|
else if (strcmp(suffix, "types.dwo") == 0)
|
||
|
debug_types.push_back(i);
|
||
|
else if (strcmp(suffix, "abbrev.dwo") == 0)
|
||
|
debug_abbrev = i;
|
||
|
else if (strcmp(suffix, "line.dwo") == 0)
|
||
|
debug_line = i;
|
||
|
else if (strcmp(suffix, "loc.dwo") == 0)
|
||
|
debug_loc = i;
|
||
|
else if (strcmp(suffix, "str_offsets.dwo") == 0)
|
||
|
debug_str_offsets = i;
|
||
|
else if (strcmp(suffix, "macinfo.dwo") == 0)
|
||
|
debug_macinfo = i;
|
||
|
else if (strcmp(suffix, "macro.dwo") == 0)
|
||
|
debug_macro = i;
|
||
|
}
|
||
|
|
||
|
if (debug_info > 0)
|
||
|
{
|
||
|
// Extract the dwo_id from .debug_info.dwo section.
|
||
|
uint64_t dwo_id;
|
||
|
Dwo_id_info_reader dwarf_reader(false, this->obj_, debug_info);
|
||
|
dwarf_reader.set_abbrev_shndx(debug_abbrev);
|
||
|
if (!dwarf_reader.get_dwo_id(&dwo_id))
|
||
|
gold_fatal(_("%s: .debug_info.dwo section does not have DW_AT_GNU_dwo_id "
|
||
|
"attribute"), this->name_);
|
||
|
this->add_cu_set(output_file, dwo_id, debug_info, debug_abbrev,
|
||
|
debug_line, debug_loc, debug_str_offsets,
|
||
|
debug_macinfo, debug_macro);
|
||
|
}
|
||
|
|
||
|
for (Types_list::const_iterator tp = debug_types.begin();
|
||
|
tp != debug_types.end();
|
||
|
++tp)
|
||
|
{
|
||
|
// Extract the type signature from .debug_types.dwo section.
|
||
|
uint64_t type_sig;
|
||
|
gold_assert(*tp > 0);
|
||
|
Dwo_id_info_reader dwarf_reader(true, this->obj_, *tp);
|
||
|
dwarf_reader.set_abbrev_shndx(debug_abbrev);
|
||
|
if (!dwarf_reader.get_type_sig(&type_sig))
|
||
|
gold_fatal(_("%s: .debug_types.dwo section does not have type signature"),
|
||
|
this->name_);
|
||
|
this->add_tu_set(output_file, type_sig, *tp, debug_abbrev, debug_line,
|
||
|
debug_str_offsets);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
// Create a Sized_relobj_dwo of the given size and endianness,
|
||
|
// and record the target info.
|
||
|
|
||
|
Relobj*
|
||
|
Dwo_file::make_object(Dwp_output_file* output_file)
|
||
|
{
|
||
|
// Open the input file.
|
||
|
Input_file* input_file = new Input_file(this->name_);
|
||
|
this->input_file_ = input_file;
|
||
|
Dirsearch dirpath;
|
||
|
int index;
|
||
|
if (!input_file->open(dirpath, NULL, &index))
|
||
|
gold_fatal(_("%s: can't open"), this->name_);
|
||
|
|
||
|
// Check that it's an ELF file.
|
||
|
off_t filesize = input_file->file().filesize();
|
||
|
int hdrsize = elfcpp::Elf_recognizer::max_header_size;
|
||
|
if (filesize < hdrsize)
|
||
|
hdrsize = filesize;
|
||
|
const unsigned char* elf_header =
|
||
|
input_file->file().get_view(0, 0, hdrsize, true, false);
|
||
|
if (!elfcpp::Elf_recognizer::is_elf_file(elf_header, hdrsize))
|
||
|
gold_fatal(_("%s: not an ELF object file"), this->name_);
|
||
|
|
||
|
// Get the size, endianness, machine, etc. info from the header,
|
||
|
// make an appropriately-sized Relobj, and pass the target info
|
||
|
// to the output object.
|
||
|
int size;
|
||
|
bool big_endian;
|
||
|
std::string error;
|
||
|
if (!elfcpp::Elf_recognizer::is_valid_header(elf_header, hdrsize, &size,
|
||
|
&big_endian, &error))
|
||
|
gold_fatal(_("%s: %s"), this->name_, error.c_str());
|
||
|
|
||
|
if (size == 32)
|
||
|
{
|
||
|
if (big_endian)
|
||
|
#ifdef HAVE_TARGET_32_BIG
|
||
|
return this->sized_make_object<32, true>(elf_header, input_file,
|
||
|
output_file);
|
||
|
#else
|
||
|
gold_unreachable();
|
||
|
#endif
|
||
|
else
|
||
|
#ifdef HAVE_TARGET_32_LITTLE
|
||
|
return this->sized_make_object<32, false>(elf_header, input_file,
|
||
|
output_file);
|
||
|
#else
|
||
|
gold_unreachable();
|
||
|
#endif
|
||
|
}
|
||
|
else if (size == 64)
|
||
|
{
|
||
|
if (big_endian)
|
||
|
#ifdef HAVE_TARGET_64_BIG
|
||
|
return this->sized_make_object<64, true>(elf_header, input_file,
|
||
|
output_file);
|
||
|
#else
|
||
|
gold_unreachable();
|
||
|
#endif
|
||
|
else
|
||
|
#ifdef HAVE_TARGET_64_LITTLE
|
||
|
return this->sized_make_object<64, false>(elf_header, input_file,
|
||
|
output_file);
|
||
|
#else
|
||
|
gold_unreachable();
|
||
|
#endif
|
||
|
}
|
||
|
else
|
||
|
gold_unreachable();
|
||
|
}
|
||
|
|
||
|
// Function template to create a Sized_relobj_dwo and record the target info.
|
||
|
// P is a pointer to the ELF header in memory.
|
||
|
|
||
|
template <int size, bool big_endian>
|
||
|
Relobj*
|
||
|
Dwo_file::sized_make_object(const unsigned char* p, Input_file* input_file,
|
||
|
Dwp_output_file* output_file)
|
||
|
{
|
||
|
elfcpp::Ehdr<size, big_endian> ehdr(p);
|
||
|
Sized_relobj_dwo<size, big_endian>* obj =
|
||
|
new Sized_relobj_dwo<size, big_endian>(this->name_, input_file, ehdr);
|
||
|
obj->setup();
|
||
|
if (output_file != NULL)
|
||
|
output_file->record_target_info(
|
||
|
this->name_, ehdr.get_e_machine(), size, big_endian,
|
||
|
ehdr.get_e_ident()[elfcpp::EI_OSABI],
|
||
|
ehdr.get_e_ident()[elfcpp::EI_ABIVERSION]);
|
||
|
return obj;
|
||
|
}
|
||
|
|
||
|
// Read the .debug_cu_index section of a .dwp file,
|
||
|
// and process the CU sets.
|
||
|
|
||
|
void
|
||
|
Dwo_file::read_compunit_index(unsigned int shndx, Dwp_output_file* output_file)
|
||
|
{
|
||
|
if (this->obj_->is_big_endian())
|
||
|
this->sized_read_compunit_index<true>(shndx, output_file);
|
||
|
else
|
||
|
this->sized_read_compunit_index<false>(shndx, output_file);
|
||
|
}
|
||
|
|
||
|
template <bool big_endian>
|
||
|
void
|
||
|
Dwo_file::sized_read_compunit_index(unsigned int shndx,
|
||
|
Dwp_output_file* output_file)
|
||
|
{
|
||
|
section_size_type len;
|
||
|
bool is_new;
|
||
|
const unsigned char* contents = this->section_contents(shndx, &len, &is_new);
|
||
|
|
||
|
unsigned int version =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(contents);
|
||
|
if (version != 1)
|
||
|
gold_fatal(_("%s: .debug_cu_index has unsupported version number %d"),
|
||
|
this->name_, version);
|
||
|
|
||
|
unsigned int nused =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(contents
|
||
|
+ 2 * sizeof(uint32_t));
|
||
|
if (nused == 0)
|
||
|
return;
|
||
|
|
||
|
unsigned int nslots =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(contents
|
||
|
+ 3 * sizeof(uint32_t));
|
||
|
|
||
|
const unsigned char* phash = contents + 4 * sizeof(uint32_t);
|
||
|
const unsigned char* pindex = phash + nslots * sizeof(uint64_t);
|
||
|
const unsigned char* shndx_pool = pindex + nslots * sizeof(uint32_t);
|
||
|
const unsigned char* limit = contents + len;
|
||
|
|
||
|
if (shndx_pool >= limit)
|
||
|
gold_fatal(_("%s: .debug_cu_index is corrupt"), this->name_);
|
||
|
|
||
|
// Loop over the slots of the hash table.
|
||
|
for (unsigned int i = 0; i < nslots; ++i)
|
||
|
{
|
||
|
uint64_t dwo_id =
|
||
|
elfcpp::Swap_unaligned<64, big_endian>::readval(phash);
|
||
|
if (dwo_id != 0)
|
||
|
{
|
||
|
unsigned int index =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(pindex);
|
||
|
const unsigned char* shndx_list =
|
||
|
shndx_pool + index * sizeof(uint32_t);
|
||
|
|
||
|
// Collect the debug sections for this compilation unit set.
|
||
|
unsigned int debug_info = 0;
|
||
|
unsigned int debug_abbrev = 0;
|
||
|
unsigned int debug_line = 0;
|
||
|
unsigned int debug_loc = 0;
|
||
|
unsigned int debug_str_offsets = 0;
|
||
|
unsigned int debug_macinfo = 0;
|
||
|
unsigned int debug_macro = 0;
|
||
|
for (;;)
|
||
|
{
|
||
|
if (shndx_list >= limit)
|
||
|
gold_fatal(_("%s: .debug_cu_index is corrupt"),
|
||
|
this->name_);
|
||
|
unsigned int shndx =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(shndx_list);
|
||
|
if (shndx == 0)
|
||
|
break;
|
||
|
if (shndx > this->shnum())
|
||
|
gold_fatal(_("%s: .debug_cu_index has bad shndx"),
|
||
|
this->name_);
|
||
|
std::string sect_name = this->section_name(shndx);
|
||
|
const char* suffix = sect_name.c_str();
|
||
|
if (is_prefix_of(".debug_", suffix))
|
||
|
suffix += 7;
|
||
|
else if (is_prefix_of(".zdebug_", suffix))
|
||
|
suffix += 8;
|
||
|
else
|
||
|
gold_fatal(_("%s: .debug_cu_index refers to "
|
||
|
"non-debug section"), this->name_);
|
||
|
if (strcmp(suffix, "info.dwo") == 0)
|
||
|
debug_info = shndx;
|
||
|
else if (strcmp(suffix, "abbrev.dwo") == 0)
|
||
|
debug_abbrev = shndx;
|
||
|
else if (strcmp(suffix, "line.dwo") == 0)
|
||
|
debug_line = shndx;
|
||
|
else if (strcmp(suffix, "loc.dwo") == 0)
|
||
|
debug_loc = shndx;
|
||
|
else if (strcmp(suffix, "str_offsets.dwo") == 0)
|
||
|
debug_str_offsets = shndx;
|
||
|
else if (strcmp(suffix, "macinfo.dwo") == 0)
|
||
|
debug_macinfo = shndx;
|
||
|
else if (strcmp(suffix, "macro.dwo") == 0)
|
||
|
debug_macro = shndx;
|
||
|
shndx_list += sizeof(uint32_t);
|
||
|
}
|
||
|
this->add_cu_set(output_file, dwo_id, debug_info, debug_abbrev,
|
||
|
debug_line, debug_loc, debug_str_offsets,
|
||
|
debug_macinfo, debug_macro);
|
||
|
}
|
||
|
phash += sizeof(uint64_t);
|
||
|
pindex += sizeof(uint32_t);
|
||
|
}
|
||
|
|
||
|
if (is_new)
|
||
|
delete[] contents;
|
||
|
}
|
||
|
|
||
|
// Read the .debug_tu_index section of a .dwp file,
|
||
|
// and process the TU sets.
|
||
|
|
||
|
void
|
||
|
Dwo_file::read_typeunit_index(unsigned int shndx, Dwp_output_file* output_file)
|
||
|
{
|
||
|
if (this->obj_->is_big_endian())
|
||
|
this->sized_read_typeunit_index<true>(shndx, output_file);
|
||
|
else
|
||
|
this->sized_read_typeunit_index<false>(shndx, output_file);
|
||
|
}
|
||
|
|
||
|
template <bool big_endian>
|
||
|
void
|
||
|
Dwo_file::sized_read_typeunit_index(unsigned int shndx,
|
||
|
Dwp_output_file* output_file)
|
||
|
{
|
||
|
section_size_type len;
|
||
|
bool is_new;
|
||
|
const unsigned char* contents = this->section_contents(shndx, &len, &is_new);
|
||
|
|
||
|
unsigned int version =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(contents);
|
||
|
if (version != 1)
|
||
|
gold_fatal(_("%s: .debug_tu_index has unsupported version number %d"),
|
||
|
this->name_, version);
|
||
|
|
||
|
unsigned int nused =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(contents
|
||
|
+ 2 * sizeof(uint32_t));
|
||
|
if (nused == 0)
|
||
|
return;
|
||
|
|
||
|
unsigned int nslots =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(contents
|
||
|
+ 3 * sizeof(uint32_t));
|
||
|
|
||
|
const unsigned char* phash = contents + 4 * sizeof(uint32_t);
|
||
|
const unsigned char* pindex = phash + nslots * sizeof(uint64_t);
|
||
|
const unsigned char* shndx_pool = pindex + nslots * sizeof(uint32_t);
|
||
|
const unsigned char* limit = contents + len;
|
||
|
|
||
|
if (shndx_pool >= limit)
|
||
|
gold_fatal(_("%s: .debug_tu_index is corrupt"), this->name_);
|
||
|
|
||
|
// Loop over the slots of the hash table.
|
||
|
for (unsigned int i = 0; i < nslots; ++i)
|
||
|
{
|
||
|
uint64_t type_sig =
|
||
|
elfcpp::Swap_unaligned<64, big_endian>::readval(phash);
|
||
|
if (type_sig != 0)
|
||
|
{
|
||
|
unsigned int index =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(pindex);
|
||
|
const unsigned char* shndx_list =
|
||
|
shndx_pool + index * sizeof(uint32_t);
|
||
|
|
||
|
// Collect the debug sections for this type unit set.
|
||
|
unsigned int debug_types = 0;
|
||
|
unsigned int debug_abbrev = 0;
|
||
|
unsigned int debug_line = 0;
|
||
|
unsigned int debug_str_offsets = 0;
|
||
|
for (;;)
|
||
|
{
|
||
|
if (shndx_list >= limit)
|
||
|
gold_fatal(_("%s: .debug_tu_index is corrupt"),
|
||
|
this->name_);
|
||
|
unsigned int shndx =
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::readval(shndx_list);
|
||
|
if (shndx == 0)
|
||
|
break;
|
||
|
if (shndx > this->shnum())
|
||
|
gold_fatal(_("%s: .debug_tu_index has bad shndx"),
|
||
|
this->name_);
|
||
|
std::string sect_name = this->section_name(shndx);
|
||
|
const char* suffix = sect_name.c_str();
|
||
|
if (is_prefix_of(".debug_", suffix))
|
||
|
suffix += 7;
|
||
|
else if (is_prefix_of(".zdebug_", suffix))
|
||
|
suffix += 8;
|
||
|
else
|
||
|
gold_fatal(_("%s: .debug_tu_index refers to "
|
||
|
"non-debug section"), this->name_);
|
||
|
if (strcmp(suffix, "types.dwo") == 0)
|
||
|
debug_types = shndx;
|
||
|
else if (strcmp(suffix, "abbrev.dwo") == 0)
|
||
|
debug_abbrev = shndx;
|
||
|
else if (strcmp(suffix, "line.dwo") == 0)
|
||
|
debug_line = shndx;
|
||
|
else if (strcmp(suffix, "str_offsets.dwo") == 0)
|
||
|
debug_str_offsets = shndx;
|
||
|
shndx_list += sizeof(uint32_t);
|
||
|
}
|
||
|
this->add_tu_set(output_file, type_sig, debug_types, debug_abbrev,
|
||
|
debug_line, debug_str_offsets);
|
||
|
}
|
||
|
phash += sizeof(uint64_t);
|
||
|
pindex += sizeof(uint32_t);
|
||
|
}
|
||
|
|
||
|
if (is_new)
|
||
|
delete[] contents;
|
||
|
}
|
||
|
|
||
|
// Merge the input string table section into the output file.
|
||
|
|
||
|
void
|
||
|
Dwo_file::add_strings(Dwp_output_file* output_file, unsigned int debug_str)
|
||
|
{
|
||
|
section_size_type len;
|
||
|
bool is_new;
|
||
|
const unsigned char* pdata = this->section_contents(debug_str, &len, &is_new);
|
||
|
const char* p = reinterpret_cast<const char*>(pdata);
|
||
|
const char* pend = p + len;
|
||
|
|
||
|
// Check that the last string is null terminated.
|
||
|
if (pend[-1] != '\0')
|
||
|
gold_fatal(_("%s: last entry in string section '%s' "
|
||
|
"is not null terminated"),
|
||
|
this->name_,
|
||
|
this->section_name(debug_str).c_str());
|
||
|
|
||
|
// Count the number of strings in the section, and size the map.
|
||
|
size_t count = 0;
|
||
|
for (const char* pt = p; pt < pend; pt += strlen(pt) + 1)
|
||
|
++count;
|
||
|
this->str_offset_map_.reserve(count + 1);
|
||
|
|
||
|
// Add the strings to the output string table, and record the new offsets
|
||
|
// in the map.
|
||
|
section_offset_type i = 0;
|
||
|
section_offset_type new_offset;
|
||
|
while (p < pend)
|
||
|
{
|
||
|
size_t len = strlen(p);
|
||
|
new_offset = output_file->add_string(p, len);
|
||
|
this->str_offset_map_.push_back(std::make_pair(i, new_offset));
|
||
|
p += len + 1;
|
||
|
i += len + 1;
|
||
|
}
|
||
|
new_offset = 0;
|
||
|
this->str_offset_map_.push_back(std::make_pair(i, new_offset));
|
||
|
if (is_new)
|
||
|
delete[] pdata;
|
||
|
}
|
||
|
|
||
|
// Copy a section from the input file to the output file.
|
||
|
// If IS_STR_OFFSETS is true, remap the string offsets for the
|
||
|
// output string table.
|
||
|
|
||
|
unsigned int
|
||
|
Dwo_file::copy_section(Dwp_output_file* output_file, unsigned int shndx,
|
||
|
const char* section_name, bool is_str_offsets)
|
||
|
{
|
||
|
// Some sections may be referenced from more than one set.
|
||
|
// Don't copy a section more than once.
|
||
|
if (this->shndx_map_[shndx] > 0)
|
||
|
return this->shndx_map_[shndx];
|
||
|
|
||
|
section_size_type len;
|
||
|
bool is_new;
|
||
|
const unsigned char* contents = this->section_contents(shndx, &len, &is_new);
|
||
|
|
||
|
if (is_str_offsets)
|
||
|
{
|
||
|
const unsigned char* remapped = this->remap_str_offsets(contents, len);
|
||
|
if (is_new)
|
||
|
delete[] contents;
|
||
|
contents = remapped;
|
||
|
is_new = true;
|
||
|
}
|
||
|
|
||
|
this->shndx_map_[shndx] = output_file->add_section(section_name, contents,
|
||
|
len, 1);
|
||
|
if (is_new)
|
||
|
delete[] contents;
|
||
|
|
||
|
return this->shndx_map_[shndx];
|
||
|
}
|
||
|
|
||
|
// Remap the
|
||
|
const unsigned char*
|
||
|
Dwo_file::remap_str_offsets(const unsigned char* contents,
|
||
|
section_size_type len)
|
||
|
{
|
||
|
if ((len & 3) != 0)
|
||
|
gold_fatal(_("%s: .debug_str_offsets.dwo section size not a multiple of 4"),
|
||
|
this->name_);
|
||
|
|
||
|
if (this->obj_->is_big_endian())
|
||
|
return this->sized_remap_str_offsets<true>(contents, len);
|
||
|
else
|
||
|
return this->sized_remap_str_offsets<false>(contents, len);
|
||
|
}
|
||
|
|
||
|
template <bool big_endian>
|
||
|
const unsigned char*
|
||
|
Dwo_file::sized_remap_str_offsets(const unsigned char* contents,
|
||
|
section_size_type len)
|
||
|
{
|
||
|
unsigned char* remapped = new unsigned char[len];
|
||
|
const unsigned char* p = contents;
|
||
|
unsigned char* q = remapped;
|
||
|
while (len > 0)
|
||
|
{
|
||
|
unsigned int val = elfcpp::Swap_unaligned<32, big_endian>::readval(p);
|
||
|
val = this->remap_str_offset(val);
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::writeval(q, val);
|
||
|
len -= 4;
|
||
|
p += 4;
|
||
|
q += 4;
|
||
|
}
|
||
|
return remapped;
|
||
|
}
|
||
|
|
||
|
unsigned int
|
||
|
Dwo_file::remap_str_offset(section_offset_type val)
|
||
|
{
|
||
|
Str_offset_map_entry entry;
|
||
|
entry.first = val;
|
||
|
|
||
|
Str_offset_map::const_iterator p =
|
||
|
std::lower_bound(this->str_offset_map_.begin(),
|
||
|
this->str_offset_map_.end(),
|
||
|
entry, Offset_compare());
|
||
|
|
||
|
if (p == this->str_offset_map_.end() || p->first > val)
|
||
|
{
|
||
|
if (p == this->str_offset_map_.begin())
|
||
|
return 0;
|
||
|
--p;
|
||
|
gold_assert(p->first <= val);
|
||
|
}
|
||
|
|
||
|
return p->second + (val - p->first);
|
||
|
}
|
||
|
|
||
|
// Add a set of .debug_info and related sections to OUTPUT_FILE.
|
||
|
|
||
|
void
|
||
|
Dwo_file::add_cu_set(Dwp_output_file* output_file,
|
||
|
uint64_t dwo_id,
|
||
|
unsigned int debug_info,
|
||
|
unsigned int debug_abbrev,
|
||
|
unsigned int debug_line,
|
||
|
unsigned int debug_loc,
|
||
|
unsigned int debug_str_offsets,
|
||
|
unsigned int debug_macinfo,
|
||
|
unsigned int debug_macro)
|
||
|
{
|
||
|
if (debug_info == 0)
|
||
|
gold_fatal(_("%s: no .debug_info.dwo section found"), this->name_);
|
||
|
if (debug_abbrev == 0)
|
||
|
gold_fatal(_("%s: no .debug_abbrev.dwo section found"), this->name_);
|
||
|
|
||
|
debug_abbrev = this->copy_section(output_file, debug_abbrev,
|
||
|
".debug_abbrev.dwo", false);
|
||
|
if (debug_line > 0)
|
||
|
debug_line = this->copy_section(output_file, debug_line,
|
||
|
".debug_line.dwo", false);
|
||
|
if (debug_loc > 0)
|
||
|
debug_loc = this->copy_section(output_file, debug_loc, ".debug_loc.dwo",
|
||
|
false);
|
||
|
if (debug_macinfo > 0)
|
||
|
debug_macinfo = this->copy_section(output_file, debug_macinfo,
|
||
|
".debug_macinfo.dwo", false);
|
||
|
if (debug_macro > 0)
|
||
|
debug_macro = this->copy_section(output_file, debug_macro,
|
||
|
".debug_macro.dwo", false);
|
||
|
|
||
|
if (debug_str_offsets > 0)
|
||
|
debug_str_offsets = this->copy_section(output_file, debug_str_offsets,
|
||
|
".debug_str_offsets.dwo", true);
|
||
|
|
||
|
debug_info = this->copy_section(output_file, debug_info, ".debug_info.dwo",
|
||
|
false);
|
||
|
|
||
|
output_file->add_cu_set(dwo_id, debug_info, debug_abbrev, debug_line,
|
||
|
debug_loc, debug_str_offsets, debug_macinfo,
|
||
|
debug_macro);
|
||
|
}
|
||
|
|
||
|
// Add a set of .debug_types and related sections to OUTPUT_FILE.
|
||
|
|
||
|
void
|
||
|
Dwo_file::add_tu_set(Dwp_output_file* output_file,
|
||
|
uint64_t type_sig,
|
||
|
unsigned int debug_types,
|
||
|
unsigned int debug_abbrev,
|
||
|
unsigned int debug_line,
|
||
|
unsigned int debug_str_offsets)
|
||
|
{
|
||
|
if (debug_types == 0)
|
||
|
gold_fatal(_("%s: no .debug_types.dwo section found"), this->name_);
|
||
|
if (debug_abbrev == 0)
|
||
|
gold_fatal(_("%s: no .debug_abbrev.dwo section found"), this->name_);
|
||
|
|
||
|
// Ignore duplicate type signatures.
|
||
|
if (output_file->lookup_tu(type_sig))
|
||
|
return;
|
||
|
|
||
|
debug_abbrev = this->copy_section(output_file, debug_abbrev,
|
||
|
".debug_abbrev.dwo", false);
|
||
|
if (debug_line > 0)
|
||
|
debug_line = this->copy_section(output_file, debug_line,
|
||
|
".debug_line.dwo", false);
|
||
|
|
||
|
if (debug_str_offsets > 0)
|
||
|
debug_str_offsets = this->copy_section(output_file, debug_str_offsets,
|
||
|
".debug_str_offsets.dwo", true);
|
||
|
|
||
|
debug_types = this->copy_section(output_file, debug_types,
|
||
|
".debug_types.dwo", false);
|
||
|
|
||
|
output_file->add_tu_set(type_sig, debug_types, debug_abbrev, debug_line,
|
||
|
debug_str_offsets);
|
||
|
}
|
||
|
|
||
|
// Class Dwp_output_file.
|
||
|
|
||
|
// Record the target info from an input file. On first call, we
|
||
|
// set the ELF header values for the output file. On subsequent
|
||
|
// calls, we just verify that the values match.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::record_target_info(const char*, int machine,
|
||
|
int size, bool big_endian,
|
||
|
int osabi, int abiversion)
|
||
|
{
|
||
|
// TODO: Check the values on subsequent calls.
|
||
|
if (this->size_ > 0)
|
||
|
return;
|
||
|
|
||
|
this->machine_ = machine;
|
||
|
this->size_ = size;
|
||
|
this->big_endian_ = big_endian;
|
||
|
this->osabi_ = osabi;
|
||
|
this->abiversion_ = abiversion;
|
||
|
|
||
|
if (size == 32)
|
||
|
this->next_file_offset_ = elfcpp::Elf_sizes<32>::ehdr_size;
|
||
|
else if (size == 64)
|
||
|
this->next_file_offset_ = elfcpp::Elf_sizes<64>::ehdr_size;
|
||
|
else
|
||
|
gold_unreachable();
|
||
|
|
||
|
this->fd_ = ::fopen(this->name_, "wb");
|
||
|
if (this->fd_ == NULL)
|
||
|
gold_fatal(_("%s: %s"), this->name_, strerror(errno));
|
||
|
|
||
|
// Write zeroes for the ELF header initially. We'll write
|
||
|
// the actual header during finalize().
|
||
|
static const char buf[elfcpp::Elf_sizes<64>::ehdr_size] = { 0 };
|
||
|
if (::fwrite(buf, 1, this->next_file_offset_, this->fd_)
|
||
|
< (size_t) this->next_file_offset_)
|
||
|
gold_fatal(_("%s: %s"), this->name_, strerror(errno));
|
||
|
}
|
||
|
|
||
|
// Add a string to the debug strings section.
|
||
|
|
||
|
section_offset_type
|
||
|
Dwp_output_file::add_string(const char* str, size_t len)
|
||
|
{
|
||
|
Stringpool::Key key;
|
||
|
this->stringpool_.add_with_length(str, len, true, &key);
|
||
|
this->have_strings_ = true;
|
||
|
// We aren't supposed to call get_offset() until after
|
||
|
// calling set_string_offsets(), but the offsets will
|
||
|
// not change unless optimizing the string pool.
|
||
|
return this->stringpool_.get_offset_from_key(key);
|
||
|
}
|
||
|
|
||
|
// Align the file offset to the given boundary.
|
||
|
|
||
|
static inline off_t
|
||
|
align_offset(off_t off, int align)
|
||
|
{
|
||
|
return (off + align - 1) & ~(align - 1);
|
||
|
}
|
||
|
|
||
|
// Add a section to the output file, and return the new section index.
|
||
|
|
||
|
unsigned int
|
||
|
Dwp_output_file::add_section(const char* section_name,
|
||
|
const unsigned char* contents,
|
||
|
section_size_type len,
|
||
|
int align)
|
||
|
{
|
||
|
off_t file_offset = this->next_file_offset_;
|
||
|
gold_assert(this->size_ > 0 && file_offset > 0);
|
||
|
|
||
|
file_offset = align_offset(file_offset, align);
|
||
|
|
||
|
::fseek(this->fd_, file_offset, SEEK_SET);
|
||
|
if (::fwrite(contents, 1, len, this->fd_) < len)
|
||
|
gold_fatal(_("%s: error writing section '%s'"), this->name_, section_name);
|
||
|
|
||
|
section_name = this->shstrtab_.add_with_length(section_name,
|
||
|
strlen(section_name),
|
||
|
false, NULL);
|
||
|
Section sect = { section_name, file_offset, len, align };
|
||
|
this->sections_.push_back(sect);
|
||
|
|
||
|
this->next_file_offset_ = file_offset + len;
|
||
|
return this->shnum_++;
|
||
|
}
|
||
|
|
||
|
// Add a set of .debug_info and related sections to the output file.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::add_cu_set(uint64_t dwo_id,
|
||
|
unsigned int debug_info,
|
||
|
unsigned int debug_abbrev,
|
||
|
unsigned int debug_line,
|
||
|
unsigned int debug_loc,
|
||
|
unsigned int debug_str_offsets,
|
||
|
unsigned int debug_macinfo,
|
||
|
unsigned int debug_macro)
|
||
|
{
|
||
|
Cu_or_tu_set cu_set = { dwo_id, debug_info, debug_abbrev, debug_line,
|
||
|
debug_loc, debug_str_offsets, debug_macinfo,
|
||
|
debug_macro };
|
||
|
unsigned int slot;
|
||
|
if (!this->cu_index_.find_or_add(dwo_id, &slot))
|
||
|
this->cu_index_.enter_set(slot, cu_set);
|
||
|
else
|
||
|
gold_warning(_("%s: duplicate entry for CU (dwo_id 0x%llx)"),
|
||
|
this->name_, (unsigned long long)dwo_id);
|
||
|
}
|
||
|
|
||
|
// Lookup a type signature and return TRUE if we have already seen it.
|
||
|
bool
|
||
|
Dwp_output_file::lookup_tu(uint64_t type_sig)
|
||
|
{
|
||
|
this->last_type_sig_ = type_sig;
|
||
|
return this->tu_index_.find_or_add(type_sig, &this->last_tu_slot_);
|
||
|
}
|
||
|
|
||
|
// Add a set of .debug_types and related sections to the output file.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::add_tu_set(uint64_t type_sig,
|
||
|
unsigned int debug_types,
|
||
|
unsigned int debug_abbrev,
|
||
|
unsigned int debug_line,
|
||
|
unsigned int debug_str_offsets)
|
||
|
{
|
||
|
Cu_or_tu_set tu_set = { type_sig, debug_types, debug_abbrev, debug_line,
|
||
|
0, debug_str_offsets, 0, 0 };
|
||
|
unsigned int slot;
|
||
|
if (type_sig == this->last_type_sig_)
|
||
|
slot = this->last_tu_slot_;
|
||
|
else
|
||
|
this->tu_index_.find_or_add(type_sig, &slot);
|
||
|
this->tu_index_.enter_set(slot, tu_set);
|
||
|
}
|
||
|
|
||
|
// Find a slot in the hash table for SIGNATURE. Return TRUE
|
||
|
// if the entry already exists.
|
||
|
|
||
|
bool
|
||
|
Dwp_output_file::Dwp_index::find_or_add(uint64_t signature,
|
||
|
unsigned int* slotp)
|
||
|
{
|
||
|
if (this->capacity_ == 0)
|
||
|
this->initialize();
|
||
|
unsigned int slot =
|
||
|
static_cast<unsigned int>(signature) & (this->capacity_ - 1);
|
||
|
unsigned int secondary_hash;
|
||
|
uint64_t probe = this->hash_table_[slot];
|
||
|
if (probe != 0 && probe != signature)
|
||
|
{
|
||
|
secondary_hash = (static_cast<unsigned int>(signature >> 32)
|
||
|
& (this->capacity_ - 1)) | 1;
|
||
|
do
|
||
|
{
|
||
|
slot = (slot + secondary_hash) & (this->capacity_ - 1);
|
||
|
probe = this->hash_table_[slot];
|
||
|
} while (probe != 0 && probe != signature);
|
||
|
}
|
||
|
*slotp = slot;
|
||
|
return (probe != 0);
|
||
|
}
|
||
|
|
||
|
// Enter a CU or TU set at the given SLOT in the hash table.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::Dwp_index::enter_set(unsigned int slot,
|
||
|
const Cu_or_tu_set& set)
|
||
|
{
|
||
|
gold_assert(slot < this->capacity_);
|
||
|
gold_assert(set.debug_info_or_types > 0);
|
||
|
gold_assert(set.debug_abbrev > 0);
|
||
|
|
||
|
// Add the section indexes to the pool.
|
||
|
uint32_t pool_index = this->shndx_pool_.size();
|
||
|
this->shndx_pool_.push_back(set.debug_info_or_types);
|
||
|
this->shndx_pool_.push_back(set.debug_abbrev);
|
||
|
if (set.debug_line > 0)
|
||
|
this->shndx_pool_.push_back(set.debug_line);
|
||
|
if (set.debug_loc > 0)
|
||
|
this->shndx_pool_.push_back(set.debug_loc);
|
||
|
if (set.debug_str_offsets > 0)
|
||
|
this->shndx_pool_.push_back(set.debug_str_offsets);
|
||
|
if (set.debug_macinfo > 0)
|
||
|
this->shndx_pool_.push_back(set.debug_macinfo);
|
||
|
if (set.debug_macro > 0)
|
||
|
this->shndx_pool_.push_back(set.debug_macro);
|
||
|
this->shndx_pool_.push_back(0);
|
||
|
|
||
|
// Enter the signature and pool index into the hash table.
|
||
|
gold_assert(this->hash_table_[slot] == 0);
|
||
|
this->hash_table_[slot] = set.signature;
|
||
|
this->index_table_[slot] = pool_index;
|
||
|
++this->used_;
|
||
|
|
||
|
// Grow the hash table when we exceed 2/3 capacity.
|
||
|
if (this->used_ * 3 > this->capacity_ * 2)
|
||
|
this->grow();
|
||
|
}
|
||
|
|
||
|
// Initialize the hash table.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::Dwp_index::initialize()
|
||
|
{
|
||
|
this->capacity_ = 16;
|
||
|
this->hash_table_ = new uint64_t[this->capacity_];
|
||
|
memset(this->hash_table_, 0, this->capacity_ * sizeof(uint64_t));
|
||
|
this->index_table_ = new uint32_t[this->capacity_];
|
||
|
memset(this->index_table_, 0, this->capacity_ * sizeof(uint32_t));
|
||
|
}
|
||
|
|
||
|
// Grow the hash table when we reach 2/3 capacity.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::Dwp_index::grow()
|
||
|
{
|
||
|
unsigned int old_capacity = this->capacity_;
|
||
|
uint64_t* old_hash_table = this->hash_table_;
|
||
|
uint32_t* old_index_table = this->index_table_;
|
||
|
unsigned int old_used = this->used_;
|
||
|
|
||
|
this->capacity_ = old_capacity * 2;
|
||
|
this->hash_table_ = new uint64_t[this->capacity_];
|
||
|
memset(this->hash_table_, 0, this->capacity_ * sizeof(uint64_t));
|
||
|
this->index_table_ = new uint32_t[this->capacity_];
|
||
|
memset(this->index_table_, 0, this->capacity_ * sizeof(uint32_t));
|
||
|
this->used_ = 0;
|
||
|
|
||
|
for (unsigned int i = 0; i < old_capacity; ++i)
|
||
|
{
|
||
|
uint64_t signature = old_hash_table[i];
|
||
|
if (signature != 0)
|
||
|
{
|
||
|
unsigned int slot;
|
||
|
bool found = this->find_or_add(signature, &slot);
|
||
|
gold_assert(!found);
|
||
|
this->hash_table_[slot] = signature;
|
||
|
this->index_table_[slot] = old_index_table[i];
|
||
|
++this->used_;
|
||
|
}
|
||
|
}
|
||
|
gold_assert(this->used_ == old_used);
|
||
|
|
||
|
delete[] old_hash_table;
|
||
|
delete[] old_index_table;
|
||
|
}
|
||
|
|
||
|
// Initialize the output file.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::initialize()
|
||
|
{
|
||
|
// We can't initialize the output file until we've recorded the
|
||
|
// target info from the first input file.
|
||
|
gold_assert(this->size_ > 0);
|
||
|
}
|
||
|
|
||
|
// Finalize the file, write the string tables and index sections,
|
||
|
// and close the file.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::finalize()
|
||
|
{
|
||
|
unsigned char* buf;
|
||
|
|
||
|
// Write the debug string table.
|
||
|
if (this->have_strings_)
|
||
|
{
|
||
|
this->stringpool_.set_string_offsets();
|
||
|
section_size_type len = this->stringpool_.get_strtab_size();
|
||
|
buf = new unsigned char[len];
|
||
|
this->stringpool_.write_to_buffer(buf, len);
|
||
|
this->add_section(".debug_str.dwo", buf, len, 1);
|
||
|
delete[] buf;
|
||
|
}
|
||
|
|
||
|
// Write the CU and TU indexes.
|
||
|
if (this->big_endian_)
|
||
|
{
|
||
|
this->write_index<true>(".debug_cu_index", this->cu_index_);
|
||
|
this->write_index<true>(".debug_tu_index", this->tu_index_);
|
||
|
}
|
||
|
else
|
||
|
{
|
||
|
this->write_index<false>(".debug_cu_index", this->cu_index_);
|
||
|
this->write_index<false>(".debug_tu_index", this->tu_index_);
|
||
|
}
|
||
|
|
||
|
off_t file_offset = this->next_file_offset_;
|
||
|
|
||
|
// Write the section string table.
|
||
|
this->shstrndx_ = this->shnum_++;
|
||
|
const char* shstrtab_name =
|
||
|
this->shstrtab_.add_with_length(".shstrtab",
|
||
|
sizeof(".shstrtab") - 1,
|
||
|
false, NULL);
|
||
|
this->shstrtab_.set_string_offsets();
|
||
|
section_size_type shstrtab_len = this->shstrtab_.get_strtab_size();
|
||
|
buf = new unsigned char[shstrtab_len];
|
||
|
this->shstrtab_.write_to_buffer(buf, shstrtab_len);
|
||
|
off_t shstrtab_off = file_offset;
|
||
|
::fseek(this->fd_, file_offset, 0);
|
||
|
if (::fwrite(buf, 1, shstrtab_len, this->fd_) < shstrtab_len)
|
||
|
gold_fatal(_("%s: error writing section '.shstrtab'"), this->name_);
|
||
|
delete[] buf;
|
||
|
file_offset += shstrtab_len;
|
||
|
|
||
|
// Write the section header table. The first entry is a NULL entry.
|
||
|
// This is followed by the debug sections, and finally we write the
|
||
|
// .shstrtab section header.
|
||
|
file_offset = align_offset(file_offset, this->size_ == 32 ? 4 : 8);
|
||
|
this->shoff_ = file_offset;
|
||
|
::fseek(this->fd_, file_offset, 0);
|
||
|
section_size_type sh0_size = 0;
|
||
|
unsigned int sh0_link = 0;
|
||
|
if (this->shnum_ >= elfcpp::SHN_LORESERVE)
|
||
|
sh0_size = this->shnum_;
|
||
|
if (this->shstrndx_ >= elfcpp::SHN_LORESERVE)
|
||
|
sh0_link = this->shstrndx_;
|
||
|
this->write_shdr(NULL, 0, 0, 0, 0, sh0_size, sh0_link, 0, 0, 0);
|
||
|
for (unsigned int i = 0; i < this->sections_.size(); ++i)
|
||
|
{
|
||
|
Section& sect = this->sections_[i];
|
||
|
this->write_shdr(sect.name, elfcpp::SHT_PROGBITS, 0, 0, sect.offset,
|
||
|
sect.size, 0, 0, sect.align, 0);
|
||
|
}
|
||
|
this->write_shdr(shstrtab_name, elfcpp::SHT_STRTAB, 0, 0,
|
||
|
shstrtab_off, shstrtab_len, 0, 0, 1, 0);
|
||
|
|
||
|
// Write the ELF header.
|
||
|
this->write_ehdr();
|
||
|
|
||
|
// Close the file.
|
||
|
if (this->fd_ != NULL)
|
||
|
{
|
||
|
if (::fclose(this->fd_) != 0)
|
||
|
gold_fatal(_("%s: %s"), this->name_, strerror(errno));
|
||
|
}
|
||
|
this->fd_ = NULL;
|
||
|
}
|
||
|
|
||
|
// Write a CU or TU index section.
|
||
|
template<bool big_endian>
|
||
|
void
|
||
|
Dwp_output_file::write_index(const char* sect_name, const Dwp_index& index)
|
||
|
{
|
||
|
const unsigned int nslots = index.hash_table_total_slots();
|
||
|
const unsigned int nused = index.hash_table_used_slots();
|
||
|
const unsigned int npool = index.shndx_pool_size();
|
||
|
const section_size_type index_size = (4 * sizeof(uint32_t)
|
||
|
+ nslots * sizeof(uint64_t)
|
||
|
+ nslots * sizeof(uint32_t)
|
||
|
+ npool * sizeof(uint32_t));
|
||
|
|
||
|
// Allocate a buffer for the section contents.
|
||
|
unsigned char* buf = new unsigned char[index_size];
|
||
|
unsigned char* p = buf;
|
||
|
|
||
|
// Write the section header: version number, padding,
|
||
|
// number of used slots and total number of slots.
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::writeval(p, 1);
|
||
|
p += sizeof(uint32_t);
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::writeval(p, 0);
|
||
|
p += sizeof(uint32_t);
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::writeval(p, nused);
|
||
|
p += sizeof(uint32_t);
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::writeval(p, nslots);
|
||
|
p += sizeof(uint32_t);
|
||
|
|
||
|
// Write the hash table.
|
||
|
for (unsigned int i = 0; i < nslots; ++i)
|
||
|
{
|
||
|
elfcpp::Swap_unaligned<64, big_endian>::writeval(p, index.hash_table(i));
|
||
|
p += sizeof(uint64_t);
|
||
|
}
|
||
|
|
||
|
// Write the parallel index table.
|
||
|
for (unsigned int i = 0; i < nslots; ++i)
|
||
|
{
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::writeval(p, index.index_table(i));
|
||
|
p += sizeof(uint32_t);
|
||
|
}
|
||
|
|
||
|
// Write the section index pool.
|
||
|
Dwp_index::Shndx_pool::const_iterator pool = index.shndx_pool();
|
||
|
for (unsigned int i = 0; i < npool; ++i)
|
||
|
{
|
||
|
gold_assert(pool != index.shndx_pool_end());
|
||
|
elfcpp::Swap_unaligned<32, big_endian>::writeval(p, *pool);
|
||
|
p += sizeof(uint32_t);
|
||
|
++pool;
|
||
|
}
|
||
|
|
||
|
gold_assert(p == buf + index_size);
|
||
|
|
||
|
this->add_section(sect_name, buf, index_size, sizeof(uint64_t));
|
||
|
|
||
|
delete[] buf;
|
||
|
}
|
||
|
|
||
|
// Write the ELF header.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::write_ehdr()
|
||
|
{
|
||
|
if (this->size_ == 32)
|
||
|
{
|
||
|
if (this->big_endian_)
|
||
|
return this->sized_write_ehdr<32, true>();
|
||
|
else
|
||
|
return this->sized_write_ehdr<32, false>();
|
||
|
}
|
||
|
else if (this->size_ == 64)
|
||
|
{
|
||
|
if (this->big_endian_)
|
||
|
return this->sized_write_ehdr<64, true>();
|
||
|
else
|
||
|
return this->sized_write_ehdr<64, false>();
|
||
|
}
|
||
|
else
|
||
|
gold_unreachable();
|
||
|
}
|
||
|
|
||
|
template<unsigned int size, bool big_endian>
|
||
|
void
|
||
|
Dwp_output_file::sized_write_ehdr()
|
||
|
{
|
||
|
const unsigned int ehdr_size = elfcpp::Elf_sizes<size>::ehdr_size;
|
||
|
unsigned char buf[ehdr_size];
|
||
|
elfcpp::Ehdr_write<size, big_endian> ehdr(buf);
|
||
|
|
||
|
unsigned char e_ident[elfcpp::EI_NIDENT];
|
||
|
memset(e_ident, 0, elfcpp::EI_NIDENT);
|
||
|
e_ident[elfcpp::EI_MAG0] = elfcpp::ELFMAG0;
|
||
|
e_ident[elfcpp::EI_MAG1] = elfcpp::ELFMAG1;
|
||
|
e_ident[elfcpp::EI_MAG2] = elfcpp::ELFMAG2;
|
||
|
e_ident[elfcpp::EI_MAG3] = elfcpp::ELFMAG3;
|
||
|
if (size == 32)
|
||
|
e_ident[elfcpp::EI_CLASS] = elfcpp::ELFCLASS32;
|
||
|
else if (size == 64)
|
||
|
e_ident[elfcpp::EI_CLASS] = elfcpp::ELFCLASS64;
|
||
|
else
|
||
|
gold_unreachable();
|
||
|
e_ident[elfcpp::EI_DATA] = (big_endian
|
||
|
? elfcpp::ELFDATA2MSB
|
||
|
: elfcpp::ELFDATA2LSB);
|
||
|
e_ident[elfcpp::EI_VERSION] = elfcpp::EV_CURRENT;
|
||
|
ehdr.put_e_ident(e_ident);
|
||
|
|
||
|
ehdr.put_e_type(elfcpp::ET_REL);
|
||
|
ehdr.put_e_machine(this->machine_);
|
||
|
ehdr.put_e_version(elfcpp::EV_CURRENT);
|
||
|
ehdr.put_e_entry(0);
|
||
|
ehdr.put_e_phoff(0);
|
||
|
ehdr.put_e_shoff(this->shoff_);
|
||
|
ehdr.put_e_flags(0);
|
||
|
ehdr.put_e_ehsize(elfcpp::Elf_sizes<size>::ehdr_size);
|
||
|
ehdr.put_e_phentsize(0);
|
||
|
ehdr.put_e_phnum(0);
|
||
|
ehdr.put_e_shentsize(elfcpp::Elf_sizes<size>::shdr_size);
|
||
|
ehdr.put_e_shnum(this->shnum_ < elfcpp::SHN_LORESERVE ? this->shnum_ : 0);
|
||
|
ehdr.put_e_shstrndx(this->shstrndx_ < elfcpp::SHN_LORESERVE
|
||
|
? this->shstrndx_
|
||
|
: static_cast<unsigned int>(elfcpp::SHN_XINDEX));
|
||
|
|
||
|
::fseek(this->fd_, 0, 0);
|
||
|
if (::fwrite(buf, 1, ehdr_size, this->fd_) < ehdr_size)
|
||
|
gold_fatal(_("%s: error writing ELF header"), this->name_);
|
||
|
}
|
||
|
|
||
|
// Write a section header.
|
||
|
|
||
|
void
|
||
|
Dwp_output_file::write_shdr(const char* name, unsigned int type,
|
||
|
unsigned int flags, uint64_t addr, off_t offset,
|
||
|
section_size_type sect_size, unsigned int link,
|
||
|
unsigned int info, unsigned int align,
|
||
|
unsigned int ent_size)
|
||
|
{
|
||
|
if (this->size_ == 32)
|
||
|
{
|
||
|
if (this->big_endian_)
|
||
|
return this->sized_write_shdr<32, true>(name, type, flags, addr,
|
||
|
offset, sect_size, link, info,
|
||
|
align, ent_size);
|
||
|
else
|
||
|
return this->sized_write_shdr<32, false>(name, type, flags, addr,
|
||
|
offset, sect_size, link, info,
|
||
|
align, ent_size);
|
||
|
}
|
||
|
else if (this->size_ == 64)
|
||
|
{
|
||
|
if (this->big_endian_)
|
||
|
return this->sized_write_shdr<64, true>(name, type, flags, addr,
|
||
|
offset, sect_size, link, info,
|
||
|
align, ent_size);
|
||
|
else
|
||
|
return this->sized_write_shdr<64, false>(name, type, flags, addr,
|
||
|
offset, sect_size, link, info,
|
||
|
align, ent_size);
|
||
|
}
|
||
|
else
|
||
|
gold_unreachable();
|
||
|
}
|
||
|
|
||
|
template<unsigned int size, bool big_endian>
|
||
|
void
|
||
|
Dwp_output_file::sized_write_shdr(const char* name, unsigned int type,
|
||
|
unsigned int flags, uint64_t addr,
|
||
|
off_t offset, section_size_type sect_size,
|
||
|
unsigned int link, unsigned int info,
|
||
|
unsigned int align, unsigned int ent_size)
|
||
|
{
|
||
|
const unsigned int shdr_size = elfcpp::Elf_sizes<size>::shdr_size;
|
||
|
unsigned char buf[shdr_size];
|
||
|
elfcpp::Shdr_write<size, big_endian> shdr(buf);
|
||
|
|
||
|
shdr.put_sh_name(name == NULL ? 0 : this->shstrtab_.get_offset(name));
|
||
|
shdr.put_sh_type(type);
|
||
|
shdr.put_sh_flags(flags);
|
||
|
shdr.put_sh_addr(addr);
|
||
|
shdr.put_sh_offset(offset);
|
||
|
shdr.put_sh_size(sect_size);
|
||
|
shdr.put_sh_link(link);
|
||
|
shdr.put_sh_info(info);
|
||
|
shdr.put_sh_addralign(align);
|
||
|
shdr.put_sh_entsize(ent_size);
|
||
|
if (::fwrite(buf, 1, shdr_size, this->fd_) < shdr_size)
|
||
|
gold_fatal(_("%s: error writing section header table"), this->name_);
|
||
|
}
|
||
|
|
||
|
// Class Dwo_name_info_reader.
|
||
|
|
||
|
// Visit a compilation unit.
|
||
|
|
||
|
void
|
||
|
Dwo_name_info_reader::visit_compilation_unit(off_t, off_t, Dwarf_die* die)
|
||
|
{
|
||
|
const char* dwo_name = die->string_attribute(elfcpp::DW_AT_GNU_dwo_name);
|
||
|
if (dwo_name != NULL)
|
||
|
this->files_->push_back(dwo_name);
|
||
|
}
|
||
|
|
||
|
// Class Dwo_id_info_reader.
|
||
|
|
||
|
// Visit a compilation unit.
|
||
|
|
||
|
void
|
||
|
Dwo_id_info_reader::visit_compilation_unit(off_t, off_t, Dwarf_die* die)
|
||
|
{
|
||
|
this->dwo_id_ = die->uint_attribute(elfcpp::DW_AT_GNU_dwo_id);
|
||
|
if (this->dwo_id_ != 0)
|
||
|
this->dwo_id_found_ = true;
|
||
|
}
|
||
|
|
||
|
// Visit a type unit.
|
||
|
|
||
|
void
|
||
|
Dwo_id_info_reader::visit_type_unit(off_t, off_t, uint64_t signature,
|
||
|
Dwarf_die*)
|
||
|
{
|
||
|
this->type_sig_ = signature;
|
||
|
this->type_sig_found_ = true;
|
||
|
}
|
||
|
|
||
|
}; // End namespace gold
|
||
|
|
||
|
using namespace gold;
|
||
|
|
||
|
// Options.
|
||
|
|
||
|
struct option dwp_options[] =
|
||
|
{
|
||
|
{ "exec", required_argument, NULL, 'e' },
|
||
|
{ "help", no_argument, NULL, 'h' },
|
||
|
{ "output", required_argument, NULL, 'o' },
|
||
|
{ "verbose", no_argument, NULL, 'v' },
|
||
|
{ "version", no_argument, NULL, 'V' },
|
||
|
{ NULL, 0, NULL, 0 }
|
||
|
};
|
||
|
|
||
|
// Print usage message and exit.
|
||
|
|
||
|
static void
|
||
|
usage(FILE* fd, int exit_status)
|
||
|
{
|
||
|
fprintf(fd, _("Usage: %s [options] [file...]\n"), program_name);
|
||
|
fprintf(fd, _(" -h, --help Print this help message\n"));
|
||
|
fprintf(fd, _(" -e EXE, --exec EXE Get list of dwo files from EXE"
|
||
|
" (defaults output to EXE.dwp)\n"));
|
||
|
fprintf(fd, _(" -o FILE, --output FILE Set output dwp file name\n"));
|
||
|
fprintf(fd, _(" -v, --verbose Verbose output\n"));
|
||
|
fprintf(fd, _(" -V, --version Print version number\n"));
|
||
|
|
||
|
// REPORT_BUGS_TO is defined in bfd/bfdver.h.
|
||
|
const char* report = REPORT_BUGS_TO;
|
||
|
if (*report != '\0')
|
||
|
fprintf(fd, _("\nReport bugs to %s\n"), report);
|
||
|
exit(exit_status);
|
||
|
}
|
||
|
|
||
|
// Report version information.
|
||
|
|
||
|
static void
|
||
|
print_version()
|
||
|
{
|
||
|
// This output is intended to follow the GNU standards.
|
||
|
printf("GNU dwp %s\n", BFD_VERSION_STRING);
|
||
|
printf(_("Copyright 2012 Free Software Foundation, Inc.\n"));
|
||
|
printf(_("\
|
||
|
This program is free software; you may redistribute it under the terms of\n\
|
||
|
the GNU General Public License version 3 or (at your option) any later version.\n\
|
||
|
This program has absolutely no warranty.\n"));
|
||
|
exit(EXIT_SUCCESS);
|
||
|
}
|
||
|
|
||
|
// Main program.
|
||
|
|
||
|
int
|
||
|
main(int argc, char** argv)
|
||
|
{
|
||
|
#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
|
||
|
setlocale(LC_MESSAGES, "");
|
||
|
#endif
|
||
|
#if defined (HAVE_SETLOCALE)
|
||
|
setlocale(LC_CTYPE, "");
|
||
|
#endif
|
||
|
bindtextdomain(PACKAGE, LOCALEDIR);
|
||
|
textdomain(PACKAGE);
|
||
|
|
||
|
program_name = argv[0];
|
||
|
|
||
|
// Initialize the global parameters, to let random code get to the
|
||
|
// errors object.
|
||
|
Errors errors(program_name);
|
||
|
set_parameters_errors(&errors);
|
||
|
|
||
|
// Initialize gold's global options. We don't use these in
|
||
|
// this program, but they need to be initialized so that
|
||
|
// functions we call from libgold work properly.
|
||
|
General_options options;
|
||
|
set_parameters_options(&options);
|
||
|
|
||
|
// In libiberty; expands @filename to the args in "filename".
|
||
|
expandargv(&argc, &argv);
|
||
|
|
||
|
// Collect file names and options.
|
||
|
File_list files;
|
||
|
std::string output_filename;
|
||
|
const char* exe_filename = NULL;
|
||
|
bool verbose = false;
|
||
|
int c;
|
||
|
while ((c = getopt_long(argc, argv, "e:ho:vV", dwp_options, NULL)) != -1)
|
||
|
{
|
||
|
switch (c)
|
||
|
{
|
||
|
case 'h':
|
||
|
usage(stdout, EXIT_SUCCESS);
|
||
|
case 'e':
|
||
|
exe_filename = optarg;
|
||
|
break;
|
||
|
case 'o':
|
||
|
output_filename.assign(optarg);
|
||
|
break;
|
||
|
case 'v':
|
||
|
verbose = true;
|
||
|
break;
|
||
|
case 'V':
|
||
|
print_version();
|
||
|
case '?':
|
||
|
default:
|
||
|
usage(stderr, EXIT_FAILURE);
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if (output_filename.empty())
|
||
|
{
|
||
|
if (exe_filename == NULL)
|
||
|
gold_fatal(_("no output file specified"));
|
||
|
output_filename.assign(exe_filename);
|
||
|
output_filename.append(".dwp");
|
||
|
}
|
||
|
|
||
|
Dwp_output_file output_file(output_filename.c_str());
|
||
|
|
||
|
// Get list of .dwo files from the executable.
|
||
|
if (exe_filename != NULL)
|
||
|
{
|
||
|
Dwo_file exe_file(exe_filename);
|
||
|
exe_file.read_executable(&files);
|
||
|
}
|
||
|
|
||
|
// Add any additional files listed on command line.
|
||
|
for (int i = optind; i < argc; ++i)
|
||
|
files.push_back(argv[i]);
|
||
|
|
||
|
if (exe_filename == NULL && files.empty())
|
||
|
gold_fatal(_("no input files and no executable specified"));
|
||
|
|
||
|
// Process each file, adding its contents to the output file.
|
||
|
for (File_list::const_iterator f = files.begin(); f != files.end(); ++f)
|
||
|
{
|
||
|
if (verbose)
|
||
|
fprintf(stderr, "%s\n", f->c_str());
|
||
|
Dwo_file dwo_file(f->c_str());
|
||
|
dwo_file.read(&output_file);
|
||
|
}
|
||
|
|
||
|
output_file.finalize();
|
||
|
|
||
|
return EXIT_SUCCESS;
|
||
|
}
|