Fix PR7272 in -tailcallelim instead of the inliner
[oota-llvm.git] / lib / Transforms / Utils / InlineFunction.cpp
1 //===- InlineFunction.cpp - Code to perform function inlining -------------===//
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 inlining of a function into a call site, resolving
11 // parameters and the return value as appropriate.
12 //
13 //===----------------------------------------------------------------------===//
14
15 #include "llvm/Transforms/Utils/Cloning.h"
16 #include "llvm/ADT/SmallVector.h"
17 #include "llvm/ADT/StringExtras.h"
18 #include "llvm/Analysis/CallGraph.h"
19 #include "llvm/Analysis/InstructionSimplify.h"
20 #include "llvm/IR/Attributes.h"
21 #include "llvm/IR/CallSite.h"
22 #include "llvm/IR/Constants.h"
23 #include "llvm/IR/DataLayout.h"
24 #include "llvm/IR/DebugInfo.h"
25 #include "llvm/IR/DerivedTypes.h"
26 #include "llvm/IR/IRBuilder.h"
27 #include "llvm/IR/Instructions.h"
28 #include "llvm/IR/IntrinsicInst.h"
29 #include "llvm/IR/Intrinsics.h"
30 #include "llvm/IR/Module.h"
31 #include "llvm/Transforms/Utils/Local.h"
32 using namespace llvm;
33
34 bool llvm::InlineFunction(CallInst *CI, InlineFunctionInfo &IFI,
35                           bool InsertLifetime) {
36   return InlineFunction(CallSite(CI), IFI, InsertLifetime);
37 }
38 bool llvm::InlineFunction(InvokeInst *II, InlineFunctionInfo &IFI,
39                           bool InsertLifetime) {
40   return InlineFunction(CallSite(II), IFI, InsertLifetime);
41 }
42
43 namespace {
44   /// A class for recording information about inlining through an invoke.
45   class InvokeInliningInfo {
46     BasicBlock *OuterResumeDest; ///< Destination of the invoke's unwind.
47     BasicBlock *InnerResumeDest; ///< Destination for the callee's resume.
48     LandingPadInst *CallerLPad;  ///< LandingPadInst associated with the invoke.
49     PHINode *InnerEHValuesPHI;   ///< PHI for EH values from landingpad insts.
50     SmallVector<Value*, 8> UnwindDestPHIValues;
51
52   public:
53     InvokeInliningInfo(InvokeInst *II)
54       : OuterResumeDest(II->getUnwindDest()), InnerResumeDest(0),
55         CallerLPad(0), InnerEHValuesPHI(0) {
56       // If there are PHI nodes in the unwind destination block, we need to keep
57       // track of which values came into them from the invoke before removing
58       // the edge from this block.
59       llvm::BasicBlock *InvokeBB = II->getParent();
60       BasicBlock::iterator I = OuterResumeDest->begin();
61       for (; isa<PHINode>(I); ++I) {
62         // Save the value to use for this edge.
63         PHINode *PHI = cast<PHINode>(I);
64         UnwindDestPHIValues.push_back(PHI->getIncomingValueForBlock(InvokeBB));
65       }
66
67       CallerLPad = cast<LandingPadInst>(I);
68     }
69
70     /// getOuterResumeDest - The outer unwind destination is the target of
71     /// unwind edges introduced for calls within the inlined function.
72     BasicBlock *getOuterResumeDest() const {
73       return OuterResumeDest;
74     }
75
76     BasicBlock *getInnerResumeDest();
77
78     LandingPadInst *getLandingPadInst() const { return CallerLPad; }
79
80     /// forwardResume - Forward the 'resume' instruction to the caller's landing
81     /// pad block. When the landing pad block has only one predecessor, this is
82     /// a simple branch. When there is more than one predecessor, we need to
83     /// split the landing pad block after the landingpad instruction and jump
84     /// to there.
85     void forwardResume(ResumeInst *RI,
86                        SmallPtrSet<LandingPadInst*, 16> &InlinedLPads);
87
88     /// addIncomingPHIValuesFor - Add incoming-PHI values to the unwind
89     /// destination block for the given basic block, using the values for the
90     /// original invoke's source block.
91     void addIncomingPHIValuesFor(BasicBlock *BB) const {
92       addIncomingPHIValuesForInto(BB, OuterResumeDest);
93     }
94
95     void addIncomingPHIValuesForInto(BasicBlock *src, BasicBlock *dest) const {
96       BasicBlock::iterator I = dest->begin();
97       for (unsigned i = 0, e = UnwindDestPHIValues.size(); i != e; ++i, ++I) {
98         PHINode *phi = cast<PHINode>(I);
99         phi->addIncoming(UnwindDestPHIValues[i], src);
100       }
101     }
102   };
103 }
104
105 /// getInnerResumeDest - Get or create a target for the branch from ResumeInsts.
106 BasicBlock *InvokeInliningInfo::getInnerResumeDest() {
107   if (InnerResumeDest) return InnerResumeDest;
108
109   // Split the landing pad.
110   BasicBlock::iterator SplitPoint = CallerLPad; ++SplitPoint;
111   InnerResumeDest =
112     OuterResumeDest->splitBasicBlock(SplitPoint,
113                                      OuterResumeDest->getName() + ".body");
114
115   // The number of incoming edges we expect to the inner landing pad.
116   const unsigned PHICapacity = 2;
117
118   // Create corresponding new PHIs for all the PHIs in the outer landing pad.
119   BasicBlock::iterator InsertPoint = InnerResumeDest->begin();
120   BasicBlock::iterator I = OuterResumeDest->begin();
121   for (unsigned i = 0, e = UnwindDestPHIValues.size(); i != e; ++i, ++I) {
122     PHINode *OuterPHI = cast<PHINode>(I);
123     PHINode *InnerPHI = PHINode::Create(OuterPHI->getType(), PHICapacity,
124                                         OuterPHI->getName() + ".lpad-body",
125                                         InsertPoint);
126     OuterPHI->replaceAllUsesWith(InnerPHI);
127     InnerPHI->addIncoming(OuterPHI, OuterResumeDest);
128   }
129
130   // Create a PHI for the exception values.
131   InnerEHValuesPHI = PHINode::Create(CallerLPad->getType(), PHICapacity,
132                                      "eh.lpad-body", InsertPoint);
133   CallerLPad->replaceAllUsesWith(InnerEHValuesPHI);
134   InnerEHValuesPHI->addIncoming(CallerLPad, OuterResumeDest);
135
136   // All done.
137   return InnerResumeDest;
138 }
139
140 /// forwardResume - Forward the 'resume' instruction to the caller's landing pad
141 /// block. When the landing pad block has only one predecessor, this is a simple
142 /// branch. When there is more than one predecessor, we need to split the
143 /// landing pad block after the landingpad instruction and jump to there.
144 void InvokeInliningInfo::forwardResume(ResumeInst *RI,
145                                SmallPtrSet<LandingPadInst*, 16> &InlinedLPads) {
146   BasicBlock *Dest = getInnerResumeDest();
147   BasicBlock *Src = RI->getParent();
148
149   BranchInst::Create(Dest, Src);
150
151   // Update the PHIs in the destination. They were inserted in an order which
152   // makes this work.
153   addIncomingPHIValuesForInto(Src, Dest);
154
155   InnerEHValuesPHI->addIncoming(RI->getOperand(0), Src);
156   RI->eraseFromParent();
157 }
158
159 /// HandleCallsInBlockInlinedThroughInvoke - When we inline a basic block into
160 /// an invoke, we have to turn all of the calls that can throw into
161 /// invokes.  This function analyze BB to see if there are any calls, and if so,
162 /// it rewrites them to be invokes that jump to InvokeDest and fills in the PHI
163 /// nodes in that block with the values specified in InvokeDestPHIValues.
164 static void HandleCallsInBlockInlinedThroughInvoke(BasicBlock *BB,
165                                                    InvokeInliningInfo &Invoke) {
166   for (BasicBlock::iterator BBI = BB->begin(), E = BB->end(); BBI != E; ) {
167     Instruction *I = BBI++;
168
169     // We only need to check for function calls: inlined invoke
170     // instructions require no special handling.
171     CallInst *CI = dyn_cast<CallInst>(I);
172
173     // If this call cannot unwind, don't convert it to an invoke.
174     // Inline asm calls cannot throw.
175     if (!CI || CI->doesNotThrow() || isa<InlineAsm>(CI->getCalledValue()))
176       continue;
177
178     // Convert this function call into an invoke instruction.  First, split the
179     // basic block.
180     BasicBlock *Split = BB->splitBasicBlock(CI, CI->getName()+".noexc");
181
182     // Delete the unconditional branch inserted by splitBasicBlock
183     BB->getInstList().pop_back();
184
185     // Create the new invoke instruction.
186     ImmutableCallSite CS(CI);
187     SmallVector<Value*, 8> InvokeArgs(CS.arg_begin(), CS.arg_end());
188     InvokeInst *II = InvokeInst::Create(CI->getCalledValue(), Split,
189                                         Invoke.getOuterResumeDest(),
190                                         InvokeArgs, CI->getName(), BB);
191     II->setCallingConv(CI->getCallingConv());
192     II->setAttributes(CI->getAttributes());
193     
194     // Make sure that anything using the call now uses the invoke!  This also
195     // updates the CallGraph if present, because it uses a WeakVH.
196     CI->replaceAllUsesWith(II);
197
198     // Delete the original call
199     Split->getInstList().pop_front();
200
201     // Update any PHI nodes in the exceptional block to indicate that there is
202     // now a new entry in them.
203     Invoke.addIncomingPHIValuesFor(BB);
204     return;
205   }
206 }
207
208 /// HandleInlinedInvoke - If we inlined an invoke site, we need to convert calls
209 /// in the body of the inlined function into invokes.
210 ///
211 /// II is the invoke instruction being inlined.  FirstNewBlock is the first
212 /// block of the inlined code (the last block is the end of the function),
213 /// and InlineCodeInfo is information about the code that got inlined.
214 static void HandleInlinedInvoke(InvokeInst *II, BasicBlock *FirstNewBlock,
215                                 ClonedCodeInfo &InlinedCodeInfo) {
216   BasicBlock *InvokeDest = II->getUnwindDest();
217
218   Function *Caller = FirstNewBlock->getParent();
219
220   // The inlined code is currently at the end of the function, scan from the
221   // start of the inlined code to its end, checking for stuff we need to
222   // rewrite.
223   InvokeInliningInfo Invoke(II);
224
225   // Get all of the inlined landing pad instructions.
226   SmallPtrSet<LandingPadInst*, 16> InlinedLPads;
227   for (Function::iterator I = FirstNewBlock, E = Caller->end(); I != E; ++I)
228     if (InvokeInst *II = dyn_cast<InvokeInst>(I->getTerminator()))
229       InlinedLPads.insert(II->getLandingPadInst());
230
231   // Append the clauses from the outer landing pad instruction into the inlined
232   // landing pad instructions.
233   LandingPadInst *OuterLPad = Invoke.getLandingPadInst();
234   for (SmallPtrSet<LandingPadInst*, 16>::iterator I = InlinedLPads.begin(),
235          E = InlinedLPads.end(); I != E; ++I) {
236     LandingPadInst *InlinedLPad = *I;
237     unsigned OuterNum = OuterLPad->getNumClauses();
238     InlinedLPad->reserveClauses(OuterNum);
239     for (unsigned OuterIdx = 0; OuterIdx != OuterNum; ++OuterIdx)
240       InlinedLPad->addClause(OuterLPad->getClause(OuterIdx));
241     if (OuterLPad->isCleanup())
242       InlinedLPad->setCleanup(true);
243   }
244
245   for (Function::iterator BB = FirstNewBlock, E = Caller->end(); BB != E; ++BB){
246     if (InlinedCodeInfo.ContainsCalls)
247       HandleCallsInBlockInlinedThroughInvoke(BB, Invoke);
248
249     // Forward any resumes that are remaining here.
250     if (ResumeInst *RI = dyn_cast<ResumeInst>(BB->getTerminator()))
251       Invoke.forwardResume(RI, InlinedLPads);
252   }
253
254   // Now that everything is happy, we have one final detail.  The PHI nodes in
255   // the exception destination block still have entries due to the original
256   // invoke instruction. Eliminate these entries (which might even delete the
257   // PHI node) now.
258   InvokeDest->removePredecessor(II->getParent());
259 }
260
261 /// UpdateCallGraphAfterInlining - Once we have cloned code over from a callee
262 /// into the caller, update the specified callgraph to reflect the changes we
263 /// made.  Note that it's possible that not all code was copied over, so only
264 /// some edges of the callgraph may remain.
265 static void UpdateCallGraphAfterInlining(CallSite CS,
266                                          Function::iterator FirstNewBlock,
267                                          ValueToValueMapTy &VMap,
268                                          InlineFunctionInfo &IFI) {
269   CallGraph &CG = *IFI.CG;
270   const Function *Caller = CS.getInstruction()->getParent()->getParent();
271   const Function *Callee = CS.getCalledFunction();
272   CallGraphNode *CalleeNode = CG[Callee];
273   CallGraphNode *CallerNode = CG[Caller];
274
275   // Since we inlined some uninlined call sites in the callee into the caller,
276   // add edges from the caller to all of the callees of the callee.
277   CallGraphNode::iterator I = CalleeNode->begin(), E = CalleeNode->end();
278
279   // Consider the case where CalleeNode == CallerNode.
280   CallGraphNode::CalledFunctionsVector CallCache;
281   if (CalleeNode == CallerNode) {
282     CallCache.assign(I, E);
283     I = CallCache.begin();
284     E = CallCache.end();
285   }
286
287   for (; I != E; ++I) {
288     const Value *OrigCall = I->first;
289
290     ValueToValueMapTy::iterator VMI = VMap.find(OrigCall);
291     // Only copy the edge if the call was inlined!
292     if (VMI == VMap.end() || VMI->second == 0)
293       continue;
294     
295     // If the call was inlined, but then constant folded, there is no edge to
296     // add.  Check for this case.
297     Instruction *NewCall = dyn_cast<Instruction>(VMI->second);
298     if (NewCall == 0) continue;
299
300     // Remember that this call site got inlined for the client of
301     // InlineFunction.
302     IFI.InlinedCalls.push_back(NewCall);
303
304     // It's possible that inlining the callsite will cause it to go from an
305     // indirect to a direct call by resolving a function pointer.  If this
306     // happens, set the callee of the new call site to a more precise
307     // destination.  This can also happen if the call graph node of the caller
308     // was just unnecessarily imprecise.
309     if (I->second->getFunction() == 0)
310       if (Function *F = CallSite(NewCall).getCalledFunction()) {
311         // Indirect call site resolved to direct call.
312         CallerNode->addCalledFunction(CallSite(NewCall), CG[F]);
313
314         continue;
315       }
316
317     CallerNode->addCalledFunction(CallSite(NewCall), I->second);
318   }
319   
320   // Update the call graph by deleting the edge from Callee to Caller.  We must
321   // do this after the loop above in case Caller and Callee are the same.
322   CallerNode->removeCallEdgeFor(CS);
323 }
324
325 static void HandleByValArgumentInit(Value *Dst, Value *Src, Module *M,
326                                     BasicBlock *InsertBlock,
327                                     InlineFunctionInfo &IFI) {
328   LLVMContext &Context = Src->getContext();
329   Type *VoidPtrTy = Type::getInt8PtrTy(Context);
330   Type *AggTy = cast<PointerType>(Src->getType())->getElementType();
331   Type *Tys[3] = { VoidPtrTy, VoidPtrTy, Type::getInt64Ty(Context) };
332   Function *MemCpyFn = Intrinsic::getDeclaration(M, Intrinsic::memcpy, Tys);
333   IRBuilder<> builder(InsertBlock->begin());
334   Value *DstCast = builder.CreateBitCast(Dst, VoidPtrTy, "tmp");
335   Value *SrcCast = builder.CreateBitCast(Src, VoidPtrTy, "tmp");
336
337   Value *Size;
338   if (IFI.DL == 0)
339     Size = ConstantExpr::getSizeOf(AggTy);
340   else
341     Size = ConstantInt::get(Type::getInt64Ty(Context),
342                             IFI.DL->getTypeStoreSize(AggTy));
343
344   // Always generate a memcpy of alignment 1 here because we don't know
345   // the alignment of the src pointer.  Other optimizations can infer
346   // better alignment.
347   Value *CallArgs[] = {
348     DstCast, SrcCast, Size,
349     ConstantInt::get(Type::getInt32Ty(Context), 1),
350     ConstantInt::getFalse(Context) // isVolatile
351   };
352   builder.CreateCall(MemCpyFn, CallArgs);
353 }
354
355 /// HandleByValArgument - When inlining a call site that has a byval argument,
356 /// we have to make the implicit memcpy explicit by adding it.
357 static Value *HandleByValArgument(Value *Arg, Instruction *TheCall,
358                                   const Function *CalledFunc,
359                                   InlineFunctionInfo &IFI,
360                                   unsigned ByValAlignment) {
361   Type *AggTy = cast<PointerType>(Arg->getType())->getElementType();
362
363   // If the called function is readonly, then it could not mutate the caller's
364   // copy of the byval'd memory.  In this case, it is safe to elide the copy and
365   // temporary.
366   if (CalledFunc->onlyReadsMemory()) {
367     // If the byval argument has a specified alignment that is greater than the
368     // passed in pointer, then we either have to round up the input pointer or
369     // give up on this transformation.
370     if (ByValAlignment <= 1)  // 0 = unspecified, 1 = no particular alignment.
371       return Arg;
372
373     // If the pointer is already known to be sufficiently aligned, or if we can
374     // round it up to a larger alignment, then we don't need a temporary.
375     if (getOrEnforceKnownAlignment(Arg, ByValAlignment,
376                                    IFI.DL) >= ByValAlignment)
377       return Arg;
378     
379     // Otherwise, we have to make a memcpy to get a safe alignment.  This is bad
380     // for code quality, but rarely happens and is required for correctness.
381   }
382
383   // Create the alloca.  If we have DataLayout, use nice alignment.
384   unsigned Align = 1;
385   if (IFI.DL)
386     Align = IFI.DL->getPrefTypeAlignment(AggTy);
387   
388   // If the byval had an alignment specified, we *must* use at least that
389   // alignment, as it is required by the byval argument (and uses of the
390   // pointer inside the callee).
391   Align = std::max(Align, ByValAlignment);
392   
393   Function *Caller = TheCall->getParent()->getParent(); 
394   
395   Value *NewAlloca = new AllocaInst(AggTy, 0, Align, Arg->getName(), 
396                                     &*Caller->begin()->begin());
397   IFI.StaticAllocas.push_back(cast<AllocaInst>(NewAlloca));
398   
399   // Uses of the argument in the function should use our new alloca
400   // instead.
401   return NewAlloca;
402 }
403
404 // isUsedByLifetimeMarker - Check whether this Value is used by a lifetime
405 // intrinsic.
406 static bool isUsedByLifetimeMarker(Value *V) {
407   for (User *U : V->users()) {
408     if (IntrinsicInst *II = dyn_cast<IntrinsicInst>(U)) {
409       switch (II->getIntrinsicID()) {
410       default: break;
411       case Intrinsic::lifetime_start:
412       case Intrinsic::lifetime_end:
413         return true;
414       }
415     }
416   }
417   return false;
418 }
419
420 // hasLifetimeMarkers - Check whether the given alloca already has
421 // lifetime.start or lifetime.end intrinsics.
422 static bool hasLifetimeMarkers(AllocaInst *AI) {
423   Type *Int8PtrTy = Type::getInt8PtrTy(AI->getType()->getContext());
424   if (AI->getType() == Int8PtrTy)
425     return isUsedByLifetimeMarker(AI);
426
427   // Do a scan to find all the casts to i8*.
428   for (User *U : AI->users()) {
429     if (U->getType() != Int8PtrTy) continue;
430     if (U->stripPointerCasts() != AI) continue;
431     if (isUsedByLifetimeMarker(U))
432       return true;
433   }
434   return false;
435 }
436
437 /// updateInlinedAtInfo - Helper function used by fixupLineNumbers to
438 /// recursively update InlinedAtEntry of a DebugLoc.
439 static DebugLoc updateInlinedAtInfo(const DebugLoc &DL, 
440                                     const DebugLoc &InlinedAtDL,
441                                     LLVMContext &Ctx) {
442   if (MDNode *IA = DL.getInlinedAt(Ctx)) {
443     DebugLoc NewInlinedAtDL 
444       = updateInlinedAtInfo(DebugLoc::getFromDILocation(IA), InlinedAtDL, Ctx);
445     return DebugLoc::get(DL.getLine(), DL.getCol(), DL.getScope(Ctx),
446                          NewInlinedAtDL.getAsMDNode(Ctx));
447   }
448
449   return DebugLoc::get(DL.getLine(), DL.getCol(), DL.getScope(Ctx),
450                        InlinedAtDL.getAsMDNode(Ctx));
451 }
452
453 /// fixupLineNumbers - Update inlined instructions' line numbers to 
454 /// to encode location where these instructions are inlined.
455 static void fixupLineNumbers(Function *Fn, Function::iterator FI,
456                              Instruction *TheCall) {
457   DebugLoc TheCallDL = TheCall->getDebugLoc();
458   if (TheCallDL.isUnknown())
459     return;
460
461   for (; FI != Fn->end(); ++FI) {
462     for (BasicBlock::iterator BI = FI->begin(), BE = FI->end();
463          BI != BE; ++BI) {
464       DebugLoc DL = BI->getDebugLoc();
465       if (!DL.isUnknown()) {
466         BI->setDebugLoc(updateInlinedAtInfo(DL, TheCallDL, BI->getContext()));
467         if (DbgValueInst *DVI = dyn_cast<DbgValueInst>(BI)) {
468           LLVMContext &Ctx = BI->getContext();
469           MDNode *InlinedAt = BI->getDebugLoc().getInlinedAt(Ctx);
470           DVI->setOperand(2, createInlinedVariable(DVI->getVariable(), 
471                                                    InlinedAt, Ctx));
472         }
473       }
474     }
475   }
476 }
477
478 /// InlineFunction - This function inlines the called function into the basic
479 /// block of the caller.  This returns false if it is not possible to inline
480 /// this call.  The program is still in a well defined state if this occurs
481 /// though.
482 ///
483 /// Note that this only does one level of inlining.  For example, if the
484 /// instruction 'call B' is inlined, and 'B' calls 'C', then the call to 'C' now
485 /// exists in the instruction stream.  Similarly this will inline a recursive
486 /// function by one level.
487 bool llvm::InlineFunction(CallSite CS, InlineFunctionInfo &IFI,
488                           bool InsertLifetime) {
489   Instruction *TheCall = CS.getInstruction();
490   assert(TheCall->getParent() && TheCall->getParent()->getParent() &&
491          "Instruction not in function!");
492
493   // If IFI has any state in it, zap it before we fill it in.
494   IFI.reset();
495   
496   const Function *CalledFunc = CS.getCalledFunction();
497   if (CalledFunc == 0 ||          // Can't inline external function or indirect
498       CalledFunc->isDeclaration() || // call, or call to a vararg function!
499       CalledFunc->getFunctionType()->isVarArg()) return false;
500
501   // If the call to the callee is not a tail call, we must clear the 'tail'
502   // flags on any calls that we inline.
503   bool MustClearTailCallFlags =
504     !(isa<CallInst>(TheCall) && cast<CallInst>(TheCall)->isTailCall());
505
506   // If the call to the callee cannot throw, set the 'nounwind' flag on any
507   // calls that we inline.
508   bool MarkNoUnwind = CS.doesNotThrow();
509
510   BasicBlock *OrigBB = TheCall->getParent();
511   Function *Caller = OrigBB->getParent();
512
513   // GC poses two hazards to inlining, which only occur when the callee has GC:
514   //  1. If the caller has no GC, then the callee's GC must be propagated to the
515   //     caller.
516   //  2. If the caller has a differing GC, it is invalid to inline.
517   if (CalledFunc->hasGC()) {
518     if (!Caller->hasGC())
519       Caller->setGC(CalledFunc->getGC());
520     else if (CalledFunc->getGC() != Caller->getGC())
521       return false;
522   }
523
524   // Get the personality function from the callee if it contains a landing pad.
525   Value *CalleePersonality = 0;
526   for (Function::const_iterator I = CalledFunc->begin(), E = CalledFunc->end();
527        I != E; ++I)
528     if (const InvokeInst *II = dyn_cast<InvokeInst>(I->getTerminator())) {
529       const BasicBlock *BB = II->getUnwindDest();
530       const LandingPadInst *LP = BB->getLandingPadInst();
531       CalleePersonality = LP->getPersonalityFn();
532       break;
533     }
534
535   // Find the personality function used by the landing pads of the caller. If it
536   // exists, then check to see that it matches the personality function used in
537   // the callee.
538   if (CalleePersonality) {
539     for (Function::const_iterator I = Caller->begin(), E = Caller->end();
540          I != E; ++I)
541       if (const InvokeInst *II = dyn_cast<InvokeInst>(I->getTerminator())) {
542         const BasicBlock *BB = II->getUnwindDest();
543         const LandingPadInst *LP = BB->getLandingPadInst();
544
545         // If the personality functions match, then we can perform the
546         // inlining. Otherwise, we can't inline.
547         // TODO: This isn't 100% true. Some personality functions are proper
548         //       supersets of others and can be used in place of the other.
549         if (LP->getPersonalityFn() != CalleePersonality)
550           return false;
551
552         break;
553       }
554   }
555
556   // Get an iterator to the last basic block in the function, which will have
557   // the new function inlined after it.
558   Function::iterator LastBlock = &Caller->back();
559
560   // Make sure to capture all of the return instructions from the cloned
561   // function.
562   SmallVector<ReturnInst*, 8> Returns;
563   ClonedCodeInfo InlinedFunctionInfo;
564   Function::iterator FirstNewBlock;
565
566   { // Scope to destroy VMap after cloning.
567     ValueToValueMapTy VMap;
568     // Keep a list of pair (dst, src) to emit byval initializations.
569     SmallVector<std::pair<Value*, Value*>, 4> ByValInit;
570
571     assert(CalledFunc->arg_size() == CS.arg_size() &&
572            "No varargs calls can be inlined!");
573
574     // Calculate the vector of arguments to pass into the function cloner, which
575     // matches up the formal to the actual argument values.
576     CallSite::arg_iterator AI = CS.arg_begin();
577     unsigned ArgNo = 0;
578     for (Function::const_arg_iterator I = CalledFunc->arg_begin(),
579          E = CalledFunc->arg_end(); I != E; ++I, ++AI, ++ArgNo) {
580       Value *ActualArg = *AI;
581
582       // When byval arguments actually inlined, we need to make the copy implied
583       // by them explicit.  However, we don't do this if the callee is readonly
584       // or readnone, because the copy would be unneeded: the callee doesn't
585       // modify the struct.
586       if (CS.isByValArgument(ArgNo)) {
587         ActualArg = HandleByValArgument(ActualArg, TheCall, CalledFunc, IFI,
588                                         CalledFunc->getParamAlignment(ArgNo+1));
589         if (ActualArg != *AI)
590           ByValInit.push_back(std::make_pair(ActualArg, (Value*) *AI));
591       }
592
593       VMap[I] = ActualArg;
594     }
595
596     // We want the inliner to prune the code as it copies.  We would LOVE to
597     // have no dead or constant instructions leftover after inlining occurs
598     // (which can happen, e.g., because an argument was constant), but we'll be
599     // happy with whatever the cloner can do.
600     CloneAndPruneFunctionInto(Caller, CalledFunc, VMap, 
601                               /*ModuleLevelChanges=*/false, Returns, ".i",
602                               &InlinedFunctionInfo, IFI.DL, TheCall);
603
604     // Remember the first block that is newly cloned over.
605     FirstNewBlock = LastBlock; ++FirstNewBlock;
606
607     // Inject byval arguments initialization.
608     for (std::pair<Value*, Value*> &Init : ByValInit)
609       HandleByValArgumentInit(Init.first, Init.second, Caller->getParent(),
610                               FirstNewBlock, IFI);
611
612     // Update the callgraph if requested.
613     if (IFI.CG)
614       UpdateCallGraphAfterInlining(CS, FirstNewBlock, VMap, IFI);
615
616     // Update inlined instructions' line number information.
617     fixupLineNumbers(Caller, FirstNewBlock, TheCall);
618   }
619
620   // If there are any alloca instructions in the block that used to be the entry
621   // block for the callee, move them to the entry block of the caller.  First
622   // calculate which instruction they should be inserted before.  We insert the
623   // instructions at the end of the current alloca list.
624   {
625     BasicBlock::iterator InsertPoint = Caller->begin()->begin();
626     for (BasicBlock::iterator I = FirstNewBlock->begin(),
627          E = FirstNewBlock->end(); I != E; ) {
628       AllocaInst *AI = dyn_cast<AllocaInst>(I++);
629       if (AI == 0) continue;
630       
631       // If the alloca is now dead, remove it.  This often occurs due to code
632       // specialization.
633       if (AI->use_empty()) {
634         AI->eraseFromParent();
635         continue;
636       }
637
638       if (!isa<Constant>(AI->getArraySize()))
639         continue;
640       
641       // Keep track of the static allocas that we inline into the caller.
642       IFI.StaticAllocas.push_back(AI);
643       
644       // Scan for the block of allocas that we can move over, and move them
645       // all at once.
646       while (isa<AllocaInst>(I) &&
647              isa<Constant>(cast<AllocaInst>(I)->getArraySize())) {
648         IFI.StaticAllocas.push_back(cast<AllocaInst>(I));
649         ++I;
650       }
651
652       // Transfer all of the allocas over in a block.  Using splice means
653       // that the instructions aren't removed from the symbol table, then
654       // reinserted.
655       Caller->getEntryBlock().getInstList().splice(InsertPoint,
656                                                    FirstNewBlock->getInstList(),
657                                                    AI, I);
658     }
659   }
660
661   // Leave lifetime markers for the static alloca's, scoping them to the
662   // function we just inlined.
663   if (InsertLifetime && !IFI.StaticAllocas.empty()) {
664     IRBuilder<> builder(FirstNewBlock->begin());
665     for (unsigned ai = 0, ae = IFI.StaticAllocas.size(); ai != ae; ++ai) {
666       AllocaInst *AI = IFI.StaticAllocas[ai];
667
668       // If the alloca is already scoped to something smaller than the whole
669       // function then there's no need to add redundant, less accurate markers.
670       if (hasLifetimeMarkers(AI))
671         continue;
672
673       // Try to determine the size of the allocation.
674       ConstantInt *AllocaSize = 0;
675       if (ConstantInt *AIArraySize =
676           dyn_cast<ConstantInt>(AI->getArraySize())) {
677         if (IFI.DL) {
678           Type *AllocaType = AI->getAllocatedType();
679           uint64_t AllocaTypeSize = IFI.DL->getTypeAllocSize(AllocaType);
680           uint64_t AllocaArraySize = AIArraySize->getLimitedValue();
681           assert(AllocaArraySize > 0 && "array size of AllocaInst is zero");
682           // Check that array size doesn't saturate uint64_t and doesn't
683           // overflow when it's multiplied by type size.
684           if (AllocaArraySize != ~0ULL &&
685               UINT64_MAX / AllocaArraySize >= AllocaTypeSize) {
686             AllocaSize = ConstantInt::get(Type::getInt64Ty(AI->getContext()),
687                                           AllocaArraySize * AllocaTypeSize);
688           }
689         }
690       }
691
692       builder.CreateLifetimeStart(AI, AllocaSize);
693       for (unsigned ri = 0, re = Returns.size(); ri != re; ++ri) {
694         IRBuilder<> builder(Returns[ri]);
695         builder.CreateLifetimeEnd(AI, AllocaSize);
696       }
697     }
698   }
699
700   // If the inlined code contained dynamic alloca instructions, wrap the inlined
701   // code with llvm.stacksave/llvm.stackrestore intrinsics.
702   if (InlinedFunctionInfo.ContainsDynamicAllocas) {
703     Module *M = Caller->getParent();
704     // Get the two intrinsics we care about.
705     Function *StackSave = Intrinsic::getDeclaration(M, Intrinsic::stacksave);
706     Function *StackRestore=Intrinsic::getDeclaration(M,Intrinsic::stackrestore);
707
708     // Insert the llvm.stacksave.
709     CallInst *SavedPtr = IRBuilder<>(FirstNewBlock, FirstNewBlock->begin())
710       .CreateCall(StackSave, "savedstack");
711
712     // Insert a call to llvm.stackrestore before any return instructions in the
713     // inlined function.
714     for (unsigned i = 0, e = Returns.size(); i != e; ++i) {
715       IRBuilder<>(Returns[i]).CreateCall(StackRestore, SavedPtr);
716     }
717   }
718
719   // If we are inlining tail call instruction through a call site that isn't
720   // marked 'tail', we must remove the tail marker for any calls in the inlined
721   // code.  Also, calls inlined through a 'nounwind' call site should be marked
722   // 'nounwind'.
723   if (InlinedFunctionInfo.ContainsCalls &&
724       (MustClearTailCallFlags || MarkNoUnwind)) {
725     for (Function::iterator BB = FirstNewBlock, E = Caller->end();
726          BB != E; ++BB)
727       for (BasicBlock::iterator I = BB->begin(), E = BB->end(); I != E; ++I)
728         if (CallInst *CI = dyn_cast<CallInst>(I)) {
729           if (MustClearTailCallFlags)
730             CI->setTailCall(false);
731           if (MarkNoUnwind)
732             CI->setDoesNotThrow();
733         }
734   }
735
736   // If we are inlining for an invoke instruction, we must make sure to rewrite
737   // any call instructions into invoke instructions.
738   if (InvokeInst *II = dyn_cast<InvokeInst>(TheCall))
739     HandleInlinedInvoke(II, FirstNewBlock, InlinedFunctionInfo);
740
741   // If we cloned in _exactly one_ basic block, and if that block ends in a
742   // return instruction, we splice the body of the inlined callee directly into
743   // the calling basic block.
744   if (Returns.size() == 1 && std::distance(FirstNewBlock, Caller->end()) == 1) {
745     // Move all of the instructions right before the call.
746     OrigBB->getInstList().splice(TheCall, FirstNewBlock->getInstList(),
747                                  FirstNewBlock->begin(), FirstNewBlock->end());
748     // Remove the cloned basic block.
749     Caller->getBasicBlockList().pop_back();
750
751     // If the call site was an invoke instruction, add a branch to the normal
752     // destination.
753     if (InvokeInst *II = dyn_cast<InvokeInst>(TheCall)) {
754       BranchInst *NewBr = BranchInst::Create(II->getNormalDest(), TheCall);
755       NewBr->setDebugLoc(Returns[0]->getDebugLoc());
756     }
757
758     // If the return instruction returned a value, replace uses of the call with
759     // uses of the returned value.
760     if (!TheCall->use_empty()) {
761       ReturnInst *R = Returns[0];
762       if (TheCall == R->getReturnValue())
763         TheCall->replaceAllUsesWith(UndefValue::get(TheCall->getType()));
764       else
765         TheCall->replaceAllUsesWith(R->getReturnValue());
766     }
767     // Since we are now done with the Call/Invoke, we can delete it.
768     TheCall->eraseFromParent();
769
770     // Since we are now done with the return instruction, delete it also.
771     Returns[0]->eraseFromParent();
772
773     // We are now done with the inlining.
774     return true;
775   }
776
777   // Otherwise, we have the normal case, of more than one block to inline or
778   // multiple return sites.
779
780   // We want to clone the entire callee function into the hole between the
781   // "starter" and "ender" blocks.  How we accomplish this depends on whether
782   // this is an invoke instruction or a call instruction.
783   BasicBlock *AfterCallBB;
784   BranchInst *CreatedBranchToNormalDest = NULL;
785   if (InvokeInst *II = dyn_cast<InvokeInst>(TheCall)) {
786
787     // Add an unconditional branch to make this look like the CallInst case...
788     CreatedBranchToNormalDest = BranchInst::Create(II->getNormalDest(), TheCall);
789
790     // Split the basic block.  This guarantees that no PHI nodes will have to be
791     // updated due to new incoming edges, and make the invoke case more
792     // symmetric to the call case.
793     AfterCallBB = OrigBB->splitBasicBlock(CreatedBranchToNormalDest,
794                                           CalledFunc->getName()+".exit");
795
796   } else {  // It's a call
797     // If this is a call instruction, we need to split the basic block that
798     // the call lives in.
799     //
800     AfterCallBB = OrigBB->splitBasicBlock(TheCall,
801                                           CalledFunc->getName()+".exit");
802   }
803
804   // Change the branch that used to go to AfterCallBB to branch to the first
805   // basic block of the inlined function.
806   //
807   TerminatorInst *Br = OrigBB->getTerminator();
808   assert(Br && Br->getOpcode() == Instruction::Br &&
809          "splitBasicBlock broken!");
810   Br->setOperand(0, FirstNewBlock);
811
812
813   // Now that the function is correct, make it a little bit nicer.  In
814   // particular, move the basic blocks inserted from the end of the function
815   // into the space made by splitting the source basic block.
816   Caller->getBasicBlockList().splice(AfterCallBB, Caller->getBasicBlockList(),
817                                      FirstNewBlock, Caller->end());
818
819   // Handle all of the return instructions that we just cloned in, and eliminate
820   // any users of the original call/invoke instruction.
821   Type *RTy = CalledFunc->getReturnType();
822
823   PHINode *PHI = 0;
824   if (Returns.size() > 1) {
825     // The PHI node should go at the front of the new basic block to merge all
826     // possible incoming values.
827     if (!TheCall->use_empty()) {
828       PHI = PHINode::Create(RTy, Returns.size(), TheCall->getName(),
829                             AfterCallBB->begin());
830       // Anything that used the result of the function call should now use the
831       // PHI node as their operand.
832       TheCall->replaceAllUsesWith(PHI);
833     }
834
835     // Loop over all of the return instructions adding entries to the PHI node
836     // as appropriate.
837     if (PHI) {
838       for (unsigned i = 0, e = Returns.size(); i != e; ++i) {
839         ReturnInst *RI = Returns[i];
840         assert(RI->getReturnValue()->getType() == PHI->getType() &&
841                "Ret value not consistent in function!");
842         PHI->addIncoming(RI->getReturnValue(), RI->getParent());
843       }
844     }
845
846
847     // Add a branch to the merge points and remove return instructions.
848     DebugLoc Loc;
849     for (unsigned i = 0, e = Returns.size(); i != e; ++i) {
850       ReturnInst *RI = Returns[i];
851       BranchInst* BI = BranchInst::Create(AfterCallBB, RI);
852       Loc = RI->getDebugLoc();
853       BI->setDebugLoc(Loc);
854       RI->eraseFromParent();
855     }
856     // We need to set the debug location to *somewhere* inside the
857     // inlined function. The line number may be nonsensical, but the
858     // instruction will at least be associated with the right
859     // function.
860     if (CreatedBranchToNormalDest)
861       CreatedBranchToNormalDest->setDebugLoc(Loc);
862   } else if (!Returns.empty()) {
863     // Otherwise, if there is exactly one return value, just replace anything
864     // using the return value of the call with the computed value.
865     if (!TheCall->use_empty()) {
866       if (TheCall == Returns[0]->getReturnValue())
867         TheCall->replaceAllUsesWith(UndefValue::get(TheCall->getType()));
868       else
869         TheCall->replaceAllUsesWith(Returns[0]->getReturnValue());
870     }
871
872     // Update PHI nodes that use the ReturnBB to use the AfterCallBB.
873     BasicBlock *ReturnBB = Returns[0]->getParent();
874     ReturnBB->replaceAllUsesWith(AfterCallBB);
875
876     // Splice the code from the return block into the block that it will return
877     // to, which contains the code that was after the call.
878     AfterCallBB->getInstList().splice(AfterCallBB->begin(),
879                                       ReturnBB->getInstList());
880
881     if (CreatedBranchToNormalDest)
882       CreatedBranchToNormalDest->setDebugLoc(Returns[0]->getDebugLoc());
883
884     // Delete the return instruction now and empty ReturnBB now.
885     Returns[0]->eraseFromParent();
886     ReturnBB->eraseFromParent();
887   } else if (!TheCall->use_empty()) {
888     // No returns, but something is using the return value of the call.  Just
889     // nuke the result.
890     TheCall->replaceAllUsesWith(UndefValue::get(TheCall->getType()));
891   }
892
893   // Since we are now done with the Call/Invoke, we can delete it.
894   TheCall->eraseFromParent();
895
896   // We should always be able to fold the entry block of the function into the
897   // single predecessor of the block...
898   assert(cast<BranchInst>(Br)->isUnconditional() && "splitBasicBlock broken!");
899   BasicBlock *CalleeEntry = cast<BranchInst>(Br)->getSuccessor(0);
900
901   // Splice the code entry block into calling block, right before the
902   // unconditional branch.
903   CalleeEntry->replaceAllUsesWith(OrigBB);  // Update PHI nodes
904   OrigBB->getInstList().splice(Br, CalleeEntry->getInstList());
905
906   // Remove the unconditional branch.
907   OrigBB->getInstList().erase(Br);
908
909   // Now we can remove the CalleeEntry block, which is now empty.
910   Caller->getBasicBlockList().erase(CalleeEntry);
911
912   // If we inserted a phi node, check to see if it has a single value (e.g. all
913   // the entries are the same or undef).  If so, remove the PHI so it doesn't
914   // block other optimizations.
915   if (PHI) {
916     if (Value *V = SimplifyInstruction(PHI, IFI.DL)) {
917       PHI->replaceAllUsesWith(V);
918       PHI->eraseFromParent();
919     }
920   }
921
922   return true;
923 }