blob: 46840f2e223a8215f6afcc40a2cdc7cf9e319bd9 [file] [log] [blame]
Dan Gohmanf17a25c2007-07-18 16:29:46 +00001//===- llvm-extract.cpp - LLVM function extraction utility ----------------===//
2//
3// The LLVM Compiler Infrastructure
4//
Chris Lattner5f5a5732007-12-29 20:44:31 +00005// This file is distributed under the University of Illinois Open Source
6// License. See LICENSE.TXT for details.
Dan Gohmanf17a25c2007-07-18 16:29:46 +00007//
8//===----------------------------------------------------------------------===//
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"
17#include "llvm/Bitcode/ReaderWriter.h"
18#include "llvm/Transforms/IPO.h"
19#include "llvm/Target/TargetData.h"
20#include "llvm/Support/CommandLine.h"
21#include "llvm/Support/ManagedStatic.h"
22#include "llvm/Support/MemoryBuffer.h"
Chris Lattnere6012df2009-03-06 05:34:10 +000023#include "llvm/Support/PrettyStackTrace.h"
Dan Gohmanf17a25c2007-07-18 16:29:46 +000024#include "llvm/System/Signals.h"
25#include <iostream>
26#include <memory>
27#include <fstream>
28using namespace llvm;
29
30// InputFilename - The filename to read from.
31static cl::opt<std::string>
32InputFilename(cl::Positional, cl::desc("<input bitcode file>"),
33 cl::init("-"), cl::value_desc("filename"));
34
35static cl::opt<std::string>
36OutputFilename("o", cl::desc("Specify output filename"),
37 cl::value_desc("filename"), cl::init("-"));
38
39static cl::opt<bool>
40Force("f", cl::desc("Overwrite output files"));
41
42static cl::opt<bool>
Andrew Lenharth38a17672008-03-07 19:51:57 +000043DeleteFn("delete", cl::desc("Delete specified Globals from Module"));
Dan Gohmanf17a25c2007-07-18 16:29:46 +000044
45static cl::opt<bool>
46Relink("relink",
47 cl::desc("Turn external linkage for callees of function to delete"));
48
Andrew Lenharth38a17672008-03-07 19:51:57 +000049// ExtractFunc - The function to extract from the module...
Dan Gohmanf17a25c2007-07-18 16:29:46 +000050static cl::opt<std::string>
Andrew Lenharth38a17672008-03-07 19:51:57 +000051ExtractFunc("func", cl::desc("Specify function to extract"), cl::init(""),
Dan Gohmanf17a25c2007-07-18 16:29:46 +000052 cl::value_desc("function"));
53
Andrew Lenharth38a17672008-03-07 19:51:57 +000054// ExtractGlobal - The global to extract from the module...
55static cl::opt<std::string>
56ExtractGlobal("glob", cl::desc("Specify global to extract"), cl::init(""),
57 cl::value_desc("global"));
58
Dan Gohmanf17a25c2007-07-18 16:29:46 +000059int main(int argc, char **argv) {
Chris Lattnere6012df2009-03-06 05:34:10 +000060 // Print a stack trace if we signal out.
Dan Gohmanf17a25c2007-07-18 16:29:46 +000061 sys::PrintStackTraceOnErrorSignal();
Chris Lattnere6012df2009-03-06 05:34:10 +000062 PrettyStackTraceProgram X(argc, argv);
63
64 llvm_shutdown_obj Y; // Call llvm_shutdown() on exit.
65 cl::ParseCommandLineOptions(argc, argv, "llvm extractor\n");
Dan Gohmanf17a25c2007-07-18 16:29:46 +000066
67 std::auto_ptr<Module> M;
68
69 MemoryBuffer *Buffer = MemoryBuffer::getFileOrSTDIN(InputFilename);
70 if (Buffer == 0) {
Reid Spencer0e8e10d2007-08-08 21:19:01 +000071 cerr << argv[0] << ": Error reading file '" + InputFilename + "'\n";
Dan Gohmanf17a25c2007-07-18 16:29:46 +000072 return 1;
73 } else {
74 M.reset(ParseBitcodeFile(Buffer));
75 }
76 delete Buffer;
77
78 if (M.get() == 0) {
79 cerr << argv[0] << ": bitcode didn't read correctly.\n";
80 return 1;
81 }
82
83 // Figure out which function we should extract
Dan Gohman5e0550b2009-04-20 16:19:02 +000084 GlobalVariable *G = !ExtractGlobal.empty() ?
Andrew Lenharth38a17672008-03-07 19:51:57 +000085 M.get()->getNamedGlobal(ExtractGlobal) : 0;
86
87 // Figure out which function we should extract
Dan Gohman5e0550b2009-04-20 16:19:02 +000088 if (ExtractFunc.empty() && ExtractGlobal.empty()) ExtractFunc = "main";
Andrew Lenharthdf35b3c2008-03-07 20:07:24 +000089 Function *F = M.get()->getFunction(ExtractFunc);
Andrew Lenharth38a17672008-03-07 19:51:57 +000090
91 if (F == 0 && G == 0) {
Dan Gohmanf17a25c2007-07-18 16:29:46 +000092 cerr << argv[0] << ": program doesn't contain function named '"
Andrew Lenharth38a17672008-03-07 19:51:57 +000093 << ExtractFunc << "' or a global named '" << ExtractGlobal << "'!\n";
Dan Gohmanf17a25c2007-07-18 16:29:46 +000094 return 1;
95 }
96
97 // In addition to deleting all other functions, we also want to spiff it
98 // up a little bit. Do this now.
99 PassManager Passes;
100 Passes.add(new TargetData(M.get())); // Use correct TargetData
101 // Either isolate the function or delete it from the Module
Andrew Lenharth38a17672008-03-07 19:51:57 +0000102 std::vector<GlobalValue*> GVs;
103 if (F) GVs.push_back(F);
104 if (G) GVs.push_back(G);
105
106 Passes.add(createGVExtractionPass(GVs, DeleteFn, Relink));
Dan Gohmanf17a25c2007-07-18 16:29:46 +0000107 if (!DeleteFn)
108 Passes.add(createGlobalDCEPass()); // Delete unreachable globals
109 Passes.add(createDeadTypeEliminationPass()); // Remove dead types...
110 Passes.add(createStripDeadPrototypesPass()); // Remove dead func decls
111
112 std::ostream *Out = 0;
113
114 if (OutputFilename != "-") { // Not stdout?
115 if (!Force && std::ifstream(OutputFilename.c_str())) {
116 // If force is not specified, make sure not to overwrite a file!
117 cerr << argv[0] << ": error opening '" << OutputFilename
118 << "': file exists!\n"
119 << "Use -f command line argument to force output\n";
120 return 1;
121 }
122 std::ios::openmode io_mode = std::ios::out | std::ios::trunc |
123 std::ios::binary;
124 Out = new std::ofstream(OutputFilename.c_str(), io_mode);
125 } else { // Specified stdout
126 // FIXME: cout is not binary!
127 Out = &std::cout;
128 }
129
130 Passes.add(CreateBitcodeWriterPass(*Out));
131 Passes.run(*M.get());
132
133 if (Out != &std::cout)
134 delete Out;
135 return 0;
136}