2014-01-07 14:34:42 +00:00
|
|
|
// -*- Mode: C++ -*-
|
|
|
|
//
|
2014-10-16 21:32:08 +00:00
|
|
|
// Copyright (C) 2013-2014 Red Hat, Inc.
|
2014-01-07 14:34:42 +00:00
|
|
|
//
|
|
|
|
// 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-06-19 06:43:54 +00:00
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test3.so",
|
|
|
|
"data/test-read-dwarf/test3.so.abi",
|
|
|
|
"output/test-read-dwarf/test3.so.abi"
|
|
|
|
},
|
2014-06-22 22:31:19 +00:00
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test4.so",
|
|
|
|
"data/test-read-dwarf/test4.so.abi",
|
|
|
|
"output/test-read-dwarf/test4.so.abi"
|
|
|
|
},
|
2014-06-23 15:24:54 +00:00
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test5.o",
|
|
|
|
"data/test-read-dwarf/test5.o.abi",
|
|
|
|
"output/test-read-dwarf/test5.o.abi"
|
|
|
|
},
|
2014-07-01 11:57:00 +00:00
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test6.so",
|
|
|
|
"data/test-read-dwarf/test6.so.abi",
|
|
|
|
"output/test-read-dwarf/test6.so.abi"
|
|
|
|
},
|
Support C and C++ array type.
* include/abg-comparison.h (array_diff): Declare new class.
(array_diff_sptr): Shared pointer to type array_diff.
(compute_diff): Overload the function to take type
array_diff_sptr as the first two arguments.
* include/abg-fwd.h (array_type_def): Declare new class.
(subrange_type): Likewise.
(is_array_def): Declare new function.
* include/abg-ir.h (array_type_def_sptr): Shared pointer
to type array_type_def.
(array_type_def): Declare new class.
(ir_node_visitor::visit): Declare a new virtual function
taking a pointer to type array_type_def as an argument.
* src/abg-comparison.cc (compute_diff_for_types): Add
try_to_diff for two instances of type array_type_def.
(array_diff::priv): declare struct for holding private members
of type array_diff.
(array_diff::array_diff): Define constructor.
(array_diff::{first,second}_array):Define new
member functions.
(array_diff::element_type_diff): Likewise.
(array_diff::{length,report,traverse}): Likewise.
(compute_diff): Define function overloaded in
include/abg-comparison.h.
* src/abg-dwarf-reader.cc (build_array_type): Define new
function. Handle DW_TAG_array_type and DW_TAG_subrange type.
(build_ir_node_from_die): Amend case DW_TAG_array_type with
a call to build_array_type.
* src/abg-hash.cc (array_type_def::hash): Declare new struct.
(type_base::dynamic_hash::operator()): Attempt to dynamic_cast
the argument to type array_type_def as well.
(array_type_def::hash): Declare new struct.
* src/abg-ir.cc (array_type_def::array_type_def): Define
constructors.
(array_type_def::priv): declare struct for holding private members
of type array_type_def.
(array_type_def::operator==(const decl_base&):
Define new operator.
(array_type_def::operator==(const type_base&):
Likewise.
(array_type_def::append_subrange{,s}): Define
new functions.
(array_type_def::{set,get}_size_in_bits): Likewise.
(array_type_def::get_dimension_count): Likewise.
(array_type_def::get_qualified_name): Likewise.
(array_type_def::get_pretty_representation): Likewise.
(array_type_def::get_subrange_representation): Likewise.
(array_type_def::traverse): Likewise.
(array_type_def::get_{element_type,location,subranges}): Likewise.
(array_type_def::is_infinite): Likewise.
(array_type_def::~array_type_def): Define destructor.
(ir_node_visitor::visit): Define function, taking
pointer to array_type_def as an argument.
* src/abg-reader.cc (map_id_and_node): Check if node
is an array.
(is_array_def): Check if object is an array.
(handle_element_node): Handle array_type_def as well.
(build_subrange_type): Define new function.
(build_array_type_def): Likewise.
(build_type): Build type array_type_def as well.
(build_type_composition): Likewise.
(handle_array_type_def): Define new function.
* src/abg-writer.cc: (write_decl): Output arrays
as well.
(write_member_type): Likewise.
(write_type_composition): Likewise.
(write_array_type_def): Define new function.
* tests/data/test-diff-dwarf/test{10,11}-v{0,1}.{cc,o}: New test source
files
* tests/data/test-diff-dwarf/test{10,11}-report.txt: Likewise.
* tests/data/test-diff-dwarf/test10-report.txt: New test input.
* tests/data/test-read-dwarf/test7.cc: New test source
file.
* tests/data/test-read-dwarf/test7.so: New input binary
to read.
* tests/data/test-read-dwarf/test7.so.abi: New reference
test to compare against.
* tests/data/test-read-write/test25.xml: New test source
file.
* tests/test-diff-dwarf.cc: Adjust to launch the new test.
* tests/test-read-dwarf.cc: Likewise.
* tests/test-read-write.cc: Likewise.
* test/Makefile.am: Add the new test inputs to the source
distribution.
Signed-off-by: Ondrej Oprala <ooprala@redhat.com>
Signed-off-by: Dodji Seketeli <dodji@redhat.com>
2014-08-18 09:56:43 +00:00
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test7.so",
|
|
|
|
"data/test-read-dwarf/test7.so.abi",
|
|
|
|
"output/test-read-dwarf/test7.so.abi"
|
|
|
|
},
|
2014-10-16 21:32:08 +00:00
|
|
|
{
|
|
|
|
"data/test-read-dwarf/test8-qualified-this-pointer.so",
|
|
|
|
"data/test-read-dwarf/test8-qualified-this-pointer.so.abi",
|
|
|
|
"output/test-read-dwarf/test8-qualified-this-pointer.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;
|
|
|
|
}
|