6502/llvm-6502
1
0
Fork 0
mirror of https://github.com/c64scene-ar/llvm-6502.git synced 2024-11-17 03:07:06 +00:00
Code Issues Projects Releases Wiki Activity
e292347503
llvm-6502/include/llvm/Object/MachO.h
Rafael Espindola e292347503 Add 179294 back, but don't use bit fields so that it works on big endian hosts. 
Original message:

Print more information about relocations.

With this patch llvm-readobj now prints if a relocation is pcrel, its length,
if it is extern and if it is scattered.

It also refactors the code a bit to use bit fields instead of shifts and
masks all over the place.

git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@179345 91177308-0d34-0410-b5e6-96231b3b80d8
2013-04-12 00:17:33 +00:00

1045 lines
34 KiB
C++
Raw Blame History

//===- MachO.h - MachO object file implementation ---------------*- C++ -*-===//
//
// The LLVM Compiler Infrastructure
//
// This file is distributed under the University of Illinois Open Source
// License. See LICENSE.TXT for details.
//
//===----------------------------------------------------------------------===//
//
// This file declares the MachOObjectFile class, which binds the MachOObject
// class to the generic ObjectFile wrapper.
//
//===----------------------------------------------------------------------===//
#ifndef LLVM_OBJECT_MACHO_H
#define LLVM_OBJECT_MACHO_H
#include "llvm/ADT/ArrayRef.h"
#include "llvm/ADT/SmallVector.h"
#include "llvm/ADT/Triple.h"
#include "llvm/Object/MachOFormat.h"
#include "llvm/Object/ObjectFile.h"
#include "llvm/Support/Endian.h"
#include "llvm/Support/MachO.h"
#include "llvm/Support/raw_ostream.h"
namespace llvm {
namespace object {
using support::endianness;
template<endianness E, bool B>
struct MachOType {
static const endianness TargetEndianness = E;
static const bool Is64Bits = B;
};
template<endianness TargetEndianness>
struct MachODataTypeTypedefHelperCommon {
typedef support::detail::packed_endian_specific_integral
<uint16_t, TargetEndianness, support::unaligned> MachOInt16;
typedef support::detail::packed_endian_specific_integral
<uint32_t, TargetEndianness, support::unaligned> MachOInt32;
typedef support::detail::packed_endian_specific_integral
<uint64_t, TargetEndianness, support::unaligned> MachOInt64;
};
#define LLVM_MACHOB_IMPORT_TYPES(E) \
typedef typename MachODataTypeTypedefHelperCommon<E>::MachOInt16 MachOInt16; \
typedef typename MachODataTypeTypedefHelperCommon<E>::MachOInt32 MachOInt32; \
typedef typename MachODataTypeTypedefHelperCommon<E>::MachOInt64 MachOInt64;
template<class MachOT>
struct MachODataTypeTypedefHelper;
template<endianness TargetEndianness>
struct MachODataTypeTypedefHelper<MachOType<TargetEndianness, false> > {
typedef MachODataTypeTypedefHelperCommon<TargetEndianness> Base;
typedef typename Base::MachOInt32 MachOIntPtr;
};
template<endianness TargetEndianness>
struct MachODataTypeTypedefHelper<MachOType<TargetEndianness, true> > {
typedef MachODataTypeTypedefHelperCommon<TargetEndianness> Base;
typedef typename Base::MachOInt64 MachOIntPtr;
};
#define LLVM_MACHO_IMPORT_TYPES(MachOT, E, B) \
LLVM_MACHOB_IMPORT_TYPES(E) \
typedef typename \
MachODataTypeTypedefHelper <MachOT<E, B> >::MachOIntPtr MachOIntPtr;
namespace MachOFormat {
struct SectionBase {
char Name[16];
char SegmentName[16];
};
template<class MachOT>
struct Section;
template<endianness TargetEndianness>
struct Section<MachOType<TargetEndianness, false> > {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
char Name[16];
char SegmentName[16];
MachOInt32 Address;
MachOInt32 Size;
MachOInt32 Offset;
MachOInt32 Align;
MachOInt32 RelocationTableOffset;
MachOInt32 NumRelocationTableEntries;
MachOInt32 Flags;
MachOInt32 Reserved1;
MachOInt32 Reserved2;
};
template<endianness TargetEndianness>
struct Section<MachOType<TargetEndianness, true> > {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
char Name[16];
char SegmentName[16];
MachOInt64 Address;
MachOInt64 Size;
MachOInt32 Offset;
MachOInt32 Align;
MachOInt32 RelocationTableOffset;
MachOInt32 NumRelocationTableEntries;
MachOInt32 Flags;
MachOInt32 Reserved1;
MachOInt32 Reserved2;
MachOInt32 Reserved3;
};
struct MachOInt24 {
uint8_t bytes[3];
operator uint32_t() const {
return (bytes[2] << 24) | (bytes[1] << 16) | bytes[0];
}
};
template<endianness TargetEndianness>
struct RelocationEntry {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
MachOInt32 Address;
MachOInt24 SymbolNum;
uint8_t Bits;
unsigned getPCRel() const {
return Bits & 0x1;
}
unsigned getLength() const {
return (Bits >> 1) & 0x3;
}
unsigned getExternal() const {
return (Bits >> 3) & 0x1;
}
unsigned getType() const {
return Bits >> 4;
}
};
template<endianness TargetEndianness>
struct ScatteredRelocationEntry {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
MachOInt24 Address;
uint8_t Bits;
MachOInt32 Value;
unsigned getType() const {
return Bits & 0xf;
}
unsigned getLength() const {
return (Bits >> 4) & 0x3;
}
unsigned getPCRel() const {
return (Bits >> 6) & 0x1;
}
unsigned getScattered() const {
return Bits >> 7;
}
};
template<endianness TargetEndianness>
struct SymbolTableEntryBase {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
MachOInt32 StringIndex;
uint8_t Type;
uint8_t SectionIndex;
MachOInt16 Flags;
};
template<class MachOT>
struct SymbolTableEntry;
template<endianness TargetEndianness, bool Is64Bits>
struct SymbolTableEntry<MachOType<TargetEndianness, Is64Bits> > {
LLVM_MACHO_IMPORT_TYPES(MachOType, TargetEndianness, Is64Bits)
MachOInt32 StringIndex;
uint8_t Type;
uint8_t SectionIndex;
MachOInt16 Flags;
MachOIntPtr Value;
};
template<endianness TargetEndianness>
struct LoadCommand {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
MachOInt32 Type;
MachOInt32 Size;
};
template<endianness TargetEndianness>
struct SymtabLoadCommand {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
MachOInt32 Type;
MachOInt32 Size;
MachOInt32 SymbolTableOffset;
MachOInt32 NumSymbolTableEntries;
MachOInt32 StringTableOffset;
MachOInt32 StringTableSize;
};
template<class MachOT>
struct SegmentLoadCommand;
template<endianness TargetEndianness, bool Is64Bits>
struct SegmentLoadCommand<MachOType<TargetEndianness, Is64Bits> > {
LLVM_MACHO_IMPORT_TYPES(MachOType, TargetEndianness, Is64Bits)
MachOInt32 Type;
MachOInt32 Size;
char Name[16];
MachOIntPtr VMAddress;
MachOIntPtr VMSize;
MachOIntPtr FileOffset;
MachOIntPtr FileSize;
MachOInt32 MaxVMProtection;
MachOInt32 InitialVMProtection;
MachOInt32 NumSections;
MachOInt32 Flags;
};
template<endianness TargetEndianness>
struct LinkeditDataLoadCommand {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
MachOInt32 Type;
MachOInt32 Size;
MachOInt32 DataOffset;
MachOInt32 DataSize;
};
template<endianness TargetEndianness>
struct Header {
LLVM_MACHOB_IMPORT_TYPES(TargetEndianness)
MachOInt32 Magic;
MachOInt32 CPUType;
MachOInt32 CPUSubtype;
MachOInt32 FileType;
MachOInt32 NumLoadCommands;
MachOInt32 SizeOfLoadCommands;
MachOInt32 Flags;
};
}
class MachOObjectFileBase : public ObjectFile {
public:
typedef MachOFormat::SymbolTableEntryBase<support::little>
SymbolTableEntryBase;
typedef MachOFormat::SymtabLoadCommand<support::little> SymtabLoadCommand;
typedef MachOFormat::RelocationEntry<support::little> RelocationEntry;
typedef MachOFormat::ScatteredRelocationEntry<support::little>
ScatteredRelocationEntry;
typedef MachOFormat::SectionBase SectionBase;
typedef MachOFormat::LoadCommand<support::little> LoadCommand;
typedef MachOFormat::Header<support::little> Header;
typedef MachOFormat::LinkeditDataLoadCommand<support::little>
LinkeditDataLoadCommand;
MachOObjectFileBase(MemoryBuffer *Object, bool Is64Bits, error_code &ec);
virtual symbol_iterator begin_symbols() const;
virtual symbol_iterator end_symbols() const;
virtual symbol_iterator begin_dynamic_symbols() const;
virtual symbol_iterator end_dynamic_symbols() const;
virtual library_iterator begin_libraries_needed() const;
virtual library_iterator end_libraries_needed() const;
virtual section_iterator end_sections() const;
virtual uint8_t getBytesInAddress() const;
virtual StringRef getFileFormatName() const;
virtual unsigned getArch() const;
virtual StringRef getLoadName() const;
// In a MachO file, sections have a segment name. This is used in the .o
// files. They have a single segment, but this field specifies which segment
// a section should be put in in the final object.
StringRef getSectionFinalSegmentName(DataRefImpl Sec) const;
// Names are stored as 16 bytes. These returns the raw 16 bytes without
// interpreting them as a C string.
ArrayRef<char> getSectionRawName(DataRefImpl Sec) const;
ArrayRef<char>getSectionRawFinalSegmentName(DataRefImpl Sec) const;
bool is64Bit() const;
const LoadCommand *getLoadCommandInfo(unsigned Index) const;
void ReadULEB128s(uint64_t Index, SmallVectorImpl<uint64_t> &Out) const;
const Header *getHeader() const;
unsigned getHeaderSize() const;
StringRef getData(size_t Offset, size_t Size) const;
const RelocationEntry *getRelocation(DataRefImpl Rel) const;
bool isScattered(const RelocationEntry *RE) const;
bool isPCRel(const RelocationEntry *RE) const;
unsigned getLength(const RelocationEntry *RE) const;
unsigned getType(const RelocationEntry *RE) const;
static inline bool classof(const Binary *v) {
return v->isMachO();
}
protected:
virtual error_code getSymbolNext(DataRefImpl Symb, SymbolRef &Res) const;
virtual error_code getSymbolName(DataRefImpl Symb, StringRef &Res) const;
virtual error_code getSymbolNMTypeChar(DataRefImpl Symb, char &Res) const;
virtual error_code getSymbolFlags(DataRefImpl Symb, uint32_t &Res) const;
virtual error_code getSymbolType(DataRefImpl Symb, SymbolRef::Type &Res) const;
virtual error_code getSymbolSection(DataRefImpl Symb,
section_iterator &Res) const;
virtual error_code getSymbolValue(DataRefImpl Symb, uint64_t &Val) const;
virtual error_code getSectionName(DataRefImpl Sec, StringRef &Res) const;
virtual error_code isSectionData(DataRefImpl Sec, bool &Res) const;
virtual error_code isSectionBSS(DataRefImpl Sec, bool &Res) const;
virtual error_code isSectionRequiredForExecution(DataRefImpl Sec,
bool &Res) const;
virtual error_code isSectionVirtual(DataRefImpl Sec, bool &Res) const;
virtual error_code isSectionReadOnlyData(DataRefImpl Sec, bool &Res) const;
virtual relocation_iterator getSectionRelBegin(DataRefImpl Sec) const;
virtual error_code getRelocationNext(DataRefImpl Rel,
RelocationRef &Res) const;
virtual error_code getLibraryNext(DataRefImpl LibData, LibraryRef &Res) const;
virtual error_code getLibraryPath(DataRefImpl LibData, StringRef &Res) const;
virtual error_code getRelocationAdditionalInfo(DataRefImpl Rel,
int64_t &Res) const;
std::size_t getSectionIndex(DataRefImpl Sec) const;
typedef SmallVector<DataRefImpl, 1> SectionList;
SectionList Sections;
void moveToNextSymbol(DataRefImpl &DRI) const;
void printRelocationTargetName(const RelocationEntry *RE,
raw_string_ostream &fmt) const;
const SectionBase *getSectionBase(DataRefImpl DRI) const;
const SymbolTableEntryBase *getSymbolTableEntryBase(DataRefImpl DRI) const;
private:
const SymbolTableEntryBase *getSymbolTableEntryBase(DataRefImpl DRI,
const SymtabLoadCommand *SymtabLoadCmd) const;
};
template<class MachOT>
struct MachOObjectFileHelperCommon;
template<endianness TargetEndianness, bool Is64Bits>
struct MachOObjectFileHelperCommon<MachOType<TargetEndianness, Is64Bits> > {
typedef
MachOFormat::SegmentLoadCommand<MachOType<TargetEndianness, Is64Bits> >
SegmentLoadCommand;
typedef MachOFormat::SymbolTableEntry<MachOType<TargetEndianness, Is64Bits> >
SymbolTableEntry;
typedef MachOFormat::Section<MachOType<TargetEndianness, Is64Bits> > Section;
};
template<class MachOT>
struct MachOObjectFileHelper;
template<endianness TargetEndianness>
struct MachOObjectFileHelper<MachOType<TargetEndianness, false> > :
public MachOObjectFileHelperCommon<MachOType<TargetEndianness, false> > {
static const macho::LoadCommandType SegmentLoadType = macho::LCT_Segment;
};
template<endianness TargetEndianness>
struct MachOObjectFileHelper<MachOType<TargetEndianness, true> > :
public MachOObjectFileHelperCommon<MachOType<TargetEndianness, true> > {
static const macho::LoadCommandType SegmentLoadType = macho::LCT_Segment64;
};
template<class MachOT>
class MachOObjectFile : public MachOObjectFileBase {
public:
static const endianness TargetEndianness = MachOT::TargetEndianness;
static const bool Is64Bits = MachOT::Is64Bits;
typedef MachOObjectFileHelper<MachOT> Helper;
static const macho::LoadCommandType SegmentLoadType = Helper::SegmentLoadType;
typedef typename Helper::SegmentLoadCommand SegmentLoadCommand;
typedef typename Helper::SymbolTableEntry SymbolTableEntry;
typedef typename Helper::Section Section;
MachOObjectFile(MemoryBuffer *Object, error_code &ec);
static bool classof(const Binary *v);
const Section *getSection(DataRefImpl DRI) const;
const SymbolTableEntry *getSymbolTableEntry(DataRefImpl DRI) const;
const RelocationEntry *getRelocation(DataRefImpl Rel) const;
virtual error_code getSectionAddress(DataRefImpl Sec, uint64_t &Res) const;
virtual error_code getSectionSize(DataRefImpl Sec, uint64_t &Res) const;
virtual error_code getSectionContents(DataRefImpl Sec, StringRef &Res) const;
virtual error_code getSectionAlignment(DataRefImpl Sec, uint64_t &Res) const;
virtual error_code isSectionText(DataRefImpl Sec, bool &Res) const;
virtual error_code isSectionZeroInit(DataRefImpl Sec, bool &Res) const;
virtual relocation_iterator getSectionRelEnd(DataRefImpl Sec) const;
virtual error_code getRelocationAddress(DataRefImpl Rel, uint64_t &Res) const;
virtual error_code getRelocationOffset(DataRefImpl Rel, uint64_t &Res) const;
virtual error_code getRelocationSymbol(DataRefImpl Rel, SymbolRef &Res) const;
virtual error_code getRelocationType(DataRefImpl Rel, uint64_t &Res) const;
virtual error_code getRelocationTypeName(DataRefImpl Rel,
SmallVectorImpl<char> &Result) const;
virtual error_code getRelocationValueString(DataRefImpl Rel,
SmallVectorImpl<char> &Result) const;
virtual error_code getRelocationHidden(DataRefImpl Rel, bool &Result) const;
virtual error_code getSymbolFileOffset(DataRefImpl Symb, uint64_t &Res) const;
virtual error_code sectionContainsSymbol(DataRefImpl Sec, DataRefImpl Symb,
bool &Result) const;
virtual error_code getSymbolAddress(DataRefImpl Symb, uint64_t &Res) const;
virtual error_code getSymbolSize(DataRefImpl Symb, uint64_t &Res) const;
virtual error_code getSectionNext(DataRefImpl Sec, SectionRef &Res) const;
virtual section_iterator begin_sections() const;
void moveToNextSection(DataRefImpl &DRI) const;
};
template<class MachOT>
MachOObjectFile<MachOT>::MachOObjectFile(MemoryBuffer *Object,
error_code &ec) :
MachOObjectFileBase(Object, Is64Bits, ec) {
DataRefImpl DRI;
moveToNextSection(DRI);
uint32_t LoadCommandCount = getHeader()->NumLoadCommands;
while (DRI.d.a < LoadCommandCount) {
Sections.push_back(DRI);
DRI.d.b++;
moveToNextSection(DRI);
}
}
template<class MachOT>
bool MachOObjectFile<MachOT>::classof(const Binary *v) {
return v->getType() == getMachOType(true, Is64Bits);
}
template<class MachOT>
const typename MachOObjectFile<MachOT>::Section *
MachOObjectFile<MachOT>::getSection(DataRefImpl DRI) const {
const SectionBase *Addr = getSectionBase(DRI);
return reinterpret_cast<const Section*>(Addr);
}
template<class MachOT>
const typename MachOObjectFile<MachOT>::SymbolTableEntry *
MachOObjectFile<MachOT>::getSymbolTableEntry(DataRefImpl DRI) const {
const SymbolTableEntryBase *Base = getSymbolTableEntryBase(DRI);
return reinterpret_cast<const SymbolTableEntry*>(Base);
}
template<class MachOT>
const typename MachOObjectFile<MachOT>::RelocationEntry *
MachOObjectFile<MachOT>::getRelocation(DataRefImpl Rel) const {
const Section *Sect = getSection(Sections[Rel.d.b]);
uint32_t RelOffset = Sect->RelocationTableOffset;
uint64_t Offset = RelOffset + Rel.d.a * sizeof(RelocationEntry);
StringRef Data = getData(Offset, sizeof(RelocationEntry));
return reinterpret_cast<const RelocationEntry*>(Data.data());
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getSectionAddress(DataRefImpl Sec,
uint64_t &Res) const {
const Section *Sect = getSection(Sec);
Res = Sect->Address;
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getSectionSize(DataRefImpl Sec,
uint64_t &Res) const {
const Section *Sect = getSection(Sec);
Res = Sect->Size;
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getSectionContents(DataRefImpl Sec,
StringRef &Res) const {
const Section *Sect = getSection(Sec);
Res = getData(Sect->Offset, Sect->Size);
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getSectionAlignment(DataRefImpl Sec,
uint64_t &Res) const {
const Section *Sect = getSection(Sec);
Res = uint64_t(1) << Sect->Align;
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::isSectionText(DataRefImpl Sec, bool &Res) const {
const Section *Sect = getSection(Sec);
Res = Sect->Flags & macho::SF_PureInstructions;
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::isSectionZeroInit(DataRefImpl Sec, bool &Res) const {
const Section *Sect = getSection(Sec);
unsigned SectionType = Sect->Flags & MachO::SectionFlagMaskSectionType;
Res = SectionType == MachO::SectionTypeZeroFill ||
SectionType == MachO::SectionTypeZeroFillLarge;
return object_error::success;
}
template<class MachOT>
relocation_iterator
MachOObjectFile<MachOT>::getSectionRelEnd(DataRefImpl Sec) const {
const Section *Sect = getSection(Sec);
uint32_t LastReloc = Sect->NumRelocationTableEntries;
DataRefImpl Ret;
Ret.d.a = LastReloc;
Ret.d.b = getSectionIndex(Sec);
return relocation_iterator(RelocationRef(Ret, this));
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getRelocationAddress(DataRefImpl Rel,
uint64_t &Res) const {
const Section *Sect = getSection(Sections[Rel.d.b]);
uint64_t SectAddress = Sect->Address;
const RelocationEntry *RE = getRelocation(Rel);
uint64_t RelAddr;
if (isScattered(RE))
RelAddr = RE->Address & 0xFFFFFF;
else
RelAddr = RE->Address;
Res = SectAddress + RelAddr;
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getRelocationOffset(DataRefImpl Rel,
uint64_t &Res) const {
const RelocationEntry *RE = getRelocation(Rel);
if (isScattered(RE))
Res = RE->Address & 0xFFFFFF;
else
Res = RE->Address;
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getRelocationSymbol(DataRefImpl Rel,
SymbolRef &Res) const {
const RelocationEntry *RE = getRelocation(Rel);
uint32_t SymbolIdx = RE->SymbolNum;
bool isExtern = RE->getExternal();
DataRefImpl Sym;
moveToNextSymbol(Sym);
if (isExtern) {
for (unsigned i = 0; i < SymbolIdx; i++) {
Sym.d.b++;
moveToNextSymbol(Sym);
assert(Sym.d.a < getHeader()->NumLoadCommands &&
"Relocation symbol index out of range!");
}
}
Res = SymbolRef(Sym, this);
return object_error::success;
}
template<class MachOT>
error_code MachOObjectFile<MachOT>::getRelocationType(DataRefImpl Rel,
uint64_t &Res) const {
const RelocationEntry *RE = getRelocation(Rel);
Res = getType(RE);
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getRelocationTypeName(DataRefImpl Rel,
SmallVectorImpl<char> &Result) const {
// TODO: Support scattered relocations.
StringRef res;
const RelocationEntry *RE = getRelocation(Rel);
unsigned Arch = getArch();
unsigned r_type = getType(RE);
switch (Arch) {
case Triple::x86: {
static const char *const Table[] = {
"GENERIC_RELOC_VANILLA",
"GENERIC_RELOC_PAIR",
"GENERIC_RELOC_SECTDIFF",
"GENERIC_RELOC_PB_LA_PTR",
"GENERIC_RELOC_LOCAL_SECTDIFF",
"GENERIC_RELOC_TLV" };
if (r_type > 6)
res = "Unknown";
else
res = Table[r_type];
break;
}
case Triple::x86_64: {
static const char *const Table[] = {
"X86_64_RELOC_UNSIGNED",
"X86_64_RELOC_SIGNED",
"X86_64_RELOC_BRANCH",
"X86_64_RELOC_GOT_LOAD",
"X86_64_RELOC_GOT",
"X86_64_RELOC_SUBTRACTOR",
"X86_64_RELOC_SIGNED_1",
"X86_64_RELOC_SIGNED_2",
"X86_64_RELOC_SIGNED_4",
"X86_64_RELOC_TLV" };
if (r_type > 9)
res = "Unknown";
else
res = Table[r_type];
break;
}
case Triple::arm: {
static const char *const 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: {
static const char *const 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());
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getRelocationValueString(DataRefImpl Rel,
SmallVectorImpl<char> &Result) const {
const RelocationEntry *RE = getRelocation(Rel);
unsigned Arch = getArch();
bool IsScattered = isScattered(RE);
std::string fmtbuf;
raw_string_ostream fmt(fmtbuf);
unsigned Type = getType(RE);
bool IsPCRel = isPCRel(RE);
// Determine any addends that should be displayed with the relocation.
// These require decoding the relocation type, which is triple-specific.
// X86_64 has entirely custom relocation types.
if (Arch == Triple::x86_64) {
bool isPCRel = RE->getPCRel();
switch (Type) {
case macho::RIT_X86_64_GOTLoad: // X86_64_RELOC_GOT_LOAD
case macho::RIT_X86_64_GOT: { // X86_64_RELOC_GOT
printRelocationTargetName(RE, fmt);
fmt << "@GOT";
if (isPCRel) fmt << "PCREL";
break;
}
case macho::RIT_X86_64_Subtractor: { // X86_64_RELOC_SUBTRACTOR
DataRefImpl RelNext = Rel;
RelNext.d.a++;
const RelocationEntry *RENext = getRelocation(RelNext);
// X86_64_SUBTRACTOR must be followed by a relocation of type
// X86_64_RELOC_UNSIGNED.
// NOTE: Scattered relocations don't exist on x86_64.
unsigned RType = RENext->getType();
if (RType != 0)
report_fatal_error("Expected X86_64_RELOC_UNSIGNED after "
"X86_64_RELOC_SUBTRACTOR.");
// The X86_64_RELOC_UNSIGNED contains the minuend symbol,
// X86_64_SUBTRACTOR contains to the subtrahend.
printRelocationTargetName(RENext, fmt);
fmt << "-";
printRelocationTargetName(RE, fmt);
break;
}
case macho::RIT_X86_64_TLV:
printRelocationTargetName(RE, fmt);
fmt << "@TLV";
if (isPCRel) fmt << "P";
break;
case macho::RIT_X86_64_Signed1: // X86_64_RELOC_SIGNED1
printRelocationTargetName(RE, fmt);
fmt << "-1";
break;
case macho::RIT_X86_64_Signed2: // X86_64_RELOC_SIGNED2
printRelocationTargetName(RE, fmt);
fmt << "-2";
break;
case macho::RIT_X86_64_Signed4: // X86_64_RELOC_SIGNED4
printRelocationTargetName(RE, fmt);
fmt << "-4";
break;
default:
printRelocationTargetName(RE, fmt);
break;
}
// X86 and ARM share some relocation types in common.
} else if (Arch == Triple::x86 || Arch == Triple::arm) {
// Generic relocation types...
switch (Type) {
case macho::RIT_Pair: // GENERIC_RELOC_PAIR - prints no info
return object_error::success;
case macho::RIT_Difference: { // GENERIC_RELOC_SECTDIFF
DataRefImpl RelNext = Rel;
RelNext.d.a++;
const RelocationEntry *RENext = getRelocation(RelNext);
// X86 sect diff's must be followed by a relocation of type
// GENERIC_RELOC_PAIR.
bool isNextScattered = (Arch != Triple::x86_64) &&
(RENext->Address & macho::RF_Scattered);
unsigned RType;
if (isNextScattered)
RType = (RENext->Address >> 24) & 0xF;
else
RType = RENext->getType();
if (RType != 1)
report_fatal_error("Expected GENERIC_RELOC_PAIR after "
"GENERIC_RELOC_SECTDIFF.");
printRelocationTargetName(RE, fmt);
fmt << "-";
printRelocationTargetName(RENext, fmt);
break;
}
}
if (Arch == Triple::x86) {
// All X86 relocations that need special printing were already
// handled in the generic code.
switch (Type) {
case macho::RIT_Generic_LocalDifference:{// GENERIC_RELOC_LOCAL_SECTDIFF
DataRefImpl RelNext = Rel;
RelNext.d.a++;
const RelocationEntry *RENext = getRelocation(RelNext);
// X86 sect diff's must be followed by a relocation of type
// GENERIC_RELOC_PAIR.
bool isNextScattered = (Arch != Triple::x86_64) &&
(RENext->Address & macho::RF_Scattered);
unsigned RType;
if (isNextScattered)
RType = (RENext->Address >> 24) & 0xF;
else
RType = RENext->getType();
if (RType != 1)
report_fatal_error("Expected GENERIC_RELOC_PAIR after "
"GENERIC_RELOC_LOCAL_SECTDIFF.");
printRelocationTargetName(RE, fmt);
fmt << "-";
printRelocationTargetName(RENext, fmt);
break;
}
case macho::RIT_Generic_TLV: {
printRelocationTargetName(RE, fmt);
fmt << "@TLV";
if (IsPCRel) fmt << "P";
break;
}
default:
printRelocationTargetName(RE, fmt);
}
} else { // ARM-specific relocations
switch (Type) {
case macho::RIT_ARM_Half: // ARM_RELOC_HALF
case macho::RIT_ARM_HalfDifference: { // ARM_RELOC_HALF_SECTDIFF
// Half relocations steal a bit from the length field to encode
// whether this is an upper16 or a lower16 relocation.
bool isUpper;
if (IsScattered)
isUpper = (RE->Address >> 28) & 1;
else
isUpper = (RE->getLength() >> 1) & 1;
if (isUpper)
fmt << ":upper16:(";
else
fmt << ":lower16:(";
printRelocationTargetName(RE, fmt);
DataRefImpl RelNext = Rel;
RelNext.d.a++;
const RelocationEntry *RENext = getRelocation(RelNext);
// ARM half relocs must be followed by a relocation of type
// ARM_RELOC_PAIR.
bool isNextScattered = (Arch != Triple::x86_64) &&
(RENext->Address & macho::RF_Scattered);
unsigned RType;
if (isNextScattered)
RType = (RENext->Address >> 24) & 0xF;
else
RType = RENext->getType();
if (RType != 1)
report_fatal_error("Expected ARM_RELOC_PAIR after "
"GENERIC_RELOC_HALF");
// NOTE: The half of the target virtual address is stashed in the
// address field of the secondary relocation, but we can't reverse
// engineer the constant offset from it without decoding the movw/movt
// instruction to find the other half in its immediate field.
// ARM_RELOC_HALF_SECTDIFF encodes the second section in the
// symbol/section pointer of the follow-on relocation.
if (Type == macho::RIT_ARM_HalfDifference) {
fmt << "-";
printRelocationTargetName(RENext, fmt);
}
fmt << ")";
break;
}
default: {
printRelocationTargetName(RE, fmt);
}
}
}
} else
printRelocationTargetName(RE, fmt);
fmt.flush();
Result.append(fmtbuf.begin(), fmtbuf.end());
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getRelocationHidden(DataRefImpl Rel,
bool &Result) const {
const RelocationEntry *RE = getRelocation(Rel);
unsigned Arch = getArch();
unsigned Type = getType(RE);
Result = false;
// On arches that use the generic relocations, GENERIC_RELOC_PAIR
// is always hidden.
if (Arch == Triple::x86 || Arch == Triple::arm) {
if (Type == macho::RIT_Pair) Result = true;
} else if (Arch == Triple::x86_64) {
// On x86_64, X86_64_RELOC_UNSIGNED is hidden only when it follows
// an X864_64_RELOC_SUBTRACTOR.
if (Type == macho::RIT_X86_64_Unsigned && Rel.d.a > 0) {
DataRefImpl RelPrev = Rel;
RelPrev.d.a--;
const RelocationEntry *REPrev = getRelocation(RelPrev);
unsigned PrevType = REPrev->getType();
if (PrevType == macho::RIT_X86_64_Subtractor) Result = true;
}
}
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::getSymbolFileOffset(DataRefImpl Symb,
uint64_t &Res) const {
const SymbolTableEntry *Entry = getSymbolTableEntry(Symb);
Res = Entry->Value;
if (Entry->SectionIndex) {
const Section *Sec = getSection(Sections[Entry->SectionIndex-1]);
Res += Sec->Offset - Sec->Address;
}
return object_error::success;
}
template<class MachOT>
error_code
MachOObjectFile<MachOT>::sectionContainsSymbol(DataRefImpl Sec,
DataRefImpl Symb,
bool &Result) const {
SymbolRef::Type ST;
getSymbolType(Symb, ST);
if (ST == SymbolRef::ST_Unknown) {
Result = false;
return object_error::success;
}
uint64_t SectBegin, SectEnd;
getSectionAddress(Sec, SectBegin);
getSectionSize(Sec, SectEnd);
SectEnd += SectBegin;
const SymbolTableEntry *Entry = getSymbolTableEntry(Symb);
uint64_t SymAddr= Entry->Value;
Result = (SymAddr >= SectBegin) && (SymAddr < SectEnd);
return object_error::success;
}
template<class MachOT>
error_code MachOObjectFile<MachOT>::getSymbolAddress(DataRefImpl Symb,
uint64_t &Res) const {
const SymbolTableEntry *Entry = getSymbolTableEntry(Symb);
Res = Entry->Value;
return object_error::success;
}
template<class MachOT>
error_code MachOObjectFile<MachOT>::getSymbolSize(DataRefImpl DRI,
uint64_t &Result) const {
uint32_t LoadCommandCount = getHeader()->NumLoadCommands;
uint64_t BeginOffset;
uint64_t EndOffset = 0;
uint8_t SectionIndex;
const SymbolTableEntry *Entry = getSymbolTableEntry(DRI);
BeginOffset = Entry->Value;
SectionIndex = Entry->SectionIndex;
if (!SectionIndex) {
uint32_t flags = SymbolRef::SF_None;
getSymbolFlags(DRI, flags);
if (flags & SymbolRef::SF_Common)
Result = Entry->Value;
else
Result = UnknownAddressOrSize;
return object_error::success;
}
// Unfortunately symbols are unsorted so we need to touch all
// symbols from load command
DRI.d.b = 0;
uint32_t Command = DRI.d.a;
while (Command == DRI.d.a) {
moveToNextSymbol(DRI);
if (DRI.d.a < LoadCommandCount) {
Entry = getSymbolTableEntry(DRI);
if (Entry->SectionIndex == SectionIndex && Entry->Value > BeginOffset)
if (!EndOffset || Entry->Value < EndOffset)
EndOffset = Entry->Value;
}
DRI.d.b++;
}
if (!EndOffset) {
uint64_t Size;
getSectionSize(Sections[SectionIndex-1], Size);
getSectionAddress(Sections[SectionIndex-1], EndOffset);
EndOffset += Size;
}
Result = EndOffset - BeginOffset;
return object_error::success;
}
template<class MachOT>
error_code MachOObjectFile<MachOT>::getSectionNext(DataRefImpl Sec,
SectionRef &Res) const {
Sec.d.b++;
moveToNextSection(Sec);
Res = SectionRef(Sec, this);
return object_error::success;
}
template<class MachOT>
section_iterator MachOObjectFile<MachOT>::begin_sections() const {
DataRefImpl DRI;
moveToNextSection(DRI);
return section_iterator(SectionRef(DRI, this));
}
template<class MachOT>
void MachOObjectFile<MachOT>::moveToNextSection(DataRefImpl &DRI) const {
uint32_t LoadCommandCount = getHeader()->NumLoadCommands;
while (DRI.d.a < LoadCommandCount) {
const LoadCommand *Command = getLoadCommandInfo(DRI.d.a);
if (Command->Type == SegmentLoadType) {
const SegmentLoadCommand *SegmentLoadCmd =
reinterpret_cast<const SegmentLoadCommand*>(Command);
if (DRI.d.b < SegmentLoadCmd->NumSections)
return;
}
DRI.d.a++;
DRI.d.b = 0;
}
}
typedef MachOObjectFile<MachOType<support::little, false> >
MachOObjectFile32Le;
typedef MachOObjectFile<MachOType<support::little, true> >
MachOObjectFile64Le;
}
}
#endif
Reference in New Issue View Git Blame Copy Permalink