blob: 11000de9a719ab6b365221897a7f4f82201da405 [file] [log] [blame]
Chris Lattner075a0b72001-10-13 07:06:23 +00001//===----------------------------------------------------------------------===//
2// LLVM 'LINK' UTILITY
3//
4// This utility may be invoked in the following manner:
5// link a.bc b.bc c.bc -o x.bc
6//
Chris Lattnerb81adf12001-10-23 20:44:55 +00007// Alternatively, this can be used as an 'ar' tool as well. If invoked as
Chris Lattner65be3212001-10-24 06:23:00 +00008// either 'ar' or 'llvm-ar', it accepts a 'rc' parameter as well.
Chris Lattnerb81adf12001-10-23 20:44:55 +00009//
Chris Lattner075a0b72001-10-13 07:06:23 +000010//===----------------------------------------------------------------------===//
11
Chris Lattnerc8cc4cb2002-05-07 18:36:35 +000012#include "llvm/Transforms/Utils/Linker.h"
Chris Lattner075a0b72001-10-13 07:06:23 +000013#include "llvm/Bytecode/Reader.h"
14#include "llvm/Bytecode/Writer.h"
Chris Lattner075a0b72001-10-13 07:06:23 +000015#include "llvm/Module.h"
Chris Lattnercee8f9a2001-11-27 00:03:19 +000016#include "Support/CommandLine.h"
Chris Lattner76d12292002-04-18 19:55:25 +000017#include "Support/Signals.h"
Chris Lattnercee8f9a2001-11-27 00:03:19 +000018#include <fstream>
Chris Lattner075a0b72001-10-13 07:06:23 +000019#include <memory>
Chris Lattner952d3652001-12-08 20:31:32 +000020#include <sys/types.h> // For FileExists
21#include <sys/stat.h>
Chris Lattner075a0b72001-10-13 07:06:23 +000022
23
24cl::StringList InputFilenames("", "Load <arg> files, linking them together",
25 cl::OneOrMore);
26cl::String OutputFilename("o", "Override output filename", cl::NoFlags, "-");
27cl::Flag Force ("f", "Overwrite output files", cl::NoFlags, false);
Chris Lattnerb81adf12001-10-23 20:44:55 +000028cl::Flag Verbose ("v", "Print information about actions taken");
Chris Lattner164cb692001-10-14 23:23:33 +000029cl::Flag DumpAsm ("d", "Print assembly as linked", cl::Hidden, false);
Chris Lattner65be3212001-10-24 06:23:00 +000030cl::StringList LibPaths ("L", "Specify a library search path", cl::ZeroOrMore);
Chris Lattner952d3652001-12-08 20:31:32 +000031
32// FileExists - Return true if the specified string is an openable file...
Chris Lattner697954c2002-01-20 22:54:45 +000033static inline bool FileExists(const std::string &FN) {
Chris Lattner952d3652001-12-08 20:31:32 +000034 struct stat StatBuf;
35 return stat(FN.c_str(), &StatBuf) != -1;
36}
37
38// LoadFile - Read the specified bytecode file in and return it. This routine
39// searches the link path for the specified file to try to find it...
40//
Chris Lattner697954c2002-01-20 22:54:45 +000041static inline std::auto_ptr<Module> LoadFile(const std::string &FN) {
42 std::string Filename = FN;
43 std::string ErrorMessage;
Chris Lattner65be3212001-10-24 06:23:00 +000044
45 unsigned NextLibPathIdx = 0;
Chris Lattner952d3652001-12-08 20:31:32 +000046 bool FoundAFile = false;
Chris Lattner65be3212001-10-24 06:23:00 +000047
48 while (1) {
49 if (Verbose) cerr << "Loading '" << Filename << "'\n";
Chris Lattner952d3652001-12-08 20:31:32 +000050 if (FileExists(Filename)) FoundAFile = true;
Chris Lattner65be3212001-10-24 06:23:00 +000051 Module *Result = ParseBytecodeFile(Filename, &ErrorMessage);
52 if (Result) return std::auto_ptr<Module>(Result); // Load successful!
53
54 if (Verbose) {
55 cerr << "Error opening bytecode file: '" << Filename << "'";
56 if (ErrorMessage.size()) cerr << ": " << ErrorMessage;
Chris Lattner5bdf1612002-04-07 22:34:44 +000057 cerr << "\n";
Chris Lattner65be3212001-10-24 06:23:00 +000058 }
59
60 if (NextLibPathIdx == LibPaths.size()) break;
61 Filename = LibPaths[NextLibPathIdx++] + "/" + FN;
62 }
63
Chris Lattner952d3652001-12-08 20:31:32 +000064 if (FoundAFile)
65 cerr << "Bytecode file '" << FN << "' corrupt! "
66 << "Use 'link -v ...' for more info.\n";
67 else
68 cerr << "Could not locate bytecode file: '" << FN << "'\n";
Chris Lattner65be3212001-10-24 06:23:00 +000069 return std::auto_ptr<Module>();
70}
Chris Lattner075a0b72001-10-13 07:06:23 +000071
Chris Lattner952d3652001-12-08 20:31:32 +000072
73
74
Chris Lattner075a0b72001-10-13 07:06:23 +000075int main(int argc, char **argv) {
Chris Lattnerde3b8622001-11-26 19:18:30 +000076 cl::ParseCommandLineOptions(argc, argv, " llvm linker\n",
77 cl::EnableSingleLetterArgValue |
78 cl::DisableSingleLetterArgGrouping);
Chris Lattner075a0b72001-10-13 07:06:23 +000079 assert(InputFilenames.size() > 0 && "OneOrMore is not working");
80
Chris Lattner65be3212001-10-24 06:23:00 +000081 unsigned BaseArg = 0;
Chris Lattner697954c2002-01-20 22:54:45 +000082 std::string ErrorMessage;
Chris Lattner65be3212001-10-24 06:23:00 +000083
84 // TODO: TEST argv[0] for llvm-ar forms... for now, this is a huge hack.
85 if (InputFilenames.size() >= 3 && InputFilenames[0] == "rc" &&
86 OutputFilename == "-") {
87 BaseArg = 2;
88 OutputFilename = InputFilenames[1];
Chris Lattner075a0b72001-10-13 07:06:23 +000089 }
90
Chris Lattner65be3212001-10-24 06:23:00 +000091 std::auto_ptr<Module> Composite(LoadFile(InputFilenames[BaseArg]));
92 if (Composite.get() == 0) return 1;
93
94 for (unsigned i = BaseArg+1; i < InputFilenames.size(); ++i) {
Chris Lattner697954c2002-01-20 22:54:45 +000095 std::auto_ptr<Module> M(LoadFile(InputFilenames[i]));
Chris Lattner65be3212001-10-24 06:23:00 +000096 if (M.get() == 0) return 1;
Chris Lattnerb81adf12001-10-23 20:44:55 +000097
98 if (Verbose) cerr << "Linking in '" << InputFilenames[i] << "'\n";
99
Chris Lattner075a0b72001-10-13 07:06:23 +0000100 if (LinkModules(Composite.get(), M.get(), &ErrorMessage)) {
101 cerr << "Error linking in '" << InputFilenames[i] << "': "
Chris Lattner5bdf1612002-04-07 22:34:44 +0000102 << ErrorMessage << "\n";
Chris Lattner075a0b72001-10-13 07:06:23 +0000103 return 1;
104 }
105 }
106
Chris Lattnerd43035e2002-04-28 05:13:45 +0000107 if (DumpAsm) cerr << "Here's the assembly:\n" << Composite.get();
Chris Lattner164cb692001-10-14 23:23:33 +0000108
Chris Lattner075a0b72001-10-13 07:06:23 +0000109 ostream *Out = &cout; // Default to printing to stdout...
110 if (OutputFilename != "-") {
Chris Lattner888912d2002-01-22 21:07:24 +0000111 if (!Force && std::ifstream(OutputFilename.c_str())) {
Chris Lattner697954c2002-01-20 22:54:45 +0000112 // If force is not specified, make sure not to overwrite a file!
113 cerr << "Error opening '" << OutputFilename << "': File exists!\n"
114 << "Use -f command line argument to force output\n";
115 return 1;
116 }
117 Out = new std::ofstream(OutputFilename.c_str());
Chris Lattner075a0b72001-10-13 07:06:23 +0000118 if (!Out->good()) {
119 cerr << "Error opening '" << OutputFilename << "'!\n";
120 return 1;
121 }
Chris Lattner76d12292002-04-18 19:55:25 +0000122
123 // Make sure that the Out file gets unlink'd from the disk if we get a
124 // SIGINT
125 RemoveFileOnSignal(OutputFilename);
Chris Lattner075a0b72001-10-13 07:06:23 +0000126 }
127
Chris Lattnerb81adf12001-10-23 20:44:55 +0000128 if (Verbose) cerr << "Writing bytecode...\n";
Chris Lattner075a0b72001-10-13 07:06:23 +0000129 WriteBytecodeToFile(Composite.get(), *Out);
130
Chris Lattner697954c2002-01-20 22:54:45 +0000131 if (Out != &std::cout) delete Out;
Chris Lattner075a0b72001-10-13 07:06:23 +0000132 return 0;
133}