lib/MC/MCObjectSymbolizer.cpp

   1 //===-- lib/MC/MCObjectSymbolizer.cpp -------------------------------------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9
  10 #include "llvm/MC/MCObjectSymbolizer.h"
  11 #include "llvm/ADT/SmallString.h"
  12 #include "llvm/MC/MCContext.h"
  13 #include "llvm/MC/MCExpr.h"
  14 #include "llvm/MC/MCInst.h"
  15 #include "llvm/MC/MCRelocationInfo.h"
  16 #include "llvm/MC/MCSymbol.h"
  17 #include "llvm/Object/ELFObjectFile.h"
  18 #include "llvm/Object/MachO.h"
  19 #include "llvm/Support/raw_ostream.h"
  20 #include <algorithm>
  21
  22 using namespace llvm;
  23 using namespace object;
  24
  25 //===- MCMachObjectSymbolizer ---------------------------------------------===//
  26
  27 namespace {
  28 class MCMachObjectSymbolizer : public MCObjectSymbolizer {
  29   const MachOObjectFile *MOOF;
  30   // __TEXT;__stubs support.
  31   uint64_t StubsStart;
  32   uint64_t StubsCount;
  33   uint64_t StubSize;
  34   uint64_t StubsIndSymIndex;
  35
  36 public:
  37   MCMachObjectSymbolizer(MCContext &Ctx,
  38                          std::unique_ptr<MCRelocationInfo> &RelInfo,
  39                          const MachOObjectFile *MOOF);
  40
  41   StringRef findExternalFunctionAt(uint64_t Addr) override;
  42
  43   void tryAddingPcLoadReferenceComment(raw_ostream &cStream, int64_t Value,
  44                                        uint64_t Address) override;
  45 };
  46 } // End unnamed namespace
  47
  48 MCMachObjectSymbolizer::MCMachObjectSymbolizer(
  49     MCContext &Ctx, std::unique_ptr<MCRelocationInfo> &RelInfo,
  50     const MachOObjectFile *MOOF)
  51     : MCObjectSymbolizer(Ctx, RelInfo, MOOF), MOOF(MOOF), StubsStart(0),
  52       StubsCount(0), StubSize(0), StubsIndSymIndex(0) {
  53
  54   for (section_iterator SI = MOOF->section_begin(), SE = MOOF->section_end();
  55        SI != SE; ++SI) {
  56     StringRef Name; SI->getName(Name);
  57     if (Name == "__stubs") {
  58       SectionRef StubsSec = *SI;
  59       if (MOOF->is64Bit()) {
  60         MachO::section_64 S = MOOF->getSection64(StubsSec.getRawDataRefImpl());
  61         StubsIndSymIndex = S.reserved1;
  62         StubSize = S.reserved2;
  63       } else {
  64         MachO::section S = MOOF->getSection(StubsSec.getRawDataRefImpl());
  65         StubsIndSymIndex = S.reserved1;
  66         StubSize = S.reserved2;
  67       }
  68       assert(StubSize && "Mach-O stub entry size can't be zero!");
  69       StubsSec.getAddress(StubsStart);
  70       StubsSec.getSize(StubsCount);
  71       StubsCount /= StubSize;
  72     }
  73   }
  74 }
  75
  76 StringRef MCMachObjectSymbolizer::findExternalFunctionAt(uint64_t Addr) {
  77   // FIXME: also, this can all be done at the very beginning, by iterating over
  78   // all stubs and creating the calls to outside functions. Is it worth it
  79   // though?
  80   if (!StubSize)
  81     return StringRef();
  82   uint64_t StubIdx = (Addr - StubsStart) / StubSize;
  83   if (StubIdx >= StubsCount)
  84     return StringRef();
  85
  86   uint32_t SymtabIdx =
  87     MOOF->getIndirectSymbolTableEntry(MOOF->getDysymtabLoadCommand(), StubIdx);
  88
  89   StringRef SymName;
  90   symbol_iterator SI = MOOF->symbol_begin();
  91   for (uint32_t i = 0; i != SymtabIdx; ++i)
  92     ++SI;
  93   SI->getName(SymName);
  94   assert(SI != MOOF->symbol_end() && "Stub wasn't found in the symbol table!");
  95   assert(SymName.front() == '_' && "Mach-O symbol doesn't start with '_'!");
  96   return SymName.substr(1);
  97 }
  98
  99 void MCMachObjectSymbolizer::
 100 tryAddingPcLoadReferenceComment(raw_ostream &cStream, int64_t Value,
 101                                 uint64_t Address) {
 102   if (const RelocationRef *R = findRelocationAt(Address)) {
 103     const MCExpr *RelExpr = RelInfo->createExprForRelocation(*R);
 104     if (!RelExpr || RelExpr->EvaluateAsAbsolute(Value) == false)
 105       return;
 106   }
 107   uint64_t Addr = Value;
 108   if (const SectionRef *S = findSectionContaining(Addr)) {
 109     StringRef Name; S->getName(Name);
 110     uint64_t SAddr; S->getAddress(SAddr);
 111     if (Name == "__cstring") {
 112       StringRef Contents;
 113       S->getContents(Contents);
 114       Contents = Contents.substr(Addr - SAddr);
 115       cStream << " ## literal pool for: "
 116               << Contents.substr(0, Contents.find_first_of(0));
 117     }
 118   }
 119 }
 120
 121 //===- MCObjectSymbolizer -------------------------------------------------===//
 122
 123 MCObjectSymbolizer::MCObjectSymbolizer(
 124     MCContext &Ctx, std::unique_ptr<MCRelocationInfo> &RelInfo,
 125     const ObjectFile *Obj)
 126     : MCSymbolizer(Ctx, RelInfo), Obj(Obj), SortedSections(), AddrToReloc() {}
 127
 128 bool MCObjectSymbolizer::
 129 tryAddingSymbolicOperand(MCInst &MI, raw_ostream &cStream,
 130                          int64_t Value, uint64_t Address, bool IsBranch,
 131                          uint64_t Offset, uint64_t InstSize) {
 132   if (IsBranch) {
 133     StringRef ExtFnName = findExternalFunctionAt((uint64_t)Value);
 134     if (!ExtFnName.empty()) {
 135       MCSymbol *Sym = Ctx.GetOrCreateSymbol(ExtFnName);
 136       const MCExpr *Expr = MCSymbolRefExpr::Create(Sym, Ctx);
 137       MI.addOperand(MCOperand::CreateExpr(Expr));
 138       return true;
 139     }
 140   }
 141
 142   if (const RelocationRef *R = findRelocationAt(Address + Offset)) {
 143     if (const MCExpr *RelExpr = RelInfo->createExprForRelocation(*R)) {
 144       MI.addOperand(MCOperand::CreateExpr(RelExpr));
 145       return true;
 146     }
 147     // Only try to create a symbol+offset expression if there is no relocation.
 148     return false;
 149   }
 150
 151   // Interpret Value as a branch target.
 152   if (IsBranch == false)
 153     return false;
 154   uint64_t UValue = Value;
 155   // FIXME: map instead of looping each time?
 156   for (symbol_iterator SI = Obj->symbol_begin(), SE = Obj->symbol_end();
 157        SI != SE; ++SI) {
 158     uint64_t SymAddr; SI->getAddress(SymAddr);
 159     uint64_t SymSize; SI->getSize(SymSize);
 160     StringRef SymName; SI->getName(SymName);
 161     SymbolRef::Type SymType; SI->getType(SymType);
 162     if (SymAddr == UnknownAddressOrSize || SymSize == UnknownAddressOrSize
 163         || SymName.empty() || SymType != SymbolRef::ST_Function)
 164       continue;
 165
 166     if ( SymAddr == UValue ||
 167         (SymAddr <= UValue && SymAddr + SymSize > UValue)) {
 168       MCSymbol *Sym = Ctx.GetOrCreateSymbol(SymName);
 169       const MCExpr *Expr = MCSymbolRefExpr::Create(Sym, Ctx);
 170       if (SymAddr != UValue) {
 171         const MCExpr *Off = MCConstantExpr::Create(UValue - SymAddr, Ctx);
 172         Expr = MCBinaryExpr::CreateAdd(Expr, Off, Ctx);
 173       }
 174       MI.addOperand(MCOperand::CreateExpr(Expr));
 175       return true;
 176     }
 177   }
 178   return false;
 179 }
 180
 181 void MCObjectSymbolizer::
 182 tryAddingPcLoadReferenceComment(raw_ostream &cStream,
 183                                 int64_t Value, uint64_t Address) {
 184 }
 185
 186 StringRef MCObjectSymbolizer::findExternalFunctionAt(uint64_t Addr) {
 187   return StringRef();
 188 }
 189
 190 MCObjectSymbolizer *MCObjectSymbolizer::createObjectSymbolizer(
 191     MCContext &Ctx, std::unique_ptr<MCRelocationInfo> &RelInfo,
 192     const ObjectFile *Obj) {
 193   if (const MachOObjectFile *MOOF = dyn_cast<MachOObjectFile>(Obj))
 194     return new MCMachObjectSymbolizer(Ctx, RelInfo, MOOF);
 195   return new MCObjectSymbolizer(Ctx, RelInfo, Obj);
 196 }
 197
 198 // SortedSections implementation.
 199
 200 static bool SectionStartsBefore(const SectionRef &S, uint64_t Addr) {
 201   uint64_t SAddr; S.getAddress(SAddr);
 202   return SAddr < Addr;
 203 }
 204
 205 const SectionRef *MCObjectSymbolizer::findSectionContaining(uint64_t Addr) {
 206   if (SortedSections.empty())
 207     buildSectionList();
 208
 209   SortedSectionList::iterator
 210     EndIt = SortedSections.end(),
 211     It = std::lower_bound(SortedSections.begin(), EndIt,
 212                           Addr, SectionStartsBefore);
 213   if (It == EndIt)
 214     return 0;
 215   uint64_t SAddr; It->getAddress(SAddr);
 216   uint64_t SSize; It->getSize(SSize);
 217   if (Addr >= SAddr + SSize)
 218     return 0;
 219   return &*It;
 220 }
 221
 222 const RelocationRef *MCObjectSymbolizer::findRelocationAt(uint64_t Addr) {
 223   if (AddrToReloc.empty())
 224     buildRelocationByAddrMap();
 225
 226   AddrToRelocMap::const_iterator RI = AddrToReloc.find(Addr);
 227   if (RI == AddrToReloc.end())
 228     return 0;
 229   return &RI->second;
 230 }
 231
 232 void MCObjectSymbolizer::buildSectionList() {
 233   for (section_iterator SI = Obj->section_begin(), SE = Obj->section_end();
 234        SI != SE; ++SI) {
 235     bool RequiredForExec; SI->isRequiredForExecution(RequiredForExec);
 236     if (RequiredForExec == false)
 237       continue;
 238     uint64_t SAddr; SI->getAddress(SAddr);
 239     uint64_t SSize; SI->getSize(SSize);
 240     SortedSectionList::iterator It = std::lower_bound(SortedSections.begin(),
 241                                                       SortedSections.end(),
 242                                                       SAddr,
 243                                                       SectionStartsBefore);
 244     if (It != SortedSections.end()) {
 245       uint64_t FoundSAddr; It->getAddress(FoundSAddr);
 246       if (FoundSAddr < SAddr + SSize)
 247         llvm_unreachable("Inserting overlapping sections");
 248     }
 249     SortedSections.insert(It, *SI);
 250   }
 251 }
 252
 253 void MCObjectSymbolizer::buildRelocationByAddrMap() {
 254   for (section_iterator SI = Obj->section_begin(), SE = Obj->section_end();
 255        SI != SE; ++SI) {
 256     section_iterator RelSecI = SI->getRelocatedSection();
 257     if (RelSecI == Obj->section_end())
 258       continue;
 259
 260     uint64_t StartAddr; RelSecI->getAddress(StartAddr);
 261     uint64_t Size; RelSecI->getSize(Size);
 262     bool RequiredForExec; RelSecI->isRequiredForExecution(RequiredForExec);
 263     if (RequiredForExec == false || Size == 0)
 264       continue;
 265     for (relocation_iterator RI = SI->relocation_begin(),
 266                              RE = SI->relocation_end();
 267          RI != RE; ++RI) {
 268       // FIXME: libObject is inconsistent regarding error handling. The
 269       // overwhelming majority of methods always return object_error::success,
 270       // and assert for simple errors.. Here, ELFObjectFile::getRelocationOffset
 271       // asserts when the file type isn't ET_REL.
 272       // This workaround handles x86-64 elf, the only one that has a relocinfo.
 273       uint64_t Offset;
 274       if (Obj->isELF()) {
 275         const ELF64LEObjectFile *ELFObj = dyn_cast<ELF64LEObjectFile>(Obj);
 276         if (ELFObj == 0)
 277           break;
 278         if (ELFObj->getELFFile()->getHeader()->e_type == ELF::ET_REL) {
 279           RI->getOffset(Offset);
 280           Offset += StartAddr;
 281         } else {
 282           RI->getAddress(Offset);
 283         }
 284       } else {
 285         RI->getOffset(Offset);
 286         Offset += StartAddr;
 287       }
 288       // At a specific address, only keep the first relocation.
 289       if (AddrToReloc.find(Offset) == AddrToReloc.end())
 290         AddrToReloc[Offset] = *RI;
 291     }
 292   }
 293 }