Misha Brukman | de03bc0 | 2005-04-24 17:36:05 +0000 | [diff] [blame] | 1 | //===- llvm-extract.cpp - LLVM function extraction utility ----------------===// |
Misha Brukman | 3da94ae | 2005-04-22 00:00:37 +0000 | [diff] [blame] | 2 | // |
John Criswell | 7c0e022 | 2003-10-20 17:47:21 +0000 | [diff] [blame] | 3 | // The LLVM Compiler Infrastructure |
| 4 | // |
Chris Lattner | 21c62da | 2007-12-29 20:44:31 +0000 | [diff] [blame] | 5 | // This file is distributed under the University of Illinois Open Source |
| 6 | // License. See LICENSE.TXT for details. |
Misha Brukman | 3da94ae | 2005-04-22 00:00:37 +0000 | [diff] [blame] | 7 | // |
John Criswell | 7c0e022 | 2003-10-20 17:47:21 +0000 | [diff] [blame] | 8 | //===----------------------------------------------------------------------===// |
Chris Lattner | 579d914 | 2002-05-22 20:27:00 +0000 | [diff] [blame] | 9 | // |
| 10 | // This utility changes the input module to only contain a single function, |
| 11 | // which is primarily used for debugging transformations. |
| 12 | // |
| 13 | //===----------------------------------------------------------------------===// |
| 14 | |
| 15 | #include "llvm/Module.h" |
| 16 | #include "llvm/PassManager.h" |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 17 | #include "llvm/Bitcode/ReaderWriter.h" |
Chris Lattner | 33974ca | 2002-07-23 22:04:40 +0000 | [diff] [blame] | 18 | #include "llvm/Transforms/IPO.h" |
Brian Gaeke | 2040890 | 2003-10-28 22:22:16 +0000 | [diff] [blame] | 19 | #include "llvm/Target/TargetData.h" |
Reid Spencer | 551ccae | 2004-09-01 22:55:40 +0000 | [diff] [blame] | 20 | #include "llvm/Support/CommandLine.h" |
Chris Lattner | c30598b | 2006-12-06 01:18:01 +0000 | [diff] [blame] | 21 | #include "llvm/Support/ManagedStatic.h" |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 22 | #include "llvm/Support/MemoryBuffer.h" |
Chris Lattner | bed85ff | 2004-05-27 05:41:36 +0000 | [diff] [blame] | 23 | #include "llvm/System/Signals.h" |
Bill Wendling | 68fe61d | 2006-11-29 00:19:40 +0000 | [diff] [blame] | 24 | #include <iostream> |
Chris Lattner | 579d914 | 2002-05-22 20:27:00 +0000 | [diff] [blame] | 25 | #include <memory> |
Chris Lattner | ba9cc1f | 2004-02-18 16:53:59 +0000 | [diff] [blame] | 26 | #include <fstream> |
Brian Gaeke | d0fde30 | 2003-11-11 22:41:34 +0000 | [diff] [blame] | 27 | using namespace llvm; |
| 28 | |
Chris Lattner | 5ff62e9 | 2002-07-22 02:10:13 +0000 | [diff] [blame] | 29 | // InputFilename - The filename to read from. |
Chris Lattner | c7a0985 | 2002-07-25 16:31:09 +0000 | [diff] [blame] | 30 | static cl::opt<std::string> |
Gabor Greif | a99be51 | 2007-07-05 17:07:56 +0000 | [diff] [blame] | 31 | InputFilename(cl::Positional, cl::desc("<input bitcode file>"), |
Chris Lattner | 5ff62e9 | 2002-07-22 02:10:13 +0000 | [diff] [blame] | 32 | cl::init("-"), cl::value_desc("filename")); |
Misha Brukman | 3da94ae | 2005-04-22 00:00:37 +0000 | [diff] [blame] | 33 | |
Chris Lattner | ba9cc1f | 2004-02-18 16:53:59 +0000 | [diff] [blame] | 34 | static cl::opt<std::string> |
Misha Brukman | 3da94ae | 2005-04-22 00:00:37 +0000 | [diff] [blame] | 35 | OutputFilename("o", cl::desc("Specify output filename"), |
Chris Lattner | ba9cc1f | 2004-02-18 16:53:59 +0000 | [diff] [blame] | 36 | cl::value_desc("filename"), cl::init("-")); |
| 37 | |
| 38 | static cl::opt<bool> |
| 39 | Force("f", cl::desc("Overwrite output files")); |
Chris Lattner | 5ff62e9 | 2002-07-22 02:10:13 +0000 | [diff] [blame] | 40 | |
Misha Brukman | ca718e4 | 2004-04-22 23:07:39 +0000 | [diff] [blame] | 41 | static cl::opt<bool> |
Andrew Lenharth | d245a8a | 2008-03-07 19:51:57 +0000 | [diff] [blame^] | 42 | DeleteFn("delete", cl::desc("Delete specified Globals from Module")); |
Misha Brukman | ca718e4 | 2004-04-22 23:07:39 +0000 | [diff] [blame] | 43 | |
Anton Korobeynikov | b10308e | 2007-01-28 13:31:35 +0000 | [diff] [blame] | 44 | static cl::opt<bool> |
| 45 | Relink("relink", |
| 46 | cl::desc("Turn external linkage for callees of function to delete")); |
| 47 | |
Andrew Lenharth | d245a8a | 2008-03-07 19:51:57 +0000 | [diff] [blame^] | 48 | // ExtractFunc - The function to extract from the module... |
Chris Lattner | c7a0985 | 2002-07-25 16:31:09 +0000 | [diff] [blame] | 49 | static cl::opt<std::string> |
Andrew Lenharth | d245a8a | 2008-03-07 19:51:57 +0000 | [diff] [blame^] | 50 | ExtractFunc("func", cl::desc("Specify function to extract"), cl::init(""), |
Chris Lattner | 5ff62e9 | 2002-07-22 02:10:13 +0000 | [diff] [blame] | 51 | cl::value_desc("function")); |
| 52 | |
Andrew Lenharth | d245a8a | 2008-03-07 19:51:57 +0000 | [diff] [blame^] | 53 | // ExtractGlobal - The global to extract from the module... |
| 54 | static cl::opt<std::string> |
| 55 | ExtractGlobal("glob", cl::desc("Specify global to extract"), cl::init(""), |
| 56 | cl::value_desc("global")); |
| 57 | |
Chris Lattner | 579d914 | 2002-05-22 20:27:00 +0000 | [diff] [blame] | 58 | int main(int argc, char **argv) { |
Chris Lattner | c30598b | 2006-12-06 01:18:01 +0000 | [diff] [blame] | 59 | llvm_shutdown_obj X; // Call llvm_shutdown() on exit. |
Dan Gohman | 82a13c9 | 2007-10-08 15:45:12 +0000 | [diff] [blame] | 60 | cl::ParseCommandLineOptions(argc, argv, "llvm extractor\n"); |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 61 | sys::PrintStackTraceOnErrorSignal(); |
Chris Lattner | 579d914 | 2002-05-22 20:27:00 +0000 | [diff] [blame] | 62 | |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 63 | std::auto_ptr<Module> M; |
| 64 | |
Chris Lattner | 065344d | 2007-05-06 23:45:49 +0000 | [diff] [blame] | 65 | MemoryBuffer *Buffer = MemoryBuffer::getFileOrSTDIN(InputFilename); |
Chris Lattner | 44dadff | 2007-05-06 09:29:57 +0000 | [diff] [blame] | 66 | if (Buffer == 0) { |
Reid Spencer | d2887e4 | 2007-08-08 21:19:01 +0000 | [diff] [blame] | 67 | cerr << argv[0] << ": Error reading file '" + InputFilename + "'\n"; |
Chris Lattner | 44dadff | 2007-05-06 09:29:57 +0000 | [diff] [blame] | 68 | return 1; |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 69 | } else { |
Chris Lattner | 44dadff | 2007-05-06 09:29:57 +0000 | [diff] [blame] | 70 | M.reset(ParseBitcodeFile(Buffer)); |
Chris Lattner | ba9cc1f | 2004-02-18 16:53:59 +0000 | [diff] [blame] | 71 | } |
Chris Lattner | 44dadff | 2007-05-06 09:29:57 +0000 | [diff] [blame] | 72 | delete Buffer; |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 73 | |
| 74 | if (M.get() == 0) { |
Gabor Greif | a99be51 | 2007-07-05 17:07:56 +0000 | [diff] [blame] | 75 | cerr << argv[0] << ": bitcode didn't read correctly.\n"; |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 76 | return 1; |
| 77 | } |
| 78 | |
| 79 | // Figure out which function we should extract |
Andrew Lenharth | d245a8a | 2008-03-07 19:51:57 +0000 | [diff] [blame^] | 80 | GlobalVariable *G = ExtractGlobal.size() ? |
| 81 | M.get()->getNamedGlobal(ExtractGlobal) : 0; |
| 82 | |
| 83 | // Figure out which function we should extract |
| 84 | Function *F = ExtractFunc.size() ? |
| 85 | M.get()->getFunction(ExtractFunc) : |
| 86 | M.get()->getFunction("main"); |
| 87 | |
| 88 | if (F == 0 && G == 0) { |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 89 | cerr << argv[0] << ": program doesn't contain function named '" |
Andrew Lenharth | d245a8a | 2008-03-07 19:51:57 +0000 | [diff] [blame^] | 90 | << ExtractFunc << "' or a global named '" << ExtractGlobal << "'!\n"; |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 91 | return 1; |
| 92 | } |
| 93 | |
| 94 | // In addition to deleting all other functions, we also want to spiff it |
| 95 | // up a little bit. Do this now. |
| 96 | PassManager Passes; |
| 97 | Passes.add(new TargetData(M.get())); // Use correct TargetData |
| 98 | // Either isolate the function or delete it from the Module |
Andrew Lenharth | d245a8a | 2008-03-07 19:51:57 +0000 | [diff] [blame^] | 99 | std::vector<GlobalValue*> GVs; |
| 100 | if (F) GVs.push_back(F); |
| 101 | if (G) GVs.push_back(G); |
| 102 | |
| 103 | Passes.add(createGVExtractionPass(GVs, DeleteFn, Relink)); |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 104 | if (!DeleteFn) |
| 105 | Passes.add(createGlobalDCEPass()); // Delete unreachable globals |
| 106 | Passes.add(createDeadTypeEliminationPass()); // Remove dead types... |
| 107 | Passes.add(createStripDeadPrototypesPass()); // Remove dead func decls |
| 108 | |
| 109 | std::ostream *Out = 0; |
| 110 | |
| 111 | if (OutputFilename != "-") { // Not stdout? |
| 112 | if (!Force && std::ifstream(OutputFilename.c_str())) { |
| 113 | // If force is not specified, make sure not to overwrite a file! |
| 114 | cerr << argv[0] << ": error opening '" << OutputFilename |
| 115 | << "': file exists!\n" |
| 116 | << "Use -f command line argument to force output\n"; |
| 117 | return 1; |
| 118 | } |
| 119 | std::ios::openmode io_mode = std::ios::out | std::ios::trunc | |
| 120 | std::ios::binary; |
| 121 | Out = new std::ofstream(OutputFilename.c_str(), io_mode); |
| 122 | } else { // Specified stdout |
| 123 | // FIXME: cout is not binary! |
| 124 | Out = &std::cout; |
| 125 | } |
| 126 | |
Chris Lattner | 44dadff | 2007-05-06 09:29:57 +0000 | [diff] [blame] | 127 | Passes.add(CreateBitcodeWriterPass(*Out)); |
Chris Lattner | c48e1db | 2007-05-06 05:13:17 +0000 | [diff] [blame] | 128 | Passes.run(*M.get()); |
| 129 | |
| 130 | if (Out != &std::cout) |
| 131 | delete Out; |
| 132 | return 0; |
Chris Lattner | 579d914 | 2002-05-22 20:27:00 +0000 | [diff] [blame] | 133 | } |