2014-01-07 14:34:42 +00:00
|
|
|
// -*- Mode: C++ -*-
|
|
|
|
//
|
|
|
|
// Copyright (C) 2013 Red Hat, Inc.
|
|
|
|
//
|
|
|
|
// This file is part of the GNU Application Binary Interface Generic
|
|
|
|
// Analysis and Instrumentation Library (libabigail). This library is
|
|
|
|
// free software; you can redistribute it and/or modify it under the
|
|
|
|
// terms of the GNU Lesser General Public License as published by the
|
|
|
|
// Free Software Foundation; either version 3, or (at your option) any
|
|
|
|
// later version.
|
|
|
|
|
|
|
|
// This library 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 Lesser Public License for more details.
|
|
|
|
|
|
|
|
// You should have received a copy of the GNU Lesser General Public
|
|
|
|
// License along with this program; see the file COPYING-LGPLV3. If
|
|
|
|
// not, see <http://www.gnu.org/licenses/>.
|
|
|
|
|
|
|
|
// Author: Dodji Seketeli
|
|
|
|
|
|
|
|
/// @file read ELF binaries containing DWARF, save them in XML corpus
|
|
|
|
/// files and diff the corpus files against reference XML corpus
|
|
|
|
/// files.
|
|
|
|
|
|
|
|
#include <string>
|
|
|
|
#include <fstream>
|
|
|
|
#include <iostream>
|
|
|
|
#include <cstdlib>
|
|
|
|
#include "abg-ir.h"
|
|
|
|
#include "abg-dwarf-reader.h"
|
|
|
|
#include "abg-writer.h"
|
|
|
|
#include "abg-tools-utils.h"
|
|
|
|
#include "test-utils.h"
|
|
|
|
|
|
|
|
using std::string;
|
|
|
|
using std::ofstream;
|
|
|
|
using std::cerr;
|
|
|
|
|
|
|
|
/// This is an aggregate that specifies where a test shall get its
|
|
|
|
/// input from, and where it shall write its ouput to.
|
|
|
|
struct InOutSpec
|
|
|
|
{
|
|
|
|
const char* in_elf_path;
|
|
|
|
const char* in_abi_path;
|
|
|
|
const char* out_abi_path;
|
|
|
|
};// end struct InOutSpec
|
|
|
|
|
|
|
|
|
|
|
|
InOutSpec in_out_specs[] =
|
|
|
|
{
|
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test0",
|
|
|
|
"data/test-read-dwarf/test0.abi",
|
|
|
|
"output/test-read-dwarf/test0.abi"
|
|
|
|
},
|
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test1",
|
|
|
|
"data/test-read-dwarf/test1.abi",
|
|
|
|
"output/test-read-dwarf/test1.abi"
|
|
|
|
},
|
Initial support for DW_TAG_partial_unit
* src/abg-dwarf-reader.cc (read_context::cur_tu_die_): New member.
(read_context::read_context): Initialize the new member.
(read_context::cur_tu_die): New accessors.
(find_last_import_unit_point_before_die): New static function.
(get_parent_die): Take a logical current die offset parameter. If
the die we want the parent for is a partial unit, then find the
last DW_TAG_imported_unit that imports that partial unit before
the logical current die and return the parent of that
DW_TAG_imported_unit die.
(get_scope_for_die): Take a logical current die offset parameter.
Adjust.
(build_translation_unit_and_add_to_ir): Set/unset the current
translation unit DIE in the context. Adjust.
(build_namespace_decl_and_add_to_ir)
(build_class_type_and_add_to_ir, build_qualified_type)
(build_pointer_type_def, build_reference_type, build_typedef_type)
(build_var_decl, build_function_decl, build_ir_node_from_die):
Take a logical current die offset parameter. Adjust.
(build_corpus): Accept that we can have DIE that are not
DW_TAG_compile_unit at the top level, because, well, we can now
have DW_TAG_partial_unit too.
* tests/data/test-read-dwarf/test2-{0,1}.cc: New test source
files.
* tests/data/test-read-dwarf/test2.h: Likewise.
* tests/data/test-read-dwarf/test2.so: New input binary to read.
* tests/data/test-read-dwarf/test2.so.abi: New reference test to
compare against.
* tests/test-read-dwarf.cc: Adjust to launch the new test.
Signed-off-by: Dodji Seketeli <dodji@redhat.com>
2014-05-19 15:26:40 +00:00
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test2.so",
|
|
|
|
"data/test-read-dwarf/test2.so.abi",
|
|
|
|
"output/test-read-dwarf/test2.so.abi"
|
|
|
|
},
|
2014-01-07 14:34:42 +00:00
|
|
|
// This should be the last entry.
|
|
|
|
{NULL, NULL, NULL}
|
|
|
|
};
|
|
|
|
|
|
|
|
int
|
|
|
|
main()
|
|
|
|
{
|
|
|
|
unsigned result = 1;
|
|
|
|
|
|
|
|
bool is_ok = true;
|
|
|
|
string in_elf_path, in_abi_path, out_abi_path;
|
|
|
|
abigail::corpus_sptr corp;
|
|
|
|
|
|
|
|
for (InOutSpec* s = in_out_specs; s->in_elf_path; ++s)
|
|
|
|
{
|
|
|
|
in_elf_path = abigail::tests::get_src_dir() + "/tests/" + s->in_elf_path;
|
2014-06-04 14:30:18 +00:00
|
|
|
abigail::dwarf_reader::read_corpus_from_elf(in_elf_path,
|
|
|
|
/*debug_info_root_path=*/0,
|
|
|
|
corp);
|
2014-01-07 14:34:42 +00:00
|
|
|
if (!corp)
|
|
|
|
{
|
|
|
|
cerr << "failed to read " << in_elf_path << "\n";
|
|
|
|
is_ok = false;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
corp->set_path(s->in_elf_path);
|
|
|
|
|
|
|
|
out_abi_path =
|
|
|
|
abigail::tests::get_build_dir() + "/tests/" + s->out_abi_path;
|
|
|
|
if (!abigail::tools::ensure_parent_dir_created(out_abi_path))
|
|
|
|
{
|
|
|
|
cerr << "Could not create parent director for " << out_abi_path;
|
|
|
|
is_ok = false;
|
|
|
|
return result;
|
|
|
|
}
|
|
|
|
|
|
|
|
ofstream of(out_abi_path.c_str(), std::ios_base::trunc);
|
|
|
|
if (!of.is_open())
|
|
|
|
{
|
|
|
|
cerr << "failed to read " << out_abi_path << "\n";
|
|
|
|
is_ok = false;
|
|
|
|
continue;
|
|
|
|
}
|
|
|
|
|
|
|
|
bool r =
|
|
|
|
abigail::xml_writer::write_corpus_to_native_xml(corp,
|
|
|
|
/*indent=*/0,
|
|
|
|
of);
|
|
|
|
is_ok = (is_ok && r);
|
|
|
|
of.close();
|
|
|
|
|
|
|
|
in_abi_path = abigail::tests::get_src_dir() + "/tests/" + s->in_abi_path;
|
|
|
|
string cmd = "diff -u " + in_abi_path + " " + out_abi_path;
|
|
|
|
if (system(cmd.c_str()))
|
|
|
|
is_ok = false;
|
|
|
|
}
|
|
|
|
|
|
|
|
return !is_ok;
|
|
|
|
}
|