The interpreter assumes that the caller of runFunction() must be lli, and
[oota-llvm.git] / lib / ExecutionEngine / Interpreter / Interpreter.cpp
1 //===- Interpreter.cpp - Top-Level LLVM Interpreter Implementation --------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file was developed by the LLVM research group and is distributed under
6 // the University of Illinois Open Source License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file implements the top-level functionality for the LLVM interpreter.
11 // This interpreter is designed to be a very simple, portable, inefficient
12 // interpreter.
13 //
14 //===----------------------------------------------------------------------===//
15
16 #include "Interpreter.h"
17 #include "llvm/CodeGen/IntrinsicLowering.h"
18 #include "llvm/DerivedTypes.h"
19 #include "llvm/Module.h"
20 using namespace llvm;
21
22 /// create - Create a new interpreter object.  This can never fail.
23 ///
24 ExecutionEngine *Interpreter::create(Module *M, IntrinsicLowering *IL) {
25   bool isLittleEndian = false;
26   switch (M->getEndianness()) {
27   case Module::LittleEndian: isLittleEndian = true; break;
28   case Module::BigEndian:    isLittleEndian = false; break;
29   case Module::AnyPointerSize:
30     int Test = 0;
31     *(char*)&Test = 1;    // Return true if the host is little endian
32     isLittleEndian = (Test == 1);
33     break;
34   }
35
36   bool isLongPointer = false;
37   switch (M->getPointerSize()) {
38   case Module::Pointer32: isLongPointer = false; break;
39   case Module::Pointer64: isLongPointer = true; break;
40   case Module::AnyPointerSize:
41     isLongPointer = (sizeof(void*) == 8);  // Follow host
42     break;
43   }
44
45   return new Interpreter(M, isLittleEndian, isLongPointer, IL);
46 }
47
48 //===----------------------------------------------------------------------===//
49 // Interpreter ctor - Initialize stuff
50 //
51 Interpreter::Interpreter(Module *M, bool isLittleEndian, bool isLongPointer,
52                          IntrinsicLowering *il)
53   : ExecutionEngine(M),
54     TD("lli", isLittleEndian, isLongPointer ? 8 : 4, isLongPointer ? 8 : 4,
55        isLongPointer ? 8 : 4), IL(il) {
56
57   memset(&ExitValue, 0, sizeof(ExitValue));
58   setTargetData(TD);
59   // Initialize the "backend"
60   initializeExecutionEngine();
61   initializeExternalFunctions();
62   emitGlobals();
63
64   if (IL == 0) IL = new DefaultIntrinsicLowering();
65 }
66
67 Interpreter::~Interpreter() {
68   delete IL;
69 }
70
71 void Interpreter::runAtExitHandlers () {
72   while (!AtExitHandlers.empty()) {
73     callFunction(AtExitHandlers.back(), std::vector<GenericValue>());
74     AtExitHandlers.pop_back();
75     run();
76   }
77 }
78
79 /// run - Start execution with the specified function and arguments.
80 ///
81 GenericValue
82 Interpreter::runFunction(Function *F,
83                          const std::vector<GenericValue> &ArgValues) {
84   assert (F && "Function *F was null at entry to run()");
85
86   // Try extra hard not to pass extra args to a function that isn't
87   // expecting them.  C programmers frequently bend the rules and
88   // declare main() with fewer parameters than it actually gets
89   // passed, and the interpreter barfs if you pass a function more
90   // parameters than it is declared to take. This does not attempt to
91   // take into account gratuitous differences in declared types,
92   // though.
93   std::vector<GenericValue> ActualArgs;
94   const unsigned ArgCount = F->getFunctionType()->getNumParams();
95   for (unsigned i = 0; i < ArgCount; ++i)
96     ActualArgs.push_back(ArgValues[i]);
97
98   // Set up the function call.
99   callFunction(F, ActualArgs);
100
101   // Start executing the function.
102   run();
103
104   return ExitValue;
105 }
106