6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2025-09-17 05:25:47 +00:00
Code Issues Projects Releases Wiki Activity

Get relocation parsing/dumping to a mostly-working state for MachO files.

Browse Source 
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@142852 91177308-0d34-0410-b5e6-96231b3b80d8
This commit is contained in:
Owen Anderson
2011-10-24 21:44:00 +00:00
parent 3846163aee
commit 0135fe1854
1 changed files with 127 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

133
lib/Object/MachOObjectFile.cpp
View File

@@ -16,6 +16,7 @@
#include "llvm/Object/MachO.h" #include "llvm/Object/MachO.h"
#include "llvm/Object/MachOFormat.h" #include "llvm/Object/MachOFormat.h"
#include "llvm/Support/MemoryBuffer.h" #include "llvm/Support/MemoryBuffer.h"
#include "llvm/Support/raw_ostream.h"
#include <cctype> #include <cctype>
#include <cstring> #include <cstring>
@@ -596,15 +597,15 @@ error_code MachOObjectFile::getRelocationNext(DataRefImpl Rel,
} }
error_code MachOObjectFile::getRelocationAddress(DataRefImpl Rel, error_code MachOObjectFile::getRelocationAddress(DataRefImpl Rel,
uint64_t &Res) const { uint64_t &Res) const {
const uint8_t* sectAddress = base(); const uint8_t* sectAddress = 0;
if (MachOObj->is64Bit()) { if (MachOObj->is64Bit()) {
InMemoryStruct<macho::Section64> Sect; InMemoryStruct<macho::Section64> Sect;
getSection64(Sections[Rel.d.b], Sect); getSection64(Sections[Rel.d.b], Sect);
sectAddress += Sect->Offset; sectAddress += Sect->Address;
} else { } else {
InMemoryStruct<macho::Section> Sect; InMemoryStruct<macho::Section> Sect;
getSection(Sections[Rel.d.b], Sect); getSection(Sections[Rel.d.b], Sect);
sectAddress += Sect->Offset; sectAddress += Sect->Address;
} }
InMemoryStruct<macho::RelocationEntry> RE; InMemoryStruct<macho::RelocationEntry> RE;
getRelocation(Rel, RE); getRelocation(Rel, RE);
@@ -641,7 +642,88 @@ error_code MachOObjectFile::getRelocationType(DataRefImpl Rel,
} }
error_code MachOObjectFile::getRelocationTypeName(DataRefImpl Rel, error_code MachOObjectFile::getRelocationTypeName(DataRefImpl Rel,
SmallVectorImpl<char> &Result) const { SmallVectorImpl<char> &Result) const {
StringRef res = "Unknown"; // TODO: Support scattered relocations.
StringRef res;
InMemoryStruct<macho::RelocationEntry> RE;
getRelocation(Rel, RE);
unsigned r_type = (RE->Word1 >> 28) & 0xF;
unsigned Arch = getArch();
switch (Arch) {
case Triple::x86: {
const char* Table[] = {
"GENERIC_RELOC_VANILLA",
"GENERIC_RELOC_PAIR",
"GENERIC_RELOC_SECTDIFF",
"GENERIC_RELOC_LOCAL_SECTDIFF",
"GENERIC_RELOC_PB_LA_PTR" };
if (r_type > 4)
res = "Unknown";
else
res = Table[r_type];
break;
}
case Triple::x86_64: {
const char* Table[] = {
"X86_64_RELOC_BRANCH",
"X86_64_RELOC_GOT_LOAD",
"X86_64_RELOC_GOT",
"X86_64_RELOC_SIGNED",
"X86_64_RELOC_UNSIGNED",
"X86_64_RELOC_SUBTRACTOR" };
if (r_type > 5)
res = "Unknown";
else
res = Table[r_type];
break;
}
case Triple::arm: {
const char* Table[] = {
"ARM_RELOC_VANILLA",
"ARM_RELOC_PAIR",
"ARM_RELOC_SECTDIFF",
"ARM_RELOC_LOCAL_SECTDIFF",
"ARM_RELOC_PB_LA_PTR",
"ARM_RELOC_BR24",
"ARM_THUMB_RELOC_BR22",
"ARM_THUMB_32BIT_BRANCH",
"ARM_RELOC_HALF",
"ARM_RELOC_HALF_SECTDIFF" };
if (r_type > 9)
res = "Unknown";
else
res = Table[r_type];
break;
}
case Triple::ppc: {
const char* Table[] = {
"PPC_RELOC_VANILLA",
"PPC_RELOC_PAIR",
"PPC_RELOC_BR14",
"PPC_RELOC_BR24",
"PPC_RELOC_HI16",
"PPC_RELOC_LO16",
"PPC_RELOC_HA16",
"PPC_RELOC_LO14",
"PPC_RELOC_SECTDIFF",
"PPC_RELOC_PB_LA_PTR",
"PPC_RELOC_HI16_SECTDIFF",
"PPC_RELOC_LO16_SECTDIFF",
"PPC_RELOC_HA16_SECTDIFF",
"PPC_RELOC_JBSR",
"PPC_RELOC_LO14_SECTDIFF",
"PPC_RELOC_LOCAL_SECTDIFF" };
res = Table[r_type];
break;
}
case Triple::UnknownArch:
res = "Unknown";
break;
}
Result.append(res.begin(), res.end()); Result.append(res.begin(), res.end());
return object_error::success; return object_error::success;
} }
@@ -668,8 +750,47 @@ error_code MachOObjectFile::getRelocationAdditionalInfo(DataRefImpl Rel,
} }
error_code MachOObjectFile::getRelocationValueString(DataRefImpl Rel, error_code MachOObjectFile::getRelocationValueString(DataRefImpl Rel,
SmallVectorImpl<char> &Result) const { SmallVectorImpl<char> &Result) const {
StringRef res = "Unknown"; InMemoryStruct<macho::RelocationEntry> RE;
Result.append(res.begin(), res.end()); getRelocation(Rel, RE);
std::string fmtbuf;
raw_string_ostream fmt(fmtbuf);
bool isExtern = (RE->Word1 >> 27) & 1;
if (isExtern) {
uint32_t Val = (RE->Word1 & 0xFFFFFF);
symbol_iterator SI = begin_symbols();
error_code ec;
while (Val--) {
SI.increment(ec);
if (ec) report_fatal_error(ec.message());
}
StringRef SymName;
if ((ec = SI->getName(SymName)))
report_fatal_error(ec.message());
fmt << SymName;
} else {
uint32_t Val = (RE->Word1 & 0xFFFFFF);
section_iterator SI = begin_sections();
error_code ec;
while (Val--) {
SI.increment(ec);
if (ec) report_fatal_error(ec.message());
}
StringRef SectName;
if ((ec = SI->getName(SectName)))
report_fatal_error(ec.message());
fmt << SectName;
}
fmt.flush();
Result.append(fmtbuf.begin(), fmtbuf.end());
return object_error::success; return object_error::success;
} }