1/*
2 * Copyright (c) 2003-2005 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 * Authors: Steve Reinhardt
29 */
30
31#include "base/loader/ecoff_object.hh"
32
33#include <string>
34
35#include "base/loader/symtab.hh"
36#include "base/logging.hh"
37#include "base/trace.hh"
38#include "base/types.hh"
39#include "debug/Loader.hh"
40
41// Only alpha will be able to load ecoff files for now.
42// base/types.hh and ecoff_machdep.h must be before the other .h files
43// because they are are gathered from other code bases and require some
44// typedefs from those files.
45#include "arch/alpha/ecoff_machdep.h"
46#include "base/loader/coff_sym.h"
47#include "base/loader/coff_symconst.h"
48#include "base/loader/exec_ecoff.h"
49
50using namespace std;
51
52ObjectFile *
53EcoffObject::tryFile(const string &fname, size_t len, uint8_t *data)
54{
55    if (((ecoff_filehdr *)data)->f_magic == ECOFF_MAGIC_ALPHA) {
56        // it's Alpha ECOFF
57        return new EcoffObject(fname, len, data,
58                               ObjectFile::Alpha, ObjectFile::Tru64);
59    }
60    else {
61        return NULL;
62    }
63}
64
65
66EcoffObject::EcoffObject(const string &_filename, size_t _len, uint8_t *_data,
67                         Arch _arch, OpSys _opSys)
68    : ObjectFile(_filename, _len, _data, _arch, _opSys)
69{
70    execHdr = (ecoff_exechdr *)fileData;
71    fileHdr = &(execHdr->f);
72    aoutHdr = &(execHdr->a);
73
74    entry = aoutHdr->entry;
75
76    text.baseAddr = aoutHdr->text_start;
77    text.size = aoutHdr->tsize;
78    text.fileImage = fileData + ECOFF_TXTOFF(execHdr);
79
80    data.baseAddr = aoutHdr->data_start;
81    data.size = aoutHdr->dsize;
82    data.fileImage = fileData + ECOFF_DATOFF(execHdr);
83
84    bss.baseAddr = aoutHdr->bss_start;
85    bss.size = aoutHdr->bsize;
86    bss.fileImage = NULL;
87
88    DPRINTFR(Loader, "text: 0x%x %d\ndata: 0x%x %d\nbss: 0x%x %d\n",
89             text.baseAddr, text.size, data.baseAddr, data.size,
90             bss.baseAddr, bss.size);
91}
92
93bool
94EcoffObject::loadAllSymbols(SymbolTable *symtab, Addr base, Addr offset,
95                            Addr addr_mask)
96{
97    bool retval = loadGlobalSymbols(symtab, base, offset, addr_mask);
98    retval = retval && loadLocalSymbols(symtab, base, offset, addr_mask);
99    return retval;
100}
101
102bool
103EcoffObject::loadGlobalSymbols(SymbolTable *symtab, Addr base, Addr offset,
104                               Addr addr_mask)
105{
106    if (!symtab)
107        return false;
108
109    if (fileHdr->f_magic != ECOFF_MAGIC_ALPHA) {
110        warn("loadGlobalSymbols: wrong magic on %s\n", filename);
111        return false;
112    }
113
114    ecoff_symhdr *syms = (ecoff_symhdr *)(fileData + fileHdr->f_symptr);
115    if (syms->magic != magicSym2) {
116        warn("loadGlobalSymbols: bad symbol header magic on %s\n", filename);
117        return false;
118    }
119
120    ecoff_extsym *ext_syms = (ecoff_extsym *)(fileData + syms->cbExtOffset);
121
122    char *ext_strings = (char *)(fileData + syms->cbSsExtOffset);
123    for (int i = 0; i < syms->iextMax; i++) {
124        ecoff_sym *entry = &(ext_syms[i].asym);
125        if (entry->iss != -1)
126            symtab->insert(entry->value, ext_strings + entry->iss);
127    }
128
129    return true;
130}
131
132bool
133EcoffObject::loadLocalSymbols(SymbolTable *symtab, Addr base, Addr offset,
134                              Addr addr_mask)
135{
136    if (!symtab)
137        return false;
138
139    if (fileHdr->f_magic != ECOFF_MAGIC_ALPHA) {
140        warn("loadGlobalSymbols: wrong magic on %s\n", filename);
141        return false;
142    }
143
144    ecoff_symhdr *syms = (ecoff_symhdr *)(fileData + fileHdr->f_symptr);
145    if (syms->magic != magicSym2) {
146        warn("loadGlobalSymbols: bad symbol header magic on %s\n", filename);
147        return false;
148    }
149
150    ecoff_sym *local_syms = (ecoff_sym *)(fileData + syms->cbSymOffset);
151    char *local_strings = (char *)(fileData + syms->cbSsOffset);
152    ecoff_fdr *fdesc = (ecoff_fdr *)(fileData + syms->cbFdOffset);
153
154    for (int i = 0; i < syms->ifdMax; i++) {
155        ecoff_sym *entry = (ecoff_sym *)(local_syms + fdesc[i].isymBase);
156        char *strings = (char *)(local_strings + fdesc[i].issBase);
157        for (int j = 0; j < fdesc[i].csym; j++) {
158            if (entry[j].st == stGlobal || entry[j].st == stProc)
159                if (entry[j].iss != -1)
160                    symtab->insert(entry[j].value, strings + entry[j].iss);
161        }
162    }
163
164    for (int i = 0; i < syms->isymMax; i++) {
165        ecoff_sym *entry = &(local_syms[i]);
166        if (entry->st == stProc)
167            symtab->insert(entry->value, local_strings + entry->iss);
168    }
169
170    return true;
171}
172