object_file.cc revision 2632:1bb2f91485ea 
1/*
2 * Copyright (c) 2002-2004 The Regents of The University of Michigan
3 * All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions are
7 * met: redistributions of source code must retain the above copyright
8 * notice, this list of conditions and the following disclaimer;
9 * redistributions in binary form must reproduce the above copyright
10 * notice, this list of conditions and the following disclaimer in the
11 * documentation and/or other materials provided with the distribution;
12 * neither the name of the copyright holders nor the names of its
13 * contributors may be used to endorse or promote products derived from
14 * this software without specific prior written permission.
15 *
16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
17 * "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
18 * LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
19 * A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
20 * OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
21 * SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
22 * LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27 */
28
29#include <list>
30#include <string>
31
32#include <sys/types.h>
33#include <sys/mman.h>
34#include <fcntl.h>
35#include <stdio.h>
36#include <unistd.h>
37
38#include "base/cprintf.hh"
39#include "base/loader/object_file.hh"
40#include "base/loader/symtab.hh"
41
42#include "base/loader/ecoff_object.hh"
43#include "base/loader/aout_object.hh"
44#include "base/loader/elf_object.hh"
45
46#include "mem/translating_port.hh"
47
48using namespace std;
49
50ObjectFile::ObjectFile(const string &_filename, int _fd,
51                       size_t _len, uint8_t *_data,
52                       Arch _arch, OpSys _opSys)
53    : filename(_filename), descriptor(_fd), fileData(_data), len(_len),
54      arch(_arch), opSys(_opSys)
55{
56}
57
58
59ObjectFile::~ObjectFile()
60{
61    close();
62}
63
64
65bool
66ObjectFile::loadSection(Section *sec, Port *memPort, Addr addrMask)
67{
68    if (sec->size != 0) {
69        Addr addr = sec->baseAddr & addrMask;
70        if (sec->fileImage) {
71            memPort->writeBlob(addr, sec->fileImage, sec->size);
72        }
73        else {
74            // no image: must be bss
75            memPort->memsetBlob(addr, 0, sec->size);
76        }
77    }
78    return true;
79}
80
81
82bool
83ObjectFile::loadSections(Port *memPort, Addr addrMask)
84{
85    return (loadSection(&text, memPort, addrMask)
86            && loadSection(&data, memPort, addrMask)
87            && loadSection(&bss, memPort, addrMask));
88}
89
90
91void
92ObjectFile::close()
93{
94    if (descriptor >= 0) {
95        ::close(descriptor);
96        descriptor = -1;
97    }
98
99    if (fileData) {
100        ::munmap(fileData, len);
101        fileData = NULL;
102    }
103}
104
105
106ObjectFile *
107createObjectFile(const string &fname)
108{
109    // open the file
110    int fd = open(fname.c_str(), O_RDONLY);
111    if (fd < 0) {
112        return NULL;
113    }
114
115    // find the length of the file by seeking to the end
116    size_t len = (size_t)lseek(fd, 0, SEEK_END);
117
118    // mmap the whole shebang
119    uint8_t *fileData =
120        (uint8_t *)mmap(NULL, len, PROT_READ, MAP_SHARED, fd, 0);
121    if (fileData == MAP_FAILED) {
122        close(fd);
123        return NULL;
124    }
125
126    ObjectFile *fileObj = NULL;
127
128    // figure out what we have here
129    if ((fileObj = EcoffObject::tryFile(fname, fd, len, fileData)) != NULL) {
130        return fileObj;
131    }
132
133    if ((fileObj = AoutObject::tryFile(fname, fd, len, fileData)) != NULL) {
134        return fileObj;
135    }
136
137    if ((fileObj = ElfObject::tryFile(fname, fd, len, fileData)) != NULL) {
138        return fileObj;
139    }
140
141    // don't know what it is
142    close(fd);
143    munmap(fileData, len);
144    return NULL;
145}
146