Convert llvm-link to IRReader.
[oota-llvm.git] / tools / llvm-link / llvm-link.cpp
1 //===- llvm-link.cpp - Low-level LLVM linker ------------------------------===//
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 utility may be invoked in the following manner:
11 //  llvm-link a.bc b.bc c.bc -o x.bc
12 //
13 //===----------------------------------------------------------------------===//
14
15 #include "llvm/Linker.h"
16 #include "llvm/LLVMContext.h"
17 #include "llvm/Module.h"
18 #include "llvm/Analysis/Verifier.h"
19 #include "llvm/Bitcode/ReaderWriter.h"
20 #include "llvm/Support/CommandLine.h"
21 #include "llvm/Support/ManagedStatic.h"
22 #include "llvm/Support/MemoryBuffer.h"
23 #include "llvm/Support/PrettyStackTrace.h"
24 #include "llvm/Support/raw_ostream.h"
25 #include "llvm/Support/SystemUtils.h"
26 #include "llvm/Support/IRReader.h"
27 #include "llvm/System/Signals.h"
28 #include "llvm/System/Path.h"
29 #include <memory>
30 using namespace llvm;
31
32 static cl::list<std::string>
33 InputFilenames(cl::Positional, cl::OneOrMore,
34                cl::desc("<input bitcode files>"));
35
36 static cl::opt<std::string>
37 OutputFilename("o", cl::desc("Override output filename"), cl::init("-"),
38                cl::value_desc("filename"));
39
40 static cl::opt<bool>
41 Force("f", cl::desc("Enable binary output on terminals"));
42
43 static cl::opt<bool>
44 Verbose("v", cl::desc("Print information about actions taken"));
45
46 static cl::opt<bool>
47 DumpAsm("d", cl::desc("Print assembly as linked"), cl::Hidden);
48
49 // LoadFile - Read the specified bitcode file in and return it.  This routine
50 // searches the link path for the specified file to try to find it...
51 //
52 static inline std::auto_ptr<Module> LoadFile(const char *argv0,
53                                              const std::string &FN, 
54                                              LLVMContext& Context) {
55   sys::Path Filename;
56   if (!Filename.set(FN)) {
57     errs() << "Invalid file name: '" << FN << "'\n";
58     return std::auto_ptr<Module>();
59   }
60
61   SMDiagnostic Err;
62   if (Filename.exists()) {
63     if (Verbose) errs() << "Loading '" << Filename.c_str() << "'\n";
64     Module* Result = 0;
65     
66     const std::string &FNStr = Filename.str();
67     Result = ParseIRFile(FNStr, Err, Context);
68     if (Result) return std::auto_ptr<Module>(Result);   // Load successful!
69
70     if (Verbose)
71       Err.Print(argv0, errs());
72   } else {
73     errs() << "Bitcode file: '" << Filename.c_str() << "' does not exist.\n";
74   }
75
76   return std::auto_ptr<Module>();
77 }
78
79 int main(int argc, char **argv) {
80   // Print a stack trace if we signal out.
81   sys::PrintStackTraceOnErrorSignal();
82   PrettyStackTraceProgram X(argc, argv);
83   
84   LLVMContext &Context = getGlobalContext();
85   llvm_shutdown_obj Y;  // Call llvm_shutdown() on exit.
86   cl::ParseCommandLineOptions(argc, argv, "llvm linker\n");
87
88   unsigned BaseArg = 0;
89   std::string ErrorMessage;
90
91   std::auto_ptr<Module> Composite(LoadFile(argv[0],
92                                            InputFilenames[BaseArg], Context));
93   if (Composite.get() == 0) {
94     errs() << argv[0] << ": error loading file '"
95            << InputFilenames[BaseArg] << "'\n";
96     return 1;
97   }
98
99   for (unsigned i = BaseArg+1; i < InputFilenames.size(); ++i) {
100     std::auto_ptr<Module> M(LoadFile(argv[0],
101                                      InputFilenames[i], Context));
102     if (M.get() == 0) {
103       errs() << argv[0] << ": error loading file '" <<InputFilenames[i]<< "'\n";
104       return 1;
105     }
106
107     if (Verbose) errs() << "Linking in '" << InputFilenames[i] << "'\n";
108
109     if (Linker::LinkModules(Composite.get(), M.get(), &ErrorMessage)) {
110       errs() << argv[0] << ": link error in '" << InputFilenames[i]
111              << "': " << ErrorMessage << "\n";
112       return 1;
113     }
114   }
115
116   // TODO: Iterate over the -l list and link in any modules containing
117   // global symbols that have not been resolved so far.
118
119   if (DumpAsm) errs() << "Here's the assembly:\n" << *Composite.get();
120
121   std::string ErrorInfo;
122   std::auto_ptr<raw_ostream> 
123   Out(new raw_fd_ostream(OutputFilename.c_str(), ErrorInfo,
124                          raw_fd_ostream::F_Binary));
125   if (!ErrorInfo.empty()) {
126     errs() << ErrorInfo << '\n';
127     return 1;
128   }
129
130     // Make sure that the Out file gets unlinked from the disk if we get a
131     // SIGINT
132   if (OutputFilename != "-")
133     sys::RemoveFileOnSignal(sys::Path(OutputFilename));
134
135   if (verifyModule(*Composite.get())) {
136     errs() << argv[0] << ": linked module is broken!\n";
137     return 1;
138   }
139
140   if (Verbose) errs() << "Writing bitcode...\n";
141   if (Force || !CheckBitcodeOutputToConsole(*Out, true))
142     WriteBitcodeToFile(Composite.get(), *Out);
143
144   return 0;
145 }