Add more helper functions

Added:
- CreateInterpreter
- GetSema
- Process
- ObjToString

Author: sudo-panda

include/clang/Interpreter/InterOp.h

@@ -151,17 +151,25 @@ namespace InterOp {
   CallFuncWrapper_t GetFunctionCallWrapper(TInterp_t interp,
                                            TCppFunction_t func);
 
+  TInterp_t CreateInterpreter();
+
+  TCppSema_t GetSema(TInterp_t interp);
+
   void AddSearchPath(TInterp_t interp, const char *dir, bool isUser = true,
                      bool prepend = false);
 
   void AddIncludePath(TInterp_t interp, const char *dir);
 
   TCppIndex_t Declare(TInterp_t interp, const char *code, bool silent = false);
 
+  void Process(TInterp_t interp, const char *code);
+
   const std::string LookupLibrary(TInterp_t interp, const char *lib_name);
 
   bool LoadLibrary(TInterp_t interp, const char *lib_path, bool lookup = true);
 
+  std::string ObjToString(TInterp_t interp, const char *type, void *obj);
+
   TCppScope_t InstantiateClassTemplate(TInterp_t interp, const char *tmpl_name);
 
   std::vector<std::string> GetAllCppNames(TCppScope_t scope);

lib/Interpreter/InterOp.cpp

@@ -18,6 +18,8 @@
 #include "clang/AST/GlobalDecl.h"
 #include "clang/AST/Mangle.h"
 #include "clang/AST/RecordLayout.h"
+#include "clang/Basic/Version.h"
+#include "clang/Config/config.h"
 #include "clang/Frontend/CompilerInstance.h"
 #include "clang/Sema/Sema.h"
 #include "clang/Sema/Lookup.h"
@@ -1828,6 +1830,50 @@ namespace InterOp {
     return 0;
   }
 
+  namespace {
+  
+  std::string GetExecutablePath(const char *Argv0, void *MainAddr) {
+    return llvm::sys::fs::getMainExecutable(Argv0, MainAddr);
+  }
+
+  std::string MakeResourcesPath() {
+    // Dir is bin/ or lib/, depending on where BinaryPath is.
+    void *MainAddr = (void *)(intptr_t)GetExecutablePath;
+    std::string BinaryPath = GetExecutablePath(/*Argv0=*/nullptr, MainAddr);
+
+    // build/tools/clang/unittests/Interpreter/Executable -> build/
+    llvm::StringRef Dir = llvm::sys::path::parent_path(BinaryPath);
+
+    Dir = llvm::sys::path::parent_path(Dir);
+    Dir = llvm::sys::path::parent_path(Dir);
+    Dir = llvm::sys::path::parent_path(Dir);
+    Dir = llvm::sys::path::parent_path(Dir);
+    //Dir = sys::path::parent_path(Dir);
+    llvm::SmallString<128> P(Dir);
+    llvm::sys::path::append(P, llvm::Twine("lib") + CLANG_LIBDIR_SUFFIX,
+                            "clang", CLANG_VERSION_STRING);
+
+    return std::string(P.str());
+  }
+
+  }
+
+  TInterp_t CreateInterpreter() {
+    std::string MainExecutableName =
+      llvm::sys::fs::getMainExecutable(nullptr, nullptr);
+    std::string ResourceDir = MakeResourcesPath();
+    std::vector<const char *> ClingArgv = {"-resource-dir", ResourceDir.c_str(),
+                                           "-std=c++14"};
+    ClingArgv.insert(ClingArgv.begin(), MainExecutableName.c_str());
+    return (TInterp_t) new cling::Interpreter(ClingArgv.size(), &ClingArgv[0]);
+  }
+
+  TCppSema_t GetSema(TInterp_t interp) {
+    auto* I = (cling::Interpreter*)interp;
+
+    return (TCppSema_t) &I->getSema();
+  }
+
   void AddSearchPath(TInterp_t interp, const char *dir, bool isUser,
                      bool prepend) {
     auto* I = (cling::Interpreter*)interp;
@@ -1870,6 +1916,13 @@ namespace InterOp {
 
     return I->declare(code);
   }
+
+  void Process(TInterp_t interp, const char *code) {
+    auto* I = (cling::Interpreter*)interp;
+
+    I->process(code);
+  }
+
   const std::string LookupLibrary(TInterp_t interp, const char *lib_name) {
     auto* I = (cling::Interpreter*)interp;
 
@@ -1884,6 +1937,11 @@ namespace InterOp {
     return res == cling::Interpreter::kSuccess;
   }
 
+  std::string ObjToString(TInterp_t interp, const char *type, void *obj) {
+    auto* I = (cling::Interpreter*)interp;
+    return I->toString(type, obj);
+  }
+
   TCppScope_t InstantiateClassTemplate(TInterp_t interp, const char *tmpl_name) {
     auto* I = (cling::Interpreter*)interp;