lib/Transforms/Scalar/PredicateSimplifier.cpp

   1 //===-- PredicateSimplifier.cpp - Path Sensitive Simplifier ---------------===//
   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 // Path-sensitive optimizer. In a branch where x == y, replace uses of
  11 // x with y. Permits further optimization, such as the elimination of
  12 // the unreachable call:
  13 //
  14 // void test(int *p, int *q)
  15 // {
  16 //   if (p != q)
  17 //     return;
  18 //
  19 //   if (*p != *q)
  20 //     foo(); // unreachable
  21 // }
  22 //
  23 //===----------------------------------------------------------------------===//
  24 //
  25 // The InequalityGraph focusses on four properties; equals, not equals,
  26 // less-than and less-than-or-equals-to. The greater-than forms are also held
  27 // just to allow walking from a lesser node to a greater one. These properties
  28 // are stored in a lattice; LE can become LT or EQ, NE can become LT or GT.
  29 //
  30 // These relationships define a graph between values of the same type. Each
  31 // Value is stored in a map table that retrieves the associated Node. This
  32 // is how EQ relationships are stored; the map contains pointers from equal
  33 // Value to the same node. The node contains a most canonical Value* form
  34 // and the list of known relationships with other nodes.
  35 //
  36 // If two nodes are known to be inequal, then they will contain pointers to
  37 // each other with an "NE" relationship. If node getNode(%x) is less than
  38 // getNode(%y), then the %x node will contain <%y, GT> and %y will contain
  39 // <%x, LT>. This allows us to tie nodes together into a graph like this:
  40 //
  41 //   %a < %b < %c < %d
  42 //
  43 // with four nodes representing the properties. The InequalityGraph provides
  44 // querying with "isRelatedBy" and mutators "addEquality" and "addInequality".
  45 // To find a relationship, we start with one of the nodes any binary search
  46 // through its list to find where the relationships with the second node start.
  47 // Then we iterate through those to find the first relationship that dominates
  48 // our context node.
  49 //
  50 // To create these properties, we wait until a branch or switch instruction
  51 // implies that a particular value is true (or false). The VRPSolver is
  52 // responsible for analyzing the variable and seeing what new inferences
  53 // can be made from each property. For example:
  54 //
  55 //   %P = icmp ne i32* %ptr, null
  56 //   %a = and i1 %P, %Q
  57 //   br i1 %a label %cond_true, label %cond_false
  58 //
  59 // For the true branch, the VRPSolver will start with %a EQ true and look at
  60 // the definition of %a and find that it can infer that %P and %Q are both
  61 // true. From %P being true, it can infer that %ptr NE null. For the false
  62 // branch it can't infer anything from the "and" instruction.
  63 //
  64 // Besides branches, we can also infer properties from instruction that may
  65 // have undefined behaviour in certain cases. For example, the dividend of
  66 // a division may never be zero. After the division instruction, we may assume
  67 // that the dividend is not equal to zero.
  68 //
  69 //===----------------------------------------------------------------------===//
  70 //
  71 // The ValueRanges class stores the known integer bounds of a Value. When we
  72 // encounter i8 %a u< %b, the ValueRanges stores that %a = [1, 255] and
  73 // %b = [0, 254].
  74 //
  75 // It never stores an empty range, because that means that the code is
  76 // unreachable. It never stores a single-element range since that's an equality
  77 // relationship and better stored in the InequalityGraph, nor an empty range
  78 // since that is better stored in UnreachableBlocks.
  79 //
  80 //===----------------------------------------------------------------------===//
  81
  82 #define DEBUG_TYPE "predsimplify"
  83 #include "llvm/Transforms/Scalar.h"
  84 #include "llvm/Constants.h"
  85 #include "llvm/DerivedTypes.h"
  86 #include "llvm/Instructions.h"
  87 #include "llvm/Pass.h"
  88 #include "llvm/ADT/DepthFirstIterator.h"
  89 #include "llvm/ADT/SetOperations.h"
  90 #include "llvm/ADT/SetVector.h"
  91 #include "llvm/ADT/Statistic.h"
  92 #include "llvm/ADT/STLExtras.h"
  93 #include "llvm/Analysis/Dominators.h"
  94 #include "llvm/Assembly/Writer.h"
  95 #include "llvm/Support/CFG.h"
  96 #include "llvm/Support/Compiler.h"
  97 #include "llvm/Support/ConstantRange.h"
  98 #include "llvm/Support/Debug.h"
  99 #include "llvm/Support/InstVisitor.h"
 100 #include "llvm/Target/TargetData.h"
 101 #include "llvm/Transforms/Utils/Local.h"
 102 #include <algorithm>
 103 #include <deque>
 104 #include <stack>
 105 using namespace llvm;
 106
 107 STATISTIC(NumVarsReplaced, "Number of argument substitutions");
 108 STATISTIC(NumInstruction , "Number of instructions removed");
 109 STATISTIC(NumSimple      , "Number of simple replacements");
 110 STATISTIC(NumBlocks      , "Number of blocks marked unreachable");
 111 STATISTIC(NumSnuggle     , "Number of comparisons snuggled");
 112
 113 static const ConstantRange empty(1, false);
 114
 115 namespace {
 116   class DomTreeDFS {
 117   public:
 118     class Node {
 119       friend class DomTreeDFS;
 120     public:
 121       typedef std::vector<Node *>::iterator       iterator;
 122       typedef std::vector<Node *>::const_iterator const_iterator;
 123
 124       unsigned getDFSNumIn()  const { return DFSin;  }
 125       unsigned getDFSNumOut() const { return DFSout; }
 126
 127       BasicBlock *getBlock() const { return BB; }
 128
 129       iterator begin() { return Children.begin(); }
 130       iterator end()   { return Children.end();   }
 131
 132       const_iterator begin() const { return Children.begin(); }
 133       const_iterator end()   const { return Children.end();   }
 134
 135       bool dominates(const Node *N) const {
 136         return DFSin <= N->DFSin && DFSout >= N->DFSout;
 137       }
 138
 139       bool DominatedBy(const Node *N) const {
 140         return N->dominates(this);
 141       }
 142
 143       /// Sorts by the number of descendants. With this, you can iterate
 144       /// through a sorted list and the first matching entry is the most
 145       /// specific match for your basic block. The order provided is stable;
 146       /// DomTreeDFS::Nodes with the same number of descendants are sorted by
 147       /// DFS in number.
 148       bool operator<(const Node &N) const {
 149         unsigned   spread =   DFSout -   DFSin;
 150         unsigned N_spread = N.DFSout - N.DFSin;
 151         if (spread == N_spread) return DFSin < N.DFSin;
 152         return spread < N_spread;
 153       }
 154       bool operator>(const Node &N) const { return N < *this; }
 155
 156     private:
 157       unsigned DFSin, DFSout;
 158       BasicBlock *BB;
 159
 160       std::vector<Node *> Children;
 161     };
 162
 163     // XXX: this may be slow. Instead of using "new" for each node, consider
 164     // putting them in a vector to keep them contiguous.
 165     explicit DomTreeDFS(DominatorTree *DT) {
 166       std::stack<std::pair<Node *, DomTreeNode *> > S;
 167
 168       Entry = new Node;
 169       Entry->BB = DT->getRootNode()->getBlock();
 170       S.push(std::make_pair(Entry, DT->getRootNode()));
 171
 172       NodeMap[Entry->BB] = Entry;
 173
 174       while (!S.empty()) {
 175         std::pair<Node *, DomTreeNode *> &Pair = S.top();
 176         Node *N = Pair.first;
 177         DomTreeNode *DTNode = Pair.second;
 178         S.pop();
 179
 180         for (DomTreeNode::iterator I = DTNode->begin(), E = DTNode->end();
 181              I != E; ++I) {
 182           Node *NewNode = new Node;
 183           NewNode->BB = (*I)->getBlock();
 184           N->Children.push_back(NewNode);
 185           S.push(std::make_pair(NewNode, *I));
 186
 187           NodeMap[NewNode->BB] = NewNode;
 188         }
 189       }
 190
 191       renumber();
 192
 193 #ifndef NDEBUG
 194       DEBUG(dump());
 195 #endif
 196     }
 197
 198 #ifndef NDEBUG
 199     virtual
 200 #endif
 201     ~DomTreeDFS() {
 202       std::stack<Node *> S;
 203
 204       S.push(Entry);
 205       while (!S.empty()) {
 206         Node *N = S.top(); S.pop();
 207
 208         for (Node::iterator I = N->begin(), E = N->end(); I != E; ++I)
 209           S.push(*I);
 210
 211         delete N;
 212       }
 213     }
 214
 215     /// getRootNode - This returns the entry node for the CFG of the function.
 216     Node *getRootNode() const { return Entry; }
 217
 218     /// getNodeForBlock - return the node for the specified basic block.
 219     Node *getNodeForBlock(BasicBlock *BB) const {
 220       if (!NodeMap.count(BB)) return 0;
 221       return const_cast<DomTreeDFS*>(this)->NodeMap[BB];
 222     }
 223
 224     /// dominates - returns true if the basic block for I1 dominates that of
 225     /// the basic block for I2. If the instructions belong to the same basic
 226     /// block, the instruction first instruction sequentially in the block is
 227     /// considered dominating.
 228     bool dominates(Instruction *I1, Instruction *I2) {
 229       BasicBlock *BB1 = I1->getParent(),
 230                  *BB2 = I2->getParent();
 231       if (BB1 == BB2) {
 232         if (isa<TerminatorInst>(I1)) return false;
 233         if (isa<TerminatorInst>(I2)) return true;
 234         if ( isa<PHINode>(I1) && !isa<PHINode>(I2)) return true;
 235         if (!isa<PHINode>(I1) &&  isa<PHINode>(I2)) return false;
 236
 237         for (BasicBlock::const_iterator I = BB2->begin(), E = BB2->end();
 238              I != E; ++I) {
 239           if (&*I == I1) return true;
 240           else if (&*I == I2) return false;
 241         }
 242         assert(!"Instructions not found in parent BasicBlock?");
 243       } else {
 244         Node *Node1 = getNodeForBlock(BB1),
 245              *Node2 = getNodeForBlock(BB2);
 246         return Node1 && Node2 && Node1->dominates(Node2);
 247       }
 248       return false; // Not reached
 249     }
 250
 251   private:
 252     /// renumber - calculates the depth first search numberings and applies
 253     /// them onto the nodes.
 254     void renumber() {
 255       std::stack<std::pair<Node *, Node::iterator> > S;
 256       unsigned n = 0;
 257
 258       Entry->DFSin = ++n;
 259       S.push(std::make_pair(Entry, Entry->begin()));
 260
 261       while (!S.empty()) {
 262         std::pair<Node *, Node::iterator> &Pair = S.top();
 263         Node *N = Pair.first;
 264         Node::iterator &I = Pair.second;
 265
 266         if (I == N->end()) {
 267           N->DFSout = ++n;
 268           S.pop();
 269         } else {
 270           Node *Next = *I++;
 271           Next->DFSin = ++n;
 272           S.push(std::make_pair(Next, Next->begin()));
 273         }
 274       }
 275     }
 276
 277 #ifndef NDEBUG
 278     virtual void dump() const {
 279       dump(*cerr.stream());
 280     }
 281
 282     void dump(std::ostream &os) const {
 283       os << "Predicate simplifier DomTreeDFS: \n";
 284       dump(Entry, 0, os);
 285       os << "\n\n";
 286     }
 287
 288     void dump(Node *N, int depth, std::ostream &os) const {
 289       ++depth;
 290       for (int i = 0; i < depth; ++i) { os << " "; }
 291       os << "[" << depth << "] ";
 292
 293       os << N->getBlock()->getName() << " (" << N->getDFSNumIn()
 294          << ", " << N->getDFSNumOut() << ")\n";
 295
 296       for (Node::iterator I = N->begin(), E = N->end(); I != E; ++I)
 297         dump(*I, depth, os);
 298     }
 299 #endif
 300
 301     Node *Entry;
 302     std::map<BasicBlock *, Node *> NodeMap;
 303   };
 304
 305   // SLT SGT ULT UGT EQ
 306   //   0   1   0   1  0 -- GT                  10
 307   //   0   1   0   1  1 -- GE                  11
 308   //   0   1   1   0  0 -- SGTULT              12
 309   //   0   1   1   0  1 -- SGEULE              13
 310   //   0   1   1   1  0 -- SGT                 14
 311   //   0   1   1   1  1 -- SGE                 15
 312   //   1   0   0   1  0 -- SLTUGT              18
 313   //   1   0   0   1  1 -- SLEUGE              19
 314   //   1   0   1   0  0 -- LT                  20
 315   //   1   0   1   0  1 -- LE                  21
 316   //   1   0   1   1  0 -- SLT                 22
 317   //   1   0   1   1  1 -- SLE                 23
 318   //   1   1   0   1  0 -- UGT                 26
 319   //   1   1   0   1  1 -- UGE                 27
 320   //   1   1   1   0  0 -- ULT                 28
 321   //   1   1   1   0  1 -- ULE                 29
 322   //   1   1   1   1  0 -- NE                  30
 323   enum LatticeBits {
 324     EQ_BIT = 1, UGT_BIT = 2, ULT_BIT = 4, SGT_BIT = 8, SLT_BIT = 16
 325   };
 326   enum LatticeVal {
 327     GT = SGT_BIT | UGT_BIT,
 328     GE = GT | EQ_BIT,
 329     LT = SLT_BIT | ULT_BIT,
 330     LE = LT | EQ_BIT,
 331     NE = SLT_BIT | SGT_BIT | ULT_BIT | UGT_BIT,
 332     SGTULT = SGT_BIT | ULT_BIT,
 333     SGEULE = SGTULT | EQ_BIT,
 334     SLTUGT = SLT_BIT | UGT_BIT,
 335     SLEUGE = SLTUGT | EQ_BIT,
 336     ULT = SLT_BIT | SGT_BIT | ULT_BIT,
 337     UGT = SLT_BIT | SGT_BIT | UGT_BIT,
 338     SLT = SLT_BIT | ULT_BIT | UGT_BIT,
 339     SGT = SGT_BIT | ULT_BIT | UGT_BIT,
 340     SLE = SLT | EQ_BIT,
 341     SGE = SGT | EQ_BIT,
 342     ULE = ULT | EQ_BIT,
 343     UGE = UGT | EQ_BIT
 344   };
 345
 346 #ifndef NDEBUG
 347   /// validPredicate - determines whether a given value is actually a lattice
 348   /// value. Only used in assertions or debugging.
 349   static bool validPredicate(LatticeVal LV) {
 350     switch (LV) {
 351       case GT: case GE: case LT: case LE: case NE:
 352       case SGTULT: case SGT: case SGEULE:
 353       case SLTUGT: case SLT: case SLEUGE:
 354       case ULT: case UGT:
 355       case SLE: case SGE: case ULE: case UGE:
 356         return true;
 357       default:
 358         return false;
 359     }
 360   }
 361 #endif
 362
 363   /// reversePredicate - reverse the direction of the inequality
 364   static LatticeVal reversePredicate(LatticeVal LV) {
 365     unsigned reverse = LV ^ (SLT_BIT|SGT_BIT|ULT_BIT|UGT_BIT); //preserve EQ_BIT
 366
 367     if ((reverse & (SLT_BIT|SGT_BIT)) == 0)
 368       reverse |= (SLT_BIT|SGT_BIT);
 369
 370     if ((reverse & (ULT_BIT|UGT_BIT)) == 0)
 371       reverse |= (ULT_BIT|UGT_BIT);
 372
 373     LatticeVal Rev = static_cast<LatticeVal>(reverse);
 374     assert(validPredicate(Rev) && "Failed reversing predicate.");
 375     return Rev;
 376   }
 377
 378   /// ValueNumbering stores the scope-specific value numbers for a given Value.
 379   class VISIBILITY_HIDDEN ValueNumbering {
 380
 381     /// VNPair is a tuple of {Value, index number, DomTreeDFS::Node}. It
 382     /// includes the comparison operators necessary to allow you to store it
 383     /// in a sorted vector.
 384     class VISIBILITY_HIDDEN VNPair {
 385     public:
 386       Value *V;
 387       unsigned index;
 388       DomTreeDFS::Node *Subtree;
 389
 390       VNPair(Value *V, unsigned index, DomTreeDFS::Node *Subtree)
 391         : V(V), index(index), Subtree(Subtree) {}
 392
 393       bool operator==(const VNPair &RHS) const {
 394         return V == RHS.V && Subtree == RHS.Subtree;
 395       }
 396
 397       bool operator<(const VNPair &RHS) const {
 398         if (V != RHS.V) return V < RHS.V;
 399         return *Subtree < *RHS.Subtree;
 400       }
 401
 402       bool operator<(Value *RHS) const {
 403         return V < RHS;
 404       }
 405
 406       bool operator>(Value *RHS) const {
 407         return V > RHS;
 408       }
 409
 410       friend bool operator<(Value *RHS, const VNPair &pair) {
 411         return pair.operator>(RHS);
 412       }
 413     };
 414
 415     typedef std::vector<VNPair> VNMapType;
 416     VNMapType VNMap;
 417
 418     /// The canonical choice for value number at index.
 419     std::vector<Value *> Values;
 420
 421     DomTreeDFS *DTDFS;
 422
 423   public:
 424 #ifndef NDEBUG
 425     virtual ~ValueNumbering() {}
 426     virtual void dump() {
 427       dump(*cerr.stream());
 428     }
 429
 430     void dump(std::ostream &os) {
 431       for (unsigned i = 1; i <= Values.size(); ++i) {
 432         os << i << " = ";
 433         WriteAsOperand(os, Values[i-1]);
 434         os << " {";
 435         for (unsigned j = 0; j < VNMap.size(); ++j) {
 436           if (VNMap[j].index == i) {
 437             WriteAsOperand(os, VNMap[j].V);
 438             os << " (" << VNMap[j].Subtree->getDFSNumIn() << ")  ";
 439           }
 440         }
 441         os << "}\n";
 442       }
 443     }
 444 #endif
 445
 446     /// compare - returns true if V1 is a better canonical value than V2.
 447     bool compare(Value *V1, Value *V2) const {
 448       if (isa<Constant>(V1))
 449         return !isa<Constant>(V2);
 450       else if (isa<Constant>(V2))
 451         return false;
 452       else if (isa<Argument>(V1))
 453         return !isa<Argument>(V2);
 454       else if (isa<Argument>(V2))
 455         return false;
 456
 457       Instruction *I1 = dyn_cast<Instruction>(V1);
 458       Instruction *I2 = dyn_cast<Instruction>(V2);
 459
 460       if (!I1 || !I2)
 461         return V1->getNumUses() < V2->getNumUses();
 462
 463       return DTDFS->dominates(I1, I2);
 464     }
 465
 466     ValueNumbering(DomTreeDFS *DTDFS) : DTDFS(DTDFS) {}
 467
 468     /// valueNumber - finds the value number for V under the Subtree. If
 469     /// there is no value number, returns zero.
 470     unsigned valueNumber(Value *V, DomTreeDFS::Node *Subtree) {
 471       if (!(isa<Constant>(V) || isa<Argument>(V) || isa<Instruction>(V))
 472           || V->getType() == Type::VoidTy) return 0;
 473
 474       VNMapType::iterator E = VNMap.end();
 475       VNPair pair(V, 0, Subtree);
 476       VNMapType::iterator I = std::lower_bound(VNMap.begin(), E, pair);
 477       while (I != E && I->V == V) {
 478         if (I->Subtree->dominates(Subtree))
 479           return I->index;
 480         ++I;
 481       }
 482       return 0;
 483     }
 484
 485     /// getOrInsertVN - always returns a value number, creating it if necessary.
 486     unsigned getOrInsertVN(Value *V, DomTreeDFS::Node *Subtree) {
 487       if (unsigned n = valueNumber(V, Subtree))
 488         return n;
 489       else
 490         return newVN(V);
 491     }
 492
 493     /// newVN - creates a new value number. Value V must not already have a
 494     /// value number assigned.
 495     unsigned newVN(Value *V) {
 496       assert((isa<Constant>(V) || isa<Argument>(V) || isa<Instruction>(V)) &&
 497              "Bad Value for value numbering.");
 498       assert(V->getType() != Type::VoidTy && "Won't value number a void value");
 499
 500       Values.push_back(V);
 501
 502       VNPair pair = VNPair(V, Values.size(), DTDFS->getRootNode());
 503       VNMapType::iterator I = std::lower_bound(VNMap.begin(), VNMap.end(), pair);
 504       assert((I == VNMap.end() || value(I->index) != V) &&
 505              "Attempt to create a duplicate value number.");
 506       VNMap.insert(I, pair);
 507
 508       return Values.size();
 509     }
 510
 511     /// value - returns the Value associated with a value number.
 512     Value *value(unsigned index) const {
 513       assert(index != 0 && "Zero index is reserved for not found.");
 514       assert(index <= Values.size() && "Index out of range.");
 515       return Values[index-1];
 516     }
 517
 518     /// canonicalize - return a Value that is equal to V under Subtree.
 519     Value *canonicalize(Value *V, DomTreeDFS::Node *Subtree) {
 520       if (isa<Constant>(V)) return V;
 521
 522       if (unsigned n = valueNumber(V, Subtree))
 523         return value(n);
 524       else
 525         return V;
 526     }
 527
 528     /// addEquality - adds that value V belongs to the set of equivalent
 529     /// values defined by value number n under Subtree.
 530     void addEquality(unsigned n, Value *V, DomTreeDFS::Node *Subtree) {
 531       assert(canonicalize(value(n), Subtree) == value(n) &&
 532              "Node's 'canonical' choice isn't best within this subtree.");
 533
 534       // Suppose that we are given "%x -> node #1 (%y)". The problem is that
 535       // we may already have "%z -> node #2 (%x)" somewhere above us in the
 536       // graph. We need to find those edges and add "%z -> node #1 (%y)"
 537       // to keep the lookups canonical.
 538
 539       std::vector<Value *> ToRepoint(1, V);
 540
 541       if (unsigned Conflict = valueNumber(V, Subtree)) {
 542         for (VNMapType::iterator I = VNMap.begin(), E = VNMap.end();
 543              I != E; ++I) {
 544           if (I->index == Conflict && I->Subtree->dominates(Subtree))
 545             ToRepoint.push_back(I->V);
 546         }
 547       }
 548
 549       for (std::vector<Value *>::iterator VI = ToRepoint.begin(),
 550            VE = ToRepoint.end(); VI != VE; ++VI) {
 551         Value *V = *VI;
 552
 553         VNPair pair(V, n, Subtree);
 554         VNMapType::iterator B = VNMap.begin(), E = VNMap.end();
 555         VNMapType::iterator I = std::lower_bound(B, E, pair);
 556         if (I != E && I->V == V && I->Subtree == Subtree)
 557           I->index = n; // Update best choice
 558         else
 559           VNMap.insert(I, pair); // New Value
 560
 561         // XXX: we currently don't have to worry about updating values with
 562         // more specific Subtrees, but we will need to for PHI node support.
 563
 564 #ifndef NDEBUG
 565         Value *V_n = value(n);
 566         if (isa<Constant>(V) && isa<Constant>(V_n)) {
 567           assert(V == V_n && "Constant equals different constant?");
 568         }
 569 #endif
 570       }
 571     }
 572
 573     /// remove - removes all references to value V.
 574     void remove(Value *V) {
 575       VNMapType::iterator B = VNMap.begin(), E = VNMap.end();
 576       VNPair pair(V, 0, DTDFS->getRootNode());
 577       VNMapType::iterator J = std::upper_bound(B, E, pair);
 578       VNMapType::iterator I = J;
 579
 580       while (I != B && (I == E || I->V == V)) --I;
 581
 582       VNMap.erase(I, J);
 583     }
 584   };
 585
 586   /// The InequalityGraph stores the relationships between values.
 587   /// Each Value in the graph is assigned to a Node. Nodes are pointer
 588   /// comparable for equality. The caller is expected to maintain the logical
 589   /// consistency of the system.
 590   ///
 591   /// The InequalityGraph class may invalidate Node*s after any mutator call.
 592   /// @brief The InequalityGraph stores the relationships between values.
 593   class VISIBILITY_HIDDEN InequalityGraph {
 594     ValueNumbering &VN;
 595     DomTreeDFS::Node *TreeRoot;
 596
 597     InequalityGraph();                  // DO NOT IMPLEMENT
 598     InequalityGraph(InequalityGraph &); // DO NOT IMPLEMENT
 599   public:
 600     InequalityGraph(ValueNumbering &VN, DomTreeDFS::Node *TreeRoot)
 601       : VN(VN), TreeRoot(TreeRoot) {}
 602
 603     class Node;
 604
 605     /// An Edge is contained inside a Node making one end of the edge implicit
 606     /// and contains a pointer to the other end. The edge contains a lattice
 607     /// value specifying the relationship and an DomTreeDFS::Node specifying
 608     /// the root in the dominator tree to which this edge applies.
 609     class VISIBILITY_HIDDEN Edge {
 610     public:
 611       Edge(unsigned T, LatticeVal V, DomTreeDFS::Node *ST)
 612         : To(T), LV(V), Subtree(ST) {}
 613
 614       unsigned To;
 615       LatticeVal LV;
 616       DomTreeDFS::Node *Subtree;
 617
 618       bool operator<(const Edge &edge) const {
 619         if (To != edge.To) return To < edge.To;
 620         return *Subtree < *edge.Subtree;
 621       }
 622
 623       bool operator<(unsigned to) const {
 624         return To < to;
 625       }
 626
 627       bool operator>(unsigned to) const {
 628         return To > to;
 629       }
 630
 631       friend bool operator<(unsigned to, const Edge &edge) {
 632         return edge.operator>(to);
 633       }
 634     };
 635
 636     /// A single node in the InequalityGraph. This stores the canonical Value
 637     /// for the node, as well as the relationships with the neighbours.
 638     ///
 639     /// @brief A single node in the InequalityGraph.
 640     class VISIBILITY_HIDDEN Node {
 641       friend class InequalityGraph;
 642
 643       typedef SmallVector<Edge, 4> RelationsType;
 644       RelationsType Relations;
 645
 646       // TODO: can this idea improve performance?
 647       //friend class std::vector<Node>;
 648       //Node(Node &N) { RelationsType.swap(N.RelationsType); }
 649
 650     public:
 651       typedef RelationsType::iterator       iterator;
 652       typedef RelationsType::const_iterator const_iterator;
 653
 654 #ifndef NDEBUG
 655       virtual ~Node() {}
 656       virtual void dump() const {
 657         dump(*cerr.stream());
 658       }
 659     private:
 660       void dump(std::ostream &os) const {
 661         static const std::string names[32] =
 662           { "000000", "000001", "000002", "000003", "000004", "000005",
 663             "000006", "000007", "000008", "000009", "     >", "    >=",
 664             "  s>u<", "s>=u<=", "    s>", "   s>=", "000016", "000017",
 665             "  s<u>", "s<=u>=", "     <", "    <=", "    s<", "   s<=",
 666             "000024", "000025", "    u>", "   u>=", "    u<", "   u<=",
 667             "    !=", "000031" };
 668         for (Node::const_iterator NI = begin(), NE = end(); NI != NE; ++NI) {
 669           os << names[NI->LV] << " " << NI->To
 670              << " (" << NI->Subtree->getDFSNumIn() << "), ";
 671         }
 672       }
 673     public:
 674 #endif
 675
 676       iterator begin()             { return Relations.begin(); }
 677       iterator end()               { return Relations.end();   }
 678       const_iterator begin() const { return Relations.begin(); }
 679       const_iterator end()   const { return Relations.end();   }
 680
 681       iterator find(unsigned n, DomTreeDFS::Node *Subtree) {
 682         iterator E = end();
 683         for (iterator I = std::lower_bound(begin(), E, n);
 684              I != E && I->To == n; ++I) {
 685           if (Subtree->DominatedBy(I->Subtree))
 686             return I;
 687         }
 688         return E;
 689       }
 690
 691       const_iterator find(unsigned n, DomTreeDFS::Node *Subtree) const {
 692         const_iterator E = end();
 693         for (const_iterator I = std::lower_bound(begin(), E, n);
 694              I != E && I->To == n; ++I) {
 695           if (Subtree->DominatedBy(I->Subtree))
 696             return I;
 697         }
 698         return E;
 699       }
 700
 701       /// update - updates the lattice value for a given node, creating a new
 702       /// entry if one doesn't exist. The new lattice value must not be
 703       /// inconsistent with any previously existing value.
 704       void update(unsigned n, LatticeVal R, DomTreeDFS::Node *Subtree) {
 705         assert(validPredicate(R) && "Invalid predicate.");
 706
 707         Edge edge(n, R, Subtree);
 708         iterator B = begin(), E = end();
 709         iterator I = std::lower_bound(B, E, edge);
 710
 711         iterator J = I;
 712         while (J != E && J->To == n) {
 713           if (Subtree->DominatedBy(J->Subtree))
 714             break;
 715           ++J;
 716         }
 717
 718         if (J != E && J->To == n) {
 719           edge.LV = static_cast<LatticeVal>(J->LV & R);
 720           assert(validPredicate(edge.LV) && "Invalid union of lattice values.");
 721
 722           if (edge.LV == J->LV)
 723             return; // This update adds nothing new.
 724         }
 725
 726         if (I != B) {
 727           // We also have to tighten any edge beneath our update.
 728           for (iterator K = I - 1; K->To == n; --K) {
 729             if (K->Subtree->DominatedBy(Subtree)) {
 730               LatticeVal LV = static_cast<LatticeVal>(K->LV & edge.LV);
 731               assert(validPredicate(LV) && "Invalid union of lattice values");
 732               K->LV = LV;
 733             }
 734             if (K == B) break;
 735           }
 736         }
 737
 738         // Insert new edge at Subtree if it isn't already there.
 739         if (I == E || I->To != n || Subtree != I->Subtree)
 740           Relations.insert(I, edge);
 741       }
 742     };
 743
 744   private:
 745
 746     std::vector<Node> Nodes;
 747
 748   public:
 749     /// node - returns the node object at a given value number. The pointer
 750     /// returned may be invalidated on the next call to node().
 751     Node *node(unsigned index) {
 752       assert(VN.value(index)); // This triggers the necessary checks.
 753       if (Nodes.size() < index) Nodes.resize(index);
 754       return &Nodes[index-1];
 755     }
 756
 757     /// isRelatedBy - true iff n1 op n2
 758     bool isRelatedBy(unsigned n1, unsigned n2, DomTreeDFS::Node *Subtree,
 759                      LatticeVal LV) {
 760       if (n1 == n2) return LV & EQ_BIT;
 761
 762       Node *N1 = node(n1);
 763       Node::iterator I = N1->find(n2, Subtree), E = N1->end();
 764       if (I != E) return (I->LV & LV) == I->LV;
 765
 766       return false;
 767     }
 768
 769     // The add* methods assume that your input is logically valid and may
 770     // assertion-fail or infinitely loop if you attempt a contradiction.
 771
 772     /// addInequality - Sets n1 op n2.
 773     /// It is also an error to call this on an inequality that is already true.
 774     void addInequality(unsigned n1, unsigned n2, DomTreeDFS::Node *Subtree,
 775                        LatticeVal LV1) {
 776       assert(n1 != n2 && "A node can't be inequal to itself.");
 777
 778       if (LV1 != NE)
 779         assert(!isRelatedBy(n1, n2, Subtree, reversePredicate(LV1)) &&
 780                "Contradictory inequality.");
 781
 782       // Suppose we're adding %n1 < %n2. Find all the %a < %n1 and
 783       // add %a < %n2 too. This keeps the graph fully connected.
 784       if (LV1 != NE) {
 785         // Break up the relationship into signed and unsigned comparison parts.
 786         // If the signed parts of %a op1 %n1 match that of %n1 op2 %n2, and
 787         // op1 and op2 aren't NE, then add %a op3 %n2. The new relationship
 788         // should have the EQ_BIT iff it's set for both op1 and op2.
 789
 790         unsigned LV1_s = LV1 & (SLT_BIT|SGT_BIT);
 791         unsigned LV1_u = LV1 & (ULT_BIT|UGT_BIT);
 792
 793         for (Node::iterator I = node(n1)->begin(), E = node(n1)->end(); I != E; ++I) {
 794           if (I->LV != NE && I->To != n2) {
 795
 796             DomTreeDFS::Node *Local_Subtree = NULL;
 797             if (Subtree->DominatedBy(I->Subtree))
 798               Local_Subtree = Subtree;
 799             else if (I->Subtree->DominatedBy(Subtree))
 800               Local_Subtree = I->Subtree;
 801
 802             if (Local_Subtree) {
 803               unsigned new_relationship = 0;
 804               LatticeVal ILV = reversePredicate(I->LV);
 805               unsigned ILV_s = ILV & (SLT_BIT|SGT_BIT);
 806               unsigned ILV_u = ILV & (ULT_BIT|UGT_BIT);
 807
 808               if (LV1_s != (SLT_BIT|SGT_BIT) && ILV_s == LV1_s)
 809                 new_relationship |= ILV_s;
 810               if (LV1_u != (ULT_BIT|UGT_BIT) && ILV_u == LV1_u)
 811                 new_relationship |= ILV_u;
 812
 813               if (new_relationship) {
 814                 if ((new_relationship & (SLT_BIT|SGT_BIT)) == 0)
 815                   new_relationship |= (SLT_BIT|SGT_BIT);
 816                 if ((new_relationship & (ULT_BIT|UGT_BIT)) == 0)
 817                   new_relationship |= (ULT_BIT|UGT_BIT);
 818                 if ((LV1 & EQ_BIT) && (ILV & EQ_BIT))
 819                   new_relationship |= EQ_BIT;
 820
 821                 LatticeVal NewLV = static_cast<LatticeVal>(new_relationship);
 822
 823                 node(I->To)->update(n2, NewLV, Local_Subtree);
 824                 node(n2)->update(I->To, reversePredicate(NewLV), Local_Subtree);
 825               }
 826             }
 827           }
 828         }
 829
 830         for (Node::iterator I = node(n2)->begin(), E = node(n2)->end(); I != E; ++I) {
 831           if (I->LV != NE && I->To != n1) {
 832             DomTreeDFS::Node *Local_Subtree = NULL;
 833             if (Subtree->DominatedBy(I->Subtree))
 834               Local_Subtree = Subtree;
 835             else if (I->Subtree->DominatedBy(Subtree))
 836               Local_Subtree = I->Subtree;
 837
 838             if (Local_Subtree) {
 839               unsigned new_relationship = 0;
 840               unsigned ILV_s = I->LV & (SLT_BIT|SGT_BIT);
 841               unsigned ILV_u = I->LV & (ULT_BIT|UGT_BIT);
 842
 843               if (LV1_s != (SLT_BIT|SGT_BIT) && ILV_s == LV1_s)
 844                 new_relationship |= ILV_s;
 845
 846               if (LV1_u != (ULT_BIT|UGT_BIT) && ILV_u == LV1_u)
 847                 new_relationship |= ILV_u;
 848
 849               if (new_relationship) {
 850                 if ((new_relationship & (SLT_BIT|SGT_BIT)) == 0)
 851                   new_relationship |= (SLT_BIT|SGT_BIT);
 852                 if ((new_relationship & (ULT_BIT|UGT_BIT)) == 0)
 853                   new_relationship |= (ULT_BIT|UGT_BIT);
 854                 if ((LV1 & EQ_BIT) && (I->LV & EQ_BIT))
 855                   new_relationship |= EQ_BIT;
 856
 857                 LatticeVal NewLV = static_cast<LatticeVal>(new_relationship);
 858
 859                 node(n1)->update(I->To, NewLV, Local_Subtree);
 860                 node(I->To)->update(n1, reversePredicate(NewLV), Local_Subtree);
 861               }
 862             }
 863           }
 864         }
 865       }
 866
 867       node(n1)->update(n2, LV1, Subtree);
 868       node(n2)->update(n1, reversePredicate(LV1), Subtree);
 869     }
 870
 871     /// remove - removes a node from the graph by removing all references to
 872     /// and from it.
 873     void remove(unsigned n) {
 874       Node *N = node(n);
 875       for (Node::iterator NI = N->begin(), NE = N->end(); NI != NE; ++NI) {
 876         Node::iterator Iter = node(NI->To)->find(n, TreeRoot);
 877         do {
 878           node(NI->To)->Relations.erase(Iter);
 879           Iter = node(NI->To)->find(n, TreeRoot);
 880         } while (Iter != node(NI->To)->end());
 881       }
 882       N->Relations.clear();
 883     }
 884
 885 #ifndef NDEBUG
 886     virtual ~InequalityGraph() {}
 887     virtual void dump() {
 888       dump(*cerr.stream());
 889     }
 890
 891     void dump(std::ostream &os) {
 892       for (unsigned i = 1; i <= Nodes.size(); ++i) {
 893         os << i << " = {";
 894         node(i)->dump(os);
 895         os << "}\n";
 896       }
 897     }
 898 #endif
 899   };
 900
 901   class VRPSolver;
 902
 903   /// ValueRanges tracks the known integer ranges and anti-ranges of the nodes
 904   /// in the InequalityGraph.
 905   class VISIBILITY_HIDDEN ValueRanges {
 906     ValueNumbering &VN;
 907     TargetData *TD;
 908     LLVMContext *Context;
 909
 910     class VISIBILITY_HIDDEN ScopedRange {
 911       typedef std::vector<std::pair<DomTreeDFS::Node *, ConstantRange> >
 912               RangeListType;
 913       RangeListType RangeList;
 914
 915       static bool swo(const std::pair<DomTreeDFS::Node *, ConstantRange> &LHS,
 916                       const std::pair<DomTreeDFS::Node *, ConstantRange> &RHS) {
 917         return *LHS.first < *RHS.first;
 918       }
 919
 920     public:
 921 #ifndef NDEBUG
 922       virtual ~ScopedRange() {}
 923       virtual void dump() const {
 924         dump(*cerr.stream());
 925       }
 926
 927       void dump(std::ostream &os) const {
 928         os << "{";
 929         for (const_iterator I = begin(), E = end(); I != E; ++I) {
 930           os << &I->second << " (" << I->first->getDFSNumIn() << "), ";
 931         }
 932         os << "}";
 933       }
 934 #endif
 935
 936       typedef RangeListType::iterator       iterator;
 937       typedef RangeListType::const_iterator const_iterator;
 938
 939       iterator begin() { return RangeList.begin(); }
 940       iterator end()   { return RangeList.end(); }
 941       const_iterator begin() const { return RangeList.begin(); }
 942       const_iterator end()   const { return RangeList.end(); }
 943
 944       iterator find(DomTreeDFS::Node *Subtree) {
 945         iterator E = end();
 946         iterator I = std::lower_bound(begin(), E,
 947                                       std::make_pair(Subtree, empty), swo);
 948
 949         while (I != E && !I->first->dominates(Subtree)) ++I;
 950         return I;
 951       }
 952
 953       const_iterator find(DomTreeDFS::Node *Subtree) const {
 954         const_iterator E = end();
 955         const_iterator I = std::lower_bound(begin(), E,
 956                                             std::make_pair(Subtree, empty), swo);
 957
 958         while (I != E && !I->first->dominates(Subtree)) ++I;
 959         return I;
 960       }
 961
 962       void update(const ConstantRange &CR, DomTreeDFS::Node *Subtree) {
 963         assert(!CR.isEmptySet() && "Empty ConstantRange.");
 964         assert(!CR.isSingleElement() && "Refusing to store single element.");
 965
 966         iterator E = end();
 967         iterator I =
 968             std::lower_bound(begin(), E, std::make_pair(Subtree, empty), swo);
 969
 970         if (I != end() && I->first == Subtree) {
 971           ConstantRange CR2 = I->second.intersectWith(CR);
 972           assert(!CR2.isEmptySet() && !CR2.isSingleElement() &&
 973                  "Invalid union of ranges.");
 974           I->second = CR2;
 975         } else
 976           RangeList.insert(I, std::make_pair(Subtree, CR));
 977       }
 978     };
 979
 980     std::vector<ScopedRange> Ranges;
 981
 982     void update(unsigned n, const ConstantRange &CR, DomTreeDFS::Node *Subtree){
 983       if (CR.isFullSet()) return;
 984       if (Ranges.size() < n) Ranges.resize(n);
 985       Ranges[n-1].update(CR, Subtree);
 986     }
 987
 988     /// create - Creates a ConstantRange that matches the given LatticeVal
 989     /// relation with a given integer.
 990     ConstantRange create(LatticeVal LV, const ConstantRange &CR) {
 991       assert(!CR.isEmptySet() && "Can't deal with empty set.");
 992
 993       if (LV == NE)
 994         return ConstantRange::makeICmpRegion(ICmpInst::ICMP_NE, CR);
 995
 996       unsigned LV_s = LV & (SGT_BIT|SLT_BIT);
 997       unsigned LV_u = LV & (UGT_BIT|ULT_BIT);
 998       bool hasEQ = LV & EQ_BIT;
 999
1000       ConstantRange Range(CR.getBitWidth());
1001
1002       if (LV_s == SGT_BIT) {
1003         Range = Range.intersectWith(ConstantRange::makeICmpRegion(
1004                     hasEQ ? ICmpInst::ICMP_SGE : ICmpInst::ICMP_SGT, CR));
1005       } else if (LV_s == SLT_BIT) {
1006         Range = Range.intersectWith(ConstantRange::makeICmpRegion(
1007                     hasEQ ? ICmpInst::ICMP_SLE : ICmpInst::ICMP_SLT, CR));
1008       }
1009
1010       if (LV_u == UGT_BIT) {
1011         Range = Range.intersectWith(ConstantRange::makeICmpRegion(
1012                     hasEQ ? ICmpInst::ICMP_UGE : ICmpInst::ICMP_UGT, CR));
1013       } else if (LV_u == ULT_BIT) {
1014         Range = Range.intersectWith(ConstantRange::makeICmpRegion(
1015                     hasEQ ? ICmpInst::ICMP_ULE : ICmpInst::ICMP_ULT, CR));
1016       }
1017
1018       return Range;
1019     }
1020
1021 #ifndef NDEBUG
1022     bool isCanonical(Value *V, DomTreeDFS::Node *Subtree) {
1023       return V == VN.canonicalize(V, Subtree);
1024     }
1025 #endif
1026
1027   public:
1028
1029     ValueRanges(ValueNumbering &VN, TargetData *TD, LLVMContext *C) :
1030       VN(VN), TD(TD), Context(C) {}
1031
1032 #ifndef NDEBUG
1033     virtual ~ValueRanges() {}
1034
1035     virtual void dump() const {
1036       dump(*cerr.stream());
1037     }
1038
1039     void dump(std::ostream &os) const {
1040       for (unsigned i = 0, e = Ranges.size(); i != e; ++i) {
1041         os << (i+1) << " = ";
1042         Ranges[i].dump(os);
1043         os << "\n";
1044       }
1045     }
1046 #endif
1047
1048     /// range - looks up the ConstantRange associated with a value number.
1049     ConstantRange range(unsigned n, DomTreeDFS::Node *Subtree) {
1050       assert(VN.value(n)); // performs range checks
1051
1052       if (n <= Ranges.size()) {
1053         ScopedRange::iterator I = Ranges[n-1].find(Subtree);
1054         if (I != Ranges[n-1].end()) return I->second;
1055       }
1056
1057       Value *V = VN.value(n);
1058       ConstantRange CR = range(V);
1059       return CR;
1060     }
1061
1062     /// range - determine a range from a Value without performing any lookups.
1063     ConstantRange range(Value *V) const {
1064       if (ConstantInt *C = dyn_cast<ConstantInt>(V))
1065         return ConstantRange(C->getValue());
1066       else if (isa<ConstantPointerNull>(V))
1067         return ConstantRange(APInt::getNullValue(typeToWidth(V->getType())));
1068       else
1069         return ConstantRange(typeToWidth(V->getType()));
1070     }
1071
1072     // typeToWidth - returns the number of bits necessary to store a value of
1073     // this type, or zero if unknown.
1074     uint32_t typeToWidth(const Type *Ty) const {
1075       if (TD)
1076         return TD->getTypeSizeInBits(Ty);
1077       else
1078         return Ty->getPrimitiveSizeInBits();
1079     }
1080
1081     static bool isRelatedBy(const ConstantRange &CR1, const ConstantRange &CR2,
1082                             LatticeVal LV) {
1083       switch (LV) {
1084       default: assert(!"Impossible lattice value!");
1085       case NE:
1086         return CR1.intersectWith(CR2).isEmptySet();
1087       case ULT:
1088         return CR1.getUnsignedMax().ult(CR2.getUnsignedMin());
1089       case ULE:
1090         return CR1.getUnsignedMax().ule(CR2.getUnsignedMin());
1091       case UGT:
1092         return CR1.getUnsignedMin().ugt(CR2.getUnsignedMax());
1093       case UGE:
1094         return CR1.getUnsignedMin().uge(CR2.getUnsignedMax());
1095       case SLT:
1096         return CR1.getSignedMax().slt(CR2.getSignedMin());
1097       case SLE:
1098         return CR1.getSignedMax().sle(CR2.getSignedMin());
1099       case SGT:
1100         return CR1.getSignedMin().sgt(CR2.getSignedMax());
1101       case SGE:
1102         return CR1.getSignedMin().sge(CR2.getSignedMax());
1103       case LT:
1104         return CR1.getUnsignedMax().ult(CR2.getUnsignedMin()) &&
1105                CR1.getSignedMax().slt(CR2.getUnsignedMin());
1106       case LE:
1107         return CR1.getUnsignedMax().ule(CR2.getUnsignedMin()) &&
1108                CR1.getSignedMax().sle(CR2.getUnsignedMin());
1109       case GT:
1110         return CR1.getUnsignedMin().ugt(CR2.getUnsignedMax()) &&
1111                CR1.getSignedMin().sgt(CR2.getSignedMax());
1112       case GE:
1113         return CR1.getUnsignedMin().uge(CR2.getUnsignedMax()) &&
1114                CR1.getSignedMin().sge(CR2.getSignedMax());
1115       case SLTUGT:
1116         return CR1.getSignedMax().slt(CR2.getSignedMin()) &&
1117                CR1.getUnsignedMin().ugt(CR2.getUnsignedMax());
1118       case SLEUGE:
1119         return CR1.getSignedMax().sle(CR2.getSignedMin()) &&
1120                CR1.getUnsignedMin().uge(CR2.getUnsignedMax());
1121       case SGTULT:
1122         return CR1.getSignedMin().sgt(CR2.getSignedMax()) &&
1123                CR1.getUnsignedMax().ult(CR2.getUnsignedMin());
1124       case SGEULE:
1125         return CR1.getSignedMin().sge(CR2.getSignedMax()) &&
1126                CR1.getUnsignedMax().ule(CR2.getUnsignedMin());
1127       }
1128     }
1129
1130     bool isRelatedBy(unsigned n1, unsigned n2, DomTreeDFS::Node *Subtree,
1131                      LatticeVal LV) {
1132       ConstantRange CR1 = range(n1, Subtree);
1133       ConstantRange CR2 = range(n2, Subtree);
1134
1135       // True iff all values in CR1 are LV to all values in CR2.
1136       return isRelatedBy(CR1, CR2, LV);
1137     }
1138
1139     void addToWorklist(Value *V, Constant *C, ICmpInst::Predicate Pred,
1140                        VRPSolver *VRP);
1141     void markBlock(VRPSolver *VRP);
1142
1143     void mergeInto(Value **I, unsigned n, unsigned New,
1144                    DomTreeDFS::Node *Subtree, VRPSolver *VRP) {
1145       ConstantRange CR_New = range(New, Subtree);
1146       ConstantRange Merged = CR_New;
1147
1148       for (; n != 0; ++I, --n) {
1149         unsigned i = VN.valueNumber(*I, Subtree);
1150         ConstantRange CR_Kill = i ? range(i, Subtree) : range(*I);
1151         if (CR_Kill.isFullSet()) continue;
1152         Merged = Merged.intersectWith(CR_Kill);
1153       }
1154
1155       if (Merged.isFullSet() || Merged == CR_New) return;
1156
1157       applyRange(New, Merged, Subtree, VRP);
1158     }
1159
1160     void applyRange(unsigned n, const ConstantRange &CR,
1161                     DomTreeDFS::Node *Subtree, VRPSolver *VRP) {
1162       ConstantRange Merged = CR.intersectWith(range(n, Subtree));
1163       if (Merged.isEmptySet()) {
1164         markBlock(VRP);
1165         return;
1166       }
1167
1168       if (const APInt *I = Merged.getSingleElement()) {
1169         Value *V = VN.value(n); // XXX: redesign worklist.
1170         const Type *Ty = V->getType();
1171         if (Ty->isInteger()) {
1172           addToWorklist(V, Context->getConstantInt(*I), ICmpInst::ICMP_EQ, VRP);
1173           return;
1174         } else if (const PointerType *PTy = dyn_cast<PointerType>(Ty)) {
1175           assert(*I == 0 && "Pointer is null but not zero?");
1176           addToWorklist(V, ConstantPointerNull::get(PTy),
1177                         ICmpInst::ICMP_EQ, VRP);
1178           return;
1179         }
1180       }
1181
1182       update(n, Merged, Subtree);
1183     }
1184
1185     void addNotEquals(unsigned n1, unsigned n2, DomTreeDFS::Node *Subtree,
1186                       VRPSolver *VRP) {
1187       ConstantRange CR1 = range(n1, Subtree);
1188       ConstantRange CR2 = range(n2, Subtree);
1189
1190       uint32_t W = CR1.getBitWidth();
1191
1192       if (const APInt *I = CR1.getSingleElement()) {
1193         if (CR2.isFullSet()) {
1194           ConstantRange NewCR2(CR1.getUpper(), CR1.getLower());
1195           applyRange(n2, NewCR2, Subtree, VRP);
1196         } else if (*I == CR2.getLower()) {
1197           APInt NewLower(CR2.getLower() + 1),
1198                 NewUpper(CR2.getUpper());
1199           if (NewLower == NewUpper)
1200             NewLower = NewUpper = APInt::getMinValue(W);
1201
1202           ConstantRange NewCR2(NewLower, NewUpper);
1203           applyRange(n2, NewCR2, Subtree, VRP);
1204         } else if (*I == CR2.getUpper() - 1) {
1205           APInt NewLower(CR2.getLower()),
1206                 NewUpper(CR2.getUpper() - 1);
1207           if (NewLower == NewUpper)
1208             NewLower = NewUpper = APInt::getMinValue(W);
1209
1210           ConstantRange NewCR2(NewLower, NewUpper);
1211           applyRange(n2, NewCR2, Subtree, VRP);
1212         }
1213       }
1214
1215       if (const APInt *I = CR2.getSingleElement()) {
1216         if (CR1.isFullSet()) {
1217           ConstantRange NewCR1(CR2.getUpper(), CR2.getLower());
1218           applyRange(n1, NewCR1, Subtree, VRP);
1219         } else if (*I == CR1.getLower()) {
1220           APInt NewLower(CR1.getLower() + 1),
1221                 NewUpper(CR1.getUpper());
1222           if (NewLower == NewUpper)
1223             NewLower = NewUpper = APInt::getMinValue(W);
1224
1225           ConstantRange NewCR1(NewLower, NewUpper);
1226           applyRange(n1, NewCR1, Subtree, VRP);
1227         } else if (*I == CR1.getUpper() - 1) {
1228           APInt NewLower(CR1.getLower()),
1229                 NewUpper(CR1.getUpper() - 1);
1230           if (NewLower == NewUpper)
1231             NewLower = NewUpper = APInt::getMinValue(W);
1232
1233           ConstantRange NewCR1(NewLower, NewUpper);
1234           applyRange(n1, NewCR1, Subtree, VRP);
1235         }
1236       }
1237     }
1238
1239     void addInequality(unsigned n1, unsigned n2, DomTreeDFS::Node *Subtree,
1240                        LatticeVal LV, VRPSolver *VRP) {
1241       assert(!isRelatedBy(n1, n2, Subtree, LV) && "Asked to do useless work.");
1242
1243       if (LV == NE) {
1244         addNotEquals(n1, n2, Subtree, VRP);
1245         return;
1246       }
1247
1248       ConstantRange CR1 = range(n1, Subtree);
1249       ConstantRange CR2 = range(n2, Subtree);
1250
1251       if (!CR1.isSingleElement()) {
1252         ConstantRange NewCR1 = CR1.intersectWith(create(LV, CR2));
1253         if (NewCR1 != CR1)
1254           applyRange(n1, NewCR1, Subtree, VRP);
1255       }
1256
1257       if (!CR2.isSingleElement()) {
1258         ConstantRange NewCR2 = CR2.intersectWith(
1259                                        create(reversePredicate(LV), CR1));
1260         if (NewCR2 != CR2)
1261           applyRange(n2, NewCR2, Subtree, VRP);
1262       }
1263     }
1264   };
1265
1266   /// UnreachableBlocks keeps tracks of blocks that are for one reason or
1267   /// another discovered to be unreachable. This is used to cull the graph when
1268   /// analyzing instructions, and to mark blocks with the "unreachable"
1269   /// terminator instruction after the function has executed.
1270   class VISIBILITY_HIDDEN UnreachableBlocks {
1271   private:
1272     std::vector<BasicBlock *> DeadBlocks;
1273
1274   public:
1275     /// mark - mark a block as dead
1276     void mark(BasicBlock *BB) {
1277       std::vector<BasicBlock *>::iterator E = DeadBlocks.end();
1278       std::vector<BasicBlock *>::iterator I =
1279         std::lower_bound(DeadBlocks.begin(), E, BB);
1280
1281       if (I == E || *I != BB) DeadBlocks.insert(I, BB);
1282     }
1283
1284     /// isDead - returns whether a block is known to be dead already
1285     bool isDead(BasicBlock *BB) {
1286       std::vector<BasicBlock *>::iterator E = DeadBlocks.end();
1287       std::vector<BasicBlock *>::iterator I =
1288         std::lower_bound(DeadBlocks.begin(), E, BB);
1289
1290       return I != E && *I == BB;
1291     }
1292
1293     /// kill - replace the dead blocks' terminator with an UnreachableInst.
1294     bool kill() {
1295       bool modified = false;
1296       for (std::vector<BasicBlock *>::iterator I = DeadBlocks.begin(),
1297            E = DeadBlocks.end(); I != E; ++I) {
1298         BasicBlock *BB = *I;
1299
1300         DOUT << "unreachable block: " << BB->getName() << "\n";
1301
1302         for (succ_iterator SI = succ_begin(BB), SE = succ_end(BB);
1303              SI != SE; ++SI) {
1304           BasicBlock *Succ = *SI;
1305           Succ->removePredecessor(BB);
1306         }
1307
1308         TerminatorInst *TI = BB->getTerminator();
1309         TI->replaceAllUsesWith(UndefValue::get(TI->getType()));
1310         TI->eraseFromParent();
1311         new UnreachableInst(BB);
1312         ++NumBlocks;
1313         modified = true;
1314       }
1315       DeadBlocks.clear();
1316       return modified;
1317     }
1318   };
1319
1320   /// VRPSolver keeps track of how changes to one variable affect other
1321   /// variables, and forwards changes along to the InequalityGraph. It
1322   /// also maintains the correct choice for "canonical" in the IG.
1323   /// @brief VRPSolver calculates inferences from a new relationship.
1324   class VISIBILITY_HIDDEN VRPSolver {
1325   private:
1326     friend class ValueRanges;
1327
1328     struct Operation {
1329       Value *LHS, *RHS;
1330       ICmpInst::Predicate Op;
1331
1332       BasicBlock *ContextBB; // XXX use a DomTreeDFS::Node instead
1333       Instruction *ContextInst;
1334     };
1335     std::deque<Operation> WorkList;
1336
1337     ValueNumbering &VN;
1338     InequalityGraph &IG;
1339     UnreachableBlocks &UB;
1340     ValueRanges &VR;
1341     DomTreeDFS *DTDFS;
1342     DomTreeDFS::Node *Top;
1343     BasicBlock *TopBB;
1344     Instruction *TopInst;
1345     bool &modified;
1346     LLVMContext *Context;
1347
1348     typedef InequalityGraph::Node Node;
1349
1350     // below - true if the Instruction is dominated by the current context
1351     // block or instruction
1352     bool below(Instruction *I) {
1353       BasicBlock *BB = I->getParent();
1354       if (TopInst && TopInst->getParent() == BB) {
1355         if (isa<TerminatorInst>(TopInst)) return false;
1356         if (isa<TerminatorInst>(I)) return true;
1357         if ( isa<PHINode>(TopInst) && !isa<PHINode>(I)) return true;
1358         if (!isa<PHINode>(TopInst) &&  isa<PHINode>(I)) return false;
1359
1360         for (BasicBlock::const_iterator Iter = BB->begin(), E = BB->end();
1361              Iter != E; ++Iter) {
1362           if (&*Iter == TopInst) return true;
1363           else if (&*Iter == I) return false;
1364         }
1365         assert(!"Instructions not found in parent BasicBlock?");
1366       } else {
1367         DomTreeDFS::Node *Node = DTDFS->getNodeForBlock(BB);
1368         if (!Node) return false;
1369         return Top->dominates(Node);
1370       }
1371       return false; // Not reached
1372     }
1373
1374     // aboveOrBelow - true if the Instruction either dominates or is dominated
1375     // by the current context block or instruction
1376     bool aboveOrBelow(Instruction *I) {
1377       BasicBlock *BB = I->getParent();
1378       DomTreeDFS::Node *Node = DTDFS->getNodeForBlock(BB);
1379       if (!Node) return false;
1380
1381       return Top == Node || Top->dominates(Node) || Node->dominates(Top);
1382     }
1383
1384     bool makeEqual(Value *V1, Value *V2) {
1385       DOUT << "makeEqual(" << *V1 << ", " << *V2 << ")\n";
1386       DOUT << "context is ";
1387       if (TopInst) DOUT << "I: " << *TopInst << "\n";
1388       else DOUT << "BB: " << TopBB->getName()
1389                 << "(" << Top->getDFSNumIn() << ")\n";
1390
1391       assert(V1->getType() == V2->getType() &&
1392              "Can't make two values with different types equal.");
1393
1394       if (V1 == V2) return true;
1395
1396       if (isa<Constant>(V1) && isa<Constant>(V2))
1397         return false;
1398
1399       unsigned n1 = VN.valueNumber(V1, Top), n2 = VN.valueNumber(V2, Top);
1400
1401       if (n1 && n2) {
1402         if (n1 == n2) return true;
1403         if (IG.isRelatedBy(n1, n2, Top, NE)) return false;
1404       }
1405
1406       if (n1) assert(V1 == VN.value(n1) && "Value isn't canonical.");
1407       if (n2) assert(V2 == VN.value(n2) && "Value isn't canonical.");
1408
1409       assert(!VN.compare(V2, V1) && "Please order parameters to makeEqual.");
1410
1411       assert(!isa<Constant>(V2) && "Tried to remove a constant.");
1412
1413       SetVector<unsigned> Remove;
1414       if (n2) Remove.insert(n2);
1415
1416       if (n1 && n2) {
1417         // Suppose we're being told that %x == %y, and %x <= %z and %y >= %z.
1418         // We can't just merge %x and %y because the relationship with %z would
1419         // be EQ and that's invalid. What we're doing is looking for any nodes
1420         // %z such that %x <= %z and %y >= %z, and vice versa.
1421
1422         Node::iterator end = IG.node(n2)->end();
1423
1424         // Find the intersection between N1 and N2 which is dominated by
1425         // Top. If we find %x where N1 <= %x <= N2 (or >=) then add %x to
1426         // Remove.
1427         for (Node::iterator I = IG.node(n1)->begin(), E = IG.node(n1)->end();
1428              I != E; ++I) {
1429           if (!(I->LV & EQ_BIT) || !Top->DominatedBy(I->Subtree)) continue;
1430
1431           unsigned ILV_s = I->LV & (SLT_BIT|SGT_BIT);
1432           unsigned ILV_u = I->LV & (ULT_BIT|UGT_BIT);
1433           Node::iterator NI = IG.node(n2)->find(I->To, Top);
1434           if (NI != end) {
1435             LatticeVal NILV = reversePredicate(NI->LV);
1436             unsigned NILV_s = NILV & (SLT_BIT|SGT_BIT);
1437             unsigned NILV_u = NILV & (ULT_BIT|UGT_BIT);
1438
1439             if ((ILV_s != (SLT_BIT|SGT_BIT) && ILV_s == NILV_s) ||
1440                 (ILV_u != (ULT_BIT|UGT_BIT) && ILV_u == NILV_u))
1441               Remove.insert(I->To);
1442           }
1443         }
1444
1445         // See if one of the nodes about to be removed is actually a better
1446         // canonical choice than n1.
1447         unsigned orig_n1 = n1;
1448         SetVector<unsigned>::iterator DontRemove = Remove.end();
1449         for (SetVector<unsigned>::iterator I = Remove.begin()+1 /* skip n2 */,
1450              E = Remove.end(); I != E; ++I) {
1451           unsigned n = *I;
1452           Value *V = VN.value(n);
1453           if (VN.compare(V, V1)) {
1454             V1 = V;
1455             n1 = n;
1456             DontRemove = I;
1457           }
1458         }
1459         if (DontRemove != Remove.end()) {
1460           unsigned n = *DontRemove;
1461           Remove.remove(n);
1462           Remove.insert(orig_n1);
1463         }
1464       }
1465
1466       // We'd like to allow makeEqual on two values to perform a simple
1467       // substitution without creating nodes in the IG whenever possible.
1468       //
1469       // The first iteration through this loop operates on V2 before going
1470       // through the Remove list and operating on those too. If all of the
1471       // iterations performed simple replacements then we exit early.
1472       bool mergeIGNode = false;
1473       unsigned i = 0;
1474       for (Value *R = V2; i == 0 || i < Remove.size(); ++i) {
1475         if (i) R = VN.value(Remove[i]); // skip n2.
1476
1477         // Try to replace the whole instruction. If we can, we're done.
1478         Instruction *I2 = dyn_cast<Instruction>(R);
1479         if (I2 && below(I2)) {
1480           std::vector<Instruction *> ToNotify;
1481           for (Value::use_iterator UI = I2->use_begin(), UE = I2->use_end();
1482                UI != UE;) {
1483             Use &TheUse = UI.getUse();
1484             ++UI;
1485             Instruction *I = cast<Instruction>(TheUse.getUser());
1486             ToNotify.push_back(I);
1487           }
1488
1489           DOUT << "Simply removing " << *I2
1490                << ", replacing with " << *V1 << "\n";
1491           I2->replaceAllUsesWith(V1);
1492           // leave it dead; it'll get erased later.
1493           ++NumInstruction;
1494           modified = true;
1495
1496           for (std::vector<Instruction *>::iterator II = ToNotify.begin(),
1497                IE = ToNotify.end(); II != IE; ++II) {
1498             opsToDef(*II);
1499           }
1500
1501           continue;
1502         }
1503
1504         // Otherwise, replace all dominated uses.
1505         for (Value::use_iterator UI = R->use_begin(), UE = R->use_end();
1506              UI != UE;) {
1507           Use &TheUse = UI.getUse();
1508           ++UI;
1509           if (Instruction *I = dyn_cast<Instruction>(TheUse.getUser())) {
1510             if (below(I)) {
1511               TheUse.set(V1);
1512               modified = true;
1513               ++NumVarsReplaced;
1514               opsToDef(I);
1515             }
1516           }
1517         }
1518
1519         // If that killed the instruction, stop here.
1520         if (I2 && isInstructionTriviallyDead(I2)) {
1521           DOUT << "Killed all uses of " << *I2
1522                << ", replacing with " << *V1 << "\n";
1523           continue;
1524         }
1525
1526         // If we make it to here, then we will need to create a node for N1.
1527         // Otherwise, we can skip out early!
1528         mergeIGNode = true;
1529       }
1530
1531       if (!isa<Constant>(V1)) {
1532         if (Remove.empty()) {
1533           VR.mergeInto(&V2, 1, VN.getOrInsertVN(V1, Top), Top, this);
1534         } else {
1535           std::vector<Value*> RemoveVals;
1536           RemoveVals.reserve(Remove.size());
1537
1538           for (SetVector<unsigned>::iterator I = Remove.begin(),
1539                E = Remove.end(); I != E; ++I) {
1540             Value *V = VN.value(*I);
1541             if (!V->use_empty())
1542               RemoveVals.push_back(V);
1543           }
1544           VR.mergeInto(&RemoveVals[0], RemoveVals.size(),
1545                        VN.getOrInsertVN(V1, Top), Top, this);
1546         }
1547       }
1548
1549       if (mergeIGNode) {
1550         // Create N1.
1551         if (!n1) n1 = VN.getOrInsertVN(V1, Top);
1552         IG.node(n1); // Ensure that IG.Nodes won't get resized
1553
1554         // Migrate relationships from removed nodes to N1.
1555         for (SetVector<unsigned>::iterator I = Remove.begin(), E = Remove.end();
1556              I != E; ++I) {
1557           unsigned n = *I;
1558           for (Node::iterator NI = IG.node(n)->begin(), NE = IG.node(n)->end();
1559                NI != NE; ++NI) {
1560             if (NI->Subtree->DominatedBy(Top)) {
1561               if (NI->To == n1) {
1562                 assert((NI->LV & EQ_BIT) && "Node inequal to itself.");
1563                 continue;
1564               }
1565               if (Remove.count(NI->To))
1566                 continue;
1567
1568               IG.node(NI->To)->update(n1, reversePredicate(NI->LV), Top);
1569               IG.node(n1)->update(NI->To, NI->LV, Top);
1570             }
1571           }
1572         }
1573
1574         // Point V2 (and all items in Remove) to N1.
1575         if (!n2)
1576           VN.addEquality(n1, V2, Top);
1577         else {
1578           for (SetVector<unsigned>::iterator I = Remove.begin(),
1579                E = Remove.end(); I != E; ++I) {
1580             VN.addEquality(n1, VN.value(*I), Top);
1581           }
1582         }
1583
1584         // If !Remove.empty() then V2 = Remove[0]->getValue().
1585         // Even when Remove is empty, we still want to process V2.
1586         i = 0;
1587         for (Value *R = V2; i == 0 || i < Remove.size(); ++i) {
1588           if (i) R = VN.value(Remove[i]); // skip n2.
1589
1590           if (Instruction *I2 = dyn_cast<Instruction>(R)) {
1591             if (aboveOrBelow(I2))
1592             defToOps(I2);
1593           }
1594           for (Value::use_iterator UI = V2->use_begin(), UE = V2->use_end();
1595                UI != UE;) {
1596             Use &TheUse = UI.getUse();
1597             ++UI;
1598             if (Instruction *I = dyn_cast<Instruction>(TheUse.getUser())) {
1599               if (aboveOrBelow(I))
1600                 opsToDef(I);
1601             }
1602           }
1603         }
1604       }
1605
1606       // re-opsToDef all dominated users of V1.
1607       if (Instruction *I = dyn_cast<Instruction>(V1)) {
1608         for (Value::use_iterator UI = I->use_begin(), UE = I->use_end();
1609              UI != UE;) {
1610           Use &TheUse = UI.getUse();
1611           ++UI;
1612           Value *V = TheUse.getUser();
1613           if (!V->use_empty()) {
1614             Instruction *Inst = cast<Instruction>(V);
1615             if (aboveOrBelow(Inst))
1616               opsToDef(Inst);
1617           }
1618         }
1619       }
1620
1621       return true;
1622     }
1623
1624     /// cmpInstToLattice - converts an CmpInst::Predicate to lattice value
1625     /// Requires that the lattice value be valid; does not accept ICMP_EQ.
1626     static LatticeVal cmpInstToLattice(ICmpInst::Predicate Pred) {
1627       switch (Pred) {
1628         case ICmpInst::ICMP_EQ:
1629           assert(!"No matching lattice value.");
1630           return static_cast<LatticeVal>(EQ_BIT);
1631         default:
1632           assert(!"Invalid 'icmp' predicate.");
1633         case ICmpInst::ICMP_NE:
1634           return NE;
1635         case ICmpInst::ICMP_UGT:
1636           return UGT;
1637         case ICmpInst::ICMP_UGE:
1638           return UGE;
1639         case ICmpInst::ICMP_ULT:
1640           return ULT;
1641         case ICmpInst::ICMP_ULE:
1642           return ULE;
1643         case ICmpInst::ICMP_SGT:
1644           return SGT;
1645         case ICmpInst::ICMP_SGE:
1646           return SGE;
1647         case ICmpInst::ICMP_SLT:
1648           return SLT;
1649         case ICmpInst::ICMP_SLE:
1650           return SLE;
1651       }
1652     }
1653
1654   public:
1655     VRPSolver(ValueNumbering &VN, InequalityGraph &IG, UnreachableBlocks &UB,
1656               ValueRanges &VR, DomTreeDFS *DTDFS, bool &modified,
1657               BasicBlock *TopBB)
1658       : VN(VN),
1659         IG(IG),
1660         UB(UB),
1661         VR(VR),
1662         DTDFS(DTDFS),
1663         Top(DTDFS->getNodeForBlock(TopBB)),
1664         TopBB(TopBB),
1665         TopInst(NULL),
1666         modified(modified),
1667         Context(TopBB->getContext())
1668     {
1669       assert(Top && "VRPSolver created for unreachable basic block.");
1670     }
1671
1672     VRPSolver(ValueNumbering &VN, InequalityGraph &IG, UnreachableBlocks &UB,
1673               ValueRanges &VR, DomTreeDFS *DTDFS, bool &modified,
1674               Instruction *TopInst)
1675       : VN(VN),
1676         IG(IG),
1677         UB(UB),
1678         VR(VR),
1679         DTDFS(DTDFS),
1680         Top(DTDFS->getNodeForBlock(TopInst->getParent())),
1681         TopBB(TopInst->getParent()),
1682         TopInst(TopInst),
1683         modified(modified),
1684         Context(TopInst->getParent()->getContext())
1685     {
1686       assert(Top && "VRPSolver created for unreachable basic block.");
1687       assert(Top->getBlock() == TopInst->getParent() && "Context mismatch.");
1688     }
1689
1690     bool isRelatedBy(Value *V1, Value *V2, ICmpInst::Predicate Pred) const {
1691       if (Constant *C1 = dyn_cast<Constant>(V1))
1692         if (Constant *C2 = dyn_cast<Constant>(V2))
1693           return ConstantExpr::getCompare(Pred, C1, C2) ==
1694                  ConstantInt::getTrue();
1695
1696       unsigned n1 = VN.valueNumber(V1, Top);
1697       unsigned n2 = VN.valueNumber(V2, Top);
1698
1699       if (n1 && n2) {
1700         if (n1 == n2) return Pred == ICmpInst::ICMP_EQ ||
1701                              Pred == ICmpInst::ICMP_ULE ||
1702                              Pred == ICmpInst::ICMP_UGE ||
1703                              Pred == ICmpInst::ICMP_SLE ||
1704                              Pred == ICmpInst::ICMP_SGE;
1705         if (Pred == ICmpInst::ICMP_EQ) return false;
1706         if (IG.isRelatedBy(n1, n2, Top, cmpInstToLattice(Pred))) return true;
1707         if (VR.isRelatedBy(n1, n2, Top, cmpInstToLattice(Pred))) return true;
1708       }
1709
1710       if ((n1 && !n2 && isa<Constant>(V2)) ||
1711           (n2 && !n1 && isa<Constant>(V1))) {
1712         ConstantRange CR1 = n1 ? VR.range(n1, Top) : VR.range(V1);
1713         ConstantRange CR2 = n2 ? VR.range(n2, Top) : VR.range(V2);
1714
1715         if (Pred == ICmpInst::ICMP_EQ)
1716           return CR1.isSingleElement() &&
1717                  CR1.getSingleElement() == CR2.getSingleElement();
1718
1719         return VR.isRelatedBy(CR1, CR2, cmpInstToLattice(Pred));
1720       }
1721       if (Pred == ICmpInst::ICMP_EQ) return V1 == V2;
1722       return false;
1723     }
1724
1725     /// add - adds a new property to the work queue
1726     void add(Value *V1, Value *V2, ICmpInst::Predicate Pred,
1727              Instruction *I = NULL) {
1728       DOUT << "adding " << *V1 << " " << Pred << " " << *V2;
1729       if (I) DOUT << " context: " << *I;
1730       else DOUT << " default context (" << Top->getDFSNumIn() << ")";
1731       DOUT << "\n";
1732
1733       assert(V1->getType() == V2->getType() &&
1734              "Can't relate two values with different types.");
1735
1736       WorkList.push_back(Operation());
1737       Operation &O = WorkList.back();
1738       O.LHS = V1, O.RHS = V2, O.Op = Pred, O.ContextInst = I;
1739       O.ContextBB = I ? I->getParent() : TopBB;
1740     }
1741
1742     /// defToOps - Given an instruction definition that we've learned something
1743     /// new about, find any new relationships between its operands.
1744     void defToOps(Instruction *I) {
1745       Instruction *NewContext = below(I) ? I : TopInst;
1746       Value *Canonical = VN.canonicalize(I, Top);
1747
1748       if (BinaryOperator *BO = dyn_cast<BinaryOperator>(I)) {
1749         const Type *Ty = BO->getType();
1750         assert(!Ty->isFPOrFPVector() && "Float in work queue!");
1751
1752         Value *Op0 = VN.canonicalize(BO->getOperand(0), Top);
1753         Value *Op1 = VN.canonicalize(BO->getOperand(1), Top);
1754
1755         // TODO: "and i32 -1, %x" EQ %y then %x EQ %y.
1756
1757         switch (BO->getOpcode()) {
1758           case Instruction::And: {
1759             // "and i32 %a, %b" EQ -1 then %a EQ -1 and %b EQ -1
1760             ConstantInt *CI = cast<ConstantInt>(Context->getAllOnesValue(Ty));
1761             if (Canonical == CI) {
1762               add(CI, Op0, ICmpInst::ICMP_EQ, NewContext);
1763               add(CI, Op1, ICmpInst::ICMP_EQ, NewContext);
1764             }
1765           } break;
1766           case Instruction::Or: {
1767             // "or i32 %a, %b" EQ 0 then %a EQ 0 and %b EQ 0
1768             Constant *Zero = Context->getNullValue(Ty);
1769             if (Canonical == Zero) {
1770               add(Zero, Op0, ICmpInst::ICMP_EQ, NewContext);
1771               add(Zero, Op1, ICmpInst::ICMP_EQ, NewContext);
1772             }
1773           } break;
1774           case Instruction::Xor: {
1775             // "xor i32 %c, %a" EQ %b then %a EQ %c ^ %b
1776             // "xor i32 %c, %a" EQ %c then %a EQ 0
1777             // "xor i32 %c, %a" NE %c then %a NE 0
1778             // Repeat the above, with order of operands reversed.
1779             Value *LHS = Op0;
1780             Value *RHS = Op1;
1781             if (!isa<Constant>(LHS)) std::swap(LHS, RHS);
1782
1783             if (ConstantInt *CI = dyn_cast<ConstantInt>(Canonical)) {
1784               if (ConstantInt *Arg = dyn_cast<ConstantInt>(LHS)) {
1785                 add(RHS,
1786                     Context->getConstantInt(CI->getValue() ^ Arg->getValue()),
1787                     ICmpInst::ICMP_EQ, NewContext);
1788               }
1789             }
1790             if (Canonical == LHS) {
1791               if (isa<ConstantInt>(Canonical))
1792                 add(RHS, Context->getNullValue(Ty), ICmpInst::ICMP_EQ,
1793                     NewContext);
1794             } else if (isRelatedBy(LHS, Canonical, ICmpInst::ICMP_NE)) {
1795               add(RHS, Context->getNullValue(Ty), ICmpInst::ICMP_NE,
1796                   NewContext);
1797             }
1798           } break;
1799           default:
1800             break;
1801         }
1802       } else if (ICmpInst *IC = dyn_cast<ICmpInst>(I)) {
1803         // "icmp ult i32 %a, %y" EQ true then %a u< y
1804         // etc.
1805
1806         if (Canonical == ConstantInt::getTrue()) {
1807           add(IC->getOperand(0), IC->getOperand(1), IC->getPredicate(),
1808               NewContext);
1809         } else if (Canonical == ConstantInt::getFalse()) {
1810           add(IC->getOperand(0), IC->getOperand(1),
1811               ICmpInst::getInversePredicate(IC->getPredicate()), NewContext);
1812         }
1813       } else if (SelectInst *SI = dyn_cast<SelectInst>(I)) {
1814         if (I->getType()->isFPOrFPVector()) return;
1815
1816         // Given: "%a = select i1 %x, i32 %b, i32 %c"
1817         // %a EQ %b and %b NE %c then %x EQ true
1818         // %a EQ %c and %b NE %c then %x EQ false
1819
1820         Value *True  = SI->getTrueValue();
1821         Value *False = SI->getFalseValue();
1822         if (isRelatedBy(True, False, ICmpInst::ICMP_NE)) {
1823           if (Canonical == VN.canonicalize(True, Top) ||
1824               isRelatedBy(Canonical, False, ICmpInst::ICMP_NE))
1825             add(SI->getCondition(), ConstantInt::getTrue(),
1826                 ICmpInst::ICMP_EQ, NewContext);
1827           else if (Canonical == VN.canonicalize(False, Top) ||
1828                    isRelatedBy(Canonical, True, ICmpInst::ICMP_NE))
1829             add(SI->getCondition(), ConstantInt::getFalse(),
1830                 ICmpInst::ICMP_EQ, NewContext);
1831         }
1832       } else if (GetElementPtrInst *GEPI = dyn_cast<GetElementPtrInst>(I)) {
1833         for (GetElementPtrInst::op_iterator OI = GEPI->idx_begin(),
1834              OE = GEPI->idx_end(); OI != OE; ++OI) {
1835           ConstantInt *Op = dyn_cast<ConstantInt>(VN.canonicalize(*OI, Top));
1836           if (!Op || !Op->isZero()) return;
1837         }
1838         // TODO: The GEPI indices are all zero. Copy from definition to operand,
1839         // jumping the type plane as needed.
1840         if (isRelatedBy(GEPI, Context->getNullValue(GEPI->getType()),
1841                         ICmpInst::ICMP_NE)) {
1842           Value *Ptr = GEPI->getPointerOperand();
1843           add(Ptr, Context->getNullValue(Ptr->getType()), ICmpInst::ICMP_NE,
1844               NewContext);
1845         }
1846       } else if (CastInst *CI = dyn_cast<CastInst>(I)) {
1847         const Type *SrcTy = CI->getSrcTy();
1848
1849         unsigned ci = VN.getOrInsertVN(CI, Top);
1850         uint32_t W = VR.typeToWidth(SrcTy);
1851         if (!W) return;
1852         ConstantRange CR = VR.range(ci, Top);
1853
1854         if (CR.isFullSet()) return;
1855
1856         switch (CI->getOpcode()) {
1857           default: break;
1858           case Instruction::ZExt:
1859           case Instruction::SExt:
1860             VR.applyRange(VN.getOrInsertVN(CI->getOperand(0), Top),
1861                           CR.truncate(W), Top, this);
1862             break;
1863           case Instruction::BitCast:
1864             VR.applyRange(VN.getOrInsertVN(CI->getOperand(0), Top),
1865                           CR, Top, this);
1866             break;
1867         }
1868       }
1869     }
1870
1871     /// opsToDef - A new relationship was discovered involving one of this
1872     /// instruction's operands. Find any new relationship involving the
1873     /// definition, or another operand.
1874     void opsToDef(Instruction *I) {
1875       Instruction *NewContext = below(I) ? I : TopInst;
1876
1877       if (BinaryOperator *BO = dyn_cast<BinaryOperator>(I)) {
1878         Value *Op0 = VN.canonicalize(BO->getOperand(0), Top);
1879         Value *Op1 = VN.canonicalize(BO->getOperand(1), Top);
1880
1881         if (ConstantInt *CI0 = dyn_cast<ConstantInt>(Op0))
1882           if (ConstantInt *CI1 = dyn_cast<ConstantInt>(Op1)) {
1883             add(BO, ConstantExpr::get(BO->getOpcode(), CI0, CI1),
1884                 ICmpInst::ICMP_EQ, NewContext);
1885             return;
1886           }
1887
1888         // "%y = and i1 true, %x" then %x EQ %y
1889         // "%y = or i1 false, %x" then %x EQ %y
1890         // "%x = add i32 %y, 0" then %x EQ %y
1891         // "%x = mul i32 %y, 0" then %x EQ 0
1892
1893         Instruction::BinaryOps Opcode = BO->getOpcode();
1894         const Type *Ty = BO->getType();
1895         assert(!Ty->isFPOrFPVector() && "Float in work queue!");
1896
1897         Constant *Zero = Context->getNullValue(Ty);
1898         Constant *One = Context->getConstantInt(Ty, 1);
1899         ConstantInt *AllOnes = cast<ConstantInt>(Context->getAllOnesValue(Ty));
1900
1901         switch (Opcode) {
1902           default: break;
1903           case Instruction::LShr:
1904           case Instruction::AShr:
1905           case Instruction::Shl:
1906             if (Op1 == Zero) {
1907               add(BO, Op0, ICmpInst::ICMP_EQ, NewContext);
1908               return;
1909             }
1910             break;
1911           case Instruction::Sub:
1912             if (Op1 == Zero) {
1913               add(BO, Op0, ICmpInst::ICMP_EQ, NewContext);
1914               return;
1915             }
1916             if (ConstantInt *CI0 = dyn_cast<ConstantInt>(Op0)) {
1917               unsigned n_ci0 = VN.getOrInsertVN(Op1, Top);
1918               ConstantRange CR = VR.range(n_ci0, Top);
1919               if (!CR.isFullSet()) {
1920                 CR.subtract(CI0->getValue());
1921                 unsigned n_bo = VN.getOrInsertVN(BO, Top);
1922                 VR.applyRange(n_bo, CR, Top, this);
1923                 return;
1924               }
1925             }
1926             if (ConstantInt *CI1 = dyn_cast<ConstantInt>(Op1)) {
1927               unsigned n_ci1 = VN.getOrInsertVN(Op0, Top);
1928               ConstantRange CR = VR.range(n_ci1, Top);
1929               if (!CR.isFullSet()) {
1930                 CR.subtract(CI1->getValue());
1931                 unsigned n_bo = VN.getOrInsertVN(BO, Top);
1932                 VR.applyRange(n_bo, CR, Top, this);
1933                 return;
1934               }
1935             }
1936             break;
1937           case Instruction::Or:
1938             if (Op0 == AllOnes || Op1 == AllOnes) {
1939               add(BO, AllOnes, ICmpInst::ICMP_EQ, NewContext);
1940               return;
1941             }
1942             if (Op0 == Zero) {
1943               add(BO, Op1, ICmpInst::ICMP_EQ, NewContext);
1944               return;
1945             } else if (Op1 == Zero) {
1946               add(BO, Op0, ICmpInst::ICMP_EQ, NewContext);
1947               return;
1948             }
1949             break;
1950           case Instruction::Add:
1951             if (ConstantInt *CI0 = dyn_cast<ConstantInt>(Op0)) {
1952               unsigned n_ci0 = VN.getOrInsertVN(Op1, Top);
1953               ConstantRange CR = VR.range(n_ci0, Top);
1954               if (!CR.isFullSet()) {
1955                 CR.subtract(-CI0->getValue());
1956                 unsigned n_bo = VN.getOrInsertVN(BO, Top);
1957                 VR.applyRange(n_bo, CR, Top, this);
1958                 return;
1959               }
1960             }
1961             if (ConstantInt *CI1 = dyn_cast<ConstantInt>(Op1)) {
1962               unsigned n_ci1 = VN.getOrInsertVN(Op0, Top);
1963               ConstantRange CR = VR.range(n_ci1, Top);
1964               if (!CR.isFullSet()) {
1965                 CR.subtract(-CI1->getValue());
1966                 unsigned n_bo = VN.getOrInsertVN(BO, Top);
1967                 VR.applyRange(n_bo, CR, Top, this);
1968                 return;
1969               }
1970             }
1971             // fall-through
1972           case Instruction::Xor:
1973             if (Op0 == Zero) {
1974               add(BO, Op1, ICmpInst::ICMP_EQ, NewContext);
1975               return;
1976             } else if (Op1 == Zero) {
1977               add(BO, Op0, ICmpInst::ICMP_EQ, NewContext);
1978               return;
1979             }
1980             break;
1981           case Instruction::And:
1982             if (Op0 == AllOnes) {
1983               add(BO, Op1, ICmpInst::ICMP_EQ, NewContext);
1984               return;
1985             } else if (Op1 == AllOnes) {
1986               add(BO, Op0, ICmpInst::ICMP_EQ, NewContext);
1987               return;
1988             }
1989             if (Op0 == Zero || Op1 == Zero) {
1990               add(BO, Zero, ICmpInst::ICMP_EQ, NewContext);
1991               return;
1992             }
1993             break;
1994           case Instruction::Mul:
1995             if (Op0 == Zero || Op1 == Zero) {
1996               add(BO, Zero, ICmpInst::ICMP_EQ, NewContext);
1997               return;
1998             }
1999             if (Op0 == One) {
2000               add(BO, Op1, ICmpInst::ICMP_EQ, NewContext);
2001               return;
2002             } else if (Op1 == One) {
2003               add(BO, Op0, ICmpInst::ICMP_EQ, NewContext);
2004               return;
2005             }
2006             break;
2007         }
2008
2009         // "%x = add i32 %y, %z" and %x EQ %y then %z EQ 0
2010         // "%x = add i32 %y, %z" and %x EQ %z then %y EQ 0
2011         // "%x = shl i32 %y, %z" and %x EQ %y and %y NE 0 then %z EQ 0
2012         // "%x = udiv i32 %y, %z" and %x EQ %y and %y NE 0 then %z EQ 1
2013
2014         Value *Known = Op0, *Unknown = Op1,
2015               *TheBO = VN.canonicalize(BO, Top);
2016         if (Known != TheBO) std::swap(Known, Unknown);
2017         if (Known == TheBO) {
2018           switch (Opcode) {
2019             default: break;
2020             case Instruction::LShr:
2021             case Instruction::AShr:
2022             case Instruction::Shl:
2023               if (!isRelatedBy(Known, Zero, ICmpInst::ICMP_NE)) break;
2024               // otherwise, fall-through.
2025             case Instruction::Sub:
2026               if (Unknown == Op0) break;
2027               // otherwise, fall-through.
2028             case Instruction::Xor:
2029             case Instruction::Add:
2030               add(Unknown, Zero, ICmpInst::ICMP_EQ, NewContext);
2031               break;
2032             case Instruction::UDiv:
2033             case Instruction::SDiv:
2034               if (Unknown == Op1) break;
2035               if (isRelatedBy(Known, Zero, ICmpInst::ICMP_NE))
2036                 add(Unknown, One, ICmpInst::ICMP_EQ, NewContext);
2037               break;
2038           }
2039         }
2040
2041         // TODO: "%a = add i32 %b, 1" and %b > %z then %a >= %z.
2042
2043       } else if (ICmpInst *IC = dyn_cast<ICmpInst>(I)) {
2044         // "%a = icmp ult i32 %b, %c" and %b u<  %c then %a EQ true
2045         // "%a = icmp ult i32 %b, %c" and %b u>= %c then %a EQ false
2046         // etc.
2047
2048         Value *Op0 = VN.canonicalize(IC->getOperand(0), Top);
2049         Value *Op1 = VN.canonicalize(IC->getOperand(1), Top);
2050
2051         ICmpInst::Predicate Pred = IC->getPredicate();
2052         if (isRelatedBy(Op0, Op1, Pred))
2053           add(IC, ConstantInt::getTrue(), ICmpInst::ICMP_EQ, NewContext);
2054         else if (isRelatedBy(Op0, Op1, ICmpInst::getInversePredicate(Pred)))
2055           add(IC, ConstantInt::getFalse(), ICmpInst::ICMP_EQ, NewContext);
2056
2057       } else if (SelectInst *SI = dyn_cast<SelectInst>(I)) {
2058         if (I->getType()->isFPOrFPVector()) return;
2059
2060         // Given: "%a = select i1 %x, i32 %b, i32 %c"
2061         // %x EQ true  then %a EQ %b
2062         // %x EQ false then %a EQ %c
2063         // %b EQ %c then %a EQ %b
2064
2065         Value *Canonical = VN.canonicalize(SI->getCondition(), Top);
2066         if (Canonical == ConstantInt::getTrue()) {
2067           add(SI, SI->getTrueValue(), ICmpInst::ICMP_EQ, NewContext);
2068         } else if (Canonical == ConstantInt::getFalse()) {
2069           add(SI, SI->getFalseValue(), ICmpInst::ICMP_EQ, NewContext);
2070         } else if (VN.canonicalize(SI->getTrueValue(), Top) ==
2071                    VN.canonicalize(SI->getFalseValue(), Top)) {
2072           add(SI, SI->getTrueValue(), ICmpInst::ICMP_EQ, NewContext);
2073         }
2074       } else if (CastInst *CI = dyn_cast<CastInst>(I)) {
2075         const Type *DestTy = CI->getDestTy();
2076         if (DestTy->isFPOrFPVector()) return;
2077
2078         Value *Op = VN.canonicalize(CI->getOperand(0), Top);
2079         Instruction::CastOps Opcode = CI->getOpcode();
2080
2081         if (Constant *C = dyn_cast<Constant>(Op)) {
2082           add(CI, ConstantExpr::getCast(Opcode, C, DestTy),
2083               ICmpInst::ICMP_EQ, NewContext);
2084         }
2085
2086         uint32_t W = VR.typeToWidth(DestTy);
2087         unsigned ci = VN.getOrInsertVN(CI, Top);
2088         ConstantRange CR = VR.range(VN.getOrInsertVN(Op, Top), Top);
2089
2090         if (!CR.isFullSet()) {
2091           switch (Opcode) {
2092             default: break;
2093             case Instruction::ZExt:
2094               VR.applyRange(ci, CR.zeroExtend(W), Top, this);
2095               break;
2096             case Instruction::SExt:
2097               VR.applyRange(ci, CR.signExtend(W), Top, this);
2098               break;
2099             case Instruction::Trunc: {
2100               ConstantRange Result = CR.truncate(W);
2101               if (!Result.isFullSet())
2102                 VR.applyRange(ci, Result, Top, this);
2103             } break;
2104             case Instruction::BitCast:
2105               VR.applyRange(ci, CR, Top, this);
2106               break;
2107             // TODO: other casts?
2108           }
2109         }
2110       } else if (GetElementPtrInst *GEPI = dyn_cast<GetElementPtrInst>(I)) {
2111         for (GetElementPtrInst::op_iterator OI = GEPI->idx_begin(),
2112              OE = GEPI->idx_end(); OI != OE; ++OI) {
2113           ConstantInt *Op = dyn_cast<ConstantInt>(VN.canonicalize(*OI, Top));
2114           if (!Op || !Op->isZero()) return;
2115         }
2116         // TODO: The GEPI indices are all zero. Copy from operand to definition,
2117         // jumping the type plane as needed.
2118         Value *Ptr = GEPI->getPointerOperand();
2119         if (isRelatedBy(Ptr, Context->getNullValue(Ptr->getType()),
2120                         ICmpInst::ICMP_NE)) {
2121           add(GEPI, Context->getNullValue(GEPI->getType()), ICmpInst::ICMP_NE,
2122               NewContext);
2123         }
2124       }
2125     }
2126
2127     /// solve - process the work queue
2128     void solve() {
2129       //DOUT << "WorkList entry, size: " << WorkList.size() << "\n";
2130       while (!WorkList.empty()) {
2131         //DOUT << "WorkList size: " << WorkList.size() << "\n";
2132
2133         Operation &O = WorkList.front();
2134         TopInst = O.ContextInst;
2135         TopBB = O.ContextBB;
2136         Top = DTDFS->getNodeForBlock(TopBB); // XXX move this into Context
2137
2138         O.LHS = VN.canonicalize(O.LHS, Top);
2139         O.RHS = VN.canonicalize(O.RHS, Top);
2140
2141         assert(O.LHS == VN.canonicalize(O.LHS, Top) && "Canonicalize isn't.");
2142         assert(O.RHS == VN.canonicalize(O.RHS, Top) && "Canonicalize isn't.");
2143
2144         DOUT << "solving " << *O.LHS << " " << O.Op << " " << *O.RHS;
2145         if (O.ContextInst) DOUT << " context inst: " << *O.ContextInst;
2146         else DOUT << " context block: " << O.ContextBB->getName();
2147         DOUT << "\n";
2148
2149         DEBUG(VN.dump());
2150         DEBUG(IG.dump());
2151         DEBUG(VR.dump());
2152
2153         // If they're both Constant, skip it. Check for contradiction and mark
2154         // the BB as unreachable if so.
2155         if (Constant *CI_L = dyn_cast<Constant>(O.LHS)) {
2156           if (Constant *CI_R = dyn_cast<Constant>(O.RHS)) {
2157             if (ConstantExpr::getCompare(O.Op, CI_L, CI_R) ==
2158                 ConstantInt::getFalse())
2159               UB.mark(TopBB);
2160
2161             WorkList.pop_front();
2162             continue;
2163           }
2164         }
2165
2166         if (VN.compare(O.LHS, O.RHS)) {
2167           std::swap(O.LHS, O.RHS);
2168           O.Op = ICmpInst::getSwappedPredicate(O.Op);
2169         }
2170
2171         if (O.Op == ICmpInst::ICMP_EQ) {
2172           if (!makeEqual(O.RHS, O.LHS))
2173             UB.mark(TopBB);
2174         } else {
2175           LatticeVal LV = cmpInstToLattice(O.Op);
2176
2177           if ((LV & EQ_BIT) &&
2178               isRelatedBy(O.LHS, O.RHS, ICmpInst::getSwappedPredicate(O.Op))) {
2179             if (!makeEqual(O.RHS, O.LHS))
2180               UB.mark(TopBB);
2181           } else {
2182             if (isRelatedBy(O.LHS, O.RHS, ICmpInst::getInversePredicate(O.Op))){
2183               UB.mark(TopBB);
2184               WorkList.pop_front();
2185               continue;
2186             }
2187
2188             unsigned n1 = VN.getOrInsertVN(O.LHS, Top);
2189             unsigned n2 = VN.getOrInsertVN(O.RHS, Top);
2190
2191             if (n1 == n2) {
2192               if (O.Op != ICmpInst::ICMP_UGE && O.Op != ICmpInst::ICMP_ULE &&
2193                   O.Op != ICmpInst::ICMP_SGE && O.Op != ICmpInst::ICMP_SLE)
2194                 UB.mark(TopBB);
2195
2196               WorkList.pop_front();
2197               continue;
2198             }
2199
2200             if (VR.isRelatedBy(n1, n2, Top, LV) ||
2201                 IG.isRelatedBy(n1, n2, Top, LV)) {
2202               WorkList.pop_front();
2203               continue;
2204             }
2205
2206             VR.addInequality(n1, n2, Top, LV, this);
2207             if ((!isa<ConstantInt>(O.RHS) && !isa<ConstantInt>(O.LHS)) ||
2208                 LV == NE)
2209               IG.addInequality(n1, n2, Top, LV);
2210
2211             if (Instruction *I1 = dyn_cast<Instruction>(O.LHS)) {
2212               if (aboveOrBelow(I1))
2213                 defToOps(I1);
2214             }
2215             if (isa<Instruction>(O.LHS) || isa<Argument>(O.LHS)) {
2216               for (Value::use_iterator UI = O.LHS->use_begin(),
2217                    UE = O.LHS->use_end(); UI != UE;) {
2218                 Use &TheUse = UI.getUse();
2219                 ++UI;
2220                 Instruction *I = cast<Instruction>(TheUse.getUser());
2221                 if (aboveOrBelow(I))
2222                   opsToDef(I);
2223               }
2224             }
2225             if (Instruction *I2 = dyn_cast<Instruction>(O.RHS)) {
2226               if (aboveOrBelow(I2))
2227               defToOps(I2);
2228             }
2229             if (isa<Instruction>(O.RHS) || isa<Argument>(O.RHS)) {
2230               for (Value::use_iterator UI = O.RHS->use_begin(),
2231                    UE = O.RHS->use_end(); UI != UE;) {
2232                 Use &TheUse = UI.getUse();
2233                 ++UI;
2234                 Instruction *I = cast<Instruction>(TheUse.getUser());
2235                 if (aboveOrBelow(I))
2236                   opsToDef(I);
2237               }
2238             }
2239           }
2240         }
2241         WorkList.pop_front();
2242       }
2243     }
2244   };
2245
2246   void ValueRanges::addToWorklist(Value *V, Constant *C,
2247                                   ICmpInst::Predicate Pred, VRPSolver *VRP) {
2248     VRP->add(V, C, Pred, VRP->TopInst);
2249   }
2250
2251   void ValueRanges::markBlock(VRPSolver *VRP) {
2252     VRP->UB.mark(VRP->TopBB);
2253   }
2254
2255   /// PredicateSimplifier - This class is a simplifier that replaces
2256   /// one equivalent variable with another. It also tracks what
2257   /// can't be equal and will solve setcc instructions when possible.
2258   /// @brief Root of the predicate simplifier optimization.
2259   class VISIBILITY_HIDDEN PredicateSimplifier : public FunctionPass {
2260     DomTreeDFS *DTDFS;
2261     bool modified;
2262     ValueNumbering *VN;
2263     InequalityGraph *IG;
2264     UnreachableBlocks UB;
2265     ValueRanges *VR;
2266
2267     std::vector<DomTreeDFS::Node *> WorkList;
2268
2269   public:
2270     static char ID; // Pass identification, replacement for typeid
2271     PredicateSimplifier() : FunctionPass(&ID) {}
2272
2273     bool runOnFunction(Function &F);
2274
2275     virtual void getAnalysisUsage(AnalysisUsage &AU) const {
2276       AU.addRequiredID(BreakCriticalEdgesID);
2277       AU.addRequired<DominatorTree>();
2278       AU.addRequired<TargetData>();
2279       AU.addPreserved<TargetData>();
2280     }
2281
2282   private:
2283     /// Forwards - Adds new properties to VRPSolver and uses them to
2284     /// simplify instructions. Because new properties sometimes apply to
2285     /// a transition from one BasicBlock to another, this will use the
2286     /// PredicateSimplifier::proceedToSuccessor(s) interface to enter the
2287     /// basic block.
2288     /// @brief Performs abstract execution of the program.
2289     class VISIBILITY_HIDDEN Forwards : public InstVisitor<Forwards> {
2290       friend class InstVisitor<Forwards>;
2291       PredicateSimplifier *PS;
2292       DomTreeDFS::Node *DTNode;
2293
2294     public:
2295       ValueNumbering &VN;
2296       InequalityGraph &IG;
2297       UnreachableBlocks &UB;
2298       ValueRanges &VR;
2299
2300       Forwards(PredicateSimplifier *PS, DomTreeDFS::Node *DTNode)
2301         : PS(PS), DTNode(DTNode), VN(*PS->VN), IG(*PS->IG), UB(PS->UB),
2302           VR(*PS->VR) {}
2303
2304       void visitTerminatorInst(TerminatorInst &TI);
2305       void visitBranchInst(BranchInst &BI);
2306       void visitSwitchInst(SwitchInst &SI);
2307
2308       void visitAllocaInst(AllocaInst &AI);
2309       void visitLoadInst(LoadInst &LI);
2310       void visitStoreInst(StoreInst &SI);
2311
2312       void visitSExtInst(SExtInst &SI);
2313       void visitZExtInst(ZExtInst &ZI);
2314
2315       void visitBinaryOperator(BinaryOperator &BO);
2316       void visitICmpInst(ICmpInst &IC);
2317     };
2318
2319     // Used by terminator instructions to proceed from the current basic
2320     // block to the next. Verifies that "current" dominates "next",
2321     // then calls visitBasicBlock.
2322     void proceedToSuccessors(DomTreeDFS::Node *Current) {
2323       for (DomTreeDFS::Node::iterator I = Current->begin(),
2324            E = Current->end(); I != E; ++I) {
2325         WorkList.push_back(*I);
2326       }
2327     }
2328
2329     void proceedToSuccessor(DomTreeDFS::Node *Next) {
2330       WorkList.push_back(Next);
2331     }
2332
2333     // Visits each instruction in the basic block.
2334     void visitBasicBlock(DomTreeDFS::Node *Node) {
2335       BasicBlock *BB = Node->getBlock();
2336       DOUT << "Entering Basic Block: " << BB->getName()
2337            << " (" << Node->getDFSNumIn() << ")\n";
2338       for (BasicBlock::iterator I = BB->begin(), E = BB->end(); I != E;) {
2339         visitInstruction(I++, Node);
2340       }
2341     }
2342
2343     // Tries to simplify each Instruction and add new properties.
2344     void visitInstruction(Instruction *I, DomTreeDFS::Node *DT) {
2345       DOUT << "Considering instruction " << *I << "\n";
2346       DEBUG(VN->dump());
2347       DEBUG(IG->dump());
2348       DEBUG(VR->dump());
2349
2350       // Sometimes instructions are killed in earlier analysis.
2351       if (isInstructionTriviallyDead(I)) {
2352         ++NumSimple;
2353         modified = true;
2354         if (unsigned n = VN->valueNumber(I, DTDFS->getRootNode()))
2355           if (VN->value(n) == I) IG->remove(n);
2356         VN->remove(I);
2357         I->eraseFromParent();
2358         return;
2359       }
2360
2361 #ifndef NDEBUG
2362       // Try to replace the whole instruction.
2363       Value *V = VN->canonicalize(I, DT);
2364       assert(V == I && "Late instruction canonicalization.");
2365       if (V != I) {
2366         modified = true;
2367         ++NumInstruction;
2368         DOUT << "Removing " << *I << ", replacing with " << *V << "\n";
2369         if (unsigned n = VN->valueNumber(I, DTDFS->getRootNode()))
2370           if (VN->value(n) == I) IG->remove(n);
2371         VN->remove(I);
2372         I->replaceAllUsesWith(V);
2373         I->eraseFromParent();
2374         return;
2375       }
2376
2377       // Try to substitute operands.
2378       for (unsigned i = 0, e = I->getNumOperands(); i != e; ++i) {
2379         Value *Oper = I->getOperand(i);
2380         Value *V = VN->canonicalize(Oper, DT);
2381         assert(V == Oper && "Late operand canonicalization.");
2382         if (V != Oper) {
2383           modified = true;
2384           ++NumVarsReplaced;
2385           DOUT << "Resolving " << *I;
2386           I->setOperand(i, V);
2387           DOUT << " into " << *I;
2388         }
2389       }
2390 #endif
2391
2392       std::string name = I->getParent()->getName();
2393       DOUT << "push (%" << name << ")\n";
2394       Forwards visit(this, DT);
2395       visit.visit(*I);
2396       DOUT << "pop (%" << name << ")\n";
2397     }
2398   };
2399
2400   bool PredicateSimplifier::runOnFunction(Function &F) {
2401     DominatorTree *DT = &getAnalysis<DominatorTree>();
2402     DTDFS = new DomTreeDFS(DT);
2403     TargetData *TD = &getAnalysis<TargetData>();
2404
2405     DOUT << "Entering Function: " << F.getName() << "\n";
2406
2407     modified = false;
2408     DomTreeDFS::Node *Root = DTDFS->getRootNode();
2409     VN = new ValueNumbering(DTDFS);
2410     IG = new InequalityGraph(*VN, Root);
2411     VR = new ValueRanges(*VN, TD, Context);
2412     WorkList.push_back(Root);
2413
2414     do {
2415       DomTreeDFS::Node *DTNode = WorkList.back();
2416       WorkList.pop_back();
2417       if (!UB.isDead(DTNode->getBlock())) visitBasicBlock(DTNode);
2418     } while (!WorkList.empty());
2419
2420     delete DTDFS;
2421     delete VR;
2422     delete IG;
2423     delete VN;
2424
2425     modified |= UB.kill();
2426
2427     return modified;
2428   }
2429
2430   void PredicateSimplifier::Forwards::visitTerminatorInst(TerminatorInst &TI) {
2431     PS->proceedToSuccessors(DTNode);
2432   }
2433
2434   void PredicateSimplifier::Forwards::visitBranchInst(BranchInst &BI) {
2435     if (BI.isUnconditional()) {
2436       PS->proceedToSuccessors(DTNode);
2437       return;
2438     }
2439
2440     Value *Condition = BI.getCondition();
2441     BasicBlock *TrueDest  = BI.getSuccessor(0);
2442     BasicBlock *FalseDest = BI.getSuccessor(1);
2443
2444     if (isa<Constant>(Condition) || TrueDest == FalseDest) {
2445       PS->proceedToSuccessors(DTNode);
2446       return;
2447     }
2448
2449     for (DomTreeDFS::Node::iterator I = DTNode->begin(), E = DTNode->end();
2450          I != E; ++I) {
2451       BasicBlock *Dest = (*I)->getBlock();
2452       DOUT << "Branch thinking about %" << Dest->getName()
2453            << "(" << PS->DTDFS->getNodeForBlock(Dest)->getDFSNumIn() << ")\n";
2454
2455       if (Dest == TrueDest) {
2456         DOUT << "(" << DTNode->getBlock()->getName() << ") true set:\n";
2457         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, Dest);
2458         VRP.add(ConstantInt::getTrue(), Condition, ICmpInst::ICMP_EQ);
2459         VRP.solve();
2460         DEBUG(VN.dump());
2461         DEBUG(IG.dump());
2462         DEBUG(VR.dump());
2463       } else if (Dest == FalseDest) {
2464         DOUT << "(" << DTNode->getBlock()->getName() << ") false set:\n";
2465         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, Dest);
2466         VRP.add(ConstantInt::getFalse(), Condition, ICmpInst::ICMP_EQ);
2467         VRP.solve();
2468         DEBUG(VN.dump());
2469         DEBUG(IG.dump());
2470         DEBUG(VR.dump());
2471       }
2472
2473       PS->proceedToSuccessor(*I);
2474     }
2475   }
2476
2477   void PredicateSimplifier::Forwards::visitSwitchInst(SwitchInst &SI) {
2478     Value *Condition = SI.getCondition();
2479
2480     // Set the EQProperty in each of the cases BBs, and the NEProperties
2481     // in the default BB.
2482
2483     for (DomTreeDFS::Node::iterator I = DTNode->begin(), E = DTNode->end();
2484          I != E; ++I) {
2485       BasicBlock *BB = (*I)->getBlock();
2486       DOUT << "Switch thinking about BB %" << BB->getName()
2487            << "(" << PS->DTDFS->getNodeForBlock(BB)->getDFSNumIn() << ")\n";
2488
2489       VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, BB);
2490       if (BB == SI.getDefaultDest()) {
2491         for (unsigned i = 1, e = SI.getNumCases(); i < e; ++i)
2492           if (SI.getSuccessor(i) != BB)
2493             VRP.add(Condition, SI.getCaseValue(i), ICmpInst::ICMP_NE);
2494         VRP.solve();
2495       } else if (ConstantInt *CI = SI.findCaseDest(BB)) {
2496         VRP.add(Condition, CI, ICmpInst::ICMP_EQ);
2497         VRP.solve();
2498       }
2499       PS->proceedToSuccessor(*I);
2500     }
2501   }
2502
2503   void PredicateSimplifier::Forwards::visitAllocaInst(AllocaInst &AI) {
2504     VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &AI);
2505     VRP.add(AI.getParent()->getContext()->getNullValue(AI.getType()),
2506             &AI, ICmpInst::ICMP_NE);
2507     VRP.solve();
2508   }
2509
2510   void PredicateSimplifier::Forwards::visitLoadInst(LoadInst &LI) {
2511     Value *Ptr = LI.getPointerOperand();
2512     // avoid "load i8* null" -> null NE null.
2513     if (isa<Constant>(Ptr)) return;
2514
2515     VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &LI);
2516     VRP.add(LI.getParent()->getContext()->getNullValue(Ptr->getType()),
2517             Ptr, ICmpInst::ICMP_NE);
2518     VRP.solve();
2519   }
2520
2521   void PredicateSimplifier::Forwards::visitStoreInst(StoreInst &SI) {
2522     Value *Ptr = SI.getPointerOperand();
2523     if (isa<Constant>(Ptr)) return;
2524
2525     VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &SI);
2526     VRP.add(SI.getParent()->getContext()->getNullValue(Ptr->getType()),
2527             Ptr, ICmpInst::ICMP_NE);
2528     VRP.solve();
2529   }
2530
2531   void PredicateSimplifier::Forwards::visitSExtInst(SExtInst &SI) {
2532     VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &SI);
2533     LLVMContext *Context = SI.getParent()->getContext();
2534     uint32_t SrcBitWidth = cast<IntegerType>(SI.getSrcTy())->getBitWidth();
2535     uint32_t DstBitWidth = cast<IntegerType>(SI.getDestTy())->getBitWidth();
2536     APInt Min(APInt::getHighBitsSet(DstBitWidth, DstBitWidth-SrcBitWidth+1));
2537     APInt Max(APInt::getLowBitsSet(DstBitWidth, SrcBitWidth-1));
2538     VRP.add(Context->getConstantInt(Min), &SI, ICmpInst::ICMP_SLE);
2539     VRP.add(Context->getConstantInt(Max), &SI, ICmpInst::ICMP_SGE);
2540     VRP.solve();
2541   }
2542
2543   void PredicateSimplifier::Forwards::visitZExtInst(ZExtInst &ZI) {
2544     VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &ZI);
2545     LLVMContext *Context = ZI.getParent()->getContext();
2546     uint32_t SrcBitWidth = cast<IntegerType>(ZI.getSrcTy())->getBitWidth();
2547     uint32_t DstBitWidth = cast<IntegerType>(ZI.getDestTy())->getBitWidth();
2548     APInt Max(APInt::getLowBitsSet(DstBitWidth, SrcBitWidth));
2549     VRP.add(Context->getConstantInt(Max), &ZI, ICmpInst::ICMP_UGE);
2550     VRP.solve();
2551   }
2552
2553   void PredicateSimplifier::Forwards::visitBinaryOperator(BinaryOperator &BO) {
2554     Instruction::BinaryOps ops = BO.getOpcode();
2555
2556     switch (ops) {
2557     default: break;
2558       case Instruction::URem:
2559       case Instruction::SRem:
2560       case Instruction::UDiv:
2561       case Instruction::SDiv: {
2562         Value *Divisor = BO.getOperand(1);
2563         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &BO);
2564         VRP.add(BO.getParent()->getContext()->getNullValue(Divisor->getType()),
2565                 Divisor, ICmpInst::ICMP_NE);
2566         VRP.solve();
2567         break;
2568       }
2569     }
2570
2571     switch (ops) {
2572       default: break;
2573       case Instruction::Shl: {
2574         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &BO);
2575         VRP.add(&BO, BO.getOperand(0), ICmpInst::ICMP_UGE);
2576         VRP.solve();
2577       } break;
2578       case Instruction::AShr: {
2579         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &BO);
2580         VRP.add(&BO, BO.getOperand(0), ICmpInst::ICMP_SLE);
2581         VRP.solve();
2582       } break;
2583       case Instruction::LShr:
2584       case Instruction::UDiv: {
2585         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &BO);
2586         VRP.add(&BO, BO.getOperand(0), ICmpInst::ICMP_ULE);
2587         VRP.solve();
2588       } break;
2589       case Instruction::URem: {
2590         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &BO);
2591         VRP.add(&BO, BO.getOperand(1), ICmpInst::ICMP_ULE);
2592         VRP.solve();
2593       } break;
2594       case Instruction::And: {
2595         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &BO);
2596         VRP.add(&BO, BO.getOperand(0), ICmpInst::ICMP_ULE);
2597         VRP.add(&BO, BO.getOperand(1), ICmpInst::ICMP_ULE);
2598         VRP.solve();
2599       } break;
2600       case Instruction::Or: {
2601         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &BO);
2602         VRP.add(&BO, BO.getOperand(0), ICmpInst::ICMP_UGE);
2603         VRP.add(&BO, BO.getOperand(1), ICmpInst::ICMP_UGE);
2604         VRP.solve();
2605       } break;
2606     }
2607   }
2608
2609   void PredicateSimplifier::Forwards::visitICmpInst(ICmpInst &IC) {
2610     // If possible, squeeze the ICmp predicate into something simpler.
2611     // Eg., if x = [0, 4) and we're being asked icmp uge %x, 3 then change
2612     // the predicate to eq.
2613
2614     // XXX: once we do full PHI handling, modifying the instruction in the
2615     // Forwards visitor will cause missed optimizations.
2616
2617     ICmpInst::Predicate Pred = IC.getPredicate();
2618
2619     switch (Pred) {
2620       default: break;
2621       case ICmpInst::ICMP_ULE: Pred = ICmpInst::ICMP_ULT; break;
2622       case ICmpInst::ICMP_UGE: Pred = ICmpInst::ICMP_UGT; break;
2623       case ICmpInst::ICMP_SLE: Pred = ICmpInst::ICMP_SLT; break;
2624       case ICmpInst::ICMP_SGE: Pred = ICmpInst::ICMP_SGT; break;
2625     }
2626     if (Pred != IC.getPredicate()) {
2627       VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &IC);
2628       if (VRP.isRelatedBy(IC.getOperand(1), IC.getOperand(0),
2629                           ICmpInst::ICMP_NE)) {
2630         ++NumSnuggle;
2631         PS->modified = true;
2632         IC.setPredicate(Pred);
2633       }
2634     }
2635
2636     Pred = IC.getPredicate();
2637
2638     LLVMContext *Context = IC.getParent()->getContext();
2639
2640     if (ConstantInt *Op1 = dyn_cast<ConstantInt>(IC.getOperand(1))) {
2641       ConstantInt *NextVal = 0;
2642       switch (Pred) {
2643         default: break;
2644         case ICmpInst::ICMP_SLT:
2645         case ICmpInst::ICMP_ULT:
2646           if (Op1->getValue() != 0)
2647             NextVal = Context->getConstantInt(Op1->getValue()-1);
2648          break;
2649         case ICmpInst::ICMP_SGT:
2650         case ICmpInst::ICMP_UGT:
2651           if (!Op1->getValue().isAllOnesValue())
2652             NextVal = Context->getConstantInt(Op1->getValue()+1);
2653          break;
2654       }
2655
2656       if (NextVal) {
2657         VRPSolver VRP(VN, IG, UB, VR, PS->DTDFS, PS->modified, &IC);
2658         if (VRP.isRelatedBy(IC.getOperand(0), NextVal,
2659                             ICmpInst::getInversePredicate(Pred))) {
2660           ICmpInst *NewIC = new ICmpInst(&IC, ICmpInst::ICMP_EQ,
2661                                          IC.getOperand(0), NextVal, "");
2662           NewIC->takeName(&IC);
2663           IC.replaceAllUsesWith(NewIC);
2664
2665           // XXX: prove this isn't necessary
2666           if (unsigned n = VN.valueNumber(&IC, PS->DTDFS->getRootNode()))
2667             if (VN.value(n) == &IC) IG.remove(n);
2668           VN.remove(&IC);
2669
2670           IC.eraseFromParent();
2671           ++NumSnuggle;
2672           PS->modified = true;
2673         }
2674       }
2675     }
2676   }
2677 }
2678
2679 char PredicateSimplifier::ID = 0;
2680 static RegisterPass<PredicateSimplifier>
2681 X("predsimplify", "Predicate Simplifier");
2682
2683 FunctionPass *llvm::createPredicateSimplifierPass() {
2684   return new PredicateSimplifier();
2685 }