Don't use absolute path for EXPORTED_SYMBOL_FILE, this breaks under the new
[oota-llvm.git] / tools / bugpoint / ToolRunner.cpp
1 //===-- ToolRunner.cpp ----------------------------------------------------===//
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 implements the interfaces described in the ToolRunner.h file.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #define DEBUG_TYPE "toolrunner"
15 #include "ToolRunner.h"
16 #include "llvm/System/Program.h"
17 #include "llvm/Support/CommandLine.h"
18 #include "llvm/Support/Debug.h"
19 #include "llvm/Support/FileUtilities.h"
20 #include "llvm/Support/raw_ostream.h"
21 #include "llvm/Config/config.h"   // for HAVE_LINK_R
22 #include <fstream>
23 #include <sstream>
24 using namespace llvm;
25
26 namespace llvm {
27   cl::opt<bool>
28   SaveTemps("save-temps", cl::init(false), cl::desc("Save temporary files"));
29 }
30
31 namespace {
32   cl::opt<std::string>
33   RemoteClient("remote-client",
34                cl::desc("Remote execution client (rsh/ssh)"));
35
36   cl::opt<std::string>
37   RemoteHost("remote-host",
38              cl::desc("Remote execution (rsh/ssh) host"));
39
40   cl::opt<std::string>
41   RemotePort("remote-port",
42              cl::desc("Remote execution (rsh/ssh) port"));
43
44   cl::opt<std::string>
45   RemoteUser("remote-user",
46              cl::desc("Remote execution (rsh/ssh) user id"));
47
48   cl::opt<std::string>
49   RemoteExtra("remote-extra-options",
50           cl::desc("Remote execution (rsh/ssh) extra options"));
51 }
52
53 /// RunProgramWithTimeout - This function provides an alternate interface
54 /// to the sys::Program::ExecuteAndWait interface.
55 /// @see sys::Program::ExecuteAndWait
56 static int RunProgramWithTimeout(const sys::Path &ProgramPath,
57                                  const char **Args,
58                                  const sys::Path &StdInFile,
59                                  const sys::Path &StdOutFile,
60                                  const sys::Path &StdErrFile,
61                                  unsigned NumSeconds = 0,
62                                  unsigned MemoryLimit = 0) {
63   const sys::Path* redirects[3];
64   redirects[0] = &StdInFile;
65   redirects[1] = &StdOutFile;
66   redirects[2] = &StdErrFile;
67
68 #if 0 // For debug purposes
69   {
70     errs() << "RUN:";
71     for (unsigned i = 0; Args[i]; ++i)
72       errs() << " " << Args[i];
73     errs() << "\n";
74   }
75 #endif
76
77   return
78     sys::Program::ExecuteAndWait(ProgramPath, Args, 0, redirects,
79                                  NumSeconds, MemoryLimit);
80 }
81
82 /// RunProgramRemotelyWithTimeout - This function runs the given program
83 /// remotely using the given remote client and the sys::Program::ExecuteAndWait.
84 /// Returns the remote program exit code or reports a remote client error if it
85 /// fails. Remote client is required to return 255 if it failed or program exit
86 /// code otherwise.
87 /// @see sys::Program::ExecuteAndWait
88 static int RunProgramRemotelyWithTimeout(const sys::Path &RemoteClientPath,
89                                          const char **Args,
90                                          const sys::Path &StdInFile,
91                                          const sys::Path &StdOutFile,
92                                          const sys::Path &StdErrFile,
93                                          unsigned NumSeconds = 0,
94                                          unsigned MemoryLimit = 0) {
95   const sys::Path* redirects[3];
96   redirects[0] = &StdInFile;
97   redirects[1] = &StdOutFile;
98   redirects[2] = &StdErrFile;
99
100 #if 0 // For debug purposes
101   {
102     errs() << "RUN:";
103     for (unsigned i = 0; Args[i]; ++i)
104       errs() << " " << Args[i];
105     errs() << "\n";
106   }
107 #endif
108
109   // Run the program remotely with the remote client
110   int ReturnCode = sys::Program::ExecuteAndWait(RemoteClientPath, Args,
111                                  0, redirects, NumSeconds, MemoryLimit);
112
113   // Has the remote client fail?
114   if (255 == ReturnCode) {
115     std::ostringstream OS;
116     OS << "\nError running remote client:\n ";
117     for (const char **Arg = Args; *Arg; ++Arg)
118       OS << " " << *Arg;
119     OS << "\n";
120
121     // The error message is in the output file, let's print it out from there.
122     std::ifstream ErrorFile(StdOutFile.c_str());
123     if (ErrorFile) {
124       std::copy(std::istreambuf_iterator<char>(ErrorFile),
125                 std::istreambuf_iterator<char>(),
126                 std::ostreambuf_iterator<char>(OS));
127       ErrorFile.close();
128     }
129
130     errs() << OS;
131   }
132
133   return ReturnCode;
134 }
135
136 static std::string ProcessFailure(sys::Path ProgPath, const char** Args) {
137   std::ostringstream OS;
138   OS << "\nError running tool:\n ";
139   for (const char **Arg = Args; *Arg; ++Arg)
140     OS << " " << *Arg;
141   OS << "\n";
142   
143   // Rerun the compiler, capturing any error messages to print them.
144   sys::Path ErrorFilename("bugpoint.program_error_messages");
145   std::string ErrMsg;
146   if (ErrorFilename.makeUnique(true, &ErrMsg)) {
147     errs() << "Error making unique filename: " << ErrMsg << "\n";
148     exit(1);
149   }
150   RunProgramWithTimeout(ProgPath, Args, sys::Path(""), ErrorFilename,
151                         ErrorFilename); // FIXME: check return code ?
152
153   // Print out the error messages generated by GCC if possible...
154   std::ifstream ErrorFile(ErrorFilename.c_str());
155   if (ErrorFile) {
156     std::copy(std::istreambuf_iterator<char>(ErrorFile),
157               std::istreambuf_iterator<char>(),
158               std::ostreambuf_iterator<char>(OS));
159     ErrorFile.close();
160   }
161
162   ErrorFilename.eraseFromDisk();
163   return OS.str();
164 }
165
166 //===---------------------------------------------------------------------===//
167 // LLI Implementation of AbstractIntepreter interface
168 //
169 namespace {
170   class LLI : public AbstractInterpreter {
171     std::string LLIPath;          // The path to the LLI executable
172     std::vector<std::string> ToolArgs; // Args to pass to LLI
173   public:
174     LLI(const std::string &Path, const std::vector<std::string> *Args)
175       : LLIPath(Path) {
176       ToolArgs.clear ();
177       if (Args) { ToolArgs = *Args; }
178     }
179
180     virtual int ExecuteProgram(const std::string &Bitcode,
181                                const std::vector<std::string> &Args,
182                                const std::string &InputFile,
183                                const std::string &OutputFile,
184                                std::string *Error,
185                                const std::vector<std::string> &GCCArgs,
186                                const std::vector<std::string> &SharedLibs =
187                                std::vector<std::string>(),
188                                unsigned Timeout = 0,
189                                unsigned MemoryLimit = 0);
190   };
191 }
192
193 int LLI::ExecuteProgram(const std::string &Bitcode,
194                         const std::vector<std::string> &Args,
195                         const std::string &InputFile,
196                         const std::string &OutputFile,
197                         std::string *Error,
198                         const std::vector<std::string> &GCCArgs,
199                         const std::vector<std::string> &SharedLibs,
200                         unsigned Timeout,
201                         unsigned MemoryLimit) {
202   std::vector<const char*> LLIArgs;
203   LLIArgs.push_back(LLIPath.c_str());
204   LLIArgs.push_back("-force-interpreter=true");
205
206   for (std::vector<std::string>::const_iterator i = SharedLibs.begin(), e = SharedLibs.end(); i != e; ++i) {
207     LLIArgs.push_back("-load");
208     LLIArgs.push_back((*i).c_str());
209   }
210
211   // Add any extra LLI args.
212   for (unsigned i = 0, e = ToolArgs.size(); i != e; ++i)
213     LLIArgs.push_back(ToolArgs[i].c_str());
214
215   LLIArgs.push_back(Bitcode.c_str());
216   // Add optional parameters to the running program from Argv
217   for (unsigned i=0, e = Args.size(); i != e; ++i)
218     LLIArgs.push_back(Args[i].c_str());
219   LLIArgs.push_back(0);
220
221   outs() << "<lli>"; outs().flush();
222   DEBUG(errs() << "\nAbout to run:\t";
223         for (unsigned i=0, e = LLIArgs.size()-1; i != e; ++i)
224           errs() << " " << LLIArgs[i];
225         errs() << "\n";
226         );
227   return RunProgramWithTimeout(sys::Path(LLIPath), &LLIArgs[0],
228       sys::Path(InputFile), sys::Path(OutputFile), sys::Path(OutputFile),
229       Timeout, MemoryLimit);
230 }
231
232 // LLI create method - Try to find the LLI executable
233 AbstractInterpreter *AbstractInterpreter::createLLI(const char *Argv0,
234                                                     std::string &Message,
235                                      const std::vector<std::string> *ToolArgs) {
236   std::string LLIPath =
237     FindExecutable("lli", Argv0, (void *)(intptr_t)&createLLI).str();
238   if (!LLIPath.empty()) {
239     Message = "Found lli: " + LLIPath + "\n";
240     return new LLI(LLIPath, ToolArgs);
241   }
242
243   Message = "Cannot find `lli' in executable directory or PATH!\n";
244   return 0;
245 }
246
247 //===---------------------------------------------------------------------===//
248 // Custom execution command implementation of AbstractIntepreter interface
249 //
250 // Allows using a custom command for executing the bitcode, thus allows,
251 // for example, to invoke a cross compiler for code generation followed by 
252 // a simulator that executes the generated binary.
253 namespace {
254   class CustomExecutor : public AbstractInterpreter {
255     std::string ExecutionCommand;
256     std::vector<std::string> ExecutorArgs;
257   public:
258     CustomExecutor(
259       const std::string &ExecutionCmd, std::vector<std::string> ExecArgs) :
260       ExecutionCommand(ExecutionCmd), ExecutorArgs(ExecArgs) {}
261
262     virtual int ExecuteProgram(const std::string &Bitcode,
263                                const std::vector<std::string> &Args,
264                                const std::string &InputFile,
265                                const std::string &OutputFile,
266                                std::string *Error,
267                                const std::vector<std::string> &GCCArgs,
268                                const std::vector<std::string> &SharedLibs =
269                                  std::vector<std::string>(),
270                                unsigned Timeout = 0,
271                                unsigned MemoryLimit = 0);
272   };
273 }
274
275 int CustomExecutor::ExecuteProgram(const std::string &Bitcode,
276                         const std::vector<std::string> &Args,
277                         const std::string &InputFile,
278                         const std::string &OutputFile,
279                         std::string *Error,
280                         const std::vector<std::string> &GCCArgs,
281                         const std::vector<std::string> &SharedLibs,
282                         unsigned Timeout,
283                         unsigned MemoryLimit) {
284
285   std::vector<const char*> ProgramArgs;
286   ProgramArgs.push_back(ExecutionCommand.c_str());
287
288   for (std::size_t i = 0; i < ExecutorArgs.size(); ++i)
289     ProgramArgs.push_back(ExecutorArgs.at(i).c_str());
290   ProgramArgs.push_back(Bitcode.c_str());
291   ProgramArgs.push_back(0);
292
293   // Add optional parameters to the running program from Argv
294   for (unsigned i = 0, e = Args.size(); i != e; ++i)
295     ProgramArgs.push_back(Args[i].c_str());
296
297   return RunProgramWithTimeout(
298     sys::Path(ExecutionCommand),
299     &ProgramArgs[0], sys::Path(InputFile), sys::Path(OutputFile), 
300     sys::Path(OutputFile), Timeout, MemoryLimit);
301 }
302
303 // Custom execution environment create method, takes the execution command
304 // as arguments
305 AbstractInterpreter *AbstractInterpreter::createCustom(
306                     std::string &Message,
307                     const std::string &ExecCommandLine) {
308
309   std::string Command = "";
310   std::vector<std::string> Args;
311   std::string delimiters = " ";
312
313   // Tokenize the ExecCommandLine to the command and the args to allow
314   // defining a full command line as the command instead of just the
315   // executed program. We cannot just pass the whole string after the command
316   // as a single argument because then program sees only a single
317   // command line argument (with spaces in it: "foo bar" instead 
318   // of "foo" and "bar").
319
320   // code borrowed from: 
321   // http://oopweb.com/CPP/Documents/CPPHOWTO/Volume/C++Programming-HOWTO-7.html
322   std::string::size_type lastPos = 
323     ExecCommandLine.find_first_not_of(delimiters, 0);
324   std::string::size_type pos = 
325     ExecCommandLine.find_first_of(delimiters, lastPos);
326
327   while (std::string::npos != pos || std::string::npos != lastPos) {
328     std::string token = ExecCommandLine.substr(lastPos, pos - lastPos);
329     if (Command == "")
330        Command = token;
331     else
332        Args.push_back(token);
333     // Skip delimiters.  Note the "not_of"
334     lastPos = ExecCommandLine.find_first_not_of(delimiters, pos);
335     // Find next "non-delimiter"
336     pos = ExecCommandLine.find_first_of(delimiters, lastPos);
337   }
338
339   std::string CmdPath = sys::Program::FindProgramByName(Command).str();
340   if (CmdPath.empty()) {
341     Message = 
342       std::string("Cannot find '") + Command + 
343       "' in executable directory or PATH!\n";
344     return 0;
345   }
346
347   Message = "Found command in: " + CmdPath + "\n";
348
349   return new CustomExecutor(CmdPath, Args);
350 }
351
352 //===----------------------------------------------------------------------===//
353 // LLC Implementation of AbstractIntepreter interface
354 //
355 GCC::FileType LLC::OutputCode(const std::string &Bitcode, 
356                               sys::Path &OutputAsmFile, std::string &Error) {
357   const char *Suffix = (UseIntegratedAssembler ? ".llc.o" : ".llc.s");
358   sys::Path uniqueFile(Bitcode + Suffix);
359   std::string ErrMsg;
360   if (uniqueFile.makeUnique(true, &ErrMsg)) {
361     errs() << "Error making unique filename: " << ErrMsg << "\n";
362     exit(1);
363   }
364   OutputAsmFile = uniqueFile;
365   std::vector<const char *> LLCArgs;
366   LLCArgs.push_back(LLCPath.c_str());
367
368   // Add any extra LLC args.
369   for (unsigned i = 0, e = ToolArgs.size(); i != e; ++i)
370     LLCArgs.push_back(ToolArgs[i].c_str());
371
372   LLCArgs.push_back("-o");
373   LLCArgs.push_back(OutputAsmFile.c_str()); // Output to the Asm file
374   LLCArgs.push_back(Bitcode.c_str());      // This is the input bitcode
375   
376   if (UseIntegratedAssembler)
377     LLCArgs.push_back("-filetype=obj");
378   
379   LLCArgs.push_back (0);
380
381   outs() << (UseIntegratedAssembler ? "<llc-ia>" : "<llc>");
382   outs().flush();
383   DEBUG(errs() << "\nAbout to run:\t";
384         for (unsigned i = 0, e = LLCArgs.size()-1; i != e; ++i)
385           errs() << " " << LLCArgs[i];
386         errs() << "\n";
387         );
388   if (RunProgramWithTimeout(sys::Path(LLCPath), &LLCArgs[0],
389                             sys::Path(), sys::Path(), sys::Path()))
390     Error = ProcessFailure(sys::Path(LLCPath), &LLCArgs[0]);
391   return UseIntegratedAssembler ? GCC::ObjectFile : GCC::AsmFile;  
392 }
393
394 void LLC::compileProgram(const std::string &Bitcode, std::string *Error) {
395   sys::Path OutputAsmFile;
396   OutputCode(Bitcode, OutputAsmFile, *Error);
397   OutputAsmFile.eraseFromDisk();
398 }
399
400 int LLC::ExecuteProgram(const std::string &Bitcode,
401                         const std::vector<std::string> &Args,
402                         const std::string &InputFile,
403                         const std::string &OutputFile,
404                         std::string *Error,
405                         const std::vector<std::string> &ArgsForGCC,
406                         const std::vector<std::string> &SharedLibs,
407                         unsigned Timeout,
408                         unsigned MemoryLimit) {
409
410   sys::Path OutputAsmFile;
411   GCC::FileType FileKind = OutputCode(Bitcode, OutputAsmFile, *Error);
412   FileRemover OutFileRemover(OutputAsmFile, !SaveTemps);
413
414   std::vector<std::string> GCCArgs(ArgsForGCC);
415   GCCArgs.insert(GCCArgs.end(), SharedLibs.begin(), SharedLibs.end());
416   GCCArgs.insert(GCCArgs.end(), gccArgs.begin(), gccArgs.end());
417
418   // Assuming LLC worked, compile the result with GCC and run it.
419   return gcc->ExecuteProgram(OutputAsmFile.str(), Args, FileKind,
420                              InputFile, OutputFile, Error, GCCArgs,
421                              Timeout, MemoryLimit);
422 }
423
424 /// createLLC - Try to find the LLC executable
425 ///
426 LLC *AbstractInterpreter::createLLC(const char *Argv0,
427                                     std::string &Message,
428                                     const std::vector<std::string> *Args,
429                                     const std::vector<std::string> *GCCArgs,
430                                     bool UseIntegratedAssembler) {
431   std::string LLCPath =
432     FindExecutable("llc", Argv0, (void *)(intptr_t)&createLLC).str();
433   if (LLCPath.empty()) {
434     Message = "Cannot find `llc' in executable directory or PATH!\n";
435     return 0;
436   }
437
438   Message = "Found llc: " + LLCPath + "\n";
439   GCC *gcc = GCC::create(Message, GCCArgs);
440   if (!gcc) {
441     errs() << Message << "\n";
442     exit(1);
443   }
444   return new LLC(LLCPath, gcc, Args, GCCArgs, UseIntegratedAssembler);
445 }
446
447 //===---------------------------------------------------------------------===//
448 // JIT Implementation of AbstractIntepreter interface
449 //
450 namespace {
451   class JIT : public AbstractInterpreter {
452     std::string LLIPath;          // The path to the LLI executable
453     std::vector<std::string> ToolArgs; // Args to pass to LLI
454   public:
455     JIT(const std::string &Path, const std::vector<std::string> *Args)
456       : LLIPath(Path) {
457       ToolArgs.clear ();
458       if (Args) { ToolArgs = *Args; }
459     }
460
461     virtual int ExecuteProgram(const std::string &Bitcode,
462                                const std::vector<std::string> &Args,
463                                const std::string &InputFile,
464                                const std::string &OutputFile,
465                                std::string *Error,
466                                const std::vector<std::string> &GCCArgs =
467                                  std::vector<std::string>(),
468                                const std::vector<std::string> &SharedLibs =
469                                  std::vector<std::string>(), 
470                                unsigned Timeout = 0,
471                                unsigned MemoryLimit = 0);
472   };
473 }
474
475 int JIT::ExecuteProgram(const std::string &Bitcode,
476                         const std::vector<std::string> &Args,
477                         const std::string &InputFile,
478                         const std::string &OutputFile,
479                         std::string *Error,
480                         const std::vector<std::string> &GCCArgs,
481                         const std::vector<std::string> &SharedLibs,
482                         unsigned Timeout,
483                         unsigned MemoryLimit) {
484   // Construct a vector of parameters, incorporating those from the command-line
485   std::vector<const char*> JITArgs;
486   JITArgs.push_back(LLIPath.c_str());
487   JITArgs.push_back("-force-interpreter=false");
488
489   // Add any extra LLI args.
490   for (unsigned i = 0, e = ToolArgs.size(); i != e; ++i)
491     JITArgs.push_back(ToolArgs[i].c_str());
492
493   for (unsigned i = 0, e = SharedLibs.size(); i != e; ++i) {
494     JITArgs.push_back("-load");
495     JITArgs.push_back(SharedLibs[i].c_str());
496   }
497   JITArgs.push_back(Bitcode.c_str());
498   // Add optional parameters to the running program from Argv
499   for (unsigned i=0, e = Args.size(); i != e; ++i)
500     JITArgs.push_back(Args[i].c_str());
501   JITArgs.push_back(0);
502
503   outs() << "<jit>"; outs().flush();
504   DEBUG(errs() << "\nAbout to run:\t";
505         for (unsigned i=0, e = JITArgs.size()-1; i != e; ++i)
506           errs() << " " << JITArgs[i];
507         errs() << "\n";
508         );
509   DEBUG(errs() << "\nSending output to " << OutputFile << "\n");
510   return RunProgramWithTimeout(sys::Path(LLIPath), &JITArgs[0],
511       sys::Path(InputFile), sys::Path(OutputFile), sys::Path(OutputFile),
512       Timeout, MemoryLimit);
513 }
514
515 /// createJIT - Try to find the LLI executable
516 ///
517 AbstractInterpreter *AbstractInterpreter::createJIT(const char *Argv0,
518                    std::string &Message, const std::vector<std::string> *Args) {
519   std::string LLIPath =
520     FindExecutable("lli", Argv0, (void *)(intptr_t)&createJIT).str();
521   if (!LLIPath.empty()) {
522     Message = "Found lli: " + LLIPath + "\n";
523     return new JIT(LLIPath, Args);
524   }
525
526   Message = "Cannot find `lli' in executable directory or PATH!\n";
527   return 0;
528 }
529
530 GCC::FileType CBE::OutputCode(const std::string &Bitcode,
531                               sys::Path &OutputCFile, std::string &Error) {
532   sys::Path uniqueFile(Bitcode+".cbe.c");
533   std::string ErrMsg;
534   if (uniqueFile.makeUnique(true, &ErrMsg)) {
535     errs() << "Error making unique filename: " << ErrMsg << "\n";
536     exit(1);
537   }
538   OutputCFile = uniqueFile;
539   std::vector<const char *> LLCArgs;
540   LLCArgs.push_back(LLCPath.c_str());
541
542   // Add any extra LLC args.
543   for (unsigned i = 0, e = ToolArgs.size(); i != e; ++i)
544     LLCArgs.push_back(ToolArgs[i].c_str());
545
546   LLCArgs.push_back("-o");
547   LLCArgs.push_back(OutputCFile.c_str());   // Output to the C file
548   LLCArgs.push_back("-march=c");            // Output C language
549   LLCArgs.push_back("-f");                  // Overwrite as necessary...
550   LLCArgs.push_back(Bitcode.c_str());      // This is the input bitcode
551   LLCArgs.push_back(0);
552
553   outs() << "<cbe>"; outs().flush();
554   DEBUG(errs() << "\nAbout to run:\t";
555         for (unsigned i = 0, e = LLCArgs.size()-1; i != e; ++i)
556           errs() << " " << LLCArgs[i];
557         errs() << "\n";
558         );
559   if (RunProgramWithTimeout(LLCPath, &LLCArgs[0], sys::Path(), sys::Path(),
560                             sys::Path()))
561     Error = ProcessFailure(LLCPath, &LLCArgs[0]);
562   return GCC::CFile;
563 }
564
565 void CBE::compileProgram(const std::string &Bitcode, std::string *Error) {
566   sys::Path OutputCFile;
567   OutputCode(Bitcode, OutputCFile, *Error);
568   OutputCFile.eraseFromDisk();
569 }
570
571 int CBE::ExecuteProgram(const std::string &Bitcode,
572                         const std::vector<std::string> &Args,
573                         const std::string &InputFile,
574                         const std::string &OutputFile,
575                         std::string *Error,
576                         const std::vector<std::string> &ArgsForGCC,
577                         const std::vector<std::string> &SharedLibs,
578                         unsigned Timeout,
579                         unsigned MemoryLimit) {
580   sys::Path OutputCFile;
581   OutputCode(Bitcode, OutputCFile, *Error);
582
583   FileRemover CFileRemove(OutputCFile, !SaveTemps);
584
585   std::vector<std::string> GCCArgs(ArgsForGCC);
586   GCCArgs.insert(GCCArgs.end(), SharedLibs.begin(), SharedLibs.end());
587
588   return gcc->ExecuteProgram(OutputCFile.str(), Args, GCC::CFile,
589                              InputFile, OutputFile, Error, GCCArgs,
590                              Timeout, MemoryLimit);
591 }
592
593 /// createCBE - Try to find the 'llc' executable
594 ///
595 CBE *AbstractInterpreter::createCBE(const char *Argv0,
596                                     std::string &Message,
597                                     const std::vector<std::string> *Args,
598                                     const std::vector<std::string> *GCCArgs) {
599   sys::Path LLCPath =
600     FindExecutable("llc", Argv0, (void *)(intptr_t)&createCBE);
601   if (LLCPath.isEmpty()) {
602     Message =
603       "Cannot find `llc' in executable directory or PATH!\n";
604     return 0;
605   }
606
607   Message = "Found llc: " + LLCPath.str() + "\n";
608   GCC *gcc = GCC::create(Message, GCCArgs);
609   if (!gcc) {
610     errs() << Message << "\n";
611     exit(1);
612   }
613   return new CBE(LLCPath, gcc, Args);
614 }
615
616 //===---------------------------------------------------------------------===//
617 // GCC abstraction
618 //
619
620 static bool IsARMArchitecture(std::vector<std::string> Args) {
621   for (std::vector<std::string>::const_iterator
622          I = Args.begin(), E = Args.end(); I != E; ++I) {
623     StringRef S(*I);
624     if (!S.equals_lower("-arch")) {
625       ++I;
626       if (I != E && !S.substr(0, strlen("arm")).equals_lower("arm"))
627         return true;
628     }
629   }
630
631   return false;
632 }
633
634 int GCC::ExecuteProgram(const std::string &ProgramFile,
635                         const std::vector<std::string> &Args,
636                         FileType fileType,
637                         const std::string &InputFile,
638                         const std::string &OutputFile,
639                         std::string *Error,
640                         const std::vector<std::string> &ArgsForGCC,
641                         unsigned Timeout,
642                         unsigned MemoryLimit) {
643   std::vector<const char*> GCCArgs;
644
645   GCCArgs.push_back(GCCPath.c_str());
646
647   if (TargetTriple.getArch() == Triple::x86)
648     GCCArgs.push_back("-m32");
649
650   for (std::vector<std::string>::const_iterator
651          I = gccArgs.begin(), E = gccArgs.end(); I != E; ++I)
652     GCCArgs.push_back(I->c_str());
653
654   // Specify -x explicitly in case the extension is wonky
655   if (fileType != ObjectFile) {
656     GCCArgs.push_back("-x");
657     if (fileType == CFile) {
658       GCCArgs.push_back("c");
659       GCCArgs.push_back("-fno-strict-aliasing");
660     } else {
661       GCCArgs.push_back("assembler");
662
663       // For ARM architectures we don't want this flag. bugpoint isn't
664       // explicitly told what architecture it is working on, so we get
665       // it from gcc flags
666       if ((TargetTriple.getOS() == Triple::Darwin) &&
667           !IsARMArchitecture(ArgsForGCC))
668         GCCArgs.push_back("-force_cpusubtype_ALL");
669     }
670   }
671   
672   GCCArgs.push_back(ProgramFile.c_str());  // Specify the input filename.
673   
674   GCCArgs.push_back("-x");
675   GCCArgs.push_back("none");
676   GCCArgs.push_back("-o");
677   sys::Path OutputBinary (ProgramFile+".gcc.exe");
678   std::string ErrMsg;
679   if (OutputBinary.makeUnique(true, &ErrMsg)) {
680     errs() << "Error making unique filename: " << ErrMsg << "\n";
681     exit(1);
682   }
683   GCCArgs.push_back(OutputBinary.c_str()); // Output to the right file...
684
685   // Add any arguments intended for GCC. We locate them here because this is
686   // most likely -L and -l options that need to come before other libraries but
687   // after the source. Other options won't be sensitive to placement on the
688   // command line, so this should be safe.
689   for (unsigned i = 0, e = ArgsForGCC.size(); i != e; ++i)
690     GCCArgs.push_back(ArgsForGCC[i].c_str());
691
692   GCCArgs.push_back("-lm");                // Hard-code the math library...
693   GCCArgs.push_back("-O2");                // Optimize the program a bit...
694 #if defined (HAVE_LINK_R)
695   GCCArgs.push_back("-Wl,-R.");            // Search this dir for .so files
696 #endif
697   if (TargetTriple.getArch() == Triple::sparc)
698     GCCArgs.push_back("-mcpu=v9");
699   GCCArgs.push_back(0);                    // NULL terminator
700
701   outs() << "<gcc>"; outs().flush();
702   DEBUG(errs() << "\nAbout to run:\t";
703         for (unsigned i = 0, e = GCCArgs.size()-1; i != e; ++i)
704           errs() << " " << GCCArgs[i];
705         errs() << "\n";
706         );
707   if (RunProgramWithTimeout(GCCPath, &GCCArgs[0], sys::Path(), sys::Path(),
708         sys::Path())) {
709     *Error = ProcessFailure(GCCPath, &GCCArgs[0]);
710     return -1;
711   }
712
713   std::vector<const char*> ProgramArgs;
714
715   if (RemoteClientPath.isEmpty())
716     ProgramArgs.push_back(OutputBinary.c_str());
717   else {
718     ProgramArgs.push_back(RemoteClientPath.c_str());
719     ProgramArgs.push_back(RemoteHost.c_str());
720     if (!RemoteUser.empty()) {
721       ProgramArgs.push_back("-l");
722       ProgramArgs.push_back(RemoteUser.c_str());
723     }
724     if (!RemotePort.empty()) {
725       ProgramArgs.push_back("-p");
726       ProgramArgs.push_back(RemotePort.c_str());
727     }
728     if (!RemoteExtra.empty()) {
729       ProgramArgs.push_back(RemoteExtra.c_str());
730     }
731
732     // Full path to the binary. We need to cd to the exec directory because
733     // there is a dylib there that the exec expects to find in the CWD
734     char* env_pwd = getenv("PWD");
735     std::string Exec = "cd ";
736     Exec += env_pwd;
737     Exec += "; ./";
738     Exec += OutputBinary.c_str();
739     ProgramArgs.push_back(Exec.c_str());
740   }
741
742   // Add optional parameters to the running program from Argv
743   for (unsigned i = 0, e = Args.size(); i != e; ++i)
744     ProgramArgs.push_back(Args[i].c_str());
745   ProgramArgs.push_back(0);                // NULL terminator
746
747   // Now that we have a binary, run it!
748   outs() << "<program>"; outs().flush();
749   DEBUG(errs() << "\nAbout to run:\t";
750         for (unsigned i = 0, e = ProgramArgs.size()-1; i != e; ++i)
751           errs() << " " << ProgramArgs[i];
752         errs() << "\n";
753         );
754
755   FileRemover OutputBinaryRemover(OutputBinary, !SaveTemps);
756
757   if (RemoteClientPath.isEmpty()) {
758     DEBUG(errs() << "<run locally>");
759     return RunProgramWithTimeout(OutputBinary, &ProgramArgs[0],
760         sys::Path(InputFile), sys::Path(OutputFile), sys::Path(OutputFile),
761         Timeout, MemoryLimit);
762   } else {
763     outs() << "<run remotely>"; outs().flush();
764     return RunProgramRemotelyWithTimeout(sys::Path(RemoteClientPath),
765         &ProgramArgs[0], sys::Path(InputFile), sys::Path(OutputFile),
766         sys::Path(OutputFile), Timeout, MemoryLimit);
767   }
768 }
769
770 int GCC::MakeSharedObject(const std::string &InputFile, FileType fileType,
771                           std::string &OutputFile,
772                           const std::vector<std::string> &ArgsForGCC,
773                           std::string &Error) {
774   sys::Path uniqueFilename(InputFile+LTDL_SHLIB_EXT);
775   std::string ErrMsg;
776   if (uniqueFilename.makeUnique(true, &ErrMsg)) {
777     errs() << "Error making unique filename: " << ErrMsg << "\n";
778     exit(1);
779   }
780   OutputFile = uniqueFilename.str();
781
782   std::vector<const char*> GCCArgs;
783   
784   GCCArgs.push_back(GCCPath.c_str());
785
786   if (TargetTriple.getArch() == Triple::x86)
787     GCCArgs.push_back("-m32");
788
789   for (std::vector<std::string>::const_iterator
790          I = gccArgs.begin(), E = gccArgs.end(); I != E; ++I)
791     GCCArgs.push_back(I->c_str());
792
793   // Compile the C/asm file into a shared object
794   if (fileType != ObjectFile) {
795     GCCArgs.push_back("-x");
796     GCCArgs.push_back(fileType == AsmFile ? "assembler" : "c");
797   }
798   GCCArgs.push_back("-fno-strict-aliasing");
799   GCCArgs.push_back(InputFile.c_str());   // Specify the input filename.
800   GCCArgs.push_back("-x");
801   GCCArgs.push_back("none");
802   if (TargetTriple.getArch() == Triple::sparc)
803     GCCArgs.push_back("-G");       // Compile a shared library, `-G' for Sparc
804   else if (TargetTriple.getOS() == Triple::Darwin) {
805     // link all source files into a single module in data segment, rather than
806     // generating blocks. dynamic_lookup requires that you set 
807     // MACOSX_DEPLOYMENT_TARGET=10.3 in your env.  FIXME: it would be better for
808     // bugpoint to just pass that in the environment of GCC.
809     GCCArgs.push_back("-single_module");
810     GCCArgs.push_back("-dynamiclib");   // `-dynamiclib' for MacOS X/PowerPC
811     GCCArgs.push_back("-undefined");
812     GCCArgs.push_back("dynamic_lookup");
813   } else
814     GCCArgs.push_back("-shared");  // `-shared' for Linux/X86, maybe others
815
816   if ((TargetTriple.getArch() == Triple::alpha) ||
817       (TargetTriple.getArch() == Triple::x86_64))
818     GCCArgs.push_back("-fPIC");   // Requires shared objs to contain PIC
819
820   if (TargetTriple.getArch() == Triple::sparc)
821     GCCArgs.push_back("-mcpu=v9");
822
823   GCCArgs.push_back("-o");
824   GCCArgs.push_back(OutputFile.c_str()); // Output to the right filename.
825   GCCArgs.push_back("-O2");              // Optimize the program a bit.
826
827   
828   
829   // Add any arguments intended for GCC. We locate them here because this is
830   // most likely -L and -l options that need to come before other libraries but
831   // after the source. Other options won't be sensitive to placement on the
832   // command line, so this should be safe.
833   for (unsigned i = 0, e = ArgsForGCC.size(); i != e; ++i)
834     GCCArgs.push_back(ArgsForGCC[i].c_str());
835   GCCArgs.push_back(0);                    // NULL terminator
836
837   
838
839   outs() << "<gcc>"; outs().flush();
840   DEBUG(errs() << "\nAbout to run:\t";
841         for (unsigned i = 0, e = GCCArgs.size()-1; i != e; ++i)
842           errs() << " " << GCCArgs[i];
843         errs() << "\n";
844         );
845   if (RunProgramWithTimeout(GCCPath, &GCCArgs[0], sys::Path(), sys::Path(),
846                             sys::Path())) {
847     Error = ProcessFailure(GCCPath, &GCCArgs[0]);
848     return 1;
849   }
850   return 0;
851 }
852
853 /// create - Try to find the `gcc' executable
854 ///
855 GCC *GCC::create(std::string &Message,
856                  const std::vector<std::string> *Args) {
857   sys::Path GCCPath = sys::Program::FindProgramByName("gcc");
858   if (GCCPath.isEmpty()) {
859     Message = "Cannot find `gcc' in executable directory or PATH!\n";
860     return 0;
861   }
862
863   sys::Path RemoteClientPath;
864   if (!RemoteClient.empty())
865     RemoteClientPath = sys::Program::FindProgramByName(RemoteClient);
866
867   Message = "Found gcc: " + GCCPath.str() + "\n";
868   return new GCC(GCCPath, RemoteClientPath, Args);
869 }