[thirdparty/binutils-gdb.git] / gold / testsuite / binary_unittest.cc

// binary_unittest.cc -- test Binary_to_elf

// Copyright 2008 Free Software Foundation, Inc.
// Written by Ian Lance Taylor <iant@google.com>.

// This file is part of gold.

// 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 "gold.h"

#include <unistd.h>
#include <sys/types.h>
#include <sys/stat.h>
#include <fcntl.h>

#include "elfcpp.h"
#include "parameters.h"
#include "errors.h"
#include "options.h"
#include "binary.h"
#include "object.h"

#include "test.h"
#include "testfile.h"

namespace gold_testsuite
{

using namespace gold;

template<int size, bool big_endian>
bool
Sized_binary_test(Target* target)
{
  // We need a pretend Task.
  const Task* task = reinterpret_cast<const Task*>(-1);

  // Use the executable itself as the binary data.
  struct stat st;
  CHECK(::stat(gold::program_name, &st) == 0);
  int o = ::open(gold::program_name, O_RDONLY);
  CHECK(o >= 0);
  unsigned char* filedata = new unsigned char[st.st_size];
  CHECK(::read(o, filedata, st.st_size) == st.st_size);
  CHECK(::close(o) == 0);

  Binary_to_elf binary(static_cast<elfcpp::EM>(0xffff), size, big_endian,
		       gold::program_name);

  CHECK(binary.convert(task));

  Input_file input_file(task, "test.o", binary.converted_data(),
			binary.converted_size());
  Object* object = make_elf_object("test.o", &input_file, 0,
				   binary.converted_data(),
				   binary.converted_size(), NULL);
  CHECK(object != NULL);
  if (object == NULL)
    return false;

  CHECK(!object->is_dynamic());
  CHECK(object->target() == target);
  CHECK(object->shnum() == 5);
  CHECK(object->section_name(1) == ".data");
  CHECK(object->section_flags(1) == (elfcpp::SHF_ALLOC | elfcpp::SHF_WRITE));
  section_size_type len;
  const unsigned char* contents = object->section_contents(1, &len, false);
  CHECK(len == convert_to_section_size_type(st.st_size));
  CHECK(memcmp(filedata, contents, len) == 0);

  // Force the symbols to be read internally, so that
  // symbol_section_and_value will work.
  Read_symbols_data sd;
  object->read_symbols(&sd);
  delete sd.section_headers;
  delete sd.section_names;
  delete sd.symbols;
  delete sd.symbol_names;

  Sized_relobj<size, big_endian>* relobj =
    static_cast<Sized_relobj<size, big_endian>*>(object);
  typename Sized_relobj<size, big_endian>::Address value;
  bool is_ordinary;
  CHECK(relobj->symbol_section_and_value(0, &value, &is_ordinary) == 0);
  CHECK(is_ordinary);
  CHECK(value == 0);
  CHECK(relobj->symbol_section_and_value(1, &value, &is_ordinary) == 1);
  CHECK(is_ordinary);
  CHECK(value == 0);
  CHECK(relobj->symbol_section_and_value(2, &value, &is_ordinary) == 1);
  CHECK(is_ordinary);
  CHECK(static_cast<off_t>(value) == st.st_size);
  CHECK(relobj->symbol_section_and_value(3, &value, &is_ordinary)
	== elfcpp::SHN_ABS);
  CHECK(!is_ordinary);
  CHECK(static_cast<off_t>(value) == st.st_size);

  object->unlock(task);
  return true;
}

bool
Binary_test(Test_report*)
{
  Errors errors(gold::program_name);
  set_parameters_errors(&errors);

  General_options options;
  set_parameters_options(&options);

  int fail = 0;

#ifdef HAVE_TARGET_32_LITTLE
  if (!Sized_binary_test<32, false>(target_test_pointer_32_little))
    ++fail;
#endif

#ifdef HAVE_TARGET_32_BIG
  if (!Sized_binary_test<32, true>(target_test_pointer_32_big))
    ++fail;
#endif

#ifdef HAVE_TARGET_64_LITTLE
  if (!Sized_binary_test<64, false>(target_test_pointer_64_little))
    ++fail;
#endif

#ifdef HAVE_TARGET_64_BIG
  if (!Sized_binary_test<64, true>(target_test_pointer_64_big))
    ++fail;
#endif

  return fail == 0;
}

Register_test binary_register("Binary", Binary_test);

} // End namespace gold_testsuite.
Commit	Line	Data
bc644c6c ILT	1	// binary_unittest.cc -- test Binary_to_elf
	2
	3	// Copyright 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 <unistd.h>
	26	#include <sys/types.h>
	27	#include <sys/stat.h>
	28	#include <fcntl.h>
	29
	30	#include "elfcpp.h"
	31	#include "parameters.h"
	32	#include "errors.h"
	33	#include "options.h"
	34	#include "binary.h"
	35	#include "object.h"
	36
	37	#include "test.h"
	38	#include "testfile.h"
	39
	40	namespace gold_testsuite
	41	{
	42
	43	using namespace gold;
	44
	45	template<int size, bool big_endian>
	46	bool
	47	Sized_binary_test(Target* target)
	48	{
	49	// We need a pretend Task.
	50	const Task* task = reinterpret_cast<const Task*>(-1);
	51
	52	// Use the executable itself as the binary data.
	53	struct stat st;
	54	CHECK(::stat(gold::program_name, &st) == 0);
	55	int o = ::open(gold::program_name, O_RDONLY);
	56	CHECK(o >= 0);
	57	unsigned char* filedata = new unsigned char[st.st_size];
	58	CHECK(::read(o, filedata, st.st_size) == st.st_size);
	59	CHECK(::close(o) == 0);
	60
	61	Binary_to_elf binary(static_cast<elfcpp::EM>(0xffff), size, big_endian,
	62	gold::program_name);
	63
	64	CHECK(binary.convert(task));
65
66	Input_file input_file(task, "test.o", binary.converted_data(),
67	binary.converted_size());
68	Object* object = make_elf_object("test.o", &input_file, 0,
69	binary.converted_data(),
15f8229b	70	binary.converted_size(), NULL);
bc644c6c ILT	71	CHECK(object != NULL);
	72	if (object == NULL)
	73	return false;
	74
	75	CHECK(!object->is_dynamic());
	76	CHECK(object->target() == target);
	77	CHECK(object->shnum() == 5);
	78	CHECK(object->section_name(1) == ".data");
03df6b32	79	CHECK(object->section_flags(1) == (elfcpp::SHF_ALLOC \| elfcpp::SHF_WRITE));
bc644c6c ILT	80	section_size_type len;
bc644c6c ILT	81	const unsigned char* contents = object->section_contents(1, &len, false);
03df6b32	82	CHECK(len == convert_to_section_size_type(st.st_size));
bc644c6c ILT	83	CHECK(memcmp(filedata, contents, len) == 0);
	84
	85	// Force the symbols to be read internally, so that
	86	// symbol_section_and_value will work.
	87	Read_symbols_data sd;
	88	object->read_symbols(&sd);
	89	delete sd.section_headers;
	90	delete sd.section_names;
	91	delete sd.symbols;
	92	delete sd.symbol_names;
	93
	94	Sized_relobj<size, big_endian>* relobj =
	95	static_cast<Sized_relobj<size, big_endian>*>(object);
	96	typename Sized_relobj<size, big_endian>::Address value;
d491d34e ILT	97	bool is_ordinary;
	98	CHECK(relobj->symbol_section_and_value(0, &value, &is_ordinary) == 0);
	99	CHECK(is_ordinary);
bc644c6c	100	CHECK(value == 0);
d491d34e ILT	101	CHECK(relobj->symbol_section_and_value(1, &value, &is_ordinary) == 1);
d491d34e ILT	102	CHECK(is_ordinary);
bc644c6c	103	CHECK(value == 0);
d491d34e ILT	104	CHECK(relobj->symbol_section_and_value(2, &value, &is_ordinary) == 1);
d491d34e ILT	105	CHECK(is_ordinary);
bc644c6c	106	CHECK(static_cast<off_t>(value) == st.st_size);
d491d34e ILT	107	CHECK(relobj->symbol_section_and_value(3, &value, &is_ordinary)
	108	== elfcpp::SHN_ABS);
	109	CHECK(!is_ordinary);
bc644c6c ILT	110	CHECK(static_cast<off_t>(value) == st.st_size);
	111
	112	object->unlock(task);
	113	return true;
	114	}
	115
	116	bool
	117	Binary_test(Test_report*)
	118	{
	119	Errors errors(gold::program_name);
8851ecca	120	set_parameters_errors(&errors);
bc644c6c	121
a5dc0706	122	General_options options;
8851ecca	123	set_parameters_options(&options);
bc644c6c ILT	124
	125	int fail = 0;
	126
	127	#ifdef HAVE_TARGET_32_LITTLE
	128	if (!Sized_binary_test<32, false>(target_test_pointer_32_little))
	129	++fail;
	130	#endif
	131
	132	#ifdef HAVE_TARGET_32_BIG
	133	if (!Sized_binary_test<32, true>(target_test_pointer_32_big))
	134	++fail;
	135	#endif
	136
	137	#ifdef HAVE_TARGET_64_LITTLE
	138	if (!Sized_binary_test<64, false>(target_test_pointer_64_little))
	139	++fail;
	140	#endif
	141
	142	#ifdef HAVE_TARGET_64_BIG
	143	if (!Sized_binary_test<64, true>(target_test_pointer_64_big))
	144	++fail;
	145	#endif
	146
	147	return fail == 0;
	148	}
	149
	150	Register_test binary_register("Binary", Binary_test);
	151
	152	} // End namespace gold_testsuite.