1662c5544SLang Hames //===---- ExecutorProcessControl.cpp -- Executor process control APIs -----===//
2662c5544SLang Hames //
3662c5544SLang Hames // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4662c5544SLang Hames // See https://llvm.org/LICENSE.txt for license information.
5662c5544SLang Hames // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6662c5544SLang Hames //
7662c5544SLang Hames //===----------------------------------------------------------------------===//
8662c5544SLang Hames 
9662c5544SLang Hames #include "llvm/ExecutionEngine/Orc/ExecutorProcessControl.h"
10662c5544SLang Hames 
11662c5544SLang Hames #include "llvm/ExecutionEngine/Orc/Core.h"
12662c5544SLang Hames #include "llvm/ExecutionEngine/Orc/TargetProcess/TargetExecutionUtils.h"
1339f64c4cSLang Hames #include "llvm/Support/FormatVariadic.h"
14662c5544SLang Hames #include "llvm/Support/Host.h"
15662c5544SLang Hames #include "llvm/Support/Process.h"
16662c5544SLang Hames 
17bb5f97e3SLang Hames #define DEBUG_TYPE "orc"
18bb5f97e3SLang Hames 
19662c5544SLang Hames namespace llvm {
20662c5544SLang Hames namespace orc {
21662c5544SLang Hames 
22662c5544SLang Hames ExecutorProcessControl::MemoryAccess::~MemoryAccess() {}
23662c5544SLang Hames 
24662c5544SLang Hames ExecutorProcessControl::~ExecutorProcessControl() {}
25662c5544SLang Hames 
26662c5544SLang Hames SelfExecutorProcessControl::SelfExecutorProcessControl(
27662c5544SLang Hames     std::shared_ptr<SymbolStringPool> SSP, Triple TargetTriple,
28662c5544SLang Hames     unsigned PageSize, std::unique_ptr<jitlink::JITLinkMemoryManager> MemMgr)
29662c5544SLang Hames     : ExecutorProcessControl(std::move(SSP)) {
30662c5544SLang Hames 
31662c5544SLang Hames   OwnedMemMgr = std::move(MemMgr);
32662c5544SLang Hames   if (!OwnedMemMgr)
33662c5544SLang Hames     OwnedMemMgr = std::make_unique<jitlink::InProcessMemoryManager>();
34662c5544SLang Hames 
35662c5544SLang Hames   this->TargetTriple = std::move(TargetTriple);
36662c5544SLang Hames   this->PageSize = PageSize;
37662c5544SLang Hames   this->MemMgr = OwnedMemMgr.get();
38662c5544SLang Hames   this->MemAccess = this;
39*ef391df2SLang Hames   this->JDI = {ExecutorAddr::fromPtr(jitDispatchViaWrapperFunctionManager),
40*ef391df2SLang Hames                ExecutorAddr::fromPtr(this)};
41662c5544SLang Hames   if (this->TargetTriple.isOSBinFormatMachO())
42662c5544SLang Hames     GlobalManglingPrefix = '_';
43662c5544SLang Hames }
44662c5544SLang Hames 
45662c5544SLang Hames Expected<std::unique_ptr<SelfExecutorProcessControl>>
46662c5544SLang Hames SelfExecutorProcessControl::Create(
47662c5544SLang Hames     std::shared_ptr<SymbolStringPool> SSP,
48662c5544SLang Hames     std::unique_ptr<jitlink::JITLinkMemoryManager> MemMgr) {
492487db1fSLang Hames 
502487db1fSLang Hames   if (!SSP)
512487db1fSLang Hames     SSP = std::make_shared<SymbolStringPool>();
522487db1fSLang Hames 
53662c5544SLang Hames   auto PageSize = sys::Process::getPageSize();
54662c5544SLang Hames   if (!PageSize)
55662c5544SLang Hames     return PageSize.takeError();
56662c5544SLang Hames 
57662c5544SLang Hames   Triple TT(sys::getProcessTriple());
58662c5544SLang Hames 
59662c5544SLang Hames   return std::make_unique<SelfExecutorProcessControl>(
60662c5544SLang Hames       std::move(SSP), std::move(TT), *PageSize, std::move(MemMgr));
61662c5544SLang Hames }
62662c5544SLang Hames 
63662c5544SLang Hames Expected<tpctypes::DylibHandle>
64662c5544SLang Hames SelfExecutorProcessControl::loadDylib(const char *DylibPath) {
65662c5544SLang Hames   std::string ErrMsg;
66662c5544SLang Hames   auto Dylib = std::make_unique<sys::DynamicLibrary>(
67662c5544SLang Hames       sys::DynamicLibrary::getPermanentLibrary(DylibPath, &ErrMsg));
68662c5544SLang Hames   if (!Dylib->isValid())
69662c5544SLang Hames     return make_error<StringError>(std::move(ErrMsg), inconvertibleErrorCode());
70662c5544SLang Hames   DynamicLibraries.push_back(std::move(Dylib));
71662c5544SLang Hames   return pointerToJITTargetAddress(DynamicLibraries.back().get());
72662c5544SLang Hames }
73662c5544SLang Hames 
74662c5544SLang Hames Expected<std::vector<tpctypes::LookupResult>>
75662c5544SLang Hames SelfExecutorProcessControl::lookupSymbols(ArrayRef<LookupRequest> Request) {
76662c5544SLang Hames   std::vector<tpctypes::LookupResult> R;
77662c5544SLang Hames 
78662c5544SLang Hames   for (auto &Elem : Request) {
79662c5544SLang Hames     auto *Dylib = jitTargetAddressToPointer<sys::DynamicLibrary *>(Elem.Handle);
80662c5544SLang Hames     assert(llvm::any_of(DynamicLibraries,
81662c5544SLang Hames                         [=](const std::unique_ptr<sys::DynamicLibrary> &DL) {
82662c5544SLang Hames                           return DL.get() == Dylib;
83662c5544SLang Hames                         }) &&
84662c5544SLang Hames            "Invalid handle");
85662c5544SLang Hames 
86662c5544SLang Hames     R.push_back(std::vector<JITTargetAddress>());
87662c5544SLang Hames     for (auto &KV : Elem.Symbols) {
88662c5544SLang Hames       auto &Sym = KV.first;
89662c5544SLang Hames       std::string Tmp((*Sym).data() + !!GlobalManglingPrefix,
90662c5544SLang Hames                       (*Sym).size() - !!GlobalManglingPrefix);
91662c5544SLang Hames       void *Addr = Dylib->getAddressOfSymbol(Tmp.c_str());
92662c5544SLang Hames       if (!Addr && KV.second == SymbolLookupFlags::RequiredSymbol) {
93662c5544SLang Hames         // FIXME: Collect all failing symbols before erroring out.
94662c5544SLang Hames         SymbolNameVector MissingSymbols;
95662c5544SLang Hames         MissingSymbols.push_back(Sym);
96662c5544SLang Hames         return make_error<SymbolsNotFound>(std::move(MissingSymbols));
97662c5544SLang Hames       }
98662c5544SLang Hames       R.back().push_back(pointerToJITTargetAddress(Addr));
99662c5544SLang Hames     }
100662c5544SLang Hames   }
101662c5544SLang Hames 
102662c5544SLang Hames   return R;
103662c5544SLang Hames }
104662c5544SLang Hames 
105662c5544SLang Hames Expected<int32_t>
106662c5544SLang Hames SelfExecutorProcessControl::runAsMain(JITTargetAddress MainFnAddr,
107662c5544SLang Hames                                       ArrayRef<std::string> Args) {
108662c5544SLang Hames   using MainTy = int (*)(int, char *[]);
109662c5544SLang Hames   return orc::runAsMain(jitTargetAddressToFunction<MainTy>(MainFnAddr), Args);
110662c5544SLang Hames }
111662c5544SLang Hames 
1122487db1fSLang Hames void SelfExecutorProcessControl::callWrapperAsync(
1132487db1fSLang Hames     SendResultFunction SendResult, JITTargetAddress WrapperFnAddr,
114662c5544SLang Hames     ArrayRef<char> ArgBuffer) {
11539f64c4cSLang Hames   using WrapperFnTy =
11639f64c4cSLang Hames       shared::detail::CWrapperFunctionResult (*)(const char *Data, size_t Size);
117662c5544SLang Hames   auto *WrapperFn = jitTargetAddressToFunction<WrapperFnTy>(WrapperFnAddr);
11839f64c4cSLang Hames   SendResult(WrapperFn(ArgBuffer.data(), ArgBuffer.size()));
119662c5544SLang Hames }
120662c5544SLang Hames 
121662c5544SLang Hames Error SelfExecutorProcessControl::disconnect() { return Error::success(); }
122662c5544SLang Hames 
1234290d0feSLang Hames void SelfExecutorProcessControl::writeUInt8sAsync(
1244290d0feSLang Hames     ArrayRef<tpctypes::UInt8Write> Ws, WriteResultFn OnWriteComplete) {
125662c5544SLang Hames   for (auto &W : Ws)
126662c5544SLang Hames     *jitTargetAddressToPointer<uint8_t *>(W.Address) = W.Value;
127662c5544SLang Hames   OnWriteComplete(Error::success());
128662c5544SLang Hames }
129662c5544SLang Hames 
1304290d0feSLang Hames void SelfExecutorProcessControl::writeUInt16sAsync(
131662c5544SLang Hames     ArrayRef<tpctypes::UInt16Write> Ws, WriteResultFn OnWriteComplete) {
132662c5544SLang Hames   for (auto &W : Ws)
133662c5544SLang Hames     *jitTargetAddressToPointer<uint16_t *>(W.Address) = W.Value;
134662c5544SLang Hames   OnWriteComplete(Error::success());
135662c5544SLang Hames }
136662c5544SLang Hames 
1374290d0feSLang Hames void SelfExecutorProcessControl::writeUInt32sAsync(
138662c5544SLang Hames     ArrayRef<tpctypes::UInt32Write> Ws, WriteResultFn OnWriteComplete) {
139662c5544SLang Hames   for (auto &W : Ws)
140662c5544SLang Hames     *jitTargetAddressToPointer<uint32_t *>(W.Address) = W.Value;
141662c5544SLang Hames   OnWriteComplete(Error::success());
142662c5544SLang Hames }
143662c5544SLang Hames 
1444290d0feSLang Hames void SelfExecutorProcessControl::writeUInt64sAsync(
145662c5544SLang Hames     ArrayRef<tpctypes::UInt64Write> Ws, WriteResultFn OnWriteComplete) {
146662c5544SLang Hames   for (auto &W : Ws)
147662c5544SLang Hames     *jitTargetAddressToPointer<uint64_t *>(W.Address) = W.Value;
148662c5544SLang Hames   OnWriteComplete(Error::success());
149662c5544SLang Hames }
150662c5544SLang Hames 
1514290d0feSLang Hames void SelfExecutorProcessControl::writeBuffersAsync(
152662c5544SLang Hames     ArrayRef<tpctypes::BufferWrite> Ws, WriteResultFn OnWriteComplete) {
153662c5544SLang Hames   for (auto &W : Ws)
154662c5544SLang Hames     memcpy(jitTargetAddressToPointer<char *>(W.Address), W.Buffer.data(),
155662c5544SLang Hames            W.Buffer.size());
156662c5544SLang Hames   OnWriteComplete(Error::success());
157662c5544SLang Hames }
158662c5544SLang Hames 
159bb5f97e3SLang Hames shared::detail::CWrapperFunctionResult
160bb5f97e3SLang Hames SelfExecutorProcessControl::jitDispatchViaWrapperFunctionManager(
161bb5f97e3SLang Hames     void *Ctx, const void *FnTag, const char *Data, size_t Size) {
162bb5f97e3SLang Hames 
163bb5f97e3SLang Hames   LLVM_DEBUG({
164bb5f97e3SLang Hames     dbgs() << "jit-dispatch call with tag " << FnTag << " and " << Size
165bb5f97e3SLang Hames            << " byte payload.\n";
166bb5f97e3SLang Hames   });
167bb5f97e3SLang Hames 
168bb5f97e3SLang Hames   std::promise<shared::WrapperFunctionResult> ResultP;
169bb5f97e3SLang Hames   auto ResultF = ResultP.get_future();
1702487db1fSLang Hames   static_cast<SelfExecutorProcessControl *>(Ctx)
1712487db1fSLang Hames       ->getExecutionSession()
1722487db1fSLang Hames       .runJITDispatchHandler(
1732487db1fSLang Hames           [ResultP = std::move(ResultP)](
1742487db1fSLang Hames               shared::WrapperFunctionResult Result) mutable {
175bb5f97e3SLang Hames             ResultP.set_value(std::move(Result));
176bb5f97e3SLang Hames           },
177bb5f97e3SLang Hames           pointerToJITTargetAddress(FnTag), {Data, Size});
178bb5f97e3SLang Hames 
179bb5f97e3SLang Hames   return ResultF.get().release();
180bb5f97e3SLang Hames }
181bb5f97e3SLang Hames 
182662c5544SLang Hames } // end namespace orc
183662c5544SLang Hames } // end namespace llvm
184