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" 17*8a846610SHongbin Zheng #include "polly/CodeGen/BlockGenerators.h" 183b11a16aSHongbin Zheng #include "polly/Support/GICHelper.h" 193b11a16aSHongbin Zheng 203b11a16aSHongbin Zheng #include "llvm/Transforms/Utils/BasicBlockUtils.h" 213b11a16aSHongbin Zheng #include "llvm/Support/CommandLine.h" 223b11a16aSHongbin Zheng 233b11a16aSHongbin Zheng #include "isl/aff.h" 243b11a16aSHongbin Zheng #include "isl/set.h" 253b11a16aSHongbin Zheng 263b11a16aSHongbin Zheng using namespace llvm; 273b11a16aSHongbin Zheng using namespace polly; 283b11a16aSHongbin Zheng 293b11a16aSHongbin Zheng static cl::opt<bool> 303b11a16aSHongbin Zheng Aligned("enable-polly-aligned", 313b11a16aSHongbin Zheng cl::desc("Assumed aligned memory accesses."), cl::Hidden, 323b11a16aSHongbin Zheng cl::value_desc("OpenMP code generation enabled if true"), 333b11a16aSHongbin Zheng cl::init(false), cl::ZeroOrMore); 343b11a16aSHongbin Zheng 353b11a16aSHongbin Zheng static cl::opt<bool> 363b11a16aSHongbin Zheng GroupedUnrolling("enable-polly-grouped-unroll", 373b11a16aSHongbin Zheng cl::desc("Perform grouped unrolling, but don't generate SIMD " 383b11a16aSHongbin Zheng "instuctions"), cl::Hidden, cl::init(false), 393b11a16aSHongbin Zheng cl::ZeroOrMore); 403b11a16aSHongbin Zheng // Helper class to generate memory location. 413b11a16aSHongbin Zheng namespace { 423b11a16aSHongbin Zheng class IslGenerator { 433b11a16aSHongbin Zheng public: 443b11a16aSHongbin Zheng IslGenerator(IRBuilder<> &Builder, std::vector<Value *> &IVS) : 453b11a16aSHongbin Zheng Builder(Builder), IVS(IVS) {} 463b11a16aSHongbin Zheng Value *generateIslInt(__isl_take isl_int Int); 473b11a16aSHongbin Zheng Value *generateIslAff(__isl_take isl_aff *Aff); 483b11a16aSHongbin Zheng Value *generateIslPwAff(__isl_take isl_pw_aff *PwAff); 493b11a16aSHongbin Zheng 503b11a16aSHongbin Zheng private: 513b11a16aSHongbin Zheng typedef struct { 523b11a16aSHongbin Zheng Value *Result; 533b11a16aSHongbin Zheng class IslGenerator *Generator; 543b11a16aSHongbin Zheng } IslGenInfo; 553b11a16aSHongbin Zheng 563b11a16aSHongbin Zheng IRBuilder<> &Builder; 573b11a16aSHongbin Zheng std::vector<Value *> &IVS; 583b11a16aSHongbin Zheng static int mergeIslAffValues(__isl_take isl_set *Set, 593b11a16aSHongbin Zheng __isl_take isl_aff *Aff, void *User); 603b11a16aSHongbin Zheng }; 613b11a16aSHongbin Zheng } 623b11a16aSHongbin Zheng 633b11a16aSHongbin Zheng 643b11a16aSHongbin Zheng Value *IslGenerator::generateIslInt(isl_int Int) { 653b11a16aSHongbin Zheng mpz_t IntMPZ; 663b11a16aSHongbin Zheng mpz_init(IntMPZ); 673b11a16aSHongbin Zheng isl_int_get_gmp(Int, IntMPZ); 683b11a16aSHongbin Zheng Value *IntValue = Builder.getInt(APInt_from_MPZ(IntMPZ)); 693b11a16aSHongbin Zheng mpz_clear(IntMPZ); 703b11a16aSHongbin Zheng return IntValue; 713b11a16aSHongbin Zheng } 723b11a16aSHongbin Zheng 733b11a16aSHongbin Zheng Value *IslGenerator::generateIslAff(__isl_take isl_aff *Aff) { 743b11a16aSHongbin Zheng Value *Result; 753b11a16aSHongbin Zheng Value *ConstValue; 763b11a16aSHongbin Zheng isl_int ConstIsl; 773b11a16aSHongbin Zheng 783b11a16aSHongbin Zheng isl_int_init(ConstIsl); 793b11a16aSHongbin Zheng isl_aff_get_constant(Aff, &ConstIsl); 803b11a16aSHongbin Zheng ConstValue = generateIslInt(ConstIsl); 813b11a16aSHongbin Zheng Type *Ty = Builder.getInt64Ty(); 823b11a16aSHongbin Zheng 833b11a16aSHongbin Zheng // FIXME: We should give the constant and coefficients the right type. Here 843b11a16aSHongbin Zheng // we force it into i64. 853b11a16aSHongbin Zheng Result = Builder.CreateSExtOrBitCast(ConstValue, Ty); 863b11a16aSHongbin Zheng 873b11a16aSHongbin Zheng unsigned int NbInputDims = isl_aff_dim(Aff, isl_dim_in); 883b11a16aSHongbin Zheng 893b11a16aSHongbin Zheng assert((IVS.size() == NbInputDims) && "The Dimension of Induction Variables" 903b11a16aSHongbin Zheng "must match the dimension of the affine space."); 913b11a16aSHongbin Zheng 923b11a16aSHongbin Zheng isl_int CoefficientIsl; 933b11a16aSHongbin Zheng isl_int_init(CoefficientIsl); 943b11a16aSHongbin Zheng 953b11a16aSHongbin Zheng for (unsigned int i = 0; i < NbInputDims; ++i) { 963b11a16aSHongbin Zheng Value *CoefficientValue; 973b11a16aSHongbin Zheng isl_aff_get_coefficient(Aff, isl_dim_in, i, &CoefficientIsl); 983b11a16aSHongbin Zheng 993b11a16aSHongbin Zheng if (isl_int_is_zero(CoefficientIsl)) 1003b11a16aSHongbin Zheng continue; 1013b11a16aSHongbin Zheng 1023b11a16aSHongbin Zheng CoefficientValue = generateIslInt(CoefficientIsl); 1033b11a16aSHongbin Zheng CoefficientValue = Builder.CreateIntCast(CoefficientValue, Ty, true); 1043b11a16aSHongbin Zheng Value *IV = Builder.CreateIntCast(IVS[i], Ty, true); 1053b11a16aSHongbin Zheng Value *PAdd = Builder.CreateMul(CoefficientValue, IV, "p_mul_coeff"); 1063b11a16aSHongbin Zheng Result = Builder.CreateAdd(Result, PAdd, "p_sum_coeff"); 1073b11a16aSHongbin Zheng } 1083b11a16aSHongbin Zheng 1093b11a16aSHongbin Zheng isl_int_clear(CoefficientIsl); 1103b11a16aSHongbin Zheng isl_int_clear(ConstIsl); 1113b11a16aSHongbin Zheng isl_aff_free(Aff); 1123b11a16aSHongbin Zheng 1133b11a16aSHongbin Zheng return Result; 1143b11a16aSHongbin Zheng } 1153b11a16aSHongbin Zheng 1163b11a16aSHongbin Zheng int IslGenerator::mergeIslAffValues(__isl_take isl_set *Set, 1173b11a16aSHongbin Zheng __isl_take isl_aff *Aff, void *User) { 1183b11a16aSHongbin Zheng IslGenInfo *GenInfo = (IslGenInfo *)User; 1193b11a16aSHongbin Zheng 1203b11a16aSHongbin Zheng assert((GenInfo->Result == NULL) && "Result is already set." 1213b11a16aSHongbin Zheng "Currently only single isl_aff is supported"); 1223b11a16aSHongbin Zheng assert(isl_set_plain_is_universe(Set) 1233b11a16aSHongbin Zheng && "Code generation failed because the set is not universe"); 1243b11a16aSHongbin Zheng 1253b11a16aSHongbin Zheng GenInfo->Result = GenInfo->Generator->generateIslAff(Aff); 1263b11a16aSHongbin Zheng 1273b11a16aSHongbin Zheng isl_set_free(Set); 1283b11a16aSHongbin Zheng return 0; 1293b11a16aSHongbin Zheng } 1303b11a16aSHongbin Zheng 1313b11a16aSHongbin Zheng Value *IslGenerator::generateIslPwAff(__isl_take isl_pw_aff *PwAff) { 1323b11a16aSHongbin Zheng IslGenInfo User; 1333b11a16aSHongbin Zheng User.Result = NULL; 1343b11a16aSHongbin Zheng User.Generator = this; 1353b11a16aSHongbin Zheng isl_pw_aff_foreach_piece(PwAff, mergeIslAffValues, &User); 1363b11a16aSHongbin Zheng assert(User.Result && "Code generation for isl_pw_aff failed"); 1373b11a16aSHongbin Zheng 1383b11a16aSHongbin Zheng isl_pw_aff_free(PwAff); 1393b11a16aSHongbin Zheng return User.Result; 1403b11a16aSHongbin Zheng } 1413b11a16aSHongbin Zheng 1423b11a16aSHongbin Zheng 1433b11a16aSHongbin Zheng BlockGenerator::BlockGenerator(IRBuilder<> &B, ScopStmt &Stmt, Pass *P): 1443b11a16aSHongbin Zheng Builder(B), Statement(Stmt), P(P) {} 1453b11a16aSHongbin Zheng 1463b11a16aSHongbin Zheng Value *BlockGenerator::getNewValue(const Value *Old, ValueMapT &BBMap, 1473b11a16aSHongbin Zheng ValueMapT &GlobalMap) { 1483b11a16aSHongbin Zheng // We assume constants never change. 1493b11a16aSHongbin Zheng // This avoids map lookups for many calls to this function. 1503b11a16aSHongbin Zheng if (isa<Constant>(Old)) 1513b11a16aSHongbin Zheng return const_cast<Value*>(Old); 1523b11a16aSHongbin Zheng 1533b11a16aSHongbin Zheng if (GlobalMap.count(Old)) { 1543b11a16aSHongbin Zheng Value *New = GlobalMap[Old]; 1553b11a16aSHongbin Zheng 1563b11a16aSHongbin Zheng if (Old->getType()->getScalarSizeInBits() 1573b11a16aSHongbin Zheng < New->getType()->getScalarSizeInBits()) 1583b11a16aSHongbin Zheng New = Builder.CreateTruncOrBitCast(New, Old->getType()); 1593b11a16aSHongbin Zheng 1603b11a16aSHongbin Zheng return New; 1613b11a16aSHongbin Zheng } 1623b11a16aSHongbin Zheng 1633b11a16aSHongbin Zheng if (BBMap.count(Old)) { 1643b11a16aSHongbin Zheng return BBMap[Old]; 1653b11a16aSHongbin Zheng } 1663b11a16aSHongbin Zheng 1673b11a16aSHongbin Zheng // 'Old' is within the original SCoP, but was not rewritten. 1683b11a16aSHongbin Zheng // 1693b11a16aSHongbin Zheng // Such values appear, if they only calculate information already available in 1703b11a16aSHongbin Zheng // the polyhedral description (e.g. an induction variable increment). They 1713b11a16aSHongbin Zheng // can be safely ignored. 1723b11a16aSHongbin Zheng if (const Instruction *Inst = dyn_cast<Instruction>(Old)) 1733b11a16aSHongbin Zheng if (Statement.getParent()->getRegion().contains(Inst->getParent())) 1743b11a16aSHongbin Zheng return NULL; 1753b11a16aSHongbin Zheng 1763b11a16aSHongbin Zheng // Everything else is probably a scop-constant value defined as global, 1773b11a16aSHongbin Zheng // function parameter or an instruction not within the scop. 1783b11a16aSHongbin Zheng return const_cast<Value*>(Old); 1793b11a16aSHongbin Zheng } 1803b11a16aSHongbin Zheng 1813b11a16aSHongbin Zheng void BlockGenerator::copyInstScalar(const Instruction *Inst, ValueMapT &BBMap, 1823b11a16aSHongbin Zheng ValueMapT &GlobalMap) { 1833b11a16aSHongbin Zheng Instruction *NewInst = Inst->clone(); 1843b11a16aSHongbin Zheng 1853b11a16aSHongbin Zheng // Replace old operands with the new ones. 1863b11a16aSHongbin Zheng for (Instruction::const_op_iterator OI = Inst->op_begin(), 1873b11a16aSHongbin Zheng OE = Inst->op_end(); OI != OE; ++OI) { 1883b11a16aSHongbin Zheng Value *OldOperand = *OI; 1893b11a16aSHongbin Zheng Value *NewOperand = getNewValue(OldOperand, BBMap, GlobalMap); 1903b11a16aSHongbin Zheng 1913b11a16aSHongbin Zheng if (!NewOperand) { 1923b11a16aSHongbin Zheng assert(!isa<StoreInst>(NewInst) 1933b11a16aSHongbin Zheng && "Store instructions are always needed!"); 1943b11a16aSHongbin Zheng delete NewInst; 1953b11a16aSHongbin Zheng return; 1963b11a16aSHongbin Zheng } 1973b11a16aSHongbin Zheng 1983b11a16aSHongbin Zheng NewInst->replaceUsesOfWith(OldOperand, NewOperand); 1993b11a16aSHongbin Zheng } 2003b11a16aSHongbin Zheng 2013b11a16aSHongbin Zheng Builder.Insert(NewInst); 2023b11a16aSHongbin Zheng BBMap[Inst] = NewInst; 2033b11a16aSHongbin Zheng 2043b11a16aSHongbin Zheng if (!NewInst->getType()->isVoidTy()) 2053b11a16aSHongbin Zheng NewInst->setName("p_" + Inst->getName()); 2063b11a16aSHongbin Zheng } 2073b11a16aSHongbin Zheng 2083b11a16aSHongbin Zheng std::vector<Value*> BlockGenerator::getMemoryAccessIndex( 2093b11a16aSHongbin Zheng __isl_keep isl_map *AccessRelation, Value *BaseAddress, 2103b11a16aSHongbin Zheng ValueMapT &BBMap, ValueMapT &GlobalMap) { 2113b11a16aSHongbin Zheng 2123b11a16aSHongbin Zheng assert((isl_map_dim(AccessRelation, isl_dim_out) == 1) 2133b11a16aSHongbin Zheng && "Only single dimensional access functions supported"); 2143b11a16aSHongbin Zheng 2153b11a16aSHongbin Zheng std::vector<Value *> IVS; 2163b11a16aSHongbin Zheng for (unsigned i = 0; i < Statement.getNumIterators(); ++i) { 2173b11a16aSHongbin Zheng const Value *OriginalIV = Statement.getInductionVariableForDimension(i); 2183b11a16aSHongbin Zheng Value *NewIV = getNewValue(OriginalIV, BBMap, GlobalMap); 2193b11a16aSHongbin Zheng IVS.push_back(NewIV); 2203b11a16aSHongbin Zheng } 2213b11a16aSHongbin Zheng 2223b11a16aSHongbin Zheng isl_pw_aff *PwAff = isl_map_dim_max(isl_map_copy(AccessRelation), 0); 2233b11a16aSHongbin Zheng IslGenerator IslGen(Builder, IVS); 2243b11a16aSHongbin Zheng Value *OffsetValue = IslGen.generateIslPwAff(PwAff); 2253b11a16aSHongbin Zheng 2263b11a16aSHongbin Zheng Type *Ty = Builder.getInt64Ty(); 2273b11a16aSHongbin Zheng OffsetValue = Builder.CreateIntCast(OffsetValue, Ty, true); 2283b11a16aSHongbin Zheng 2293b11a16aSHongbin Zheng std::vector<Value*> IndexArray; 2303b11a16aSHongbin Zheng Value *NullValue = Constant::getNullValue(Ty); 2313b11a16aSHongbin Zheng IndexArray.push_back(NullValue); 2323b11a16aSHongbin Zheng IndexArray.push_back(OffsetValue); 2333b11a16aSHongbin Zheng return IndexArray; 2343b11a16aSHongbin Zheng } 2353b11a16aSHongbin Zheng 2363b11a16aSHongbin Zheng Value *BlockGenerator::getNewAccessOperand( 2373b11a16aSHongbin Zheng __isl_keep isl_map *NewAccessRelation, Value *BaseAddress, 2383b11a16aSHongbin Zheng ValueMapT &BBMap, ValueMapT &GlobalMap) { 2393b11a16aSHongbin Zheng std::vector<Value*> IndexArray = getMemoryAccessIndex(NewAccessRelation, 2403b11a16aSHongbin Zheng BaseAddress, 2413b11a16aSHongbin Zheng BBMap, GlobalMap); 2423b11a16aSHongbin Zheng Value *NewOperand = Builder.CreateGEP(BaseAddress, IndexArray, 2433b11a16aSHongbin Zheng "p_newarrayidx_"); 2443b11a16aSHongbin Zheng return NewOperand; 2453b11a16aSHongbin Zheng } 2463b11a16aSHongbin Zheng 2473b11a16aSHongbin Zheng Value *BlockGenerator::generateLocationAccessed(const Instruction *Inst, 2483b11a16aSHongbin Zheng const Value *Pointer, 2493b11a16aSHongbin Zheng ValueMapT &BBMap, 2503b11a16aSHongbin Zheng ValueMapT &GlobalMap) { 2513b11a16aSHongbin Zheng MemoryAccess &Access = Statement.getAccessFor(Inst); 2523b11a16aSHongbin Zheng isl_map *CurrentAccessRelation = Access.getAccessRelation(); 2533b11a16aSHongbin Zheng isl_map *NewAccessRelation = Access.getNewAccessRelation(); 2543b11a16aSHongbin Zheng 2553b11a16aSHongbin Zheng assert(isl_map_has_equal_space(CurrentAccessRelation, NewAccessRelation) 2563b11a16aSHongbin Zheng && "Current and new access function use different spaces"); 2573b11a16aSHongbin Zheng 2583b11a16aSHongbin Zheng Value *NewPointer; 2593b11a16aSHongbin Zheng 2603b11a16aSHongbin Zheng if (!NewAccessRelation) { 2613b11a16aSHongbin Zheng NewPointer = getNewValue(Pointer, BBMap, GlobalMap); 2623b11a16aSHongbin Zheng } else { 2633b11a16aSHongbin Zheng Value *BaseAddress = const_cast<Value*>(Access.getBaseAddr()); 2643b11a16aSHongbin Zheng NewPointer = getNewAccessOperand(NewAccessRelation, BaseAddress, 2653b11a16aSHongbin Zheng BBMap, GlobalMap); 2663b11a16aSHongbin Zheng } 2673b11a16aSHongbin Zheng 2683b11a16aSHongbin Zheng isl_map_free(CurrentAccessRelation); 2693b11a16aSHongbin Zheng isl_map_free(NewAccessRelation); 2703b11a16aSHongbin Zheng return NewPointer; 2713b11a16aSHongbin Zheng } 2723b11a16aSHongbin Zheng 2733b11a16aSHongbin Zheng Value *BlockGenerator::generateScalarLoad(const LoadInst *Load, 2743b11a16aSHongbin Zheng ValueMapT &BBMap, 2753b11a16aSHongbin Zheng ValueMapT &GlobalMap) { 2763b11a16aSHongbin Zheng const Value *Pointer = Load->getPointerOperand(); 2773b11a16aSHongbin Zheng const Instruction *Inst = dyn_cast<Instruction>(Load); 2783b11a16aSHongbin Zheng Value *NewPointer = generateLocationAccessed(Inst, Pointer, BBMap, GlobalMap); 2793b11a16aSHongbin Zheng Value *ScalarLoad = Builder.CreateLoad(NewPointer, 2803b11a16aSHongbin Zheng Load->getName() + "_p_scalar_"); 2813b11a16aSHongbin Zheng return ScalarLoad; 2823b11a16aSHongbin Zheng } 2833b11a16aSHongbin Zheng 2843b11a16aSHongbin Zheng Value *BlockGenerator::generateScalarStore(const StoreInst *Store, 2853b11a16aSHongbin Zheng ValueMapT &BBMap, 2863b11a16aSHongbin Zheng ValueMapT &GlobalMap) { 2873b11a16aSHongbin Zheng const Value *Pointer = Store->getPointerOperand(); 2883b11a16aSHongbin Zheng Value *NewPointer = generateLocationAccessed(Store, Pointer, BBMap, 2893b11a16aSHongbin Zheng GlobalMap); 2903b11a16aSHongbin Zheng Value *ValueOperand = getNewValue(Store->getValueOperand(), BBMap, GlobalMap); 2913b11a16aSHongbin Zheng 2923b11a16aSHongbin Zheng return Builder.CreateStore(ValueOperand, NewPointer); 2933b11a16aSHongbin Zheng } 2943b11a16aSHongbin Zheng 2953b11a16aSHongbin Zheng void BlockGenerator::copyInstruction(const Instruction *Inst, 2963b11a16aSHongbin Zheng ValueMapT &BBMap, ValueMapT &GlobalMap) { 2973b11a16aSHongbin Zheng // Terminator instructions control the control flow. They are explicitly 2983b11a16aSHongbin Zheng // expressed in the clast and do not need to be copied. 2993b11a16aSHongbin Zheng if (Inst->isTerminator()) 3003b11a16aSHongbin Zheng return; 3013b11a16aSHongbin Zheng 3023b11a16aSHongbin Zheng if (const LoadInst *Load = dyn_cast<LoadInst>(Inst)) { 3033b11a16aSHongbin Zheng BBMap[Load] = generateScalarLoad(Load, BBMap, GlobalMap); 3043b11a16aSHongbin Zheng return; 3053b11a16aSHongbin Zheng } 3063b11a16aSHongbin Zheng 3073b11a16aSHongbin Zheng if (const StoreInst *Store = dyn_cast<StoreInst>(Inst)) { 3083b11a16aSHongbin Zheng BBMap[Store] = generateScalarStore(Store, BBMap, GlobalMap); 3093b11a16aSHongbin Zheng return; 3103b11a16aSHongbin Zheng } 3113b11a16aSHongbin Zheng 3123b11a16aSHongbin Zheng copyInstScalar(Inst, BBMap, GlobalMap); 3133b11a16aSHongbin Zheng } 3143b11a16aSHongbin Zheng 3153b11a16aSHongbin Zheng 3163b11a16aSHongbin Zheng void BlockGenerator::copyBB(ValueMapT &GlobalMap) { 3173b11a16aSHongbin Zheng BasicBlock *BB = Statement.getBasicBlock(); 3183b11a16aSHongbin Zheng BasicBlock *CopyBB = SplitBlock(Builder.GetInsertBlock(), 3193b11a16aSHongbin Zheng Builder.GetInsertPoint(), P); 3203b11a16aSHongbin Zheng CopyBB->setName("polly.stmt." + BB->getName()); 3213b11a16aSHongbin Zheng Builder.SetInsertPoint(CopyBB->begin()); 3223b11a16aSHongbin Zheng 3233b11a16aSHongbin Zheng ValueMapT BBMap; 3243b11a16aSHongbin Zheng 3253b11a16aSHongbin Zheng for (BasicBlock::const_iterator II = BB->begin(), IE = BB->end(); II != IE; 3263b11a16aSHongbin Zheng ++II) 3273b11a16aSHongbin Zheng copyInstruction(II, BBMap, GlobalMap); 3283b11a16aSHongbin Zheng } 3293b11a16aSHongbin Zheng 3303b11a16aSHongbin Zheng VectorBlockGenerator::VectorBlockGenerator(IRBuilder<> &B, 3313b11a16aSHongbin Zheng VectorValueMapT &GlobalMaps, ScopStmt &Stmt, __isl_keep isl_set *Domain, 3323b11a16aSHongbin Zheng Pass *P) : BlockGenerator(B, Stmt, P), GlobalMaps(GlobalMaps), 3333b11a16aSHongbin Zheng Domain(Domain) { 3343b11a16aSHongbin Zheng assert(GlobalMaps.size() > 1 && "Only one vector lane found"); 3353b11a16aSHongbin Zheng assert(Domain && "No statement domain provided"); 3363b11a16aSHongbin Zheng } 3373b11a16aSHongbin Zheng 3383b11a16aSHongbin Zheng Value *VectorBlockGenerator::getVectorValue(const Value *Old, 3393b11a16aSHongbin Zheng ValueMapT &VectorMap, 3403b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 3413b11a16aSHongbin Zheng if (VectorMap.count(Old)) 3423b11a16aSHongbin Zheng return VectorMap[Old]; 3433b11a16aSHongbin Zheng 3443b11a16aSHongbin Zheng int Width = getVectorWidth(); 3453b11a16aSHongbin Zheng 3463b11a16aSHongbin Zheng Value *Vector = UndefValue::get(VectorType::get(Old->getType(), Width)); 3473b11a16aSHongbin Zheng 3483b11a16aSHongbin Zheng for (int Lane = 0; Lane < Width; Lane++) 3493b11a16aSHongbin Zheng Vector = Builder.CreateInsertElement(Vector, 3503b11a16aSHongbin Zheng getNewValue(Old, 3513b11a16aSHongbin Zheng ScalarMaps[Lane], 3523b11a16aSHongbin Zheng GlobalMaps[Lane]), 3533b11a16aSHongbin Zheng Builder.getInt32(Lane)); 3543b11a16aSHongbin Zheng 3553b11a16aSHongbin Zheng VectorMap[Old] = Vector; 3563b11a16aSHongbin Zheng 3573b11a16aSHongbin Zheng return Vector; 3583b11a16aSHongbin Zheng } 3593b11a16aSHongbin Zheng 3603b11a16aSHongbin Zheng Type *VectorBlockGenerator::getVectorPtrTy(const Value *Val, int Width) { 3613b11a16aSHongbin Zheng PointerType *PointerTy = dyn_cast<PointerType>(Val->getType()); 3623b11a16aSHongbin Zheng assert(PointerTy && "PointerType expected"); 3633b11a16aSHongbin Zheng 3643b11a16aSHongbin Zheng Type *ScalarType = PointerTy->getElementType(); 3653b11a16aSHongbin Zheng VectorType *VectorType = VectorType::get(ScalarType, Width); 3663b11a16aSHongbin Zheng 3673b11a16aSHongbin Zheng return PointerType::getUnqual(VectorType); 3683b11a16aSHongbin Zheng } 3693b11a16aSHongbin Zheng 3703b11a16aSHongbin Zheng Value *VectorBlockGenerator::generateStrideOneLoad(const LoadInst *Load, 3713b11a16aSHongbin Zheng ValueMapT &BBMap) { 3723b11a16aSHongbin Zheng const Value *Pointer = Load->getPointerOperand(); 3733b11a16aSHongbin Zheng Type *VectorPtrType = getVectorPtrTy(Pointer, getVectorWidth()); 3743b11a16aSHongbin Zheng Value *NewPointer = getNewValue(Pointer, BBMap, GlobalMaps[0]); 3753b11a16aSHongbin Zheng Value *VectorPtr = Builder.CreateBitCast(NewPointer, VectorPtrType, 3763b11a16aSHongbin Zheng "vector_ptr"); 3773b11a16aSHongbin Zheng LoadInst *VecLoad = Builder.CreateLoad(VectorPtr, 3783b11a16aSHongbin Zheng Load->getName() + "_p_vec_full"); 3793b11a16aSHongbin Zheng if (!Aligned) 3803b11a16aSHongbin Zheng VecLoad->setAlignment(8); 3813b11a16aSHongbin Zheng 3823b11a16aSHongbin Zheng return VecLoad; 3833b11a16aSHongbin Zheng } 3843b11a16aSHongbin Zheng 3853b11a16aSHongbin Zheng Value *VectorBlockGenerator::generateStrideZeroLoad(const LoadInst *Load, 3863b11a16aSHongbin Zheng ValueMapT &BBMap) { 3873b11a16aSHongbin Zheng const Value *Pointer = Load->getPointerOperand(); 3883b11a16aSHongbin Zheng Type *VectorPtrType = getVectorPtrTy(Pointer, 1); 3893b11a16aSHongbin Zheng Value *NewPointer = getNewValue(Pointer, BBMap, GlobalMaps[0]); 3903b11a16aSHongbin Zheng Value *VectorPtr = Builder.CreateBitCast(NewPointer, VectorPtrType, 3913b11a16aSHongbin Zheng Load->getName() + "_p_vec_p"); 3923b11a16aSHongbin Zheng LoadInst *ScalarLoad= Builder.CreateLoad(VectorPtr, 3933b11a16aSHongbin Zheng Load->getName() + "_p_splat_one"); 3943b11a16aSHongbin Zheng 3953b11a16aSHongbin Zheng if (!Aligned) 3963b11a16aSHongbin Zheng ScalarLoad->setAlignment(8); 3973b11a16aSHongbin Zheng 3983b11a16aSHongbin Zheng Constant *SplatVector = 3993b11a16aSHongbin Zheng Constant::getNullValue(VectorType::get(Builder.getInt32Ty(), 4003b11a16aSHongbin Zheng getVectorWidth())); 4013b11a16aSHongbin Zheng 4023b11a16aSHongbin Zheng Value *VectorLoad = Builder.CreateShuffleVector(ScalarLoad, ScalarLoad, 4033b11a16aSHongbin Zheng SplatVector, 4043b11a16aSHongbin Zheng Load->getName() 4053b11a16aSHongbin Zheng + "_p_splat"); 4063b11a16aSHongbin Zheng return VectorLoad; 4073b11a16aSHongbin Zheng } 4083b11a16aSHongbin Zheng 4093b11a16aSHongbin Zheng Value *VectorBlockGenerator::generateUnknownStrideLoad(const LoadInst *Load, 4103b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 4113b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 4123b11a16aSHongbin Zheng const Value *Pointer = Load->getPointerOperand(); 4133b11a16aSHongbin Zheng VectorType *VectorType = VectorType::get( 4143b11a16aSHongbin Zheng dyn_cast<PointerType>(Pointer->getType())->getElementType(), VectorWidth); 4153b11a16aSHongbin Zheng 4163b11a16aSHongbin Zheng Value *Vector = UndefValue::get(VectorType); 4173b11a16aSHongbin Zheng 4183b11a16aSHongbin Zheng for (int i = 0; i < VectorWidth; i++) { 4193b11a16aSHongbin Zheng Value *NewPointer = getNewValue(Pointer, ScalarMaps[i], GlobalMaps[i]); 4203b11a16aSHongbin Zheng Value *ScalarLoad = Builder.CreateLoad(NewPointer, 4213b11a16aSHongbin Zheng Load->getName() + "_p_scalar_"); 4223b11a16aSHongbin Zheng Vector = Builder.CreateInsertElement(Vector, ScalarLoad, 4233b11a16aSHongbin Zheng Builder.getInt32(i), 4243b11a16aSHongbin Zheng Load->getName() + "_p_vec_"); 4253b11a16aSHongbin Zheng } 4263b11a16aSHongbin Zheng 4273b11a16aSHongbin Zheng return Vector; 4283b11a16aSHongbin Zheng } 4293b11a16aSHongbin Zheng 4303b11a16aSHongbin Zheng void VectorBlockGenerator::generateLoad(const LoadInst *Load, 4313b11a16aSHongbin Zheng ValueMapT &VectorMap, 4323b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 4333b11a16aSHongbin Zheng if (GroupedUnrolling || !VectorType::isValidElementType(Load->getType())) { 4343b11a16aSHongbin Zheng for (int i = 0; i < getVectorWidth(); i++) 4353b11a16aSHongbin Zheng ScalarMaps[i][Load] = generateScalarLoad(Load, ScalarMaps[i], 4363b11a16aSHongbin Zheng GlobalMaps[i]); 4373b11a16aSHongbin Zheng return; 4383b11a16aSHongbin Zheng } 4393b11a16aSHongbin Zheng 4403b11a16aSHongbin Zheng MemoryAccess &Access = Statement.getAccessFor(Load); 4413b11a16aSHongbin Zheng 4423b11a16aSHongbin Zheng Value *NewLoad; 4433b11a16aSHongbin Zheng if (Access.isStrideZero(isl_set_copy(Domain))) 4443b11a16aSHongbin Zheng NewLoad = generateStrideZeroLoad(Load, ScalarMaps[0]); 4453b11a16aSHongbin Zheng else if (Access.isStrideOne(isl_set_copy(Domain))) 4463b11a16aSHongbin Zheng NewLoad = generateStrideOneLoad(Load, ScalarMaps[0]); 4473b11a16aSHongbin Zheng else 4483b11a16aSHongbin Zheng NewLoad = generateUnknownStrideLoad(Load, ScalarMaps); 4493b11a16aSHongbin Zheng 4503b11a16aSHongbin Zheng VectorMap[Load] = NewLoad; 4513b11a16aSHongbin Zheng } 4523b11a16aSHongbin Zheng 4533b11a16aSHongbin Zheng void VectorBlockGenerator::copyUnaryInst(const UnaryInstruction *Inst, 4543b11a16aSHongbin Zheng ValueMapT &VectorMap, 4553b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 4563b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 4573b11a16aSHongbin Zheng Value *NewOperand = getVectorValue(Inst->getOperand(0), VectorMap, 4583b11a16aSHongbin Zheng ScalarMaps); 4593b11a16aSHongbin Zheng 4603b11a16aSHongbin Zheng assert(isa<CastInst>(Inst) && "Can not generate vector code for instruction"); 4613b11a16aSHongbin Zheng 4623b11a16aSHongbin Zheng const CastInst *Cast = dyn_cast<CastInst>(Inst); 4633b11a16aSHongbin Zheng VectorType *DestType = VectorType::get(Inst->getType(), VectorWidth); 4643b11a16aSHongbin Zheng VectorMap[Inst] = Builder.CreateCast(Cast->getOpcode(), NewOperand, DestType); 4653b11a16aSHongbin Zheng } 4663b11a16aSHongbin Zheng 4673b11a16aSHongbin Zheng void VectorBlockGenerator::copyBinaryInst(const BinaryOperator *Inst, 4683b11a16aSHongbin Zheng ValueMapT &VectorMap, 4693b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 4703b11a16aSHongbin Zheng Value *OpZero = Inst->getOperand(0); 4713b11a16aSHongbin Zheng Value *OpOne = Inst->getOperand(1); 4723b11a16aSHongbin Zheng 4733b11a16aSHongbin Zheng Value *NewOpZero, *NewOpOne; 4743b11a16aSHongbin Zheng NewOpZero = getVectorValue(OpZero, VectorMap, ScalarMaps); 4753b11a16aSHongbin Zheng NewOpOne = getVectorValue(OpOne, VectorMap, ScalarMaps); 4763b11a16aSHongbin Zheng 4773b11a16aSHongbin Zheng Value *NewInst = Builder.CreateBinOp(Inst->getOpcode(), NewOpZero, 4783b11a16aSHongbin Zheng NewOpOne, 4793b11a16aSHongbin Zheng Inst->getName() + "p_vec"); 4803b11a16aSHongbin Zheng VectorMap[Inst] = NewInst; 4813b11a16aSHongbin Zheng } 4823b11a16aSHongbin Zheng 4833b11a16aSHongbin Zheng void VectorBlockGenerator::copyStore(const StoreInst *Store, 4843b11a16aSHongbin Zheng ValueMapT &VectorMap, 4853b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 4863b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 4873b11a16aSHongbin Zheng 4883b11a16aSHongbin Zheng MemoryAccess &Access = Statement.getAccessFor(Store); 4893b11a16aSHongbin Zheng 4903b11a16aSHongbin Zheng const Value *Pointer = Store->getPointerOperand(); 4913b11a16aSHongbin Zheng Value *Vector = getVectorValue(Store->getValueOperand(), VectorMap, 4923b11a16aSHongbin Zheng ScalarMaps); 4933b11a16aSHongbin Zheng 4943b11a16aSHongbin Zheng if (Access.isStrideOne(isl_set_copy(Domain))) { 4953b11a16aSHongbin Zheng Type *VectorPtrType = getVectorPtrTy(Pointer, VectorWidth); 4963b11a16aSHongbin Zheng Value *NewPointer = getNewValue(Pointer, ScalarMaps[0], GlobalMaps[0]); 4973b11a16aSHongbin Zheng 4983b11a16aSHongbin Zheng Value *VectorPtr = Builder.CreateBitCast(NewPointer, VectorPtrType, 4993b11a16aSHongbin Zheng "vector_ptr"); 5003b11a16aSHongbin Zheng StoreInst *Store = Builder.CreateStore(Vector, VectorPtr); 5013b11a16aSHongbin Zheng 5023b11a16aSHongbin Zheng if (!Aligned) 5033b11a16aSHongbin Zheng Store->setAlignment(8); 5043b11a16aSHongbin Zheng } else { 5053b11a16aSHongbin Zheng for (unsigned i = 0; i < ScalarMaps.size(); i++) { 5063b11a16aSHongbin Zheng Value *Scalar = Builder.CreateExtractElement(Vector, 5073b11a16aSHongbin Zheng Builder.getInt32(i)); 5083b11a16aSHongbin Zheng Value *NewPointer = getNewValue(Pointer, ScalarMaps[i], GlobalMaps[i]); 5093b11a16aSHongbin Zheng Builder.CreateStore(Scalar, NewPointer); 5103b11a16aSHongbin Zheng } 5113b11a16aSHongbin Zheng } 5123b11a16aSHongbin Zheng } 5133b11a16aSHongbin Zheng 5143b11a16aSHongbin Zheng bool VectorBlockGenerator::hasVectorOperands(const Instruction *Inst, 5153b11a16aSHongbin Zheng ValueMapT &VectorMap) { 5163b11a16aSHongbin Zheng for (Instruction::const_op_iterator OI = Inst->op_begin(), 5173b11a16aSHongbin Zheng OE = Inst->op_end(); OI != OE; ++OI) 5183b11a16aSHongbin Zheng if (VectorMap.count(*OI)) 5193b11a16aSHongbin Zheng return true; 5203b11a16aSHongbin Zheng return false; 5213b11a16aSHongbin Zheng } 5223b11a16aSHongbin Zheng 5233b11a16aSHongbin Zheng bool VectorBlockGenerator::extractScalarValues(const Instruction *Inst, 5243b11a16aSHongbin Zheng ValueMapT &VectorMap, 5253b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 5263b11a16aSHongbin Zheng bool HasVectorOperand = false; 5273b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 5283b11a16aSHongbin Zheng 5293b11a16aSHongbin Zheng for (Instruction::const_op_iterator OI = Inst->op_begin(), 5303b11a16aSHongbin Zheng OE = Inst->op_end(); OI != OE; ++OI) { 5313b11a16aSHongbin Zheng ValueMapT::iterator VecOp = VectorMap.find(*OI); 5323b11a16aSHongbin Zheng 5333b11a16aSHongbin Zheng if (VecOp == VectorMap.end()) 5343b11a16aSHongbin Zheng continue; 5353b11a16aSHongbin Zheng 5363b11a16aSHongbin Zheng HasVectorOperand = true; 5373b11a16aSHongbin Zheng Value *NewVector = VecOp->second; 5383b11a16aSHongbin Zheng 5393b11a16aSHongbin Zheng for (int i = 0; i < VectorWidth; ++i) { 5403b11a16aSHongbin Zheng ValueMapT &SM = ScalarMaps[i]; 5413b11a16aSHongbin Zheng 5423b11a16aSHongbin Zheng // If there is one scalar extracted, all scalar elements should have 5433b11a16aSHongbin Zheng // already been extracted by the code here. So no need to check for the 5443b11a16aSHongbin Zheng // existance of all of them. 5453b11a16aSHongbin Zheng if (SM.count(*OI)) 5463b11a16aSHongbin Zheng break; 5473b11a16aSHongbin Zheng 5483b11a16aSHongbin Zheng SM[*OI] = Builder.CreateExtractElement(NewVector, Builder.getInt32(i)); 5493b11a16aSHongbin Zheng } 5503b11a16aSHongbin Zheng } 5513b11a16aSHongbin Zheng 5523b11a16aSHongbin Zheng return HasVectorOperand; 5533b11a16aSHongbin Zheng } 5543b11a16aSHongbin Zheng 5553b11a16aSHongbin Zheng void VectorBlockGenerator::copyInstScalarized(const Instruction *Inst, 5563b11a16aSHongbin Zheng ValueMapT &VectorMap, 5573b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 5583b11a16aSHongbin Zheng bool HasVectorOperand; 5593b11a16aSHongbin Zheng int VectorWidth = getVectorWidth(); 5603b11a16aSHongbin Zheng 5613b11a16aSHongbin Zheng HasVectorOperand = extractScalarValues(Inst, VectorMap, ScalarMaps); 5623b11a16aSHongbin Zheng 5633b11a16aSHongbin Zheng for (int VectorLane = 0; VectorLane < getVectorWidth(); VectorLane++) 5643b11a16aSHongbin Zheng copyInstScalar(Inst, ScalarMaps[VectorLane], GlobalMaps[VectorLane]); 5653b11a16aSHongbin Zheng 5663b11a16aSHongbin Zheng if (!VectorType::isValidElementType(Inst->getType()) || !HasVectorOperand) 5673b11a16aSHongbin Zheng return; 5683b11a16aSHongbin Zheng 5693b11a16aSHongbin Zheng // Make the result available as vector value. 5703b11a16aSHongbin Zheng VectorType *VectorType = VectorType::get(Inst->getType(), VectorWidth); 5713b11a16aSHongbin Zheng Value *Vector = UndefValue::get(VectorType); 5723b11a16aSHongbin Zheng 5733b11a16aSHongbin Zheng for (int i = 0; i < VectorWidth; i++) 5743b11a16aSHongbin Zheng Vector = Builder.CreateInsertElement(Vector, ScalarMaps[i][Inst], 5753b11a16aSHongbin Zheng Builder.getInt32(i)); 5763b11a16aSHongbin Zheng 5773b11a16aSHongbin Zheng VectorMap[Inst] = Vector; 5783b11a16aSHongbin Zheng } 5793b11a16aSHongbin Zheng 5803b11a16aSHongbin Zheng int VectorBlockGenerator::getVectorWidth() { 5813b11a16aSHongbin Zheng return GlobalMaps.size(); 5823b11a16aSHongbin Zheng } 5833b11a16aSHongbin Zheng 5843b11a16aSHongbin Zheng void VectorBlockGenerator::copyInstruction(const Instruction *Inst, 5853b11a16aSHongbin Zheng ValueMapT &VectorMap, 5863b11a16aSHongbin Zheng VectorValueMapT &ScalarMaps) { 5873b11a16aSHongbin Zheng // Terminator instructions control the control flow. They are explicitly 5883b11a16aSHongbin Zheng // expressed in the clast and do not need to be copied. 5893b11a16aSHongbin Zheng if (Inst->isTerminator()) 5903b11a16aSHongbin Zheng return; 5913b11a16aSHongbin Zheng 5923b11a16aSHongbin Zheng if (const LoadInst *Load = dyn_cast<LoadInst>(Inst)) { 5933b11a16aSHongbin Zheng generateLoad(Load, VectorMap, ScalarMaps); 5943b11a16aSHongbin Zheng return; 5953b11a16aSHongbin Zheng } 5963b11a16aSHongbin Zheng 5973b11a16aSHongbin Zheng if (hasVectorOperands(Inst, VectorMap)) { 5983b11a16aSHongbin Zheng if (const StoreInst *Store = dyn_cast<StoreInst>(Inst)) { 5993b11a16aSHongbin Zheng copyStore(Store, VectorMap, ScalarMaps); 6003b11a16aSHongbin Zheng return; 6013b11a16aSHongbin Zheng } 6023b11a16aSHongbin Zheng 6033b11a16aSHongbin Zheng if (const UnaryInstruction *Unary = dyn_cast<UnaryInstruction>(Inst)) { 6043b11a16aSHongbin Zheng copyUnaryInst(Unary, VectorMap, ScalarMaps); 6053b11a16aSHongbin Zheng return; 6063b11a16aSHongbin Zheng } 6073b11a16aSHongbin Zheng 6083b11a16aSHongbin Zheng if (const BinaryOperator *Binary = dyn_cast<BinaryOperator>(Inst)) { 6093b11a16aSHongbin Zheng copyBinaryInst(Binary, VectorMap, ScalarMaps); 6103b11a16aSHongbin Zheng return; 6113b11a16aSHongbin Zheng } 6123b11a16aSHongbin Zheng 6133b11a16aSHongbin Zheng // Falltrough: We generate scalar instructions, if we don't know how to 6143b11a16aSHongbin Zheng // generate vector code. 6153b11a16aSHongbin Zheng } 6163b11a16aSHongbin Zheng 6173b11a16aSHongbin Zheng copyInstScalarized(Inst, VectorMap, ScalarMaps); 6183b11a16aSHongbin Zheng } 6193b11a16aSHongbin Zheng 6203b11a16aSHongbin Zheng void VectorBlockGenerator::copyBB() { 6213b11a16aSHongbin Zheng BasicBlock *BB = Statement.getBasicBlock(); 6223b11a16aSHongbin Zheng BasicBlock *CopyBB = SplitBlock(Builder.GetInsertBlock(), 6233b11a16aSHongbin Zheng Builder.GetInsertPoint(), P); 6243b11a16aSHongbin Zheng CopyBB->setName("polly.stmt." + BB->getName()); 6253b11a16aSHongbin Zheng Builder.SetInsertPoint(CopyBB->begin()); 6263b11a16aSHongbin Zheng 6273b11a16aSHongbin Zheng // Create two maps that store the mapping from the original instructions of 6283b11a16aSHongbin Zheng // the old basic block to their copies in the new basic block. Those maps 6293b11a16aSHongbin Zheng // are basic block local. 6303b11a16aSHongbin Zheng // 6313b11a16aSHongbin Zheng // As vector code generation is supported there is one map for scalar values 6323b11a16aSHongbin Zheng // and one for vector values. 6333b11a16aSHongbin Zheng // 6343b11a16aSHongbin Zheng // In case we just do scalar code generation, the vectorMap is not used and 6353b11a16aSHongbin Zheng // the scalarMap has just one dimension, which contains the mapping. 6363b11a16aSHongbin Zheng // 6373b11a16aSHongbin Zheng // In case vector code generation is done, an instruction may either appear 6383b11a16aSHongbin Zheng // in the vector map once (as it is calculating >vectorwidth< values at a 6393b11a16aSHongbin Zheng // time. Or (if the values are calculated using scalar operations), it 6403b11a16aSHongbin Zheng // appears once in every dimension of the scalarMap. 6413b11a16aSHongbin Zheng VectorValueMapT ScalarBlockMap(getVectorWidth()); 6423b11a16aSHongbin Zheng ValueMapT VectorBlockMap; 6433b11a16aSHongbin Zheng 6443b11a16aSHongbin Zheng for (BasicBlock::const_iterator II = BB->begin(), IE = BB->end(); 6453b11a16aSHongbin Zheng II != IE; ++II) 6463b11a16aSHongbin Zheng copyInstruction(II, VectorBlockMap, ScalarBlockMap); 6473b11a16aSHongbin Zheng } 648