I screwed up the macros, so of course strtol didn't work. *sigh*
[oota-llvm.git] / tools / lli / lli.cpp
1 //===----------------------------------------------------------------------===//
2 // LLVM INTERPRETER/DEBUGGER/PROFILER UTILITY 
3 //
4 // This utility is an interactive frontend to almost all other LLVM
5 // functionality.  It may be used as an interpreter to run code, a debugger to
6 // find problems, or a profiler to analyze execution frequencies.
7 //
8 //===----------------------------------------------------------------------===//
9
10 #include "Interpreter.h"
11 #include "llvm/Support/CommandLine.h"
12
13 cl::StringList InputArgv(""   , "Input command line", cl::ConsumeAfter);
14 cl::String MainFunction ("f"      , "Function to execute", cl::NoFlags, "main");
15 cl::Flag   DebugMode    ("debug"  , "Start program in debugger");
16 cl::Alias  DebugModeA   ("d"      , "Alias for -debug", cl::NoFlags, DebugMode);
17 cl::Flag   TraceMode    ("trace"  , "Enable Tracing");
18 cl::Flag   ProfileMode  ("profile", "Enable Profiling [unimp]");
19
20
21 //===----------------------------------------------------------------------===//
22 // Interpreter ctor - Initialize stuff
23 //
24 Interpreter::Interpreter() : ExitCode(0), Profile(ProfileMode), 
25                              Trace(TraceMode), CurFrame(-1) {
26   CurMod = 0;
27   loadModule(InputArgv.size() ? InputArgv[0] : "-");
28
29   // Initialize the "backend"
30   initializeExecutionEngine();
31 }
32
33 //===----------------------------------------------------------------------===//
34 // main Driver function
35 //
36 int main(int argc, char** argv) {
37   cl::ParseCommandLineOptions(argc, argv, " llvm interpreter\n");
38
39   // Create the interpreter...
40   Interpreter I;
41
42   // Handle alternate names of the program.  If started as llp, enable profiling
43   // if started as ldb, enable debugging...
44   //
45   if (argv[0] == "ldb")       // TODO: Obviously incorrect, but you get the idea
46     DebugMode = true;
47   else if (argv[0] == "llp")
48     ProfileMode = true;
49
50   // If running with the profiler, enable it now...
51   if (ProfileMode) I.enableProfiling();
52   if (TraceMode) I.enableTracing();
53
54   // Start interpreter into the main function...
55   //
56   if (!I.callMainMethod(MainFunction, InputArgv) && !DebugMode) {
57     // If not in debug mode and if the call succeeded, run the code now...
58     I.run();
59   }
60
61   // If debug mode, allow the user to interact... also, if the user pressed 
62   // ctrl-c or execution hit an error, enter the event loop...
63   if (DebugMode || I.isStopped())
64     I.handleUserInput();
65
66   // Return the status code of the program executed...
67   return I.getExitCode();
68 }