8632cd1f25a8bac3edbeb3f7eaee40c0d3f9e8e1
[oota-llvm.git] / lib / Transforms / IPO / IPConstantPropagation.cpp
1 //===-- IPConstantPropagation.cpp - Propagate constants through calls -----===//
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 pass implements an _extremely_ simple interprocedural constant
11 // propagation pass.  It could certainly be improved in many different ways,
12 // like using a worklist.  This pass makes arguments dead, but does not remove
13 // them.  The existing dead argument elimination pass should be run after this
14 // to clean up the mess.
15 //
16 //===----------------------------------------------------------------------===//
17
18 #define DEBUG_TYPE "ipconstprop"
19 #include "llvm/Transforms/IPO.h"
20 #include "llvm/Constants.h"
21 #include "llvm/Instructions.h"
22 #include "llvm/Module.h"
23 #include "llvm/Pass.h"
24 #include "llvm/Support/CallSite.h"
25 #include "llvm/Support/Compiler.h"
26 #include "llvm/ADT/Statistic.h"
27 #include "llvm/ADT/SmallVector.h"
28 using namespace llvm;
29
30 STATISTIC(NumArgumentsProped, "Number of args turned into constants");
31 STATISTIC(NumReturnValProped, "Number of return values turned into constants");
32
33 namespace {
34   /// IPCP - The interprocedural constant propagation pass
35   ///
36   struct VISIBILITY_HIDDEN IPCP : public ModulePass {
37     static char ID; // Pass identification, replacement for typeid
38     IPCP() : ModulePass((intptr_t)&ID) {}
39
40     bool runOnModule(Module &M);
41   private:
42     bool PropagateConstantsIntoArguments(Function &F);
43     bool PropagateConstantReturn(Function &F);
44   };
45   char IPCP::ID = 0;
46   RegisterPass<IPCP> X("ipconstprop", "Interprocedural constant propagation");
47 }
48
49 ModulePass *llvm::createIPConstantPropagationPass() { return new IPCP(); }
50
51 bool IPCP::runOnModule(Module &M) {
52   bool Changed = false;
53   bool LocalChange = true;
54
55   // FIXME: instead of using smart algorithms, we just iterate until we stop
56   // making changes.
57   while (LocalChange) {
58     LocalChange = false;
59     for (Module::iterator I = M.begin(), E = M.end(); I != E; ++I)
60       if (!I->isDeclaration()) {
61         // Delete any klingons.
62         I->removeDeadConstantUsers();
63         if (I->hasInternalLinkage())
64           LocalChange |= PropagateConstantsIntoArguments(*I);
65         Changed |= PropagateConstantReturn(*I);
66       }
67     Changed |= LocalChange;
68   }
69   return Changed;
70 }
71
72 /// PropagateConstantsIntoArguments - Look at all uses of the specified
73 /// function.  If all uses are direct call sites, and all pass a particular
74 /// constant in for an argument, propagate that constant in as the argument.
75 ///
76 bool IPCP::PropagateConstantsIntoArguments(Function &F) {
77   if (F.arg_empty() || F.use_empty()) return false; // No arguments? Early exit.
78
79   std::vector<std::pair<Constant*, bool> > ArgumentConstants;
80   ArgumentConstants.resize(F.arg_size());
81
82   unsigned NumNonconstant = 0;
83
84   for (Value::use_iterator I = F.use_begin(), E = F.use_end(); I != E; ++I)
85     if (!isa<Instruction>(*I))
86       return false;  // Used by a non-instruction, do not transform
87     else {
88       CallSite CS = CallSite::get(cast<Instruction>(*I));
89       if (CS.getInstruction() == 0 ||
90           CS.getCalledFunction() != &F)
91         return false;  // Not a direct call site?
92
93       // Check out all of the potentially constant arguments
94       CallSite::arg_iterator AI = CS.arg_begin();
95       Function::arg_iterator Arg = F.arg_begin();
96       for (unsigned i = 0, e = ArgumentConstants.size(); i != e;
97            ++i, ++AI, ++Arg) {
98         if (*AI == &F) return false;  // Passes the function into itself
99
100         if (!ArgumentConstants[i].second) {
101           if (Constant *C = dyn_cast<Constant>(*AI)) {
102             if (!ArgumentConstants[i].first)
103               ArgumentConstants[i].first = C;
104             else if (ArgumentConstants[i].first != C) {
105               // Became non-constant
106               ArgumentConstants[i].second = true;
107               ++NumNonconstant;
108               if (NumNonconstant == ArgumentConstants.size()) return false;
109             }
110           } else if (*AI != &*Arg) {    // Ignore recursive calls with same arg
111             // This is not a constant argument.  Mark the argument as
112             // non-constant.
113             ArgumentConstants[i].second = true;
114             ++NumNonconstant;
115             if (NumNonconstant == ArgumentConstants.size()) return false;
116           }
117         }
118       }
119     }
120
121   // If we got to this point, there is a constant argument!
122   assert(NumNonconstant != ArgumentConstants.size());
123   Function::arg_iterator AI = F.arg_begin();
124   bool MadeChange = false;
125   for (unsigned i = 0, e = ArgumentConstants.size(); i != e; ++i, ++AI)
126     // Do we have a constant argument!?
127     if (!ArgumentConstants[i].second && !AI->use_empty()) {
128       Value *V = ArgumentConstants[i].first;
129       if (V == 0) V = UndefValue::get(AI->getType());
130       AI->replaceAllUsesWith(V);
131       ++NumArgumentsProped;
132       MadeChange = true;
133     }
134   return MadeChange;
135 }
136
137
138 // Check to see if this function returns a constant.  If so, replace all callers
139 // that user the return value with the returned valued.  If we can replace ALL
140 // callers,
141 bool IPCP::PropagateConstantReturn(Function &F) {
142   if (F.getReturnType() == Type::VoidTy)
143     return false; // No return value.
144
145   // Check to see if this function returns a constant.
146   SmallVector<Value *,4> RetVals;
147   const StructType *STy = dyn_cast<StructType>(F.getReturnType());
148   if (STy)
149     RetVals.assign(STy->getNumElements(), 0);
150   else
151     RetVals.push_back(0);
152
153   for (Function::iterator BB = F.begin(), E = F.end(); BB != E; ++BB)
154     if (ReturnInst *RI = dyn_cast<ReturnInst>(BB->getTerminator())) {
155       unsigned RetValsSize = RetVals.size();
156       assert (RetValsSize == RI->getNumOperands() && "Invalid ReturnInst operands!");
157       for (unsigned i = 0; i < RetValsSize; ++i) {
158         if (isa<UndefValue>(RI->getOperand(i))) {
159           // Ignore
160         } else if (Constant *C = dyn_cast<Constant>(RI->getOperand(i))) { 
161           Value *RV = RetVals[i];
162           if (RV == 0)
163             RetVals[i] = C;
164           else if (RV != C)
165             return false; // Does not return the same constant.
166         } else {
167           return false; // Does not return a constant.
168         }
169       }
170     }
171
172   if (STy) {
173     for (unsigned i = 0, e = RetVals.size(); i < e; ++i) 
174       if (RetVals[i] == 0) 
175         RetVals[i] = UndefValue::get(STy->getElementType(i));
176   } else {
177     if (RetVals.size() == 1) 
178       if (RetVals[0] == 0)
179         RetVals[0] = UndefValue::get(F.getReturnType());
180   }
181
182   // If we got here, the function returns a constant value.  Loop over all
183   // users, replacing any uses of the return value with the returned constant.
184   bool ReplacedAllUsers = true;
185   bool MadeChange = false;
186   for (Value::use_iterator I = F.use_begin(), E = F.use_end(); I != E; ++I)
187     if (!isa<Instruction>(*I))
188       ReplacedAllUsers = false;
189     else {
190       CallSite CS = CallSite::get(cast<Instruction>(*I));
191       if (CS.getInstruction() == 0 ||
192           CS.getCalledFunction() != &F) {
193         ReplacedAllUsers = false;
194       } else {
195         Instruction *Call = CS.getInstruction();
196         if (!Call->use_empty()) {
197           if (RetVals.size() == 1)
198             Call->replaceAllUsesWith(RetVals[0]);
199           else {
200             for(Value::use_iterator CUI = Call->use_begin(), CUE = Call->use_end();
201                 CUI != CUE; ++CUI) {
202               GetResultInst *GR = cast<GetResultInst>(CUI);
203               if (RetVals[GR->getIndex()]) {
204                 GR->replaceAllUsesWith(RetVals[GR->getIndex()]);
205                 GR->eraseFromParent();
206               }
207             }
208           }
209           MadeChange = true;
210         }
211       }
212     }
213
214   // If we replace all users with the returned constant, and there can be no
215   // other callers of the function, replace the constant being returned in the
216   // function with an undef value.
217   if (ReplacedAllUsers && F.hasInternalLinkage()) {
218     for (Function::iterator BB = F.begin(), E = F.end(); BB != E; ++BB) {
219       if (ReturnInst *RI = dyn_cast<ReturnInst>(BB->getTerminator())) {
220         for (unsigned i = 0, e = RetVals.size(); i < e; ++i) {
221           Value *RetVal = RetVals[i];
222           if (isa<UndefValue>(RetVal))
223             continue;
224           Value *RV = UndefValue::get(RetVal->getType());
225           if (RI->getOperand(i) != RV) {
226             RI->setOperand(i, RV);
227             MadeChange = true;
228           }
229         }
230       }
231     }
232   }
233
234   if (MadeChange) ++NumReturnValProped;
235   return MadeChange;
236 }