Adjust the constructor to the Linker class to take an argument that names
[oota-llvm.git] / tools / gccld / gccld.cpp
1 //===- gccld.cpp - LLVM 'ld' compatible linker ----------------------------===//
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 is intended to be compatible with GCC, and follows standard
11 // system 'ld' conventions.  As such, the default output file is ./a.out.
12 // Additionally, this program outputs a shell script that is used to invoke LLI
13 // to execute the program.  In this manner, the generated executable (a.out for
14 // example), is directly executable, whereas the bytecode file actually lives in
15 // the a.out.bc file generated by this program.  Also, Force is on by default.
16 //
17 // Note that if someone (or a script) deletes the executable program generated,
18 // the .bc file will be left around.  Considering that this is a temporary hack,
19 // I'm not too worried about this.
20 //
21 //===----------------------------------------------------------------------===//
22
23 #include "gccld.h"
24 #include "llvm/Linker.h"
25 #include "llvm/Module.h"
26 #include "llvm/PassManager.h"
27 #include "llvm/Bytecode/Reader.h"
28 #include "llvm/Bytecode/WriteBytecodePass.h"
29 #include "llvm/Target/TargetData.h"
30 #include "llvm/Transforms/IPO.h"
31 #include "llvm/Transforms/Scalar.h"
32 #include "llvm/Support/CommandLine.h"
33 #include "llvm/Support/FileUtilities.h"
34 #include "llvm/System/Signals.h"
35 #include "llvm/Support/SystemUtils.h"
36 #include <fstream>
37 #include <memory>
38 using namespace llvm;
39
40 namespace {
41   cl::list<std::string>
42   InputFilenames(cl::Positional, cl::desc("<input bytecode files>"),
43                  cl::OneOrMore);
44
45   cl::opt<std::string>
46   OutputFilename("o", cl::desc("Override output filename"), cl::init("a.out"),
47                  cl::value_desc("filename"));
48
49   cl::opt<bool>
50   Verbose("v", cl::desc("Print information about actions taken"));
51
52   cl::list<std::string>
53   LibPaths("L", cl::desc("Specify a library search path"), cl::Prefix,
54            cl::value_desc("directory"));
55
56   cl::list<std::string>
57   Libraries("l", cl::desc("Specify libraries to link to"), cl::Prefix,
58             cl::value_desc("library prefix"));
59
60   cl::opt<bool>
61   Strip("strip-all", cl::desc("Strip all symbol info from executable"));
62   cl::opt<bool>
63   StripDebug("strip-debug",
64              cl::desc("Strip debugger symbol info from executable"));
65
66   cl::opt<bool>
67   NoInternalize("disable-internalize",
68                 cl::desc("Do not mark all symbols as internal"));
69   cl::alias
70   ExportDynamic("export-dynamic", cl::desc("Alias for -disable-internalize"),
71                 cl::aliasopt(NoInternalize));
72
73   cl::opt<bool>
74   LinkAsLibrary("link-as-library", cl::desc("Link the .bc files together as a"
75                                             " library, not an executable"));
76   cl::alias
77   Relink("r", cl::desc("Alias for -link-as-library"),
78          cl::aliasopt(LinkAsLibrary));
79
80   cl::opt<bool>
81   Native("native", cl::ZeroOrMore,
82          cl::desc("Generate a native binary instead of a shell script"));
83   cl::opt<bool>
84   NativeCBE("native-cbe", cl::ZeroOrMore,
85             cl::desc("Generate a native binary with the C backend and GCC"));
86
87   cl::opt<bool>
88   SaveTemps("save-temps",
89          cl::desc("Do not delete temporary files"));
90
91   cl::opt<std::string>
92   RPath("rpath",
93         cl::desc("Set runtime shared library search path (requires -native or"
94                  " -native-cbe)"),
95         cl::Prefix, cl::value_desc("directory"));
96
97   cl::opt<std::string>
98   SOName("soname",
99          cl::desc("Set internal name of shared library (requires -native or"
100                  " -native-cbe)"),
101          cl::Prefix, cl::value_desc("name"));
102
103   // Compatibility options that are ignored but supported by LD
104   cl::opt<std::string>
105   CO4("version-script", cl::Hidden, cl::desc("Compatibility option: ignored"));
106   cl::opt<bool>
107   CO5("eh-frame-hdr", cl::Hidden, cl::desc("Compatibility option: ignored"));
108   cl::opt<std::string>
109   CO6("h", cl::Hidden, cl::desc("Compatibility option: ignored"));
110   cl::opt<bool>
111   CO7("start-group", cl::Hidden, cl::desc("Compatibility option: ignored"));
112   cl::opt<bool>
113   CO8("end-group", cl::Hidden, cl::desc("Compatibility option: ignored"));
114
115   cl::alias A0("s", cl::desc("Alias for --strip-all"),
116                cl::aliasopt(Strip));
117   cl::alias A1("S", cl::desc("Alias for --strip-debug"),
118                cl::aliasopt(StripDebug));
119
120 }
121
122 /// PrintAndReturn - Prints a message to standard error and returns true.
123 ///
124 /// Inputs:
125 ///  progname - The name of the program (i.e. argv[0]).
126 ///  Message  - The message to print to standard error.
127 ///
128 static int PrintAndReturn(const char *progname, const std::string &Message) {
129   std::cerr << progname << ": " << Message << "\n";
130   return 1;
131 }
132
133 /// EmitShellScript - Output the wrapper file that invokes the JIT on the LLVM
134 /// bytecode file for the program.
135 static void EmitShellScript(char **argv) {
136 #if defined(_WIN32) || defined(__CYGWIN__)
137   // Windows doesn't support #!/bin/sh style shell scripts in .exe files.  To
138   // support windows systems, we copy the llvm-stub.exe executable from the
139   // build tree to the destination file.
140   std::string llvmstub = FindExecutable("llvm-stub.exe", argv[0]).toString();
141   if (llvmstub.empty()) {
142     std::cerr << "Could not find llvm-stub.exe executable!\n";
143     exit(1);
144   }
145   sys::CopyFile(sys::Path(OutputFilename), sys::Path(llvmstub));
146   return;
147 #endif
148
149   // Output the script to start the program...
150   std::ofstream Out2(OutputFilename.c_str());
151   if (!Out2.good())
152     exit(PrintAndReturn(argv[0], "error opening '" + OutputFilename +
153                                  "' for writing!"));
154
155   Out2 << "#!/bin/sh\n";
156   // Allow user to setenv LLVMINTERP if lli is not in their PATH.
157   Out2 << "lli=${LLVMINTERP-lli}\n";
158   Out2 << "exec $lli \\\n";
159
160   // We don't need to link in libc! In fact, /usr/lib/libc.so may not be a
161   // shared object at all! See RH 8: plain text.
162   std::vector<std::string>::iterator libc =
163     std::find(Libraries.begin(), Libraries.end(), "c");
164   if (libc != Libraries.end()) Libraries.erase(libc);
165   // List all the shared object (native) libraries this executable will need
166   // on the command line, so that we don't have to do this manually!
167   for (std::vector<std::string>::iterator i = Libraries.begin(),
168          e = Libraries.end(); i != e; ++i) {
169     sys::Path FullLibraryPath = sys::Path::FindLibrary(*i);
170     if (!FullLibraryPath.isEmpty() && FullLibraryPath.isDynamicLibrary())
171       Out2 << "    -load=" << FullLibraryPath.toString() << " \\\n";
172   }
173   Out2 << "    $0.bc ${1+\"$@\"}\n";
174   Out2.close();
175 }
176
177 // BuildLinkItems -- This function generates a LinkItemList for the LinkItems
178 // linker function by combining the Files and Libraries in the order they were
179 // declared on the command line.
180 static void BuildLinkItems(
181   Linker::ItemList& Items,
182   const cl::list<std::string>& Files,
183   const cl::list<std::string>& Libraries) {
184
185   // Build the list of linkage items for LinkItems.
186
187   cl::list<std::string>::const_iterator fileIt = Files.begin();
188   cl::list<std::string>::const_iterator libIt  = Libraries.begin();
189
190   int libPos = -1, filePos = -1;
191   while ( libIt != Libraries.end() || fileIt != Files.end() ) {
192     if (libIt != Libraries.end())
193       libPos = Libraries.getPosition(libIt - Libraries.begin());
194     else
195       libPos = -1;
196     if (fileIt != Files.end())
197       filePos = Files.getPosition(fileIt - Files.begin());
198     else
199       filePos = -1;
200
201     if (filePos != -1 && (libPos == -1 || filePos < libPos)) {
202       // Add a source file
203       Items.push_back(std::make_pair(*fileIt++, false));
204     } else if (libPos != -1 && (filePos == -1 || libPos < filePos)) {
205       // Add a library
206       Items.push_back(std::make_pair(*libIt++, true));
207     }
208   }
209 }
210
211 int main(int argc, char **argv, char **envp ) {
212   cl::ParseCommandLineOptions(argc, argv, " llvm linker for GCC\n");
213   sys::PrintStackTraceOnErrorSignal();
214
215   int exitCode = 0;
216
217   std::string ProgName = sys::Path(argv[0]).getBasename();
218   Linker TheLinker(ProgName, OutputFilename, Verbose);
219
220   try {
221     // Remove any consecutive duplicates of the same library...
222     Libraries.erase(std::unique(Libraries.begin(), Libraries.end()),
223                     Libraries.end());
224
225     TheLinker.addPaths(LibPaths);
226     TheLinker.addSystemPaths();
227
228     if (LinkAsLibrary) {
229       std::vector<sys::Path> Files;
230       for (unsigned i = 0; i < InputFilenames.size(); ++i )
231         Files.push_back(sys::Path(InputFilenames[i]));
232
233       if (TheLinker.LinkInFiles(Files))
234         return 1; // Error already printed by linker
235
236       // The libraries aren't linked in but are noted as "dependent" in the
237       // module.
238       for (cl::list<std::string>::const_iterator I = Libraries.begin(),
239            E = Libraries.end(); I != E ; ++I) {
240         TheLinker.getModule()->addLibrary(*I);
241       }
242
243     } else {
244       // Build a list of the items from our command line
245       Linker::ItemList Items;
246       BuildLinkItems(Items, InputFilenames, Libraries);
247
248       // Link all the items together
249       if (TheLinker.LinkInItems(Items))
250         return 1; // Error already printed
251     }
252
253     // We're done with the Linker, so tell it to release its module
254     std::auto_ptr<Module> Composite(TheLinker.releaseModule());
255
256     // Create the output file.
257     std::string RealBytecodeOutput = OutputFilename;
258     if (!LinkAsLibrary || Native || NativeCBE) RealBytecodeOutput += ".bc";
259     std::ios::openmode io_mode = std::ios::out | std::ios::trunc |
260                                  std::ios::binary;
261     std::ofstream Out(RealBytecodeOutput.c_str(), io_mode);
262     if (!Out.good())
263       return PrintAndReturn(argv[0], "error opening '" + RealBytecodeOutput +
264                                      "' for writing!");
265
266     // Ensure that the bytecode file gets removed from the disk if we get a
267     // SIGINT signal.
268     sys::RemoveFileOnSignal(sys::Path(RealBytecodeOutput));
269
270     // Strip everything if Strip is set, otherwise if stripdebug is set, just
271     // strip debug info.
272     int StripLevel = Strip ? 2 : (StripDebug ? 1 : 0);
273
274     // Internalize the module if neither -disable-internalize nor
275     // -link-as-library are passed in.
276     bool ShouldInternalize = !NoInternalize & !LinkAsLibrary;
277
278     // Generate the bytecode file.
279     if (GenerateBytecode(Composite.get(), StripLevel, ShouldInternalize, &Out)){
280       Out.close();
281       return PrintAndReturn(argv[0], "error generating bytecode");
282     }
283
284     // Close the bytecode file.
285     Out.close();
286
287     // Generate either a native file or a JIT shell script.  If the user wants
288     // to generate a native file, compile it from the bytecode file. Otherwise,
289     // if the target is not a library, create a script that will run the
290     // bytecode through the JIT.
291     if (Native) {
292       // Name of the Assembly Language output file
293       sys::Path AssemblyFile (OutputFilename);
294       AssemblyFile.appendSuffix("s");
295
296       // Mark the output files for removal if we get an interrupt.
297       sys::RemoveFileOnSignal(AssemblyFile);
298       sys::RemoveFileOnSignal(sys::Path(OutputFilename));
299
300       // Determine the locations of the llc and gcc programs.
301       sys::Path llc = FindExecutable("llc", argv[0]);
302       if (llc.isEmpty())
303         return PrintAndReturn(argv[0], "Failed to find llc");
304
305       sys::Path gcc = FindExecutable("gcc", argv[0]);
306       if (gcc.isEmpty())
307         return PrintAndReturn(argv[0], "Failed to find gcc");
308
309       // Generate an assembly language file for the bytecode.
310       if (Verbose) std::cout << "Generating Assembly Code\n";
311       GenerateAssembly(AssemblyFile.toString(), RealBytecodeOutput, llc,
312                        Verbose);
313       if (Verbose) std::cout << "Generating Native Code\n";
314       GenerateNative(OutputFilename, AssemblyFile.toString(),
315                      LibPaths, Libraries, gcc, envp, LinkAsLibrary,
316                      NoInternalize, RPath, SOName, Verbose);
317
318       if (!SaveTemps) {
319         // Remove the assembly language file.
320         AssemblyFile.eraseFromDisk();
321         // Remove the bytecode language file.
322         sys::Path(RealBytecodeOutput).eraseFromDisk();
323       }
324
325     } else if (NativeCBE) {
326       sys::Path CFile (OutputFilename);
327       CFile.appendSuffix("cbe.c");
328
329       // Mark the output files for removal if we get an interrupt.
330       sys::RemoveFileOnSignal(CFile);
331       sys::RemoveFileOnSignal(sys::Path(OutputFilename));
332
333       // Determine the locations of the llc and gcc programs.
334       sys::Path llc = FindExecutable("llc", argv[0]);
335       if (llc.isEmpty())
336         return PrintAndReturn(argv[0], "Failed to find llc");
337
338       sys::Path gcc = FindExecutable("gcc", argv[0]);
339       if (gcc.isEmpty())
340         return PrintAndReturn(argv[0], "Failed to find gcc");
341
342       // Generate an assembly language file for the bytecode.
343       if (Verbose) std::cout << "Generating C Source Code\n";
344       GenerateCFile(CFile.toString(), RealBytecodeOutput, llc, Verbose);
345       if (Verbose) std::cout << "Generating Native Code\n";
346       GenerateNative(OutputFilename, CFile.toString(),
347                      LibPaths, Libraries, gcc, envp, LinkAsLibrary,
348                      NoInternalize, RPath, SOName, Verbose);
349
350       if (!SaveTemps) {
351         // Remove the assembly language file.
352         CFile.eraseFromDisk();
353         // Remove the bytecode language file.
354         sys::Path(RealBytecodeOutput).eraseFromDisk();
355       }
356
357     } else if (!LinkAsLibrary) {
358       EmitShellScript(argv);
359
360       // Make the bytecode file readable and directly executable in LLEE
361       sys::Path(RealBytecodeOutput).makeExecutableOnDisk();
362       sys::Path(RealBytecodeOutput).makeReadableOnDisk();
363     }
364
365     // Make the output, whether native or script, executable as well...
366     sys::Path(OutputFilename).makeExecutableOnDisk();
367
368   } catch (const char*msg) {
369     std::cerr << argv[0] << ": " << msg << "\n";
370     exitCode = 1;
371   } catch (const std::string& msg) {
372     std::cerr << argv[0] << ": " << msg << "\n";
373     exitCode = 2;
374   } catch (...) {
375     // This really shouldn't happen, but just in case ....
376     std::cerr << argv[0] << ": An unexpected unknown exception occurred.\n";
377     exitCode = 3;
378   }
379
380   return exitCode;
381 }