/3rd_party/llvm/tools/llvm-rtdyld/llvm-rtdyld.cpp
https://code.google.com/p/softart/ · C++ · 258 lines · 179 code · 41 blank · 38 comment · 31 complexity · 926ee6f519c1d9f9de358494ae826278 MD5 · raw file
- //===-- llvm-rtdyld.cpp - MCJIT Testing Tool ------------------------------===//
- //
- // The LLVM Compiler Infrastructure
- //
- // This file is distributed under the University of Illinois Open Source
- // License. See LICENSE.TXT for details.
- //
- //===----------------------------------------------------------------------===//
- //
- // This is a testing tool for use with the MC-JIT LLVM components.
- //
- //===----------------------------------------------------------------------===//
- #include "llvm/ADT/OwningPtr.h"
- #include "llvm/ADT/StringMap.h"
- #include "llvm/DebugInfo/DIContext.h"
- #include "llvm/ExecutionEngine/ObjectBuffer.h"
- #include "llvm/ExecutionEngine/ObjectImage.h"
- #include "llvm/ExecutionEngine/RuntimeDyld.h"
- #include "llvm/Object/MachO.h"
- #include "llvm/Support/CommandLine.h"
- #include "llvm/Support/ManagedStatic.h"
- #include "llvm/Support/Memory.h"
- #include "llvm/Support/MemoryBuffer.h"
- #include "llvm/Support/PrettyStackTrace.h"
- #include "llvm/Support/Signals.h"
- #include "llvm/Support/raw_ostream.h"
- #include "llvm/Support/system_error.h"
- using namespace llvm;
- using namespace llvm::object;
- static cl::list<std::string>
- InputFileList(cl::Positional, cl::ZeroOrMore,
- cl::desc("<input file>"));
- enum ActionType {
- AC_Execute,
- AC_PrintLineInfo
- };
- static cl::opt<ActionType>
- Action(cl::desc("Action to perform:"),
- cl::init(AC_Execute),
- cl::values(clEnumValN(AC_Execute, "execute",
- "Load, link, and execute the inputs."),
- clEnumValN(AC_PrintLineInfo, "printline",
- "Load, link, and print line information for each function."),
- clEnumValEnd));
- static cl::opt<std::string>
- EntryPoint("entry",
- cl::desc("Function to call as entry point."),
- cl::init("_main"));
- /* *** */
- // A trivial memory manager that doesn't do anything fancy, just uses the
- // support library allocation routines directly.
- class TrivialMemoryManager : public RTDyldMemoryManager {
- public:
- SmallVector<sys::MemoryBlock, 16> FunctionMemory;
- SmallVector<sys::MemoryBlock, 16> DataMemory;
- uint8_t *allocateCodeSection(uintptr_t Size, unsigned Alignment,
- unsigned SectionID, StringRef SectionName);
- uint8_t *allocateDataSection(uintptr_t Size, unsigned Alignment,
- unsigned SectionID, StringRef SectionName,
- bool IsReadOnly);
- virtual void *getPointerToNamedFunction(const std::string &Name,
- bool AbortOnFailure = true) {
- return 0;
- }
- bool finalizeMemory(std::string *ErrMsg) { return false; }
- // Invalidate instruction cache for sections with execute permissions.
- // Some platforms with separate data cache and instruction cache require
- // explicit cache flush, otherwise JIT code manipulations (like resolved
- // relocations) will get to the data cache but not to the instruction cache.
- virtual void invalidateInstructionCache();
- };
- uint8_t *TrivialMemoryManager::allocateCodeSection(uintptr_t Size,
- unsigned Alignment,
- unsigned SectionID,
- StringRef SectionName) {
- sys::MemoryBlock MB = sys::Memory::AllocateRWX(Size, 0, 0);
- FunctionMemory.push_back(MB);
- return (uint8_t*)MB.base();
- }
- uint8_t *TrivialMemoryManager::allocateDataSection(uintptr_t Size,
- unsigned Alignment,
- unsigned SectionID,
- StringRef SectionName,
- bool IsReadOnly) {
- sys::MemoryBlock MB = sys::Memory::AllocateRWX(Size, 0, 0);
- DataMemory.push_back(MB);
- return (uint8_t*)MB.base();
- }
- void TrivialMemoryManager::invalidateInstructionCache() {
- for (int i = 0, e = FunctionMemory.size(); i != e; ++i)
- sys::Memory::InvalidateInstructionCache(FunctionMemory[i].base(),
- FunctionMemory[i].size());
- for (int i = 0, e = DataMemory.size(); i != e; ++i)
- sys::Memory::InvalidateInstructionCache(DataMemory[i].base(),
- DataMemory[i].size());
- }
- static const char *ProgramName;
- static void Message(const char *Type, const Twine &Msg) {
- errs() << ProgramName << ": " << Type << ": " << Msg << "\n";
- }
- static int Error(const Twine &Msg) {
- Message("error", Msg);
- return 1;
- }
- /* *** */
- static int printLineInfoForInput() {
- // If we don't have any input files, read from stdin.
- if (!InputFileList.size())
- InputFileList.push_back("-");
- for(unsigned i = 0, e = InputFileList.size(); i != e; ++i) {
- // Instantiate a dynamic linker.
- TrivialMemoryManager MemMgr;
- RuntimeDyld Dyld(&MemMgr);
- // Load the input memory buffer.
- OwningPtr<MemoryBuffer> InputBuffer;
- OwningPtr<ObjectImage> LoadedObject;
- if (error_code ec = MemoryBuffer::getFileOrSTDIN(InputFileList[i],
- InputBuffer))
- return Error("unable to read input: '" + ec.message() + "'");
- // Load the object file
- LoadedObject.reset(Dyld.loadObject(new ObjectBuffer(InputBuffer.take())));
- if (!LoadedObject) {
- return Error(Dyld.getErrorString());
- }
- // Resolve all the relocations we can.
- Dyld.resolveRelocations();
- OwningPtr<DIContext> Context(DIContext::getDWARFContext(LoadedObject->getObjectFile()));
- // Use symbol info to iterate functions in the object.
- error_code ec;
- for (object::symbol_iterator I = LoadedObject->begin_symbols(),
- E = LoadedObject->end_symbols();
- I != E && !ec;
- I.increment(ec)) {
- object::SymbolRef::Type SymType;
- if (I->getType(SymType)) continue;
- if (SymType == object::SymbolRef::ST_Function) {
- StringRef Name;
- uint64_t Addr;
- uint64_t Size;
- if (I->getName(Name)) continue;
- if (I->getAddress(Addr)) continue;
- if (I->getSize(Size)) continue;
- outs() << "Function: " << Name << ", Size = " << Size << "\n";
- DILineInfoTable Lines = Context->getLineInfoForAddressRange(Addr, Size);
- DILineInfoTable::iterator Begin = Lines.begin();
- DILineInfoTable::iterator End = Lines.end();
- for (DILineInfoTable::iterator It = Begin; It != End; ++It) {
- outs() << " Line info @ " << It->first - Addr << ": "
- << It->second.getFileName()
- << ", line:" << It->second.getLine() << "\n";
- }
- }
- }
- }
- return 0;
- }
- static int executeInput() {
- // Instantiate a dynamic linker.
- TrivialMemoryManager MemMgr;
- RuntimeDyld Dyld(&MemMgr);
- // If we don't have any input files, read from stdin.
- if (!InputFileList.size())
- InputFileList.push_back("-");
- for(unsigned i = 0, e = InputFileList.size(); i != e; ++i) {
- // Load the input memory buffer.
- OwningPtr<MemoryBuffer> InputBuffer;
- OwningPtr<ObjectImage> LoadedObject;
- if (error_code ec = MemoryBuffer::getFileOrSTDIN(InputFileList[i],
- InputBuffer))
- return Error("unable to read input: '" + ec.message() + "'");
- // Load the object file
- LoadedObject.reset(Dyld.loadObject(new ObjectBuffer(InputBuffer.take())));
- if (!LoadedObject) {
- return Error(Dyld.getErrorString());
- }
- }
- // Resolve all the relocations we can.
- Dyld.resolveRelocations();
- // Clear instruction cache before code will be executed.
- MemMgr.invalidateInstructionCache();
- // FIXME: Error out if there are unresolved relocations.
- // Get the address of the entry point (_main by default).
- void *MainAddress = Dyld.getSymbolAddress(EntryPoint);
- if (MainAddress == 0)
- return Error("no definition for '" + EntryPoint + "'");
- // Invalidate the instruction cache for each loaded function.
- for (unsigned i = 0, e = MemMgr.FunctionMemory.size(); i != e; ++i) {
- sys::MemoryBlock &Data = MemMgr.FunctionMemory[i];
- // Make sure the memory is executable.
- std::string ErrorStr;
- sys::Memory::InvalidateInstructionCache(Data.base(), Data.size());
- if (!sys::Memory::setExecutable(Data, &ErrorStr))
- return Error("unable to mark function executable: '" + ErrorStr + "'");
- }
- // Dispatch to _main().
- errs() << "loaded '" << EntryPoint << "' at: " << (void*)MainAddress << "\n";
- int (*Main)(int, const char**) =
- (int(*)(int,const char**)) uintptr_t(MainAddress);
- const char **Argv = new const char*[2];
- // Use the name of the first input object module as argv[0] for the target.
- Argv[0] = InputFileList[0].c_str();
- Argv[1] = 0;
- return Main(1, Argv);
- }
- int main(int argc, char **argv) {
- sys::PrintStackTraceOnErrorSignal();
- PrettyStackTraceProgram X(argc, argv);
- ProgramName = argv[0];
- llvm_shutdown_obj Y; // Call llvm_shutdown() on exit.
- cl::ParseCommandLineOptions(argc, argv, "llvm MC-JIT tool\n");
- switch (Action) {
- case AC_Execute:
- return executeInput();
- case AC_PrintLineInfo:
- return printLineInfoForInput();
- }
- }