OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [binutils-2.20.1/] [gold/] [testsuite/] [binary_unittest.cc] - Blame information for rev 438

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 205 julius
// 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()
48
{
49
  parameters_clear_target();
50
  // We need a pretend Task.
51
  const Task* task = reinterpret_cast<const Task*>(-1);
52
 
53
  // Use the executable itself as the binary data.
54
  struct stat st;
55
  CHECK(::stat(gold::program_name, &st) == 0);
56
  int o = ::open(gold::program_name, O_RDONLY);
57
  CHECK(o >= 0);
58
  unsigned char* filedata = new unsigned char[st.st_size];
59
  CHECK(::read(o, filedata, st.st_size) == st.st_size);
60
  CHECK(::close(o) == 0);
61
 
62
  Binary_to_elf binary(static_cast<elfcpp::EM>(0xffff), size, big_endian,
63
                       gold::program_name);
64
 
65
  CHECK(binary.convert(task));
66
 
67
  Input_file input_file(task, "test.o", binary.converted_data(),
68
                        binary.converted_size());
69
  Object* object = make_elf_object("test.o", &input_file, 0,
70
                                   binary.converted_data(),
71
                                   binary.converted_size(), NULL);
72
  CHECK(object != NULL);
73
  if (object == NULL)
74
    return false;
75
 
76
  CHECK(!object->is_dynamic());
77
  CHECK(object->shnum() == 5);
78
  CHECK(object->section_name(1) == ".data");
79
  CHECK(object->section_flags(1) == (elfcpp::SHF_ALLOC | elfcpp::SHF_WRITE));
80
  section_size_type len;
81
  const unsigned char* contents = object->section_contents(1, &len, false);
82
  CHECK(len == convert_to_section_size_type(st.st_size));
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;
97
  bool is_ordinary;
98
  CHECK(relobj->symbol_section_and_value(0, &value, &is_ordinary) == 0);
99
  CHECK(is_ordinary);
100
  CHECK(value == 0);
101
  CHECK(relobj->symbol_section_and_value(1, &value, &is_ordinary) == 1);
102
  CHECK(is_ordinary);
103
  CHECK(value == 0);
104
  CHECK(relobj->symbol_section_and_value(2, &value, &is_ordinary) == 1);
105
  CHECK(is_ordinary);
106
  CHECK(static_cast<off_t>(value) == st.st_size);
107
  CHECK(relobj->symbol_section_and_value(3, &value, &is_ordinary)
108
        == elfcpp::SHN_ABS);
109
  CHECK(!is_ordinary);
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);
120
  set_parameters_errors(&errors);
121
 
122
  General_options options;
123
  set_parameters_options(&options);
124
 
125
  int fail = 0;
126
 
127
#ifdef HAVE_TARGET_32_LITTLE
128
  if (!Sized_binary_test<32, false>())
129
    ++fail;
130
  CHECK(&parameters->target() == target_test_pointer_32_little);
131
#endif
132
 
133
#ifdef HAVE_TARGET_32_BIG
134
  if (!Sized_binary_test<32, true>())
135
    ++fail;
136
  CHECK(&parameters->target() == target_test_pointer_32_big);
137
#endif
138
 
139
#ifdef HAVE_TARGET_64_LITTLE
140
  if (!Sized_binary_test<64, false>())
141
    ++fail;
142
  CHECK(&parameters->target() == target_test_pointer_64_little);
143
#endif
144
 
145
#ifdef HAVE_TARGET_64_BIG
146
  if (!Sized_binary_test<64, true>())
147
    ++fail;
148
  CHECK(&parameters->target() == target_test_pointer_64_big);
149
#endif
150
 
151
  return fail == 0;
152
}
153
 
154
Register_test binary_register("Binary", Binary_test);
155
 
156
} // End namespace gold_testsuite.

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.