xref: /netbsd-src/external/apache2/llvm/dist/llvm/lib/Analysis/LazyValueInfo.cpp (revision 82d56013d7b633d116a93943de88e08335357a7c)
1 //===- LazyValueInfo.cpp - Value constraint analysis ------------*- C++ -*-===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 //
9 // This file defines the interface for lazy computation of value constraint
10 // information.
11 //
12 //===----------------------------------------------------------------------===//
13 
14 #include "llvm/Analysis/LazyValueInfo.h"
15 #include "llvm/ADT/DenseSet.h"
16 #include "llvm/ADT/Optional.h"
17 #include "llvm/ADT/STLExtras.h"
18 #include "llvm/Analysis/AssumptionCache.h"
19 #include "llvm/Analysis/ConstantFolding.h"
20 #include "llvm/Analysis/InstructionSimplify.h"
21 #include "llvm/Analysis/TargetLibraryInfo.h"
22 #include "llvm/Analysis/ValueLattice.h"
23 #include "llvm/Analysis/ValueTracking.h"
24 #include "llvm/IR/AssemblyAnnotationWriter.h"
25 #include "llvm/IR/CFG.h"
26 #include "llvm/IR/ConstantRange.h"
27 #include "llvm/IR/Constants.h"
28 #include "llvm/IR/DataLayout.h"
29 #include "llvm/IR/Dominators.h"
30 #include "llvm/IR/Instructions.h"
31 #include "llvm/IR/IntrinsicInst.h"
32 #include "llvm/IR/Intrinsics.h"
33 #include "llvm/IR/LLVMContext.h"
34 #include "llvm/IR/PatternMatch.h"
35 #include "llvm/IR/ValueHandle.h"
36 #include "llvm/InitializePasses.h"
37 #include "llvm/Support/Debug.h"
38 #include "llvm/Support/FormattedStream.h"
39 #include "llvm/Support/KnownBits.h"
40 #include "llvm/Support/raw_ostream.h"
41 #include <map>
42 using namespace llvm;
43 using namespace PatternMatch;
44 
45 #define DEBUG_TYPE "lazy-value-info"
46 
47 // This is the number of worklist items we will process to try to discover an
48 // answer for a given value.
49 static const unsigned MaxProcessedPerValue = 500;
50 
51 char LazyValueInfoWrapperPass::ID = 0;
LazyValueInfoWrapperPass()52 LazyValueInfoWrapperPass::LazyValueInfoWrapperPass() : FunctionPass(ID) {
53   initializeLazyValueInfoWrapperPassPass(*PassRegistry::getPassRegistry());
54 }
55 INITIALIZE_PASS_BEGIN(LazyValueInfoWrapperPass, "lazy-value-info",
56                 "Lazy Value Information Analysis", false, true)
57 INITIALIZE_PASS_DEPENDENCY(AssumptionCacheTracker)
58 INITIALIZE_PASS_DEPENDENCY(TargetLibraryInfoWrapperPass)
59 INITIALIZE_PASS_END(LazyValueInfoWrapperPass, "lazy-value-info",
60                 "Lazy Value Information Analysis", false, true)
61 
62 namespace llvm {
createLazyValueInfoPass()63   FunctionPass *createLazyValueInfoPass() { return new LazyValueInfoWrapperPass(); }
64 }
65 
66 AnalysisKey LazyValueAnalysis::Key;
67 
68 /// Returns true if this lattice value represents at most one possible value.
69 /// This is as precise as any lattice value can get while still representing
70 /// reachable code.
hasSingleValue(const ValueLatticeElement & Val)71 static bool hasSingleValue(const ValueLatticeElement &Val) {
72   if (Val.isConstantRange() &&
73       Val.getConstantRange().isSingleElement())
74     // Integer constants are single element ranges
75     return true;
76   if (Val.isConstant())
77     // Non integer constants
78     return true;
79   return false;
80 }
81 
82 /// Combine two sets of facts about the same value into a single set of
83 /// facts.  Note that this method is not suitable for merging facts along
84 /// different paths in a CFG; that's what the mergeIn function is for.  This
85 /// is for merging facts gathered about the same value at the same location
86 /// through two independent means.
87 /// Notes:
88 /// * This method does not promise to return the most precise possible lattice
89 ///   value implied by A and B.  It is allowed to return any lattice element
90 ///   which is at least as strong as *either* A or B (unless our facts
91 ///   conflict, see below).
92 /// * Due to unreachable code, the intersection of two lattice values could be
93 ///   contradictory.  If this happens, we return some valid lattice value so as
94 ///   not confuse the rest of LVI.  Ideally, we'd always return Undefined, but
95 ///   we do not make this guarantee.  TODO: This would be a useful enhancement.
intersect(const ValueLatticeElement & A,const ValueLatticeElement & B)96 static ValueLatticeElement intersect(const ValueLatticeElement &A,
97                                      const ValueLatticeElement &B) {
98   // Undefined is the strongest state.  It means the value is known to be along
99   // an unreachable path.
100   if (A.isUnknown())
101     return A;
102   if (B.isUnknown())
103     return B;
104 
105   // If we gave up for one, but got a useable fact from the other, use it.
106   if (A.isOverdefined())
107     return B;
108   if (B.isOverdefined())
109     return A;
110 
111   // Can't get any more precise than constants.
112   if (hasSingleValue(A))
113     return A;
114   if (hasSingleValue(B))
115     return B;
116 
117   // Could be either constant range or not constant here.
118   if (!A.isConstantRange() || !B.isConstantRange()) {
119     // TODO: Arbitrary choice, could be improved
120     return A;
121   }
122 
123   // Intersect two constant ranges
124   ConstantRange Range =
125       A.getConstantRange().intersectWith(B.getConstantRange());
126   // Note: An empty range is implicitly converted to unknown or undef depending
127   // on MayIncludeUndef internally.
128   return ValueLatticeElement::getRange(
129       std::move(Range), /*MayIncludeUndef=*/A.isConstantRangeIncludingUndef() |
130                             B.isConstantRangeIncludingUndef());
131 }
132 
133 //===----------------------------------------------------------------------===//
134 //                          LazyValueInfoCache Decl
135 //===----------------------------------------------------------------------===//
136 
137 namespace {
138   /// A callback value handle updates the cache when values are erased.
139   class LazyValueInfoCache;
140   struct LVIValueHandle final : public CallbackVH {
141     LazyValueInfoCache *Parent;
142 
LVIValueHandle__anonc76404170111::LVIValueHandle143     LVIValueHandle(Value *V, LazyValueInfoCache *P = nullptr)
144       : CallbackVH(V), Parent(P) { }
145 
146     void deleted() override;
allUsesReplacedWith__anonc76404170111::LVIValueHandle147     void allUsesReplacedWith(Value *V) override {
148       deleted();
149     }
150   };
151 } // end anonymous namespace
152 
153 namespace {
154   using NonNullPointerSet = SmallDenseSet<AssertingVH<Value>, 2>;
155 
156   /// This is the cache kept by LazyValueInfo which
157   /// maintains information about queries across the clients' queries.
158   class LazyValueInfoCache {
159     /// This is all of the cached information for one basic block. It contains
160     /// the per-value lattice elements, as well as a separate set for
161     /// overdefined values to reduce memory usage. Additionally pointers
162     /// dereferenced in the block are cached for nullability queries.
163     struct BlockCacheEntry {
164       SmallDenseMap<AssertingVH<Value>, ValueLatticeElement, 4> LatticeElements;
165       SmallDenseSet<AssertingVH<Value>, 4> OverDefined;
166       // None indicates that the nonnull pointers for this basic block
167       // block have not been computed yet.
168       Optional<NonNullPointerSet> NonNullPointers;
169     };
170 
171     /// Cached information per basic block.
172     DenseMap<PoisoningVH<BasicBlock>, std::unique_ptr<BlockCacheEntry>>
173         BlockCache;
174     /// Set of value handles used to erase values from the cache on deletion.
175     DenseSet<LVIValueHandle, DenseMapInfo<Value *>> ValueHandles;
176 
getBlockEntry(BasicBlock * BB) const177     const BlockCacheEntry *getBlockEntry(BasicBlock *BB) const {
178       auto It = BlockCache.find_as(BB);
179       if (It == BlockCache.end())
180         return nullptr;
181       return It->second.get();
182     }
183 
getOrCreateBlockEntry(BasicBlock * BB)184     BlockCacheEntry *getOrCreateBlockEntry(BasicBlock *BB) {
185       auto It = BlockCache.find_as(BB);
186       if (It == BlockCache.end())
187         It = BlockCache.insert({ BB, std::make_unique<BlockCacheEntry>() })
188                        .first;
189 
190       return It->second.get();
191     }
192 
addValueHandle(Value * Val)193     void addValueHandle(Value *Val) {
194       auto HandleIt = ValueHandles.find_as(Val);
195       if (HandleIt == ValueHandles.end())
196         ValueHandles.insert({ Val, this });
197     }
198 
199   public:
insertResult(Value * Val,BasicBlock * BB,const ValueLatticeElement & Result)200     void insertResult(Value *Val, BasicBlock *BB,
201                       const ValueLatticeElement &Result) {
202       BlockCacheEntry *Entry = getOrCreateBlockEntry(BB);
203 
204       // Insert over-defined values into their own cache to reduce memory
205       // overhead.
206       if (Result.isOverdefined())
207         Entry->OverDefined.insert(Val);
208       else
209         Entry->LatticeElements.insert({ Val, Result });
210 
211       addValueHandle(Val);
212     }
213 
getCachedValueInfo(Value * V,BasicBlock * BB) const214     Optional<ValueLatticeElement> getCachedValueInfo(Value *V,
215                                                      BasicBlock *BB) const {
216       const BlockCacheEntry *Entry = getBlockEntry(BB);
217       if (!Entry)
218         return None;
219 
220       if (Entry->OverDefined.count(V))
221         return ValueLatticeElement::getOverdefined();
222 
223       auto LatticeIt = Entry->LatticeElements.find_as(V);
224       if (LatticeIt == Entry->LatticeElements.end())
225         return None;
226 
227       return LatticeIt->second;
228     }
229 
isNonNullAtEndOfBlock(Value * V,BasicBlock * BB,function_ref<NonNullPointerSet (BasicBlock *)> InitFn)230     bool isNonNullAtEndOfBlock(
231         Value *V, BasicBlock *BB,
232         function_ref<NonNullPointerSet(BasicBlock *)> InitFn) {
233       BlockCacheEntry *Entry = getOrCreateBlockEntry(BB);
234       if (!Entry->NonNullPointers) {
235         Entry->NonNullPointers = InitFn(BB);
236         for (Value *V : *Entry->NonNullPointers)
237           addValueHandle(V);
238       }
239 
240       return Entry->NonNullPointers->count(V);
241     }
242 
243     /// clear - Empty the cache.
clear()244     void clear() {
245       BlockCache.clear();
246       ValueHandles.clear();
247     }
248 
249     /// Inform the cache that a given value has been deleted.
250     void eraseValue(Value *V);
251 
252     /// This is part of the update interface to inform the cache
253     /// that a block has been deleted.
254     void eraseBlock(BasicBlock *BB);
255 
256     /// Updates the cache to remove any influence an overdefined value in
257     /// OldSucc might have (unless also overdefined in NewSucc).  This just
258     /// flushes elements from the cache and does not add any.
259     void threadEdgeImpl(BasicBlock *OldSucc,BasicBlock *NewSucc);
260   };
261 }
262 
eraseValue(Value * V)263 void LazyValueInfoCache::eraseValue(Value *V) {
264   for (auto &Pair : BlockCache) {
265     Pair.second->LatticeElements.erase(V);
266     Pair.second->OverDefined.erase(V);
267     if (Pair.second->NonNullPointers)
268       Pair.second->NonNullPointers->erase(V);
269   }
270 
271   auto HandleIt = ValueHandles.find_as(V);
272   if (HandleIt != ValueHandles.end())
273     ValueHandles.erase(HandleIt);
274 }
275 
deleted()276 void LVIValueHandle::deleted() {
277   // This erasure deallocates *this, so it MUST happen after we're done
278   // using any and all members of *this.
279   Parent->eraseValue(*this);
280 }
281 
eraseBlock(BasicBlock * BB)282 void LazyValueInfoCache::eraseBlock(BasicBlock *BB) {
283   BlockCache.erase(BB);
284 }
285 
threadEdgeImpl(BasicBlock * OldSucc,BasicBlock * NewSucc)286 void LazyValueInfoCache::threadEdgeImpl(BasicBlock *OldSucc,
287                                         BasicBlock *NewSucc) {
288   // When an edge in the graph has been threaded, values that we could not
289   // determine a value for before (i.e. were marked overdefined) may be
290   // possible to solve now. We do NOT try to proactively update these values.
291   // Instead, we clear their entries from the cache, and allow lazy updating to
292   // recompute them when needed.
293 
294   // The updating process is fairly simple: we need to drop cached info
295   // for all values that were marked overdefined in OldSucc, and for those same
296   // values in any successor of OldSucc (except NewSucc) in which they were
297   // also marked overdefined.
298   std::vector<BasicBlock*> worklist;
299   worklist.push_back(OldSucc);
300 
301   const BlockCacheEntry *Entry = getBlockEntry(OldSucc);
302   if (!Entry || Entry->OverDefined.empty())
303     return; // Nothing to process here.
304   SmallVector<Value *, 4> ValsToClear(Entry->OverDefined.begin(),
305                                       Entry->OverDefined.end());
306 
307   // Use a worklist to perform a depth-first search of OldSucc's successors.
308   // NOTE: We do not need a visited list since any blocks we have already
309   // visited will have had their overdefined markers cleared already, and we
310   // thus won't loop to their successors.
311   while (!worklist.empty()) {
312     BasicBlock *ToUpdate = worklist.back();
313     worklist.pop_back();
314 
315     // Skip blocks only accessible through NewSucc.
316     if (ToUpdate == NewSucc) continue;
317 
318     // If a value was marked overdefined in OldSucc, and is here too...
319     auto OI = BlockCache.find_as(ToUpdate);
320     if (OI == BlockCache.end() || OI->second->OverDefined.empty())
321       continue;
322     auto &ValueSet = OI->second->OverDefined;
323 
324     bool changed = false;
325     for (Value *V : ValsToClear) {
326       if (!ValueSet.erase(V))
327         continue;
328 
329       // If we removed anything, then we potentially need to update
330       // blocks successors too.
331       changed = true;
332     }
333 
334     if (!changed) continue;
335 
336     llvm::append_range(worklist, successors(ToUpdate));
337   }
338 }
339 
340 
341 namespace {
342 /// An assembly annotator class to print LazyValueCache information in
343 /// comments.
344 class LazyValueInfoImpl;
345 class LazyValueInfoAnnotatedWriter : public AssemblyAnnotationWriter {
346   LazyValueInfoImpl *LVIImpl;
347   // While analyzing which blocks we can solve values for, we need the dominator
348   // information.
349   DominatorTree &DT;
350 
351 public:
LazyValueInfoAnnotatedWriter(LazyValueInfoImpl * L,DominatorTree & DTree)352   LazyValueInfoAnnotatedWriter(LazyValueInfoImpl *L, DominatorTree &DTree)
353       : LVIImpl(L), DT(DTree) {}
354 
355   void emitBasicBlockStartAnnot(const BasicBlock *BB,
356                                 formatted_raw_ostream &OS) override;
357 
358   void emitInstructionAnnot(const Instruction *I,
359                             formatted_raw_ostream &OS) override;
360 };
361 }
362 namespace {
363 // The actual implementation of the lazy analysis and update.  Note that the
364 // inheritance from LazyValueInfoCache is intended to be temporary while
365 // splitting the code and then transitioning to a has-a relationship.
366 class LazyValueInfoImpl {
367 
368   /// Cached results from previous queries
369   LazyValueInfoCache TheCache;
370 
371   /// This stack holds the state of the value solver during a query.
372   /// It basically emulates the callstack of the naive
373   /// recursive value lookup process.
374   SmallVector<std::pair<BasicBlock*, Value*>, 8> BlockValueStack;
375 
376   /// Keeps track of which block-value pairs are in BlockValueStack.
377   DenseSet<std::pair<BasicBlock*, Value*> > BlockValueSet;
378 
379   /// Push BV onto BlockValueStack unless it's already in there.
380   /// Returns true on success.
pushBlockValue(const std::pair<BasicBlock *,Value * > & BV)381   bool pushBlockValue(const std::pair<BasicBlock *, Value *> &BV) {
382     if (!BlockValueSet.insert(BV).second)
383       return false;  // It's already in the stack.
384 
385     LLVM_DEBUG(dbgs() << "PUSH: " << *BV.second << " in "
386                       << BV.first->getName() << "\n");
387     BlockValueStack.push_back(BV);
388     return true;
389   }
390 
391   AssumptionCache *AC;  ///< A pointer to the cache of @llvm.assume calls.
392   const DataLayout &DL; ///< A mandatory DataLayout
393 
394   /// Declaration of the llvm.experimental.guard() intrinsic,
395   /// if it exists in the module.
396   Function *GuardDecl;
397 
398   Optional<ValueLatticeElement> getBlockValue(Value *Val, BasicBlock *BB);
399   Optional<ValueLatticeElement> getEdgeValue(Value *V, BasicBlock *F,
400                                 BasicBlock *T, Instruction *CxtI = nullptr);
401 
402   // These methods process one work item and may add more. A false value
403   // returned means that the work item was not completely processed and must
404   // be revisited after going through the new items.
405   bool solveBlockValue(Value *Val, BasicBlock *BB);
406   Optional<ValueLatticeElement> solveBlockValueImpl(Value *Val, BasicBlock *BB);
407   Optional<ValueLatticeElement> solveBlockValueNonLocal(Value *Val,
408                                                         BasicBlock *BB);
409   Optional<ValueLatticeElement> solveBlockValuePHINode(PHINode *PN,
410                                                        BasicBlock *BB);
411   Optional<ValueLatticeElement> solveBlockValueSelect(SelectInst *S,
412                                                       BasicBlock *BB);
413   Optional<ConstantRange> getRangeFor(Value *V, Instruction *CxtI,
414                                       BasicBlock *BB);
415   Optional<ValueLatticeElement> solveBlockValueBinaryOpImpl(
416       Instruction *I, BasicBlock *BB,
417       std::function<ConstantRange(const ConstantRange &,
418                                   const ConstantRange &)> OpFn);
419   Optional<ValueLatticeElement> solveBlockValueBinaryOp(BinaryOperator *BBI,
420                                                         BasicBlock *BB);
421   Optional<ValueLatticeElement> solveBlockValueCast(CastInst *CI,
422                                                     BasicBlock *BB);
423   Optional<ValueLatticeElement> solveBlockValueOverflowIntrinsic(
424       WithOverflowInst *WO, BasicBlock *BB);
425   Optional<ValueLatticeElement> solveBlockValueIntrinsic(IntrinsicInst *II,
426                                                          BasicBlock *BB);
427   Optional<ValueLatticeElement> solveBlockValueExtractValue(
428       ExtractValueInst *EVI, BasicBlock *BB);
429   bool isNonNullAtEndOfBlock(Value *Val, BasicBlock *BB);
430   void intersectAssumeOrGuardBlockValueConstantRange(Value *Val,
431                                                      ValueLatticeElement &BBLV,
432                                                      Instruction *BBI);
433 
434   void solve();
435 
436 public:
437   /// This is the query interface to determine the lattice value for the
438   /// specified Value* at the context instruction (if specified) or at the
439   /// start of the block.
440   ValueLatticeElement getValueInBlock(Value *V, BasicBlock *BB,
441                                       Instruction *CxtI = nullptr);
442 
443   /// This is the query interface to determine the lattice value for the
444   /// specified Value* at the specified instruction using only information
445   /// from assumes/guards and range metadata. Unlike getValueInBlock(), no
446   /// recursive query is performed.
447   ValueLatticeElement getValueAt(Value *V, Instruction *CxtI);
448 
449   /// This is the query interface to determine the lattice
450   /// value for the specified Value* that is true on the specified edge.
451   ValueLatticeElement getValueOnEdge(Value *V, BasicBlock *FromBB,
452                                      BasicBlock *ToBB,
453                                      Instruction *CxtI = nullptr);
454 
455   /// Complete flush all previously computed values
clear()456   void clear() {
457     TheCache.clear();
458   }
459 
460   /// Printing the LazyValueInfo Analysis.
printLVI(Function & F,DominatorTree & DTree,raw_ostream & OS)461   void printLVI(Function &F, DominatorTree &DTree, raw_ostream &OS) {
462     LazyValueInfoAnnotatedWriter Writer(this, DTree);
463     F.print(OS, &Writer);
464   }
465 
466   /// This is part of the update interface to inform the cache
467   /// that a block has been deleted.
eraseBlock(BasicBlock * BB)468   void eraseBlock(BasicBlock *BB) {
469     TheCache.eraseBlock(BB);
470   }
471 
472   /// This is the update interface to inform the cache that an edge from
473   /// PredBB to OldSucc has been threaded to be from PredBB to NewSucc.
474   void threadEdge(BasicBlock *PredBB,BasicBlock *OldSucc,BasicBlock *NewSucc);
475 
LazyValueInfoImpl(AssumptionCache * AC,const DataLayout & DL,Function * GuardDecl)476   LazyValueInfoImpl(AssumptionCache *AC, const DataLayout &DL,
477                     Function *GuardDecl)
478       : AC(AC), DL(DL), GuardDecl(GuardDecl) {}
479 };
480 } // end anonymous namespace
481 
482 
solve()483 void LazyValueInfoImpl::solve() {
484   SmallVector<std::pair<BasicBlock *, Value *>, 8> StartingStack(
485       BlockValueStack.begin(), BlockValueStack.end());
486 
487   unsigned processedCount = 0;
488   while (!BlockValueStack.empty()) {
489     processedCount++;
490     // Abort if we have to process too many values to get a result for this one.
491     // Because of the design of the overdefined cache currently being per-block
492     // to avoid naming-related issues (IE it wants to try to give different
493     // results for the same name in different blocks), overdefined results don't
494     // get cached globally, which in turn means we will often try to rediscover
495     // the same overdefined result again and again.  Once something like
496     // PredicateInfo is used in LVI or CVP, we should be able to make the
497     // overdefined cache global, and remove this throttle.
498     if (processedCount > MaxProcessedPerValue) {
499       LLVM_DEBUG(
500           dbgs() << "Giving up on stack because we are getting too deep\n");
501       // Fill in the original values
502       while (!StartingStack.empty()) {
503         std::pair<BasicBlock *, Value *> &e = StartingStack.back();
504         TheCache.insertResult(e.second, e.first,
505                               ValueLatticeElement::getOverdefined());
506         StartingStack.pop_back();
507       }
508       BlockValueSet.clear();
509       BlockValueStack.clear();
510       return;
511     }
512     std::pair<BasicBlock *, Value *> e = BlockValueStack.back();
513     assert(BlockValueSet.count(e) && "Stack value should be in BlockValueSet!");
514 
515     if (solveBlockValue(e.second, e.first)) {
516       // The work item was completely processed.
517       assert(BlockValueStack.back() == e && "Nothing should have been pushed!");
518 #ifndef NDEBUG
519       Optional<ValueLatticeElement> BBLV =
520           TheCache.getCachedValueInfo(e.second, e.first);
521       assert(BBLV && "Result should be in cache!");
522       LLVM_DEBUG(
523           dbgs() << "POP " << *e.second << " in " << e.first->getName() << " = "
524                  << *BBLV << "\n");
525 #endif
526 
527       BlockValueStack.pop_back();
528       BlockValueSet.erase(e);
529     } else {
530       // More work needs to be done before revisiting.
531       assert(BlockValueStack.back() != e && "Stack should have been pushed!");
532     }
533   }
534 }
535 
getBlockValue(Value * Val,BasicBlock * BB)536 Optional<ValueLatticeElement> LazyValueInfoImpl::getBlockValue(Value *Val,
537                                                                BasicBlock *BB) {
538   // If already a constant, there is nothing to compute.
539   if (Constant *VC = dyn_cast<Constant>(Val))
540     return ValueLatticeElement::get(VC);
541 
542   if (Optional<ValueLatticeElement> OptLatticeVal =
543           TheCache.getCachedValueInfo(Val, BB))
544     return OptLatticeVal;
545 
546   // We have hit a cycle, assume overdefined.
547   if (!pushBlockValue({ BB, Val }))
548     return ValueLatticeElement::getOverdefined();
549 
550   // Yet to be resolved.
551   return None;
552 }
553 
getFromRangeMetadata(Instruction * BBI)554 static ValueLatticeElement getFromRangeMetadata(Instruction *BBI) {
555   switch (BBI->getOpcode()) {
556   default: break;
557   case Instruction::Load:
558   case Instruction::Call:
559   case Instruction::Invoke:
560     if (MDNode *Ranges = BBI->getMetadata(LLVMContext::MD_range))
561       if (isa<IntegerType>(BBI->getType())) {
562         return ValueLatticeElement::getRange(
563             getConstantRangeFromMetadata(*Ranges));
564       }
565     break;
566   };
567   // Nothing known - will be intersected with other facts
568   return ValueLatticeElement::getOverdefined();
569 }
570 
solveBlockValue(Value * Val,BasicBlock * BB)571 bool LazyValueInfoImpl::solveBlockValue(Value *Val, BasicBlock *BB) {
572   assert(!isa<Constant>(Val) && "Value should not be constant");
573   assert(!TheCache.getCachedValueInfo(Val, BB) &&
574          "Value should not be in cache");
575 
576   // Hold off inserting this value into the Cache in case we have to return
577   // false and come back later.
578   Optional<ValueLatticeElement> Res = solveBlockValueImpl(Val, BB);
579   if (!Res)
580     // Work pushed, will revisit
581     return false;
582 
583   TheCache.insertResult(Val, BB, *Res);
584   return true;
585 }
586 
solveBlockValueImpl(Value * Val,BasicBlock * BB)587 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValueImpl(
588     Value *Val, BasicBlock *BB) {
589   Instruction *BBI = dyn_cast<Instruction>(Val);
590   if (!BBI || BBI->getParent() != BB)
591     return solveBlockValueNonLocal(Val, BB);
592 
593   if (PHINode *PN = dyn_cast<PHINode>(BBI))
594     return solveBlockValuePHINode(PN, BB);
595 
596   if (auto *SI = dyn_cast<SelectInst>(BBI))
597     return solveBlockValueSelect(SI, BB);
598 
599   // If this value is a nonnull pointer, record it's range and bailout.  Note
600   // that for all other pointer typed values, we terminate the search at the
601   // definition.  We could easily extend this to look through geps, bitcasts,
602   // and the like to prove non-nullness, but it's not clear that's worth it
603   // compile time wise.  The context-insensitive value walk done inside
604   // isKnownNonZero gets most of the profitable cases at much less expense.
605   // This does mean that we have a sensitivity to where the defining
606   // instruction is placed, even if it could legally be hoisted much higher.
607   // That is unfortunate.
608   PointerType *PT = dyn_cast<PointerType>(BBI->getType());
609   if (PT && isKnownNonZero(BBI, DL))
610     return ValueLatticeElement::getNot(ConstantPointerNull::get(PT));
611 
612   if (BBI->getType()->isIntegerTy()) {
613     if (auto *CI = dyn_cast<CastInst>(BBI))
614       return solveBlockValueCast(CI, BB);
615 
616     if (BinaryOperator *BO = dyn_cast<BinaryOperator>(BBI))
617       return solveBlockValueBinaryOp(BO, BB);
618 
619     if (auto *EVI = dyn_cast<ExtractValueInst>(BBI))
620       return solveBlockValueExtractValue(EVI, BB);
621 
622     if (auto *II = dyn_cast<IntrinsicInst>(BBI))
623       return solveBlockValueIntrinsic(II, BB);
624   }
625 
626   LLVM_DEBUG(dbgs() << " compute BB '" << BB->getName()
627                     << "' - unknown inst def found.\n");
628   return getFromRangeMetadata(BBI);
629 }
630 
AddNonNullPointer(Value * Ptr,NonNullPointerSet & PtrSet)631 static void AddNonNullPointer(Value *Ptr, NonNullPointerSet &PtrSet) {
632   // TODO: Use NullPointerIsDefined instead.
633   if (Ptr->getType()->getPointerAddressSpace() == 0)
634     PtrSet.insert(getUnderlyingObject(Ptr));
635 }
636 
AddNonNullPointersByInstruction(Instruction * I,NonNullPointerSet & PtrSet)637 static void AddNonNullPointersByInstruction(
638     Instruction *I, NonNullPointerSet &PtrSet) {
639   if (LoadInst *L = dyn_cast<LoadInst>(I)) {
640     AddNonNullPointer(L->getPointerOperand(), PtrSet);
641   } else if (StoreInst *S = dyn_cast<StoreInst>(I)) {
642     AddNonNullPointer(S->getPointerOperand(), PtrSet);
643   } else if (MemIntrinsic *MI = dyn_cast<MemIntrinsic>(I)) {
644     if (MI->isVolatile()) return;
645 
646     // FIXME: check whether it has a valuerange that excludes zero?
647     ConstantInt *Len = dyn_cast<ConstantInt>(MI->getLength());
648     if (!Len || Len->isZero()) return;
649 
650     AddNonNullPointer(MI->getRawDest(), PtrSet);
651     if (MemTransferInst *MTI = dyn_cast<MemTransferInst>(MI))
652       AddNonNullPointer(MTI->getRawSource(), PtrSet);
653   }
654 }
655 
isNonNullAtEndOfBlock(Value * Val,BasicBlock * BB)656 bool LazyValueInfoImpl::isNonNullAtEndOfBlock(Value *Val, BasicBlock *BB) {
657   if (NullPointerIsDefined(BB->getParent(),
658                            Val->getType()->getPointerAddressSpace()))
659     return false;
660 
661   Val = Val->stripInBoundsOffsets();
662   return TheCache.isNonNullAtEndOfBlock(Val, BB, [](BasicBlock *BB) {
663     NonNullPointerSet NonNullPointers;
664     for (Instruction &I : *BB)
665       AddNonNullPointersByInstruction(&I, NonNullPointers);
666     return NonNullPointers;
667   });
668 }
669 
solveBlockValueNonLocal(Value * Val,BasicBlock * BB)670 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValueNonLocal(
671     Value *Val, BasicBlock *BB) {
672   ValueLatticeElement Result;  // Start Undefined.
673 
674   // If this is the entry block, we must be asking about an argument.  The
675   // value is overdefined.
676   if (BB->isEntryBlock()) {
677     assert(isa<Argument>(Val) && "Unknown live-in to the entry block");
678     return ValueLatticeElement::getOverdefined();
679   }
680 
681   // Loop over all of our predecessors, merging what we know from them into
682   // result.  If we encounter an unexplored predecessor, we eagerly explore it
683   // in a depth first manner.  In practice, this has the effect of discovering
684   // paths we can't analyze eagerly without spending compile times analyzing
685   // other paths.  This heuristic benefits from the fact that predecessors are
686   // frequently arranged such that dominating ones come first and we quickly
687   // find a path to function entry.  TODO: We should consider explicitly
688   // canonicalizing to make this true rather than relying on this happy
689   // accident.
690   for (BasicBlock *Pred : predecessors(BB)) {
691     Optional<ValueLatticeElement> EdgeResult = getEdgeValue(Val, Pred, BB);
692     if (!EdgeResult)
693       // Explore that input, then return here
694       return None;
695 
696     Result.mergeIn(*EdgeResult);
697 
698     // If we hit overdefined, exit early.  The BlockVals entry is already set
699     // to overdefined.
700     if (Result.isOverdefined()) {
701       LLVM_DEBUG(dbgs() << " compute BB '" << BB->getName()
702                         << "' - overdefined because of pred (non local).\n");
703       return Result;
704     }
705   }
706 
707   // Return the merged value, which is more precise than 'overdefined'.
708   assert(!Result.isOverdefined());
709   return Result;
710 }
711 
solveBlockValuePHINode(PHINode * PN,BasicBlock * BB)712 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValuePHINode(
713     PHINode *PN, BasicBlock *BB) {
714   ValueLatticeElement Result;  // Start Undefined.
715 
716   // Loop over all of our predecessors, merging what we know from them into
717   // result.  See the comment about the chosen traversal order in
718   // solveBlockValueNonLocal; the same reasoning applies here.
719   for (unsigned i = 0, e = PN->getNumIncomingValues(); i != e; ++i) {
720     BasicBlock *PhiBB = PN->getIncomingBlock(i);
721     Value *PhiVal = PN->getIncomingValue(i);
722     // Note that we can provide PN as the context value to getEdgeValue, even
723     // though the results will be cached, because PN is the value being used as
724     // the cache key in the caller.
725     Optional<ValueLatticeElement> EdgeResult =
726         getEdgeValue(PhiVal, PhiBB, BB, PN);
727     if (!EdgeResult)
728       // Explore that input, then return here
729       return None;
730 
731     Result.mergeIn(*EdgeResult);
732 
733     // If we hit overdefined, exit early.  The BlockVals entry is already set
734     // to overdefined.
735     if (Result.isOverdefined()) {
736       LLVM_DEBUG(dbgs() << " compute BB '" << BB->getName()
737                         << "' - overdefined because of pred (local).\n");
738 
739       return Result;
740     }
741   }
742 
743   // Return the merged value, which is more precise than 'overdefined'.
744   assert(!Result.isOverdefined() && "Possible PHI in entry block?");
745   return Result;
746 }
747 
748 static ValueLatticeElement getValueFromCondition(Value *Val, Value *Cond,
749                                                  bool isTrueDest = true);
750 
751 // If we can determine a constraint on the value given conditions assumed by
752 // the program, intersect those constraints with BBLV
intersectAssumeOrGuardBlockValueConstantRange(Value * Val,ValueLatticeElement & BBLV,Instruction * BBI)753 void LazyValueInfoImpl::intersectAssumeOrGuardBlockValueConstantRange(
754         Value *Val, ValueLatticeElement &BBLV, Instruction *BBI) {
755   BBI = BBI ? BBI : dyn_cast<Instruction>(Val);
756   if (!BBI)
757     return;
758 
759   BasicBlock *BB = BBI->getParent();
760   for (auto &AssumeVH : AC->assumptionsFor(Val)) {
761     if (!AssumeVH)
762       continue;
763 
764     // Only check assumes in the block of the context instruction. Other
765     // assumes will have already been taken into account when the value was
766     // propagated from predecessor blocks.
767     auto *I = cast<CallInst>(AssumeVH);
768     if (I->getParent() != BB || !isValidAssumeForContext(I, BBI))
769       continue;
770 
771     BBLV = intersect(BBLV, getValueFromCondition(Val, I->getArgOperand(0)));
772   }
773 
774   // If guards are not used in the module, don't spend time looking for them
775   if (GuardDecl && !GuardDecl->use_empty() &&
776       BBI->getIterator() != BB->begin()) {
777     for (Instruction &I : make_range(std::next(BBI->getIterator().getReverse()),
778                                      BB->rend())) {
779       Value *Cond = nullptr;
780       if (match(&I, m_Intrinsic<Intrinsic::experimental_guard>(m_Value(Cond))))
781         BBLV = intersect(BBLV, getValueFromCondition(Val, Cond));
782     }
783   }
784 
785   if (BBLV.isOverdefined()) {
786     // Check whether we're checking at the terminator, and the pointer has
787     // been dereferenced in this block.
788     PointerType *PTy = dyn_cast<PointerType>(Val->getType());
789     if (PTy && BB->getTerminator() == BBI &&
790         isNonNullAtEndOfBlock(Val, BB))
791       BBLV = ValueLatticeElement::getNot(ConstantPointerNull::get(PTy));
792   }
793 }
794 
solveBlockValueSelect(SelectInst * SI,BasicBlock * BB)795 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValueSelect(
796     SelectInst *SI, BasicBlock *BB) {
797   // Recurse on our inputs if needed
798   Optional<ValueLatticeElement> OptTrueVal =
799       getBlockValue(SI->getTrueValue(), BB);
800   if (!OptTrueVal)
801     return None;
802   ValueLatticeElement &TrueVal = *OptTrueVal;
803 
804   Optional<ValueLatticeElement> OptFalseVal =
805       getBlockValue(SI->getFalseValue(), BB);
806   if (!OptFalseVal)
807     return None;
808   ValueLatticeElement &FalseVal = *OptFalseVal;
809 
810   if (TrueVal.isConstantRange() && FalseVal.isConstantRange()) {
811     const ConstantRange &TrueCR = TrueVal.getConstantRange();
812     const ConstantRange &FalseCR = FalseVal.getConstantRange();
813     Value *LHS = nullptr;
814     Value *RHS = nullptr;
815     SelectPatternResult SPR = matchSelectPattern(SI, LHS, RHS);
816     // Is this a min specifically of our two inputs?  (Avoid the risk of
817     // ValueTracking getting smarter looking back past our immediate inputs.)
818     if (SelectPatternResult::isMinOrMax(SPR.Flavor) &&
819         LHS == SI->getTrueValue() && RHS == SI->getFalseValue()) {
820       ConstantRange ResultCR = [&]() {
821         switch (SPR.Flavor) {
822         default:
823           llvm_unreachable("unexpected minmax type!");
824         case SPF_SMIN:                   /// Signed minimum
825           return TrueCR.smin(FalseCR);
826         case SPF_UMIN:                   /// Unsigned minimum
827           return TrueCR.umin(FalseCR);
828         case SPF_SMAX:                   /// Signed maximum
829           return TrueCR.smax(FalseCR);
830         case SPF_UMAX:                   /// Unsigned maximum
831           return TrueCR.umax(FalseCR);
832         };
833       }();
834       return ValueLatticeElement::getRange(
835           ResultCR, TrueVal.isConstantRangeIncludingUndef() |
836                         FalseVal.isConstantRangeIncludingUndef());
837     }
838 
839     if (SPR.Flavor == SPF_ABS) {
840       if (LHS == SI->getTrueValue())
841         return ValueLatticeElement::getRange(
842             TrueCR.abs(), TrueVal.isConstantRangeIncludingUndef());
843       if (LHS == SI->getFalseValue())
844         return ValueLatticeElement::getRange(
845             FalseCR.abs(), FalseVal.isConstantRangeIncludingUndef());
846     }
847 
848     if (SPR.Flavor == SPF_NABS) {
849       ConstantRange Zero(APInt::getNullValue(TrueCR.getBitWidth()));
850       if (LHS == SI->getTrueValue())
851         return ValueLatticeElement::getRange(
852             Zero.sub(TrueCR.abs()), FalseVal.isConstantRangeIncludingUndef());
853       if (LHS == SI->getFalseValue())
854         return ValueLatticeElement::getRange(
855             Zero.sub(FalseCR.abs()), FalseVal.isConstantRangeIncludingUndef());
856     }
857   }
858 
859   // Can we constrain the facts about the true and false values by using the
860   // condition itself?  This shows up with idioms like e.g. select(a > 5, a, 5).
861   // TODO: We could potentially refine an overdefined true value above.
862   Value *Cond = SI->getCondition();
863   TrueVal = intersect(TrueVal,
864                       getValueFromCondition(SI->getTrueValue(), Cond, true));
865   FalseVal = intersect(FalseVal,
866                        getValueFromCondition(SI->getFalseValue(), Cond, false));
867 
868   ValueLatticeElement Result = TrueVal;
869   Result.mergeIn(FalseVal);
870   return Result;
871 }
872 
getRangeFor(Value * V,Instruction * CxtI,BasicBlock * BB)873 Optional<ConstantRange> LazyValueInfoImpl::getRangeFor(Value *V,
874                                                        Instruction *CxtI,
875                                                        BasicBlock *BB) {
876   Optional<ValueLatticeElement> OptVal = getBlockValue(V, BB);
877   if (!OptVal)
878     return None;
879 
880   ValueLatticeElement &Val = *OptVal;
881   intersectAssumeOrGuardBlockValueConstantRange(V, Val, CxtI);
882   if (Val.isConstantRange())
883     return Val.getConstantRange();
884 
885   const unsigned OperandBitWidth = DL.getTypeSizeInBits(V->getType());
886   return ConstantRange::getFull(OperandBitWidth);
887 }
888 
solveBlockValueCast(CastInst * CI,BasicBlock * BB)889 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValueCast(
890     CastInst *CI, BasicBlock *BB) {
891   // Without knowing how wide the input is, we can't analyze it in any useful
892   // way.
893   if (!CI->getOperand(0)->getType()->isSized())
894     return ValueLatticeElement::getOverdefined();
895 
896   // Filter out casts we don't know how to reason about before attempting to
897   // recurse on our operand.  This can cut a long search short if we know we're
898   // not going to be able to get any useful information anways.
899   switch (CI->getOpcode()) {
900   case Instruction::Trunc:
901   case Instruction::SExt:
902   case Instruction::ZExt:
903   case Instruction::BitCast:
904     break;
905   default:
906     // Unhandled instructions are overdefined.
907     LLVM_DEBUG(dbgs() << " compute BB '" << BB->getName()
908                       << "' - overdefined (unknown cast).\n");
909     return ValueLatticeElement::getOverdefined();
910   }
911 
912   // Figure out the range of the LHS.  If that fails, we still apply the
913   // transfer rule on the full set since we may be able to locally infer
914   // interesting facts.
915   Optional<ConstantRange> LHSRes = getRangeFor(CI->getOperand(0), CI, BB);
916   if (!LHSRes.hasValue())
917     // More work to do before applying this transfer rule.
918     return None;
919   const ConstantRange &LHSRange = LHSRes.getValue();
920 
921   const unsigned ResultBitWidth = CI->getType()->getIntegerBitWidth();
922 
923   // NOTE: We're currently limited by the set of operations that ConstantRange
924   // can evaluate symbolically.  Enhancing that set will allows us to analyze
925   // more definitions.
926   return ValueLatticeElement::getRange(LHSRange.castOp(CI->getOpcode(),
927                                                        ResultBitWidth));
928 }
929 
solveBlockValueBinaryOpImpl(Instruction * I,BasicBlock * BB,std::function<ConstantRange (const ConstantRange &,const ConstantRange &)> OpFn)930 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValueBinaryOpImpl(
931     Instruction *I, BasicBlock *BB,
932     std::function<ConstantRange(const ConstantRange &,
933                                 const ConstantRange &)> OpFn) {
934   // Figure out the ranges of the operands.  If that fails, use a
935   // conservative range, but apply the transfer rule anyways.  This
936   // lets us pick up facts from expressions like "and i32 (call i32
937   // @foo()), 32"
938   Optional<ConstantRange> LHSRes = getRangeFor(I->getOperand(0), I, BB);
939   Optional<ConstantRange> RHSRes = getRangeFor(I->getOperand(1), I, BB);
940   if (!LHSRes.hasValue() || !RHSRes.hasValue())
941     // More work to do before applying this transfer rule.
942     return None;
943 
944   const ConstantRange &LHSRange = LHSRes.getValue();
945   const ConstantRange &RHSRange = RHSRes.getValue();
946   return ValueLatticeElement::getRange(OpFn(LHSRange, RHSRange));
947 }
948 
solveBlockValueBinaryOp(BinaryOperator * BO,BasicBlock * BB)949 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValueBinaryOp(
950     BinaryOperator *BO, BasicBlock *BB) {
951   assert(BO->getOperand(0)->getType()->isSized() &&
952          "all operands to binary operators are sized");
953   if (BO->getOpcode() == Instruction::Xor) {
954     // Xor is the only operation not supported by ConstantRange::binaryOp().
955     LLVM_DEBUG(dbgs() << " compute BB '" << BB->getName()
956                       << "' - overdefined (unknown binary operator).\n");
957     return ValueLatticeElement::getOverdefined();
958   }
959 
960   if (auto *OBO = dyn_cast<OverflowingBinaryOperator>(BO)) {
961     unsigned NoWrapKind = 0;
962     if (OBO->hasNoUnsignedWrap())
963       NoWrapKind |= OverflowingBinaryOperator::NoUnsignedWrap;
964     if (OBO->hasNoSignedWrap())
965       NoWrapKind |= OverflowingBinaryOperator::NoSignedWrap;
966 
967     return solveBlockValueBinaryOpImpl(
968         BO, BB,
969         [BO, NoWrapKind](const ConstantRange &CR1, const ConstantRange &CR2) {
970           return CR1.overflowingBinaryOp(BO->getOpcode(), CR2, NoWrapKind);
971         });
972   }
973 
974   return solveBlockValueBinaryOpImpl(
975       BO, BB, [BO](const ConstantRange &CR1, const ConstantRange &CR2) {
976         return CR1.binaryOp(BO->getOpcode(), CR2);
977       });
978 }
979 
980 Optional<ValueLatticeElement>
solveBlockValueOverflowIntrinsic(WithOverflowInst * WO,BasicBlock * BB)981 LazyValueInfoImpl::solveBlockValueOverflowIntrinsic(WithOverflowInst *WO,
982                                                     BasicBlock *BB) {
983   return solveBlockValueBinaryOpImpl(
984       WO, BB, [WO](const ConstantRange &CR1, const ConstantRange &CR2) {
985         return CR1.binaryOp(WO->getBinaryOp(), CR2);
986       });
987 }
988 
solveBlockValueIntrinsic(IntrinsicInst * II,BasicBlock * BB)989 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValueIntrinsic(
990     IntrinsicInst *II, BasicBlock *BB) {
991   if (!ConstantRange::isIntrinsicSupported(II->getIntrinsicID())) {
992     LLVM_DEBUG(dbgs() << " compute BB '" << BB->getName()
993                       << "' - unknown intrinsic.\n");
994     return getFromRangeMetadata(II);
995   }
996 
997   SmallVector<ConstantRange, 2> OpRanges;
998   for (Value *Op : II->args()) {
999     Optional<ConstantRange> Range = getRangeFor(Op, II, BB);
1000     if (!Range)
1001       return None;
1002     OpRanges.push_back(*Range);
1003   }
1004 
1005   return ValueLatticeElement::getRange(
1006       ConstantRange::intrinsic(II->getIntrinsicID(), OpRanges));
1007 }
1008 
solveBlockValueExtractValue(ExtractValueInst * EVI,BasicBlock * BB)1009 Optional<ValueLatticeElement> LazyValueInfoImpl::solveBlockValueExtractValue(
1010     ExtractValueInst *EVI, BasicBlock *BB) {
1011   if (auto *WO = dyn_cast<WithOverflowInst>(EVI->getAggregateOperand()))
1012     if (EVI->getNumIndices() == 1 && *EVI->idx_begin() == 0)
1013       return solveBlockValueOverflowIntrinsic(WO, BB);
1014 
1015   // Handle extractvalue of insertvalue to allow further simplification
1016   // based on replaced with.overflow intrinsics.
1017   if (Value *V = SimplifyExtractValueInst(
1018           EVI->getAggregateOperand(), EVI->getIndices(),
1019           EVI->getModule()->getDataLayout()))
1020     return getBlockValue(V, BB);
1021 
1022   LLVM_DEBUG(dbgs() << " compute BB '" << BB->getName()
1023                     << "' - overdefined (unknown extractvalue).\n");
1024   return ValueLatticeElement::getOverdefined();
1025 }
1026 
matchICmpOperand(APInt & Offset,Value * LHS,Value * Val,ICmpInst::Predicate Pred)1027 static bool matchICmpOperand(APInt &Offset, Value *LHS, Value *Val,
1028                              ICmpInst::Predicate Pred) {
1029   if (LHS == Val)
1030     return true;
1031 
1032   // Handle range checking idiom produced by InstCombine. We will subtract the
1033   // offset from the allowed range for RHS in this case.
1034   const APInt *C;
1035   if (match(LHS, m_Add(m_Specific(Val), m_APInt(C)))) {
1036     Offset = *C;
1037     return true;
1038   }
1039 
1040   // Handle the symmetric case. This appears in saturation patterns like
1041   // (x == 16) ? 16 : (x + 1).
1042   if (match(Val, m_Add(m_Specific(LHS), m_APInt(C)))) {
1043     Offset = -*C;
1044     return true;
1045   }
1046 
1047   // If (x | y) < C, then (x < C) && (y < C).
1048   if (match(LHS, m_c_Or(m_Specific(Val), m_Value())) &&
1049       (Pred == ICmpInst::ICMP_ULT || Pred == ICmpInst::ICMP_ULE))
1050     return true;
1051 
1052   // If (x & y) > C, then (x > C) && (y > C).
1053   if (match(LHS, m_c_And(m_Specific(Val), m_Value())) &&
1054       (Pred == ICmpInst::ICMP_UGT || Pred == ICmpInst::ICMP_UGE))
1055     return true;
1056 
1057   return false;
1058 }
1059 
1060 /// Get value range for a "(Val + Offset) Pred RHS" condition.
getValueFromSimpleICmpCondition(CmpInst::Predicate Pred,Value * RHS,const APInt & Offset)1061 static ValueLatticeElement getValueFromSimpleICmpCondition(
1062     CmpInst::Predicate Pred, Value *RHS, const APInt &Offset) {
1063   ConstantRange RHSRange(RHS->getType()->getIntegerBitWidth(),
1064                          /*isFullSet=*/true);
1065   if (ConstantInt *CI = dyn_cast<ConstantInt>(RHS))
1066     RHSRange = ConstantRange(CI->getValue());
1067   else if (Instruction *I = dyn_cast<Instruction>(RHS))
1068     if (auto *Ranges = I->getMetadata(LLVMContext::MD_range))
1069       RHSRange = getConstantRangeFromMetadata(*Ranges);
1070 
1071   ConstantRange TrueValues =
1072       ConstantRange::makeAllowedICmpRegion(Pred, RHSRange);
1073   return ValueLatticeElement::getRange(TrueValues.subtract(Offset));
1074 }
1075 
getValueFromICmpCondition(Value * Val,ICmpInst * ICI,bool isTrueDest)1076 static ValueLatticeElement getValueFromICmpCondition(Value *Val, ICmpInst *ICI,
1077                                                      bool isTrueDest) {
1078   Value *LHS = ICI->getOperand(0);
1079   Value *RHS = ICI->getOperand(1);
1080 
1081   // Get the predicate that must hold along the considered edge.
1082   CmpInst::Predicate EdgePred =
1083       isTrueDest ? ICI->getPredicate() : ICI->getInversePredicate();
1084 
1085   if (isa<Constant>(RHS)) {
1086     if (ICI->isEquality() && LHS == Val) {
1087       if (EdgePred == ICmpInst::ICMP_EQ)
1088         return ValueLatticeElement::get(cast<Constant>(RHS));
1089       else if (!isa<UndefValue>(RHS))
1090         return ValueLatticeElement::getNot(cast<Constant>(RHS));
1091     }
1092   }
1093 
1094   Type *Ty = Val->getType();
1095   if (!Ty->isIntegerTy())
1096     return ValueLatticeElement::getOverdefined();
1097 
1098   APInt Offset(Ty->getScalarSizeInBits(), 0);
1099   if (matchICmpOperand(Offset, LHS, Val, EdgePred))
1100     return getValueFromSimpleICmpCondition(EdgePred, RHS, Offset);
1101 
1102   CmpInst::Predicate SwappedPred = CmpInst::getSwappedPredicate(EdgePred);
1103   if (matchICmpOperand(Offset, RHS, Val, SwappedPred))
1104     return getValueFromSimpleICmpCondition(SwappedPred, LHS, Offset);
1105 
1106   const APInt *Mask, *C;
1107   if (match(LHS, m_And(m_Specific(Val), m_APInt(Mask))) &&
1108       match(RHS, m_APInt(C))) {
1109     // If (Val & Mask) == C then all the masked bits are known and we can
1110     // compute a value range based on that.
1111     if (EdgePred == ICmpInst::ICMP_EQ) {
1112       KnownBits Known;
1113       Known.Zero = ~*C & *Mask;
1114       Known.One = *C & *Mask;
1115       return ValueLatticeElement::getRange(
1116           ConstantRange::fromKnownBits(Known, /*IsSigned*/ false));
1117     }
1118     // If (Val & Mask) != 0 then the value must be larger than the lowest set
1119     // bit of Mask.
1120     if (EdgePred == ICmpInst::ICMP_NE && !Mask->isNullValue() &&
1121         C->isNullValue()) {
1122       unsigned BitWidth = Ty->getIntegerBitWidth();
1123       return ValueLatticeElement::getRange(ConstantRange::getNonEmpty(
1124           APInt::getOneBitSet(BitWidth, Mask->countTrailingZeros()),
1125           APInt::getNullValue(BitWidth)));
1126     }
1127   }
1128 
1129   return ValueLatticeElement::getOverdefined();
1130 }
1131 
1132 // Handle conditions of the form
1133 // extractvalue(op.with.overflow(%x, C), 1).
getValueFromOverflowCondition(Value * Val,WithOverflowInst * WO,bool IsTrueDest)1134 static ValueLatticeElement getValueFromOverflowCondition(
1135     Value *Val, WithOverflowInst *WO, bool IsTrueDest) {
1136   // TODO: This only works with a constant RHS for now. We could also compute
1137   // the range of the RHS, but this doesn't fit into the current structure of
1138   // the edge value calculation.
1139   const APInt *C;
1140   if (WO->getLHS() != Val || !match(WO->getRHS(), m_APInt(C)))
1141     return ValueLatticeElement::getOverdefined();
1142 
1143   // Calculate the possible values of %x for which no overflow occurs.
1144   ConstantRange NWR = ConstantRange::makeExactNoWrapRegion(
1145       WO->getBinaryOp(), *C, WO->getNoWrapKind());
1146 
1147   // If overflow is false, %x is constrained to NWR. If overflow is true, %x is
1148   // constrained to it's inverse (all values that might cause overflow).
1149   if (IsTrueDest)
1150     NWR = NWR.inverse();
1151   return ValueLatticeElement::getRange(NWR);
1152 }
1153 
1154 static ValueLatticeElement
1155 getValueFromCondition(Value *Val, Value *Cond, bool isTrueDest,
1156                       SmallDenseMap<Value*, ValueLatticeElement> &Visited);
1157 
1158 static ValueLatticeElement
getValueFromConditionImpl(Value * Val,Value * Cond,bool isTrueDest,SmallDenseMap<Value *,ValueLatticeElement> & Visited)1159 getValueFromConditionImpl(Value *Val, Value *Cond, bool isTrueDest,
1160                           SmallDenseMap<Value*, ValueLatticeElement> &Visited) {
1161   if (ICmpInst *ICI = dyn_cast<ICmpInst>(Cond))
1162     return getValueFromICmpCondition(Val, ICI, isTrueDest);
1163 
1164   if (auto *EVI = dyn_cast<ExtractValueInst>(Cond))
1165     if (auto *WO = dyn_cast<WithOverflowInst>(EVI->getAggregateOperand()))
1166       if (EVI->getNumIndices() == 1 && *EVI->idx_begin() == 1)
1167         return getValueFromOverflowCondition(Val, WO, isTrueDest);
1168 
1169   Value *L, *R;
1170   bool IsAnd;
1171   if (match(Cond, m_LogicalAnd(m_Value(L), m_Value(R))))
1172     IsAnd = true;
1173   else if (match(Cond, m_LogicalOr(m_Value(L), m_Value(R))))
1174     IsAnd = false;
1175   else
1176     return ValueLatticeElement::getOverdefined();
1177 
1178   // if (L && R) -> intersect L and R
1179   // if (!(L || R)) -> intersect L and R
1180   // if (L || R) -> union L and R
1181   // if (!(L && R)) -> union L and R
1182   if (isTrueDest ^ IsAnd) {
1183     ValueLatticeElement V = getValueFromCondition(Val, L, isTrueDest, Visited);
1184     if (V.isOverdefined())
1185       return V;
1186     V.mergeIn(getValueFromCondition(Val, R, isTrueDest, Visited));
1187     return V;
1188   }
1189 
1190   return intersect(getValueFromCondition(Val, L, isTrueDest, Visited),
1191                    getValueFromCondition(Val, R, isTrueDest, Visited));
1192 }
1193 
1194 static ValueLatticeElement
getValueFromCondition(Value * Val,Value * Cond,bool isTrueDest,SmallDenseMap<Value *,ValueLatticeElement> & Visited)1195 getValueFromCondition(Value *Val, Value *Cond, bool isTrueDest,
1196                       SmallDenseMap<Value*, ValueLatticeElement> &Visited) {
1197   // Insert an Overdefined placeholder into the set to prevent
1198   // infinite recursion if there exists IRs that use not
1199   // dominated by its def as in this example:
1200   //   "%tmp3 = or i1 undef, %tmp4"
1201   //   "%tmp4 = or i1 undef, %tmp3"
1202   auto Iter = Visited.try_emplace(Cond, ValueLatticeElement::getOverdefined());
1203   if (!Iter.second)
1204     return Iter.first->getSecond();
1205 
1206   auto Result = getValueFromConditionImpl(Val, Cond, isTrueDest, Visited);
1207   Visited[Cond] = Result;
1208   return Result;
1209 }
1210 
getValueFromCondition(Value * Val,Value * Cond,bool isTrueDest)1211 ValueLatticeElement getValueFromCondition(Value *Val, Value *Cond,
1212                                           bool isTrueDest) {
1213   assert(Cond && "precondition");
1214   SmallDenseMap<Value*, ValueLatticeElement> Visited;
1215   return getValueFromCondition(Val, Cond, isTrueDest, Visited);
1216 }
1217 
1218 // Return true if Usr has Op as an operand, otherwise false.
usesOperand(User * Usr,Value * Op)1219 static bool usesOperand(User *Usr, Value *Op) {
1220   return is_contained(Usr->operands(), Op);
1221 }
1222 
1223 // Return true if the instruction type of Val is supported by
1224 // constantFoldUser(). Currently CastInst, BinaryOperator and FreezeInst only.
1225 // Call this before calling constantFoldUser() to find out if it's even worth
1226 // attempting to call it.
isOperationFoldable(User * Usr)1227 static bool isOperationFoldable(User *Usr) {
1228   return isa<CastInst>(Usr) || isa<BinaryOperator>(Usr) || isa<FreezeInst>(Usr);
1229 }
1230 
1231 // Check if Usr can be simplified to an integer constant when the value of one
1232 // of its operands Op is an integer constant OpConstVal. If so, return it as an
1233 // lattice value range with a single element or otherwise return an overdefined
1234 // lattice value.
constantFoldUser(User * Usr,Value * Op,const APInt & OpConstVal,const DataLayout & DL)1235 static ValueLatticeElement constantFoldUser(User *Usr, Value *Op,
1236                                             const APInt &OpConstVal,
1237                                             const DataLayout &DL) {
1238   assert(isOperationFoldable(Usr) && "Precondition");
1239   Constant* OpConst = Constant::getIntegerValue(Op->getType(), OpConstVal);
1240   // Check if Usr can be simplified to a constant.
1241   if (auto *CI = dyn_cast<CastInst>(Usr)) {
1242     assert(CI->getOperand(0) == Op && "Operand 0 isn't Op");
1243     if (auto *C = dyn_cast_or_null<ConstantInt>(
1244             SimplifyCastInst(CI->getOpcode(), OpConst,
1245                              CI->getDestTy(), DL))) {
1246       return ValueLatticeElement::getRange(ConstantRange(C->getValue()));
1247     }
1248   } else if (auto *BO = dyn_cast<BinaryOperator>(Usr)) {
1249     bool Op0Match = BO->getOperand(0) == Op;
1250     bool Op1Match = BO->getOperand(1) == Op;
1251     assert((Op0Match || Op1Match) &&
1252            "Operand 0 nor Operand 1 isn't a match");
1253     Value *LHS = Op0Match ? OpConst : BO->getOperand(0);
1254     Value *RHS = Op1Match ? OpConst : BO->getOperand(1);
1255     if (auto *C = dyn_cast_or_null<ConstantInt>(
1256             SimplifyBinOp(BO->getOpcode(), LHS, RHS, DL))) {
1257       return ValueLatticeElement::getRange(ConstantRange(C->getValue()));
1258     }
1259   } else if (isa<FreezeInst>(Usr)) {
1260     assert(cast<FreezeInst>(Usr)->getOperand(0) == Op && "Operand 0 isn't Op");
1261     return ValueLatticeElement::getRange(ConstantRange(OpConstVal));
1262   }
1263   return ValueLatticeElement::getOverdefined();
1264 }
1265 
1266 /// Compute the value of Val on the edge BBFrom -> BBTo. Returns false if
1267 /// Val is not constrained on the edge.  Result is unspecified if return value
1268 /// is false.
getEdgeValueLocal(Value * Val,BasicBlock * BBFrom,BasicBlock * BBTo)1269 static Optional<ValueLatticeElement> getEdgeValueLocal(Value *Val,
1270                                                        BasicBlock *BBFrom,
1271                                                        BasicBlock *BBTo) {
1272   // TODO: Handle more complex conditionals. If (v == 0 || v2 < 1) is false, we
1273   // know that v != 0.
1274   if (BranchInst *BI = dyn_cast<BranchInst>(BBFrom->getTerminator())) {
1275     // If this is a conditional branch and only one successor goes to BBTo, then
1276     // we may be able to infer something from the condition.
1277     if (BI->isConditional() &&
1278         BI->getSuccessor(0) != BI->getSuccessor(1)) {
1279       bool isTrueDest = BI->getSuccessor(0) == BBTo;
1280       assert(BI->getSuccessor(!isTrueDest) == BBTo &&
1281              "BBTo isn't a successor of BBFrom");
1282       Value *Condition = BI->getCondition();
1283 
1284       // If V is the condition of the branch itself, then we know exactly what
1285       // it is.
1286       if (Condition == Val)
1287         return ValueLatticeElement::get(ConstantInt::get(
1288                               Type::getInt1Ty(Val->getContext()), isTrueDest));
1289 
1290       // If the condition of the branch is an equality comparison, we may be
1291       // able to infer the value.
1292       ValueLatticeElement Result = getValueFromCondition(Val, Condition,
1293                                                          isTrueDest);
1294       if (!Result.isOverdefined())
1295         return Result;
1296 
1297       if (User *Usr = dyn_cast<User>(Val)) {
1298         assert(Result.isOverdefined() && "Result isn't overdefined");
1299         // Check with isOperationFoldable() first to avoid linearly iterating
1300         // over the operands unnecessarily which can be expensive for
1301         // instructions with many operands.
1302         if (isa<IntegerType>(Usr->getType()) && isOperationFoldable(Usr)) {
1303           const DataLayout &DL = BBTo->getModule()->getDataLayout();
1304           if (usesOperand(Usr, Condition)) {
1305             // If Val has Condition as an operand and Val can be folded into a
1306             // constant with either Condition == true or Condition == false,
1307             // propagate the constant.
1308             // eg.
1309             //   ; %Val is true on the edge to %then.
1310             //   %Val = and i1 %Condition, true.
1311             //   br %Condition, label %then, label %else
1312             APInt ConditionVal(1, isTrueDest ? 1 : 0);
1313             Result = constantFoldUser(Usr, Condition, ConditionVal, DL);
1314           } else {
1315             // If one of Val's operand has an inferred value, we may be able to
1316             // infer the value of Val.
1317             // eg.
1318             //    ; %Val is 94 on the edge to %then.
1319             //    %Val = add i8 %Op, 1
1320             //    %Condition = icmp eq i8 %Op, 93
1321             //    br i1 %Condition, label %then, label %else
1322             for (unsigned i = 0; i < Usr->getNumOperands(); ++i) {
1323               Value *Op = Usr->getOperand(i);
1324               ValueLatticeElement OpLatticeVal =
1325                   getValueFromCondition(Op, Condition, isTrueDest);
1326               if (Optional<APInt> OpConst = OpLatticeVal.asConstantInteger()) {
1327                 Result = constantFoldUser(Usr, Op, OpConst.getValue(), DL);
1328                 break;
1329               }
1330             }
1331           }
1332         }
1333       }
1334       if (!Result.isOverdefined())
1335         return Result;
1336     }
1337   }
1338 
1339   // If the edge was formed by a switch on the value, then we may know exactly
1340   // what it is.
1341   if (SwitchInst *SI = dyn_cast<SwitchInst>(BBFrom->getTerminator())) {
1342     Value *Condition = SI->getCondition();
1343     if (!isa<IntegerType>(Val->getType()))
1344       return None;
1345     bool ValUsesConditionAndMayBeFoldable = false;
1346     if (Condition != Val) {
1347       // Check if Val has Condition as an operand.
1348       if (User *Usr = dyn_cast<User>(Val))
1349         ValUsesConditionAndMayBeFoldable = isOperationFoldable(Usr) &&
1350             usesOperand(Usr, Condition);
1351       if (!ValUsesConditionAndMayBeFoldable)
1352         return None;
1353     }
1354     assert((Condition == Val || ValUsesConditionAndMayBeFoldable) &&
1355            "Condition != Val nor Val doesn't use Condition");
1356 
1357     bool DefaultCase = SI->getDefaultDest() == BBTo;
1358     unsigned BitWidth = Val->getType()->getIntegerBitWidth();
1359     ConstantRange EdgesVals(BitWidth, DefaultCase/*isFullSet*/);
1360 
1361     for (auto Case : SI->cases()) {
1362       APInt CaseValue = Case.getCaseValue()->getValue();
1363       ConstantRange EdgeVal(CaseValue);
1364       if (ValUsesConditionAndMayBeFoldable) {
1365         User *Usr = cast<User>(Val);
1366         const DataLayout &DL = BBTo->getModule()->getDataLayout();
1367         ValueLatticeElement EdgeLatticeVal =
1368             constantFoldUser(Usr, Condition, CaseValue, DL);
1369         if (EdgeLatticeVal.isOverdefined())
1370           return None;
1371         EdgeVal = EdgeLatticeVal.getConstantRange();
1372       }
1373       if (DefaultCase) {
1374         // It is possible that the default destination is the destination of
1375         // some cases. We cannot perform difference for those cases.
1376         // We know Condition != CaseValue in BBTo.  In some cases we can use
1377         // this to infer Val == f(Condition) is != f(CaseValue).  For now, we
1378         // only do this when f is identity (i.e. Val == Condition), but we
1379         // should be able to do this for any injective f.
1380         if (Case.getCaseSuccessor() != BBTo && Condition == Val)
1381           EdgesVals = EdgesVals.difference(EdgeVal);
1382       } else if (Case.getCaseSuccessor() == BBTo)
1383         EdgesVals = EdgesVals.unionWith(EdgeVal);
1384     }
1385     return ValueLatticeElement::getRange(std::move(EdgesVals));
1386   }
1387   return None;
1388 }
1389 
1390 /// Compute the value of Val on the edge BBFrom -> BBTo or the value at
1391 /// the basic block if the edge does not constrain Val.
getEdgeValue(Value * Val,BasicBlock * BBFrom,BasicBlock * BBTo,Instruction * CxtI)1392 Optional<ValueLatticeElement> LazyValueInfoImpl::getEdgeValue(
1393     Value *Val, BasicBlock *BBFrom, BasicBlock *BBTo, Instruction *CxtI) {
1394   // If already a constant, there is nothing to compute.
1395   if (Constant *VC = dyn_cast<Constant>(Val))
1396     return ValueLatticeElement::get(VC);
1397 
1398   ValueLatticeElement LocalResult = getEdgeValueLocal(Val, BBFrom, BBTo)
1399       .getValueOr(ValueLatticeElement::getOverdefined());
1400   if (hasSingleValue(LocalResult))
1401     // Can't get any more precise here
1402     return LocalResult;
1403 
1404   Optional<ValueLatticeElement> OptInBlock = getBlockValue(Val, BBFrom);
1405   if (!OptInBlock)
1406     return None;
1407   ValueLatticeElement &InBlock = *OptInBlock;
1408 
1409   // Try to intersect ranges of the BB and the constraint on the edge.
1410   intersectAssumeOrGuardBlockValueConstantRange(Val, InBlock,
1411                                                 BBFrom->getTerminator());
1412   // We can use the context instruction (generically the ultimate instruction
1413   // the calling pass is trying to simplify) here, even though the result of
1414   // this function is generally cached when called from the solve* functions
1415   // (and that cached result might be used with queries using a different
1416   // context instruction), because when this function is called from the solve*
1417   // functions, the context instruction is not provided. When called from
1418   // LazyValueInfoImpl::getValueOnEdge, the context instruction is provided,
1419   // but then the result is not cached.
1420   intersectAssumeOrGuardBlockValueConstantRange(Val, InBlock, CxtI);
1421 
1422   return intersect(LocalResult, InBlock);
1423 }
1424 
getValueInBlock(Value * V,BasicBlock * BB,Instruction * CxtI)1425 ValueLatticeElement LazyValueInfoImpl::getValueInBlock(Value *V, BasicBlock *BB,
1426                                                        Instruction *CxtI) {
1427   LLVM_DEBUG(dbgs() << "LVI Getting block end value " << *V << " at '"
1428                     << BB->getName() << "'\n");
1429 
1430   assert(BlockValueStack.empty() && BlockValueSet.empty());
1431   Optional<ValueLatticeElement> OptResult = getBlockValue(V, BB);
1432   if (!OptResult) {
1433     solve();
1434     OptResult = getBlockValue(V, BB);
1435     assert(OptResult && "Value not available after solving");
1436   }
1437   ValueLatticeElement Result = *OptResult;
1438   intersectAssumeOrGuardBlockValueConstantRange(V, Result, CxtI);
1439 
1440   LLVM_DEBUG(dbgs() << "  Result = " << Result << "\n");
1441   return Result;
1442 }
1443 
getValueAt(Value * V,Instruction * CxtI)1444 ValueLatticeElement LazyValueInfoImpl::getValueAt(Value *V, Instruction *CxtI) {
1445   LLVM_DEBUG(dbgs() << "LVI Getting value " << *V << " at '" << CxtI->getName()
1446                     << "'\n");
1447 
1448   if (auto *C = dyn_cast<Constant>(V))
1449     return ValueLatticeElement::get(C);
1450 
1451   ValueLatticeElement Result = ValueLatticeElement::getOverdefined();
1452   if (auto *I = dyn_cast<Instruction>(V))
1453     Result = getFromRangeMetadata(I);
1454   intersectAssumeOrGuardBlockValueConstantRange(V, Result, CxtI);
1455 
1456   LLVM_DEBUG(dbgs() << "  Result = " << Result << "\n");
1457   return Result;
1458 }
1459 
1460 ValueLatticeElement LazyValueInfoImpl::
getValueOnEdge(Value * V,BasicBlock * FromBB,BasicBlock * ToBB,Instruction * CxtI)1461 getValueOnEdge(Value *V, BasicBlock *FromBB, BasicBlock *ToBB,
1462                Instruction *CxtI) {
1463   LLVM_DEBUG(dbgs() << "LVI Getting edge value " << *V << " from '"
1464                     << FromBB->getName() << "' to '" << ToBB->getName()
1465                     << "'\n");
1466 
1467   Optional<ValueLatticeElement> Result = getEdgeValue(V, FromBB, ToBB, CxtI);
1468   if (!Result) {
1469     solve();
1470     Result = getEdgeValue(V, FromBB, ToBB, CxtI);
1471     assert(Result && "More work to do after problem solved?");
1472   }
1473 
1474   LLVM_DEBUG(dbgs() << "  Result = " << *Result << "\n");
1475   return *Result;
1476 }
1477 
threadEdge(BasicBlock * PredBB,BasicBlock * OldSucc,BasicBlock * NewSucc)1478 void LazyValueInfoImpl::threadEdge(BasicBlock *PredBB, BasicBlock *OldSucc,
1479                                    BasicBlock *NewSucc) {
1480   TheCache.threadEdgeImpl(OldSucc, NewSucc);
1481 }
1482 
1483 //===----------------------------------------------------------------------===//
1484 //                            LazyValueInfo Impl
1485 //===----------------------------------------------------------------------===//
1486 
1487 /// This lazily constructs the LazyValueInfoImpl.
getImpl(void * & PImpl,AssumptionCache * AC,const Module * M)1488 static LazyValueInfoImpl &getImpl(void *&PImpl, AssumptionCache *AC,
1489                                   const Module *M) {
1490   if (!PImpl) {
1491     assert(M && "getCache() called with a null Module");
1492     const DataLayout &DL = M->getDataLayout();
1493     Function *GuardDecl = M->getFunction(
1494         Intrinsic::getName(Intrinsic::experimental_guard));
1495     PImpl = new LazyValueInfoImpl(AC, DL, GuardDecl);
1496   }
1497   return *static_cast<LazyValueInfoImpl*>(PImpl);
1498 }
1499 
runOnFunction(Function & F)1500 bool LazyValueInfoWrapperPass::runOnFunction(Function &F) {
1501   Info.AC = &getAnalysis<AssumptionCacheTracker>().getAssumptionCache(F);
1502   Info.TLI = &getAnalysis<TargetLibraryInfoWrapperPass>().getTLI(F);
1503 
1504   if (Info.PImpl)
1505     getImpl(Info.PImpl, Info.AC, F.getParent()).clear();
1506 
1507   // Fully lazy.
1508   return false;
1509 }
1510 
getAnalysisUsage(AnalysisUsage & AU) const1511 void LazyValueInfoWrapperPass::getAnalysisUsage(AnalysisUsage &AU) const {
1512   AU.setPreservesAll();
1513   AU.addRequired<AssumptionCacheTracker>();
1514   AU.addRequired<TargetLibraryInfoWrapperPass>();
1515 }
1516 
getLVI()1517 LazyValueInfo &LazyValueInfoWrapperPass::getLVI() { return Info; }
1518 
~LazyValueInfo()1519 LazyValueInfo::~LazyValueInfo() { releaseMemory(); }
1520 
releaseMemory()1521 void LazyValueInfo::releaseMemory() {
1522   // If the cache was allocated, free it.
1523   if (PImpl) {
1524     delete &getImpl(PImpl, AC, nullptr);
1525     PImpl = nullptr;
1526   }
1527 }
1528 
invalidate(Function & F,const PreservedAnalyses & PA,FunctionAnalysisManager::Invalidator & Inv)1529 bool LazyValueInfo::invalidate(Function &F, const PreservedAnalyses &PA,
1530                                FunctionAnalysisManager::Invalidator &Inv) {
1531   // We need to invalidate if we have either failed to preserve this analyses
1532   // result directly or if any of its dependencies have been invalidated.
1533   auto PAC = PA.getChecker<LazyValueAnalysis>();
1534   if (!(PAC.preserved() || PAC.preservedSet<AllAnalysesOn<Function>>()))
1535     return true;
1536 
1537   return false;
1538 }
1539 
releaseMemory()1540 void LazyValueInfoWrapperPass::releaseMemory() { Info.releaseMemory(); }
1541 
run(Function & F,FunctionAnalysisManager & FAM)1542 LazyValueInfo LazyValueAnalysis::run(Function &F,
1543                                      FunctionAnalysisManager &FAM) {
1544   auto &AC = FAM.getResult<AssumptionAnalysis>(F);
1545   auto &TLI = FAM.getResult<TargetLibraryAnalysis>(F);
1546 
1547   return LazyValueInfo(&AC, &F.getParent()->getDataLayout(), &TLI);
1548 }
1549 
1550 /// Returns true if we can statically tell that this value will never be a
1551 /// "useful" constant.  In practice, this means we've got something like an
1552 /// alloca or a malloc call for which a comparison against a constant can
1553 /// only be guarding dead code.  Note that we are potentially giving up some
1554 /// precision in dead code (a constant result) in favour of avoiding a
1555 /// expensive search for a easily answered common query.
isKnownNonConstant(Value * V)1556 static bool isKnownNonConstant(Value *V) {
1557   V = V->stripPointerCasts();
1558   // The return val of alloc cannot be a Constant.
1559   if (isa<AllocaInst>(V))
1560     return true;
1561   return false;
1562 }
1563 
getConstant(Value * V,Instruction * CxtI)1564 Constant *LazyValueInfo::getConstant(Value *V, Instruction *CxtI) {
1565   // Bail out early if V is known not to be a Constant.
1566   if (isKnownNonConstant(V))
1567     return nullptr;
1568 
1569   BasicBlock *BB = CxtI->getParent();
1570   ValueLatticeElement Result =
1571       getImpl(PImpl, AC, BB->getModule()).getValueInBlock(V, BB, CxtI);
1572 
1573   if (Result.isConstant())
1574     return Result.getConstant();
1575   if (Result.isConstantRange()) {
1576     const ConstantRange &CR = Result.getConstantRange();
1577     if (const APInt *SingleVal = CR.getSingleElement())
1578       return ConstantInt::get(V->getContext(), *SingleVal);
1579   }
1580   return nullptr;
1581 }
1582 
getConstantRange(Value * V,Instruction * CxtI,bool UndefAllowed)1583 ConstantRange LazyValueInfo::getConstantRange(Value *V, Instruction *CxtI,
1584                                               bool UndefAllowed) {
1585   assert(V->getType()->isIntegerTy());
1586   unsigned Width = V->getType()->getIntegerBitWidth();
1587   BasicBlock *BB = CxtI->getParent();
1588   ValueLatticeElement Result =
1589       getImpl(PImpl, AC, BB->getModule()).getValueInBlock(V, BB, CxtI);
1590   if (Result.isUnknown())
1591     return ConstantRange::getEmpty(Width);
1592   if (Result.isConstantRange(UndefAllowed))
1593     return Result.getConstantRange(UndefAllowed);
1594   // We represent ConstantInt constants as constant ranges but other kinds
1595   // of integer constants, i.e. ConstantExpr will be tagged as constants
1596   assert(!(Result.isConstant() && isa<ConstantInt>(Result.getConstant())) &&
1597          "ConstantInt value must be represented as constantrange");
1598   return ConstantRange::getFull(Width);
1599 }
1600 
1601 /// Determine whether the specified value is known to be a
1602 /// constant on the specified edge. Return null if not.
getConstantOnEdge(Value * V,BasicBlock * FromBB,BasicBlock * ToBB,Instruction * CxtI)1603 Constant *LazyValueInfo::getConstantOnEdge(Value *V, BasicBlock *FromBB,
1604                                            BasicBlock *ToBB,
1605                                            Instruction *CxtI) {
1606   Module *M = FromBB->getModule();
1607   ValueLatticeElement Result =
1608       getImpl(PImpl, AC, M).getValueOnEdge(V, FromBB, ToBB, CxtI);
1609 
1610   if (Result.isConstant())
1611     return Result.getConstant();
1612   if (Result.isConstantRange()) {
1613     const ConstantRange &CR = Result.getConstantRange();
1614     if (const APInt *SingleVal = CR.getSingleElement())
1615       return ConstantInt::get(V->getContext(), *SingleVal);
1616   }
1617   return nullptr;
1618 }
1619 
getConstantRangeOnEdge(Value * V,BasicBlock * FromBB,BasicBlock * ToBB,Instruction * CxtI)1620 ConstantRange LazyValueInfo::getConstantRangeOnEdge(Value *V,
1621                                                     BasicBlock *FromBB,
1622                                                     BasicBlock *ToBB,
1623                                                     Instruction *CxtI) {
1624   unsigned Width = V->getType()->getIntegerBitWidth();
1625   Module *M = FromBB->getModule();
1626   ValueLatticeElement Result =
1627       getImpl(PImpl, AC, M).getValueOnEdge(V, FromBB, ToBB, CxtI);
1628 
1629   if (Result.isUnknown())
1630     return ConstantRange::getEmpty(Width);
1631   if (Result.isConstantRange())
1632     return Result.getConstantRange();
1633   // We represent ConstantInt constants as constant ranges but other kinds
1634   // of integer constants, i.e. ConstantExpr will be tagged as constants
1635   assert(!(Result.isConstant() && isa<ConstantInt>(Result.getConstant())) &&
1636          "ConstantInt value must be represented as constantrange");
1637   return ConstantRange::getFull(Width);
1638 }
1639 
1640 static LazyValueInfo::Tristate
getPredicateResult(unsigned Pred,Constant * C,const ValueLatticeElement & Val,const DataLayout & DL,TargetLibraryInfo * TLI)1641 getPredicateResult(unsigned Pred, Constant *C, const ValueLatticeElement &Val,
1642                    const DataLayout &DL, TargetLibraryInfo *TLI) {
1643   // If we know the value is a constant, evaluate the conditional.
1644   Constant *Res = nullptr;
1645   if (Val.isConstant()) {
1646     Res = ConstantFoldCompareInstOperands(Pred, Val.getConstant(), C, DL, TLI);
1647     if (ConstantInt *ResCI = dyn_cast<ConstantInt>(Res))
1648       return ResCI->isZero() ? LazyValueInfo::False : LazyValueInfo::True;
1649     return LazyValueInfo::Unknown;
1650   }
1651 
1652   if (Val.isConstantRange()) {
1653     ConstantInt *CI = dyn_cast<ConstantInt>(C);
1654     if (!CI) return LazyValueInfo::Unknown;
1655 
1656     const ConstantRange &CR = Val.getConstantRange();
1657     if (Pred == ICmpInst::ICMP_EQ) {
1658       if (!CR.contains(CI->getValue()))
1659         return LazyValueInfo::False;
1660 
1661       if (CR.isSingleElement())
1662         return LazyValueInfo::True;
1663     } else if (Pred == ICmpInst::ICMP_NE) {
1664       if (!CR.contains(CI->getValue()))
1665         return LazyValueInfo::True;
1666 
1667       if (CR.isSingleElement())
1668         return LazyValueInfo::False;
1669     } else {
1670       // Handle more complex predicates.
1671       ConstantRange TrueValues = ConstantRange::makeExactICmpRegion(
1672           (ICmpInst::Predicate)Pred, CI->getValue());
1673       if (TrueValues.contains(CR))
1674         return LazyValueInfo::True;
1675       if (TrueValues.inverse().contains(CR))
1676         return LazyValueInfo::False;
1677     }
1678     return LazyValueInfo::Unknown;
1679   }
1680 
1681   if (Val.isNotConstant()) {
1682     // If this is an equality comparison, we can try to fold it knowing that
1683     // "V != C1".
1684     if (Pred == ICmpInst::ICMP_EQ) {
1685       // !C1 == C -> false iff C1 == C.
1686       Res = ConstantFoldCompareInstOperands(ICmpInst::ICMP_NE,
1687                                             Val.getNotConstant(), C, DL,
1688                                             TLI);
1689       if (Res->isNullValue())
1690         return LazyValueInfo::False;
1691     } else if (Pred == ICmpInst::ICMP_NE) {
1692       // !C1 != C -> true iff C1 == C.
1693       Res = ConstantFoldCompareInstOperands(ICmpInst::ICMP_NE,
1694                                             Val.getNotConstant(), C, DL,
1695                                             TLI);
1696       if (Res->isNullValue())
1697         return LazyValueInfo::True;
1698     }
1699     return LazyValueInfo::Unknown;
1700   }
1701 
1702   return LazyValueInfo::Unknown;
1703 }
1704 
1705 /// Determine whether the specified value comparison with a constant is known to
1706 /// be true or false on the specified CFG edge. Pred is a CmpInst predicate.
1707 LazyValueInfo::Tristate
getPredicateOnEdge(unsigned Pred,Value * V,Constant * C,BasicBlock * FromBB,BasicBlock * ToBB,Instruction * CxtI)1708 LazyValueInfo::getPredicateOnEdge(unsigned Pred, Value *V, Constant *C,
1709                                   BasicBlock *FromBB, BasicBlock *ToBB,
1710                                   Instruction *CxtI) {
1711   Module *M = FromBB->getModule();
1712   ValueLatticeElement Result =
1713       getImpl(PImpl, AC, M).getValueOnEdge(V, FromBB, ToBB, CxtI);
1714 
1715   return getPredicateResult(Pred, C, Result, M->getDataLayout(), TLI);
1716 }
1717 
1718 LazyValueInfo::Tristate
getPredicateAt(unsigned Pred,Value * V,Constant * C,Instruction * CxtI,bool UseBlockValue)1719 LazyValueInfo::getPredicateAt(unsigned Pred, Value *V, Constant *C,
1720                               Instruction *CxtI, bool UseBlockValue) {
1721   // Is or is not NonNull are common predicates being queried. If
1722   // isKnownNonZero can tell us the result of the predicate, we can
1723   // return it quickly. But this is only a fastpath, and falling
1724   // through would still be correct.
1725   Module *M = CxtI->getModule();
1726   const DataLayout &DL = M->getDataLayout();
1727   if (V->getType()->isPointerTy() && C->isNullValue() &&
1728       isKnownNonZero(V->stripPointerCastsSameRepresentation(), DL)) {
1729     if (Pred == ICmpInst::ICMP_EQ)
1730       return LazyValueInfo::False;
1731     else if (Pred == ICmpInst::ICMP_NE)
1732       return LazyValueInfo::True;
1733   }
1734 
1735   ValueLatticeElement Result = UseBlockValue
1736       ? getImpl(PImpl, AC, M).getValueInBlock(V, CxtI->getParent(), CxtI)
1737       : getImpl(PImpl, AC, M).getValueAt(V, CxtI);
1738   Tristate Ret = getPredicateResult(Pred, C, Result, DL, TLI);
1739   if (Ret != Unknown)
1740     return Ret;
1741 
1742   // Note: The following bit of code is somewhat distinct from the rest of LVI;
1743   // LVI as a whole tries to compute a lattice value which is conservatively
1744   // correct at a given location.  In this case, we have a predicate which we
1745   // weren't able to prove about the merged result, and we're pushing that
1746   // predicate back along each incoming edge to see if we can prove it
1747   // separately for each input.  As a motivating example, consider:
1748   // bb1:
1749   //   %v1 = ... ; constantrange<1, 5>
1750   //   br label %merge
1751   // bb2:
1752   //   %v2 = ... ; constantrange<10, 20>
1753   //   br label %merge
1754   // merge:
1755   //   %phi = phi [%v1, %v2] ; constantrange<1,20>
1756   //   %pred = icmp eq i32 %phi, 8
1757   // We can't tell from the lattice value for '%phi' that '%pred' is false
1758   // along each path, but by checking the predicate over each input separately,
1759   // we can.
1760   // We limit the search to one step backwards from the current BB and value.
1761   // We could consider extending this to search further backwards through the
1762   // CFG and/or value graph, but there are non-obvious compile time vs quality
1763   // tradeoffs.
1764   if (CxtI) {
1765     BasicBlock *BB = CxtI->getParent();
1766 
1767     // Function entry or an unreachable block.  Bail to avoid confusing
1768     // analysis below.
1769     pred_iterator PI = pred_begin(BB), PE = pred_end(BB);
1770     if (PI == PE)
1771       return Unknown;
1772 
1773     // If V is a PHI node in the same block as the context, we need to ask
1774     // questions about the predicate as applied to the incoming value along
1775     // each edge. This is useful for eliminating cases where the predicate is
1776     // known along all incoming edges.
1777     if (auto *PHI = dyn_cast<PHINode>(V))
1778       if (PHI->getParent() == BB) {
1779         Tristate Baseline = Unknown;
1780         for (unsigned i = 0, e = PHI->getNumIncomingValues(); i < e; i++) {
1781           Value *Incoming = PHI->getIncomingValue(i);
1782           BasicBlock *PredBB = PHI->getIncomingBlock(i);
1783           // Note that PredBB may be BB itself.
1784           Tristate Result = getPredicateOnEdge(Pred, Incoming, C, PredBB, BB,
1785                                                CxtI);
1786 
1787           // Keep going as long as we've seen a consistent known result for
1788           // all inputs.
1789           Baseline = (i == 0) ? Result /* First iteration */
1790             : (Baseline == Result ? Baseline : Unknown); /* All others */
1791           if (Baseline == Unknown)
1792             break;
1793         }
1794         if (Baseline != Unknown)
1795           return Baseline;
1796       }
1797 
1798     // For a comparison where the V is outside this block, it's possible
1799     // that we've branched on it before. Look to see if the value is known
1800     // on all incoming edges.
1801     if (!isa<Instruction>(V) ||
1802         cast<Instruction>(V)->getParent() != BB) {
1803       // For predecessor edge, determine if the comparison is true or false
1804       // on that edge. If they're all true or all false, we can conclude
1805       // the value of the comparison in this block.
1806       Tristate Baseline = getPredicateOnEdge(Pred, V, C, *PI, BB, CxtI);
1807       if (Baseline != Unknown) {
1808         // Check that all remaining incoming values match the first one.
1809         while (++PI != PE) {
1810           Tristate Ret = getPredicateOnEdge(Pred, V, C, *PI, BB, CxtI);
1811           if (Ret != Baseline) break;
1812         }
1813         // If we terminated early, then one of the values didn't match.
1814         if (PI == PE) {
1815           return Baseline;
1816         }
1817       }
1818     }
1819   }
1820   return Unknown;
1821 }
1822 
getPredicateAt(unsigned P,Value * LHS,Value * RHS,Instruction * CxtI,bool UseBlockValue)1823 LazyValueInfo::Tristate LazyValueInfo::getPredicateAt(unsigned P, Value *LHS,
1824                                                       Value *RHS,
1825                                                       Instruction *CxtI,
1826                                                       bool UseBlockValue) {
1827   CmpInst::Predicate Pred = (CmpInst::Predicate)P;
1828 
1829   if (auto *C = dyn_cast<Constant>(RHS))
1830     return getPredicateAt(P, LHS, C, CxtI, UseBlockValue);
1831   if (auto *C = dyn_cast<Constant>(LHS))
1832     return getPredicateAt(CmpInst::getSwappedPredicate(Pred), RHS, C, CxtI,
1833                           UseBlockValue);
1834 
1835   // Got two non-Constant values. While we could handle them somewhat,
1836   // by getting their constant ranges, and applying ConstantRange::icmp(),
1837   // so far it did not appear to be profitable.
1838   return LazyValueInfo::Unknown;
1839 }
1840 
threadEdge(BasicBlock * PredBB,BasicBlock * OldSucc,BasicBlock * NewSucc)1841 void LazyValueInfo::threadEdge(BasicBlock *PredBB, BasicBlock *OldSucc,
1842                                BasicBlock *NewSucc) {
1843   if (PImpl) {
1844     getImpl(PImpl, AC, PredBB->getModule())
1845         .threadEdge(PredBB, OldSucc, NewSucc);
1846   }
1847 }
1848 
eraseBlock(BasicBlock * BB)1849 void LazyValueInfo::eraseBlock(BasicBlock *BB) {
1850   if (PImpl) {
1851     getImpl(PImpl, AC, BB->getModule()).eraseBlock(BB);
1852   }
1853 }
1854 
1855 
printLVI(Function & F,DominatorTree & DTree,raw_ostream & OS)1856 void LazyValueInfo::printLVI(Function &F, DominatorTree &DTree, raw_ostream &OS) {
1857   if (PImpl) {
1858     getImpl(PImpl, AC, F.getParent()).printLVI(F, DTree, OS);
1859   }
1860 }
1861 
1862 // Print the LVI for the function arguments at the start of each basic block.
emitBasicBlockStartAnnot(const BasicBlock * BB,formatted_raw_ostream & OS)1863 void LazyValueInfoAnnotatedWriter::emitBasicBlockStartAnnot(
1864     const BasicBlock *BB, formatted_raw_ostream &OS) {
1865   // Find if there are latticevalues defined for arguments of the function.
1866   auto *F = BB->getParent();
1867   for (auto &Arg : F->args()) {
1868     ValueLatticeElement Result = LVIImpl->getValueInBlock(
1869         const_cast<Argument *>(&Arg), const_cast<BasicBlock *>(BB));
1870     if (Result.isUnknown())
1871       continue;
1872     OS << "; LatticeVal for: '" << Arg << "' is: " << Result << "\n";
1873   }
1874 }
1875 
1876 // This function prints the LVI analysis for the instruction I at the beginning
1877 // of various basic blocks. It relies on calculated values that are stored in
1878 // the LazyValueInfoCache, and in the absence of cached values, recalculate the
1879 // LazyValueInfo for `I`, and print that info.
emitInstructionAnnot(const Instruction * I,formatted_raw_ostream & OS)1880 void LazyValueInfoAnnotatedWriter::emitInstructionAnnot(
1881     const Instruction *I, formatted_raw_ostream &OS) {
1882 
1883   auto *ParentBB = I->getParent();
1884   SmallPtrSet<const BasicBlock*, 16> BlocksContainingLVI;
1885   // We can generate (solve) LVI values only for blocks that are dominated by
1886   // the I's parent. However, to avoid generating LVI for all dominating blocks,
1887   // that contain redundant/uninteresting information, we print LVI for
1888   // blocks that may use this LVI information (such as immediate successor
1889   // blocks, and blocks that contain uses of `I`).
1890   auto printResult = [&](const BasicBlock *BB) {
1891     if (!BlocksContainingLVI.insert(BB).second)
1892       return;
1893     ValueLatticeElement Result = LVIImpl->getValueInBlock(
1894         const_cast<Instruction *>(I), const_cast<BasicBlock *>(BB));
1895       OS << "; LatticeVal for: '" << *I << "' in BB: '";
1896       BB->printAsOperand(OS, false);
1897       OS << "' is: " << Result << "\n";
1898   };
1899 
1900   printResult(ParentBB);
1901   // Print the LVI analysis results for the immediate successor blocks, that
1902   // are dominated by `ParentBB`.
1903   for (auto *BBSucc : successors(ParentBB))
1904     if (DT.dominates(ParentBB, BBSucc))
1905       printResult(BBSucc);
1906 
1907   // Print LVI in blocks where `I` is used.
1908   for (auto *U : I->users())
1909     if (auto *UseI = dyn_cast<Instruction>(U))
1910       if (!isa<PHINode>(UseI) || DT.dominates(ParentBB, UseI->getParent()))
1911         printResult(UseI->getParent());
1912 
1913 }
1914 
1915 namespace {
1916 // Printer class for LazyValueInfo results.
1917 class LazyValueInfoPrinter : public FunctionPass {
1918 public:
1919   static char ID; // Pass identification, replacement for typeid
LazyValueInfoPrinter()1920   LazyValueInfoPrinter() : FunctionPass(ID) {
1921     initializeLazyValueInfoPrinterPass(*PassRegistry::getPassRegistry());
1922   }
1923 
getAnalysisUsage(AnalysisUsage & AU) const1924   void getAnalysisUsage(AnalysisUsage &AU) const override {
1925     AU.setPreservesAll();
1926     AU.addRequired<LazyValueInfoWrapperPass>();
1927     AU.addRequired<DominatorTreeWrapperPass>();
1928   }
1929 
1930   // Get the mandatory dominator tree analysis and pass this in to the
1931   // LVIPrinter. We cannot rely on the LVI's DT, since it's optional.
runOnFunction(Function & F)1932   bool runOnFunction(Function &F) override {
1933     dbgs() << "LVI for function '" << F.getName() << "':\n";
1934     auto &LVI = getAnalysis<LazyValueInfoWrapperPass>().getLVI();
1935     auto &DTree = getAnalysis<DominatorTreeWrapperPass>().getDomTree();
1936     LVI.printLVI(F, DTree, dbgs());
1937     return false;
1938   }
1939 };
1940 }
1941 
1942 char LazyValueInfoPrinter::ID = 0;
1943 INITIALIZE_PASS_BEGIN(LazyValueInfoPrinter, "print-lazy-value-info",
1944                 "Lazy Value Info Printer Pass", false, false)
1945 INITIALIZE_PASS_DEPENDENCY(LazyValueInfoWrapperPass)
1946 INITIALIZE_PASS_END(LazyValueInfoPrinter, "print-lazy-value-info",
1947                 "Lazy Value Info Printer Pass", false, false)
1948