Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 1 | //===- Interpreter.cpp - Top-Level LLVM Interpreter Implementation --------===// |
| 2 | // |
| 3 | // This file implements the top-level functionality for the LLVM interpreter. |
| 4 | // This interpreter is designed to be a very simple, portable, inefficient |
| 5 | // interpreter. |
| 6 | // |
| 7 | //===----------------------------------------------------------------------===// |
| 8 | |
| 9 | #include "Interpreter.h" |
Chris Lattner | 39c0726 | 2003-08-24 19:50:53 +0000 | [diff] [blame] | 10 | #include "llvm/Module.h" |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 11 | |
Brian Gaeke | 82d8277 | 2003-09-03 20:34:19 +0000 | [diff] [blame^] | 12 | /// create - Create a new interpreter object. This can never fail. |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 13 | /// |
Brian Gaeke | 82d8277 | 2003-09-03 20:34:19 +0000 | [diff] [blame^] | 14 | ExecutionEngine *Interpreter::create(Module *M, bool DebugMode, bool TraceMode){ |
Chris Lattner | 39c0726 | 2003-08-24 19:50:53 +0000 | [diff] [blame] | 15 | bool isLittleEndian; |
| 16 | switch (M->getEndianness()) { |
| 17 | case Module::LittleEndian: isLittleEndian = true; break; |
| 18 | case Module::BigEndian: isLittleEndian = false; break; |
| 19 | case Module::AnyPointerSize: |
| 20 | int Test = 0; |
| 21 | *(char*)&Test = 1; // Return true if the host is little endian |
| 22 | isLittleEndian = (Test == 1); |
| 23 | break; |
| 24 | } |
| 25 | |
| 26 | bool isLongPointer; |
| 27 | switch (M->getPointerSize()) { |
| 28 | case Module::Pointer32: isLongPointer = false; break; |
| 29 | case Module::Pointer64: isLongPointer = true; break; |
| 30 | case Module::AnyPointerSize: |
| 31 | isLongPointer = (sizeof(void*) == 8); // Follow host |
| 32 | break; |
| 33 | } |
| 34 | |
| 35 | return new Interpreter(M, isLittleEndian, isLongPointer, DebugMode,TraceMode); |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 36 | } |
| 37 | |
| 38 | //===----------------------------------------------------------------------===// |
| 39 | // Interpreter ctor - Initialize stuff |
| 40 | // |
Chris Lattner | 39c0726 | 2003-08-24 19:50:53 +0000 | [diff] [blame] | 41 | Interpreter::Interpreter(Module *M, bool isLittleEndian, bool isLongPointer, |
| 42 | bool DebugMode, bool TraceMode) |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 43 | : ExecutionEngine(M), ExitCode(0), Debug(DebugMode), Trace(TraceMode), |
Chris Lattner | 39c0726 | 2003-08-24 19:50:53 +0000 | [diff] [blame] | 44 | CurFrame(-1), TD("lli", isLittleEndian, isLongPointer ? 8 : 4, |
| 45 | isLongPointer ? 8 : 4, isLongPointer ? 8 : 4) { |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 46 | |
| 47 | setTargetData(TD); |
| 48 | // Initialize the "backend" |
| 49 | initializeExecutionEngine(); |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame] | 50 | initializeExternalFunctions(); |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 51 | CW.setModule(M); // Update Writer |
Chris Lattner | 56adf15 | 2003-05-12 02:14:34 +0000 | [diff] [blame] | 52 | emitGlobals(); |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 53 | } |
| 54 | |
| 55 | /// run - Start execution with the specified function and arguments. |
| 56 | /// |
| 57 | int Interpreter::run(const std::string &MainFunction, |
John Criswell | 69582b3 | 2003-08-21 21:12:30 +0000 | [diff] [blame] | 58 | const std::vector<std::string> &Args, |
| 59 | const char ** envp) { |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 60 | // Start interpreter into the main function... |
| 61 | // |
Chris Lattner | da82ed5 | 2003-05-08 16:18:31 +0000 | [diff] [blame] | 62 | if (!callMainFunction(MainFunction, Args) && !Debug) { |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 63 | // If not in debug mode and if the call succeeded, run the code now... |
| 64 | run(); |
| 65 | } |
| 66 | |
Chris Lattner | 44edb6b | 2003-05-14 14:21:30 +0000 | [diff] [blame] | 67 | do { |
| 68 | // If debug mode, allow the user to interact... also, if the user pressed |
| 69 | // ctrl-c or execution hit an error, enter the event loop... |
| 70 | if (Debug || isStopped()) |
| 71 | handleUserInput(); |
| 72 | |
| 73 | // If the program has exited, run atexit handlers... |
| 74 | if (ECStack.empty() && !AtExitHandlers.empty()) { |
| 75 | callFunction(AtExitHandlers.back(), std::vector<GenericValue>()); |
| 76 | AtExitHandlers.pop_back(); |
| 77 | run(); |
| 78 | } |
| 79 | } while (!ECStack.empty()); |
| 80 | |
| 81 | PerformExitStuff(); |
Chris Lattner | bd199fb | 2002-12-24 00:01:05 +0000 | [diff] [blame] | 82 | return ExitCode; |
| 83 | } |
| 84 | |