3af551f43dd6e699f97e38a22301897aa38b9640
[oota-llvm.git] / tools / bugpoint / OptimizerDriver.cpp
1 //===- OptimizerDriver.cpp - Allow BugPoint to run passes safely ----------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file defines an interface that allows bugpoint to run various passes
11 // without the threat of a buggy pass corrupting bugpoint (of course, bugpoint
12 // may have its own bugs, but that's another story...).  It achieves this by
13 // forking a copy of itself and having the child process do the optimizations.
14 // If this client dies, we can always fork a new one.  :)
15 //
16 //===----------------------------------------------------------------------===//
17
18 #include "BugDriver.h"
19 #include "llvm/Analysis/Verifier.h"
20 #include "llvm/Bitcode/ReaderWriter.h"
21 #include "llvm/IR/DataLayout.h"
22 #include "llvm/IR/Module.h"
23 #include "llvm/PassManager.h"
24 #include "llvm/Support/CommandLine.h"
25 #include "llvm/Support/Debug.h"
26 #include "llvm/Support/FileUtilities.h"
27 #include "llvm/Support/Path.h"
28 #include "llvm/Support/Program.h"
29 #include "llvm/Support/SystemUtils.h"
30 #include "llvm/Support/ToolOutputFile.h"
31
32 #define DONT_GET_PLUGIN_LOADER_OPTION
33 #include "llvm/Support/PluginLoader.h"
34
35 #include <fstream>
36
37 #if !defined(_MSC_VER) && !defined(__MINGW32__)
38 #include <unistd.h>
39 #else
40 #include <io.h>
41 #endif
42
43 using namespace llvm;
44
45 namespace llvm {
46   extern cl::opt<std::string> OutputPrefix;
47 }
48
49 namespace {
50   // ChildOutput - This option captures the name of the child output file that
51   // is set up by the parent bugpoint process
52   cl::opt<std::string> ChildOutput("child-output", cl::ReallyHidden);
53 }
54
55 /// writeProgramToFile - This writes the current "Program" to the named bitcode
56 /// file.  If an error occurs, true is returned.
57 ///
58 static bool writeProgramToFileAux(tool_output_file &Out, const Module *M) {
59   WriteBitcodeToFile(M, Out.os());
60   Out.os().close();
61   if (!Out.os().has_error()) {
62     Out.keep();
63     return false;
64   }
65   return true;
66 }
67
68 bool BugDriver::writeProgramToFile(const std::string &Filename, int FD,
69                                    const Module *M) const {
70   tool_output_file Out(Filename.c_str(), FD);
71   return writeProgramToFileAux(Out, M);
72 }
73
74 bool BugDriver::writeProgramToFile(const std::string &Filename,
75                                    const Module *M) const {
76   std::string ErrInfo;
77   tool_output_file Out(Filename.c_str(), ErrInfo, raw_fd_ostream::F_Binary);
78   if (ErrInfo.empty())
79     return writeProgramToFileAux(Out, M);
80   return true;
81 }
82
83
84 /// EmitProgressBitcode - This function is used to output the current Program
85 /// to a file named "bugpoint-ID.bc".
86 ///
87 void BugDriver::EmitProgressBitcode(const Module *M,
88                                     const std::string &ID,
89                                     bool NoFlyer)  const {
90   // Output the input to the current pass to a bitcode file, emit a message
91   // telling the user how to reproduce it: opt -foo blah.bc
92   //
93   std::string Filename = OutputPrefix + "-" + ID + ".bc";
94   if (writeProgramToFile(Filename, M)) {
95     errs() <<  "Error opening file '" << Filename << "' for writing!\n";
96     return;
97   }
98
99   outs() << "Emitted bitcode to '" << Filename << "'\n";
100   if (NoFlyer || PassesToRun.empty()) return;
101   outs() << "\n*** You can reproduce the problem with: ";
102   if (UseValgrind) outs() << "valgrind ";
103   outs() << "opt " << Filename;
104   for (unsigned i = 0, e = PluginLoader::getNumPlugins(); i != e; ++i) {
105     outs() << " -load " << PluginLoader::getPlugin(i);
106   }
107   outs() << " " << getPassesString(PassesToRun) << "\n";
108 }
109
110 cl::opt<bool> SilencePasses("silence-passes",
111         cl::desc("Suppress output of running passes (both stdout and stderr)"));
112
113 static cl::list<std::string> OptArgs("opt-args", cl::Positional,
114                                      cl::desc("<opt arguments>..."),
115                                      cl::ZeroOrMore, cl::PositionalEatsArgs);
116
117 /// runPasses - Run the specified passes on Program, outputting a bitcode file
118 /// and writing the filename into OutputFile if successful.  If the
119 /// optimizations fail for some reason (optimizer crashes), return true,
120 /// otherwise return false.  If DeleteOutput is set to true, the bitcode is
121 /// deleted on success, and the filename string is undefined.  This prints to
122 /// outs() a single line message indicating whether compilation was successful
123 /// or failed.
124 ///
125 bool BugDriver::runPasses(Module *Program,
126                           const std::vector<std::string> &Passes,
127                           std::string &OutputFilename, bool DeleteOutput,
128                           bool Quiet, unsigned NumExtraArgs,
129                           const char * const *ExtraArgs) const {
130   // setup the output file name
131   outs().flush();
132   SmallString<128> UniqueFilename;
133   int UniqueFD;
134   error_code EC = sys::fs::unique_file(OutputPrefix + "-output-%%%%%%%.bc",
135                                        UniqueFD, UniqueFilename);
136   if (EC) {
137     errs() << getToolName() << ": Error making unique filename: "
138            << EC.message() << "\n";
139     return 1;
140   }
141   OutputFilename = UniqueFilename.str();
142   close(UniqueFD); // We only want the filename.
143
144   // set up the input file name
145   SmallString<128> InputFilename;
146   int InputFD;
147   EC = sys::fs::unique_file(OutputPrefix + "-input-%%%%%%%.bc", InputFD,
148                             InputFilename);
149   if (EC) {
150     errs() << getToolName() << ": Error making unique filename: "
151            << EC.message() << "\n";
152     return 1;
153   }
154
155   tool_output_file InFile(InputFilename.c_str(), InputFD);
156
157   WriteBitcodeToFile(Program, InFile.os());
158   InFile.os().close();
159   if (InFile.os().has_error()) {
160     errs() << "Error writing bitcode file: " << InputFilename << "\n";
161     InFile.os().clear_error();
162     return 1;
163   }
164
165   std::string tool = sys::FindProgramByName("opt");
166   if (tool.empty()) {
167     errs() << "Cannot find `opt' in PATH!\n";
168     return 1;
169   }
170
171   // Ok, everything that could go wrong before running opt is done.
172   InFile.keep();
173
174   // setup the child process' arguments
175   SmallVector<const char*, 8> Args;
176   if (UseValgrind) {
177     Args.push_back("valgrind");
178     Args.push_back("--error-exitcode=1");
179     Args.push_back("-q");
180     Args.push_back(tool.c_str());
181   } else
182     Args.push_back(tool.c_str());
183
184   Args.push_back("-o");
185   Args.push_back(OutputFilename.c_str());
186   for (unsigned i = 0, e = OptArgs.size(); i != e; ++i)
187     Args.push_back(OptArgs[i].c_str());
188   std::vector<std::string> pass_args;
189   for (unsigned i = 0, e = PluginLoader::getNumPlugins(); i != e; ++i) {
190     pass_args.push_back( std::string("-load"));
191     pass_args.push_back( PluginLoader::getPlugin(i));
192   }
193   for (std::vector<std::string>::const_iterator I = Passes.begin(),
194        E = Passes.end(); I != E; ++I )
195     pass_args.push_back( std::string("-") + (*I) );
196   for (std::vector<std::string>::const_iterator I = pass_args.begin(),
197        E = pass_args.end(); I != E; ++I )
198     Args.push_back(I->c_str());
199   Args.push_back(InputFilename.c_str());
200   for (unsigned i = 0; i < NumExtraArgs; ++i)
201     Args.push_back(*ExtraArgs);
202   Args.push_back(0);
203
204   DEBUG(errs() << "\nAbout to run:\t";
205         for (unsigned i = 0, e = Args.size()-1; i != e; ++i)
206           errs() << " " << Args[i];
207         errs() << "\n";
208         );
209
210   std::string Prog;
211   if (UseValgrind)
212     Prog = sys::FindProgramByName("valgrind");
213   else
214     Prog = tool;
215
216   // Redirect stdout and stderr to nowhere if SilencePasses is given
217   StringRef Nowhere;
218   const StringRef *Redirects[3] = {0, &Nowhere, &Nowhere};
219
220   std::string ErrMsg;
221   int result = sys::ExecuteAndWait(Prog, Args.data(), 0,
222                                    (SilencePasses ? Redirects : 0), Timeout,
223                                    MemoryLimit, &ErrMsg);
224
225   // If we are supposed to delete the bitcode file or if the passes crashed,
226   // remove it now.  This may fail if the file was never created, but that's ok.
227   if (DeleteOutput || result != 0)
228     sys::fs::remove(OutputFilename);
229
230   // Remove the temporary input file as well
231   sys::fs::remove(InputFilename.c_str());
232
233   if (!Quiet) {
234     if (result == 0)
235       outs() << "Success!\n";
236     else if (result > 0)
237       outs() << "Exited with error code '" << result << "'\n";
238     else if (result < 0) {
239       if (result == -1)
240         outs() << "Execute failed: " << ErrMsg << "\n";
241       else
242         outs() << "Crashed: " << ErrMsg << "\n";
243     }
244     if (result & 0x01000000)
245       outs() << "Dumped core\n";
246   }
247
248   // Was the child successful?
249   return result != 0;
250 }
251
252
253 /// runPassesOn - Carefully run the specified set of pass on the specified
254 /// module, returning the transformed module on success, or a null pointer on
255 /// failure.
256 Module *BugDriver::runPassesOn(Module *M,
257                                const std::vector<std::string> &Passes,
258                                bool AutoDebugCrashes, unsigned NumExtraArgs,
259                                const char * const *ExtraArgs) {
260   std::string BitcodeResult;
261   if (runPasses(M, Passes, BitcodeResult, false/*delete*/, true/*quiet*/,
262                 NumExtraArgs, ExtraArgs)) {
263     if (AutoDebugCrashes) {
264       errs() << " Error running this sequence of passes"
265              << " on the input program!\n";
266       delete swapProgramIn(M);
267       EmitProgressBitcode(M, "pass-error",  false);
268       exit(debugOptimizerCrash());
269     }
270     return 0;
271   }
272
273   Module *Ret = ParseInputFile(BitcodeResult, Context);
274   if (Ret == 0) {
275     errs() << getToolName() << ": Error reading bitcode file '"
276            << BitcodeResult << "'!\n";
277     exit(1);
278   }
279   sys::fs::remove(BitcodeResult);
280   return Ret;
281 }