More encapsulation work.
[oota-llvm.git] / lib / Transforms / IPO / PruneEH.cpp
1 //===- PruneEH.cpp - Pass which deletes unused exception handlers ---------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file implements a simple interprocedural pass which walks the
11 // call-graph, turning invoke instructions into calls, iff the callee cannot
12 // throw an exception, and marking functions 'nounwind' if they cannot throw.
13 // It implements this as a bottom-up traversal of the call-graph.
14 //
15 //===----------------------------------------------------------------------===//
16
17 #define DEBUG_TYPE "prune-eh"
18 #include "llvm/Transforms/IPO.h"
19 #include "llvm/ADT/SmallPtrSet.h"
20 #include "llvm/ADT/SmallVector.h"
21 #include "llvm/ADT/Statistic.h"
22 #include "llvm/Analysis/CallGraph.h"
23 #include "llvm/Analysis/CallGraphSCCPass.h"
24 #include "llvm/IR/Constants.h"
25 #include "llvm/IR/Function.h"
26 #include "llvm/IR/Instructions.h"
27 #include "llvm/IR/IntrinsicInst.h"
28 #include "llvm/IR/LLVMContext.h"
29 #include "llvm/Support/CFG.h"
30 #include <algorithm>
31 using namespace llvm;
32
33 STATISTIC(NumRemoved, "Number of invokes removed");
34 STATISTIC(NumUnreach, "Number of noreturn calls optimized");
35
36 namespace {
37   struct PruneEH : public CallGraphSCCPass {
38     static char ID; // Pass identification, replacement for typeid
39     PruneEH() : CallGraphSCCPass(ID) {
40       initializePruneEHPass(*PassRegistry::getPassRegistry());
41     }
42
43     // runOnSCC - Analyze the SCC, performing the transformation if possible.
44     bool runOnSCC(CallGraphSCC &SCC);
45
46     bool SimplifyFunction(Function *F);
47     void DeleteBasicBlock(BasicBlock *BB);
48   };
49 }
50
51 char PruneEH::ID = 0;
52 INITIALIZE_PASS_BEGIN(PruneEH, "prune-eh",
53                 "Remove unused exception handling info", false, false)
54 INITIALIZE_AG_DEPENDENCY(CallGraph)
55 INITIALIZE_PASS_END(PruneEH, "prune-eh",
56                 "Remove unused exception handling info", false, false)
57
58 Pass *llvm::createPruneEHPass() { return new PruneEH(); }
59
60
61 bool PruneEH::runOnSCC(CallGraphSCC &SCC) {
62   SmallPtrSet<CallGraphNode *, 8> SCCNodes;
63   CallGraph &CG = getAnalysis<CallGraph>();
64   bool MadeChange = false;
65
66   // Fill SCCNodes with the elements of the SCC.  Used for quickly
67   // looking up whether a given CallGraphNode is in this SCC.
68   for (CallGraphSCC::iterator I = SCC.begin(), E = SCC.end(); I != E; ++I)
69     SCCNodes.insert(*I);
70
71   // First pass, scan all of the functions in the SCC, simplifying them
72   // according to what we know.
73   for (CallGraphSCC::iterator I = SCC.begin(), E = SCC.end(); I != E; ++I)
74     if (Function *F = (*I)->getFunction())
75       MadeChange |= SimplifyFunction(F);
76
77   // Next, check to see if any callees might throw or if there are any external
78   // functions in this SCC: if so, we cannot prune any functions in this SCC.
79   // Definitions that are weak and not declared non-throwing might be 
80   // overridden at linktime with something that throws, so assume that.
81   // If this SCC includes the unwind instruction, we KNOW it throws, so
82   // obviously the SCC might throw.
83   //
84   bool SCCMightUnwind = false, SCCMightReturn = false;
85   for (CallGraphSCC::iterator I = SCC.begin(), E = SCC.end(); 
86        (!SCCMightUnwind || !SCCMightReturn) && I != E; ++I) {
87     Function *F = (*I)->getFunction();
88     if (F == 0) {
89       SCCMightUnwind = true;
90       SCCMightReturn = true;
91     } else if (F->isDeclaration() || F->mayBeOverridden()) {
92       SCCMightUnwind |= !F->doesNotThrow();
93       SCCMightReturn |= !F->doesNotReturn();
94     } else {
95       bool CheckUnwind = !SCCMightUnwind && !F->doesNotThrow();
96       bool CheckReturn = !SCCMightReturn && !F->doesNotReturn();
97
98       if (!CheckUnwind && !CheckReturn)
99         continue;
100
101       // Check to see if this function performs an unwind or calls an
102       // unwinding function.
103       for (Function::iterator BB = F->begin(), E = F->end(); BB != E; ++BB) {
104         if (CheckUnwind && isa<ResumeInst>(BB->getTerminator())) {
105           // Uses unwind / resume!
106           SCCMightUnwind = true;
107         } else if (CheckReturn && isa<ReturnInst>(BB->getTerminator())) {
108           SCCMightReturn = true;
109         }
110
111         // Invoke instructions don't allow unwinding to continue, so we are
112         // only interested in call instructions.
113         if (CheckUnwind && !SCCMightUnwind)
114           for (BasicBlock::iterator I = BB->begin(), E = BB->end(); I != E; ++I)
115             if (CallInst *CI = dyn_cast<CallInst>(I)) {
116               if (CI->doesNotThrow()) {
117                 // This call cannot throw.
118               } else if (Function *Callee = CI->getCalledFunction()) {
119                 CallGraphNode *CalleeNode = CG[Callee];
120                 // If the callee is outside our current SCC then we may
121                 // throw because it might.
122                 if (!SCCNodes.count(CalleeNode)) {
123                   SCCMightUnwind = true;
124                   break;
125                 }
126               } else {
127                 // Indirect call, it might throw.
128                 SCCMightUnwind = true;
129                 break;
130               }
131             }
132         if (SCCMightUnwind && SCCMightReturn) break;
133       }
134     }
135   }
136
137   // If the SCC doesn't unwind or doesn't throw, note this fact.
138   if (!SCCMightUnwind || !SCCMightReturn)
139     for (CallGraphSCC::iterator I = SCC.begin(), E = SCC.end(); I != E; ++I) {
140       AttrBuilder NewAttributes;
141
142       if (!SCCMightUnwind)
143         NewAttributes.addAttribute(Attribute::NoUnwind);
144       if (!SCCMightReturn)
145         NewAttributes.addAttribute(Attribute::NoReturn);
146
147       Function *F = (*I)->getFunction();
148       const AttributeSet &PAL = F->getAttributes();
149       const AttributeSet &NPAL =
150         PAL.addFnAttributes(F->getContext(),
151                             AttributeSet::get(F->getContext(),
152                                               AttributeSet::FunctionIndex,
153                                               NewAttributes));
154       if (PAL != NPAL) {
155         MadeChange = true;
156         F->setAttributes(NPAL);
157       }
158     }
159
160   for (CallGraphSCC::iterator I = SCC.begin(), E = SCC.end(); I != E; ++I) {
161     // Convert any invoke instructions to non-throwing functions in this node
162     // into call instructions with a branch.  This makes the exception blocks
163     // dead.
164     if (Function *F = (*I)->getFunction())
165       MadeChange |= SimplifyFunction(F);
166   }
167
168   return MadeChange;
169 }
170
171
172 // SimplifyFunction - Given information about callees, simplify the specified
173 // function if we have invokes to non-unwinding functions or code after calls to
174 // no-return functions.
175 bool PruneEH::SimplifyFunction(Function *F) {
176   bool MadeChange = false;
177   for (Function::iterator BB = F->begin(), E = F->end(); BB != E; ++BB) {
178     if (InvokeInst *II = dyn_cast<InvokeInst>(BB->getTerminator()))
179       if (II->doesNotThrow()) {
180         SmallVector<Value*, 8> Args(II->op_begin(), II->op_end() - 3);
181         // Insert a call instruction before the invoke.
182         CallInst *Call = CallInst::Create(II->getCalledValue(), Args, "", II);
183         Call->takeName(II);
184         Call->setCallingConv(II->getCallingConv());
185         Call->setAttributes(II->getAttributes());
186         Call->setDebugLoc(II->getDebugLoc());
187
188         // Anything that used the value produced by the invoke instruction
189         // now uses the value produced by the call instruction.  Note that we
190         // do this even for void functions and calls with no uses so that the
191         // callgraph edge is updated.
192         II->replaceAllUsesWith(Call);
193         BasicBlock *UnwindBlock = II->getUnwindDest();
194         UnwindBlock->removePredecessor(II->getParent());
195
196         // Insert a branch to the normal destination right before the
197         // invoke.
198         BranchInst::Create(II->getNormalDest(), II);
199
200         // Finally, delete the invoke instruction!
201         BB->getInstList().pop_back();
202
203         // If the unwind block is now dead, nuke it.
204         if (pred_begin(UnwindBlock) == pred_end(UnwindBlock))
205           DeleteBasicBlock(UnwindBlock);  // Delete the new BB.
206
207         ++NumRemoved;
208         MadeChange = true;
209       }
210
211     for (BasicBlock::iterator I = BB->begin(), E = BB->end(); I != E; )
212       if (CallInst *CI = dyn_cast<CallInst>(I++))
213         if (CI->doesNotReturn() && !isa<UnreachableInst>(I)) {
214           // This call calls a function that cannot return.  Insert an
215           // unreachable instruction after it and simplify the code.  Do this
216           // by splitting the BB, adding the unreachable, then deleting the
217           // new BB.
218           BasicBlock *New = BB->splitBasicBlock(I);
219
220           // Remove the uncond branch and add an unreachable.
221           BB->getInstList().pop_back();
222           new UnreachableInst(BB->getContext(), BB);
223
224           DeleteBasicBlock(New);  // Delete the new BB.
225           MadeChange = true;
226           ++NumUnreach;
227           break;
228         }
229   }
230
231   return MadeChange;
232 }
233
234 /// DeleteBasicBlock - remove the specified basic block from the program,
235 /// updating the callgraph to reflect any now-obsolete edges due to calls that
236 /// exist in the BB.
237 void PruneEH::DeleteBasicBlock(BasicBlock *BB) {
238   assert(pred_begin(BB) == pred_end(BB) && "BB is not dead!");
239   CallGraph &CG = getAnalysis<CallGraph>();
240
241   CallGraphNode *CGN = CG[BB->getParent()];
242   for (BasicBlock::iterator I = BB->end(), E = BB->begin(); I != E; ) {
243     --I;
244     if (CallInst *CI = dyn_cast<CallInst>(I)) {
245       if (!isa<IntrinsicInst>(I))
246         CGN->removeCallEdgeFor(CI);
247     } else if (InvokeInst *II = dyn_cast<InvokeInst>(I))
248       CGN->removeCallEdgeFor(II);
249     if (!I->use_empty())
250       I->replaceAllUsesWith(UndefValue::get(I->getType()));
251   }
252
253   // Get the list of successors of this block.
254   std::vector<BasicBlock*> Succs(succ_begin(BB), succ_end(BB));
255
256   for (unsigned i = 0, e = Succs.size(); i != e; ++i)
257     Succs[i]->removePredecessor(BB);
258
259   BB->eraseFromParent();
260 }