//===- Interpreter.cpp - Top-Level LLVM Interpreter Implementation --------===//
-//
+//
// The LLVM Compiler Infrastructure
//
// This file was developed by the LLVM research group and is distributed under
// the University of Illinois Open Source License. See LICENSE.TXT for details.
-//
+//
//===----------------------------------------------------------------------===//
//
// This file implements the top-level functionality for the LLVM interpreter.
//===----------------------------------------------------------------------===//
#include "Interpreter.h"
-#include "llvm/Module.h"
+#include "llvm/CodeGen/IntrinsicLowering.h"
#include "llvm/DerivedTypes.h"
+#include "llvm/Module.h"
+#include "llvm/ModuleProvider.h"
using namespace llvm;
-/// create - Create a new interpreter object. This can never fail.
-///
-ExecutionEngine *Interpreter::create(Module *M){
- bool isLittleEndian = false;
- switch (M->getEndianness()) {
- case Module::LittleEndian: isLittleEndian = true; break;
- case Module::BigEndian: isLittleEndian = false; break;
- case Module::AnyPointerSize:
- int Test = 0;
- *(char*)&Test = 1; // Return true if the host is little endian
- isLittleEndian = (Test == 1);
- break;
- }
+static struct RegisterInterp {
+ RegisterInterp() { Interpreter::Register(); }
+} InterpRegistrator;
- bool isLongPointer = false;
- switch (M->getPointerSize()) {
- case Module::Pointer32: isLongPointer = false; break;
- case Module::Pointer64: isLongPointer = true; break;
- case Module::AnyPointerSize:
- isLongPointer = (sizeof(void*) == 8); // Follow host
- break;
+namespace llvm {
+ void LinkInInterpreter() {
}
+}
- return new Interpreter(M, isLittleEndian, isLongPointer);
+/// create - Create a new interpreter object. This can never fail.
+///
+ExecutionEngine *Interpreter::create(ModuleProvider *MP, std::string* ErrStr) {
+ // Tell this ModuleProvide to materialize and release the module
+ Module *M = MP->releaseModule(ErrStr);
+ if (!M)
+ // We got an error, just return 0
+ return 0;
+
+ // This is a bit nasty, but the ExecutionEngine won't be able to delete the
+ // module due to use/def issues if we don't delete this MP here. Below we
+ // construct a new Interpreter with the Module we just got. This creates a
+ // new ExistingModuleProvider in the EE instance. Consequently, MP is left
+ // dangling and it contains references into the module which cause problems
+ // when the module is deleted via the ExistingModuleProvide via EE.
+ delete MP;
+
+ return new Interpreter(M);
}
//===----------------------------------------------------------------------===//
// Interpreter ctor - Initialize stuff
//
-Interpreter::Interpreter(Module *M, bool isLittleEndian, bool isLongPointer)
- : ExecutionEngine(M), ExitCode(0),
- TD("lli", isLittleEndian, isLongPointer ? 8 : 4, isLongPointer ? 8 : 4,
- isLongPointer ? 8 : 4) {
-
- setTargetData(TD);
+Interpreter::Interpreter(Module *M) : ExecutionEngine(M), TD(M) {
+
+ memset(&ExitValue.Untyped, 0, sizeof(ExitValue.Untyped));
+ setTargetData(&TD);
// Initialize the "backend"
initializeExecutionEngine();
initializeExternalFunctions();
emitGlobals();
+
+ IL = new IntrinsicLowering(TD);
+}
+
+Interpreter::~Interpreter() {
+ delete IL;
}
void Interpreter::runAtExitHandlers () {
/// run - Start execution with the specified function and arguments.
///
-GenericValue Interpreter::run(Function *F,
- const std::vector<GenericValue> &ArgValues) {
+GenericValue
+Interpreter::runFunction(Function *F,
+ const std::vector<GenericValue> &ArgValues) {
assert (F && "Function *F was null at entry to run()");
// Try extra hard not to pass extra args to a function that isn't
// take into account gratuitous differences in declared types,
// though.
std::vector<GenericValue> ActualArgs;
- const unsigned ArgCount = F->getFunctionType()->getParamTypes().size();
+ const unsigned ArgCount = F->getFunctionType()->getNumParams();
for (unsigned i = 0; i < ArgCount; ++i)
- ActualArgs.push_back (ArgValues[i]);
-
+ ActualArgs.push_back(ArgValues[i]);
+
// Set up the function call.
callFunction(F, ActualArgs);
// Start executing the function.
run();
-
- // Run any atexit handlers now!
- runAtExitHandlers();
- GenericValue rv;
- rv.IntVal = ExitCode;
- return rv;
+ return ExitValue;
}