mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-12-15 04:30:12 +00:00
8819c84aed
Patch by Alp Toker. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@191757 91177308-0d34-0410-b5e6-96231b3b80d8
432 lines
13 KiB
C++
432 lines
13 KiB
C++
//===-- MachODump.cpp - Object file dumping utility for llvm --------------===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This file implements the MachO-specific dumper for llvm-readobj.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "llvm-readobj.h"
|
|
#include "Error.h"
|
|
#include "ObjDumper.h"
|
|
#include "StreamWriter.h"
|
|
|
|
#include "llvm/ADT/SmallString.h"
|
|
#include "llvm/Object/MachO.h"
|
|
#include "llvm/Support/Casting.h"
|
|
|
|
using namespace llvm;
|
|
using namespace object;
|
|
|
|
namespace {
|
|
|
|
class MachODumper : public ObjDumper {
|
|
public:
|
|
MachODumper(const MachOObjectFile *Obj, StreamWriter& Writer)
|
|
: ObjDumper(Writer)
|
|
, Obj(Obj) { }
|
|
|
|
virtual void printFileHeaders() LLVM_OVERRIDE;
|
|
virtual void printSections() LLVM_OVERRIDE;
|
|
virtual void printRelocations() LLVM_OVERRIDE;
|
|
virtual void printSymbols() LLVM_OVERRIDE;
|
|
virtual void printDynamicSymbols() LLVM_OVERRIDE;
|
|
virtual void printUnwindInfo() LLVM_OVERRIDE;
|
|
|
|
private:
|
|
void printSymbol(symbol_iterator SymI);
|
|
|
|
void printRelocation(section_iterator SecI, relocation_iterator RelI);
|
|
|
|
void printRelocation(const MachOObjectFile *Obj,
|
|
section_iterator SecI, relocation_iterator RelI);
|
|
|
|
void printSections(const MachOObjectFile *Obj);
|
|
|
|
const MachOObjectFile *Obj;
|
|
};
|
|
|
|
} // namespace
|
|
|
|
|
|
namespace llvm {
|
|
|
|
error_code createMachODumper(const object::ObjectFile *Obj,
|
|
StreamWriter& Writer,
|
|
OwningPtr<ObjDumper> &Result) {
|
|
const MachOObjectFile *MachOObj = dyn_cast<MachOObjectFile>(Obj);
|
|
if (!MachOObj)
|
|
return readobj_error::unsupported_obj_file_format;
|
|
|
|
Result.reset(new MachODumper(MachOObj, Writer));
|
|
return readobj_error::success;
|
|
}
|
|
|
|
} // namespace llvm
|
|
|
|
|
|
static const EnumEntry<unsigned> MachOSectionTypes[] = {
|
|
{ "Regular" , 0x00 },
|
|
{ "ZeroFill" , 0x01 },
|
|
{ "CStringLiterals" , 0x02 },
|
|
{ "4ByteLiterals" , 0x03 },
|
|
{ "8ByteLiterals" , 0x04 },
|
|
{ "LiteralPointers" , 0x05 },
|
|
{ "NonLazySymbolPointers" , 0x06 },
|
|
{ "LazySymbolPointers" , 0x07 },
|
|
{ "SymbolStubs" , 0x08 },
|
|
{ "ModInitFuncs" , 0x09 },
|
|
{ "ModTermFuncs" , 0x0A },
|
|
{ "Coalesced" , 0x0B },
|
|
{ "GBZeroFill" , 0x0C },
|
|
{ "Interposing" , 0x0D },
|
|
{ "16ByteLiterals" , 0x0E },
|
|
{ "DTraceDOF" , 0x0F },
|
|
{ "LazyDylibSymbolPoints" , 0x10 },
|
|
{ "ThreadLocalRegular" , 0x11 },
|
|
{ "ThreadLocalZerofill" , 0x12 },
|
|
{ "ThreadLocalVariables" , 0x13 },
|
|
{ "ThreadLocalVariablePointers" , 0x14 },
|
|
{ "ThreadLocalInitFunctionPointers", 0x15 }
|
|
};
|
|
|
|
static const EnumEntry<unsigned> MachOSectionAttributes[] = {
|
|
{ "LocReloc" , 1 << 0 /*S_ATTR_LOC_RELOC */ },
|
|
{ "ExtReloc" , 1 << 1 /*S_ATTR_EXT_RELOC */ },
|
|
{ "SomeInstructions" , 1 << 2 /*S_ATTR_SOME_INSTRUCTIONS */ },
|
|
{ "Debug" , 1 << 17 /*S_ATTR_DEBUG */ },
|
|
{ "SelfModifyingCode", 1 << 18 /*S_ATTR_SELF_MODIFYING_CODE*/ },
|
|
{ "LiveSupport" , 1 << 19 /*S_ATTR_LIVE_SUPPORT */ },
|
|
{ "NoDeadStrip" , 1 << 20 /*S_ATTR_NO_DEAD_STRIP */ },
|
|
{ "StripStaticSyms" , 1 << 21 /*S_ATTR_STRIP_STATIC_SYMS */ },
|
|
{ "NoTOC" , 1 << 22 /*S_ATTR_NO_TOC */ },
|
|
{ "PureInstructions" , 1 << 23 /*S_ATTR_PURE_INSTRUCTIONS */ },
|
|
};
|
|
|
|
static const EnumEntry<unsigned> MachOSymbolRefTypes[] = {
|
|
{ "UndefinedNonLazy", 0 },
|
|
{ "ReferenceFlagUndefinedLazy", 1 },
|
|
{ "ReferenceFlagDefined", 2 },
|
|
{ "ReferenceFlagPrivateDefined", 3 },
|
|
{ "ReferenceFlagPrivateUndefinedNonLazy", 4 },
|
|
{ "ReferenceFlagPrivateUndefinedLazy", 5 }
|
|
};
|
|
|
|
static const EnumEntry<unsigned> MachOSymbolFlags[] = {
|
|
{ "ReferencedDynamically", 0x10 },
|
|
{ "NoDeadStrip", 0x20 },
|
|
{ "WeakRef", 0x40 },
|
|
{ "WeakDef", 0x80 }
|
|
};
|
|
|
|
static const EnumEntry<unsigned> MachOSymbolTypes[] = {
|
|
{ "Undef", 0x0 },
|
|
{ "External", 0x1 },
|
|
{ "Abs", 0x2 },
|
|
{ "Indirect", 0xA },
|
|
{ "PreboundUndef", 0xC },
|
|
{ "Section", 0xE },
|
|
{ "PrivateExternal", 0x10 }
|
|
};
|
|
|
|
namespace {
|
|
enum {
|
|
N_STAB = 0xE0
|
|
};
|
|
|
|
struct MachOSection {
|
|
ArrayRef<char> Name;
|
|
ArrayRef<char> SegmentName;
|
|
uint64_t Address;
|
|
uint64_t Size;
|
|
uint32_t Offset;
|
|
uint32_t Alignment;
|
|
uint32_t RelocationTableOffset;
|
|
uint32_t NumRelocationTableEntries;
|
|
uint32_t Flags;
|
|
uint32_t Reserved1;
|
|
uint32_t Reserved2;
|
|
};
|
|
|
|
struct MachOSymbol {
|
|
uint32_t StringIndex;
|
|
uint8_t Type;
|
|
uint8_t SectionIndex;
|
|
uint16_t Flags;
|
|
uint64_t Value;
|
|
};
|
|
}
|
|
|
|
static void getSection(const MachOObjectFile *Obj,
|
|
DataRefImpl Sec,
|
|
MachOSection &Section) {
|
|
if (!Obj->is64Bit()) {
|
|
MachO::section Sect = Obj->getSection(Sec);
|
|
Section.Address = Sect.addr;
|
|
Section.Size = Sect.size;
|
|
Section.Offset = Sect.offset;
|
|
Section.Alignment = Sect.align;
|
|
Section.RelocationTableOffset = Sect.reloff;
|
|
Section.NumRelocationTableEntries = Sect.nreloc;
|
|
Section.Flags = Sect.flags;
|
|
Section.Reserved1 = Sect.reserved1;
|
|
Section.Reserved2 = Sect.reserved2;
|
|
return;
|
|
}
|
|
MachO::section_64 Sect = Obj->getSection64(Sec);
|
|
Section.Address = Sect.addr;
|
|
Section.Size = Sect.size;
|
|
Section.Offset = Sect.offset;
|
|
Section.Alignment = Sect.align;
|
|
Section.RelocationTableOffset = Sect.reloff;
|
|
Section.NumRelocationTableEntries = Sect.nreloc;
|
|
Section.Flags = Sect.flags;
|
|
Section.Reserved1 = Sect.reserved1;
|
|
Section.Reserved2 = Sect.reserved2;
|
|
}
|
|
|
|
|
|
static void getSymbol(const MachOObjectFile *Obj,
|
|
DataRefImpl DRI,
|
|
MachOSymbol &Symbol) {
|
|
if (!Obj->is64Bit()) {
|
|
MachO::nlist Entry = Obj->getSymbolTableEntry(DRI);
|
|
Symbol.StringIndex = Entry.n_strx;
|
|
Symbol.Type = Entry.n_type;
|
|
Symbol.SectionIndex = Entry.n_sect;
|
|
Symbol.Flags = Entry.n_desc;
|
|
Symbol.Value = Entry.n_value;
|
|
return;
|
|
}
|
|
MachO::nlist_64 Entry = Obj->getSymbol64TableEntry(DRI);
|
|
Symbol.StringIndex = Entry.n_strx;
|
|
Symbol.Type = Entry.n_type;
|
|
Symbol.SectionIndex = Entry.n_sect;
|
|
Symbol.Flags = Entry.n_desc;
|
|
Symbol.Value = Entry.n_value;
|
|
}
|
|
|
|
void MachODumper::printFileHeaders() {
|
|
W.startLine() << "FileHeaders not implemented.\n";
|
|
}
|
|
|
|
void MachODumper::printSections() {
|
|
return printSections(Obj);
|
|
}
|
|
|
|
void MachODumper::printSections(const MachOObjectFile *Obj) {
|
|
ListScope Group(W, "Sections");
|
|
|
|
int SectionIndex = -1;
|
|
error_code EC;
|
|
for (section_iterator SecI = Obj->begin_sections(),
|
|
SecE = Obj->end_sections();
|
|
SecI != SecE; SecI.increment(EC)) {
|
|
if (error(EC)) break;
|
|
|
|
++SectionIndex;
|
|
|
|
MachOSection Section;
|
|
getSection(Obj, SecI->getRawDataRefImpl(), Section);
|
|
DataRefImpl DR = SecI->getRawDataRefImpl();
|
|
|
|
StringRef Name;
|
|
if (error(SecI->getName(Name)))
|
|
Name = "";
|
|
|
|
ArrayRef<char> RawName = Obj->getSectionRawName(DR);
|
|
StringRef SegmentName = Obj->getSectionFinalSegmentName(DR);
|
|
ArrayRef<char> RawSegmentName = Obj->getSectionRawFinalSegmentName(DR);
|
|
|
|
DictScope SectionD(W, "Section");
|
|
W.printNumber("Index", SectionIndex);
|
|
W.printBinary("Name", Name, RawName);
|
|
W.printBinary("Segment", SegmentName, RawSegmentName);
|
|
W.printHex ("Address", Section.Address);
|
|
W.printHex ("Size", Section.Size);
|
|
W.printNumber("Offset", Section.Offset);
|
|
W.printNumber("Alignment", Section.Alignment);
|
|
W.printHex ("RelocationOffset", Section.RelocationTableOffset);
|
|
W.printNumber("RelocationCount", Section.NumRelocationTableEntries);
|
|
W.printEnum ("Type", Section.Flags & 0xFF,
|
|
makeArrayRef(MachOSectionAttributes));
|
|
W.printFlags ("Attributes", Section.Flags >> 8,
|
|
makeArrayRef(MachOSectionAttributes));
|
|
W.printHex ("Reserved1", Section.Reserved1);
|
|
W.printHex ("Reserved2", Section.Reserved2);
|
|
|
|
if (opts::SectionRelocations) {
|
|
ListScope D(W, "Relocations");
|
|
for (relocation_iterator RelI = SecI->begin_relocations(),
|
|
RelE = SecI->end_relocations();
|
|
RelI != RelE; RelI.increment(EC)) {
|
|
if (error(EC)) break;
|
|
|
|
printRelocation(SecI, RelI);
|
|
}
|
|
}
|
|
|
|
if (opts::SectionSymbols) {
|
|
ListScope D(W, "Symbols");
|
|
for (symbol_iterator SymI = Obj->begin_symbols(),
|
|
SymE = Obj->end_symbols();
|
|
SymI != SymE; SymI.increment(EC)) {
|
|
if (error(EC)) break;
|
|
|
|
bool Contained = false;
|
|
if (SecI->containsSymbol(*SymI, Contained) || !Contained)
|
|
continue;
|
|
|
|
printSymbol(SymI);
|
|
}
|
|
}
|
|
|
|
if (opts::SectionData) {
|
|
StringRef Data;
|
|
if (error(SecI->getContents(Data))) break;
|
|
|
|
W.printBinaryBlock("SectionData", Data);
|
|
}
|
|
}
|
|
}
|
|
|
|
void MachODumper::printRelocations() {
|
|
ListScope D(W, "Relocations");
|
|
|
|
error_code EC;
|
|
for (section_iterator SecI = Obj->begin_sections(),
|
|
SecE = Obj->end_sections();
|
|
SecI != SecE; SecI.increment(EC)) {
|
|
if (error(EC)) break;
|
|
|
|
StringRef Name;
|
|
if (error(SecI->getName(Name)))
|
|
continue;
|
|
|
|
bool PrintedGroup = false;
|
|
for (relocation_iterator RelI = SecI->begin_relocations(),
|
|
RelE = SecI->end_relocations();
|
|
RelI != RelE; RelI.increment(EC)) {
|
|
if (error(EC)) break;
|
|
|
|
if (!PrintedGroup) {
|
|
W.startLine() << "Section " << Name << " {\n";
|
|
W.indent();
|
|
PrintedGroup = true;
|
|
}
|
|
|
|
printRelocation(SecI, RelI);
|
|
}
|
|
|
|
if (PrintedGroup) {
|
|
W.unindent();
|
|
W.startLine() << "}\n";
|
|
}
|
|
}
|
|
}
|
|
|
|
void MachODumper::printRelocation(section_iterator SecI,
|
|
relocation_iterator RelI) {
|
|
return printRelocation(Obj, SecI, RelI);
|
|
}
|
|
|
|
void MachODumper::printRelocation(const MachOObjectFile *Obj,
|
|
section_iterator SecI,
|
|
relocation_iterator RelI) {
|
|
uint64_t Offset;
|
|
SmallString<32> RelocName;
|
|
StringRef SymbolName;
|
|
if (error(RelI->getOffset(Offset))) return;
|
|
if (error(RelI->getTypeName(RelocName))) return;
|
|
symbol_iterator Symbol = RelI->getSymbol();
|
|
if (Symbol != Obj->end_symbols() &&
|
|
error(Symbol->getName(SymbolName)))
|
|
return;
|
|
|
|
DataRefImpl DR = RelI->getRawDataRefImpl();
|
|
MachO::any_relocation_info RE = Obj->getRelocation(DR);
|
|
bool IsScattered = Obj->isRelocationScattered(RE);
|
|
|
|
if (opts::ExpandRelocs) {
|
|
DictScope Group(W, "Relocation");
|
|
W.printHex("Offset", Offset);
|
|
W.printNumber("PCRel", Obj->getAnyRelocationPCRel(RE));
|
|
W.printNumber("Length", Obj->getAnyRelocationLength(RE));
|
|
if (IsScattered)
|
|
W.printString("Extern", StringRef("N/A"));
|
|
else
|
|
W.printNumber("Extern", Obj->getPlainRelocationExternal(RE));
|
|
W.printNumber("Type", RelocName, Obj->getAnyRelocationType(RE));
|
|
W.printString("Symbol", SymbolName.size() > 0 ? SymbolName : "-");
|
|
W.printNumber("Scattered", IsScattered);
|
|
} else {
|
|
raw_ostream& OS = W.startLine();
|
|
OS << W.hex(Offset)
|
|
<< " " << Obj->getAnyRelocationPCRel(RE)
|
|
<< " " << Obj->getAnyRelocationLength(RE);
|
|
if (IsScattered)
|
|
OS << " n/a";
|
|
else
|
|
OS << " " << Obj->getPlainRelocationExternal(RE);
|
|
OS << " " << RelocName
|
|
<< " " << IsScattered
|
|
<< " " << (SymbolName.size() > 0 ? SymbolName : "-")
|
|
<< "\n";
|
|
}
|
|
}
|
|
|
|
void MachODumper::printSymbols() {
|
|
ListScope Group(W, "Symbols");
|
|
|
|
error_code EC;
|
|
for (symbol_iterator SymI = Obj->begin_symbols(),
|
|
SymE = Obj->end_symbols();
|
|
SymI != SymE; SymI.increment(EC)) {
|
|
if (error(EC)) break;
|
|
|
|
printSymbol(SymI);
|
|
}
|
|
}
|
|
|
|
void MachODumper::printDynamicSymbols() {
|
|
ListScope Group(W, "DynamicSymbols");
|
|
}
|
|
|
|
void MachODumper::printSymbol(symbol_iterator SymI) {
|
|
StringRef SymbolName;
|
|
if (SymI->getName(SymbolName))
|
|
SymbolName = "";
|
|
|
|
MachOSymbol Symbol;
|
|
getSymbol(Obj, SymI->getRawDataRefImpl(), Symbol);
|
|
|
|
StringRef SectionName = "";
|
|
section_iterator SecI(Obj->end_sections());
|
|
if (!error(SymI->getSection(SecI)) &&
|
|
SecI != Obj->end_sections())
|
|
error(SecI->getName(SectionName));
|
|
|
|
DictScope D(W, "Symbol");
|
|
W.printNumber("Name", SymbolName, Symbol.StringIndex);
|
|
if (Symbol.Type & N_STAB) {
|
|
W.printHex ("Type", "SymDebugTable", Symbol.Type);
|
|
} else {
|
|
W.printEnum("Type", Symbol.Type, makeArrayRef(MachOSymbolTypes));
|
|
}
|
|
W.printHex ("Section", SectionName, Symbol.SectionIndex);
|
|
W.printEnum ("RefType", static_cast<uint16_t>(Symbol.Flags & 0xF),
|
|
makeArrayRef(MachOSymbolRefTypes));
|
|
W.printFlags ("Flags", static_cast<uint16_t>(Symbol.Flags & ~0xF),
|
|
makeArrayRef(MachOSymbolFlags));
|
|
W.printHex ("Value", Symbol.Value);
|
|
}
|
|
|
|
void MachODumper::printUnwindInfo() {
|
|
W.startLine() << "UnwindInfo not implemented.\n";
|
|
}
|