mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-10-31 09:11:13 +00:00
db14500d88
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@3088 91177308-0d34-0410-b5e6-96231b3b80d8
89 lines
2.8 KiB
C++
89 lines
2.8 KiB
C++
//===----------------------------------------------------------------------===//
|
|
// LLVM INTERPRETER/DEBUGGER/PROFILER UTILITY
|
|
//
|
|
// This utility is an interactive frontend to almost all other LLVM
|
|
// functionality. It may be used as an interpreter to run code, a debugger to
|
|
// find problems, or a profiler to analyze execution frequencies.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "Interpreter.h"
|
|
#include "Support/CommandLine.h"
|
|
|
|
static cl::opt<std::string>
|
|
InputFile(cl::desc("<input bytecode>"), cl::Positional, cl::init("-"));
|
|
|
|
static cl::list<std::string>
|
|
InputArgv(cl::ConsumeAfter, cl::desc("<program arguments>..."));
|
|
|
|
static cl::opt<std::string>
|
|
MainFunction ("f", cl::desc("Function to execute"), cl::init("main"),
|
|
cl::value_desc("function name"));
|
|
|
|
static cl::opt<bool>
|
|
DebugMode("debug", cl::desc("Start program in debugger"));
|
|
|
|
static cl::alias
|
|
DebugModeA("d", cl::desc("Alias for -debug"), cl::aliasopt(DebugMode));
|
|
|
|
static cl::opt<bool>
|
|
TraceMode("trace", cl::desc("Enable Tracing"));
|
|
|
|
static cl::opt<bool>
|
|
ProfileMode("profile", cl::desc("Enable Profiling [unimp]"));
|
|
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// Interpreter ctor - Initialize stuff
|
|
//
|
|
Interpreter::Interpreter() : ExitCode(0), Profile(ProfileMode),
|
|
Trace(TraceMode), CurFrame(-1) {
|
|
CurMod = 0;
|
|
loadModule(InputFile);
|
|
|
|
// Initialize the "backend"
|
|
initializeExecutionEngine();
|
|
initializeExternalMethods();
|
|
}
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
// main Driver function
|
|
//
|
|
int main(int argc, char** argv) {
|
|
cl::ParseCommandLineOptions(argc, argv, " llvm interpreter\n");
|
|
|
|
// Add the module name to the start of the argv vector...
|
|
//
|
|
InputArgv.insert(InputArgv.begin(), InputFile);
|
|
|
|
// Create the interpreter...
|
|
Interpreter I;
|
|
|
|
// Handle alternate names of the program. If started as llp, enable profiling
|
|
// if started as ldb, enable debugging...
|
|
//
|
|
if (argv[0] == "ldb") // TODO: Obviously incorrect, but you get the idea
|
|
DebugMode = true;
|
|
else if (argv[0] == "llp")
|
|
ProfileMode = true;
|
|
|
|
// If running with the profiler, enable it now...
|
|
if (ProfileMode) I.enableProfiling();
|
|
if (TraceMode) I.enableTracing();
|
|
|
|
// Start interpreter into the main function...
|
|
//
|
|
if (!I.callMainMethod(MainFunction, InputArgv) && !DebugMode) {
|
|
// If not in debug mode and if the call succeeded, run the code now...
|
|
I.run();
|
|
}
|
|
|
|
// If debug mode, allow the user to interact... also, if the user pressed
|
|
// ctrl-c or execution hit an error, enter the event loop...
|
|
if (DebugMode || I.isStopped())
|
|
I.handleUserInput();
|
|
|
|
// Return the status code of the program executed...
|
|
return I.getExitCode();
|
|
}
|