1 //===----------------- LoopRotationUtils.cpp -----------------------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 //
9 // This file provides utilities to convert a loop into a loop with bottom test.
10 //
11 //===----------------------------------------------------------------------===//
12 
13 #include "llvm/Transforms/Utils/LoopRotationUtils.h"
14 #include "llvm/ADT/Statistic.h"
15 #include "llvm/Analysis/AssumptionCache.h"
16 #include "llvm/Analysis/CodeMetrics.h"
17 #include "llvm/Analysis/DomTreeUpdater.h"
18 #include "llvm/Analysis/InstructionSimplify.h"
19 #include "llvm/Analysis/LoopInfo.h"
20 #include "llvm/Analysis/MemorySSA.h"
21 #include "llvm/Analysis/MemorySSAUpdater.h"
22 #include "llvm/Analysis/ScalarEvolution.h"
23 #include "llvm/Analysis/ValueTracking.h"
24 #include "llvm/IR/CFG.h"
25 #include "llvm/IR/DebugInfo.h"
26 #include "llvm/IR/Dominators.h"
27 #include "llvm/IR/IntrinsicInst.h"
28 #include "llvm/Support/CommandLine.h"
29 #include "llvm/Support/Debug.h"
30 #include "llvm/Support/raw_ostream.h"
31 #include "llvm/Transforms/Utils/BasicBlockUtils.h"
32 #include "llvm/Transforms/Utils/Cloning.h"
33 #include "llvm/Transforms/Utils/Local.h"
34 #include "llvm/Transforms/Utils/SSAUpdater.h"
35 #include "llvm/Transforms/Utils/ValueMapper.h"
36 using namespace llvm;
37 
38 #define DEBUG_TYPE "loop-rotate"
39 
40 STATISTIC(NumNotRotatedDueToHeaderSize,
41           "Number of loops not rotated due to the header size");
42 STATISTIC(NumInstrsHoisted,
43           "Number of instructions hoisted into loop preheader");
44 STATISTIC(NumInstrsDuplicated,
45           "Number of instructions cloned into loop preheader");
46 STATISTIC(NumRotated, "Number of loops rotated");
47 
48 static cl::opt<bool>
49     MultiRotate("loop-rotate-multi", cl::init(false), cl::Hidden,
50                 cl::desc("Allow loop rotation multiple times in order to reach "
51                          "a better latch exit"));
52 
53 namespace {
54 /// A simple loop rotation transformation.
55 class LoopRotate {
56   const unsigned MaxHeaderSize;
57   LoopInfo *LI;
58   const TargetTransformInfo *TTI;
59   AssumptionCache *AC;
60   DominatorTree *DT;
61   ScalarEvolution *SE;
62   MemorySSAUpdater *MSSAU;
63   const SimplifyQuery &SQ;
64   bool RotationOnly;
65   bool IsUtilMode;
66   bool PrepareForLTO;
67 
68 public:
69   LoopRotate(unsigned MaxHeaderSize, LoopInfo *LI,
70              const TargetTransformInfo *TTI, AssumptionCache *AC,
71              DominatorTree *DT, ScalarEvolution *SE, MemorySSAUpdater *MSSAU,
72              const SimplifyQuery &SQ, bool RotationOnly, bool IsUtilMode,
73              bool PrepareForLTO)
74       : MaxHeaderSize(MaxHeaderSize), LI(LI), TTI(TTI), AC(AC), DT(DT), SE(SE),
75         MSSAU(MSSAU), SQ(SQ), RotationOnly(RotationOnly),
76         IsUtilMode(IsUtilMode), PrepareForLTO(PrepareForLTO) {}
77   bool processLoop(Loop *L);
78 
79 private:
80   bool rotateLoop(Loop *L, bool SimplifiedLatch);
81   bool simplifyLoopLatch(Loop *L);
82 };
83 } // end anonymous namespace
84 
85 /// Insert (K, V) pair into the ValueToValueMap, and verify the key did not
86 /// previously exist in the map, and the value was inserted.
87 static void InsertNewValueIntoMap(ValueToValueMapTy &VM, Value *K, Value *V) {
88   bool Inserted = VM.insert({K, V}).second;
89   assert(Inserted);
90   (void)Inserted;
91 }
92 /// RewriteUsesOfClonedInstructions - We just cloned the instructions from the
93 /// old header into the preheader.  If there were uses of the values produced by
94 /// these instruction that were outside of the loop, we have to insert PHI nodes
95 /// to merge the two values.  Do this now.
96 static void RewriteUsesOfClonedInstructions(BasicBlock *OrigHeader,
97                                             BasicBlock *OrigPreheader,
98                                             ValueToValueMapTy &ValueMap,
99                                             ScalarEvolution *SE,
100                                 SmallVectorImpl<PHINode*> *InsertedPHIs) {
101   // Remove PHI node entries that are no longer live.
102   BasicBlock::iterator I, E = OrigHeader->end();
103   for (I = OrigHeader->begin(); PHINode *PN = dyn_cast<PHINode>(I); ++I)
104     PN->removeIncomingValue(PN->getBasicBlockIndex(OrigPreheader));
105 
106   // Now fix up users of the instructions in OrigHeader, inserting PHI nodes
107   // as necessary.
108   SSAUpdater SSA(InsertedPHIs);
109   for (I = OrigHeader->begin(); I != E; ++I) {
110     Value *OrigHeaderVal = &*I;
111 
112     // If there are no uses of the value (e.g. because it returns void), there
113     // is nothing to rewrite.
114     if (OrigHeaderVal->use_empty())
115       continue;
116 
117     Value *OrigPreHeaderVal = ValueMap.lookup(OrigHeaderVal);
118 
119     // The value now exits in two versions: the initial value in the preheader
120     // and the loop "next" value in the original header.
121     SSA.Initialize(OrigHeaderVal->getType(), OrigHeaderVal->getName());
122     // Force re-computation of OrigHeaderVal, as some users now need to use the
123     // new PHI node.
124     if (SE)
125       SE->forgetValue(OrigHeaderVal);
126     SSA.AddAvailableValue(OrigHeader, OrigHeaderVal);
127     SSA.AddAvailableValue(OrigPreheader, OrigPreHeaderVal);
128 
129     // Visit each use of the OrigHeader instruction.
130     for (Use &U : llvm::make_early_inc_range(OrigHeaderVal->uses())) {
131       // SSAUpdater can't handle a non-PHI use in the same block as an
132       // earlier def. We can easily handle those cases manually.
133       Instruction *UserInst = cast<Instruction>(U.getUser());
134       if (!isa<PHINode>(UserInst)) {
135         BasicBlock *UserBB = UserInst->getParent();
136 
137         // The original users in the OrigHeader are already using the
138         // original definitions.
139         if (UserBB == OrigHeader)
140           continue;
141 
142         // Users in the OrigPreHeader need to use the value to which the
143         // original definitions are mapped.
144         if (UserBB == OrigPreheader) {
145           U = OrigPreHeaderVal;
146           continue;
147         }
148       }
149 
150       // Anything else can be handled by SSAUpdater.
151       SSA.RewriteUse(U);
152     }
153 
154     // Replace MetadataAsValue(ValueAsMetadata(OrigHeaderVal)) uses in debug
155     // intrinsics.
156     SmallVector<DbgValueInst *, 1> DbgValues;
157     llvm::findDbgValues(DbgValues, OrigHeaderVal);
158     for (auto &DbgValue : DbgValues) {
159       // The original users in the OrigHeader are already using the original
160       // definitions.
161       BasicBlock *UserBB = DbgValue->getParent();
162       if (UserBB == OrigHeader)
163         continue;
164 
165       // Users in the OrigPreHeader need to use the value to which the
166       // original definitions are mapped and anything else can be handled by
167       // the SSAUpdater. To avoid adding PHINodes, check if the value is
168       // available in UserBB, if not substitute undef.
169       Value *NewVal;
170       if (UserBB == OrigPreheader)
171         NewVal = OrigPreHeaderVal;
172       else if (SSA.HasValueForBlock(UserBB))
173         NewVal = SSA.GetValueInMiddleOfBlock(UserBB);
174       else
175         NewVal = UndefValue::get(OrigHeaderVal->getType());
176       DbgValue->replaceVariableLocationOp(OrigHeaderVal, NewVal);
177     }
178   }
179 }
180 
181 // Assuming both header and latch are exiting, look for a phi which is only
182 // used outside the loop (via a LCSSA phi) in the exit from the header.
183 // This means that rotating the loop can remove the phi.
184 static bool profitableToRotateLoopExitingLatch(Loop *L) {
185   BasicBlock *Header = L->getHeader();
186   BranchInst *BI = dyn_cast<BranchInst>(Header->getTerminator());
187   assert(BI && BI->isConditional() && "need header with conditional exit");
188   BasicBlock *HeaderExit = BI->getSuccessor(0);
189   if (L->contains(HeaderExit))
190     HeaderExit = BI->getSuccessor(1);
191 
192   for (auto &Phi : Header->phis()) {
193     // Look for uses of this phi in the loop/via exits other than the header.
194     if (llvm::any_of(Phi.users(), [HeaderExit](const User *U) {
195           return cast<Instruction>(U)->getParent() != HeaderExit;
196         }))
197       continue;
198     return true;
199   }
200   return false;
201 }
202 
203 // Check that latch exit is deoptimizing (which means - very unlikely to happen)
204 // and there is another exit from the loop which is non-deoptimizing.
205 // If we rotate latch to that exit our loop has a better chance of being fully
206 // canonical.
207 //
208 // It can give false positives in some rare cases.
209 static bool canRotateDeoptimizingLatchExit(Loop *L) {
210   BasicBlock *Latch = L->getLoopLatch();
211   assert(Latch && "need latch");
212   BranchInst *BI = dyn_cast<BranchInst>(Latch->getTerminator());
213   // Need normal exiting latch.
214   if (!BI || !BI->isConditional())
215     return false;
216 
217   BasicBlock *Exit = BI->getSuccessor(1);
218   if (L->contains(Exit))
219     Exit = BI->getSuccessor(0);
220 
221   // Latch exit is non-deoptimizing, no need to rotate.
222   if (!Exit->getPostdominatingDeoptimizeCall())
223     return false;
224 
225   SmallVector<BasicBlock *, 4> Exits;
226   L->getUniqueExitBlocks(Exits);
227   if (!Exits.empty()) {
228     // There is at least one non-deoptimizing exit.
229     //
230     // Note, that BasicBlock::getPostdominatingDeoptimizeCall is not exact,
231     // as it can conservatively return false for deoptimizing exits with
232     // complex enough control flow down to deoptimize call.
233     //
234     // That means here we can report success for a case where
235     // all exits are deoptimizing but one of them has complex enough
236     // control flow (e.g. with loops).
237     //
238     // That should be a very rare case and false positives for this function
239     // have compile-time effect only.
240     return any_of(Exits, [](const BasicBlock *BB) {
241       return !BB->getPostdominatingDeoptimizeCall();
242     });
243   }
244   return false;
245 }
246 
247 /// Rotate loop LP. Return true if the loop is rotated.
248 ///
249 /// \param SimplifiedLatch is true if the latch was just folded into the final
250 /// loop exit. In this case we may want to rotate even though the new latch is
251 /// now an exiting branch. This rotation would have happened had the latch not
252 /// been simplified. However, if SimplifiedLatch is false, then we avoid
253 /// rotating loops in which the latch exits to avoid excessive or endless
254 /// rotation. LoopRotate should be repeatable and converge to a canonical
255 /// form. This property is satisfied because simplifying the loop latch can only
256 /// happen once across multiple invocations of the LoopRotate pass.
257 ///
258 /// If -loop-rotate-multi is enabled we can do multiple rotations in one go
259 /// so to reach a suitable (non-deoptimizing) exit.
260 bool LoopRotate::rotateLoop(Loop *L, bool SimplifiedLatch) {
261   // If the loop has only one block then there is not much to rotate.
262   if (L->getBlocks().size() == 1)
263     return false;
264 
265   bool Rotated = false;
266   do {
267     BasicBlock *OrigHeader = L->getHeader();
268     BasicBlock *OrigLatch = L->getLoopLatch();
269 
270     BranchInst *BI = dyn_cast<BranchInst>(OrigHeader->getTerminator());
271     if (!BI || BI->isUnconditional())
272       return Rotated;
273 
274     // If the loop header is not one of the loop exiting blocks then
275     // either this loop is already rotated or it is not
276     // suitable for loop rotation transformations.
277     if (!L->isLoopExiting(OrigHeader))
278       return Rotated;
279 
280     // If the loop latch already contains a branch that leaves the loop then the
281     // loop is already rotated.
282     if (!OrigLatch)
283       return Rotated;
284 
285     // Rotate if either the loop latch does *not* exit the loop, or if the loop
286     // latch was just simplified. Or if we think it will be profitable.
287     if (L->isLoopExiting(OrigLatch) && !SimplifiedLatch && IsUtilMode == false &&
288         !profitableToRotateLoopExitingLatch(L) &&
289         !canRotateDeoptimizingLatchExit(L))
290       return Rotated;
291 
292     // Check size of original header and reject loop if it is very big or we can't
293     // duplicate blocks inside it.
294     {
295       SmallPtrSet<const Value *, 32> EphValues;
296       CodeMetrics::collectEphemeralValues(L, AC, EphValues);
297 
298       CodeMetrics Metrics;
299       Metrics.analyzeBasicBlock(OrigHeader, *TTI, EphValues, PrepareForLTO);
300       if (Metrics.notDuplicatable) {
301         LLVM_DEBUG(
302                    dbgs() << "LoopRotation: NOT rotating - contains non-duplicatable"
303                    << " instructions: ";
304                    L->dump());
305         return Rotated;
306       }
307       if (Metrics.convergent) {
308         LLVM_DEBUG(dbgs() << "LoopRotation: NOT rotating - contains convergent "
309                    "instructions: ";
310                    L->dump());
311         return Rotated;
312       }
313       if (!Metrics.NumInsts.isValid()) {
314         LLVM_DEBUG(dbgs() << "LoopRotation: NOT rotating - contains instructions"
315                    " with invalid cost: ";
316                    L->dump());
317         return Rotated;
318       }
319       if (*Metrics.NumInsts.getValue() > MaxHeaderSize) {
320         LLVM_DEBUG(dbgs() << "LoopRotation: NOT rotating - contains "
321                           << Metrics.NumInsts
322                           << " instructions, which is more than the threshold ("
323                           << MaxHeaderSize << " instructions): ";
324                    L->dump());
325         ++NumNotRotatedDueToHeaderSize;
326         return Rotated;
327       }
328 
329       // When preparing for LTO, avoid rotating loops with calls that could be
330       // inlined during the LTO stage.
331       if (PrepareForLTO && Metrics.NumInlineCandidates > 0)
332         return Rotated;
333     }
334 
335     // Now, this loop is suitable for rotation.
336     BasicBlock *OrigPreheader = L->getLoopPreheader();
337 
338     // If the loop could not be converted to canonical form, it must have an
339     // indirectbr in it, just give up.
340     if (!OrigPreheader || !L->hasDedicatedExits())
341       return Rotated;
342 
343     // Anything ScalarEvolution may know about this loop or the PHI nodes
344     // in its header will soon be invalidated. We should also invalidate
345     // all outer loops because insertion and deletion of blocks that happens
346     // during the rotation may violate invariants related to backedge taken
347     // infos in them.
348     if (SE)
349       SE->forgetTopmostLoop(L);
350 
351     LLVM_DEBUG(dbgs() << "LoopRotation: rotating "; L->dump());
352     if (MSSAU && VerifyMemorySSA)
353       MSSAU->getMemorySSA()->verifyMemorySSA();
354 
355     // Find new Loop header. NewHeader is a Header's one and only successor
356     // that is inside loop.  Header's other successor is outside the
357     // loop.  Otherwise loop is not suitable for rotation.
358     BasicBlock *Exit = BI->getSuccessor(0);
359     BasicBlock *NewHeader = BI->getSuccessor(1);
360     if (L->contains(Exit))
361       std::swap(Exit, NewHeader);
362     assert(NewHeader && "Unable to determine new loop header");
363     assert(L->contains(NewHeader) && !L->contains(Exit) &&
364            "Unable to determine loop header and exit blocks");
365 
366     // This code assumes that the new header has exactly one predecessor.
367     // Remove any single-entry PHI nodes in it.
368     assert(NewHeader->getSinglePredecessor() &&
369            "New header doesn't have one pred!");
370     FoldSingleEntryPHINodes(NewHeader);
371 
372     // Begin by walking OrigHeader and populating ValueMap with an entry for
373     // each Instruction.
374     BasicBlock::iterator I = OrigHeader->begin(), E = OrigHeader->end();
375     ValueToValueMapTy ValueMap, ValueMapMSSA;
376 
377     // For PHI nodes, the value available in OldPreHeader is just the
378     // incoming value from OldPreHeader.
379     for (; PHINode *PN = dyn_cast<PHINode>(I); ++I)
380       InsertNewValueIntoMap(ValueMap, PN,
381                             PN->getIncomingValueForBlock(OrigPreheader));
382 
383     // For the rest of the instructions, either hoist to the OrigPreheader if
384     // possible or create a clone in the OldPreHeader if not.
385     Instruction *LoopEntryBranch = OrigPreheader->getTerminator();
386 
387     // Record all debug intrinsics preceding LoopEntryBranch to avoid
388     // duplication.
389     using DbgIntrinsicHash =
390         std::pair<std::pair<hash_code, DILocalVariable *>, DIExpression *>;
391     auto makeHash = [](DbgVariableIntrinsic *D) -> DbgIntrinsicHash {
392       auto VarLocOps = D->location_ops();
393       return {{hash_combine_range(VarLocOps.begin(), VarLocOps.end()),
394                D->getVariable()},
395               D->getExpression()};
396     };
397     SmallDenseSet<DbgIntrinsicHash, 8> DbgIntrinsics;
398     for (Instruction &I : llvm::drop_begin(llvm::reverse(*OrigPreheader))) {
399       if (auto *DII = dyn_cast<DbgVariableIntrinsic>(&I))
400         DbgIntrinsics.insert(makeHash(DII));
401       else
402         break;
403     }
404 
405     // Remember the local noalias scope declarations in the header. After the
406     // rotation, they must be duplicated and the scope must be cloned. This
407     // avoids unwanted interaction across iterations.
408     SmallVector<NoAliasScopeDeclInst *, 6> NoAliasDeclInstructions;
409     for (Instruction &I : *OrigHeader)
410       if (auto *Decl = dyn_cast<NoAliasScopeDeclInst>(&I))
411         NoAliasDeclInstructions.push_back(Decl);
412 
413     while (I != E) {
414       Instruction *Inst = &*I++;
415 
416       // If the instruction's operands are invariant and it doesn't read or write
417       // memory, then it is safe to hoist.  Doing this doesn't change the order of
418       // execution in the preheader, but does prevent the instruction from
419       // executing in each iteration of the loop.  This means it is safe to hoist
420       // something that might trap, but isn't safe to hoist something that reads
421       // memory (without proving that the loop doesn't write).
422       if (L->hasLoopInvariantOperands(Inst) && !Inst->mayReadFromMemory() &&
423           !Inst->mayWriteToMemory() && !Inst->isTerminator() &&
424           !isa<DbgInfoIntrinsic>(Inst) && !isa<AllocaInst>(Inst)) {
425         Inst->moveBefore(LoopEntryBranch);
426         ++NumInstrsHoisted;
427         continue;
428       }
429 
430       // Otherwise, create a duplicate of the instruction.
431       Instruction *C = Inst->clone();
432       ++NumInstrsDuplicated;
433 
434       // Eagerly remap the operands of the instruction.
435       RemapInstruction(C, ValueMap,
436                        RF_NoModuleLevelChanges | RF_IgnoreMissingLocals);
437 
438       // Avoid inserting the same intrinsic twice.
439       if (auto *DII = dyn_cast<DbgVariableIntrinsic>(C))
440         if (DbgIntrinsics.count(makeHash(DII))) {
441           C->deleteValue();
442           continue;
443         }
444 
445       // With the operands remapped, see if the instruction constant folds or is
446       // otherwise simplifyable.  This commonly occurs because the entry from PHI
447       // nodes allows icmps and other instructions to fold.
448       Value *V = simplifyInstruction(C, SQ);
449       if (V && LI->replacementPreservesLCSSAForm(C, V)) {
450         // If so, then delete the temporary instruction and stick the folded value
451         // in the map.
452         InsertNewValueIntoMap(ValueMap, Inst, V);
453         if (!C->mayHaveSideEffects()) {
454           C->deleteValue();
455           C = nullptr;
456         }
457       } else {
458         InsertNewValueIntoMap(ValueMap, Inst, C);
459       }
460       if (C) {
461         // Otherwise, stick the new instruction into the new block!
462         C->setName(Inst->getName());
463         C->insertBefore(LoopEntryBranch);
464 
465         if (auto *II = dyn_cast<AssumeInst>(C))
466           AC->registerAssumption(II);
467         // MemorySSA cares whether the cloned instruction was inserted or not, and
468         // not whether it can be remapped to a simplified value.
469         if (MSSAU)
470           InsertNewValueIntoMap(ValueMapMSSA, Inst, C);
471       }
472     }
473 
474     if (!NoAliasDeclInstructions.empty()) {
475       // There are noalias scope declarations:
476       // (general):
477       // Original:    OrigPre              { OrigHeader NewHeader ... Latch }
478       // after:      (OrigPre+OrigHeader') { NewHeader ... Latch OrigHeader }
479       //
480       // with D: llvm.experimental.noalias.scope.decl,
481       //      U: !noalias or !alias.scope depending on D
482       //       ... { D U1 U2 }   can transform into:
483       // (0) : ... { D U1 U2 }        // no relevant rotation for this part
484       // (1) : ... D' { U1 U2 D }     // D is part of OrigHeader
485       // (2) : ... D' U1' { U2 D U1 } // D, U1 are part of OrigHeader
486       //
487       // We now want to transform:
488       // (1) -> : ... D' { D U1 U2 D'' }
489       // (2) -> : ... D' U1' { D U2 D'' U1'' }
490       // D: original llvm.experimental.noalias.scope.decl
491       // D', U1': duplicate with replaced scopes
492       // D'', U1'': different duplicate with replaced scopes
493       // This ensures a safe fallback to 'may_alias' introduced by the rotate,
494       // as U1'' and U1' scopes will not be compatible wrt to the local restrict
495 
496       // Clone the llvm.experimental.noalias.decl again for the NewHeader.
497       Instruction *NewHeaderInsertionPoint = &(*NewHeader->getFirstNonPHI());
498       for (NoAliasScopeDeclInst *NAD : NoAliasDeclInstructions) {
499         LLVM_DEBUG(dbgs() << "  Cloning llvm.experimental.noalias.scope.decl:"
500                           << *NAD << "\n");
501         Instruction *NewNAD = NAD->clone();
502         NewNAD->insertBefore(NewHeaderInsertionPoint);
503       }
504 
505       // Scopes must now be duplicated, once for OrigHeader and once for
506       // OrigPreHeader'.
507       {
508         auto &Context = NewHeader->getContext();
509 
510         SmallVector<MDNode *, 8> NoAliasDeclScopes;
511         for (NoAliasScopeDeclInst *NAD : NoAliasDeclInstructions)
512           NoAliasDeclScopes.push_back(NAD->getScopeList());
513 
514         LLVM_DEBUG(dbgs() << "  Updating OrigHeader scopes\n");
515         cloneAndAdaptNoAliasScopes(NoAliasDeclScopes, {OrigHeader}, Context,
516                                    "h.rot");
517         LLVM_DEBUG(OrigHeader->dump());
518 
519         // Keep the compile time impact low by only adapting the inserted block
520         // of instructions in the OrigPreHeader. This might result in slightly
521         // more aliasing between these instructions and those that were already
522         // present, but it will be much faster when the original PreHeader is
523         // large.
524         LLVM_DEBUG(dbgs() << "  Updating part of OrigPreheader scopes\n");
525         auto *FirstDecl =
526             cast<Instruction>(ValueMap[*NoAliasDeclInstructions.begin()]);
527         auto *LastInst = &OrigPreheader->back();
528         cloneAndAdaptNoAliasScopes(NoAliasDeclScopes, FirstDecl, LastInst,
529                                    Context, "pre.rot");
530         LLVM_DEBUG(OrigPreheader->dump());
531 
532         LLVM_DEBUG(dbgs() << "  Updated NewHeader:\n");
533         LLVM_DEBUG(NewHeader->dump());
534       }
535     }
536 
537     // Along with all the other instructions, we just cloned OrigHeader's
538     // terminator into OrigPreHeader. Fix up the PHI nodes in each of OrigHeader's
539     // successors by duplicating their incoming values for OrigHeader.
540     for (BasicBlock *SuccBB : successors(OrigHeader))
541       for (BasicBlock::iterator BI = SuccBB->begin();
542            PHINode *PN = dyn_cast<PHINode>(BI); ++BI)
543         PN->addIncoming(PN->getIncomingValueForBlock(OrigHeader), OrigPreheader);
544 
545     // Now that OrigPreHeader has a clone of OrigHeader's terminator, remove
546     // OrigPreHeader's old terminator (the original branch into the loop), and
547     // remove the corresponding incoming values from the PHI nodes in OrigHeader.
548     LoopEntryBranch->eraseFromParent();
549 
550     // Update MemorySSA before the rewrite call below changes the 1:1
551     // instruction:cloned_instruction_or_value mapping.
552     if (MSSAU) {
553       InsertNewValueIntoMap(ValueMapMSSA, OrigHeader, OrigPreheader);
554       MSSAU->updateForClonedBlockIntoPred(OrigHeader, OrigPreheader,
555                                           ValueMapMSSA);
556     }
557 
558     SmallVector<PHINode*, 2> InsertedPHIs;
559     // If there were any uses of instructions in the duplicated block outside the
560     // loop, update them, inserting PHI nodes as required
561     RewriteUsesOfClonedInstructions(OrigHeader, OrigPreheader, ValueMap, SE,
562                                     &InsertedPHIs);
563 
564     // Attach dbg.value intrinsics to the new phis if that phi uses a value that
565     // previously had debug metadata attached. This keeps the debug info
566     // up-to-date in the loop body.
567     if (!InsertedPHIs.empty())
568       insertDebugValuesForPHIs(OrigHeader, InsertedPHIs);
569 
570     // NewHeader is now the header of the loop.
571     L->moveToHeader(NewHeader);
572     assert(L->getHeader() == NewHeader && "Latch block is our new header");
573 
574     // Inform DT about changes to the CFG.
575     if (DT) {
576       // The OrigPreheader branches to the NewHeader and Exit now. Then, inform
577       // the DT about the removed edge to the OrigHeader (that got removed).
578       SmallVector<DominatorTree::UpdateType, 3> Updates;
579       Updates.push_back({DominatorTree::Insert, OrigPreheader, Exit});
580       Updates.push_back({DominatorTree::Insert, OrigPreheader, NewHeader});
581       Updates.push_back({DominatorTree::Delete, OrigPreheader, OrigHeader});
582 
583       if (MSSAU) {
584         MSSAU->applyUpdates(Updates, *DT, /*UpdateDT=*/true);
585         if (VerifyMemorySSA)
586           MSSAU->getMemorySSA()->verifyMemorySSA();
587       } else {
588         DT->applyUpdates(Updates);
589       }
590     }
591 
592     // At this point, we've finished our major CFG changes.  As part of cloning
593     // the loop into the preheader we've simplified instructions and the
594     // duplicated conditional branch may now be branching on a constant.  If it is
595     // branching on a constant and if that constant means that we enter the loop,
596     // then we fold away the cond branch to an uncond branch.  This simplifies the
597     // loop in cases important for nested loops, and it also means we don't have
598     // to split as many edges.
599     BranchInst *PHBI = cast<BranchInst>(OrigPreheader->getTerminator());
600     assert(PHBI->isConditional() && "Should be clone of BI condbr!");
601     if (!isa<ConstantInt>(PHBI->getCondition()) ||
602         PHBI->getSuccessor(cast<ConstantInt>(PHBI->getCondition())->isZero()) !=
603         NewHeader) {
604       // The conditional branch can't be folded, handle the general case.
605       // Split edges as necessary to preserve LoopSimplify form.
606 
607       // Right now OrigPreHeader has two successors, NewHeader and ExitBlock, and
608       // thus is not a preheader anymore.
609       // Split the edge to form a real preheader.
610       BasicBlock *NewPH = SplitCriticalEdge(
611                                             OrigPreheader, NewHeader,
612                                             CriticalEdgeSplittingOptions(DT, LI, MSSAU).setPreserveLCSSA());
613       NewPH->setName(NewHeader->getName() + ".lr.ph");
614 
615       // Preserve canonical loop form, which means that 'Exit' should have only
616       // one predecessor. Note that Exit could be an exit block for multiple
617       // nested loops, causing both of the edges to now be critical and need to
618       // be split.
619       SmallVector<BasicBlock *, 4> ExitPreds(predecessors(Exit));
620       bool SplitLatchEdge = false;
621       for (BasicBlock *ExitPred : ExitPreds) {
622         // We only need to split loop exit edges.
623         Loop *PredLoop = LI->getLoopFor(ExitPred);
624         if (!PredLoop || PredLoop->contains(Exit) ||
625             ExitPred->getTerminator()->isIndirectTerminator())
626           continue;
627         SplitLatchEdge |= L->getLoopLatch() == ExitPred;
628         BasicBlock *ExitSplit = SplitCriticalEdge(
629                                                   ExitPred, Exit,
630                                                   CriticalEdgeSplittingOptions(DT, LI, MSSAU).setPreserveLCSSA());
631         ExitSplit->moveBefore(Exit);
632       }
633       assert(SplitLatchEdge &&
634              "Despite splitting all preds, failed to split latch exit?");
635       (void)SplitLatchEdge;
636     } else {
637       // We can fold the conditional branch in the preheader, this makes things
638       // simpler. The first step is to remove the extra edge to the Exit block.
639       Exit->removePredecessor(OrigPreheader, true /*preserve LCSSA*/);
640       BranchInst *NewBI = BranchInst::Create(NewHeader, PHBI);
641       NewBI->setDebugLoc(PHBI->getDebugLoc());
642       PHBI->eraseFromParent();
643 
644       // With our CFG finalized, update DomTree if it is available.
645       if (DT) DT->deleteEdge(OrigPreheader, Exit);
646 
647       // Update MSSA too, if available.
648       if (MSSAU)
649         MSSAU->removeEdge(OrigPreheader, Exit);
650     }
651 
652     assert(L->getLoopPreheader() && "Invalid loop preheader after loop rotation");
653     assert(L->getLoopLatch() && "Invalid loop latch after loop rotation");
654 
655     if (MSSAU && VerifyMemorySSA)
656       MSSAU->getMemorySSA()->verifyMemorySSA();
657 
658     // Now that the CFG and DomTree are in a consistent state again, try to merge
659     // the OrigHeader block into OrigLatch.  This will succeed if they are
660     // connected by an unconditional branch.  This is just a cleanup so the
661     // emitted code isn't too gross in this common case.
662     DomTreeUpdater DTU(DT, DomTreeUpdater::UpdateStrategy::Eager);
663     BasicBlock *PredBB = OrigHeader->getUniquePredecessor();
664     bool DidMerge = MergeBlockIntoPredecessor(OrigHeader, &DTU, LI, MSSAU);
665     if (DidMerge)
666       RemoveRedundantDbgInstrs(PredBB);
667 
668     if (MSSAU && VerifyMemorySSA)
669       MSSAU->getMemorySSA()->verifyMemorySSA();
670 
671     LLVM_DEBUG(dbgs() << "LoopRotation: into "; L->dump());
672 
673     ++NumRotated;
674 
675     Rotated = true;
676     SimplifiedLatch = false;
677 
678     // Check that new latch is a deoptimizing exit and then repeat rotation if possible.
679     // Deoptimizing latch exit is not a generally typical case, so we just loop over.
680     // TODO: if it becomes a performance bottleneck extend rotation algorithm
681     // to handle multiple rotations in one go.
682   } while (MultiRotate && canRotateDeoptimizingLatchExit(L));
683 
684 
685   return true;
686 }
687 
688 /// Determine whether the instructions in this range may be safely and cheaply
689 /// speculated. This is not an important enough situation to develop complex
690 /// heuristics. We handle a single arithmetic instruction along with any type
691 /// conversions.
692 static bool shouldSpeculateInstrs(BasicBlock::iterator Begin,
693                                   BasicBlock::iterator End, Loop *L) {
694   bool seenIncrement = false;
695   bool MultiExitLoop = false;
696 
697   if (!L->getExitingBlock())
698     MultiExitLoop = true;
699 
700   for (BasicBlock::iterator I = Begin; I != End; ++I) {
701 
702     if (!isSafeToSpeculativelyExecute(&*I))
703       return false;
704 
705     if (isa<DbgInfoIntrinsic>(I))
706       continue;
707 
708     switch (I->getOpcode()) {
709     default:
710       return false;
711     case Instruction::GetElementPtr:
712       // GEPs are cheap if all indices are constant.
713       if (!cast<GEPOperator>(I)->hasAllConstantIndices())
714         return false;
715       // fall-thru to increment case
716       LLVM_FALLTHROUGH;
717     case Instruction::Add:
718     case Instruction::Sub:
719     case Instruction::And:
720     case Instruction::Or:
721     case Instruction::Xor:
722     case Instruction::Shl:
723     case Instruction::LShr:
724     case Instruction::AShr: {
725       Value *IVOpnd =
726           !isa<Constant>(I->getOperand(0))
727               ? I->getOperand(0)
728               : !isa<Constant>(I->getOperand(1)) ? I->getOperand(1) : nullptr;
729       if (!IVOpnd)
730         return false;
731 
732       // If increment operand is used outside of the loop, this speculation
733       // could cause extra live range interference.
734       if (MultiExitLoop) {
735         for (User *UseI : IVOpnd->users()) {
736           auto *UserInst = cast<Instruction>(UseI);
737           if (!L->contains(UserInst))
738             return false;
739         }
740       }
741 
742       if (seenIncrement)
743         return false;
744       seenIncrement = true;
745       break;
746     }
747     case Instruction::Trunc:
748     case Instruction::ZExt:
749     case Instruction::SExt:
750       // ignore type conversions
751       break;
752     }
753   }
754   return true;
755 }
756 
757 /// Fold the loop tail into the loop exit by speculating the loop tail
758 /// instructions. Typically, this is a single post-increment. In the case of a
759 /// simple 2-block loop, hoisting the increment can be much better than
760 /// duplicating the entire loop header. In the case of loops with early exits,
761 /// rotation will not work anyway, but simplifyLoopLatch will put the loop in
762 /// canonical form so downstream passes can handle it.
763 ///
764 /// I don't believe this invalidates SCEV.
765 bool LoopRotate::simplifyLoopLatch(Loop *L) {
766   BasicBlock *Latch = L->getLoopLatch();
767   if (!Latch || Latch->hasAddressTaken())
768     return false;
769 
770   BranchInst *Jmp = dyn_cast<BranchInst>(Latch->getTerminator());
771   if (!Jmp || !Jmp->isUnconditional())
772     return false;
773 
774   BasicBlock *LastExit = Latch->getSinglePredecessor();
775   if (!LastExit || !L->isLoopExiting(LastExit))
776     return false;
777 
778   BranchInst *BI = dyn_cast<BranchInst>(LastExit->getTerminator());
779   if (!BI)
780     return false;
781 
782   if (!shouldSpeculateInstrs(Latch->begin(), Jmp->getIterator(), L))
783     return false;
784 
785   LLVM_DEBUG(dbgs() << "Folding loop latch " << Latch->getName() << " into "
786                     << LastExit->getName() << "\n");
787 
788   DomTreeUpdater DTU(DT, DomTreeUpdater::UpdateStrategy::Eager);
789   MergeBlockIntoPredecessor(Latch, &DTU, LI, MSSAU, nullptr,
790                             /*PredecessorWithTwoSuccessors=*/true);
791 
792   if (MSSAU && VerifyMemorySSA)
793     MSSAU->getMemorySSA()->verifyMemorySSA();
794 
795   return true;
796 }
797 
798 /// Rotate \c L, and return true if any modification was made.
799 bool LoopRotate::processLoop(Loop *L) {
800   // Save the loop metadata.
801   MDNode *LoopMD = L->getLoopID();
802 
803   bool SimplifiedLatch = false;
804 
805   // Simplify the loop latch before attempting to rotate the header
806   // upward. Rotation may not be needed if the loop tail can be folded into the
807   // loop exit.
808   if (!RotationOnly)
809     SimplifiedLatch = simplifyLoopLatch(L);
810 
811   bool MadeChange = rotateLoop(L, SimplifiedLatch);
812   assert((!MadeChange || L->isLoopExiting(L->getLoopLatch())) &&
813          "Loop latch should be exiting after loop-rotate.");
814 
815   // Restore the loop metadata.
816   // NB! We presume LoopRotation DOESN'T ADD its own metadata.
817   if ((MadeChange || SimplifiedLatch) && LoopMD)
818     L->setLoopID(LoopMD);
819 
820   return MadeChange || SimplifiedLatch;
821 }
822 
823 
824 /// The utility to convert a loop into a loop with bottom test.
825 bool llvm::LoopRotation(Loop *L, LoopInfo *LI, const TargetTransformInfo *TTI,
826                         AssumptionCache *AC, DominatorTree *DT,
827                         ScalarEvolution *SE, MemorySSAUpdater *MSSAU,
828                         const SimplifyQuery &SQ, bool RotationOnly = true,
829                         unsigned Threshold = unsigned(-1),
830                         bool IsUtilMode = true, bool PrepareForLTO) {
831   LoopRotate LR(Threshold, LI, TTI, AC, DT, SE, MSSAU, SQ, RotationOnly,
832                 IsUtilMode, PrepareForLTO);
833   return LR.processLoop(L);
834 }
835