lib/Analysis/ValueTracking.cpp

   1 //===- ValueTracking.cpp - Walk computations to compute properties --------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file contains routines that help analyze properties that chains of
  11 // computations have.
  12 //
  13 //===----------------------------------------------------------------------===//
  14
  15 #include "llvm/Analysis/ValueTracking.h"
  16 #include "llvm/Analysis/InstructionSimplify.h"
  17 #include "llvm/Constants.h"
  18 #include "llvm/Instructions.h"
  19 #include "llvm/GlobalVariable.h"
  20 #include "llvm/GlobalAlias.h"
  21 #include "llvm/IntrinsicInst.h"
  22 #include "llvm/LLVMContext.h"
  23 #include "llvm/Operator.h"
  24 #include "llvm/Target/TargetData.h"
  25 #include "llvm/Support/GetElementPtrTypeIterator.h"
  26 #include "llvm/Support/MathExtras.h"
  27 #include "llvm/Support/PatternMatch.h"
  28 #include "llvm/ADT/SmallPtrSet.h"
  29 #include <cstring>
  30 using namespace llvm;
  31 using namespace llvm::PatternMatch;
  32
  33 const unsigned MaxDepth = 6;
  34
  35 /// getBitWidth - Returns the bitwidth of the given scalar or pointer type (if
  36 /// unknown returns 0).  For vector types, returns the element type's bitwidth.
  37 static unsigned getBitWidth(const Type *Ty, const TargetData *TD) {
  38   if (unsigned BitWidth = Ty->getScalarSizeInBits())
  39     return BitWidth;
  40   assert(isa<PointerType>(Ty) && "Expected a pointer type!");
  41   return TD ? TD->getPointerSizeInBits() : 0;
  42 }
  43
  44 /// ComputeMaskedBits - Determine which of the bits specified in Mask are
  45 /// known to be either zero or one and return them in the KnownZero/KnownOne
  46 /// bit sets.  This code only analyzes bits in Mask, in order to short-circuit
  47 /// processing.
  48 /// NOTE: we cannot consider 'undef' to be "IsZero" here.  The problem is that
  49 /// we cannot optimize based on the assumption that it is zero without changing
  50 /// it to be an explicit zero.  If we don't change it to zero, other code could
  51 /// optimized based on the contradictory assumption that it is non-zero.
  52 /// Because instcombine aggressively folds operations with undef args anyway,
  53 /// this won't lose us code quality.
  54 ///
  55 /// This function is defined on values with integer type, values with pointer
  56 /// type (but only if TD is non-null), and vectors of integers.  In the case
  57 /// where V is a vector, the mask, known zero, and known one values are the
  58 /// same width as the vector element, and the bit is set only if it is true
  59 /// for all of the elements in the vector.
  60 void llvm::ComputeMaskedBits(Value *V, const APInt &Mask,
  61                              APInt &KnownZero, APInt &KnownOne,
  62                              const TargetData *TD, unsigned Depth) {
  63   assert(V && "No Value?");
  64   assert(Depth <= MaxDepth && "Limit Search Depth");
  65   unsigned BitWidth = Mask.getBitWidth();
  66   assert((V->getType()->isIntOrIntVectorTy() || V->getType()->isPointerTy())
  67          && "Not integer or pointer type!");
  68   assert((!TD ||
  69           TD->getTypeSizeInBits(V->getType()->getScalarType()) == BitWidth) &&
  70          (!V->getType()->isIntOrIntVectorTy() ||
  71           V->getType()->getScalarSizeInBits() == BitWidth) &&
  72          KnownZero.getBitWidth() == BitWidth &&
  73          KnownOne.getBitWidth() == BitWidth &&
  74          "V, Mask, KnownOne and KnownZero should have same BitWidth");
  75
  76   if (ConstantInt *CI = dyn_cast<ConstantInt>(V)) {
  77     // We know all of the bits for a constant!
  78     KnownOne = CI->getValue() & Mask;
  79     KnownZero = ~KnownOne & Mask;
  80     return;
  81   }
  82   // Null and aggregate-zero are all-zeros.
  83   if (isa<ConstantPointerNull>(V) ||
  84       isa<ConstantAggregateZero>(V)) {
  85     KnownOne.clearAllBits();
  86     KnownZero = Mask;
  87     return;
  88   }
  89   // Handle a constant vector by taking the intersection of the known bits of
  90   // each element.
  91   if (ConstantVector *CV = dyn_cast<ConstantVector>(V)) {
  92     KnownZero.setAllBits(); KnownOne.setAllBits();
  93     for (unsigned i = 0, e = CV->getNumOperands(); i != e; ++i) {
  94       APInt KnownZero2(BitWidth, 0), KnownOne2(BitWidth, 0);
  95       ComputeMaskedBits(CV->getOperand(i), Mask, KnownZero2, KnownOne2,
  96                         TD, Depth);
  97       KnownZero &= KnownZero2;
  98       KnownOne &= KnownOne2;
  99     }
 100     return;
 101   }
 102   // The address of an aligned GlobalValue has trailing zeros.
 103   if (GlobalValue *GV = dyn_cast<GlobalValue>(V)) {
 104     unsigned Align = GV->getAlignment();
 105     if (Align == 0 && TD && GV->getType()->getElementType()->isSized()) {
 106       const Type *ObjectType = GV->getType()->getElementType();
 107       // If the object is defined in the current Module, we'll be giving
 108       // it the preferred alignment. Otherwise, we have to assume that it
 109       // may only have the minimum ABI alignment.
 110       if (!GV->isDeclaration() && !GV->mayBeOverridden())
 111         Align = TD->getPrefTypeAlignment(ObjectType);
 112       else
 113         Align = TD->getABITypeAlignment(ObjectType);
 114     }
 115     if (Align > 0)
 116       KnownZero = Mask & APInt::getLowBitsSet(BitWidth,
 117                                               CountTrailingZeros_32(Align));
 118     else
 119       KnownZero.clearAllBits();
 120     KnownOne.clearAllBits();
 121     return;
 122   }
 123   // A weak GlobalAlias is totally unknown. A non-weak GlobalAlias has
 124   // the bits of its aliasee.
 125   if (GlobalAlias *GA = dyn_cast<GlobalAlias>(V)) {
 126     if (GA->mayBeOverridden()) {
 127       KnownZero.clearAllBits(); KnownOne.clearAllBits();
 128     } else {
 129       ComputeMaskedBits(GA->getAliasee(), Mask, KnownZero, KnownOne,
 130                         TD, Depth+1);
 131     }
 132     return;
 133   }
 134
 135   KnownZero.clearAllBits(); KnownOne.clearAllBits();   // Start out not knowing anything.
 136
 137   if (Depth == MaxDepth || Mask == 0)
 138     return;  // Limit search depth.
 139
 140   Operator *I = dyn_cast<Operator>(V);
 141   if (!I) return;
 142
 143   APInt KnownZero2(KnownZero), KnownOne2(KnownOne);
 144   switch (I->getOpcode()) {
 145   default: break;
 146   case Instruction::And: {
 147     // If either the LHS or the RHS are Zero, the result is zero.
 148     ComputeMaskedBits(I->getOperand(1), Mask, KnownZero, KnownOne, TD, Depth+1);
 149     APInt Mask2(Mask & ~KnownZero);
 150     ComputeMaskedBits(I->getOperand(0), Mask2, KnownZero2, KnownOne2, TD,
 151                       Depth+1);
 152     assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 153     assert((KnownZero2 & KnownOne2) == 0 && "Bits known to be one AND zero?");
 154
 155     // Output known-1 bits are only known if set in both the LHS & RHS.
 156     KnownOne &= KnownOne2;
 157     // Output known-0 are known to be clear if zero in either the LHS | RHS.
 158     KnownZero |= KnownZero2;
 159     return;
 160   }
 161   case Instruction::Or: {
 162     ComputeMaskedBits(I->getOperand(1), Mask, KnownZero, KnownOne, TD, Depth+1);
 163     APInt Mask2(Mask & ~KnownOne);
 164     ComputeMaskedBits(I->getOperand(0), Mask2, KnownZero2, KnownOne2, TD,
 165                       Depth+1);
 166     assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 167     assert((KnownZero2 & KnownOne2) == 0 && "Bits known to be one AND zero?");
 168
 169     // Output known-0 bits are only known if clear in both the LHS & RHS.
 170     KnownZero &= KnownZero2;
 171     // Output known-1 are known to be set if set in either the LHS | RHS.
 172     KnownOne |= KnownOne2;
 173     return;
 174   }
 175   case Instruction::Xor: {
 176     ComputeMaskedBits(I->getOperand(1), Mask, KnownZero, KnownOne, TD, Depth+1);
 177     ComputeMaskedBits(I->getOperand(0), Mask, KnownZero2, KnownOne2, TD,
 178                       Depth+1);
 179     assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 180     assert((KnownZero2 & KnownOne2) == 0 && "Bits known to be one AND zero?");
 181
 182     // Output known-0 bits are known if clear or set in both the LHS & RHS.
 183     APInt KnownZeroOut = (KnownZero & KnownZero2) | (KnownOne & KnownOne2);
 184     // Output known-1 are known to be set if set in only one of the LHS, RHS.
 185     KnownOne = (KnownZero & KnownOne2) | (KnownOne & KnownZero2);
 186     KnownZero = KnownZeroOut;
 187     return;
 188   }
 189   case Instruction::Mul: {
 190     APInt Mask2 = APInt::getAllOnesValue(BitWidth);
 191     ComputeMaskedBits(I->getOperand(1), Mask2, KnownZero, KnownOne, TD,Depth+1);
 192     ComputeMaskedBits(I->getOperand(0), Mask2, KnownZero2, KnownOne2, TD,
 193                       Depth+1);
 194     assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 195     assert((KnownZero2 & KnownOne2) == 0 && "Bits known to be one AND zero?");
 196
 197     // If low bits are zero in either operand, output low known-0 bits.
 198     // Also compute a conserative estimate for high known-0 bits.
 199     // More trickiness is possible, but this is sufficient for the
 200     // interesting case of alignment computation.
 201     KnownOne.clearAllBits();
 202     unsigned TrailZ = KnownZero.countTrailingOnes() +
 203                       KnownZero2.countTrailingOnes();
 204     unsigned LeadZ =  std::max(KnownZero.countLeadingOnes() +
 205                                KnownZero2.countLeadingOnes(),
 206                                BitWidth) - BitWidth;
 207
 208     TrailZ = std::min(TrailZ, BitWidth);
 209     LeadZ = std::min(LeadZ, BitWidth);
 210     KnownZero = APInt::getLowBitsSet(BitWidth, TrailZ) |
 211                 APInt::getHighBitsSet(BitWidth, LeadZ);
 212     KnownZero &= Mask;
 213     return;
 214   }
 215   case Instruction::UDiv: {
 216     // For the purposes of computing leading zeros we can conservatively
 217     // treat a udiv as a logical right shift by the power of 2 known to
 218     // be less than the denominator.
 219     APInt AllOnes = APInt::getAllOnesValue(BitWidth);
 220     ComputeMaskedBits(I->getOperand(0),
 221                       AllOnes, KnownZero2, KnownOne2, TD, Depth+1);
 222     unsigned LeadZ = KnownZero2.countLeadingOnes();
 223
 224     KnownOne2.clearAllBits();
 225     KnownZero2.clearAllBits();
 226     ComputeMaskedBits(I->getOperand(1),
 227                       AllOnes, KnownZero2, KnownOne2, TD, Depth+1);
 228     unsigned RHSUnknownLeadingOnes = KnownOne2.countLeadingZeros();
 229     if (RHSUnknownLeadingOnes != BitWidth)
 230       LeadZ = std::min(BitWidth,
 231                        LeadZ + BitWidth - RHSUnknownLeadingOnes - 1);
 232
 233     KnownZero = APInt::getHighBitsSet(BitWidth, LeadZ) & Mask;
 234     return;
 235   }
 236   case Instruction::Select:
 237     ComputeMaskedBits(I->getOperand(2), Mask, KnownZero, KnownOne, TD, Depth+1);
 238     ComputeMaskedBits(I->getOperand(1), Mask, KnownZero2, KnownOne2, TD,
 239                       Depth+1);
 240     assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 241     assert((KnownZero2 & KnownOne2) == 0 && "Bits known to be one AND zero?");
 242
 243     // Only known if known in both the LHS and RHS.
 244     KnownOne &= KnownOne2;
 245     KnownZero &= KnownZero2;
 246     return;
 247   case Instruction::FPTrunc:
 248   case Instruction::FPExt:
 249   case Instruction::FPToUI:
 250   case Instruction::FPToSI:
 251   case Instruction::SIToFP:
 252   case Instruction::UIToFP:
 253     return; // Can't work with floating point.
 254   case Instruction::PtrToInt:
 255   case Instruction::IntToPtr:
 256     // We can't handle these if we don't know the pointer size.
 257     if (!TD) return;
 258     // FALL THROUGH and handle them the same as zext/trunc.
 259   case Instruction::ZExt:
 260   case Instruction::Trunc: {
 261     const Type *SrcTy = I->getOperand(0)->getType();
 262
 263     unsigned SrcBitWidth;
 264     // Note that we handle pointer operands here because of inttoptr/ptrtoint
 265     // which fall through here.
 266     if (SrcTy->isPointerTy())
 267       SrcBitWidth = TD->getTypeSizeInBits(SrcTy);
 268     else
 269       SrcBitWidth = SrcTy->getScalarSizeInBits();
 270
 271     APInt MaskIn = Mask.zextOrTrunc(SrcBitWidth);
 272     KnownZero = KnownZero.zextOrTrunc(SrcBitWidth);
 273     KnownOne = KnownOne.zextOrTrunc(SrcBitWidth);
 274     ComputeMaskedBits(I->getOperand(0), MaskIn, KnownZero, KnownOne, TD,
 275                       Depth+1);
 276     KnownZero = KnownZero.zextOrTrunc(BitWidth);
 277     KnownOne = KnownOne.zextOrTrunc(BitWidth);
 278     // Any top bits are known to be zero.
 279     if (BitWidth > SrcBitWidth)
 280       KnownZero |= APInt::getHighBitsSet(BitWidth, BitWidth - SrcBitWidth);
 281     return;
 282   }
 283   case Instruction::BitCast: {
 284     const Type *SrcTy = I->getOperand(0)->getType();
 285     if ((SrcTy->isIntegerTy() || SrcTy->isPointerTy()) &&
 286         // TODO: For now, not handling conversions like:
 287         // (bitcast i64 %x to <2 x i32>)
 288         !I->getType()->isVectorTy()) {
 289       ComputeMaskedBits(I->getOperand(0), Mask, KnownZero, KnownOne, TD,
 290                         Depth+1);
 291       return;
 292     }
 293     break;
 294   }
 295   case Instruction::SExt: {
 296     // Compute the bits in the result that are not present in the input.
 297     unsigned SrcBitWidth = I->getOperand(0)->getType()->getScalarSizeInBits();
 298
 299     APInt MaskIn = Mask.trunc(SrcBitWidth);
 300     KnownZero = KnownZero.trunc(SrcBitWidth);
 301     KnownOne = KnownOne.trunc(SrcBitWidth);
 302     ComputeMaskedBits(I->getOperand(0), MaskIn, KnownZero, KnownOne, TD,
 303                       Depth+1);
 304     assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 305     KnownZero = KnownZero.zext(BitWidth);
 306     KnownOne = KnownOne.zext(BitWidth);
 307
 308     // If the sign bit of the input is known set or clear, then we know the
 309     // top bits of the result.
 310     if (KnownZero[SrcBitWidth-1])             // Input sign bit known zero
 311       KnownZero |= APInt::getHighBitsSet(BitWidth, BitWidth - SrcBitWidth);
 312     else if (KnownOne[SrcBitWidth-1])           // Input sign bit known set
 313       KnownOne |= APInt::getHighBitsSet(BitWidth, BitWidth - SrcBitWidth);
 314     return;
 315   }
 316   case Instruction::Shl:
 317     // (shl X, C1) & C2 == 0   iff   (X & C2 >>u C1) == 0
 318     if (ConstantInt *SA = dyn_cast<ConstantInt>(I->getOperand(1))) {
 319       uint64_t ShiftAmt = SA->getLimitedValue(BitWidth);
 320       APInt Mask2(Mask.lshr(ShiftAmt));
 321       ComputeMaskedBits(I->getOperand(0), Mask2, KnownZero, KnownOne, TD,
 322                         Depth+1);
 323       assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 324       KnownZero <<= ShiftAmt;
 325       KnownOne  <<= ShiftAmt;
 326       KnownZero |= APInt::getLowBitsSet(BitWidth, ShiftAmt); // low bits known 0
 327       return;
 328     }
 329     break;
 330   case Instruction::LShr:
 331     // (ushr X, C1) & C2 == 0   iff  (-1 >> C1) & C2 == 0
 332     if (ConstantInt *SA = dyn_cast<ConstantInt>(I->getOperand(1))) {
 333       // Compute the new bits that are at the top now.
 334       uint64_t ShiftAmt = SA->getLimitedValue(BitWidth);
 335
 336       // Unsigned shift right.
 337       APInt Mask2(Mask.shl(ShiftAmt));
 338       ComputeMaskedBits(I->getOperand(0), Mask2, KnownZero,KnownOne, TD,
 339                         Depth+1);
 340       assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 341       KnownZero = APIntOps::lshr(KnownZero, ShiftAmt);
 342       KnownOne  = APIntOps::lshr(KnownOne, ShiftAmt);
 343       // high bits known zero.
 344       KnownZero |= APInt::getHighBitsSet(BitWidth, ShiftAmt);
 345       return;
 346     }
 347     break;
 348   case Instruction::AShr:
 349     // (ashr X, C1) & C2 == 0   iff  (-1 >> C1) & C2 == 0
 350     if (ConstantInt *SA = dyn_cast<ConstantInt>(I->getOperand(1))) {
 351       // Compute the new bits that are at the top now.
 352       uint64_t ShiftAmt = SA->getLimitedValue(BitWidth-1);
 353
 354       // Signed shift right.
 355       APInt Mask2(Mask.shl(ShiftAmt));
 356       ComputeMaskedBits(I->getOperand(0), Mask2, KnownZero, KnownOne, TD,
 357                         Depth+1);
 358       assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 359       KnownZero = APIntOps::lshr(KnownZero, ShiftAmt);
 360       KnownOne  = APIntOps::lshr(KnownOne, ShiftAmt);
 361
 362       APInt HighBits(APInt::getHighBitsSet(BitWidth, ShiftAmt));
 363       if (KnownZero[BitWidth-ShiftAmt-1])    // New bits are known zero.
 364         KnownZero |= HighBits;
 365       else if (KnownOne[BitWidth-ShiftAmt-1])  // New bits are known one.
 366         KnownOne |= HighBits;
 367       return;
 368     }
 369     break;
 370   case Instruction::Sub: {
 371     if (ConstantInt *CLHS = dyn_cast<ConstantInt>(I->getOperand(0))) {
 372       // We know that the top bits of C-X are clear if X contains less bits
 373       // than C (i.e. no wrap-around can happen).  For example, 20-X is
 374       // positive if we can prove that X is >= 0 and < 16.
 375       if (!CLHS->getValue().isNegative()) {
 376         unsigned NLZ = (CLHS->getValue()+1).countLeadingZeros();
 377         // NLZ can't be BitWidth with no sign bit
 378         APInt MaskV = APInt::getHighBitsSet(BitWidth, NLZ+1);
 379         ComputeMaskedBits(I->getOperand(1), MaskV, KnownZero2, KnownOne2,
 380                           TD, Depth+1);
 381
 382         // If all of the MaskV bits are known to be zero, then we know the
 383         // output top bits are zero, because we now know that the output is
 384         // from [0-C].
 385         if ((KnownZero2 & MaskV) == MaskV) {
 386           unsigned NLZ2 = CLHS->getValue().countLeadingZeros();
 387           // Top bits known zero.
 388           KnownZero = APInt::getHighBitsSet(BitWidth, NLZ2) & Mask;
 389         }
 390       }
 391     }
 392   }
 393   // fall through
 394   case Instruction::Add: {
 395     // If one of the operands has trailing zeros, then the bits that the
 396     // other operand has in those bit positions will be preserved in the
 397     // result. For an add, this works with either operand. For a subtract,
 398     // this only works if the known zeros are in the right operand.
 399     APInt LHSKnownZero(BitWidth, 0), LHSKnownOne(BitWidth, 0);
 400     APInt Mask2 = APInt::getLowBitsSet(BitWidth,
 401                                        BitWidth - Mask.countLeadingZeros());
 402     ComputeMaskedBits(I->getOperand(0), Mask2, LHSKnownZero, LHSKnownOne, TD,
 403                       Depth+1);
 404     assert((LHSKnownZero & LHSKnownOne) == 0 &&
 405            "Bits known to be one AND zero?");
 406     unsigned LHSKnownZeroOut = LHSKnownZero.countTrailingOnes();
 407
 408     ComputeMaskedBits(I->getOperand(1), Mask2, KnownZero2, KnownOne2, TD,
 409                       Depth+1);
 410     assert((KnownZero2 & KnownOne2) == 0 && "Bits known to be one AND zero?");
 411     unsigned RHSKnownZeroOut = KnownZero2.countTrailingOnes();
 412
 413     // Determine which operand has more trailing zeros, and use that
 414     // many bits from the other operand.
 415     if (LHSKnownZeroOut > RHSKnownZeroOut) {
 416       if (I->getOpcode() == Instruction::Add) {
 417         APInt Mask = APInt::getLowBitsSet(BitWidth, LHSKnownZeroOut);
 418         KnownZero |= KnownZero2 & Mask;
 419         KnownOne  |= KnownOne2 & Mask;
 420       } else {
 421         // If the known zeros are in the left operand for a subtract,
 422         // fall back to the minimum known zeros in both operands.
 423         KnownZero |= APInt::getLowBitsSet(BitWidth,
 424                                           std::min(LHSKnownZeroOut,
 425                                                    RHSKnownZeroOut));
 426       }
 427     } else if (RHSKnownZeroOut >= LHSKnownZeroOut) {
 428       APInt Mask = APInt::getLowBitsSet(BitWidth, RHSKnownZeroOut);
 429       KnownZero |= LHSKnownZero & Mask;
 430       KnownOne  |= LHSKnownOne & Mask;
 431     }
 432
 433     // Are we still trying to solve for the sign bit?
 434     if (Mask.isNegative() && !KnownZero.isNegative() && !KnownOne.isNegative()){
 435       OverflowingBinaryOperator *OBO = cast<OverflowingBinaryOperator>(I);
 436       if (OBO->hasNoSignedWrap()) {
 437         if (I->getOpcode() == Instruction::Add) {
 438           // Adding two positive numbers can't wrap into negative
 439           if (LHSKnownZero.isNegative() && KnownZero2.isNegative())
 440             KnownZero |= APInt::getSignBit(BitWidth);
 441           // and adding two negative numbers can't wrap into positive.
 442           else if (LHSKnownOne.isNegative() && KnownOne2.isNegative())
 443             KnownOne |= APInt::getSignBit(BitWidth);
 444         } else {
 445           // Subtracting a negative number from a positive one can't wrap
 446           if (LHSKnownZero.isNegative() && KnownOne2.isNegative())
 447             KnownZero |= APInt::getSignBit(BitWidth);
 448           // neither can subtracting a positive number from a negative one.
 449           else if (LHSKnownOne.isNegative() && KnownZero2.isNegative())
 450             KnownOne |= APInt::getSignBit(BitWidth);
 451         }
 452       }
 453     }
 454
 455     return;
 456   }
 457   case Instruction::SRem:
 458     if (ConstantInt *Rem = dyn_cast<ConstantInt>(I->getOperand(1))) {
 459       APInt RA = Rem->getValue().abs();
 460       if (RA.isPowerOf2()) {
 461         APInt LowBits = RA - 1;
 462         APInt Mask2 = LowBits | APInt::getSignBit(BitWidth);
 463         ComputeMaskedBits(I->getOperand(0), Mask2, KnownZero2, KnownOne2, TD,
 464                           Depth+1);
 465
 466         // The low bits of the first operand are unchanged by the srem.
 467         KnownZero = KnownZero2 & LowBits;
 468         KnownOne = KnownOne2 & LowBits;
 469
 470         // If the first operand is non-negative or has all low bits zero, then
 471         // the upper bits are all zero.
 472         if (KnownZero2[BitWidth-1] || ((KnownZero2 & LowBits) == LowBits))
 473           KnownZero |= ~LowBits;
 474
 475         // If the first operand is negative and not all low bits are zero, then
 476         // the upper bits are all one.
 477         if (KnownOne2[BitWidth-1] && ((KnownOne2 & LowBits) != 0))
 478           KnownOne |= ~LowBits;
 479
 480         KnownZero &= Mask;
 481         KnownOne &= Mask;
 482
 483         assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 484       }
 485     }
 486
 487     // The sign bit is the LHS's sign bit, except when the result of the
 488     // remainder is zero.
 489     if (Mask.isNegative() && KnownZero.isNonNegative()) {
 490       APInt Mask2 = APInt::getSignBit(BitWidth);
 491       APInt LHSKnownZero(BitWidth, 0), LHSKnownOne(BitWidth, 0);
 492       ComputeMaskedBits(I->getOperand(0), Mask2, LHSKnownZero, LHSKnownOne, TD,
 493                         Depth+1);
 494       // If it's known zero, our sign bit is also zero.
 495       if (LHSKnownZero.isNegative())
 496         KnownZero |= LHSKnownZero;
 497     }
 498
 499     break;
 500   case Instruction::URem: {
 501     if (ConstantInt *Rem = dyn_cast<ConstantInt>(I->getOperand(1))) {
 502       APInt RA = Rem->getValue();
 503       if (RA.isPowerOf2()) {
 504         APInt LowBits = (RA - 1);
 505         APInt Mask2 = LowBits & Mask;
 506         KnownZero |= ~LowBits & Mask;
 507         ComputeMaskedBits(I->getOperand(0), Mask2, KnownZero, KnownOne, TD,
 508                           Depth+1);
 509         assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 510         break;
 511       }
 512     }
 513
 514     // Since the result is less than or equal to either operand, any leading
 515     // zero bits in either operand must also exist in the result.
 516     APInt AllOnes = APInt::getAllOnesValue(BitWidth);
 517     ComputeMaskedBits(I->getOperand(0), AllOnes, KnownZero, KnownOne,
 518                       TD, Depth+1);
 519     ComputeMaskedBits(I->getOperand(1), AllOnes, KnownZero2, KnownOne2,
 520                       TD, Depth+1);
 521
 522     unsigned Leaders = std::max(KnownZero.countLeadingOnes(),
 523                                 KnownZero2.countLeadingOnes());
 524     KnownOne.clearAllBits();
 525     KnownZero = APInt::getHighBitsSet(BitWidth, Leaders) & Mask;
 526     break;
 527   }
 528
 529   case Instruction::Alloca: {
 530     AllocaInst *AI = cast<AllocaInst>(V);
 531     unsigned Align = AI->getAlignment();
 532     if (Align == 0 && TD)
 533       Align = TD->getABITypeAlignment(AI->getType()->getElementType());
 534
 535     if (Align > 0)
 536       KnownZero = Mask & APInt::getLowBitsSet(BitWidth,
 537                                               CountTrailingZeros_32(Align));
 538     break;
 539   }
 540   case Instruction::GetElementPtr: {
 541     // Analyze all of the subscripts of this getelementptr instruction
 542     // to determine if we can prove known low zero bits.
 543     APInt LocalMask = APInt::getAllOnesValue(BitWidth);
 544     APInt LocalKnownZero(BitWidth, 0), LocalKnownOne(BitWidth, 0);
 545     ComputeMaskedBits(I->getOperand(0), LocalMask,
 546                       LocalKnownZero, LocalKnownOne, TD, Depth+1);
 547     unsigned TrailZ = LocalKnownZero.countTrailingOnes();
 548
 549     gep_type_iterator GTI = gep_type_begin(I);
 550     for (unsigned i = 1, e = I->getNumOperands(); i != e; ++i, ++GTI) {
 551       Value *Index = I->getOperand(i);
 552       if (const StructType *STy = dyn_cast<StructType>(*GTI)) {
 553         // Handle struct member offset arithmetic.
 554         if (!TD) return;
 555         const StructLayout *SL = TD->getStructLayout(STy);
 556         unsigned Idx = cast<ConstantInt>(Index)->getZExtValue();
 557         uint64_t Offset = SL->getElementOffset(Idx);
 558         TrailZ = std::min(TrailZ,
 559                           CountTrailingZeros_64(Offset));
 560       } else {
 561         // Handle array index arithmetic.
 562         const Type *IndexedTy = GTI.getIndexedType();
 563         if (!IndexedTy->isSized()) return;
 564         unsigned GEPOpiBits = Index->getType()->getScalarSizeInBits();
 565         uint64_t TypeSize = TD ? TD->getTypeAllocSize(IndexedTy) : 1;
 566         LocalMask = APInt::getAllOnesValue(GEPOpiBits);
 567         LocalKnownZero = LocalKnownOne = APInt(GEPOpiBits, 0);
 568         ComputeMaskedBits(Index, LocalMask,
 569                           LocalKnownZero, LocalKnownOne, TD, Depth+1);
 570         TrailZ = std::min(TrailZ,
 571                           unsigned(CountTrailingZeros_64(TypeSize) +
 572                                    LocalKnownZero.countTrailingOnes()));
 573       }
 574     }
 575
 576     KnownZero = APInt::getLowBitsSet(BitWidth, TrailZ) & Mask;
 577     break;
 578   }
 579   case Instruction::PHI: {
 580     PHINode *P = cast<PHINode>(I);
 581     // Handle the case of a simple two-predecessor recurrence PHI.
 582     // There's a lot more that could theoretically be done here, but
 583     // this is sufficient to catch some interesting cases.
 584     if (P->getNumIncomingValues() == 2) {
 585       for (unsigned i = 0; i != 2; ++i) {
 586         Value *L = P->getIncomingValue(i);
 587         Value *R = P->getIncomingValue(!i);
 588         Operator *LU = dyn_cast<Operator>(L);
 589         if (!LU)
 590           continue;
 591         unsigned Opcode = LU->getOpcode();
 592         // Check for operations that have the property that if
 593         // both their operands have low zero bits, the result
 594         // will have low zero bits.
 595         if (Opcode == Instruction::Add ||
 596             Opcode == Instruction::Sub ||
 597             Opcode == Instruction::And ||
 598             Opcode == Instruction::Or ||
 599             Opcode == Instruction::Mul) {
 600           Value *LL = LU->getOperand(0);
 601           Value *LR = LU->getOperand(1);
 602           // Find a recurrence.
 603           if (LL == I)
 604             L = LR;
 605           else if (LR == I)
 606             L = LL;
 607           else
 608             break;
 609           // Ok, we have a PHI of the form L op= R. Check for low
 610           // zero bits.
 611           APInt Mask2 = APInt::getAllOnesValue(BitWidth);
 612           ComputeMaskedBits(R, Mask2, KnownZero2, KnownOne2, TD, Depth+1);
 613           Mask2 = APInt::getLowBitsSet(BitWidth,
 614                                        KnownZero2.countTrailingOnes());
 615
 616           // We need to take the minimum number of known bits
 617           APInt KnownZero3(KnownZero), KnownOne3(KnownOne);
 618           ComputeMaskedBits(L, Mask2, KnownZero3, KnownOne3, TD, Depth+1);
 619
 620           KnownZero = Mask &
 621                       APInt::getLowBitsSet(BitWidth,
 622                                            std::min(KnownZero2.countTrailingOnes(),
 623                                                     KnownZero3.countTrailingOnes()));
 624           break;
 625         }
 626       }
 627     }
 628
 629     // Unreachable blocks may have zero-operand PHI nodes.
 630     if (P->getNumIncomingValues() == 0)
 631       return;
 632
 633     // Otherwise take the unions of the known bit sets of the operands,
 634     // taking conservative care to avoid excessive recursion.
 635     if (Depth < MaxDepth - 1 && !KnownZero && !KnownOne) {
 636       // Skip if every incoming value references to ourself.
 637       if (P->hasConstantValue() == P)
 638         break;
 639
 640       KnownZero = APInt::getAllOnesValue(BitWidth);
 641       KnownOne = APInt::getAllOnesValue(BitWidth);
 642       for (unsigned i = 0, e = P->getNumIncomingValues(); i != e; ++i) {
 643         // Skip direct self references.
 644         if (P->getIncomingValue(i) == P) continue;
 645
 646         KnownZero2 = APInt(BitWidth, 0);
 647         KnownOne2 = APInt(BitWidth, 0);
 648         // Recurse, but cap the recursion to one level, because we don't
 649         // want to waste time spinning around in loops.
 650         ComputeMaskedBits(P->getIncomingValue(i), KnownZero | KnownOne,
 651                           KnownZero2, KnownOne2, TD, MaxDepth-1);
 652         KnownZero &= KnownZero2;
 653         KnownOne &= KnownOne2;
 654         // If all bits have been ruled out, there's no need to check
 655         // more operands.
 656         if (!KnownZero && !KnownOne)
 657           break;
 658       }
 659     }
 660     break;
 661   }
 662   case Instruction::Call:
 663     if (IntrinsicInst *II = dyn_cast<IntrinsicInst>(I)) {
 664       switch (II->getIntrinsicID()) {
 665       default: break;
 666       case Intrinsic::ctpop:
 667       case Intrinsic::ctlz:
 668       case Intrinsic::cttz: {
 669         unsigned LowBits = Log2_32(BitWidth)+1;
 670         KnownZero = APInt::getHighBitsSet(BitWidth, BitWidth - LowBits);
 671         break;
 672       }
 673       case Intrinsic::x86_sse42_crc64_8:
 674       case Intrinsic::x86_sse42_crc64_64:
 675         KnownZero = APInt::getHighBitsSet(64, 32);
 676         break;
 677       }
 678     }
 679     break;
 680   }
 681 }
 682
 683 /// ComputeSignBit - Determine whether the sign bit is known to be zero or
 684 /// one.  Convenience wrapper around ComputeMaskedBits.
 685 void llvm::ComputeSignBit(Value *V, bool &KnownZero, bool &KnownOne,
 686                           const TargetData *TD, unsigned Depth) {
 687   unsigned BitWidth = getBitWidth(V->getType(), TD);
 688   if (!BitWidth) {
 689     KnownZero = false;
 690     KnownOne = false;
 691     return;
 692   }
 693   APInt ZeroBits(BitWidth, 0);
 694   APInt OneBits(BitWidth, 0);
 695   ComputeMaskedBits(V, APInt::getSignBit(BitWidth), ZeroBits, OneBits, TD,
 696                     Depth);
 697   KnownOne = OneBits[BitWidth - 1];
 698   KnownZero = ZeroBits[BitWidth - 1];
 699 }
 700
 701 /// isPowerOfTwo - Return true if the given value is known to have exactly one
 702 /// bit set when defined. For vectors return true if every element is known to
 703 /// be a power of two when defined.  Supports values with integer or pointer
 704 /// types and vectors of integers.
 705 bool llvm::isPowerOfTwo(Value *V, const TargetData *TD, unsigned Depth) {
 706   if (ConstantInt *CI = dyn_cast<ConstantInt>(V))
 707     return CI->getValue().isPowerOf2();
 708   // TODO: Handle vector constants.
 709
 710   // 1 << X is clearly a power of two if the one is not shifted off the end.  If
 711   // it is shifted off the end then the result is undefined.
 712   if (match(V, m_Shl(m_One(), m_Value())))
 713     return true;
 714
 715   // (signbit) >>l X is clearly a power of two if the one is not shifted off the
 716   // bottom.  If it is shifted off the bottom then the result is undefined.
 717   if (match(V, m_LShr(m_SignBit(), m_Value())))
 718     return true;
 719
 720   // The remaining tests are all recursive, so bail out if we hit the limit.
 721   if (Depth++ == MaxDepth)
 722     return false;
 723
 724   if (ZExtInst *ZI = dyn_cast<ZExtInst>(V))
 725     return isPowerOfTwo(ZI->getOperand(0), TD, Depth);
 726
 727   if (SelectInst *SI = dyn_cast<SelectInst>(V))
 728     return isPowerOfTwo(SI->getTrueValue(), TD, Depth) &&
 729       isPowerOfTwo(SI->getFalseValue(), TD, Depth);
 730
 731   // An exact divide or right shift can only shift off zero bits, so the result
 732   // is a power of two only if the first operand is a power of two and not
 733   // copying a sign bit (sdiv int_min, 2).
 734   if (match(V, m_LShr(m_Value(), m_Value())) ||
 735       match(V, m_UDiv(m_Value(), m_Value()))) {
 736     PossiblyExactOperator *PEO = cast<PossiblyExactOperator>(V);
 737     if (PEO->isExact())
 738       return isPowerOfTwo(PEO->getOperand(0), TD, Depth);
 739   }
 740
 741   return false;
 742 }
 743
 744 /// isKnownNonZero - Return true if the given value is known to be non-zero
 745 /// when defined.  For vectors return true if every element is known to be
 746 /// non-zero when defined.  Supports values with integer or pointer type and
 747 /// vectors of integers.
 748 bool llvm::isKnownNonZero(Value *V, const TargetData *TD, unsigned Depth) {
 749   if (Constant *C = dyn_cast<Constant>(V)) {
 750     if (C->isNullValue())
 751       return false;
 752     if (isa<ConstantInt>(C))
 753       // Must be non-zero due to null test above.
 754       return true;
 755     // TODO: Handle vectors
 756     return false;
 757   }
 758
 759   // The remaining tests are all recursive, so bail out if we hit the limit.
 760   if (Depth++ == MaxDepth)
 761     return false;
 762
 763   unsigned BitWidth = getBitWidth(V->getType(), TD);
 764
 765   // X | Y != 0 if X != 0 or Y != 0.
 766   Value *X = 0, *Y = 0;
 767   if (match(V, m_Or(m_Value(X), m_Value(Y))))
 768     return isKnownNonZero(X, TD, Depth) || isKnownNonZero(Y, TD, Depth);
 769
 770   // ext X != 0 if X != 0.
 771   if (isa<SExtInst>(V) || isa<ZExtInst>(V))
 772     return isKnownNonZero(cast<Instruction>(V)->getOperand(0), TD, Depth);
 773
 774   // shl X, Y != 0 if X is odd.  Note that the value of the shift is undefined
 775   // if the lowest bit is shifted off the end.
 776   if (BitWidth && match(V, m_Shl(m_Value(X), m_Value(Y)))) {
 777     // shl nuw can't remove any non-zero bits.
 778     BinaryOperator *BO = cast<BinaryOperator>(V);
 779     if (BO->hasNoUnsignedWrap())
 780       return isKnownNonZero(X, TD, Depth);
 781
 782     APInt KnownZero(BitWidth, 0);
 783     APInt KnownOne(BitWidth, 0);
 784     ComputeMaskedBits(X, APInt(BitWidth, 1), KnownZero, KnownOne, TD, Depth);
 785     if (KnownOne[0])
 786       return true;
 787   }
 788   // shr X, Y != 0 if X is negative.  Note that the value of the shift is not
 789   // defined if the sign bit is shifted off the end.
 790   else if (match(V, m_Shr(m_Value(X), m_Value(Y)))) {
 791     // shr exact can only shift out zero bits.
 792     BinaryOperator *BO = cast<BinaryOperator>(V);
 793     if (BO->isExact())
 794       return isKnownNonZero(X, TD, Depth);
 795
 796     bool XKnownNonNegative, XKnownNegative;
 797     ComputeSignBit(X, XKnownNonNegative, XKnownNegative, TD, Depth);
 798     if (XKnownNegative)
 799       return true;
 800   }
 801   // div exact can only produce a zero if the dividend is zero.
 802   else if (match(V, m_IDiv(m_Value(X), m_Value()))) {
 803     BinaryOperator *BO = cast<BinaryOperator>(V);
 804     if (BO->isExact())
 805       return isKnownNonZero(X, TD, Depth);
 806   }
 807   // X + Y.
 808   else if (match(V, m_Add(m_Value(X), m_Value(Y)))) {
 809     bool XKnownNonNegative, XKnownNegative;
 810     bool YKnownNonNegative, YKnownNegative;
 811     ComputeSignBit(X, XKnownNonNegative, XKnownNegative, TD, Depth);
 812     ComputeSignBit(Y, YKnownNonNegative, YKnownNegative, TD, Depth);
 813
 814     // If X and Y are both non-negative (as signed values) then their sum is not
 815     // zero unless both X and Y are zero.
 816     if (XKnownNonNegative && YKnownNonNegative)
 817       if (isKnownNonZero(X, TD, Depth) || isKnownNonZero(Y, TD, Depth))
 818         return true;
 819
 820     // If X and Y are both negative (as signed values) then their sum is not
 821     // zero unless both X and Y equal INT_MIN.
 822     if (BitWidth && XKnownNegative && YKnownNegative) {
 823       APInt KnownZero(BitWidth, 0);
 824       APInt KnownOne(BitWidth, 0);
 825       APInt Mask = APInt::getSignedMaxValue(BitWidth);
 826       // The sign bit of X is set.  If some other bit is set then X is not equal
 827       // to INT_MIN.
 828       ComputeMaskedBits(X, Mask, KnownZero, KnownOne, TD, Depth);
 829       if ((KnownOne & Mask) != 0)
 830         return true;
 831       // The sign bit of Y is set.  If some other bit is set then Y is not equal
 832       // to INT_MIN.
 833       ComputeMaskedBits(Y, Mask, KnownZero, KnownOne, TD, Depth);
 834       if ((KnownOne & Mask) != 0)
 835         return true;
 836     }
 837
 838     // The sum of a non-negative number and a power of two is not zero.
 839     if (XKnownNonNegative && isPowerOfTwo(Y, TD, Depth))
 840       return true;
 841     if (YKnownNonNegative && isPowerOfTwo(X, TD, Depth))
 842       return true;
 843   }
 844   // (C ? X : Y) != 0 if X != 0 and Y != 0.
 845   else if (SelectInst *SI = dyn_cast<SelectInst>(V)) {
 846     if (isKnownNonZero(SI->getTrueValue(), TD, Depth) &&
 847         isKnownNonZero(SI->getFalseValue(), TD, Depth))
 848       return true;
 849   }
 850
 851   if (!BitWidth) return false;
 852   APInt KnownZero(BitWidth, 0);
 853   APInt KnownOne(BitWidth, 0);
 854   ComputeMaskedBits(V, APInt::getAllOnesValue(BitWidth), KnownZero, KnownOne,
 855                     TD, Depth);
 856   return KnownOne != 0;
 857 }
 858
 859 /// MaskedValueIsZero - Return true if 'V & Mask' is known to be zero.  We use
 860 /// this predicate to simplify operations downstream.  Mask is known to be zero
 861 /// for bits that V cannot have.
 862 ///
 863 /// This function is defined on values with integer type, values with pointer
 864 /// type (but only if TD is non-null), and vectors of integers.  In the case
 865 /// where V is a vector, the mask, known zero, and known one values are the
 866 /// same width as the vector element, and the bit is set only if it is true
 867 /// for all of the elements in the vector.
 868 bool llvm::MaskedValueIsZero(Value *V, const APInt &Mask,
 869                              const TargetData *TD, unsigned Depth) {
 870   APInt KnownZero(Mask.getBitWidth(), 0), KnownOne(Mask.getBitWidth(), 0);
 871   ComputeMaskedBits(V, Mask, KnownZero, KnownOne, TD, Depth);
 872   assert((KnownZero & KnownOne) == 0 && "Bits known to be one AND zero?");
 873   return (KnownZero & Mask) == Mask;
 874 }
 875
 876
 877
 878 /// ComputeNumSignBits - Return the number of times the sign bit of the
 879 /// register is replicated into the other bits.  We know that at least 1 bit
 880 /// is always equal to the sign bit (itself), but other cases can give us
 881 /// information.  For example, immediately after an "ashr X, 2", we know that
 882 /// the top 3 bits are all equal to each other, so we return 3.
 883 ///
 884 /// 'Op' must have a scalar integer type.
 885 ///
 886 unsigned llvm::ComputeNumSignBits(Value *V, const TargetData *TD,
 887                                   unsigned Depth) {
 888   assert((TD || V->getType()->isIntOrIntVectorTy()) &&
 889          "ComputeNumSignBits requires a TargetData object to operate "
 890          "on non-integer values!");
 891   const Type *Ty = V->getType();
 892   unsigned TyBits = TD ? TD->getTypeSizeInBits(V->getType()->getScalarType()) :
 893                          Ty->getScalarSizeInBits();
 894   unsigned Tmp, Tmp2;
 895   unsigned FirstAnswer = 1;
 896
 897   // Note that ConstantInt is handled by the general ComputeMaskedBits case
 898   // below.
 899
 900   if (Depth == 6)
 901     return 1;  // Limit search depth.
 902
 903   Operator *U = dyn_cast<Operator>(V);
 904   switch (Operator::getOpcode(V)) {
 905   default: break;
 906   case Instruction::SExt:
 907     Tmp = TyBits - U->getOperand(0)->getType()->getScalarSizeInBits();
 908     return ComputeNumSignBits(U->getOperand(0), TD, Depth+1) + Tmp;
 909
 910   case Instruction::AShr:
 911     Tmp = ComputeNumSignBits(U->getOperand(0), TD, Depth+1);
 912     // ashr X, C   -> adds C sign bits.
 913     if (ConstantInt *C = dyn_cast<ConstantInt>(U->getOperand(1))) {
 914       Tmp += C->getZExtValue();
 915       if (Tmp > TyBits) Tmp = TyBits;
 916     }
 917     // vector ashr X, <C, C, C, C>  -> adds C sign bits
 918     if (ConstantVector *C = dyn_cast<ConstantVector>(U->getOperand(1))) {
 919       if (ConstantInt *CI = dyn_cast_or_null<ConstantInt>(C->getSplatValue())) {
 920         Tmp += CI->getZExtValue();
 921         if (Tmp > TyBits) Tmp = TyBits;
 922       }
 923     }
 924     return Tmp;
 925   case Instruction::Shl:
 926     if (ConstantInt *C = dyn_cast<ConstantInt>(U->getOperand(1))) {
 927       // shl destroys sign bits.
 928       Tmp = ComputeNumSignBits(U->getOperand(0), TD, Depth+1);
 929       if (C->getZExtValue() >= TyBits ||      // Bad shift.
 930           C->getZExtValue() >= Tmp) break;    // Shifted all sign bits out.
 931       return Tmp - C->getZExtValue();
 932     }
 933     break;
 934   case Instruction::And:
 935   case Instruction::Or:
 936   case Instruction::Xor:    // NOT is handled here.
 937     // Logical binary ops preserve the number of sign bits at the worst.
 938     Tmp = ComputeNumSignBits(U->getOperand(0), TD, Depth+1);
 939     if (Tmp != 1) {
 940       Tmp2 = ComputeNumSignBits(U->getOperand(1), TD, Depth+1);
 941       FirstAnswer = std::min(Tmp, Tmp2);
 942       // We computed what we know about the sign bits as our first
 943       // answer. Now proceed to the generic code that uses
 944       // ComputeMaskedBits, and pick whichever answer is better.
 945     }
 946     break;
 947
 948   case Instruction::Select:
 949     Tmp = ComputeNumSignBits(U->getOperand(1), TD, Depth+1);
 950     if (Tmp == 1) return 1;  // Early out.
 951     Tmp2 = ComputeNumSignBits(U->getOperand(2), TD, Depth+1);
 952     return std::min(Tmp, Tmp2);
 953
 954   case Instruction::Add:
 955     // Add can have at most one carry bit.  Thus we know that the output
 956     // is, at worst, one more bit than the inputs.
 957     Tmp = ComputeNumSignBits(U->getOperand(0), TD, Depth+1);
 958     if (Tmp == 1) return 1;  // Early out.
 959
 960     // Special case decrementing a value (ADD X, -1):
 961     if (ConstantInt *CRHS = dyn_cast<ConstantInt>(U->getOperand(1)))
 962       if (CRHS->isAllOnesValue()) {
 963         APInt KnownZero(TyBits, 0), KnownOne(TyBits, 0);
 964         APInt Mask = APInt::getAllOnesValue(TyBits);
 965         ComputeMaskedBits(U->getOperand(0), Mask, KnownZero, KnownOne, TD,
 966                           Depth+1);
 967
 968         // If the input is known to be 0 or 1, the output is 0/-1, which is all
 969         // sign bits set.
 970         if ((KnownZero | APInt(TyBits, 1)) == Mask)
 971           return TyBits;
 972
 973         // If we are subtracting one from a positive number, there is no carry
 974         // out of the result.
 975         if (KnownZero.isNegative())
 976           return Tmp;
 977       }
 978
 979     Tmp2 = ComputeNumSignBits(U->getOperand(1), TD, Depth+1);
 980     if (Tmp2 == 1) return 1;
 981     return std::min(Tmp, Tmp2)-1;
 982
 983   case Instruction::Sub:
 984     Tmp2 = ComputeNumSignBits(U->getOperand(1), TD, Depth+1);
 985     if (Tmp2 == 1) return 1;
 986
 987     // Handle NEG.
 988     if (ConstantInt *CLHS = dyn_cast<ConstantInt>(U->getOperand(0)))
 989       if (CLHS->isNullValue()) {
 990         APInt KnownZero(TyBits, 0), KnownOne(TyBits, 0);
 991         APInt Mask = APInt::getAllOnesValue(TyBits);
 992         ComputeMaskedBits(U->getOperand(1), Mask, KnownZero, KnownOne,
 993                           TD, Depth+1);
 994         // If the input is known to be 0 or 1, the output is 0/-1, which is all
 995         // sign bits set.
 996         if ((KnownZero | APInt(TyBits, 1)) == Mask)
 997           return TyBits;
 998
 999         // If the input is known to be positive (the sign bit is known clear),
1000         // the output of the NEG has the same number of sign bits as the input.
1001         if (KnownZero.isNegative())
1002           return Tmp2;
1003
1004         // Otherwise, we treat this like a SUB.
1005       }
1006
1007     // Sub can have at most one carry bit.  Thus we know that the output
1008     // is, at worst, one more bit than the inputs.
1009     Tmp = ComputeNumSignBits(U->getOperand(0), TD, Depth+1);
1010     if (Tmp == 1) return 1;  // Early out.
1011     return std::min(Tmp, Tmp2)-1;
1012
1013   case Instruction::PHI: {
1014     PHINode *PN = cast<PHINode>(U);
1015     // Don't analyze large in-degree PHIs.
1016     if (PN->getNumIncomingValues() > 4) break;
1017
1018     // Take the minimum of all incoming values.  This can't infinitely loop
1019     // because of our depth threshold.
1020     Tmp = ComputeNumSignBits(PN->getIncomingValue(0), TD, Depth+1);
1021     for (unsigned i = 1, e = PN->getNumIncomingValues(); i != e; ++i) {
1022       if (Tmp == 1) return Tmp;
1023       Tmp = std::min(Tmp,
1024                      ComputeNumSignBits(PN->getIncomingValue(i), TD, Depth+1));
1025     }
1026     return Tmp;
1027   }
1028
1029   case Instruction::Trunc:
1030     // FIXME: it's tricky to do anything useful for this, but it is an important
1031     // case for targets like X86.
1032     break;
1033   }
1034
1035   // Finally, if we can prove that the top bits of the result are 0's or 1's,
1036   // use this information.
1037   APInt KnownZero(TyBits, 0), KnownOne(TyBits, 0);
1038   APInt Mask = APInt::getAllOnesValue(TyBits);
1039   ComputeMaskedBits(V, Mask, KnownZero, KnownOne, TD, Depth);
1040
1041   if (KnownZero.isNegative()) {        // sign bit is 0
1042     Mask = KnownZero;
1043   } else if (KnownOne.isNegative()) {  // sign bit is 1;
1044     Mask = KnownOne;
1045   } else {
1046     // Nothing known.
1047     return FirstAnswer;
1048   }
1049
1050   // Okay, we know that the sign bit in Mask is set.  Use CLZ to determine
1051   // the number of identical bits in the top of the input value.
1052   Mask = ~Mask;
1053   Mask <<= Mask.getBitWidth()-TyBits;
1054   // Return # leading zeros.  We use 'min' here in case Val was zero before
1055   // shifting.  We don't want to return '64' as for an i32 "0".
1056   return std::max(FirstAnswer, std::min(TyBits, Mask.countLeadingZeros()));
1057 }
1058
1059 /// ComputeMultiple - This function computes the integer multiple of Base that
1060 /// equals V.  If successful, it returns true and returns the multiple in
1061 /// Multiple.  If unsuccessful, it returns false. It looks
1062 /// through SExt instructions only if LookThroughSExt is true.
1063 bool llvm::ComputeMultiple(Value *V, unsigned Base, Value *&Multiple,
1064                            bool LookThroughSExt, unsigned Depth) {
1065   const unsigned MaxDepth = 6;
1066
1067   assert(V && "No Value?");
1068   assert(Depth <= MaxDepth && "Limit Search Depth");
1069   assert(V->getType()->isIntegerTy() && "Not integer or pointer type!");
1070
1071   const Type *T = V->getType();
1072
1073   ConstantInt *CI = dyn_cast<ConstantInt>(V);
1074
1075   if (Base == 0)
1076     return false;
1077
1078   if (Base == 1) {
1079     Multiple = V;
1080     return true;
1081   }
1082
1083   ConstantExpr *CO = dyn_cast<ConstantExpr>(V);
1084   Constant *BaseVal = ConstantInt::get(T, Base);
1085   if (CO && CO == BaseVal) {
1086     // Multiple is 1.
1087     Multiple = ConstantInt::get(T, 1);
1088     return true;
1089   }
1090
1091   if (CI && CI->getZExtValue() % Base == 0) {
1092     Multiple = ConstantInt::get(T, CI->getZExtValue() / Base);
1093     return true;
1094   }
1095
1096   if (Depth == MaxDepth) return false;  // Limit search depth.
1097
1098   Operator *I = dyn_cast<Operator>(V);
1099   if (!I) return false;
1100
1101   switch (I->getOpcode()) {
1102   default: break;
1103   case Instruction::SExt:
1104     if (!LookThroughSExt) return false;
1105     // otherwise fall through to ZExt
1106   case Instruction::ZExt:
1107     return ComputeMultiple(I->getOperand(0), Base, Multiple,
1108                            LookThroughSExt, Depth+1);
1109   case Instruction::Shl:
1110   case Instruction::Mul: {
1111     Value *Op0 = I->getOperand(0);
1112     Value *Op1 = I->getOperand(1);
1113
1114     if (I->getOpcode() == Instruction::Shl) {
1115       ConstantInt *Op1CI = dyn_cast<ConstantInt>(Op1);
1116       if (!Op1CI) return false;
1117       // Turn Op0 << Op1 into Op0 * 2^Op1
1118       APInt Op1Int = Op1CI->getValue();
1119       uint64_t BitToSet = Op1Int.getLimitedValue(Op1Int.getBitWidth() - 1);
1120       APInt API(Op1Int.getBitWidth(), 0);
1121       API.setBit(BitToSet);
1122       Op1 = ConstantInt::get(V->getContext(), API);
1123     }
1124
1125     Value *Mul0 = NULL;
1126     if (ComputeMultiple(Op0, Base, Mul0, LookThroughSExt, Depth+1)) {
1127       if (Constant *Op1C = dyn_cast<Constant>(Op1))
1128         if (Constant *MulC = dyn_cast<Constant>(Mul0)) {
1129           if (Op1C->getType()->getPrimitiveSizeInBits() <
1130               MulC->getType()->getPrimitiveSizeInBits())
1131             Op1C = ConstantExpr::getZExt(Op1C, MulC->getType());
1132           if (Op1C->getType()->getPrimitiveSizeInBits() >
1133               MulC->getType()->getPrimitiveSizeInBits())
1134             MulC = ConstantExpr::getZExt(MulC, Op1C->getType());
1135
1136           // V == Base * (Mul0 * Op1), so return (Mul0 * Op1)
1137           Multiple = ConstantExpr::getMul(MulC, Op1C);
1138           return true;
1139         }
1140
1141       if (ConstantInt *Mul0CI = dyn_cast<ConstantInt>(Mul0))
1142         if (Mul0CI->getValue() == 1) {
1143           // V == Base * Op1, so return Op1
1144           Multiple = Op1;
1145           return true;
1146         }
1147     }
1148
1149     Value *Mul1 = NULL;
1150     if (ComputeMultiple(Op1, Base, Mul1, LookThroughSExt, Depth+1)) {
1151       if (Constant *Op0C = dyn_cast<Constant>(Op0))
1152         if (Constant *MulC = dyn_cast<Constant>(Mul1)) {
1153           if (Op0C->getType()->getPrimitiveSizeInBits() <
1154               MulC->getType()->getPrimitiveSizeInBits())
1155             Op0C = ConstantExpr::getZExt(Op0C, MulC->getType());
1156           if (Op0C->getType()->getPrimitiveSizeInBits() >
1157               MulC->getType()->getPrimitiveSizeInBits())
1158             MulC = ConstantExpr::getZExt(MulC, Op0C->getType());
1159
1160           // V == Base * (Mul1 * Op0), so return (Mul1 * Op0)
1161           Multiple = ConstantExpr::getMul(MulC, Op0C);
1162           return true;
1163         }
1164
1165       if (ConstantInt *Mul1CI = dyn_cast<ConstantInt>(Mul1))
1166         if (Mul1CI->getValue() == 1) {
1167           // V == Base * Op0, so return Op0
1168           Multiple = Op0;
1169           return true;
1170         }
1171     }
1172   }
1173   }
1174
1175   // We could not determine if V is a multiple of Base.
1176   return false;
1177 }
1178
1179 /// CannotBeNegativeZero - Return true if we can prove that the specified FP
1180 /// value is never equal to -0.0.
1181 ///
1182 /// NOTE: this function will need to be revisited when we support non-default
1183 /// rounding modes!
1184 ///
1185 bool llvm::CannotBeNegativeZero(const Value *V, unsigned Depth) {
1186   if (const ConstantFP *CFP = dyn_cast<ConstantFP>(V))
1187     return !CFP->getValueAPF().isNegZero();
1188
1189   if (Depth == 6)
1190     return 1;  // Limit search depth.
1191
1192   const Operator *I = dyn_cast<Operator>(V);
1193   if (I == 0) return false;
1194
1195   // (add x, 0.0) is guaranteed to return +0.0, not -0.0.
1196   if (I->getOpcode() == Instruction::FAdd &&
1197       isa<ConstantFP>(I->getOperand(1)) &&
1198       cast<ConstantFP>(I->getOperand(1))->isNullValue())
1199     return true;
1200
1201   // sitofp and uitofp turn into +0.0 for zero.
1202   if (isa<SIToFPInst>(I) || isa<UIToFPInst>(I))
1203     return true;
1204
1205   if (const IntrinsicInst *II = dyn_cast<IntrinsicInst>(I))
1206     // sqrt(-0.0) = -0.0, no other negative results are possible.
1207     if (II->getIntrinsicID() == Intrinsic::sqrt)
1208       return CannotBeNegativeZero(II->getArgOperand(0), Depth+1);
1209
1210   if (const CallInst *CI = dyn_cast<CallInst>(I))
1211     if (const Function *F = CI->getCalledFunction()) {
1212       if (F->isDeclaration()) {
1213         // abs(x) != -0.0
1214         if (F->getName() == "abs") return true;
1215         // fabs[lf](x) != -0.0
1216         if (F->getName() == "fabs") return true;
1217         if (F->getName() == "fabsf") return true;
1218         if (F->getName() == "fabsl") return true;
1219         if (F->getName() == "sqrt" || F->getName() == "sqrtf" ||
1220             F->getName() == "sqrtl")
1221           return CannotBeNegativeZero(CI->getArgOperand(0), Depth+1);
1222       }
1223     }
1224
1225   return false;
1226 }
1227
1228 /// isBytewiseValue - If the specified value can be set by repeating the same
1229 /// byte in memory, return the i8 value that it is represented with.  This is
1230 /// true for all i8 values obviously, but is also true for i32 0, i32 -1,
1231 /// i16 0xF0F0, double 0.0 etc.  If the value can't be handled with a repeated
1232 /// byte store (e.g. i16 0x1234), return null.
1233 Value *llvm::isBytewiseValue(Value *V) {
1234   // All byte-wide stores are splatable, even of arbitrary variables.
1235   if (V->getType()->isIntegerTy(8)) return V;
1236
1237   // Handle 'null' ConstantArrayZero etc.
1238   if (Constant *C = dyn_cast<Constant>(V))
1239     if (C->isNullValue())
1240       return Constant::getNullValue(Type::getInt8Ty(V->getContext()));
1241
1242   // Constant float and double values can be handled as integer values if the
1243   // corresponding integer value is "byteable".  An important case is 0.0.
1244   if (ConstantFP *CFP = dyn_cast<ConstantFP>(V)) {
1245     if (CFP->getType()->isFloatTy())
1246       V = ConstantExpr::getBitCast(CFP, Type::getInt32Ty(V->getContext()));
1247     if (CFP->getType()->isDoubleTy())
1248       V = ConstantExpr::getBitCast(CFP, Type::getInt64Ty(V->getContext()));
1249     // Don't handle long double formats, which have strange constraints.
1250   }
1251
1252   // We can handle constant integers that are power of two in size and a
1253   // multiple of 8 bits.
1254   if (ConstantInt *CI = dyn_cast<ConstantInt>(V)) {
1255     unsigned Width = CI->getBitWidth();
1256     if (isPowerOf2_32(Width) && Width > 8) {
1257       // We can handle this value if the recursive binary decomposition is the
1258       // same at all levels.
1259       APInt Val = CI->getValue();
1260       APInt Val2;
1261       while (Val.getBitWidth() != 8) {
1262         unsigned NextWidth = Val.getBitWidth()/2;
1263         Val2  = Val.lshr(NextWidth);
1264         Val2 = Val2.trunc(Val.getBitWidth()/2);
1265         Val = Val.trunc(Val.getBitWidth()/2);
1266
1267         // If the top/bottom halves aren't the same, reject it.
1268         if (Val != Val2)
1269           return 0;
1270       }
1271       return ConstantInt::get(V->getContext(), Val);
1272     }
1273   }
1274
1275   // A ConstantArray is splatable if all its members are equal and also
1276   // splatable.
1277   if (ConstantArray *CA = dyn_cast<ConstantArray>(V)) {
1278     if (CA->getNumOperands() == 0)
1279       return 0;
1280
1281     Value *Val = isBytewiseValue(CA->getOperand(0));
1282     if (!Val)
1283       return 0;
1284
1285     for (unsigned I = 1, E = CA->getNumOperands(); I != E; ++I)
1286       if (CA->getOperand(I-1) != CA->getOperand(I))
1287         return 0;
1288
1289     return Val;
1290   }
1291
1292   // Conceptually, we could handle things like:
1293   //   %a = zext i8 %X to i16
1294   //   %b = shl i16 %a, 8
1295   //   %c = or i16 %a, %b
1296   // but until there is an example that actually needs this, it doesn't seem
1297   // worth worrying about.
1298   return 0;
1299 }
1300
1301
1302 // This is the recursive version of BuildSubAggregate. It takes a few different
1303 // arguments. Idxs is the index within the nested struct From that we are
1304 // looking at now (which is of type IndexedType). IdxSkip is the number of
1305 // indices from Idxs that should be left out when inserting into the resulting
1306 // struct. To is the result struct built so far, new insertvalue instructions
1307 // build on that.
1308 static Value *BuildSubAggregate(Value *From, Value* To, const Type *IndexedType,
1309                                 SmallVector<unsigned, 10> &Idxs,
1310                                 unsigned IdxSkip,
1311                                 Instruction *InsertBefore) {
1312   const llvm::StructType *STy = llvm::dyn_cast<llvm::StructType>(IndexedType);
1313   if (STy) {
1314     // Save the original To argument so we can modify it
1315     Value *OrigTo = To;
1316     // General case, the type indexed by Idxs is a struct
1317     for (unsigned i = 0, e = STy->getNumElements(); i != e; ++i) {
1318       // Process each struct element recursively
1319       Idxs.push_back(i);
1320       Value *PrevTo = To;
1321       To = BuildSubAggregate(From, To, STy->getElementType(i), Idxs, IdxSkip,
1322                              InsertBefore);
1323       Idxs.pop_back();
1324       if (!To) {
1325         // Couldn't find any inserted value for this index? Cleanup
1326         while (PrevTo != OrigTo) {
1327           InsertValueInst* Del = cast<InsertValueInst>(PrevTo);
1328           PrevTo = Del->getAggregateOperand();
1329           Del->eraseFromParent();
1330         }
1331         // Stop processing elements
1332         break;
1333       }
1334     }
1335     // If we successfully found a value for each of our subaggregates
1336     if (To)
1337       return To;
1338   }
1339   // Base case, the type indexed by SourceIdxs is not a struct, or not all of
1340   // the struct's elements had a value that was inserted directly. In the latter
1341   // case, perhaps we can't determine each of the subelements individually, but
1342   // we might be able to find the complete struct somewhere.
1343
1344   // Find the value that is at that particular spot
1345   Value *V = FindInsertedValue(From, Idxs.begin(), Idxs.end());
1346
1347   if (!V)
1348     return NULL;
1349
1350   // Insert the value in the new (sub) aggregrate
1351   return llvm::InsertValueInst::Create(To, V, Idxs.begin() + IdxSkip,
1352                                        Idxs.end(), "tmp", InsertBefore);
1353 }
1354
1355 // This helper takes a nested struct and extracts a part of it (which is again a
1356 // struct) into a new value. For example, given the struct:
1357 // { a, { b, { c, d }, e } }
1358 // and the indices "1, 1" this returns
1359 // { c, d }.
1360 //
1361 // It does this by inserting an insertvalue for each element in the resulting
1362 // struct, as opposed to just inserting a single struct. This will only work if
1363 // each of the elements of the substruct are known (ie, inserted into From by an
1364 // insertvalue instruction somewhere).
1365 //
1366 // All inserted insertvalue instructions are inserted before InsertBefore
1367 static Value *BuildSubAggregate(Value *From, const unsigned *idx_begin,
1368                                 const unsigned *idx_end,
1369                                 Instruction *InsertBefore) {
1370   assert(InsertBefore && "Must have someplace to insert!");
1371   const Type *IndexedType = ExtractValueInst::getIndexedType(From->getType(),
1372                                                              idx_begin,
1373                                                              idx_end);
1374   Value *To = UndefValue::get(IndexedType);
1375   SmallVector<unsigned, 10> Idxs(idx_begin, idx_end);
1376   unsigned IdxSkip = Idxs.size();
1377
1378   return BuildSubAggregate(From, To, IndexedType, Idxs, IdxSkip, InsertBefore);
1379 }
1380
1381 /// FindInsertedValue - Given an aggregrate and an sequence of indices, see if
1382 /// the scalar value indexed is already around as a register, for example if it
1383 /// were inserted directly into the aggregrate.
1384 ///
1385 /// If InsertBefore is not null, this function will duplicate (modified)
1386 /// insertvalues when a part of a nested struct is extracted.
1387 Value *llvm::FindInsertedValue(Value *V, const unsigned *idx_begin,
1388                          const unsigned *idx_end, Instruction *InsertBefore) {
1389   // Nothing to index? Just return V then (this is useful at the end of our
1390   // recursion)
1391   if (idx_begin == idx_end)
1392     return V;
1393   // We have indices, so V should have an indexable type
1394   assert((V->getType()->isStructTy() || V->getType()->isArrayTy())
1395          && "Not looking at a struct or array?");
1396   assert(ExtractValueInst::getIndexedType(V->getType(), idx_begin, idx_end)
1397          && "Invalid indices for type?");
1398   const CompositeType *PTy = cast<CompositeType>(V->getType());
1399
1400   if (isa<UndefValue>(V))
1401     return UndefValue::get(ExtractValueInst::getIndexedType(PTy,
1402                                                               idx_begin,
1403                                                               idx_end));
1404   else if (isa<ConstantAggregateZero>(V))
1405     return Constant::getNullValue(ExtractValueInst::getIndexedType(PTy,
1406                                                                   idx_begin,
1407                                                                   idx_end));
1408   else if (Constant *C = dyn_cast<Constant>(V)) {
1409     if (isa<ConstantArray>(C) || isa<ConstantStruct>(C))
1410       // Recursively process this constant
1411       return FindInsertedValue(C->getOperand(*idx_begin), idx_begin + 1,
1412                                idx_end, InsertBefore);
1413   } else if (InsertValueInst *I = dyn_cast<InsertValueInst>(V)) {
1414     // Loop the indices for the insertvalue instruction in parallel with the
1415     // requested indices
1416     const unsigned *req_idx = idx_begin;
1417     for (const unsigned *i = I->idx_begin(), *e = I->idx_end();
1418          i != e; ++i, ++req_idx) {
1419       if (req_idx == idx_end) {
1420         if (InsertBefore)
1421           // The requested index identifies a part of a nested aggregate. Handle
1422           // this specially. For example,
1423           // %A = insertvalue { i32, {i32, i32 } } undef, i32 10, 1, 0
1424           // %B = insertvalue { i32, {i32, i32 } } %A, i32 11, 1, 1
1425           // %C = extractvalue {i32, { i32, i32 } } %B, 1
1426           // This can be changed into
1427           // %A = insertvalue {i32, i32 } undef, i32 10, 0
1428           // %C = insertvalue {i32, i32 } %A, i32 11, 1
1429           // which allows the unused 0,0 element from the nested struct to be
1430           // removed.
1431           return BuildSubAggregate(V, idx_begin, req_idx, InsertBefore);
1432         else
1433           // We can't handle this without inserting insertvalues
1434           return 0;
1435       }
1436
1437       // This insert value inserts something else than what we are looking for.
1438       // See if the (aggregrate) value inserted into has the value we are
1439       // looking for, then.
1440       if (*req_idx != *i)
1441         return FindInsertedValue(I->getAggregateOperand(), idx_begin, idx_end,
1442                                  InsertBefore);
1443     }
1444     // If we end up here, the indices of the insertvalue match with those
1445     // requested (though possibly only partially). Now we recursively look at
1446     // the inserted value, passing any remaining indices.
1447     return FindInsertedValue(I->getInsertedValueOperand(), req_idx, idx_end,
1448                              InsertBefore);
1449   } else if (ExtractValueInst *I = dyn_cast<ExtractValueInst>(V)) {
1450     // If we're extracting a value from an aggregrate that was extracted from
1451     // something else, we can extract from that something else directly instead.
1452     // However, we will need to chain I's indices with the requested indices.
1453
1454     // Calculate the number of indices required
1455     unsigned size = I->getNumIndices() + (idx_end - idx_begin);
1456     // Allocate some space to put the new indices in
1457     SmallVector<unsigned, 5> Idxs;
1458     Idxs.reserve(size);
1459     // Add indices from the extract value instruction
1460     for (const unsigned *i = I->idx_begin(), *e = I->idx_end();
1461          i != e; ++i)
1462       Idxs.push_back(*i);
1463
1464     // Add requested indices
1465     for (const unsigned *i = idx_begin, *e = idx_end; i != e; ++i)
1466       Idxs.push_back(*i);
1467
1468     assert(Idxs.size() == size
1469            && "Number of indices added not correct?");
1470
1471     return FindInsertedValue(I->getAggregateOperand(), Idxs.begin(), Idxs.end(),
1472                              InsertBefore);
1473   }
1474   // Otherwise, we don't know (such as, extracting from a function return value
1475   // or load instruction)
1476   return 0;
1477 }
1478
1479 /// GetPointerBaseWithConstantOffset - Analyze the specified pointer to see if
1480 /// it can be expressed as a base pointer plus a constant offset.  Return the
1481 /// base and offset to the caller.
1482 Value *llvm::GetPointerBaseWithConstantOffset(Value *Ptr, int64_t &Offset,
1483                                               const TargetData &TD) {
1484   Operator *PtrOp = dyn_cast<Operator>(Ptr);
1485   if (PtrOp == 0) return Ptr;
1486
1487   // Just look through bitcasts.
1488   if (PtrOp->getOpcode() == Instruction::BitCast)
1489     return GetPointerBaseWithConstantOffset(PtrOp->getOperand(0), Offset, TD);
1490
1491   // If this is a GEP with constant indices, we can look through it.
1492   GEPOperator *GEP = dyn_cast<GEPOperator>(PtrOp);
1493   if (GEP == 0 || !GEP->hasAllConstantIndices()) return Ptr;
1494
1495   gep_type_iterator GTI = gep_type_begin(GEP);
1496   for (User::op_iterator I = GEP->idx_begin(), E = GEP->idx_end(); I != E;
1497        ++I, ++GTI) {
1498     ConstantInt *OpC = cast<ConstantInt>(*I);
1499     if (OpC->isZero()) continue;
1500
1501     // Handle a struct and array indices which add their offset to the pointer.
1502     if (const StructType *STy = dyn_cast<StructType>(*GTI)) {
1503       Offset += TD.getStructLayout(STy)->getElementOffset(OpC->getZExtValue());
1504     } else {
1505       uint64_t Size = TD.getTypeAllocSize(GTI.getIndexedType());
1506       Offset += OpC->getSExtValue()*Size;
1507     }
1508   }
1509
1510   // Re-sign extend from the pointer size if needed to get overflow edge cases
1511   // right.
1512   unsigned PtrSize = TD.getPointerSizeInBits();
1513   if (PtrSize < 64)
1514     Offset = (Offset << (64-PtrSize)) >> (64-PtrSize);
1515
1516   return GetPointerBaseWithConstantOffset(GEP->getPointerOperand(), Offset, TD);
1517 }
1518
1519
1520 /// GetConstantStringInfo - This function computes the length of a
1521 /// null-terminated C string pointed to by V.  If successful, it returns true
1522 /// and returns the string in Str.  If unsuccessful, it returns false.
1523 bool llvm::GetConstantStringInfo(const Value *V, std::string &Str,
1524                                  uint64_t Offset,
1525                                  bool StopAtNul) {
1526   // If V is NULL then return false;
1527   if (V == NULL) return false;
1528
1529   // Look through bitcast instructions.
1530   if (const BitCastInst *BCI = dyn_cast<BitCastInst>(V))
1531     return GetConstantStringInfo(BCI->getOperand(0), Str, Offset, StopAtNul);
1532
1533   // If the value is not a GEP instruction nor a constant expression with a
1534   // GEP instruction, then return false because ConstantArray can't occur
1535   // any other way
1536   const User *GEP = 0;
1537   if (const GetElementPtrInst *GEPI = dyn_cast<GetElementPtrInst>(V)) {
1538     GEP = GEPI;
1539   } else if (const ConstantExpr *CE = dyn_cast<ConstantExpr>(V)) {
1540     if (CE->getOpcode() == Instruction::BitCast)
1541       return GetConstantStringInfo(CE->getOperand(0), Str, Offset, StopAtNul);
1542     if (CE->getOpcode() != Instruction::GetElementPtr)
1543       return false;
1544     GEP = CE;
1545   }
1546
1547   if (GEP) {
1548     // Make sure the GEP has exactly three arguments.
1549     if (GEP->getNumOperands() != 3)
1550       return false;
1551
1552     // Make sure the index-ee is a pointer to array of i8.
1553     const PointerType *PT = cast<PointerType>(GEP->getOperand(0)->getType());
1554     const ArrayType *AT = dyn_cast<ArrayType>(PT->getElementType());
1555     if (AT == 0 || !AT->getElementType()->isIntegerTy(8))
1556       return false;
1557
1558     // Check to make sure that the first operand of the GEP is an integer and
1559     // has value 0 so that we are sure we're indexing into the initializer.
1560     const ConstantInt *FirstIdx = dyn_cast<ConstantInt>(GEP->getOperand(1));
1561     if (FirstIdx == 0 || !FirstIdx->isZero())
1562       return false;
1563
1564     // If the second index isn't a ConstantInt, then this is a variable index
1565     // into the array.  If this occurs, we can't say anything meaningful about
1566     // the string.
1567     uint64_t StartIdx = 0;
1568     if (const ConstantInt *CI = dyn_cast<ConstantInt>(GEP->getOperand(2)))
1569       StartIdx = CI->getZExtValue();
1570     else
1571       return false;
1572     return GetConstantStringInfo(GEP->getOperand(0), Str, StartIdx+Offset,
1573                                  StopAtNul);
1574   }
1575
1576   // The GEP instruction, constant or instruction, must reference a global
1577   // variable that is a constant and is initialized. The referenced constant
1578   // initializer is the array that we'll use for optimization.
1579   const GlobalVariable* GV = dyn_cast<GlobalVariable>(V);
1580   if (!GV || !GV->isConstant() || !GV->hasDefinitiveInitializer())
1581     return false;
1582   const Constant *GlobalInit = GV->getInitializer();
1583
1584   // Handle the ConstantAggregateZero case
1585   if (isa<ConstantAggregateZero>(GlobalInit)) {
1586     // This is a degenerate case. The initializer is constant zero so the
1587     // length of the string must be zero.
1588     Str.clear();
1589     return true;
1590   }
1591
1592   // Must be a Constant Array
1593   const ConstantArray *Array = dyn_cast<ConstantArray>(GlobalInit);
1594   if (Array == 0 || !Array->getType()->getElementType()->isIntegerTy(8))
1595     return false;
1596
1597   // Get the number of elements in the array
1598   uint64_t NumElts = Array->getType()->getNumElements();
1599
1600   if (Offset > NumElts)
1601     return false;
1602
1603   // Traverse the constant array from 'Offset' which is the place the GEP refers
1604   // to in the array.
1605   Str.reserve(NumElts-Offset);
1606   for (unsigned i = Offset; i != NumElts; ++i) {
1607     const Constant *Elt = Array->getOperand(i);
1608     const ConstantInt *CI = dyn_cast<ConstantInt>(Elt);
1609     if (!CI) // This array isn't suitable, non-int initializer.
1610       return false;
1611     if (StopAtNul && CI->isZero())
1612       return true; // we found end of string, success!
1613     Str += (char)CI->getZExtValue();
1614   }
1615
1616   // The array isn't null terminated, but maybe this is a memcpy, not a strcpy.
1617   return true;
1618 }
1619
1620 // These next two are very similar to the above, but also look through PHI
1621 // nodes.
1622 // TODO: See if we can integrate these two together.
1623
1624 /// GetStringLengthH - If we can compute the length of the string pointed to by
1625 /// the specified pointer, return 'len+1'.  If we can't, return 0.
1626 static uint64_t GetStringLengthH(Value *V, SmallPtrSet<PHINode*, 32> &PHIs) {
1627   // Look through noop bitcast instructions.
1628   if (BitCastInst *BCI = dyn_cast<BitCastInst>(V))
1629     return GetStringLengthH(BCI->getOperand(0), PHIs);
1630
1631   // If this is a PHI node, there are two cases: either we have already seen it
1632   // or we haven't.
1633   if (PHINode *PN = dyn_cast<PHINode>(V)) {
1634     if (!PHIs.insert(PN))
1635       return ~0ULL;  // already in the set.
1636
1637     // If it was new, see if all the input strings are the same length.
1638     uint64_t LenSoFar = ~0ULL;
1639     for (unsigned i = 0, e = PN->getNumIncomingValues(); i != e; ++i) {
1640       uint64_t Len = GetStringLengthH(PN->getIncomingValue(i), PHIs);
1641       if (Len == 0) return 0; // Unknown length -> unknown.
1642
1643       if (Len == ~0ULL) continue;
1644
1645       if (Len != LenSoFar && LenSoFar != ~0ULL)
1646         return 0;    // Disagree -> unknown.
1647       LenSoFar = Len;
1648     }
1649
1650     // Success, all agree.
1651     return LenSoFar;
1652   }
1653
1654   // strlen(select(c,x,y)) -> strlen(x) ^ strlen(y)
1655   if (SelectInst *SI = dyn_cast<SelectInst>(V)) {
1656     uint64_t Len1 = GetStringLengthH(SI->getTrueValue(), PHIs);
1657     if (Len1 == 0) return 0;
1658     uint64_t Len2 = GetStringLengthH(SI->getFalseValue(), PHIs);
1659     if (Len2 == 0) return 0;
1660     if (Len1 == ~0ULL) return Len2;
1661     if (Len2 == ~0ULL) return Len1;
1662     if (Len1 != Len2) return 0;
1663     return Len1;
1664   }
1665
1666   // If the value is not a GEP instruction nor a constant expression with a
1667   // GEP instruction, then return unknown.
1668   User *GEP = 0;
1669   if (GetElementPtrInst *GEPI = dyn_cast<GetElementPtrInst>(V)) {
1670     GEP = GEPI;
1671   } else if (ConstantExpr *CE = dyn_cast<ConstantExpr>(V)) {
1672     if (CE->getOpcode() != Instruction::GetElementPtr)
1673       return 0;
1674     GEP = CE;
1675   } else {
1676     return 0;
1677   }
1678
1679   // Make sure the GEP has exactly three arguments.
1680   if (GEP->getNumOperands() != 3)
1681     return 0;
1682
1683   // Check to make sure that the first operand of the GEP is an integer and
1684   // has value 0 so that we are sure we're indexing into the initializer.
1685   if (ConstantInt *Idx = dyn_cast<ConstantInt>(GEP->getOperand(1))) {
1686     if (!Idx->isZero())
1687       return 0;
1688   } else
1689     return 0;
1690
1691   // If the second index isn't a ConstantInt, then this is a variable index
1692   // into the array.  If this occurs, we can't say anything meaningful about
1693   // the string.
1694   uint64_t StartIdx = 0;
1695   if (ConstantInt *CI = dyn_cast<ConstantInt>(GEP->getOperand(2)))
1696     StartIdx = CI->getZExtValue();
1697   else
1698     return 0;
1699
1700   // The GEP instruction, constant or instruction, must reference a global
1701   // variable that is a constant and is initialized. The referenced constant
1702   // initializer is the array that we'll use for optimization.
1703   GlobalVariable* GV = dyn_cast<GlobalVariable>(GEP->getOperand(0));
1704   if (!GV || !GV->isConstant() || !GV->hasInitializer() ||
1705       GV->mayBeOverridden())
1706     return 0;
1707   Constant *GlobalInit = GV->getInitializer();
1708
1709   // Handle the ConstantAggregateZero case, which is a degenerate case. The
1710   // initializer is constant zero so the length of the string must be zero.
1711   if (isa<ConstantAggregateZero>(GlobalInit))
1712     return 1;  // Len = 0 offset by 1.
1713
1714   // Must be a Constant Array
1715   ConstantArray *Array = dyn_cast<ConstantArray>(GlobalInit);
1716   if (!Array || !Array->getType()->getElementType()->isIntegerTy(8))
1717     return false;
1718
1719   // Get the number of elements in the array
1720   uint64_t NumElts = Array->getType()->getNumElements();
1721
1722   // Traverse the constant array from StartIdx (derived above) which is
1723   // the place the GEP refers to in the array.
1724   for (unsigned i = StartIdx; i != NumElts; ++i) {
1725     Constant *Elt = Array->getOperand(i);
1726     ConstantInt *CI = dyn_cast<ConstantInt>(Elt);
1727     if (!CI) // This array isn't suitable, non-int initializer.
1728       return 0;
1729     if (CI->isZero())
1730       return i-StartIdx+1; // We found end of string, success!
1731   }
1732
1733   return 0; // The array isn't null terminated, conservatively return 'unknown'.
1734 }
1735
1736 /// GetStringLength - If we can compute the length of the string pointed to by
1737 /// the specified pointer, return 'len+1'.  If we can't, return 0.
1738 uint64_t llvm::GetStringLength(Value *V) {
1739   if (!V->getType()->isPointerTy()) return 0;
1740
1741   SmallPtrSet<PHINode*, 32> PHIs;
1742   uint64_t Len = GetStringLengthH(V, PHIs);
1743   // If Len is ~0ULL, we had an infinite phi cycle: this is dead code, so return
1744   // an empty string as a length.
1745   return Len == ~0ULL ? 1 : Len;
1746 }
1747
1748 Value *
1749 llvm::GetUnderlyingObject(Value *V, const TargetData *TD, unsigned MaxLookup) {
1750   if (!V->getType()->isPointerTy())
1751     return V;
1752   for (unsigned Count = 0; MaxLookup == 0 || Count < MaxLookup; ++Count) {
1753     if (GEPOperator *GEP = dyn_cast<GEPOperator>(V)) {
1754       V = GEP->getPointerOperand();
1755     } else if (Operator::getOpcode(V) == Instruction::BitCast) {
1756       V = cast<Operator>(V)->getOperand(0);
1757     } else if (GlobalAlias *GA = dyn_cast<GlobalAlias>(V)) {
1758       if (GA->mayBeOverridden())
1759         return V;
1760       V = GA->getAliasee();
1761     } else {
1762       // See if InstructionSimplify knows any relevant tricks.
1763       if (Instruction *I = dyn_cast<Instruction>(V))
1764         // TODO: Acquire a DominatorTree and use it.
1765         if (Value *Simplified = SimplifyInstruction(I, TD, 0)) {
1766           V = Simplified;
1767           continue;
1768         }
1769
1770       return V;
1771     }
1772     assert(V->getType()->isPointerTy() && "Unexpected operand type!");
1773   }
1774   return V;
1775 }