Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 1 | //===----------------------------------------------------------------------===// |
| 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 | // |
| 7 | //===----------------------------------------------------------------------===// |
| 8 | |
Chris Lattner | a55c4b1 | 2003-08-28 16:25:34 +0000 | [diff] [blame] | 9 | #include "llvm/Module.h" |
| 10 | #include "llvm/Analysis/Verifier.h" |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 11 | #include "llvm/Bytecode/Reader.h" |
| 12 | #include "llvm/Bytecode/Writer.h" |
Chris Lattner | a55c4b1 | 2003-08-28 16:25:34 +0000 | [diff] [blame] | 13 | #include "llvm/Transforms/Utils/Linker.h" |
Chris Lattner | cee8f9a | 2001-11-27 00:03:19 +0000 | [diff] [blame] | 14 | #include "Support/CommandLine.h" |
Chris Lattner | 76d1229 | 2002-04-18 19:55:25 +0000 | [diff] [blame] | 15 | #include "Support/Signals.h" |
Chris Lattner | cee8f9a | 2001-11-27 00:03:19 +0000 | [diff] [blame] | 16 | #include <fstream> |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 17 | #include <memory> |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 18 | #include <sys/types.h> // For FileExists |
| 19 | #include <sys/stat.h> |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 20 | |
Chris Lattner | 5ff62e9 | 2002-07-22 02:10:13 +0000 | [diff] [blame] | 21 | static cl::list<std::string> |
| 22 | InputFilenames(cl::Positional, cl::OneOrMore, |
Chris Lattner | 54e05af | 2002-07-22 02:18:09 +0000 | [diff] [blame] | 23 | cl::desc("<input bytecode files>")); |
Chris Lattner | 5ff62e9 | 2002-07-22 02:10:13 +0000 | [diff] [blame] | 24 | |
| 25 | static cl::opt<std::string> |
| 26 | OutputFilename("o", cl::desc("Override output filename"), cl::init("-"), |
| 27 | cl::value_desc("filename")); |
| 28 | |
| 29 | static cl::opt<bool> Force("f", cl::desc("Overwrite output files")); |
| 30 | |
| 31 | static cl::opt<bool> |
| 32 | Verbose("v", cl::desc("Print information about actions taken")); |
| 33 | |
| 34 | static cl::opt<bool> |
| 35 | DumpAsm("d", cl::desc("Print assembly as linked"), cl::Hidden); |
| 36 | |
| 37 | static cl::list<std::string> |
| 38 | LibPaths("L", cl::desc("Specify a library search path"), cl::ZeroOrMore, |
| 39 | cl::value_desc("directory"), cl::Prefix); |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 40 | |
| 41 | // FileExists - Return true if the specified string is an openable file... |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 42 | static inline bool FileExists(const std::string &FN) { |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 43 | struct stat StatBuf; |
| 44 | return stat(FN.c_str(), &StatBuf) != -1; |
| 45 | } |
| 46 | |
| 47 | // LoadFile - Read the specified bytecode file in and return it. This routine |
| 48 | // searches the link path for the specified file to try to find it... |
| 49 | // |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 50 | static inline std::auto_ptr<Module> LoadFile(const std::string &FN) { |
| 51 | std::string Filename = FN; |
| 52 | std::string ErrorMessage; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 53 | |
| 54 | unsigned NextLibPathIdx = 0; |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 55 | bool FoundAFile = false; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 56 | |
| 57 | while (1) { |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 58 | if (Verbose) std::cerr << "Loading '" << Filename << "'\n"; |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 59 | if (FileExists(Filename)) FoundAFile = true; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 60 | Module *Result = ParseBytecodeFile(Filename, &ErrorMessage); |
| 61 | if (Result) return std::auto_ptr<Module>(Result); // Load successful! |
| 62 | |
| 63 | if (Verbose) { |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 64 | std::cerr << "Error opening bytecode file: '" << Filename << "'"; |
| 65 | if (ErrorMessage.size()) std::cerr << ": " << ErrorMessage; |
| 66 | std::cerr << "\n"; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 67 | } |
| 68 | |
| 69 | if (NextLibPathIdx == LibPaths.size()) break; |
| 70 | Filename = LibPaths[NextLibPathIdx++] + "/" + FN; |
| 71 | } |
| 72 | |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 73 | if (FoundAFile) |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 74 | std::cerr << "Bytecode file '" << FN << "' corrupt! " |
| 75 | << "Use 'link -v ...' for more info.\n"; |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 76 | else |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 77 | std::cerr << "Could not locate bytecode file: '" << FN << "'\n"; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 78 | return std::auto_ptr<Module>(); |
| 79 | } |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 80 | |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 81 | |
| 82 | |
| 83 | |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 84 | int main(int argc, char **argv) { |
Chris Lattner | 5ff62e9 | 2002-07-22 02:10:13 +0000 | [diff] [blame] | 85 | cl::ParseCommandLineOptions(argc, argv, " llvm linker\n"); |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 86 | assert(InputFilenames.size() > 0 && "OneOrMore is not working"); |
| 87 | |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 88 | unsigned BaseArg = 0; |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 89 | std::string ErrorMessage; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 90 | |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 91 | 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 Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 95 | std::auto_ptr<Module> M(LoadFile(InputFilenames[i])); |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 96 | if (M.get() == 0) return 1; |
Chris Lattner | b81adf1 | 2001-10-23 20:44:55 +0000 | [diff] [blame] | 97 | |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 98 | if (Verbose) std::cerr << "Linking in '" << InputFilenames[i] << "'\n"; |
Chris Lattner | b81adf1 | 2001-10-23 20:44:55 +0000 | [diff] [blame] | 99 | |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 100 | if (LinkModules(Composite.get(), M.get(), &ErrorMessage)) { |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 101 | std::cerr << argv[0] << ": error linking in '" << InputFilenames[i] |
| 102 | << "': " << ErrorMessage << "\n"; |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 103 | return 1; |
| 104 | } |
| 105 | } |
| 106 | |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 107 | if (DumpAsm) std::cerr << "Here's the assembly:\n" << Composite.get(); |
Chris Lattner | 164cb69 | 2001-10-14 23:23:33 +0000 | [diff] [blame] | 108 | |
Anand Shukla | cf17bcc | 2002-06-25 21:57:48 +0000 | [diff] [blame] | 109 | std::ostream *Out = &std::cout; // Default to printing to stdout... |
Chris Lattner | 4a4daba | 2003-06-13 16:10:26 +0000 | [diff] [blame] | 110 | if (OutputFilename != "-") { |
Chris Lattner | 888912d | 2002-01-22 21:07:24 +0000 | [diff] [blame] | 111 | if (!Force && std::ifstream(OutputFilename.c_str())) { |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 112 | // If force is not specified, make sure not to overwrite a file! |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 113 | std::cerr << argv[0] << ": error opening '" << OutputFilename |
| 114 | << "': file exists!\n" |
| 115 | << "Use -f command line argument to force output\n"; |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 116 | return 1; |
| 117 | } |
| 118 | Out = new std::ofstream(OutputFilename.c_str()); |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 119 | if (!Out->good()) { |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 120 | std::cerr << argv[0] << ": error opening '" << OutputFilename << "'!\n"; |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 121 | return 1; |
| 122 | } |
Chris Lattner | 76d1229 | 2002-04-18 19:55:25 +0000 | [diff] [blame] | 123 | |
| 124 | // Make sure that the Out file gets unlink'd from the disk if we get a |
| 125 | // SIGINT |
| 126 | RemoveFileOnSignal(OutputFilename); |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 127 | } |
| 128 | |
Chris Lattner | a55c4b1 | 2003-08-28 16:25:34 +0000 | [diff] [blame] | 129 | if (verifyModule(*Composite.get())) { |
| 130 | std::cerr << argv[0] << ": linked module is broken!\n"; |
| 131 | return 1; |
| 132 | } |
| 133 | |
Chris Lattner | 6c8103f | 2003-05-22 20:13:16 +0000 | [diff] [blame] | 134 | if (Verbose) std::cerr << "Writing bytecode...\n"; |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 135 | WriteBytecodeToFile(Composite.get(), *Out); |
| 136 | |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 137 | if (Out != &std::cout) delete Out; |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 138 | return 0; |
| 139 | } |