| //===----------- OrcCBindings.cpp - C bindings for the Orc APIs -----------===// |
| // |
| // The LLVM Compiler Infrastructure |
| // |
| // This file is distributed under the University of Illinois Open Source |
| // License. See LICENSE.TXT for details. |
| // |
| //===----------------------------------------------------------------------===// |
| |
| #include "OrcCBindingsStack.h" |
| #include "llvm-c/OrcBindings.h" |
| |
| using namespace llvm; |
| |
| LLVMSharedModuleRef LLVMOrcMakeSharedModule(LLVMModuleRef Mod) { |
| return wrap(new std::shared_ptr<Module>(unwrap(Mod))); |
| } |
| |
| void LLVMOrcDisposeSharedModuleRef(LLVMSharedModuleRef SharedMod) { |
| delete unwrap(SharedMod); |
| } |
| |
| LLVMSharedObjectBufferRef |
| LLVMOrcMakeSharedObjectBuffer(LLVMMemoryBufferRef ObjBuffer) { |
| return wrap(new std::shared_ptr<MemoryBuffer>(unwrap(ObjBuffer))); |
| } |
| |
| void |
| LLVMOrcDisposeSharedObjectBufferRef(LLVMSharedObjectBufferRef SharedObjBuffer) { |
| delete unwrap(SharedObjBuffer); |
| } |
| |
| LLVMOrcJITStackRef LLVMOrcCreateInstance(LLVMTargetMachineRef TM) { |
| TargetMachine *TM2(unwrap(TM)); |
| |
| Triple T(TM2->getTargetTriple()); |
| |
| auto CompileCallbackMgr = orc::createLocalCompileCallbackManager(T, 0); |
| auto IndirectStubsMgrBuilder = |
| orc::createLocalIndirectStubsManagerBuilder(T); |
| |
| OrcCBindingsStack *JITStack = new OrcCBindingsStack( |
| *TM2, std::move(CompileCallbackMgr), IndirectStubsMgrBuilder); |
| |
| return wrap(JITStack); |
| } |
| |
| const char *LLVMOrcGetErrorMsg(LLVMOrcJITStackRef JITStack) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| return J.getErrorMessage().c_str(); |
| } |
| |
| void LLVMOrcGetMangledSymbol(LLVMOrcJITStackRef JITStack, char **MangledName, |
| const char *SymbolName) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| std::string Mangled = J.mangle(SymbolName); |
| *MangledName = new char[Mangled.size() + 1]; |
| strcpy(*MangledName, Mangled.c_str()); |
| } |
| |
| void LLVMOrcDisposeMangledSymbol(char *MangledName) { delete[] MangledName; } |
| |
| LLVMOrcErrorCode |
| LLVMOrcCreateLazyCompileCallback(LLVMOrcJITStackRef JITStack, |
| LLVMOrcTargetAddress *RetAddr, |
| LLVMOrcLazyCompileCallbackFn Callback, |
| void *CallbackCtx) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| return J.createLazyCompileCallback(*RetAddr, Callback, CallbackCtx); |
| } |
| |
| LLVMOrcErrorCode LLVMOrcCreateIndirectStub(LLVMOrcJITStackRef JITStack, |
| const char *StubName, |
| LLVMOrcTargetAddress InitAddr) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| return J.createIndirectStub(StubName, InitAddr); |
| } |
| |
| LLVMOrcErrorCode LLVMOrcSetIndirectStubPointer(LLVMOrcJITStackRef JITStack, |
| const char *StubName, |
| LLVMOrcTargetAddress NewAddr) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| return J.setIndirectStubPointer(StubName, NewAddr); |
| } |
| |
| LLVMOrcErrorCode |
| LLVMOrcAddEagerlyCompiledIR(LLVMOrcJITStackRef JITStack, |
| LLVMOrcModuleHandle *RetHandle, |
| LLVMSharedModuleRef Mod, |
| LLVMOrcSymbolResolverFn SymbolResolver, |
| void *SymbolResolverCtx) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| std::shared_ptr<Module> *M(unwrap(Mod)); |
| return J.addIRModuleEager(*RetHandle, *M, SymbolResolver, SymbolResolverCtx); |
| } |
| |
| LLVMOrcErrorCode |
| LLVMOrcAddLazilyCompiledIR(LLVMOrcJITStackRef JITStack, |
| LLVMOrcModuleHandle *RetHandle, |
| LLVMSharedModuleRef Mod, |
| LLVMOrcSymbolResolverFn SymbolResolver, |
| void *SymbolResolverCtx) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| std::shared_ptr<Module> *M(unwrap(Mod)); |
| return J.addIRModuleLazy(*RetHandle, *M, SymbolResolver, SymbolResolverCtx); |
| } |
| |
| LLVMOrcErrorCode LLVMOrcRemoveModule(LLVMOrcJITStackRef JITStack, |
| LLVMOrcModuleHandle H) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| return J.removeModule(H); |
| } |
| |
| LLVMOrcErrorCode LLVMOrcGetSymbolAddress(LLVMOrcJITStackRef JITStack, |
| LLVMOrcTargetAddress *RetAddr, |
| const char *SymbolName) { |
| OrcCBindingsStack &J = *unwrap(JITStack); |
| return J.findSymbolAddress(*RetAddr, SymbolName, true); |
| } |
| |
| LLVMOrcErrorCode LLVMOrcDisposeInstance(LLVMOrcJITStackRef JITStack) { |
| auto *J = unwrap(JITStack); |
| auto Err = J->shutdown(); |
| delete J; |
| return Err; |
| } |