82b354dc18a516879ba085a4255c7201720d9068
[oota-llvm.git] / tools / lli / lli.cpp
1 //===- lli.cpp - LLVM Interpreter / Dynamic compiler ----------------------===//
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 utility provides a way to execute LLVM bytecode without static
11 // compilation.  This consists of a very simple and slow (but portable)
12 // interpreter, along with capability for system specific dynamic compilers.  At
13 // runtime, the fastest (stable) execution engine is selected to run the
14 // program.  This means the JIT compiler for the current platform if it's
15 // available.
16 //
17 //===----------------------------------------------------------------------===//
18
19 #include "llvm/DerivedTypes.h"
20 #include "llvm/Module.h"
21 #include "llvm/ModuleProvider.h"
22 #include "llvm/Bytecode/Reader.h"
23 #include "llvm/ExecutionEngine/ExecutionEngine.h"
24 #include "llvm/ExecutionEngine/GenericValue.h"
25 #include "llvm/Target/TargetMachineImpls.h"
26 #include "llvm/Target/TargetData.h"
27 #include "Support/CommandLine.h"
28 #include "Support/Debug.h"
29 #include "Support/SystemUtils.h"
30
31 using namespace llvm;
32
33 namespace {
34   cl::opt<std::string>
35   InputFile(cl::desc("<input bytecode>"), cl::Positional, cl::init("-"));
36
37   cl::list<std::string>
38   InputArgv(cl::ConsumeAfter, cl::desc("<program arguments>..."));
39
40   cl::opt<std::string>
41   MainFunction("f", cl::desc("Function to execute"), cl::init("main"),
42                cl::value_desc("function name"));
43
44   cl::opt<bool> ForceInterpreter("force-interpreter",
45                                  cl::desc("Force interpretation: disable JIT"),
46                                  cl::init(false));
47
48   cl::opt<std::string>
49   FakeArgv0("fake-argv0",
50             cl::desc("Override the 'argv[0]' value passed into the executing"
51                      " program"), cl::value_desc("executable"));
52 }
53
54 static std::vector<std::string> makeStringVector(char * const *envp) {
55   std::vector<std::string> rv;
56   for (unsigned i = 0; envp[i]; ++i)
57     rv.push_back(envp[i]);
58   return rv;
59 }
60
61 static void *CreateArgv(ExecutionEngine *EE,
62                         const std::vector<std::string> &InputArgv) {
63   if (EE->getTargetData().getPointerSize() == 8) {   // 64 bit target?
64     PointerTy *Result = new PointerTy[InputArgv.size()+1];
65     DEBUG(std::cerr << "ARGV = " << (void*)Result << "\n");
66
67     for (unsigned i = 0; i < InputArgv.size(); ++i) {
68       unsigned Size = InputArgv[i].size()+1;
69       char *Dest = new char[Size];
70       DEBUG(std::cerr << "ARGV[" << i << "] = " << (void*)Dest << "\n");
71       
72       std::copy(InputArgv[i].begin(), InputArgv[i].end(), Dest);
73       Dest[Size-1] = 0;
74       
75       // Endian safe: Result[i] = (PointerTy)Dest;
76       EE->StoreValueToMemory(PTOGV(Dest), (GenericValue*)(Result+i),
77                              Type::LongTy);
78     }
79     Result[InputArgv.size()] = 0;
80     return Result;
81   } else {                                      // 32 bit target?
82     int *Result = new int[InputArgv.size()+1];
83     DEBUG(std::cerr << "ARGV = " << (void*)Result << "\n");
84
85     for (unsigned i = 0; i < InputArgv.size(); ++i) {
86       unsigned Size = InputArgv[i].size()+1;
87       char *Dest = new char[Size];
88       DEBUG(std::cerr << "ARGV[" << i << "] = " << (void*)Dest << "\n");
89       
90       std::copy(InputArgv[i].begin(), InputArgv[i].end(), Dest);
91       Dest[Size-1] = 0;
92       
93       // Endian safe: Result[i] = (PointerTy)Dest;
94       EE->StoreValueToMemory(PTOGV(Dest), (GenericValue*)(Result+i),
95                              Type::IntTy);
96     }
97     Result[InputArgv.size()] = 0;  // null terminate it
98     return Result;
99   }
100 }
101
102 /// callAsMain - Call the function named FnName from M as if its
103 /// signature were int main (int argc, char **argv, const char
104 /// **envp), using the contents of Args to determine argc & argv, and
105 /// the contents of EnvVars to determine envp.  Returns the result
106 /// from calling FnName, or -1 and prints an error msg. if the named
107 /// function cannot be found.
108 ///
109 int callAsMain(ExecutionEngine *EE, ModuleProvider *MP,
110                const std::string &FnName,
111                const std::vector<std::string> &Args,
112                const std::vector<std::string> &EnvVars) {
113   Function *Fn = MP->getModule()->getNamedFunction(FnName);
114   if (!Fn) {
115     std::cerr << "Function '" << FnName << "' not found in module.\n";
116     return -1;
117   }
118   std::vector<GenericValue> GVArgs;
119   GenericValue GVArgc;
120   GVArgc.IntVal = Args.size();
121   GVArgs.push_back(GVArgc); // Arg #0 = argc.
122   GVArgs.push_back(PTOGV(CreateArgv(EE, Args))); // Arg #1 = argv.
123   GVArgs.push_back(PTOGV(CreateArgv(EE, EnvVars))); // Arg #2 = envp.
124   return EE->run(Fn, GVArgs).IntVal;
125 }
126
127 //===----------------------------------------------------------------------===//
128 // main Driver function
129 //
130 int main(int argc, char **argv, char * const *envp) {
131   cl::ParseCommandLineOptions(argc, argv,
132                               " llvm interpreter & dynamic compiler\n");
133
134   // Load the bytecode...
135   std::string ErrorMsg;
136   ModuleProvider *MP = 0;
137   try {
138     MP = getBytecodeModuleProvider(InputFile);
139   } catch (std::string &err) {
140     std::cerr << "Error parsing '" << InputFile << "': " << err << "\n";
141     exit(1);
142   }
143
144   ExecutionEngine *EE =
145     ExecutionEngine::create(MP, ForceInterpreter);
146   assert(EE && "Couldn't create an ExecutionEngine, not even an interpreter?");
147
148   // If the user specifically requested an argv[0] to pass into the program, do
149   // it now.
150   if (!FakeArgv0.empty()) {
151     InputFile = FakeArgv0;
152   } else {
153     // Otherwise, if there is a .bc suffix on the executable strip it off, it
154     // might confuse the program.
155     if (InputFile.rfind(".bc") == InputFile.length() - 3)
156       InputFile.erase(InputFile.length() - 3);
157   }
158
159   // Add the module's name to the start of the vector of arguments to main().
160   InputArgv.insert(InputArgv.begin(), InputFile);
161
162   // Run the main function!
163   int ExitCode = callAsMain(EE, MP, MainFunction, InputArgv,
164                             makeStringVector(envp)); 
165
166   // Now that we are done executing the program, shut down the execution engine
167   delete EE;
168   return ExitCode;
169 }