1 //===-- Local.cpp - Functions to perform local transformations ------------===//
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 family of functions perform various local transformations to the
11 // program.
12 //
13 //===----------------------------------------------------------------------===//
14 
15 #include "llvm/Transforms/Utils/Local.h"
16 #include "llvm/Constants.h"
17 #include "llvm/GlobalAlias.h"
18 #include "llvm/GlobalVariable.h"
19 #include "llvm/DerivedTypes.h"
20 #include "llvm/Instructions.h"
21 #include "llvm/Intrinsics.h"
22 #include "llvm/IntrinsicInst.h"
23 #include "llvm/ADT/DenseMap.h"
24 #include "llvm/ADT/SmallPtrSet.h"
25 #include "llvm/Analysis/ConstantFolding.h"
26 #include "llvm/Analysis/InstructionSimplify.h"
27 #include "llvm/Analysis/ProfileInfo.h"
28 #include "llvm/Target/TargetData.h"
29 #include "llvm/Support/CFG.h"
30 #include "llvm/Support/Debug.h"
31 #include "llvm/Support/GetElementPtrTypeIterator.h"
32 #include "llvm/Support/MathExtras.h"
33 #include "llvm/Support/ValueHandle.h"
34 #include "llvm/Support/raw_ostream.h"
35 using namespace llvm;
36 
37 //===----------------------------------------------------------------------===//
38 //  Local constant propagation.
39 //
40 
41 // ConstantFoldTerminator - If a terminator instruction is predicated on a
42 // constant value, convert it into an unconditional branch to the constant
43 // destination.
44 //
45 bool llvm::ConstantFoldTerminator(BasicBlock *BB) {
46   TerminatorInst *T = BB->getTerminator();
47 
48   // Branch - See if we are conditional jumping on constant
49   if (BranchInst *BI = dyn_cast<BranchInst>(T)) {
50     if (BI->isUnconditional()) return false;  // Can't optimize uncond branch
51     BasicBlock *Dest1 = BI->getSuccessor(0);
52     BasicBlock *Dest2 = BI->getSuccessor(1);
53 
54     if (ConstantInt *Cond = dyn_cast<ConstantInt>(BI->getCondition())) {
55       // Are we branching on constant?
56       // YES.  Change to unconditional branch...
57       BasicBlock *Destination = Cond->getZExtValue() ? Dest1 : Dest2;
58       BasicBlock *OldDest     = Cond->getZExtValue() ? Dest2 : Dest1;
59 
60       //cerr << "Function: " << T->getParent()->getParent()
61       //     << "\nRemoving branch from " << T->getParent()
62       //     << "\n\nTo: " << OldDest << endl;
63 
64       // Let the basic block know that we are letting go of it.  Based on this,
65       // it will adjust it's PHI nodes.
66       assert(BI->getParent() && "Terminator not inserted in block!");
67       OldDest->removePredecessor(BI->getParent());
68 
69       // Set the unconditional destination, and change the insn to be an
70       // unconditional branch.
71       BI->setUnconditionalDest(Destination);
72       return true;
73     }
74 
75     if (Dest2 == Dest1) {       // Conditional branch to same location?
76       // This branch matches something like this:
77       //     br bool %cond, label %Dest, label %Dest
78       // and changes it into:  br label %Dest
79 
80       // Let the basic block know that we are letting go of one copy of it.
81       assert(BI->getParent() && "Terminator not inserted in block!");
82       Dest1->removePredecessor(BI->getParent());
83 
84       // Change a conditional branch to unconditional.
85       BI->setUnconditionalDest(Dest1);
86       return true;
87     }
88     return false;
89   }
90 
91   if (SwitchInst *SI = dyn_cast<SwitchInst>(T)) {
92     // If we are switching on a constant, we can convert the switch into a
93     // single branch instruction!
94     ConstantInt *CI = dyn_cast<ConstantInt>(SI->getCondition());
95     BasicBlock *TheOnlyDest = SI->getSuccessor(0);  // The default dest
96     BasicBlock *DefaultDest = TheOnlyDest;
97     assert(TheOnlyDest == SI->getDefaultDest() &&
98            "Default destination is not successor #0?");
99 
100     // Figure out which case it goes to.
101     for (unsigned i = 1, e = SI->getNumSuccessors(); i != e; ++i) {
102       // Found case matching a constant operand?
103       if (SI->getSuccessorValue(i) == CI) {
104         TheOnlyDest = SI->getSuccessor(i);
105         break;
106       }
107 
108       // Check to see if this branch is going to the same place as the default
109       // dest.  If so, eliminate it as an explicit compare.
110       if (SI->getSuccessor(i) == DefaultDest) {
111         // Remove this entry.
112         DefaultDest->removePredecessor(SI->getParent());
113         SI->removeCase(i);
114         --i; --e;  // Don't skip an entry...
115         continue;
116       }
117 
118       // Otherwise, check to see if the switch only branches to one destination.
119       // We do this by reseting "TheOnlyDest" to null when we find two non-equal
120       // destinations.
121       if (SI->getSuccessor(i) != TheOnlyDest) TheOnlyDest = 0;
122     }
123 
124     if (CI && !TheOnlyDest) {
125       // Branching on a constant, but not any of the cases, go to the default
126       // successor.
127       TheOnlyDest = SI->getDefaultDest();
128     }
129 
130     // If we found a single destination that we can fold the switch into, do so
131     // now.
132     if (TheOnlyDest) {
133       // Insert the new branch.
134       BranchInst::Create(TheOnlyDest, SI);
135       BasicBlock *BB = SI->getParent();
136 
137       // Remove entries from PHI nodes which we no longer branch to...
138       for (unsigned i = 0, e = SI->getNumSuccessors(); i != e; ++i) {
139         // Found case matching a constant operand?
140         BasicBlock *Succ = SI->getSuccessor(i);
141         if (Succ == TheOnlyDest)
142           TheOnlyDest = 0;  // Don't modify the first branch to TheOnlyDest
143         else
144           Succ->removePredecessor(BB);
145       }
146 
147       // Delete the old switch.
148       BB->getInstList().erase(SI);
149       return true;
150     }
151 
152     if (SI->getNumSuccessors() == 2) {
153       // Otherwise, we can fold this switch into a conditional branch
154       // instruction if it has only one non-default destination.
155       Value *Cond = new ICmpInst(SI, ICmpInst::ICMP_EQ, SI->getCondition(),
156                                  SI->getSuccessorValue(1), "cond");
157       // Insert the new branch.
158       BranchInst::Create(SI->getSuccessor(1), SI->getSuccessor(0), Cond, SI);
159 
160       // Delete the old switch.
161       SI->eraseFromParent();
162       return true;
163     }
164     return false;
165   }
166 
167   if (IndirectBrInst *IBI = dyn_cast<IndirectBrInst>(T)) {
168     // indirectbr blockaddress(@F, @BB) -> br label @BB
169     if (BlockAddress *BA =
170           dyn_cast<BlockAddress>(IBI->getAddress()->stripPointerCasts())) {
171       BasicBlock *TheOnlyDest = BA->getBasicBlock();
172       // Insert the new branch.
173       BranchInst::Create(TheOnlyDest, IBI);
174 
175       for (unsigned i = 0, e = IBI->getNumDestinations(); i != e; ++i) {
176         if (IBI->getDestination(i) == TheOnlyDest)
177           TheOnlyDest = 0;
178         else
179           IBI->getDestination(i)->removePredecessor(IBI->getParent());
180       }
181       IBI->eraseFromParent();
182 
183       // If we didn't find our destination in the IBI successor list, then we
184       // have undefined behavior.  Replace the unconditional branch with an
185       // 'unreachable' instruction.
186       if (TheOnlyDest) {
187         BB->getTerminator()->eraseFromParent();
188         new UnreachableInst(BB->getContext(), BB);
189       }
190 
191       return true;
192     }
193   }
194 
195   return false;
196 }
197 
198 
199 //===----------------------------------------------------------------------===//
200 //  Local dead code elimination.
201 //
202 
203 /// isInstructionTriviallyDead - Return true if the result produced by the
204 /// instruction is not used, and the instruction has no side effects.
205 ///
206 bool llvm::isInstructionTriviallyDead(Instruction *I) {
207   if (!I->use_empty() || isa<TerminatorInst>(I)) return false;
208 
209   // We don't want debug info removed by anything this general.
210   if (isa<DbgInfoIntrinsic>(I)) return false;
211 
212   // Likewise for memory use markers.
213   if (isa<MemoryUseIntrinsic>(I)) return false;
214 
215   if (!I->mayHaveSideEffects()) return true;
216 
217   // Special case intrinsics that "may have side effects" but can be deleted
218   // when dead.
219   if (IntrinsicInst *II = dyn_cast<IntrinsicInst>(I))
220     // Safe to delete llvm.stacksave if dead.
221     if (II->getIntrinsicID() == Intrinsic::stacksave)
222       return true;
223   return false;
224 }
225 
226 /// RecursivelyDeleteTriviallyDeadInstructions - If the specified value is a
227 /// trivially dead instruction, delete it.  If that makes any of its operands
228 /// trivially dead, delete them too, recursively.  Return true if any
229 /// instructions were deleted.
230 bool llvm::RecursivelyDeleteTriviallyDeadInstructions(Value *V) {
231   Instruction *I = dyn_cast<Instruction>(V);
232   if (!I || !I->use_empty() || !isInstructionTriviallyDead(I))
233     return false;
234 
235   SmallVector<Instruction*, 16> DeadInsts;
236   DeadInsts.push_back(I);
237 
238   do {
239     I = DeadInsts.pop_back_val();
240 
241     // Null out all of the instruction's operands to see if any operand becomes
242     // dead as we go.
243     for (unsigned i = 0, e = I->getNumOperands(); i != e; ++i) {
244       Value *OpV = I->getOperand(i);
245       I->setOperand(i, 0);
246 
247       if (!OpV->use_empty()) continue;
248 
249       // If the operand is an instruction that became dead as we nulled out the
250       // operand, and if it is 'trivially' dead, delete it in a future loop
251       // iteration.
252       if (Instruction *OpI = dyn_cast<Instruction>(OpV))
253         if (isInstructionTriviallyDead(OpI))
254           DeadInsts.push_back(OpI);
255     }
256 
257     I->eraseFromParent();
258   } while (!DeadInsts.empty());
259 
260   return true;
261 }
262 
263 /// RecursivelyDeleteDeadPHINode - If the specified value is an effectively
264 /// dead PHI node, due to being a def-use chain of single-use nodes that
265 /// either forms a cycle or is terminated by a trivially dead instruction,
266 /// delete it.  If that makes any of its operands trivially dead, delete them
267 /// too, recursively.  Return true if the PHI node is actually deleted.
268 bool
269 llvm::RecursivelyDeleteDeadPHINode(PHINode *PN) {
270   // We can remove a PHI if it is on a cycle in the def-use graph
271   // where each node in the cycle has degree one, i.e. only one use,
272   // and is an instruction with no side effects.
273   if (!PN->hasOneUse())
274     return false;
275 
276   bool Changed = false;
277   SmallPtrSet<PHINode *, 4> PHIs;
278   PHIs.insert(PN);
279   for (Instruction *J = cast<Instruction>(*PN->use_begin());
280        J->hasOneUse() && !J->mayHaveSideEffects();
281        J = cast<Instruction>(*J->use_begin()))
282     // If we find a PHI more than once, we're on a cycle that
283     // won't prove fruitful.
284     if (PHINode *JP = dyn_cast<PHINode>(J))
285       if (!PHIs.insert(cast<PHINode>(JP))) {
286         // Break the cycle and delete the PHI and its operands.
287         JP->replaceAllUsesWith(UndefValue::get(JP->getType()));
288         (void)RecursivelyDeleteTriviallyDeadInstructions(JP);
289         Changed = true;
290         break;
291       }
292   return Changed;
293 }
294 
295 /// SimplifyInstructionsInBlock - Scan the specified basic block and try to
296 /// simplify any instructions in it and recursively delete dead instructions.
297 ///
298 /// This returns true if it changed the code, note that it can delete
299 /// instructions in other blocks as well in this block.
300 bool llvm::SimplifyInstructionsInBlock(BasicBlock *BB, const TargetData *TD) {
301   bool MadeChange = false;
302   for (BasicBlock::iterator BI = BB->begin(), E = BB->end(); BI != E; ) {
303     Instruction *Inst = BI++;
304 
305     if (Value *V = SimplifyInstruction(Inst, TD)) {
306       WeakVH BIHandle(BI);
307       ReplaceAndSimplifyAllUses(Inst, V, TD);
308       MadeChange = true;
309       if (BIHandle == 0)
310         BI = BB->begin();
311       continue;
312     }
313 
314     MadeChange |= RecursivelyDeleteTriviallyDeadInstructions(Inst);
315   }
316   return MadeChange;
317 }
318 
319 //===----------------------------------------------------------------------===//
320 //  Control Flow Graph Restructuring.
321 //
322 
323 
324 /// RemovePredecessorAndSimplify - Like BasicBlock::removePredecessor, this
325 /// method is called when we're about to delete Pred as a predecessor of BB.  If
326 /// BB contains any PHI nodes, this drops the entries in the PHI nodes for Pred.
327 ///
328 /// Unlike the removePredecessor method, this attempts to simplify uses of PHI
329 /// nodes that collapse into identity values.  For example, if we have:
330 ///   x = phi(1, 0, 0, 0)
331 ///   y = and x, z
332 ///
333 /// .. and delete the predecessor corresponding to the '1', this will attempt to
334 /// recursively fold the and to 0.
335 void llvm::RemovePredecessorAndSimplify(BasicBlock *BB, BasicBlock *Pred,
336                                         TargetData *TD) {
337   // This only adjusts blocks with PHI nodes.
338   if (!isa<PHINode>(BB->begin()))
339     return;
340 
341   // Remove the entries for Pred from the PHI nodes in BB, but do not simplify
342   // them down.  This will leave us with single entry phi nodes and other phis
343   // that can be removed.
344   BB->removePredecessor(Pred, true);
345 
346   WeakVH PhiIt = &BB->front();
347   while (PHINode *PN = dyn_cast<PHINode>(PhiIt)) {
348     PhiIt = &*++BasicBlock::iterator(cast<Instruction>(PhiIt));
349 
350     Value *PNV = PN->hasConstantValue();
351     if (PNV == 0) continue;
352 
353     // If we're able to simplify the phi to a single value, substitute the new
354     // value into all of its uses.
355     assert(PNV != PN && "hasConstantValue broken");
356 
357     ReplaceAndSimplifyAllUses(PN, PNV, TD);
358 
359     // If recursive simplification ended up deleting the next PHI node we would
360     // iterate to, then our iterator is invalid, restart scanning from the top
361     // of the block.
362     if (PhiIt == 0) PhiIt = &BB->front();
363   }
364 }
365 
366 
367 /// MergeBasicBlockIntoOnlyPred - DestBB is a block with one predecessor and its
368 /// predecessor is known to have one successor (DestBB!).  Eliminate the edge
369 /// between them, moving the instructions in the predecessor into DestBB and
370 /// deleting the predecessor block.
371 ///
372 void llvm::MergeBasicBlockIntoOnlyPred(BasicBlock *DestBB, Pass *P) {
373   // If BB has single-entry PHI nodes, fold them.
374   while (PHINode *PN = dyn_cast<PHINode>(DestBB->begin())) {
375     Value *NewVal = PN->getIncomingValue(0);
376     // Replace self referencing PHI with undef, it must be dead.
377     if (NewVal == PN) NewVal = UndefValue::get(PN->getType());
378     PN->replaceAllUsesWith(NewVal);
379     PN->eraseFromParent();
380   }
381 
382   BasicBlock *PredBB = DestBB->getSinglePredecessor();
383   assert(PredBB && "Block doesn't have a single predecessor!");
384 
385   // Splice all the instructions from PredBB to DestBB.
386   PredBB->getTerminator()->eraseFromParent();
387   DestBB->getInstList().splice(DestBB->begin(), PredBB->getInstList());
388 
389   // Zap anything that took the address of DestBB.  Not doing this will give the
390   // address an invalid value.
391   if (DestBB->hasAddressTaken()) {
392     BlockAddress *BA = BlockAddress::get(DestBB);
393     Constant *Replacement =
394       ConstantInt::get(llvm::Type::getInt32Ty(BA->getContext()), 1);
395     BA->replaceAllUsesWith(ConstantExpr::getIntToPtr(Replacement,
396                                                      BA->getType()));
397     BA->destroyConstant();
398   }
399 
400   // Anything that branched to PredBB now branches to DestBB.
401   PredBB->replaceAllUsesWith(DestBB);
402 
403   if (P) {
404     ProfileInfo *PI = P->getAnalysisIfAvailable<ProfileInfo>();
405     if (PI) {
406       PI->replaceAllUses(PredBB, DestBB);
407       PI->removeEdge(ProfileInfo::getEdge(PredBB, DestBB));
408     }
409   }
410   // Nuke BB.
411   PredBB->eraseFromParent();
412 }
413 
414 /// CanPropagatePredecessorsForPHIs - Return true if we can fold BB, an
415 /// almost-empty BB ending in an unconditional branch to Succ, into succ.
416 ///
417 /// Assumption: Succ is the single successor for BB.
418 ///
419 static bool CanPropagatePredecessorsForPHIs(BasicBlock *BB, BasicBlock *Succ) {
420   assert(*succ_begin(BB) == Succ && "Succ is not successor of BB!");
421 
422   DEBUG(dbgs() << "Looking to fold " << BB->getName() << " into "
423         << Succ->getName() << "\n");
424   // Shortcut, if there is only a single predecessor it must be BB and merging
425   // is always safe
426   if (Succ->getSinglePredecessor()) return true;
427 
428   // Make a list of the predecessors of BB
429   typedef SmallPtrSet<BasicBlock*, 16> BlockSet;
430   BlockSet BBPreds(pred_begin(BB), pred_end(BB));
431 
432   // Use that list to make another list of common predecessors of BB and Succ
433   BlockSet CommonPreds;
434   for (pred_iterator PI = pred_begin(Succ), PE = pred_end(Succ);
435         PI != PE; ++PI)
436     if (BBPreds.count(*PI))
437       CommonPreds.insert(*PI);
438 
439   // Shortcut, if there are no common predecessors, merging is always safe
440   if (CommonPreds.empty())
441     return true;
442 
443   // Look at all the phi nodes in Succ, to see if they present a conflict when
444   // merging these blocks
445   for (BasicBlock::iterator I = Succ->begin(); isa<PHINode>(I); ++I) {
446     PHINode *PN = cast<PHINode>(I);
447 
448     // If the incoming value from BB is again a PHINode in
449     // BB which has the same incoming value for *PI as PN does, we can
450     // merge the phi nodes and then the blocks can still be merged
451     PHINode *BBPN = dyn_cast<PHINode>(PN->getIncomingValueForBlock(BB));
452     if (BBPN && BBPN->getParent() == BB) {
453       for (BlockSet::iterator PI = CommonPreds.begin(), PE = CommonPreds.end();
454             PI != PE; PI++) {
455         if (BBPN->getIncomingValueForBlock(*PI)
456               != PN->getIncomingValueForBlock(*PI)) {
457           DEBUG(dbgs() << "Can't fold, phi node " << PN->getName() << " in "
458                 << Succ->getName() << " is conflicting with "
459                 << BBPN->getName() << " with regard to common predecessor "
460                 << (*PI)->getName() << "\n");
461           return false;
462         }
463       }
464     } else {
465       Value* Val = PN->getIncomingValueForBlock(BB);
466       for (BlockSet::iterator PI = CommonPreds.begin(), PE = CommonPreds.end();
467             PI != PE; PI++) {
468         // See if the incoming value for the common predecessor is equal to the
469         // one for BB, in which case this phi node will not prevent the merging
470         // of the block.
471         if (Val != PN->getIncomingValueForBlock(*PI)) {
472           DEBUG(dbgs() << "Can't fold, phi node " << PN->getName() << " in "
473                 << Succ->getName() << " is conflicting with regard to common "
474                 << "predecessor " << (*PI)->getName() << "\n");
475           return false;
476         }
477       }
478     }
479   }
480 
481   return true;
482 }
483 
484 /// TryToSimplifyUncondBranchFromEmptyBlock - BB is known to contain an
485 /// unconditional branch, and contains no instructions other than PHI nodes,
486 /// potential debug intrinsics and the branch.  If possible, eliminate BB by
487 /// rewriting all the predecessors to branch to the successor block and return
488 /// true.  If we can't transform, return false.
489 bool llvm::TryToSimplifyUncondBranchFromEmptyBlock(BasicBlock *BB) {
490   // We can't eliminate infinite loops.
491   BasicBlock *Succ = cast<BranchInst>(BB->getTerminator())->getSuccessor(0);
492   if (BB == Succ) return false;
493 
494   // Check to see if merging these blocks would cause conflicts for any of the
495   // phi nodes in BB or Succ. If not, we can safely merge.
496   if (!CanPropagatePredecessorsForPHIs(BB, Succ)) return false;
497 
498   // Check for cases where Succ has multiple predecessors and a PHI node in BB
499   // has uses which will not disappear when the PHI nodes are merged.  It is
500   // possible to handle such cases, but difficult: it requires checking whether
501   // BB dominates Succ, which is non-trivial to calculate in the case where
502   // Succ has multiple predecessors.  Also, it requires checking whether
503   // constructing the necessary self-referential PHI node doesn't intoduce any
504   // conflicts; this isn't too difficult, but the previous code for doing this
505   // was incorrect.
506   //
507   // Note that if this check finds a live use, BB dominates Succ, so BB is
508   // something like a loop pre-header (or rarely, a part of an irreducible CFG);
509   // folding the branch isn't profitable in that case anyway.
510   if (!Succ->getSinglePredecessor()) {
511     BasicBlock::iterator BBI = BB->begin();
512     while (isa<PHINode>(*BBI)) {
513       for (Value::use_iterator UI = BBI->use_begin(), E = BBI->use_end();
514            UI != E; ++UI) {
515         if (PHINode* PN = dyn_cast<PHINode>(*UI)) {
516           if (PN->getIncomingBlock(UI) != BB)
517             return false;
518         } else {
519           return false;
520         }
521       }
522       ++BBI;
523     }
524   }
525 
526   DEBUG(dbgs() << "Killing Trivial BB: \n" << *BB);
527 
528   if (isa<PHINode>(Succ->begin())) {
529     // If there is more than one pred of succ, and there are PHI nodes in
530     // the successor, then we need to add incoming edges for the PHI nodes
531     //
532     const SmallVector<BasicBlock*, 16> BBPreds(pred_begin(BB), pred_end(BB));
533 
534     // Loop over all of the PHI nodes in the successor of BB.
535     for (BasicBlock::iterator I = Succ->begin(); isa<PHINode>(I); ++I) {
536       PHINode *PN = cast<PHINode>(I);
537       Value *OldVal = PN->removeIncomingValue(BB, false);
538       assert(OldVal && "No entry in PHI for Pred BB!");
539 
540       // If this incoming value is one of the PHI nodes in BB, the new entries
541       // in the PHI node are the entries from the old PHI.
542       if (isa<PHINode>(OldVal) && cast<PHINode>(OldVal)->getParent() == BB) {
543         PHINode *OldValPN = cast<PHINode>(OldVal);
544         for (unsigned i = 0, e = OldValPN->getNumIncomingValues(); i != e; ++i)
545           // Note that, since we are merging phi nodes and BB and Succ might
546           // have common predecessors, we could end up with a phi node with
547           // identical incoming branches. This will be cleaned up later (and
548           // will trigger asserts if we try to clean it up now, without also
549           // simplifying the corresponding conditional branch).
550           PN->addIncoming(OldValPN->getIncomingValue(i),
551                           OldValPN->getIncomingBlock(i));
552       } else {
553         // Add an incoming value for each of the new incoming values.
554         for (unsigned i = 0, e = BBPreds.size(); i != e; ++i)
555           PN->addIncoming(OldVal, BBPreds[i]);
556       }
557     }
558   }
559 
560   while (PHINode *PN = dyn_cast<PHINode>(&BB->front())) {
561     if (Succ->getSinglePredecessor()) {
562       // BB is the only predecessor of Succ, so Succ will end up with exactly
563       // the same predecessors BB had.
564       Succ->getInstList().splice(Succ->begin(),
565                                  BB->getInstList(), BB->begin());
566     } else {
567       // We explicitly check for such uses in CanPropagatePredecessorsForPHIs.
568       assert(PN->use_empty() && "There shouldn't be any uses here!");
569       PN->eraseFromParent();
570     }
571   }
572 
573   // Everything that jumped to BB now goes to Succ.
574   BB->replaceAllUsesWith(Succ);
575   if (!Succ->hasName()) Succ->takeName(BB);
576   BB->eraseFromParent();              // Delete the old basic block.
577   return true;
578 }
579 
580 /// EliminateDuplicatePHINodes - Check for and eliminate duplicate PHI
581 /// nodes in this block. This doesn't try to be clever about PHI nodes
582 /// which differ only in the order of the incoming values, but instcombine
583 /// orders them so it usually won't matter.
584 ///
585 bool llvm::EliminateDuplicatePHINodes(BasicBlock *BB) {
586   bool Changed = false;
587 
588   // This implementation doesn't currently consider undef operands
589   // specially. Theroetically, two phis which are identical except for
590   // one having an undef where the other doesn't could be collapsed.
591 
592   // Map from PHI hash values to PHI nodes. If multiple PHIs have
593   // the same hash value, the element is the first PHI in the
594   // linked list in CollisionMap.
595   DenseMap<uintptr_t, PHINode *> HashMap;
596 
597   // Maintain linked lists of PHI nodes with common hash values.
598   DenseMap<PHINode *, PHINode *> CollisionMap;
599 
600   // Examine each PHI.
601   for (BasicBlock::iterator I = BB->begin();
602        PHINode *PN = dyn_cast<PHINode>(I++); ) {
603     // Compute a hash value on the operands. Instcombine will likely have sorted
604     // them, which helps expose duplicates, but we have to check all the
605     // operands to be safe in case instcombine hasn't run.
606     uintptr_t Hash = 0;
607     for (User::op_iterator I = PN->op_begin(), E = PN->op_end(); I != E; ++I) {
608       // This hash algorithm is quite weak as hash functions go, but it seems
609       // to do a good enough job for this particular purpose, and is very quick.
610       Hash ^= reinterpret_cast<uintptr_t>(static_cast<Value *>(*I));
611       Hash = (Hash << 7) | (Hash >> (sizeof(uintptr_t) * CHAR_BIT - 7));
612     }
613     // If we've never seen this hash value before, it's a unique PHI.
614     std::pair<DenseMap<uintptr_t, PHINode *>::iterator, bool> Pair =
615       HashMap.insert(std::make_pair(Hash, PN));
616     if (Pair.second) continue;
617     // Otherwise it's either a duplicate or a hash collision.
618     for (PHINode *OtherPN = Pair.first->second; ; ) {
619       if (OtherPN->isIdenticalTo(PN)) {
620         // A duplicate. Replace this PHI with its duplicate.
621         PN->replaceAllUsesWith(OtherPN);
622         PN->eraseFromParent();
623         Changed = true;
624         break;
625       }
626       // A non-duplicate hash collision.
627       DenseMap<PHINode *, PHINode *>::iterator I = CollisionMap.find(OtherPN);
628       if (I == CollisionMap.end()) {
629         // Set this PHI to be the head of the linked list of colliding PHIs.
630         PHINode *Old = Pair.first->second;
631         Pair.first->second = PN;
632         CollisionMap[PN] = Old;
633         break;
634       }
635       // Procede to the next PHI in the list.
636       OtherPN = I->second;
637     }
638   }
639 
640   return Changed;
641 }
642