13b11a16aSHongbin Zheng //===--- BlockGenerators.cpp - Generate code for statements -----*- C++ -*-===// 23b11a16aSHongbin Zheng // 33b11a16aSHongbin Zheng // The LLVM Compiler Infrastructure 43b11a16aSHongbin Zheng // 53b11a16aSHongbin Zheng // This file is distributed under the University of Illinois Open Source 63b11a16aSHongbin Zheng // License. See LICENSE.TXT for details. 73b11a16aSHongbin Zheng // 83b11a16aSHongbin Zheng //===----------------------------------------------------------------------===// 93b11a16aSHongbin Zheng // 103b11a16aSHongbin Zheng // This file implements the BlockGenerator and VectorBlockGenerator classes, 113b11a16aSHongbin Zheng // which generate sequential code and vectorized code for a polyhedral 123b11a16aSHongbin Zheng // statement, respectively. 133b11a16aSHongbin Zheng // 143b11a16aSHongbin Zheng //===----------------------------------------------------------------------===// 153b11a16aSHongbin Zheng 163b11a16aSHongbin Zheng #include "polly/ScopInfo.h" 178a846610SHongbin Zheng #include "polly/CodeGen/BlockGenerators.h" 1883628182STobias Grosser #include "polly/CodeGen/CodeGeneration.h" 19a63b2579SJohannes Doerfert #include "polly/CodeGen/IslExprBuilder.h" 20637bd631STobias Grosser #include "polly/Options.h" 213b11a16aSHongbin Zheng #include "polly/Support/GICHelper.h" 2297cb813cSSebastian Pop #include "polly/Support/SCEVValidator.h" 23ecfe21b7STobias Grosser #include "polly/Support/ScopHelper.h" 24e71c6ab5STobias Grosser #include "llvm/Analysis/LoopInfo.h" 25f32d651dSJohannes Doerfert #include "llvm/Analysis/RegionInfo.h" 26e71c6ab5STobias Grosser #include "llvm/Analysis/ScalarEvolution.h" 27e71c6ab5STobias Grosser #include "llvm/Analysis/ScalarEvolutionExpander.h" 28030237d0STobias Grosser #include "llvm/IR/IntrinsicInst.h" 29c9895067STobias Grosser #include "llvm/IR/Module.h" 303b11a16aSHongbin Zheng #include "llvm/Transforms/Utils/BasicBlockUtils.h" 31f32d651dSJohannes Doerfert #include "isl/aff.h" 32f32d651dSJohannes Doerfert #include "isl/ast.h" 33f32d651dSJohannes Doerfert #include "isl/ast_build.h" 34ba0d0922STobias Grosser #include "isl/set.h" 35f32d651dSJohannes Doerfert #include <deque> 36f32d651dSJohannes Doerfert 373b11a16aSHongbin Zheng using namespace llvm; 383b11a16aSHongbin Zheng using namespace polly; 393b11a16aSHongbin Zheng 40878aba49STobias Grosser static cl::opt<bool> Aligned("enable-polly-aligned", 41878aba49STobias Grosser cl::desc("Assumed aligned memory accesses."), 42878aba49STobias Grosser cl::Hidden, cl::init(false), cl::ZeroOrMore, 43878aba49STobias Grosser cl::cat(PollyCategory)); 443b11a16aSHongbin Zheng 45dcc3b435STobias Grosser bool polly::canSynthesize(const Value *V, const llvm::LoopInfo *LI, 46ecfe21b7STobias Grosser ScalarEvolution *SE, const Region *R) { 47dcc3b435STobias Grosser if (!V || !SE->isSCEVable(V->getType())) 48ecfe21b7STobias Grosser return false; 49ecfe21b7STobias Grosser 50dcc3b435STobias Grosser if (const SCEV *Scev = SE->getSCEV(const_cast<Value *>(V))) 51ecfe21b7STobias Grosser if (!isa<SCEVCouldNotCompute>(Scev)) 52ecfe21b7STobias Grosser if (!hasScalarDepsInsideRegion(Scev, R)) 53ecfe21b7STobias Grosser return true; 54ecfe21b7STobias Grosser 55ecfe21b7STobias Grosser return false; 56ecfe21b7STobias Grosser } 57ecfe21b7STobias Grosser 589e3a5db0SJohannes Doerfert bool polly::isIgnoredIntrinsic(const Value *V) { 599e3a5db0SJohannes Doerfert if (auto *IT = dyn_cast<IntrinsicInst>(V)) { 609e3a5db0SJohannes Doerfert switch (IT->getIntrinsicID()) { 619e3a5db0SJohannes Doerfert // Lifetime markers are supported/ignored. 629e3a5db0SJohannes Doerfert case llvm::Intrinsic::lifetime_start: 639e3a5db0SJohannes Doerfert case llvm::Intrinsic::lifetime_end: 649e3a5db0SJohannes Doerfert // Invariant markers are supported/ignored. 659e3a5db0SJohannes Doerfert case llvm::Intrinsic::invariant_start: 669e3a5db0SJohannes Doerfert case llvm::Intrinsic::invariant_end: 679e3a5db0SJohannes Doerfert // Some misc annotations are supported/ignored. 689e3a5db0SJohannes Doerfert case llvm::Intrinsic::var_annotation: 699e3a5db0SJohannes Doerfert case llvm::Intrinsic::ptr_annotation: 709e3a5db0SJohannes Doerfert case llvm::Intrinsic::annotation: 719e3a5db0SJohannes Doerfert case llvm::Intrinsic::donothing: 729e3a5db0SJohannes Doerfert case llvm::Intrinsic::assume: 739e3a5db0SJohannes Doerfert case llvm::Intrinsic::expect: 749e3a5db0SJohannes Doerfert return true; 759e3a5db0SJohannes Doerfert default: 769e3a5db0SJohannes Doerfert break; 779e3a5db0SJohannes Doerfert } 789e3a5db0SJohannes Doerfert } 799e3a5db0SJohannes Doerfert return false; 809e3a5db0SJohannes Doerfert } 819e3a5db0SJohannes Doerfert 82b4f08eb6SJohannes Doerfert BlockGenerator::BlockGenerator(PollyIRBuilder &B, LoopInfo &LI, 83b4f08eb6SJohannes Doerfert ScalarEvolution &SE, DominatorTree &DT, 84ecff11dcSJohannes Doerfert ScalarAllocaMapTy &ScalarMap, 85ecff11dcSJohannes Doerfert ScalarAllocaMapTy &PHIOpMap, 86ecff11dcSJohannes Doerfert EscapeUsersAllocaMapTy &EscapeMap, 87b4f08eb6SJohannes Doerfert IslExprBuilder *ExprBuilder) 88ecff11dcSJohannes Doerfert : Builder(B), LI(LI), SE(SE), ExprBuilder(ExprBuilder), DT(DT), 89ecff11dcSJohannes Doerfert EntryBB(nullptr), PHIOpMap(PHIOpMap), ScalarMap(ScalarMap), 90ecff11dcSJohannes Doerfert EscapeMap(EscapeMap) {} 91e71c6ab5STobias Grosser 92be9c9117SJohannes Doerfert Value *BlockGenerator::getNewValue(ScopStmt &Stmt, const Value *Old, 93be9c9117SJohannes Doerfert ValueMapT &BBMap, ValueMapT &GlobalMap, 94be9c9117SJohannes Doerfert LoopToScevMapT <S, Loop *L) const { 953b11a16aSHongbin Zheng // We assume constants never change. 963b11a16aSHongbin Zheng // This avoids map lookups for many calls to this function. 973b11a16aSHongbin Zheng if (isa<Constant>(Old)) 983b11a16aSHongbin Zheng return const_cast<Value *>(Old); 993b11a16aSHongbin Zheng 100fe11e287SHongbin Zheng if (Value *New = GlobalMap.lookup(Old)) { 101c14582f2STobias Grosser if (Old->getType()->getScalarSizeInBits() < 102c14582f2STobias Grosser New->getType()->getScalarSizeInBits()) 1033b11a16aSHongbin Zheng New = Builder.CreateTruncOrBitCast(New, Old->getType()); 1043b11a16aSHongbin Zheng 1053b11a16aSHongbin Zheng return New; 1063b11a16aSHongbin Zheng } 1073b11a16aSHongbin Zheng 108fe11e287SHongbin Zheng if (Value *New = BBMap.lookup(Old)) 109fe11e287SHongbin Zheng return New; 1103b11a16aSHongbin Zheng 111683b8e44STobias Grosser if (SE.isSCEVable(Old->getType())) 112369430ffSTobias Grosser if (const SCEV *Scev = SE.getSCEVAtScope(const_cast<Value *>(Old), L)) { 113e71c6ab5STobias Grosser if (!isa<SCEVCouldNotCompute>(Scev)) { 114637b23dcSSebastian Pop const SCEV *NewScev = apply(Scev, LTS, SE); 115637b23dcSSebastian Pop ValueToValueMap VTV; 116637b23dcSSebastian Pop VTV.insert(BBMap.begin(), BBMap.end()); 117637b23dcSSebastian Pop VTV.insert(GlobalMap.begin(), GlobalMap.end()); 11847d4ee3eSSebastian Pop NewScev = SCEVParameterRewriter::rewrite(NewScev, SE, VTV); 119c9895067STobias Grosser SCEVExpander Expander(SE, Stmt.getParent() 120c9895067STobias Grosser ->getRegion() 121c9895067STobias Grosser .getEntry() 122c9895067STobias Grosser ->getParent() 123c9895067STobias Grosser ->getParent() 124c9895067STobias Grosser ->getDataLayout(), 125c9895067STobias Grosser "polly"); 12645e7944bSTobias Grosser assert(Builder.GetInsertPoint() != Builder.GetInsertBlock()->end() && 12745e7944bSTobias Grosser "Only instructions can be insert points for SCEVExpander"); 128e71c6ab5STobias Grosser Value *Expanded = Expander.expandCodeFor(NewScev, Old->getType(), 129e71c6ab5STobias Grosser Builder.GetInsertPoint()); 130e71c6ab5STobias Grosser 131e71c6ab5STobias Grosser BBMap[Old] = Expanded; 132e71c6ab5STobias Grosser return Expanded; 133e71c6ab5STobias Grosser } 134369430ffSTobias Grosser } 135e71c6ab5STobias Grosser 13616371acdSTobias Grosser // A scop-constant value defined by a global or a function parameter. 13716371acdSTobias Grosser if (isa<GlobalValue>(Old) || isa<Argument>(Old)) 13816371acdSTobias Grosser return const_cast<Value *>(Old); 13916371acdSTobias Grosser 14016371acdSTobias Grosser // A scop-constant value defined by an instruction executed outside the scop. 14116371acdSTobias Grosser if (const Instruction *Inst = dyn_cast<Instruction>(Old)) 142be9c9117SJohannes Doerfert if (!Stmt.getParent()->getRegion().contains(Inst->getParent())) 14316371acdSTobias Grosser return const_cast<Value *>(Old); 14416371acdSTobias Grosser 14516371acdSTobias Grosser // The scalar dependence is neither available nor SCEVCodegenable. 1465b463ceaSHongbin Zheng llvm_unreachable("Unexpected scalar dependence in region!"); 1475a56cbf4STobias Grosser return nullptr; 1483b11a16aSHongbin Zheng } 1493b11a16aSHongbin Zheng 150be9c9117SJohannes Doerfert void BlockGenerator::copyInstScalar(ScopStmt &Stmt, const Instruction *Inst, 151be9c9117SJohannes Doerfert ValueMapT &BBMap, ValueMapT &GlobalMap, 152be9c9117SJohannes Doerfert LoopToScevMapT <S) { 153030237d0STobias Grosser // We do not generate debug intrinsics as we did not investigate how to 154030237d0STobias Grosser // copy them correctly. At the current state, they just crash the code 155030237d0STobias Grosser // generation as the meta-data operands are not correctly copied. 156030237d0STobias Grosser if (isa<DbgInfoIntrinsic>(Inst)) 157030237d0STobias Grosser return; 158030237d0STobias Grosser 1593b11a16aSHongbin Zheng Instruction *NewInst = Inst->clone(); 1603b11a16aSHongbin Zheng 1613b11a16aSHongbin Zheng // Replace old operands with the new ones. 16291f5b262STobias Grosser for (Value *OldOperand : Inst->operands()) { 163be9c9117SJohannes Doerfert Value *NewOperand = getNewValue(Stmt, OldOperand, BBMap, GlobalMap, LTS, 164be9c9117SJohannes Doerfert getLoopForInst(Inst)); 1653b11a16aSHongbin Zheng 1663b11a16aSHongbin Zheng if (!NewOperand) { 167c14582f2STobias Grosser assert(!isa<StoreInst>(NewInst) && 168c14582f2STobias Grosser "Store instructions are always needed!"); 1693b11a16aSHongbin Zheng delete NewInst; 1703b11a16aSHongbin Zheng return; 1713b11a16aSHongbin Zheng } 1723b11a16aSHongbin Zheng 1733b11a16aSHongbin Zheng NewInst->replaceUsesOfWith(OldOperand, NewOperand); 1743b11a16aSHongbin Zheng } 1753b11a16aSHongbin Zheng 1763b11a16aSHongbin Zheng Builder.Insert(NewInst); 1773b11a16aSHongbin Zheng BBMap[Inst] = NewInst; 1783b11a16aSHongbin Zheng 1793b11a16aSHongbin Zheng if (!NewInst->getType()->isVoidTy()) 1803b11a16aSHongbin Zheng NewInst->setName("p_" + Inst->getName()); 1813b11a16aSHongbin Zheng } 1823b11a16aSHongbin Zheng 183be9c9117SJohannes Doerfert Value *BlockGenerator::getNewAccessOperand(ScopStmt &Stmt, 184be9c9117SJohannes Doerfert const MemoryAccess &MA) { 185a99130f0SJohannes Doerfert isl_pw_multi_aff *PWAccRel; 186a99130f0SJohannes Doerfert isl_union_map *Schedule; 187a63b2579SJohannes Doerfert isl_ast_expr *Expr; 188be9c9117SJohannes Doerfert isl_ast_build *Build = Stmt.getAstBuild(); 1893b11a16aSHongbin Zheng 190a63b2579SJohannes Doerfert assert(ExprBuilder && Build && 191a63b2579SJohannes Doerfert "Cannot generate new value without IslExprBuilder!"); 1923b11a16aSHongbin Zheng 193a99130f0SJohannes Doerfert Schedule = isl_ast_build_get_schedule(Build); 194a99130f0SJohannes Doerfert PWAccRel = MA.applyScheduleToAccessRelation(Schedule); 1953b11a16aSHongbin Zheng 196a63b2579SJohannes Doerfert Expr = isl_ast_build_access_from_pw_multi_aff(Build, PWAccRel); 197dcb5f1dcSJohannes Doerfert Expr = isl_ast_expr_address_of(Expr); 198a63b2579SJohannes Doerfert 199a63b2579SJohannes Doerfert return ExprBuilder->create(Expr); 2003b11a16aSHongbin Zheng } 2013b11a16aSHongbin Zheng 202be9c9117SJohannes Doerfert Value *BlockGenerator::generateLocationAccessed( 203be9c9117SJohannes Doerfert ScopStmt &Stmt, const Instruction *Inst, const Value *Pointer, 204be9c9117SJohannes Doerfert ValueMapT &BBMap, ValueMapT &GlobalMap, LoopToScevMapT <S) { 205be9c9117SJohannes Doerfert const MemoryAccess &MA = Stmt.getAccessFor(Inst); 2063b11a16aSHongbin Zheng 2073b11a16aSHongbin Zheng Value *NewPointer; 208a99130f0SJohannes Doerfert if (MA.hasNewAccessRelation()) 209be9c9117SJohannes Doerfert NewPointer = getNewAccessOperand(Stmt, MA); 210a63b2579SJohannes Doerfert else 211369430ffSTobias Grosser NewPointer = 212be9c9117SJohannes Doerfert getNewValue(Stmt, Pointer, BBMap, GlobalMap, LTS, getLoopForInst(Inst)); 2133b11a16aSHongbin Zheng 2143b11a16aSHongbin Zheng return NewPointer; 2153b11a16aSHongbin Zheng } 2163b11a16aSHongbin Zheng 2174d96c8d7STobias Grosser Loop *BlockGenerator::getLoopForInst(const llvm::Instruction *Inst) { 2182ef3f4fdSJohannes Doerfert return LI.getLoopFor(Inst->getParent()); 219369430ffSTobias Grosser } 220369430ffSTobias Grosser 221be9c9117SJohannes Doerfert Value *BlockGenerator::generateScalarLoad(ScopStmt &Stmt, const LoadInst *Load, 222e602a076STobias Grosser ValueMapT &BBMap, 223e602a076STobias Grosser ValueMapT &GlobalMap, 224e602a076STobias Grosser LoopToScevMapT <S) { 2253b11a16aSHongbin Zheng const Value *Pointer = Load->getPointerOperand(); 2267242ad92STobias Grosser Value *NewPointer = 227be9c9117SJohannes Doerfert generateLocationAccessed(Stmt, Load, Pointer, BBMap, GlobalMap, LTS); 22887901453SJohannes Doerfert Value *ScalarLoad = Builder.CreateAlignedLoad( 22987901453SJohannes Doerfert NewPointer, Load->getAlignment(), Load->getName() + "_p_scalar_"); 2303b11a16aSHongbin Zheng return ScalarLoad; 2313b11a16aSHongbin Zheng } 2323b11a16aSHongbin Zheng 233be9c9117SJohannes Doerfert Value *BlockGenerator::generateScalarStore(ScopStmt &Stmt, 234be9c9117SJohannes Doerfert const StoreInst *Store, 235e602a076STobias Grosser ValueMapT &BBMap, 236e602a076STobias Grosser ValueMapT &GlobalMap, 237e602a076STobias Grosser LoopToScevMapT <S) { 2383b11a16aSHongbin Zheng const Value *Pointer = Store->getPointerOperand(); 239c14582f2STobias Grosser Value *NewPointer = 240be9c9117SJohannes Doerfert generateLocationAccessed(Stmt, Store, Pointer, BBMap, GlobalMap, LTS); 241be9c9117SJohannes Doerfert Value *ValueOperand = getNewValue(Stmt, Store->getValueOperand(), BBMap, 242be9c9117SJohannes Doerfert GlobalMap, LTS, getLoopForInst(Store)); 2433b11a16aSHongbin Zheng 24487901453SJohannes Doerfert Value *NewStore = Builder.CreateAlignedStore(ValueOperand, NewPointer, 24587901453SJohannes Doerfert Store->getAlignment()); 24687901453SJohannes Doerfert return NewStore; 2473b11a16aSHongbin Zheng } 2483b11a16aSHongbin Zheng 249be9c9117SJohannes Doerfert void BlockGenerator::copyInstruction(ScopStmt &Stmt, const Instruction *Inst, 250be9c9117SJohannes Doerfert ValueMapT &BBMap, ValueMapT &GlobalMap, 251e602a076STobias Grosser LoopToScevMapT <S) { 252ecff11dcSJohannes Doerfert 253ecff11dcSJohannes Doerfert // First check for possible scalar dependences for this instruction. 254ecff11dcSJohannes Doerfert generateScalarLoads(Stmt, Inst, BBMap); 255ecff11dcSJohannes Doerfert 2563b11a16aSHongbin Zheng // Terminator instructions control the control flow. They are explicitly 2573b11a16aSHongbin Zheng // expressed in the clast and do not need to be copied. 2583b11a16aSHongbin Zheng if (Inst->isTerminator()) 2593b11a16aSHongbin Zheng return; 2603b11a16aSHongbin Zheng 261ecff11dcSJohannes Doerfert Loop *L = getLoopForInst(Inst); 262ecff11dcSJohannes Doerfert if ((Stmt.isBlockStmt() || !Stmt.getRegion()->contains(L)) && 263ecff11dcSJohannes Doerfert canSynthesize(Inst, &LI, &SE, &Stmt.getParent()->getRegion())) { 264ecff11dcSJohannes Doerfert Value *NewValue = getNewValue(Stmt, Inst, BBMap, GlobalMap, LTS, L); 265ecff11dcSJohannes Doerfert BBMap[Inst] = NewValue; 266e71c6ab5STobias Grosser return; 267ecff11dcSJohannes Doerfert } 268e71c6ab5STobias Grosser 2693b11a16aSHongbin Zheng if (const LoadInst *Load = dyn_cast<LoadInst>(Inst)) { 270be9c9117SJohannes Doerfert Value *NewLoad = generateScalarLoad(Stmt, Load, BBMap, GlobalMap, LTS); 2713d94fedfSSebastian Pop // Compute NewLoad before its insertion in BBMap to make the insertion 2723d94fedfSSebastian Pop // deterministic. 273753d43f9SSebastian Pop BBMap[Load] = NewLoad; 2743b11a16aSHongbin Zheng return; 2753b11a16aSHongbin Zheng } 2763b11a16aSHongbin Zheng 2773b11a16aSHongbin Zheng if (const StoreInst *Store = dyn_cast<StoreInst>(Inst)) { 278be9c9117SJohannes Doerfert Value *NewStore = generateScalarStore(Stmt, Store, BBMap, GlobalMap, LTS); 2793d94fedfSSebastian Pop // Compute NewStore before its insertion in BBMap to make the insertion 2803d94fedfSSebastian Pop // deterministic. 281753d43f9SSebastian Pop BBMap[Store] = NewStore; 2823b11a16aSHongbin Zheng return; 2833b11a16aSHongbin Zheng } 2843b11a16aSHongbin Zheng 285ecff11dcSJohannes Doerfert if (const PHINode *PHI = dyn_cast<PHINode>(Inst)) { 286ecff11dcSJohannes Doerfert copyPHIInstruction(Stmt, PHI, BBMap, GlobalMap, LTS); 287ecff11dcSJohannes Doerfert return; 288ecff11dcSJohannes Doerfert } 289ecff11dcSJohannes Doerfert 2903f500fa2SJohannes Doerfert // Skip some special intrinsics for which we do not adjust the semantics to 2913f500fa2SJohannes Doerfert // the new schedule. All others are handled like every other instruction. 2923f500fa2SJohannes Doerfert if (auto *IT = dyn_cast<IntrinsicInst>(Inst)) { 2933f500fa2SJohannes Doerfert switch (IT->getIntrinsicID()) { 2943f500fa2SJohannes Doerfert // Lifetime markers are ignored. 2953f500fa2SJohannes Doerfert case llvm::Intrinsic::lifetime_start: 2963f500fa2SJohannes Doerfert case llvm::Intrinsic::lifetime_end: 2973f500fa2SJohannes Doerfert // Invariant markers are ignored. 2983f500fa2SJohannes Doerfert case llvm::Intrinsic::invariant_start: 2993f500fa2SJohannes Doerfert case llvm::Intrinsic::invariant_end: 3003f500fa2SJohannes Doerfert // Some misc annotations are ignored. 3013f500fa2SJohannes Doerfert case llvm::Intrinsic::var_annotation: 3023f500fa2SJohannes Doerfert case llvm::Intrinsic::ptr_annotation: 3033f500fa2SJohannes Doerfert case llvm::Intrinsic::annotation: 3043f500fa2SJohannes Doerfert case llvm::Intrinsic::donothing: 3053f500fa2SJohannes Doerfert case llvm::Intrinsic::assume: 3063f500fa2SJohannes Doerfert case llvm::Intrinsic::expect: 3073f500fa2SJohannes Doerfert return; 3083f500fa2SJohannes Doerfert default: 3093f500fa2SJohannes Doerfert // Other intrinsics are copied. 3103f500fa2SJohannes Doerfert break; 3113f500fa2SJohannes Doerfert } 3123f500fa2SJohannes Doerfert } 3133f500fa2SJohannes Doerfert 314be9c9117SJohannes Doerfert copyInstScalar(Stmt, Inst, BBMap, GlobalMap, LTS); 3153b11a16aSHongbin Zheng } 3163b11a16aSHongbin Zheng 317275a1756SJohannes Doerfert void BlockGenerator::copyStmt(ScopStmt &Stmt, ValueMapT &GlobalMap, 318be9c9117SJohannes Doerfert LoopToScevMapT <S) { 319275a1756SJohannes Doerfert assert(Stmt.isBlockStmt() && 320275a1756SJohannes Doerfert "Only block statements can be copied by the block generator"); 321275a1756SJohannes Doerfert 322275a1756SJohannes Doerfert ValueMapT BBMap; 323275a1756SJohannes Doerfert 324be9c9117SJohannes Doerfert BasicBlock *BB = Stmt.getBasicBlock(); 325275a1756SJohannes Doerfert copyBB(Stmt, BB, BBMap, GlobalMap, LTS); 326275a1756SJohannes Doerfert } 327275a1756SJohannes Doerfert 328514f6efaSJohannes Doerfert BasicBlock *BlockGenerator::splitBB(BasicBlock *BB) { 329c14582f2STobias Grosser BasicBlock *CopyBB = 330b4f08eb6SJohannes Doerfert SplitBlock(Builder.GetInsertBlock(), Builder.GetInsertPoint(), &DT, &LI); 3313b11a16aSHongbin Zheng CopyBB->setName("polly.stmt." + BB->getName()); 332514f6efaSJohannes Doerfert return CopyBB; 333514f6efaSJohannes Doerfert } 3343b11a16aSHongbin Zheng 335514f6efaSJohannes Doerfert BasicBlock *BlockGenerator::copyBB(ScopStmt &Stmt, BasicBlock *BB, 336514f6efaSJohannes Doerfert ValueMapT &BBMap, ValueMapT &GlobalMap, 337514f6efaSJohannes Doerfert LoopToScevMapT <S) { 338514f6efaSJohannes Doerfert BasicBlock *CopyBB = splitBB(BB); 339514f6efaSJohannes Doerfert copyBB(Stmt, BB, CopyBB, BBMap, GlobalMap, LTS); 340514f6efaSJohannes Doerfert return CopyBB; 341514f6efaSJohannes Doerfert } 342514f6efaSJohannes Doerfert 343514f6efaSJohannes Doerfert void BlockGenerator::copyBB(ScopStmt &Stmt, BasicBlock *BB, BasicBlock *CopyBB, 344514f6efaSJohannes Doerfert ValueMapT &BBMap, ValueMapT &GlobalMap, 345514f6efaSJohannes Doerfert LoopToScevMapT <S) { 346514f6efaSJohannes Doerfert Builder.SetInsertPoint(CopyBB->begin()); 347ecff11dcSJohannes Doerfert EntryBB = &CopyBB->getParent()->getEntryBlock(); 348ecff11dcSJohannes Doerfert 34991f5b262STobias Grosser for (Instruction &Inst : *BB) 350be9c9117SJohannes Doerfert copyInstruction(Stmt, &Inst, BBMap, GlobalMap, LTS); 351ecff11dcSJohannes Doerfert 352ecff11dcSJohannes Doerfert // After a basic block was copied store all scalars that escape this block 353ecff11dcSJohannes Doerfert // in their alloca. First the scalars that have dependences inside the SCoP, 354ecff11dcSJohannes Doerfert // then the ones that might escape the SCoP. 355ecff11dcSJohannes Doerfert generateScalarStores(Stmt, BB, BBMap, GlobalMap); 356ecff11dcSJohannes Doerfert 357ecff11dcSJohannes Doerfert const Region &R = Stmt.getParent()->getRegion(); 358ecff11dcSJohannes Doerfert for (Instruction &Inst : *BB) 359ecff11dcSJohannes Doerfert handleOutsideUsers(R, &Inst, BBMap[&Inst]); 360ecff11dcSJohannes Doerfert } 361ecff11dcSJohannes Doerfert 362ecff11dcSJohannes Doerfert AllocaInst *BlockGenerator::getOrCreateAlloca(Instruction *ScalarBase, 363ecff11dcSJohannes Doerfert ScalarAllocaMapTy &Map, 364ecff11dcSJohannes Doerfert const char *NameExt, 365ecff11dcSJohannes Doerfert bool *IsNew) { 366ecff11dcSJohannes Doerfert 367ecff11dcSJohannes Doerfert // Check if an alloca was cached for the base instruction. 368ecff11dcSJohannes Doerfert AllocaInst *&Addr = Map[ScalarBase]; 369ecff11dcSJohannes Doerfert 370ecff11dcSJohannes Doerfert // If needed indicate if it was found already or will be created. 371ecff11dcSJohannes Doerfert if (IsNew) 372ecff11dcSJohannes Doerfert *IsNew = (Addr == nullptr); 373ecff11dcSJohannes Doerfert 374ecff11dcSJohannes Doerfert // If no alloca was found create one and insert it in the entry block. 375ecff11dcSJohannes Doerfert if (!Addr) { 376ecff11dcSJohannes Doerfert auto *Ty = ScalarBase->getType(); 377ecff11dcSJohannes Doerfert Addr = new AllocaInst(Ty, ScalarBase->getName() + NameExt); 378ecff11dcSJohannes Doerfert Addr->insertBefore(EntryBB->getFirstInsertionPt()); 379ecff11dcSJohannes Doerfert } 380ecff11dcSJohannes Doerfert 381ecff11dcSJohannes Doerfert return Addr; 382ecff11dcSJohannes Doerfert } 383ecff11dcSJohannes Doerfert 384ecff11dcSJohannes Doerfert void BlockGenerator::handleOutsideUsers(const Region &R, Instruction *Inst, 385ecff11dcSJohannes Doerfert Value *InstCopy) { 386ecff11dcSJohannes Doerfert BasicBlock *ExitBB = R.getExit(); 387ecff11dcSJohannes Doerfert 388ecff11dcSJohannes Doerfert EscapeUserVectorTy EscapeUsers; 389ecff11dcSJohannes Doerfert for (User *U : Inst->users()) { 390ecff11dcSJohannes Doerfert 391ecff11dcSJohannes Doerfert // Non-instruction user will never escape. 392ecff11dcSJohannes Doerfert Instruction *UI = dyn_cast<Instruction>(U); 393ecff11dcSJohannes Doerfert if (!UI) 394ecff11dcSJohannes Doerfert continue; 395ecff11dcSJohannes Doerfert 396ecff11dcSJohannes Doerfert if (R.contains(UI) && ExitBB != UI->getParent()) 397ecff11dcSJohannes Doerfert continue; 398ecff11dcSJohannes Doerfert 399ecff11dcSJohannes Doerfert EscapeUsers.push_back(UI); 400ecff11dcSJohannes Doerfert } 401ecff11dcSJohannes Doerfert 402ecff11dcSJohannes Doerfert // Exit if no escape uses were found. 403ecff11dcSJohannes Doerfert if (EscapeUsers.empty()) 404ecff11dcSJohannes Doerfert return; 405ecff11dcSJohannes Doerfert 406ecff11dcSJohannes Doerfert // If there are escape users we get the alloca for this instruction and put 407ecff11dcSJohannes Doerfert // it in the EscapeMap for later finalization. However, if the alloca was not 408ecff11dcSJohannes Doerfert // created by an already handled scalar dependence we have to initialize it 409ecff11dcSJohannes Doerfert // also. Lastly, if the instruction was copied multiple times we already did 410ecff11dcSJohannes Doerfert // this and can exit. 411ecff11dcSJohannes Doerfert if (EscapeMap.count(Inst)) 412ecff11dcSJohannes Doerfert return; 413ecff11dcSJohannes Doerfert 414ecff11dcSJohannes Doerfert // Get or create an escape alloca for this instruction. 415ecff11dcSJohannes Doerfert bool IsNew; 416ecff11dcSJohannes Doerfert AllocaInst *ScalarAddr = 417ecff11dcSJohannes Doerfert getOrCreateAlloca(Inst, ScalarMap, ".escape", &IsNew); 418ecff11dcSJohannes Doerfert 419ecff11dcSJohannes Doerfert // Remember that this instruction has escape uses and the escape alloca. 420ecff11dcSJohannes Doerfert EscapeMap[Inst] = std::make_pair(ScalarAddr, std::move(EscapeUsers)); 421ecff11dcSJohannes Doerfert 422ecff11dcSJohannes Doerfert // If the escape alloca was just created store the instruction in there, 423ecff11dcSJohannes Doerfert // otherwise that happened already. 424ecff11dcSJohannes Doerfert if (IsNew) { 425ecff11dcSJohannes Doerfert assert(InstCopy && "Except PHIs every instruction should have a copy!"); 426ecff11dcSJohannes Doerfert Builder.CreateStore(InstCopy, ScalarAddr); 427ecff11dcSJohannes Doerfert } 428ecff11dcSJohannes Doerfert } 429ecff11dcSJohannes Doerfert 430ecff11dcSJohannes Doerfert void BlockGenerator::generateScalarLoads(ScopStmt &Stmt, 431ecff11dcSJohannes Doerfert const Instruction *Inst, 432ecff11dcSJohannes Doerfert ValueMapT &BBMap) { 433d4dd6ec7STobias Grosser auto *MAL = Stmt.lookupAccessesFor(Inst); 434ecff11dcSJohannes Doerfert 435d4dd6ec7STobias Grosser if (!MAL) 436d4dd6ec7STobias Grosser return; 437d4dd6ec7STobias Grosser 438ecff11dcSJohannes Doerfert for (MemoryAccess &MA : *MAL) { 439d4dd6ec7STobias Grosser AllocaInst *Address; 440ecff11dcSJohannes Doerfert if (!MA.isScalar() || !MA.isRead()) 441ecff11dcSJohannes Doerfert continue; 442ecff11dcSJohannes Doerfert 443d4dd6ec7STobias Grosser auto Base = cast<Instruction>(MA.getBaseAddr()); 444ecff11dcSJohannes Doerfert 44592245228STobias Grosser if (MA.getScopArrayInfo()->isPHI()) 446d4dd6ec7STobias Grosser Address = getOrCreateAlloca(Base, PHIOpMap, ".phiops"); 447d4dd6ec7STobias Grosser else 448d4dd6ec7STobias Grosser Address = getOrCreateAlloca(Base, ScalarMap, ".s2a"); 449d4dd6ec7STobias Grosser 450d4dd6ec7STobias Grosser BBMap[Base] = Builder.CreateLoad(Address, Address->getName() + ".reload"); 451ecff11dcSJohannes Doerfert } 452ecff11dcSJohannes Doerfert } 453ecff11dcSJohannes Doerfert 454ecff11dcSJohannes Doerfert Value *BlockGenerator::getNewScalarValue(Value *ScalarValue, const Region &R, 455ecff11dcSJohannes Doerfert ScalarAllocaMapTy &ReloadMap, 456ecff11dcSJohannes Doerfert ValueMapT &BBMap, 457ecff11dcSJohannes Doerfert ValueMapT &GlobalMap) { 458ecff11dcSJohannes Doerfert // If the value we want to store is an instruction we might have demoted it 459ecff11dcSJohannes Doerfert // in order to make it accessible here. In such a case a reload is 460ecff11dcSJohannes Doerfert // necessary. If it is no instruction it will always be a value that 461ecff11dcSJohannes Doerfert // dominates the current point and we can just use it. In total there are 4 462ecff11dcSJohannes Doerfert // options: 463ecff11dcSJohannes Doerfert // (1) The value is no instruction ==> use the value. 464ecff11dcSJohannes Doerfert // (2) The value is an instruction that was split out of the region prior to 465ecff11dcSJohannes Doerfert // code generation ==> use the instruction as it dominates the region. 466ecff11dcSJohannes Doerfert // (3) The value is an instruction: 467ecff11dcSJohannes Doerfert // (a) The value was defined in the current block, thus a copy is in 468ecff11dcSJohannes Doerfert // the BBMap ==> use the mapped value. 469ecff11dcSJohannes Doerfert // (b) The value was defined in a previous block, thus we demoted it 470ecff11dcSJohannes Doerfert // earlier ==> use the reloaded value. 471ecff11dcSJohannes Doerfert Instruction *ScalarValueInst = dyn_cast<Instruction>(ScalarValue); 472ecff11dcSJohannes Doerfert if (!ScalarValueInst) 473ecff11dcSJohannes Doerfert return ScalarValue; 474ecff11dcSJohannes Doerfert 475ecff11dcSJohannes Doerfert if (!R.contains(ScalarValueInst)) { 476ecff11dcSJohannes Doerfert if (Value *ScalarValueCopy = GlobalMap.lookup(ScalarValueInst)) 477ecff11dcSJohannes Doerfert return /* Case (3a) */ ScalarValueCopy; 478ecff11dcSJohannes Doerfert else 479ecff11dcSJohannes Doerfert return /* Case 2 */ ScalarValue; 480ecff11dcSJohannes Doerfert } 481ecff11dcSJohannes Doerfert 482ecff11dcSJohannes Doerfert if (Value *ScalarValueCopy = BBMap.lookup(ScalarValueInst)) 483ecff11dcSJohannes Doerfert return /* Case (3a) */ ScalarValueCopy; 484ecff11dcSJohannes Doerfert 485ecff11dcSJohannes Doerfert // Case (3b) 486ecff11dcSJohannes Doerfert assert(ReloadMap.count(ScalarValueInst) && 487ecff11dcSJohannes Doerfert "ScalarInst not mapped in the block and not in the given reload map!"); 488ecff11dcSJohannes Doerfert Value *ReloadAddr = ReloadMap[ScalarValueInst]; 489ecff11dcSJohannes Doerfert ScalarValue = 490ecff11dcSJohannes Doerfert Builder.CreateLoad(ReloadAddr, ReloadAddr->getName() + ".reload"); 491ecff11dcSJohannes Doerfert 492ecff11dcSJohannes Doerfert return ScalarValue; 493ecff11dcSJohannes Doerfert } 494ecff11dcSJohannes Doerfert 495ecff11dcSJohannes Doerfert void BlockGenerator::generateScalarStores(ScopStmt &Stmt, BasicBlock *BB, 496ecff11dcSJohannes Doerfert ValueMapT &BBMap, 497ecff11dcSJohannes Doerfert ValueMapT &GlobalMap) { 498ecff11dcSJohannes Doerfert const Region &R = Stmt.getParent()->getRegion(); 499ecff11dcSJohannes Doerfert 500ecff11dcSJohannes Doerfert assert(Stmt.isBlockStmt() && BB == Stmt.getBasicBlock() && 501ecff11dcSJohannes Doerfert "Region statements need to use the generateScalarStores() " 502ecff11dcSJohannes Doerfert "function in the RegionGenerator"); 503ecff11dcSJohannes Doerfert 504ecff11dcSJohannes Doerfert for (MemoryAccess *MA : Stmt) { 505ecff11dcSJohannes Doerfert if (!MA->isScalar() || MA->isRead()) 506ecff11dcSJohannes Doerfert continue; 507ecff11dcSJohannes Doerfert 50892245228STobias Grosser Instruction *Base = cast<Instruction>(MA->getBaseAddr()); 50992245228STobias Grosser Instruction *Inst = MA->getAccessInstruction(); 510ecff11dcSJohannes Doerfert 51192245228STobias Grosser Value *Val = nullptr; 51292245228STobias Grosser AllocaInst *Address = nullptr; 513ecff11dcSJohannes Doerfert 51492245228STobias Grosser if (MA->getScopArrayInfo()->isPHI()) { 51592245228STobias Grosser PHINode *BasePHI = dyn_cast<PHINode>(Base); 51692245228STobias Grosser int PHIIdx = BasePHI->getBasicBlockIndex(BB); 517*9bb8ef03SMichael Kruse assert(PHIIdx >= 0); 51892245228STobias Grosser Address = getOrCreateAlloca(Base, PHIOpMap, ".phiops"); 51992245228STobias Grosser Val = BasePHI->getIncomingValue(PHIIdx); 520ecff11dcSJohannes Doerfert } else { 52192245228STobias Grosser Address = getOrCreateAlloca(Base, ScalarMap, ".s2a"); 52292245228STobias Grosser Val = Inst; 523ecff11dcSJohannes Doerfert } 52492245228STobias Grosser Val = getNewScalarValue(Val, R, ScalarMap, BBMap, GlobalMap); 52592245228STobias Grosser Builder.CreateStore(Val, Address); 526ecff11dcSJohannes Doerfert } 527ecff11dcSJohannes Doerfert } 528ecff11dcSJohannes Doerfert 529ecff11dcSJohannes Doerfert void BlockGenerator::createScalarInitialization(Region &R, 530ecff11dcSJohannes Doerfert ValueMapT &GlobalMap) { 531ecff11dcSJohannes Doerfert // The split block __just before__ the region and optimized region. 532ecff11dcSJohannes Doerfert BasicBlock *SplitBB = R.getEnteringBlock(); 533ecff11dcSJohannes Doerfert BranchInst *SplitBBTerm = cast<BranchInst>(SplitBB->getTerminator()); 534ecff11dcSJohannes Doerfert assert(SplitBBTerm->getNumSuccessors() == 2 && "Bad region entering block!"); 535ecff11dcSJohannes Doerfert 536ecff11dcSJohannes Doerfert // Get the start block of the __optimized__ region. 537ecff11dcSJohannes Doerfert BasicBlock *StartBB = SplitBBTerm->getSuccessor(0); 538ecff11dcSJohannes Doerfert if (StartBB == R.getEntry()) 539ecff11dcSJohannes Doerfert StartBB = SplitBBTerm->getSuccessor(1); 540ecff11dcSJohannes Doerfert 541ecff11dcSJohannes Doerfert // For each PHI predecessor outside the region store the incoming operand 542ecff11dcSJohannes Doerfert // value prior to entering the optimized region. 543ecff11dcSJohannes Doerfert Builder.SetInsertPoint(StartBB->getTerminator()); 544ecff11dcSJohannes Doerfert 545ecff11dcSJohannes Doerfert ScalarAllocaMapTy EmptyMap; 546ecff11dcSJohannes Doerfert for (const auto &PHIOpMapping : PHIOpMap) { 547ecff11dcSJohannes Doerfert const PHINode *PHI = cast<PHINode>(PHIOpMapping.getFirst()); 548ecff11dcSJohannes Doerfert 549ecff11dcSJohannes Doerfert // Check if this PHI has the split block as predecessor (that is the only 550ecff11dcSJohannes Doerfert // possible predecessor outside the SCoP). 551ecff11dcSJohannes Doerfert int idx = PHI->getBasicBlockIndex(SplitBB); 552ecff11dcSJohannes Doerfert if (idx < 0) 553ecff11dcSJohannes Doerfert continue; 554ecff11dcSJohannes Doerfert 555ecff11dcSJohannes Doerfert Value *ScalarValue = PHI->getIncomingValue(idx); 556ecff11dcSJohannes Doerfert ScalarValue = 557ecff11dcSJohannes Doerfert getNewScalarValue(ScalarValue, R, EmptyMap, GlobalMap, GlobalMap); 558ecff11dcSJohannes Doerfert 559ecff11dcSJohannes Doerfert // If the split block is the predecessor initialize the PHI operator alloca. 560ecff11dcSJohannes Doerfert Builder.CreateStore(ScalarValue, PHIOpMapping.getSecond()); 561ecff11dcSJohannes Doerfert } 562ecff11dcSJohannes Doerfert } 563ecff11dcSJohannes Doerfert 564ecff11dcSJohannes Doerfert void BlockGenerator::createScalarFinalization(Region &R) { 565ecff11dcSJohannes Doerfert // The exit block of the __unoptimized__ region. 566ecff11dcSJohannes Doerfert BasicBlock *ExitBB = R.getExitingBlock(); 567ecff11dcSJohannes Doerfert // The merge block __just after__ the region and the optimized region. 568ecff11dcSJohannes Doerfert BasicBlock *MergeBB = R.getExit(); 569ecff11dcSJohannes Doerfert 570ecff11dcSJohannes Doerfert // The exit block of the __optimized__ region. 571ecff11dcSJohannes Doerfert BasicBlock *OptExitBB = *(pred_begin(MergeBB)); 572ecff11dcSJohannes Doerfert if (OptExitBB == ExitBB) 573ecff11dcSJohannes Doerfert OptExitBB = *(++pred_begin(MergeBB)); 574ecff11dcSJohannes Doerfert 575ecff11dcSJohannes Doerfert Builder.SetInsertPoint(OptExitBB->getTerminator()); 576ecff11dcSJohannes Doerfert for (const auto &EscapeMapping : EscapeMap) { 577ecff11dcSJohannes Doerfert // Extract the escaping instruction and the escaping users as well as the 578ecff11dcSJohannes Doerfert // alloca the instruction was demoted to. 579ecff11dcSJohannes Doerfert Instruction *EscapeInst = EscapeMapping.getFirst(); 580ecff11dcSJohannes Doerfert const auto &EscapeMappingValue = EscapeMapping.getSecond(); 581ecff11dcSJohannes Doerfert const EscapeUserVectorTy &EscapeUsers = EscapeMappingValue.second; 582ecff11dcSJohannes Doerfert AllocaInst *ScalarAddr = EscapeMappingValue.first; 583ecff11dcSJohannes Doerfert 584ecff11dcSJohannes Doerfert // Reload the demoted instruction in the optimized version of the SCoP. 585ecff11dcSJohannes Doerfert Instruction *EscapeInstReload = 586ecff11dcSJohannes Doerfert Builder.CreateLoad(ScalarAddr, EscapeInst->getName() + ".final_reload"); 587ecff11dcSJohannes Doerfert 588ecff11dcSJohannes Doerfert // Create the merge PHI that merges the optimized and unoptimized version. 589ecff11dcSJohannes Doerfert PHINode *MergePHI = PHINode::Create(EscapeInst->getType(), 2, 590ecff11dcSJohannes Doerfert EscapeInst->getName() + ".merge"); 591ecff11dcSJohannes Doerfert MergePHI->insertBefore(MergeBB->getFirstInsertionPt()); 592ecff11dcSJohannes Doerfert 593ecff11dcSJohannes Doerfert // Add the respective values to the merge PHI. 594ecff11dcSJohannes Doerfert MergePHI->addIncoming(EscapeInstReload, OptExitBB); 595ecff11dcSJohannes Doerfert MergePHI->addIncoming(EscapeInst, ExitBB); 596ecff11dcSJohannes Doerfert 597ecff11dcSJohannes Doerfert // The information of scalar evolution about the escaping instruction needs 598ecff11dcSJohannes Doerfert // to be revoked so the new merged instruction will be used. 599ecff11dcSJohannes Doerfert if (SE.isSCEVable(EscapeInst->getType())) 600ecff11dcSJohannes Doerfert SE.forgetValue(EscapeInst); 601ecff11dcSJohannes Doerfert 602ecff11dcSJohannes Doerfert // Replace all uses of the demoted instruction with the merge PHI. 603ecff11dcSJohannes Doerfert for (Instruction *EUser : EscapeUsers) 604ecff11dcSJohannes Doerfert EUser->replaceUsesOfWith(EscapeInst, MergePHI); 605ecff11dcSJohannes Doerfert } 606ecff11dcSJohannes Doerfert } 607ecff11dcSJohannes Doerfert 608ecff11dcSJohannes Doerfert void BlockGenerator::finalizeSCoP(Scop &S, ValueMapT &GlobalMap) { 609ecff11dcSJohannes Doerfert createScalarInitialization(S.getRegion(), GlobalMap); 610ecff11dcSJohannes Doerfert createScalarFinalization(S.getRegion()); 6113b11a16aSHongbin Zheng } 6123b11a16aSHongbin Zheng 613be9c9117SJohannes Doerfert VectorBlockGenerator::VectorBlockGenerator(BlockGenerator &BlockGen, 614be9c9117SJohannes Doerfert VectorValueMapT &GlobalMaps, 615be9c9117SJohannes Doerfert std::vector<LoopToScevMapT> &VLTS, 616be9c9117SJohannes Doerfert isl_map *Schedule) 617be9c9117SJohannes Doerfert : BlockGenerator(BlockGen), GlobalMaps(GlobalMaps), VLTS(VLTS), 618be9c9117SJohannes Doerfert Schedule(Schedule) { 6193b11a16aSHongbin Zheng assert(GlobalMaps.size() > 1 && "Only one vector lane found"); 620a00a0291SSebastian Pop assert(Schedule && "No statement domain provided"); 6213b11a16aSHongbin Zheng } 6223b11a16aSHongbin Zheng 623be9c9117SJohannes Doerfert Value *VectorBlockGenerator::getVectorValue(ScopStmt &Stmt, const Value *Old, 624e602a076STobias Grosser ValueMapT &VectorMap, 625e602a076STobias Grosser VectorValueMapT &ScalarMaps, 626e602a076STobias Grosser Loop *L) { 627fe11e287SHongbin Zheng if (Value *NewValue = VectorMap.lookup(Old)) 628fe11e287SHongbin Zheng return NewValue; 6293b11a16aSHongbin Zheng 6303b11a16aSHongbin Zheng int Width = getVectorWidth(); 6313b11a16aSHongbin Zheng 6323b11a16aSHongbin Zheng Value *Vector = UndefValue::get(VectorType::get(Old->getType(), Width)); 6333b11a16aSHongbin Zheng 6343b11a16aSHongbin Zheng for (int Lane = 0; Lane < Width; Lane++) 635c14582f2STobias Grosser Vector = Builder.CreateInsertElement( 636be9c9117SJohannes Doerfert Vector, getNewValue(Stmt, Old, ScalarMaps[Lane], GlobalMaps[Lane], 637be9c9117SJohannes Doerfert VLTS[Lane], L), 6387242ad92STobias Grosser Builder.getInt32(Lane)); 6393b11a16aSHongbin Zheng 6403b11a16aSHongbin Zheng VectorMap[Old] = Vector; 6413b11a16aSHongbin Zheng 6423b11a16aSHongbin Zheng return Vector; 6433b11a16aSHongbin Zheng } 6443b11a16aSHongbin Zheng 6453b11a16aSHongbin Zheng Type *VectorBlockGenerator::getVectorPtrTy(const Value *Val, int Width) { 6463b11a16aSHongbin Zheng PointerType *PointerTy = dyn_cast<PointerType>(Val->getType()); 6473b11a16aSHongbin Zheng assert(PointerTy && "PointerType expected"); 6483b11a16aSHongbin Zheng 6493b11a16aSHongbin Zheng Type *ScalarType = PointerTy->getElementType(); 6503b11a16aSHongbin Zheng VectorType *VectorType = VectorType::get(ScalarType, Width); 6513b11a16aSHongbin Zheng 6523b11a16aSHongbin Zheng return PointerType::getUnqual(VectorType); 6533b11a16aSHongbin Zheng } 6543b11a16aSHongbin Zheng 655be9c9117SJohannes Doerfert Value *VectorBlockGenerator::generateStrideOneLoad( 656be9c9117SJohannes Doerfert ScopStmt &Stmt, const LoadInst *Load, VectorValueMapT &ScalarMaps, 6570dd463faSTobias Grosser bool NegativeStride = false) { 6580dd463faSTobias Grosser unsigned VectorWidth = getVectorWidth(); 6593b11a16aSHongbin Zheng const Value *Pointer = Load->getPointerOperand(); 6600dd463faSTobias Grosser Type *VectorPtrType = getVectorPtrTy(Pointer, VectorWidth); 6610dd463faSTobias Grosser unsigned Offset = NegativeStride ? VectorWidth - 1 : 0; 6620dd463faSTobias Grosser 6635a56cbf4STobias Grosser Value *NewPointer = nullptr; 664be9c9117SJohannes Doerfert NewPointer = generateLocationAccessed(Stmt, Load, Pointer, ScalarMaps[Offset], 665731685e6SJohannes Doerfert GlobalMaps[Offset], VLTS[Offset]); 666c14582f2STobias Grosser Value *VectorPtr = 667c14582f2STobias Grosser Builder.CreateBitCast(NewPointer, VectorPtrType, "vector_ptr"); 668c14582f2STobias Grosser LoadInst *VecLoad = 669c14582f2STobias Grosser Builder.CreateLoad(VectorPtr, Load->getName() + "_p_vec_full"); 6703b11a16aSHongbin Zheng if (!Aligned) 6713b11a16aSHongbin Zheng VecLoad->setAlignment(8); 6723b11a16aSHongbin Zheng 6730dd463faSTobias Grosser if (NegativeStride) { 6740dd463faSTobias Grosser SmallVector<Constant *, 16> Indices; 6750dd463faSTobias Grosser for (int i = VectorWidth - 1; i >= 0; i--) 6760dd463faSTobias Grosser Indices.push_back(ConstantInt::get(Builder.getInt32Ty(), i)); 6770dd463faSTobias Grosser Constant *SV = llvm::ConstantVector::get(Indices); 6780dd463faSTobias Grosser Value *RevVecLoad = Builder.CreateShuffleVector( 6790dd463faSTobias Grosser VecLoad, VecLoad, SV, Load->getName() + "_reverse"); 6800dd463faSTobias Grosser return RevVecLoad; 6810dd463faSTobias Grosser } 6820dd463faSTobias Grosser 6833b11a16aSHongbin Zheng return VecLoad; 6843b11a16aSHongbin Zheng } 6853b11a16aSHongbin Zheng 686be9c9117SJohannes Doerfert Value *VectorBlockGenerator::generateStrideZeroLoad(ScopStmt &Stmt, 687be9c9117SJohannes Doerfert const LoadInst *Load, 6883b11a16aSHongbin Zheng ValueMapT &BBMap) { 6893b11a16aSHongbin Zheng const Value *Pointer = Load->getPointerOperand(); 6903b11a16aSHongbin Zheng Type *VectorPtrType = getVectorPtrTy(Pointer, 1); 691be9c9117SJohannes Doerfert Value *NewPointer = generateLocationAccessed(Stmt, Load, Pointer, BBMap, 692be9c9117SJohannes Doerfert GlobalMaps[0], VLTS[0]); 6933b11a16aSHongbin Zheng Value *VectorPtr = Builder.CreateBitCast(NewPointer, VectorPtrType, 6943b11a16aSHongbin Zheng Load->getName() + "_p_vec_p"); 695c14582f2STobias Grosser LoadInst *ScalarLoad = 696c14582f2STobias Grosser Builder.CreateLoad(VectorPtr, Load->getName() + "_p_splat_one"); 6973b11a16aSHongbin Zheng 6983b11a16aSHongbin Zheng if (!Aligned) 6993b11a16aSHongbin Zheng ScalarLoad->setAlignment(8); 7003b11a16aSHongbin Zheng 701c14582f2STobias Grosser Constant *SplatVector = Constant::getNullValue( 702c14582f2STobias Grosser VectorType::get(Builder.getInt32Ty(), getVectorWidth())); 7033b11a16aSHongbin Zheng 704c14582f2STobias Grosser Value *VectorLoad = Builder.CreateShuffleVector( 705c14582f2STobias Grosser ScalarLoad, ScalarLoad, SplatVector, Load->getName() + "_p_splat"); 7063b11a16aSHongbin Zheng return VectorLoad; 7073b11a16aSHongbin Zheng } 7083b11a16aSHongbin Zheng 709be9c9117SJohannes Doerfert Value *VectorBlockGenerator::generateUnknownStrideLoad( 710be9c9117SJohannes Doerfert ScopStmt &Stmt, const LoadInst *Load, VectorValueMapT &ScalarMaps) { 7113b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 7123b11a16aSHongbin Zheng const Value *Pointer = Load->getPointerOperand(); 7133b11a16aSHongbin Zheng VectorType *VectorType = VectorType::get( 7143b11a16aSHongbin Zheng dyn_cast<PointerType>(Pointer->getType())->getElementType(), VectorWidth); 7153b11a16aSHongbin Zheng 7163b11a16aSHongbin Zheng Value *Vector = UndefValue::get(VectorType); 7173b11a16aSHongbin Zheng 7183b11a16aSHongbin Zheng for (int i = 0; i < VectorWidth; i++) { 719be9c9117SJohannes Doerfert Value *NewPointer = generateLocationAccessed( 720be9c9117SJohannes Doerfert Stmt, Load, Pointer, ScalarMaps[i], GlobalMaps[i], VLTS[i]); 721c14582f2STobias Grosser Value *ScalarLoad = 722c14582f2STobias Grosser Builder.CreateLoad(NewPointer, Load->getName() + "_p_scalar_"); 723c14582f2STobias Grosser Vector = Builder.CreateInsertElement( 724c14582f2STobias Grosser Vector, ScalarLoad, Builder.getInt32(i), Load->getName() + "_p_vec_"); 7253b11a16aSHongbin Zheng } 7263b11a16aSHongbin Zheng 7273b11a16aSHongbin Zheng return Vector; 7283b11a16aSHongbin Zheng } 7293b11a16aSHongbin Zheng 730be9c9117SJohannes Doerfert void VectorBlockGenerator::generateLoad(ScopStmt &Stmt, const LoadInst *Load, 731e602a076STobias Grosser ValueMapT &VectorMap, 732e602a076STobias Grosser VectorValueMapT &ScalarMaps) { 7332873645cSTobias Grosser if (!VectorType::isValidElementType(Load->getType())) { 7343b11a16aSHongbin Zheng for (int i = 0; i < getVectorWidth(); i++) 735c14582f2STobias Grosser ScalarMaps[i][Load] = 736be9c9117SJohannes Doerfert generateScalarLoad(Stmt, Load, ScalarMaps[i], GlobalMaps[i], VLTS[i]); 7373b11a16aSHongbin Zheng return; 7383b11a16aSHongbin Zheng } 7393b11a16aSHongbin Zheng 740be9c9117SJohannes Doerfert const MemoryAccess &Access = Stmt.getAccessFor(Load); 7413b11a16aSHongbin Zheng 74295493984STobias Grosser // Make sure we have scalar values available to access the pointer to 74395493984STobias Grosser // the data location. 74495493984STobias Grosser extractScalarValues(Load, VectorMap, ScalarMaps); 74595493984STobias Grosser 7463b11a16aSHongbin Zheng Value *NewLoad; 747a00a0291SSebastian Pop if (Access.isStrideZero(isl_map_copy(Schedule))) 748be9c9117SJohannes Doerfert NewLoad = generateStrideZeroLoad(Stmt, Load, ScalarMaps[0]); 749a00a0291SSebastian Pop else if (Access.isStrideOne(isl_map_copy(Schedule))) 750be9c9117SJohannes Doerfert NewLoad = generateStrideOneLoad(Stmt, Load, ScalarMaps); 7510dd463faSTobias Grosser else if (Access.isStrideX(isl_map_copy(Schedule), -1)) 752be9c9117SJohannes Doerfert NewLoad = generateStrideOneLoad(Stmt, Load, ScalarMaps, true); 7533b11a16aSHongbin Zheng else 754be9c9117SJohannes Doerfert NewLoad = generateUnknownStrideLoad(Stmt, Load, ScalarMaps); 7553b11a16aSHongbin Zheng 7563b11a16aSHongbin Zheng VectorMap[Load] = NewLoad; 7573b11a16aSHongbin Zheng } 7583b11a16aSHongbin Zheng 759be9c9117SJohannes Doerfert void VectorBlockGenerator::copyUnaryInst(ScopStmt &Stmt, 760be9c9117SJohannes Doerfert const UnaryInstruction *Inst, 7613b11a16aSHongbin Zheng ValueMapT &VectorMap, 7623b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 7633b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 764be9c9117SJohannes Doerfert Value *NewOperand = getVectorValue(Stmt, Inst->getOperand(0), VectorMap, 765be9c9117SJohannes Doerfert ScalarMaps, getLoopForInst(Inst)); 7663b11a16aSHongbin Zheng 7673b11a16aSHongbin Zheng assert(isa<CastInst>(Inst) && "Can not generate vector code for instruction"); 7683b11a16aSHongbin Zheng 7693b11a16aSHongbin Zheng const CastInst *Cast = dyn_cast<CastInst>(Inst); 7703b11a16aSHongbin Zheng VectorType *DestType = VectorType::get(Inst->getType(), VectorWidth); 7713b11a16aSHongbin Zheng VectorMap[Inst] = Builder.CreateCast(Cast->getOpcode(), NewOperand, DestType); 7723b11a16aSHongbin Zheng } 7733b11a16aSHongbin Zheng 774be9c9117SJohannes Doerfert void VectorBlockGenerator::copyBinaryInst(ScopStmt &Stmt, 775be9c9117SJohannes Doerfert const BinaryOperator *Inst, 7763b11a16aSHongbin Zheng ValueMapT &VectorMap, 7773b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 778369430ffSTobias Grosser Loop *L = getLoopForInst(Inst); 7793b11a16aSHongbin Zheng Value *OpZero = Inst->getOperand(0); 7803b11a16aSHongbin Zheng Value *OpOne = Inst->getOperand(1); 7813b11a16aSHongbin Zheng 7823b11a16aSHongbin Zheng Value *NewOpZero, *NewOpOne; 783be9c9117SJohannes Doerfert NewOpZero = getVectorValue(Stmt, OpZero, VectorMap, ScalarMaps, L); 784be9c9117SJohannes Doerfert NewOpOne = getVectorValue(Stmt, OpOne, VectorMap, ScalarMaps, L); 7853b11a16aSHongbin Zheng 7861bb59b0dSTobias Grosser Value *NewInst = Builder.CreateBinOp(Inst->getOpcode(), NewOpZero, NewOpOne, 7873b11a16aSHongbin Zheng Inst->getName() + "p_vec"); 7883b11a16aSHongbin Zheng VectorMap[Inst] = NewInst; 7893b11a16aSHongbin Zheng } 7903b11a16aSHongbin Zheng 791be9c9117SJohannes Doerfert void VectorBlockGenerator::copyStore(ScopStmt &Stmt, const StoreInst *Store, 792e602a076STobias Grosser ValueMapT &VectorMap, 793e602a076STobias Grosser VectorValueMapT &ScalarMaps) { 794be9c9117SJohannes Doerfert const MemoryAccess &Access = Stmt.getAccessFor(Store); 7953b11a16aSHongbin Zheng 7963b11a16aSHongbin Zheng const Value *Pointer = Store->getPointerOperand(); 797be9c9117SJohannes Doerfert Value *Vector = getVectorValue(Stmt, Store->getValueOperand(), VectorMap, 798369430ffSTobias Grosser ScalarMaps, getLoopForInst(Store)); 7993b11a16aSHongbin Zheng 80050fd7010STobias Grosser // Make sure we have scalar values available to access the pointer to 80150fd7010STobias Grosser // the data location. 80250fd7010STobias Grosser extractScalarValues(Store, VectorMap, ScalarMaps); 80350fd7010STobias Grosser 804a00a0291SSebastian Pop if (Access.isStrideOne(isl_map_copy(Schedule))) { 8051947f863SJohannes Doerfert Type *VectorPtrType = getVectorPtrTy(Pointer, getVectorWidth()); 806be9c9117SJohannes Doerfert Value *NewPointer = generateLocationAccessed( 807be9c9117SJohannes Doerfert Stmt, Store, Pointer, ScalarMaps[0], GlobalMaps[0], VLTS[0]); 8083b11a16aSHongbin Zheng 809c14582f2STobias Grosser Value *VectorPtr = 810c14582f2STobias Grosser Builder.CreateBitCast(NewPointer, VectorPtrType, "vector_ptr"); 8113b11a16aSHongbin Zheng StoreInst *Store = Builder.CreateStore(Vector, VectorPtr); 8123b11a16aSHongbin Zheng 8133b11a16aSHongbin Zheng if (!Aligned) 8143b11a16aSHongbin Zheng Store->setAlignment(8); 8153b11a16aSHongbin Zheng } else { 8163b11a16aSHongbin Zheng for (unsigned i = 0; i < ScalarMaps.size(); i++) { 8171bb59b0dSTobias Grosser Value *Scalar = Builder.CreateExtractElement(Vector, Builder.getInt32(i)); 818731685e6SJohannes Doerfert Value *NewPointer = generateLocationAccessed( 819be9c9117SJohannes Doerfert Stmt, Store, Pointer, ScalarMaps[i], GlobalMaps[i], VLTS[i]); 8203b11a16aSHongbin Zheng Builder.CreateStore(Scalar, NewPointer); 8213b11a16aSHongbin Zheng } 8223b11a16aSHongbin Zheng } 8233b11a16aSHongbin Zheng } 8243b11a16aSHongbin Zheng 8253b11a16aSHongbin Zheng bool VectorBlockGenerator::hasVectorOperands(const Instruction *Inst, 8263b11a16aSHongbin Zheng ValueMapT &VectorMap) { 82791f5b262STobias Grosser for (Value *Operand : Inst->operands()) 82891f5b262STobias Grosser if (VectorMap.count(Operand)) 8293b11a16aSHongbin Zheng return true; 8303b11a16aSHongbin Zheng return false; 8313b11a16aSHongbin Zheng } 8323b11a16aSHongbin Zheng 8333b11a16aSHongbin Zheng bool VectorBlockGenerator::extractScalarValues(const Instruction *Inst, 8343b11a16aSHongbin Zheng ValueMapT &VectorMap, 8353b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 8363b11a16aSHongbin Zheng bool HasVectorOperand = false; 8373b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 8383b11a16aSHongbin Zheng 83991f5b262STobias Grosser for (Value *Operand : Inst->operands()) { 84091f5b262STobias Grosser ValueMapT::iterator VecOp = VectorMap.find(Operand); 8413b11a16aSHongbin Zheng 8423b11a16aSHongbin Zheng if (VecOp == VectorMap.end()) 8433b11a16aSHongbin Zheng continue; 8443b11a16aSHongbin Zheng 8453b11a16aSHongbin Zheng HasVectorOperand = true; 8463b11a16aSHongbin Zheng Value *NewVector = VecOp->second; 8473b11a16aSHongbin Zheng 8483b11a16aSHongbin Zheng for (int i = 0; i < VectorWidth; ++i) { 8493b11a16aSHongbin Zheng ValueMapT &SM = ScalarMaps[i]; 8503b11a16aSHongbin Zheng 8513b11a16aSHongbin Zheng // If there is one scalar extracted, all scalar elements should have 8523b11a16aSHongbin Zheng // already been extracted by the code here. So no need to check for the 8533b11a16aSHongbin Zheng // existance of all of them. 85491f5b262STobias Grosser if (SM.count(Operand)) 8553b11a16aSHongbin Zheng break; 8563b11a16aSHongbin Zheng 85791f5b262STobias Grosser SM[Operand] = 85891f5b262STobias Grosser Builder.CreateExtractElement(NewVector, Builder.getInt32(i)); 8593b11a16aSHongbin Zheng } 8603b11a16aSHongbin Zheng } 8613b11a16aSHongbin Zheng 8623b11a16aSHongbin Zheng return HasVectorOperand; 8633b11a16aSHongbin Zheng } 8643b11a16aSHongbin Zheng 865be9c9117SJohannes Doerfert void VectorBlockGenerator::copyInstScalarized(ScopStmt &Stmt, 866be9c9117SJohannes Doerfert const Instruction *Inst, 8673b11a16aSHongbin Zheng ValueMapT &VectorMap, 8683b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 8693b11a16aSHongbin Zheng bool HasVectorOperand; 8703b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 8713b11a16aSHongbin Zheng 8723b11a16aSHongbin Zheng HasVectorOperand = extractScalarValues(Inst, VectorMap, ScalarMaps); 8733b11a16aSHongbin Zheng 8743b11a16aSHongbin Zheng for (int VectorLane = 0; VectorLane < getVectorWidth(); VectorLane++) 875be9c9117SJohannes Doerfert BlockGenerator::copyInstruction(Stmt, Inst, ScalarMaps[VectorLane], 876731685e6SJohannes Doerfert GlobalMaps[VectorLane], VLTS[VectorLane]); 8773b11a16aSHongbin Zheng 8783b11a16aSHongbin Zheng if (!VectorType::isValidElementType(Inst->getType()) || !HasVectorOperand) 8793b11a16aSHongbin Zheng return; 8803b11a16aSHongbin Zheng 8813b11a16aSHongbin Zheng // Make the result available as vector value. 8823b11a16aSHongbin Zheng VectorType *VectorType = VectorType::get(Inst->getType(), VectorWidth); 8833b11a16aSHongbin Zheng Value *Vector = UndefValue::get(VectorType); 8843b11a16aSHongbin Zheng 8853b11a16aSHongbin Zheng for (int i = 0; i < VectorWidth; i++) 8863b11a16aSHongbin Zheng Vector = Builder.CreateInsertElement(Vector, ScalarMaps[i][Inst], 8873b11a16aSHongbin Zheng Builder.getInt32(i)); 8883b11a16aSHongbin Zheng 8893b11a16aSHongbin Zheng VectorMap[Inst] = Vector; 8903b11a16aSHongbin Zheng } 8913b11a16aSHongbin Zheng 892c14582f2STobias Grosser int VectorBlockGenerator::getVectorWidth() { return GlobalMaps.size(); } 8933b11a16aSHongbin Zheng 894be9c9117SJohannes Doerfert void VectorBlockGenerator::copyInstruction(ScopStmt &Stmt, 895be9c9117SJohannes Doerfert const Instruction *Inst, 8963b11a16aSHongbin Zheng ValueMapT &VectorMap, 8973b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 8983b11a16aSHongbin Zheng // Terminator instructions control the control flow. They are explicitly 8993b11a16aSHongbin Zheng // expressed in the clast and do not need to be copied. 9003b11a16aSHongbin Zheng if (Inst->isTerminator()) 9013b11a16aSHongbin Zheng return; 9023b11a16aSHongbin Zheng 9031ef52333SJohannes Doerfert if (canSynthesize(Inst, &LI, &SE, &Stmt.getParent()->getRegion())) 904e71c6ab5STobias Grosser return; 905e71c6ab5STobias Grosser 9063b11a16aSHongbin Zheng if (const LoadInst *Load = dyn_cast<LoadInst>(Inst)) { 907be9c9117SJohannes Doerfert generateLoad(Stmt, Load, VectorMap, ScalarMaps); 9083b11a16aSHongbin Zheng return; 9093b11a16aSHongbin Zheng } 9103b11a16aSHongbin Zheng 9113b11a16aSHongbin Zheng if (hasVectorOperands(Inst, VectorMap)) { 9123b11a16aSHongbin Zheng if (const StoreInst *Store = dyn_cast<StoreInst>(Inst)) { 913be9c9117SJohannes Doerfert copyStore(Stmt, Store, VectorMap, ScalarMaps); 9143b11a16aSHongbin Zheng return; 9153b11a16aSHongbin Zheng } 9163b11a16aSHongbin Zheng 9173b11a16aSHongbin Zheng if (const UnaryInstruction *Unary = dyn_cast<UnaryInstruction>(Inst)) { 918be9c9117SJohannes Doerfert copyUnaryInst(Stmt, Unary, VectorMap, ScalarMaps); 9193b11a16aSHongbin Zheng return; 9203b11a16aSHongbin Zheng } 9213b11a16aSHongbin Zheng 9223b11a16aSHongbin Zheng if (const BinaryOperator *Binary = dyn_cast<BinaryOperator>(Inst)) { 923be9c9117SJohannes Doerfert copyBinaryInst(Stmt, Binary, VectorMap, ScalarMaps); 9243b11a16aSHongbin Zheng return; 9253b11a16aSHongbin Zheng } 9263b11a16aSHongbin Zheng 9273b11a16aSHongbin Zheng // Falltrough: We generate scalar instructions, if we don't know how to 9283b11a16aSHongbin Zheng // generate vector code. 9293b11a16aSHongbin Zheng } 9303b11a16aSHongbin Zheng 931be9c9117SJohannes Doerfert copyInstScalarized(Stmt, Inst, VectorMap, ScalarMaps); 9323b11a16aSHongbin Zheng } 9333b11a16aSHongbin Zheng 934275a1756SJohannes Doerfert void VectorBlockGenerator::copyStmt(ScopStmt &Stmt) { 935275a1756SJohannes Doerfert assert(Stmt.isBlockStmt() && "TODO: Only block statements can be copied by " 936275a1756SJohannes Doerfert "the vector block generator"); 937275a1756SJohannes Doerfert 938be9c9117SJohannes Doerfert BasicBlock *BB = Stmt.getBasicBlock(); 939c14582f2STobias Grosser BasicBlock *CopyBB = 940b4f08eb6SJohannes Doerfert SplitBlock(Builder.GetInsertBlock(), Builder.GetInsertPoint(), &DT, &LI); 9413b11a16aSHongbin Zheng CopyBB->setName("polly.stmt." + BB->getName()); 9423b11a16aSHongbin Zheng Builder.SetInsertPoint(CopyBB->begin()); 9433b11a16aSHongbin Zheng 9443b11a16aSHongbin Zheng // Create two maps that store the mapping from the original instructions of 9453b11a16aSHongbin Zheng // the old basic block to their copies in the new basic block. Those maps 9463b11a16aSHongbin Zheng // are basic block local. 9473b11a16aSHongbin Zheng // 9483b11a16aSHongbin Zheng // As vector code generation is supported there is one map for scalar values 9493b11a16aSHongbin Zheng // and one for vector values. 9503b11a16aSHongbin Zheng // 9513b11a16aSHongbin Zheng // In case we just do scalar code generation, the vectorMap is not used and 9523b11a16aSHongbin Zheng // the scalarMap has just one dimension, which contains the mapping. 9533b11a16aSHongbin Zheng // 9543b11a16aSHongbin Zheng // In case vector code generation is done, an instruction may either appear 9553b11a16aSHongbin Zheng // in the vector map once (as it is calculating >vectorwidth< values at a 9563b11a16aSHongbin Zheng // time. Or (if the values are calculated using scalar operations), it 9573b11a16aSHongbin Zheng // appears once in every dimension of the scalarMap. 9583b11a16aSHongbin Zheng VectorValueMapT ScalarBlockMap(getVectorWidth()); 9593b11a16aSHongbin Zheng ValueMapT VectorBlockMap; 9603b11a16aSHongbin Zheng 96191f5b262STobias Grosser for (Instruction &Inst : *BB) 962be9c9117SJohannes Doerfert copyInstruction(Stmt, &Inst, VectorBlockMap, ScalarBlockMap); 9633b11a16aSHongbin Zheng } 964275a1756SJohannes Doerfert 965ecff11dcSJohannes Doerfert BasicBlock *RegionGenerator::repairDominance(BasicBlock *BB, 966ecff11dcSJohannes Doerfert BasicBlock *BBCopy) { 967514f6efaSJohannes Doerfert 968514f6efaSJohannes Doerfert BasicBlock *BBIDom = DT.getNode(BB)->getIDom()->getBlock(); 969514f6efaSJohannes Doerfert BasicBlock *BBCopyIDom = BlockMap.lookup(BBIDom); 970514f6efaSJohannes Doerfert 971514f6efaSJohannes Doerfert if (BBCopyIDom) 972514f6efaSJohannes Doerfert DT.changeImmediateDominator(BBCopy, BBCopyIDom); 973514f6efaSJohannes Doerfert 974514f6efaSJohannes Doerfert return BBCopyIDom; 975514f6efaSJohannes Doerfert } 976514f6efaSJohannes Doerfert 977275a1756SJohannes Doerfert void RegionGenerator::copyStmt(ScopStmt &Stmt, ValueMapT &GlobalMap, 978275a1756SJohannes Doerfert LoopToScevMapT <S) { 979275a1756SJohannes Doerfert assert(Stmt.isRegionStmt() && 980d3f21833STobias Grosser "Only region statements can be copied by the region generator"); 981275a1756SJohannes Doerfert 982ecff11dcSJohannes Doerfert // Forget all old mappings. 983ecff11dcSJohannes Doerfert BlockMap.clear(); 984ecff11dcSJohannes Doerfert RegionMaps.clear(); 985ecff11dcSJohannes Doerfert IncompletePHINodeMap.clear(); 986ecff11dcSJohannes Doerfert 987275a1756SJohannes Doerfert // The region represented by the statement. 988275a1756SJohannes Doerfert Region *R = Stmt.getRegion(); 989275a1756SJohannes Doerfert 990ecff11dcSJohannes Doerfert // Create a dedicated entry for the region where we can reload all demoted 991ecff11dcSJohannes Doerfert // inputs. 992ecff11dcSJohannes Doerfert BasicBlock *EntryBB = R->getEntry(); 993ecff11dcSJohannes Doerfert BasicBlock *EntryBBCopy = 994ecff11dcSJohannes Doerfert SplitBlock(Builder.GetInsertBlock(), Builder.GetInsertPoint(), &DT, &LI); 995ecff11dcSJohannes Doerfert EntryBBCopy->setName("polly.stmt." + EntryBB->getName() + ".entry"); 996ecff11dcSJohannes Doerfert Builder.SetInsertPoint(EntryBBCopy->begin()); 997514f6efaSJohannes Doerfert 998ecff11dcSJohannes Doerfert for (auto PI = pred_begin(EntryBB), PE = pred_end(EntryBB); PI != PE; ++PI) 999ecff11dcSJohannes Doerfert if (!R->contains(*PI)) 1000ecff11dcSJohannes Doerfert BlockMap[*PI] = EntryBBCopy; 1001275a1756SJohannes Doerfert 1002275a1756SJohannes Doerfert // Iterate over all blocks in the region in a breadth-first search. 1003275a1756SJohannes Doerfert std::deque<BasicBlock *> Blocks; 1004275a1756SJohannes Doerfert SmallPtrSet<BasicBlock *, 8> SeenBlocks; 1005ecff11dcSJohannes Doerfert Blocks.push_back(EntryBB); 1006ecff11dcSJohannes Doerfert SeenBlocks.insert(EntryBB); 1007275a1756SJohannes Doerfert 1008275a1756SJohannes Doerfert while (!Blocks.empty()) { 1009275a1756SJohannes Doerfert BasicBlock *BB = Blocks.front(); 1010275a1756SJohannes Doerfert Blocks.pop_front(); 1011275a1756SJohannes Doerfert 1012514f6efaSJohannes Doerfert // First split the block and update dominance information. 1013514f6efaSJohannes Doerfert BasicBlock *BBCopy = splitBB(BB); 1014ecff11dcSJohannes Doerfert BasicBlock *BBCopyIDom = repairDominance(BB, BBCopy); 1015ecff11dcSJohannes Doerfert 1016ecff11dcSJohannes Doerfert // In order to remap PHI nodes we store also basic block mappings. 1017ecff11dcSJohannes Doerfert BlockMap[BB] = BBCopy; 1018514f6efaSJohannes Doerfert 1019514f6efaSJohannes Doerfert // Get the mapping for this block and initialize it with the mapping 1020514f6efaSJohannes Doerfert // available at its immediate dominator (in the new region). 1021514f6efaSJohannes Doerfert ValueMapT &RegionMap = RegionMaps[BBCopy]; 1022514f6efaSJohannes Doerfert RegionMap = RegionMaps[BBCopyIDom]; 1023514f6efaSJohannes Doerfert 1024275a1756SJohannes Doerfert // Copy the block with the BlockGenerator. 1025514f6efaSJohannes Doerfert copyBB(Stmt, BB, BBCopy, RegionMap, GlobalMap, LTS); 1026275a1756SJohannes Doerfert 1027ecff11dcSJohannes Doerfert // In order to remap PHI nodes we store also basic block mappings. 1028ecff11dcSJohannes Doerfert BlockMap[BB] = BBCopy; 1029ecff11dcSJohannes Doerfert 1030ecff11dcSJohannes Doerfert // Add values to incomplete PHI nodes waiting for this block to be copied. 1031ecff11dcSJohannes Doerfert for (const PHINodePairTy &PHINodePair : IncompletePHINodeMap[BB]) 1032ecff11dcSJohannes Doerfert addOperandToPHI(Stmt, PHINodePair.first, PHINodePair.second, BB, 1033ecff11dcSJohannes Doerfert GlobalMap, LTS); 1034ecff11dcSJohannes Doerfert IncompletePHINodeMap[BB].clear(); 1035ecff11dcSJohannes Doerfert 1036275a1756SJohannes Doerfert // And continue with new successors inside the region. 1037275a1756SJohannes Doerfert for (auto SI = succ_begin(BB), SE = succ_end(BB); SI != SE; SI++) 1038275a1756SJohannes Doerfert if (R->contains(*SI) && SeenBlocks.insert(*SI).second) 1039275a1756SJohannes Doerfert Blocks.push_back(*SI); 1040275a1756SJohannes Doerfert } 1041275a1756SJohannes Doerfert 1042275a1756SJohannes Doerfert // Now create a new dedicated region exit block and add it to the region map. 1043514f6efaSJohannes Doerfert BasicBlock *ExitBBCopy = 1044275a1756SJohannes Doerfert SplitBlock(Builder.GetInsertBlock(), Builder.GetInsertPoint(), &DT, &LI); 1045ecff11dcSJohannes Doerfert ExitBBCopy->setName("polly.stmt." + R->getExit()->getName() + ".exit"); 1046514f6efaSJohannes Doerfert BlockMap[R->getExit()] = ExitBBCopy; 1047514f6efaSJohannes Doerfert 1048ecff11dcSJohannes Doerfert repairDominance(R->getExit(), ExitBBCopy); 1049275a1756SJohannes Doerfert 1050275a1756SJohannes Doerfert // As the block generator doesn't handle control flow we need to add the 1051275a1756SJohannes Doerfert // region control flow by hand after all blocks have been copied. 1052275a1756SJohannes Doerfert for (BasicBlock *BB : SeenBlocks) { 1053275a1756SJohannes Doerfert 1054275a1756SJohannes Doerfert BranchInst *BI = cast<BranchInst>(BB->getTerminator()); 1055275a1756SJohannes Doerfert 1056514f6efaSJohannes Doerfert BasicBlock *BBCopy = BlockMap[BB]; 1057275a1756SJohannes Doerfert Instruction *BICopy = BBCopy->getTerminator(); 1058275a1756SJohannes Doerfert 1059514f6efaSJohannes Doerfert ValueMapT &RegionMap = RegionMaps[BBCopy]; 1060514f6efaSJohannes Doerfert RegionMap.insert(BlockMap.begin(), BlockMap.end()); 1061514f6efaSJohannes Doerfert 106245e7944bSTobias Grosser Builder.SetInsertPoint(BICopy); 1063275a1756SJohannes Doerfert copyInstScalar(Stmt, BI, RegionMap, GlobalMap, LTS); 1064275a1756SJohannes Doerfert BICopy->eraseFromParent(); 1065275a1756SJohannes Doerfert } 1066275a1756SJohannes Doerfert 1067ecff11dcSJohannes Doerfert // Add counting PHI nodes to all loops in the region that can be used as 1068ecff11dcSJohannes Doerfert // replacement for SCEVs refering to the old loop. 1069ecff11dcSJohannes Doerfert for (BasicBlock *BB : SeenBlocks) { 1070ecff11dcSJohannes Doerfert Loop *L = LI.getLoopFor(BB); 1071ecff11dcSJohannes Doerfert if (L == nullptr || L->getHeader() != BB) 1072ecff11dcSJohannes Doerfert continue; 1073ecff11dcSJohannes Doerfert 1074ecff11dcSJohannes Doerfert BasicBlock *BBCopy = BlockMap[BB]; 1075ecff11dcSJohannes Doerfert Value *NullVal = Builder.getInt32(0); 1076ecff11dcSJohannes Doerfert PHINode *LoopPHI = 1077ecff11dcSJohannes Doerfert PHINode::Create(Builder.getInt32Ty(), 2, "polly.subregion.iv"); 1078ecff11dcSJohannes Doerfert Instruction *LoopPHIInc = BinaryOperator::CreateAdd( 1079ecff11dcSJohannes Doerfert LoopPHI, Builder.getInt32(1), "polly.subregion.iv.inc"); 1080ecff11dcSJohannes Doerfert LoopPHI->insertBefore(BBCopy->begin()); 1081ecff11dcSJohannes Doerfert LoopPHIInc->insertBefore(BBCopy->getTerminator()); 1082ecff11dcSJohannes Doerfert 1083ecff11dcSJohannes Doerfert for (auto *PredBB : make_range(pred_begin(BB), pred_end(BB))) { 1084ecff11dcSJohannes Doerfert if (!R->contains(PredBB)) 1085ecff11dcSJohannes Doerfert continue; 1086ecff11dcSJohannes Doerfert if (L->contains(PredBB)) 1087ecff11dcSJohannes Doerfert LoopPHI->addIncoming(LoopPHIInc, BlockMap[PredBB]); 1088ecff11dcSJohannes Doerfert else 1089ecff11dcSJohannes Doerfert LoopPHI->addIncoming(NullVal, BlockMap[PredBB]); 1090ecff11dcSJohannes Doerfert } 1091ecff11dcSJohannes Doerfert 1092ecff11dcSJohannes Doerfert for (auto *PredBBCopy : make_range(pred_begin(BBCopy), pred_end(BBCopy))) 1093ecff11dcSJohannes Doerfert if (LoopPHI->getBasicBlockIndex(PredBBCopy) < 0) 1094ecff11dcSJohannes Doerfert LoopPHI->addIncoming(NullVal, PredBBCopy); 1095ecff11dcSJohannes Doerfert 1096ecff11dcSJohannes Doerfert LTS[L] = SE.getUnknown(LoopPHI); 1097ecff11dcSJohannes Doerfert } 1098ecff11dcSJohannes Doerfert 1099ecff11dcSJohannes Doerfert // Add all mappings from the region to the global map so outside uses will use 1100ecff11dcSJohannes Doerfert // the copied instructions. 1101ecff11dcSJohannes Doerfert for (auto &BBMap : RegionMaps) 1102ecff11dcSJohannes Doerfert GlobalMap.insert(BBMap.second.begin(), BBMap.second.end()); 1103ecff11dcSJohannes Doerfert 1104275a1756SJohannes Doerfert // Reset the old insert point for the build. 1105514f6efaSJohannes Doerfert Builder.SetInsertPoint(ExitBBCopy->begin()); 1106275a1756SJohannes Doerfert } 1107ecff11dcSJohannes Doerfert 1108ecff11dcSJohannes Doerfert void RegionGenerator::generateScalarLoads(ScopStmt &Stmt, 1109ecff11dcSJohannes Doerfert const Instruction *Inst, 1110ecff11dcSJohannes Doerfert ValueMapT &BBMap) { 1111ecff11dcSJohannes Doerfert 1112ecff11dcSJohannes Doerfert // Inside a non-affine region PHI nodes are copied not demoted. Once the 1113ecff11dcSJohannes Doerfert // phi is copied it will reload all inputs from outside the region, hence 1114ecff11dcSJohannes Doerfert // we do not need to generate code for the read access of the operands of a 1115ecff11dcSJohannes Doerfert // PHI. 1116ecff11dcSJohannes Doerfert if (isa<PHINode>(Inst)) 1117ecff11dcSJohannes Doerfert return; 1118ecff11dcSJohannes Doerfert 1119ecff11dcSJohannes Doerfert return BlockGenerator::generateScalarLoads(Stmt, Inst, BBMap); 1120ecff11dcSJohannes Doerfert } 1121ecff11dcSJohannes Doerfert 1122ecff11dcSJohannes Doerfert void RegionGenerator::generateScalarStores(ScopStmt &Stmt, BasicBlock *BB, 1123ecff11dcSJohannes Doerfert ValueMapT &BBMap, 1124ecff11dcSJohannes Doerfert ValueMapT &GlobalMap) { 1125ecff11dcSJohannes Doerfert const Region &R = Stmt.getParent()->getRegion(); 1126ecff11dcSJohannes Doerfert 1127ecff11dcSJohannes Doerfert Region *StmtR = Stmt.getRegion(); 1128ecff11dcSJohannes Doerfert assert(StmtR && "Block statements need to use the generateScalarStores() " 1129ecff11dcSJohannes Doerfert "function in the BlockGenerator"); 1130ecff11dcSJohannes Doerfert 1131ecff11dcSJohannes Doerfert for (MemoryAccess *MA : Stmt) { 1132ecff11dcSJohannes Doerfert 1133ecff11dcSJohannes Doerfert if (!MA->isScalar() || MA->isRead()) 1134ecff11dcSJohannes Doerfert continue; 1135ecff11dcSJohannes Doerfert 1136ecff11dcSJohannes Doerfert Instruction *ScalarBase = cast<Instruction>(MA->getBaseAddr()); 1137ecff11dcSJohannes Doerfert Instruction *ScalarInst = MA->getAccessInstruction(); 1138ecff11dcSJohannes Doerfert PHINode *ScalarBasePHI = dyn_cast<PHINode>(ScalarBase); 1139ecff11dcSJohannes Doerfert 114062139132STobias Grosser // Only generate accesses that belong to this basic block. 114162139132STobias Grosser if (ScalarInst->getParent() != BB) 114262139132STobias Grosser continue; 114362139132STobias Grosser 114492245228STobias Grosser Value *Val = nullptr; 1145ecff11dcSJohannes Doerfert AllocaInst *ScalarAddr = nullptr; 1146ecff11dcSJohannes Doerfert 114792245228STobias Grosser if (MA->getScopArrayInfo()->isPHI()) { 1148ecff11dcSJohannes Doerfert int PHIIdx = ScalarBasePHI->getBasicBlockIndex(BB); 1149ecff11dcSJohannes Doerfert ScalarAddr = getOrCreateAlloca(ScalarBase, PHIOpMap, ".phiops"); 115092245228STobias Grosser Val = ScalarBasePHI->getIncomingValue(PHIIdx); 115192245228STobias Grosser } else { 115292245228STobias Grosser ScalarAddr = getOrCreateAlloca(ScalarBase, ScalarMap, ".s2a"); 115392245228STobias Grosser Val = ScalarInst; 1154ecff11dcSJohannes Doerfert } 1155ecff11dcSJohannes Doerfert 115692245228STobias Grosser Val = getNewScalarValue(Val, R, ScalarMap, BBMap, GlobalMap); 115792245228STobias Grosser Builder.CreateStore(Val, ScalarAddr); 1158ecff11dcSJohannes Doerfert } 1159ecff11dcSJohannes Doerfert } 1160ecff11dcSJohannes Doerfert 1161ecff11dcSJohannes Doerfert void RegionGenerator::addOperandToPHI(ScopStmt &Stmt, const PHINode *PHI, 1162ecff11dcSJohannes Doerfert PHINode *PHICopy, BasicBlock *IncomingBB, 1163ecff11dcSJohannes Doerfert ValueMapT &GlobalMap, 1164ecff11dcSJohannes Doerfert LoopToScevMapT <S) { 1165ecff11dcSJohannes Doerfert Region *StmtR = Stmt.getRegion(); 1166ecff11dcSJohannes Doerfert 1167ecff11dcSJohannes Doerfert // If the incoming block was not yet copied mark this PHI as incomplete. 1168ecff11dcSJohannes Doerfert // Once the block will be copied the incoming value will be added. 1169ecff11dcSJohannes Doerfert BasicBlock *BBCopy = BlockMap[IncomingBB]; 1170ecff11dcSJohannes Doerfert if (!BBCopy) { 1171ecff11dcSJohannes Doerfert assert(StmtR->contains(IncomingBB) && 1172ecff11dcSJohannes Doerfert "Bad incoming block for PHI in non-affine region"); 1173ecff11dcSJohannes Doerfert IncompletePHINodeMap[IncomingBB].push_back(std::make_pair(PHI, PHICopy)); 1174ecff11dcSJohannes Doerfert return; 1175ecff11dcSJohannes Doerfert } 1176ecff11dcSJohannes Doerfert 1177ecff11dcSJohannes Doerfert Value *OpCopy = nullptr; 1178ecff11dcSJohannes Doerfert if (StmtR->contains(IncomingBB)) { 1179ecff11dcSJohannes Doerfert assert(RegionMaps.count(BBCopy) && 1180ecff11dcSJohannes Doerfert "Incoming PHI block did not have a BBMap"); 1181ecff11dcSJohannes Doerfert ValueMapT &BBCopyMap = RegionMaps[BBCopy]; 1182ecff11dcSJohannes Doerfert 1183ecff11dcSJohannes Doerfert Value *Op = PHI->getIncomingValueForBlock(IncomingBB); 1184ecff11dcSJohannes Doerfert OpCopy = 1185ecff11dcSJohannes Doerfert getNewValue(Stmt, Op, BBCopyMap, GlobalMap, LTS, getLoopForInst(PHI)); 1186ecff11dcSJohannes Doerfert } else { 1187ecff11dcSJohannes Doerfert 1188ecff11dcSJohannes Doerfert if (PHICopy->getBasicBlockIndex(BBCopy) >= 0) 1189ecff11dcSJohannes Doerfert return; 1190ecff11dcSJohannes Doerfert 1191ecff11dcSJohannes Doerfert AllocaInst *PHIOpAddr = 1192ecff11dcSJohannes Doerfert getOrCreateAlloca(const_cast<PHINode *>(PHI), PHIOpMap, ".phiops"); 1193ecff11dcSJohannes Doerfert OpCopy = new LoadInst(PHIOpAddr, PHIOpAddr->getName() + ".reload", 1194ecff11dcSJohannes Doerfert BlockMap[IncomingBB]->getTerminator()); 1195ecff11dcSJohannes Doerfert } 1196ecff11dcSJohannes Doerfert 1197ecff11dcSJohannes Doerfert assert(OpCopy && "Incoming PHI value was not copied properly"); 1198ecff11dcSJohannes Doerfert assert(BBCopy && "Incoming PHI block was not copied properly"); 1199ecff11dcSJohannes Doerfert PHICopy->addIncoming(OpCopy, BBCopy); 1200ecff11dcSJohannes Doerfert } 1201ecff11dcSJohannes Doerfert 1202ecff11dcSJohannes Doerfert Value *RegionGenerator::copyPHIInstruction(ScopStmt &Stmt, const PHINode *PHI, 1203ecff11dcSJohannes Doerfert ValueMapT &BBMap, 1204ecff11dcSJohannes Doerfert ValueMapT &GlobalMap, 1205ecff11dcSJohannes Doerfert LoopToScevMapT <S) { 1206ecff11dcSJohannes Doerfert unsigned NumIncoming = PHI->getNumIncomingValues(); 1207ecff11dcSJohannes Doerfert PHINode *PHICopy = 1208ecff11dcSJohannes Doerfert Builder.CreatePHI(PHI->getType(), NumIncoming, "polly." + PHI->getName()); 1209ecff11dcSJohannes Doerfert PHICopy->moveBefore(PHICopy->getParent()->getFirstNonPHI()); 1210ecff11dcSJohannes Doerfert BBMap[PHI] = PHICopy; 1211ecff11dcSJohannes Doerfert 1212ecff11dcSJohannes Doerfert for (unsigned u = 0; u < NumIncoming; u++) 1213ecff11dcSJohannes Doerfert addOperandToPHI(Stmt, PHI, PHICopy, PHI->getIncomingBlock(u), GlobalMap, 1214ecff11dcSJohannes Doerfert LTS); 1215ecff11dcSJohannes Doerfert return PHICopy; 1216ecff11dcSJohannes Doerfert } 1217