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 | // |
Chris Lattner | b81adf1 | 2001-10-23 20:44:55 +0000 | [diff] [blame] | 7 | // Alternatively, this can be used as an 'ar' tool as well. If invoked as |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 8 | // either 'ar' or 'llvm-ar', it accepts a 'rc' parameter as well. |
Chris Lattner | b81adf1 | 2001-10-23 20:44:55 +0000 | [diff] [blame] | 9 | // |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 10 | //===----------------------------------------------------------------------===// |
| 11 | |
Chris Lattner | c8cc4cb | 2002-05-07 18:36:35 +0000 | [diff] [blame] | 12 | #include "llvm/Transforms/Utils/Linker.h" |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 13 | #include "llvm/Bytecode/Reader.h" |
| 14 | #include "llvm/Bytecode/Writer.h" |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 15 | #include "llvm/Module.h" |
Chris Lattner | cee8f9a | 2001-11-27 00:03:19 +0000 | [diff] [blame] | 16 | #include "Support/CommandLine.h" |
Chris Lattner | 76d1229 | 2002-04-18 19:55:25 +0000 | [diff] [blame] | 17 | #include "Support/Signals.h" |
Chris Lattner | cee8f9a | 2001-11-27 00:03:19 +0000 | [diff] [blame] | 18 | #include <fstream> |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 19 | #include <memory> |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 20 | #include <sys/types.h> // For FileExists |
| 21 | #include <sys/stat.h> |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 22 | |
| 23 | |
| 24 | cl::StringList InputFilenames("", "Load <arg> files, linking them together", |
| 25 | cl::OneOrMore); |
| 26 | cl::String OutputFilename("o", "Override output filename", cl::NoFlags, "-"); |
| 27 | cl::Flag Force ("f", "Overwrite output files", cl::NoFlags, false); |
Chris Lattner | b81adf1 | 2001-10-23 20:44:55 +0000 | [diff] [blame] | 28 | cl::Flag Verbose ("v", "Print information about actions taken"); |
Chris Lattner | 164cb69 | 2001-10-14 23:23:33 +0000 | [diff] [blame] | 29 | cl::Flag DumpAsm ("d", "Print assembly as linked", cl::Hidden, false); |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 30 | cl::StringList LibPaths ("L", "Specify a library search path", cl::ZeroOrMore); |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 31 | |
| 32 | // FileExists - Return true if the specified string is an openable file... |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 33 | static inline bool FileExists(const std::string &FN) { |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 34 | 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 Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 41 | static inline std::auto_ptr<Module> LoadFile(const std::string &FN) { |
| 42 | std::string Filename = FN; |
| 43 | std::string ErrorMessage; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 44 | |
| 45 | unsigned NextLibPathIdx = 0; |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 46 | bool FoundAFile = false; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 47 | |
| 48 | while (1) { |
| 49 | if (Verbose) cerr << "Loading '" << Filename << "'\n"; |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 50 | if (FileExists(Filename)) FoundAFile = true; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 51 | 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 Lattner | 5bdf161 | 2002-04-07 22:34:44 +0000 | [diff] [blame] | 57 | cerr << "\n"; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 58 | } |
| 59 | |
| 60 | if (NextLibPathIdx == LibPaths.size()) break; |
| 61 | Filename = LibPaths[NextLibPathIdx++] + "/" + FN; |
| 62 | } |
| 63 | |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 64 | 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 Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 69 | return std::auto_ptr<Module>(); |
| 70 | } |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 71 | |
Chris Lattner | 952d365 | 2001-12-08 20:31:32 +0000 | [diff] [blame] | 72 | |
| 73 | |
| 74 | |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 75 | int main(int argc, char **argv) { |
Chris Lattner | de3b862 | 2001-11-26 19:18:30 +0000 | [diff] [blame] | 76 | cl::ParseCommandLineOptions(argc, argv, " llvm linker\n", |
| 77 | cl::EnableSingleLetterArgValue | |
| 78 | cl::DisableSingleLetterArgGrouping); |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 79 | assert(InputFilenames.size() > 0 && "OneOrMore is not working"); |
| 80 | |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 81 | unsigned BaseArg = 0; |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 82 | std::string ErrorMessage; |
Chris Lattner | 65be321 | 2001-10-24 06:23:00 +0000 | [diff] [blame] | 83 | |
| 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 Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 89 | } |
| 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 | |
| 98 | if (Verbose) cerr << "Linking in '" << InputFilenames[i] << "'\n"; |
| 99 | |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 100 | if (LinkModules(Composite.get(), M.get(), &ErrorMessage)) { |
| 101 | cerr << "Error linking in '" << InputFilenames[i] << "': " |
Chris Lattner | 5bdf161 | 2002-04-07 22:34:44 +0000 | [diff] [blame] | 102 | << ErrorMessage << "\n"; |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 103 | return 1; |
| 104 | } |
| 105 | } |
| 106 | |
Chris Lattner | d43035e | 2002-04-28 05:13:45 +0000 | [diff] [blame] | 107 | if (DumpAsm) cerr << "Here's the assembly:\n" << Composite.get(); |
Chris Lattner | 164cb69 | 2001-10-14 23:23:33 +0000 | [diff] [blame] | 108 | |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 109 | ostream *Out = &cout; // Default to printing to stdout... |
| 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! |
| 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 Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 118 | if (!Out->good()) { |
| 119 | cerr << "Error opening '" << OutputFilename << "'!\n"; |
| 120 | return 1; |
| 121 | } |
Chris Lattner | 76d1229 | 2002-04-18 19:55:25 +0000 | [diff] [blame] | 122 | |
| 123 | // Make sure that the Out file gets unlink'd from the disk if we get a |
| 124 | // SIGINT |
| 125 | RemoveFileOnSignal(OutputFilename); |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 126 | } |
| 127 | |
Chris Lattner | b81adf1 | 2001-10-23 20:44:55 +0000 | [diff] [blame] | 128 | if (Verbose) cerr << "Writing bytecode...\n"; |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 129 | WriteBytecodeToFile(Composite.get(), *Out); |
| 130 | |
Chris Lattner | 697954c | 2002-01-20 22:54:45 +0000 | [diff] [blame] | 131 | if (Out != &std::cout) delete Out; |
Chris Lattner | 075a0b7 | 2001-10-13 07:06:23 +0000 | [diff] [blame] | 132 | return 0; |
| 133 | } |