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"
1783628182STobias Grosser #include "isl/aff.h"
18a63b2579SJohannes Doerfert #include "isl/ast.h"
19a63b2579SJohannes Doerfert #include "isl/ast_build.h"
2083628182STobias Grosser #include "isl/set.h"
218a846610SHongbin Zheng #include "polly/CodeGen/BlockGenerators.h"
2283628182STobias Grosser #include "polly/CodeGen/CodeGeneration.h"
23a63b2579SJohannes Doerfert #include "polly/CodeGen/IslExprBuilder.h"
24637bd631STobias Grosser #include "polly/Options.h"
253b11a16aSHongbin Zheng #include "polly/Support/GICHelper.h"
2697cb813cSSebastian Pop #include "polly/Support/SCEVValidator.h"
27ecfe21b7STobias Grosser #include "polly/Support/ScopHelper.h"
28e71c6ab5STobias Grosser #include "llvm/Analysis/LoopInfo.h"
29e71c6ab5STobias Grosser #include "llvm/Analysis/ScalarEvolution.h"
30e71c6ab5STobias Grosser #include "llvm/Analysis/ScalarEvolutionExpander.h"
31030237d0STobias Grosser #include "llvm/IR/IntrinsicInst.h"
323b11a16aSHongbin Zheng #include "llvm/Transforms/Utils/BasicBlockUtils.h"
333b11a16aSHongbin Zheng 
343b11a16aSHongbin Zheng using namespace llvm;
353b11a16aSHongbin Zheng using namespace polly;
363b11a16aSHongbin Zheng 
37*878aba49STobias Grosser static cl::opt<bool> Aligned("enable-polly-aligned",
38*878aba49STobias Grosser                              cl::desc("Assumed aligned memory accesses."),
39*878aba49STobias Grosser                              cl::Hidden, cl::init(false), cl::ZeroOrMore,
40*878aba49STobias Grosser                              cl::cat(PollyCategory));
413b11a16aSHongbin Zheng 
42e602a076STobias Grosser static cl::opt<bool, true>
43483a90d1STobias Grosser     SCEVCodegenF("polly-codegen-scev",
44483a90d1STobias Grosser                  cl::desc("Use SCEV based code generation."), cl::Hidden,
45483a90d1STobias Grosser                  cl::location(SCEVCodegen), cl::init(false), cl::ZeroOrMore,
46483a90d1STobias Grosser                  cl::cat(PollyCategory));
47ecfe21b7STobias Grosser 
48ecfe21b7STobias Grosser bool polly::SCEVCodegen;
49ecfe21b7STobias Grosser 
50ecfe21b7STobias Grosser bool polly::canSynthesize(const Instruction *I, const llvm::LoopInfo *LI,
51ecfe21b7STobias Grosser                           ScalarEvolution *SE, const Region *R) {
52ecfe21b7STobias Grosser   if (SCEVCodegen) {
53ecfe21b7STobias Grosser     if (!I || !SE->isSCEVable(I->getType()))
54ecfe21b7STobias Grosser       return false;
55ecfe21b7STobias Grosser 
56ecfe21b7STobias Grosser     if (const SCEV *Scev = SE->getSCEV(const_cast<Instruction *>(I)))
57ecfe21b7STobias Grosser       if (!isa<SCEVCouldNotCompute>(Scev))
58ecfe21b7STobias Grosser         if (!hasScalarDepsInsideRegion(Scev, R))
59ecfe21b7STobias Grosser           return true;
60ecfe21b7STobias Grosser 
61ecfe21b7STobias Grosser     return false;
62ecfe21b7STobias Grosser   }
63ecfe21b7STobias Grosser 
64ecfe21b7STobias Grosser   Loop *L = LI->getLoopFor(I->getParent());
65e8df5bd9STobias Grosser   return L && I == L->getCanonicalInductionVariable() && R->contains(L);
66ecfe21b7STobias Grosser }
67ecfe21b7STobias Grosser 
68a63b2579SJohannes Doerfert BlockGenerator::BlockGenerator(PollyIRBuilder &B, ScopStmt &Stmt, Pass *P,
692ef3f4fdSJohannes Doerfert                                LoopInfo &LI, ScalarEvolution &SE,
70a63b2579SJohannes Doerfert                                isl_ast_build *Build,
71a63b2579SJohannes Doerfert                                IslExprBuilder *ExprBuilder)
722ef3f4fdSJohannes Doerfert     : Builder(B), Statement(Stmt), P(P), LI(LI), SE(SE), Build(Build),
732ef3f4fdSJohannes Doerfert       ExprBuilder(ExprBuilder) {}
74e71c6ab5STobias Grosser 
755b463ceaSHongbin Zheng Value *BlockGenerator::lookupAvailableValue(const Value *Old, ValueMapT &BBMap,
765b463ceaSHongbin Zheng                                             ValueMapT &GlobalMap) const {
773b11a16aSHongbin Zheng   // We assume constants never change.
783b11a16aSHongbin Zheng   // This avoids map lookups for many calls to this function.
793b11a16aSHongbin Zheng   if (isa<Constant>(Old))
803b11a16aSHongbin Zheng     return const_cast<Value *>(Old);
813b11a16aSHongbin Zheng 
82fe11e287SHongbin Zheng   if (Value *New = GlobalMap.lookup(Old)) {
83c14582f2STobias Grosser     if (Old->getType()->getScalarSizeInBits() <
84c14582f2STobias Grosser         New->getType()->getScalarSizeInBits())
853b11a16aSHongbin Zheng       New = Builder.CreateTruncOrBitCast(New, Old->getType());
863b11a16aSHongbin Zheng 
873b11a16aSHongbin Zheng     return New;
883b11a16aSHongbin Zheng   }
893b11a16aSHongbin Zheng 
905b463ceaSHongbin Zheng   // Or it is probably a scop-constant value defined as global, function
915b463ceaSHongbin Zheng   // parameter or an instruction not within the scop.
925b463ceaSHongbin Zheng   if (isa<GlobalValue>(Old) || isa<Argument>(Old))
935b463ceaSHongbin Zheng     return const_cast<Value *>(Old);
945b463ceaSHongbin Zheng 
955b463ceaSHongbin Zheng   if (const Instruction *Inst = dyn_cast<Instruction>(Old))
965b463ceaSHongbin Zheng     if (!Statement.getParent()->getRegion().contains(Inst->getParent()))
975b463ceaSHongbin Zheng       return const_cast<Value *>(Old);
985b463ceaSHongbin Zheng 
99fe11e287SHongbin Zheng   if (Value *New = BBMap.lookup(Old))
100fe11e287SHongbin Zheng     return New;
1013b11a16aSHongbin Zheng 
1025a56cbf4STobias Grosser   return nullptr;
1035b463ceaSHongbin Zheng }
1045b463ceaSHongbin Zheng 
1055b463ceaSHongbin Zheng Value *BlockGenerator::getNewValue(const Value *Old, ValueMapT &BBMap,
1065b463ceaSHongbin Zheng                                    ValueMapT &GlobalMap, LoopToScevMapT &LTS,
1075b463ceaSHongbin Zheng                                    Loop *L) {
1085b463ceaSHongbin Zheng   if (Value *New = lookupAvailableValue(Old, BBMap, GlobalMap))
1095b463ceaSHongbin Zheng     return New;
1105b463ceaSHongbin Zheng 
111e71c6ab5STobias Grosser   if (SCEVCodegen && 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);
119e71c6ab5STobias Grosser         SCEVExpander Expander(SE, "polly");
120e71c6ab5STobias Grosser         Value *Expanded = Expander.expandCodeFor(NewScev, Old->getType(),
121e71c6ab5STobias Grosser                                                  Builder.GetInsertPoint());
122e71c6ab5STobias Grosser 
123e71c6ab5STobias Grosser         BBMap[Old] = Expanded;
124e71c6ab5STobias Grosser         return Expanded;
125e71c6ab5STobias Grosser       }
126369430ffSTobias Grosser     }
127e71c6ab5STobias Grosser 
1285b463ceaSHongbin Zheng   // Now the scalar dependence is neither available nor SCEVCodegenable, this
1295b463ceaSHongbin Zheng   // should never happen in the current code generator.
1305b463ceaSHongbin Zheng   llvm_unreachable("Unexpected scalar dependence in region!");
1315a56cbf4STobias Grosser   return nullptr;
1323b11a16aSHongbin Zheng }
1333b11a16aSHongbin Zheng 
1343b11a16aSHongbin Zheng void BlockGenerator::copyInstScalar(const Instruction *Inst, ValueMapT &BBMap,
1359d10fffaSSebastian Pop                                     ValueMapT &GlobalMap, LoopToScevMapT &LTS) {
136030237d0STobias Grosser   // We do not generate debug intrinsics as we did not investigate how to
137030237d0STobias Grosser   // copy them correctly. At the current state, they just crash the code
138030237d0STobias Grosser   // generation as the meta-data operands are not correctly copied.
139030237d0STobias Grosser   if (isa<DbgInfoIntrinsic>(Inst))
140030237d0STobias Grosser     return;
141030237d0STobias Grosser 
1423b11a16aSHongbin Zheng   Instruction *NewInst = Inst->clone();
1433b11a16aSHongbin Zheng 
1443b11a16aSHongbin Zheng   // Replace old operands with the new ones.
14591f5b262STobias Grosser   for (Value *OldOperand : Inst->operands()) {
146369430ffSTobias Grosser     Value *NewOperand =
147369430ffSTobias Grosser         getNewValue(OldOperand, BBMap, GlobalMap, LTS, getLoopForInst(Inst));
1483b11a16aSHongbin Zheng 
1493b11a16aSHongbin Zheng     if (!NewOperand) {
150c14582f2STobias Grosser       assert(!isa<StoreInst>(NewInst) &&
151c14582f2STobias Grosser              "Store instructions are always needed!");
1523b11a16aSHongbin Zheng       delete NewInst;
1533b11a16aSHongbin Zheng       return;
1543b11a16aSHongbin Zheng     }
1553b11a16aSHongbin Zheng 
1563b11a16aSHongbin Zheng     NewInst->replaceUsesOfWith(OldOperand, NewOperand);
1573b11a16aSHongbin Zheng   }
1583b11a16aSHongbin Zheng 
1593b11a16aSHongbin Zheng   Builder.Insert(NewInst);
1603b11a16aSHongbin Zheng   BBMap[Inst] = NewInst;
1613b11a16aSHongbin Zheng 
1623b11a16aSHongbin Zheng   if (!NewInst->getType()->isVoidTy())
1633b11a16aSHongbin Zheng     NewInst->setName("p_" + Inst->getName());
1643b11a16aSHongbin Zheng }
1653b11a16aSHongbin Zheng 
166a63b2579SJohannes Doerfert Value *BlockGenerator::getNewAccessOperand(const MemoryAccess &MA) {
167a99130f0SJohannes Doerfert   isl_pw_multi_aff *PWAccRel;
168a99130f0SJohannes Doerfert   isl_union_map *Schedule;
169a63b2579SJohannes Doerfert   isl_ast_expr *Expr;
1703b11a16aSHongbin Zheng 
171a63b2579SJohannes Doerfert   assert(ExprBuilder && Build &&
172a63b2579SJohannes Doerfert          "Cannot generate new value without IslExprBuilder!");
1733b11a16aSHongbin Zheng 
174a99130f0SJohannes Doerfert   Schedule = isl_ast_build_get_schedule(Build);
175a99130f0SJohannes Doerfert   PWAccRel = MA.applyScheduleToAccessRelation(Schedule);
1763b11a16aSHongbin Zheng 
177a63b2579SJohannes Doerfert   Expr = isl_ast_build_access_from_pw_multi_aff(Build, PWAccRel);
178dcb5f1dcSJohannes Doerfert   Expr = isl_ast_expr_address_of(Expr);
179a63b2579SJohannes Doerfert 
180a63b2579SJohannes Doerfert   return ExprBuilder->create(Expr);
1813b11a16aSHongbin Zheng }
1823b11a16aSHongbin Zheng 
183e602a076STobias Grosser Value *BlockGenerator::generateLocationAccessed(const Instruction *Inst,
184e602a076STobias Grosser                                                 const Value *Pointer,
185e602a076STobias Grosser                                                 ValueMapT &BBMap,
186e602a076STobias Grosser                                                 ValueMapT &GlobalMap,
187e602a076STobias Grosser                                                 LoopToScevMapT &LTS) {
188a63b2579SJohannes Doerfert   const MemoryAccess &MA = Statement.getAccessFor(Inst);
1893b11a16aSHongbin Zheng 
1903b11a16aSHongbin Zheng   Value *NewPointer;
191a99130f0SJohannes Doerfert   if (MA.hasNewAccessRelation())
192a63b2579SJohannes Doerfert     NewPointer = getNewAccessOperand(MA);
193a63b2579SJohannes Doerfert   else
194369430ffSTobias Grosser     NewPointer =
195369430ffSTobias Grosser         getNewValue(Pointer, BBMap, GlobalMap, LTS, getLoopForInst(Inst));
1963b11a16aSHongbin Zheng 
1973b11a16aSHongbin Zheng   return NewPointer;
1983b11a16aSHongbin Zheng }
1993b11a16aSHongbin Zheng 
2004d96c8d7STobias Grosser Loop *BlockGenerator::getLoopForInst(const llvm::Instruction *Inst) {
2012ef3f4fdSJohannes Doerfert   return LI.getLoopFor(Inst->getParent());
202369430ffSTobias Grosser }
203369430ffSTobias Grosser 
204e602a076STobias Grosser Value *BlockGenerator::generateScalarLoad(const LoadInst *Load,
205e602a076STobias Grosser                                           ValueMapT &BBMap,
206e602a076STobias Grosser                                           ValueMapT &GlobalMap,
207e602a076STobias Grosser                                           LoopToScevMapT &LTS) {
2083b11a16aSHongbin Zheng   const Value *Pointer = Load->getPointerOperand();
2097242ad92STobias Grosser   Value *NewPointer =
2101947f863SJohannes Doerfert       generateLocationAccessed(Load, Pointer, BBMap, GlobalMap, LTS);
21187901453SJohannes Doerfert   Value *ScalarLoad = Builder.CreateAlignedLoad(
21287901453SJohannes Doerfert       NewPointer, Load->getAlignment(), Load->getName() + "_p_scalar_");
2133b11a16aSHongbin Zheng   return ScalarLoad;
2143b11a16aSHongbin Zheng }
2153b11a16aSHongbin Zheng 
216e602a076STobias Grosser Value *BlockGenerator::generateScalarStore(const StoreInst *Store,
217e602a076STobias Grosser                                            ValueMapT &BBMap,
218e602a076STobias Grosser                                            ValueMapT &GlobalMap,
219e602a076STobias Grosser                                            LoopToScevMapT &LTS) {
2203b11a16aSHongbin Zheng   const Value *Pointer = Store->getPointerOperand();
221c14582f2STobias Grosser   Value *NewPointer =
2229d10fffaSSebastian Pop       generateLocationAccessed(Store, Pointer, BBMap, GlobalMap, LTS);
223369430ffSTobias Grosser   Value *ValueOperand = getNewValue(Store->getValueOperand(), BBMap, GlobalMap,
224369430ffSTobias Grosser                                     LTS, getLoopForInst(Store));
2253b11a16aSHongbin Zheng 
22687901453SJohannes Doerfert   Value *NewStore = Builder.CreateAlignedStore(ValueOperand, NewPointer,
22787901453SJohannes Doerfert                                                Store->getAlignment());
22887901453SJohannes Doerfert   return NewStore;
2293b11a16aSHongbin Zheng }
2303b11a16aSHongbin Zheng 
231e602a076STobias Grosser void BlockGenerator::copyInstruction(const Instruction *Inst, ValueMapT &BBMap,
232e602a076STobias Grosser                                      ValueMapT &GlobalMap,
233e602a076STobias Grosser                                      LoopToScevMapT &LTS) {
2343b11a16aSHongbin Zheng   // Terminator instructions control the control flow. They are explicitly
2353b11a16aSHongbin Zheng   // expressed in the clast and do not need to be copied.
2363b11a16aSHongbin Zheng   if (Inst->isTerminator())
2373b11a16aSHongbin Zheng     return;
2383b11a16aSHongbin Zheng 
239ecfe21b7STobias Grosser   if (canSynthesize(Inst, &P->getAnalysis<LoopInfo>(), &SE,
240ecfe21b7STobias Grosser                     &Statement.getParent()->getRegion()))
241e71c6ab5STobias Grosser     return;
242e71c6ab5STobias Grosser 
2433b11a16aSHongbin Zheng   if (const LoadInst *Load = dyn_cast<LoadInst>(Inst)) {
244753d43f9SSebastian Pop     Value *NewLoad = generateScalarLoad(Load, BBMap, GlobalMap, LTS);
2453d94fedfSSebastian Pop     // Compute NewLoad before its insertion in BBMap to make the insertion
2463d94fedfSSebastian Pop     // deterministic.
247753d43f9SSebastian Pop     BBMap[Load] = NewLoad;
2483b11a16aSHongbin Zheng     return;
2493b11a16aSHongbin Zheng   }
2503b11a16aSHongbin Zheng 
2513b11a16aSHongbin Zheng   if (const StoreInst *Store = dyn_cast<StoreInst>(Inst)) {
252753d43f9SSebastian Pop     Value *NewStore = generateScalarStore(Store, BBMap, GlobalMap, LTS);
2533d94fedfSSebastian Pop     // Compute NewStore before its insertion in BBMap to make the insertion
2543d94fedfSSebastian Pop     // deterministic.
255753d43f9SSebastian Pop     BBMap[Store] = NewStore;
2563b11a16aSHongbin Zheng     return;
2573b11a16aSHongbin Zheng   }
2583b11a16aSHongbin Zheng 
2599d10fffaSSebastian Pop   copyInstScalar(Inst, BBMap, GlobalMap, LTS);
2603b11a16aSHongbin Zheng }
2613b11a16aSHongbin Zheng 
2629d10fffaSSebastian Pop void BlockGenerator::copyBB(ValueMapT &GlobalMap, LoopToScevMapT &LTS) {
2633b11a16aSHongbin Zheng   BasicBlock *BB = Statement.getBasicBlock();
264c14582f2STobias Grosser   BasicBlock *CopyBB =
265c14582f2STobias Grosser       SplitBlock(Builder.GetInsertBlock(), Builder.GetInsertPoint(), P);
2663b11a16aSHongbin Zheng   CopyBB->setName("polly.stmt." + BB->getName());
2673b11a16aSHongbin Zheng   Builder.SetInsertPoint(CopyBB->begin());
2683b11a16aSHongbin Zheng 
2693b11a16aSHongbin Zheng   ValueMapT BBMap;
2703b11a16aSHongbin Zheng 
27191f5b262STobias Grosser   for (Instruction &Inst : *BB)
27291f5b262STobias Grosser     copyInstruction(&Inst, BBMap, GlobalMap, LTS);
2733b11a16aSHongbin Zheng }
2743b11a16aSHongbin Zheng 
2752ef3f4fdSJohannes Doerfert VectorBlockGenerator::VectorBlockGenerator(
2762ef3f4fdSJohannes Doerfert     PollyIRBuilder &B, VectorValueMapT &GlobalMaps,
2772ef3f4fdSJohannes Doerfert     std::vector<LoopToScevMapT> &VLTS, ScopStmt &Stmt,
278731685e6SJohannes Doerfert     __isl_keep isl_map *Schedule, Pass *P, LoopInfo &LI, ScalarEvolution &SE,
279731685e6SJohannes Doerfert     __isl_keep isl_ast_build *Build, IslExprBuilder *ExprBuilder)
280731685e6SJohannes Doerfert     : BlockGenerator(B, Stmt, P, LI, SE, Build, ExprBuilder),
2812ef3f4fdSJohannes Doerfert       GlobalMaps(GlobalMaps), VLTS(VLTS), Schedule(Schedule) {
2823b11a16aSHongbin Zheng   assert(GlobalMaps.size() > 1 && "Only one vector lane found");
283a00a0291SSebastian Pop   assert(Schedule && "No statement domain provided");
2843b11a16aSHongbin Zheng }
2853b11a16aSHongbin Zheng 
286e602a076STobias Grosser Value *VectorBlockGenerator::getVectorValue(const Value *Old,
287e602a076STobias Grosser                                             ValueMapT &VectorMap,
288e602a076STobias Grosser                                             VectorValueMapT &ScalarMaps,
289e602a076STobias Grosser                                             Loop *L) {
290fe11e287SHongbin Zheng   if (Value *NewValue = VectorMap.lookup(Old))
291fe11e287SHongbin Zheng     return NewValue;
2923b11a16aSHongbin Zheng 
2933b11a16aSHongbin Zheng   int Width = getVectorWidth();
2943b11a16aSHongbin Zheng 
2953b11a16aSHongbin Zheng   Value *Vector = UndefValue::get(VectorType::get(Old->getType(), Width));
2963b11a16aSHongbin Zheng 
2973b11a16aSHongbin Zheng   for (int Lane = 0; Lane < Width; Lane++)
298c14582f2STobias Grosser     Vector = Builder.CreateInsertElement(
2997242ad92STobias Grosser         Vector,
300369430ffSTobias Grosser         getNewValue(Old, ScalarMaps[Lane], GlobalMaps[Lane], VLTS[Lane], L),
3017242ad92STobias Grosser         Builder.getInt32(Lane));
3023b11a16aSHongbin Zheng 
3033b11a16aSHongbin Zheng   VectorMap[Old] = Vector;
3043b11a16aSHongbin Zheng 
3053b11a16aSHongbin Zheng   return Vector;
3063b11a16aSHongbin Zheng }
3073b11a16aSHongbin Zheng 
3083b11a16aSHongbin Zheng Type *VectorBlockGenerator::getVectorPtrTy(const Value *Val, int Width) {
3093b11a16aSHongbin Zheng   PointerType *PointerTy = dyn_cast<PointerType>(Val->getType());
3103b11a16aSHongbin Zheng   assert(PointerTy && "PointerType expected");
3113b11a16aSHongbin Zheng 
3123b11a16aSHongbin Zheng   Type *ScalarType = PointerTy->getElementType();
3133b11a16aSHongbin Zheng   VectorType *VectorType = VectorType::get(ScalarType, Width);
3143b11a16aSHongbin Zheng 
3153b11a16aSHongbin Zheng   return PointerType::getUnqual(VectorType);
3163b11a16aSHongbin Zheng }
3173b11a16aSHongbin Zheng 
3180dd463faSTobias Grosser Value *
3190dd463faSTobias Grosser VectorBlockGenerator::generateStrideOneLoad(const LoadInst *Load,
3200dd463faSTobias Grosser                                             VectorValueMapT &ScalarMaps,
3210dd463faSTobias Grosser                                             bool NegativeStride = false) {
3220dd463faSTobias Grosser   unsigned VectorWidth = getVectorWidth();
3233b11a16aSHongbin Zheng   const Value *Pointer = Load->getPointerOperand();
3240dd463faSTobias Grosser   Type *VectorPtrType = getVectorPtrTy(Pointer, VectorWidth);
3250dd463faSTobias Grosser   unsigned Offset = NegativeStride ? VectorWidth - 1 : 0;
3260dd463faSTobias Grosser 
3275a56cbf4STobias Grosser   Value *NewPointer = nullptr;
328731685e6SJohannes Doerfert   NewPointer = generateLocationAccessed(Load, Pointer, ScalarMaps[Offset],
329731685e6SJohannes Doerfert                                         GlobalMaps[Offset], VLTS[Offset]);
330c14582f2STobias Grosser   Value *VectorPtr =
331c14582f2STobias Grosser       Builder.CreateBitCast(NewPointer, VectorPtrType, "vector_ptr");
332c14582f2STobias Grosser   LoadInst *VecLoad =
333c14582f2STobias Grosser       Builder.CreateLoad(VectorPtr, Load->getName() + "_p_vec_full");
3343b11a16aSHongbin Zheng   if (!Aligned)
3353b11a16aSHongbin Zheng     VecLoad->setAlignment(8);
3363b11a16aSHongbin Zheng 
3370dd463faSTobias Grosser   if (NegativeStride) {
3380dd463faSTobias Grosser     SmallVector<Constant *, 16> Indices;
3390dd463faSTobias Grosser     for (int i = VectorWidth - 1; i >= 0; i--)
3400dd463faSTobias Grosser       Indices.push_back(ConstantInt::get(Builder.getInt32Ty(), i));
3410dd463faSTobias Grosser     Constant *SV = llvm::ConstantVector::get(Indices);
3420dd463faSTobias Grosser     Value *RevVecLoad = Builder.CreateShuffleVector(
3430dd463faSTobias Grosser         VecLoad, VecLoad, SV, Load->getName() + "_reverse");
3440dd463faSTobias Grosser     return RevVecLoad;
3450dd463faSTobias Grosser   }
3460dd463faSTobias Grosser 
3473b11a16aSHongbin Zheng   return VecLoad;
3483b11a16aSHongbin Zheng }
3493b11a16aSHongbin Zheng 
3503b11a16aSHongbin Zheng Value *VectorBlockGenerator::generateStrideZeroLoad(const LoadInst *Load,
3513b11a16aSHongbin Zheng                                                     ValueMapT &BBMap) {
3523b11a16aSHongbin Zheng   const Value *Pointer = Load->getPointerOperand();
3533b11a16aSHongbin Zheng   Type *VectorPtrType = getVectorPtrTy(Pointer, 1);
354369430ffSTobias Grosser   Value *NewPointer =
355731685e6SJohannes Doerfert       generateLocationAccessed(Load, Pointer, BBMap, GlobalMaps[0], VLTS[0]);
3563b11a16aSHongbin Zheng   Value *VectorPtr = Builder.CreateBitCast(NewPointer, VectorPtrType,
3573b11a16aSHongbin Zheng                                            Load->getName() + "_p_vec_p");
358c14582f2STobias Grosser   LoadInst *ScalarLoad =
359c14582f2STobias Grosser       Builder.CreateLoad(VectorPtr, Load->getName() + "_p_splat_one");
3603b11a16aSHongbin Zheng 
3613b11a16aSHongbin Zheng   if (!Aligned)
3623b11a16aSHongbin Zheng     ScalarLoad->setAlignment(8);
3633b11a16aSHongbin Zheng 
364c14582f2STobias Grosser   Constant *SplatVector = Constant::getNullValue(
365c14582f2STobias Grosser       VectorType::get(Builder.getInt32Ty(), getVectorWidth()));
3663b11a16aSHongbin Zheng 
367c14582f2STobias Grosser   Value *VectorLoad = Builder.CreateShuffleVector(
368c14582f2STobias Grosser       ScalarLoad, ScalarLoad, SplatVector, Load->getName() + "_p_splat");
3693b11a16aSHongbin Zheng   return VectorLoad;
3703b11a16aSHongbin Zheng }
3713b11a16aSHongbin Zheng 
372e602a076STobias Grosser Value *
373e602a076STobias Grosser VectorBlockGenerator::generateUnknownStrideLoad(const LoadInst *Load,
374e602a076STobias Grosser                                                 VectorValueMapT &ScalarMaps) {
3753b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
3763b11a16aSHongbin Zheng   const Value *Pointer = Load->getPointerOperand();
3773b11a16aSHongbin Zheng   VectorType *VectorType = VectorType::get(
3783b11a16aSHongbin Zheng       dyn_cast<PointerType>(Pointer->getType())->getElementType(), VectorWidth);
3793b11a16aSHongbin Zheng 
3803b11a16aSHongbin Zheng   Value *Vector = UndefValue::get(VectorType);
3813b11a16aSHongbin Zheng 
3823b11a16aSHongbin Zheng   for (int i = 0; i < VectorWidth; i++) {
383731685e6SJohannes Doerfert     Value *NewPointer = generateLocationAccessed(Load, Pointer, ScalarMaps[i],
384731685e6SJohannes Doerfert                                                  GlobalMaps[i], VLTS[i]);
385c14582f2STobias Grosser     Value *ScalarLoad =
386c14582f2STobias Grosser         Builder.CreateLoad(NewPointer, Load->getName() + "_p_scalar_");
387c14582f2STobias Grosser     Vector = Builder.CreateInsertElement(
388c14582f2STobias Grosser         Vector, ScalarLoad, Builder.getInt32(i), Load->getName() + "_p_vec_");
3893b11a16aSHongbin Zheng   }
3903b11a16aSHongbin Zheng 
3913b11a16aSHongbin Zheng   return Vector;
3923b11a16aSHongbin Zheng }
3933b11a16aSHongbin Zheng 
394e602a076STobias Grosser void VectorBlockGenerator::generateLoad(const LoadInst *Load,
395e602a076STobias Grosser                                         ValueMapT &VectorMap,
396e602a076STobias Grosser                                         VectorValueMapT &ScalarMaps) {
39768794217SHongbin Zheng   if (PollyVectorizerChoice >= VECTORIZER_FIRST_NEED_GROUPED_UNROLL ||
39868794217SHongbin Zheng       !VectorType::isValidElementType(Load->getType())) {
3993b11a16aSHongbin Zheng     for (int i = 0; i < getVectorWidth(); i++)
400c14582f2STobias Grosser       ScalarMaps[i][Load] =
4019d10fffaSSebastian Pop           generateScalarLoad(Load, ScalarMaps[i], GlobalMaps[i], VLTS[i]);
4023b11a16aSHongbin Zheng     return;
4033b11a16aSHongbin Zheng   }
4043b11a16aSHongbin Zheng 
405b5f24a66SHongbin Zheng   const MemoryAccess &Access = Statement.getAccessFor(Load);
4063b11a16aSHongbin Zheng 
40795493984STobias Grosser   // Make sure we have scalar values available to access the pointer to
40895493984STobias Grosser   // the data location.
40995493984STobias Grosser   extractScalarValues(Load, VectorMap, ScalarMaps);
41095493984STobias Grosser 
4113b11a16aSHongbin Zheng   Value *NewLoad;
412a00a0291SSebastian Pop   if (Access.isStrideZero(isl_map_copy(Schedule)))
4133b11a16aSHongbin Zheng     NewLoad = generateStrideZeroLoad(Load, ScalarMaps[0]);
414a00a0291SSebastian Pop   else if (Access.isStrideOne(isl_map_copy(Schedule)))
4150dd463faSTobias Grosser     NewLoad = generateStrideOneLoad(Load, ScalarMaps);
4160dd463faSTobias Grosser   else if (Access.isStrideX(isl_map_copy(Schedule), -1))
4170dd463faSTobias Grosser     NewLoad = generateStrideOneLoad(Load, ScalarMaps, true);
4183b11a16aSHongbin Zheng   else
4193b11a16aSHongbin Zheng     NewLoad = generateUnknownStrideLoad(Load, ScalarMaps);
4203b11a16aSHongbin Zheng 
4213b11a16aSHongbin Zheng   VectorMap[Load] = NewLoad;
4223b11a16aSHongbin Zheng }
4233b11a16aSHongbin Zheng 
4243b11a16aSHongbin Zheng void VectorBlockGenerator::copyUnaryInst(const UnaryInstruction *Inst,
4253b11a16aSHongbin Zheng                                          ValueMapT &VectorMap,
4263b11a16aSHongbin Zheng                                          VectorValueMapT &ScalarMaps) {
4273b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
428369430ffSTobias Grosser   Value *NewOperand = getVectorValue(Inst->getOperand(0), VectorMap, ScalarMaps,
429369430ffSTobias Grosser                                      getLoopForInst(Inst));
4303b11a16aSHongbin Zheng 
4313b11a16aSHongbin Zheng   assert(isa<CastInst>(Inst) && "Can not generate vector code for instruction");
4323b11a16aSHongbin Zheng 
4333b11a16aSHongbin Zheng   const CastInst *Cast = dyn_cast<CastInst>(Inst);
4343b11a16aSHongbin Zheng   VectorType *DestType = VectorType::get(Inst->getType(), VectorWidth);
4353b11a16aSHongbin Zheng   VectorMap[Inst] = Builder.CreateCast(Cast->getOpcode(), NewOperand, DestType);
4363b11a16aSHongbin Zheng }
4373b11a16aSHongbin Zheng 
4383b11a16aSHongbin Zheng void VectorBlockGenerator::copyBinaryInst(const BinaryOperator *Inst,
4393b11a16aSHongbin Zheng                                           ValueMapT &VectorMap,
4403b11a16aSHongbin Zheng                                           VectorValueMapT &ScalarMaps) {
441369430ffSTobias Grosser   Loop *L = getLoopForInst(Inst);
4423b11a16aSHongbin Zheng   Value *OpZero = Inst->getOperand(0);
4433b11a16aSHongbin Zheng   Value *OpOne = Inst->getOperand(1);
4443b11a16aSHongbin Zheng 
4453b11a16aSHongbin Zheng   Value *NewOpZero, *NewOpOne;
446369430ffSTobias Grosser   NewOpZero = getVectorValue(OpZero, VectorMap, ScalarMaps, L);
447369430ffSTobias Grosser   NewOpOne = getVectorValue(OpOne, VectorMap, ScalarMaps, L);
4483b11a16aSHongbin Zheng 
4491bb59b0dSTobias Grosser   Value *NewInst = Builder.CreateBinOp(Inst->getOpcode(), NewOpZero, NewOpOne,
4503b11a16aSHongbin Zheng                                        Inst->getName() + "p_vec");
4513b11a16aSHongbin Zheng   VectorMap[Inst] = NewInst;
4523b11a16aSHongbin Zheng }
4533b11a16aSHongbin Zheng 
454e602a076STobias Grosser void VectorBlockGenerator::copyStore(const StoreInst *Store,
455e602a076STobias Grosser                                      ValueMapT &VectorMap,
456e602a076STobias Grosser                                      VectorValueMapT &ScalarMaps) {
457b5f24a66SHongbin Zheng   const MemoryAccess &Access = Statement.getAccessFor(Store);
4583b11a16aSHongbin Zheng 
4593b11a16aSHongbin Zheng   const Value *Pointer = Store->getPointerOperand();
460369430ffSTobias Grosser   Value *Vector = getVectorValue(Store->getValueOperand(), VectorMap,
461369430ffSTobias Grosser                                  ScalarMaps, getLoopForInst(Store));
4623b11a16aSHongbin Zheng 
46350fd7010STobias Grosser   // Make sure we have scalar values available to access the pointer to
46450fd7010STobias Grosser   // the data location.
46550fd7010STobias Grosser   extractScalarValues(Store, VectorMap, ScalarMaps);
46650fd7010STobias Grosser 
467a00a0291SSebastian Pop   if (Access.isStrideOne(isl_map_copy(Schedule))) {
4681947f863SJohannes Doerfert     Type *VectorPtrType = getVectorPtrTy(Pointer, getVectorWidth());
469731685e6SJohannes Doerfert     Value *NewPointer = generateLocationAccessed(Store, Pointer, ScalarMaps[0],
470731685e6SJohannes Doerfert                                                  GlobalMaps[0], VLTS[0]);
4713b11a16aSHongbin Zheng 
472c14582f2STobias Grosser     Value *VectorPtr =
473c14582f2STobias Grosser         Builder.CreateBitCast(NewPointer, VectorPtrType, "vector_ptr");
4743b11a16aSHongbin Zheng     StoreInst *Store = Builder.CreateStore(Vector, VectorPtr);
4753b11a16aSHongbin Zheng 
4763b11a16aSHongbin Zheng     if (!Aligned)
4773b11a16aSHongbin Zheng       Store->setAlignment(8);
4783b11a16aSHongbin Zheng   } else {
4793b11a16aSHongbin Zheng     for (unsigned i = 0; i < ScalarMaps.size(); i++) {
4801bb59b0dSTobias Grosser       Value *Scalar = Builder.CreateExtractElement(Vector, Builder.getInt32(i));
481731685e6SJohannes Doerfert       Value *NewPointer = generateLocationAccessed(
482731685e6SJohannes Doerfert           Store, Pointer, ScalarMaps[i], GlobalMaps[i], VLTS[i]);
4833b11a16aSHongbin Zheng       Builder.CreateStore(Scalar, NewPointer);
4843b11a16aSHongbin Zheng     }
4853b11a16aSHongbin Zheng   }
4863b11a16aSHongbin Zheng }
4873b11a16aSHongbin Zheng 
4883b11a16aSHongbin Zheng bool VectorBlockGenerator::hasVectorOperands(const Instruction *Inst,
4893b11a16aSHongbin Zheng                                              ValueMapT &VectorMap) {
49091f5b262STobias Grosser   for (Value *Operand : Inst->operands())
49191f5b262STobias Grosser     if (VectorMap.count(Operand))
4923b11a16aSHongbin Zheng       return true;
4933b11a16aSHongbin Zheng   return false;
4943b11a16aSHongbin Zheng }
4953b11a16aSHongbin Zheng 
4963b11a16aSHongbin Zheng bool VectorBlockGenerator::extractScalarValues(const Instruction *Inst,
4973b11a16aSHongbin Zheng                                                ValueMapT &VectorMap,
4983b11a16aSHongbin Zheng                                                VectorValueMapT &ScalarMaps) {
4993b11a16aSHongbin Zheng   bool HasVectorOperand = false;
5003b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
5013b11a16aSHongbin Zheng 
50291f5b262STobias Grosser   for (Value *Operand : Inst->operands()) {
50391f5b262STobias Grosser     ValueMapT::iterator VecOp = VectorMap.find(Operand);
5043b11a16aSHongbin Zheng 
5053b11a16aSHongbin Zheng     if (VecOp == VectorMap.end())
5063b11a16aSHongbin Zheng       continue;
5073b11a16aSHongbin Zheng 
5083b11a16aSHongbin Zheng     HasVectorOperand = true;
5093b11a16aSHongbin Zheng     Value *NewVector = VecOp->second;
5103b11a16aSHongbin Zheng 
5113b11a16aSHongbin Zheng     for (int i = 0; i < VectorWidth; ++i) {
5123b11a16aSHongbin Zheng       ValueMapT &SM = ScalarMaps[i];
5133b11a16aSHongbin Zheng 
5143b11a16aSHongbin Zheng       // If there is one scalar extracted, all scalar elements should have
5153b11a16aSHongbin Zheng       // already been extracted by the code here. So no need to check for the
5163b11a16aSHongbin Zheng       // existance of all of them.
51791f5b262STobias Grosser       if (SM.count(Operand))
5183b11a16aSHongbin Zheng         break;
5193b11a16aSHongbin Zheng 
52091f5b262STobias Grosser       SM[Operand] =
52191f5b262STobias Grosser           Builder.CreateExtractElement(NewVector, Builder.getInt32(i));
5223b11a16aSHongbin Zheng     }
5233b11a16aSHongbin Zheng   }
5243b11a16aSHongbin Zheng 
5253b11a16aSHongbin Zheng   return HasVectorOperand;
5263b11a16aSHongbin Zheng }
5273b11a16aSHongbin Zheng 
5283b11a16aSHongbin Zheng void VectorBlockGenerator::copyInstScalarized(const Instruction *Inst,
5293b11a16aSHongbin Zheng                                               ValueMapT &VectorMap,
5303b11a16aSHongbin Zheng                                               VectorValueMapT &ScalarMaps) {
5313b11a16aSHongbin Zheng   bool HasVectorOperand;
5323b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
5333b11a16aSHongbin Zheng 
5343b11a16aSHongbin Zheng   HasVectorOperand = extractScalarValues(Inst, VectorMap, ScalarMaps);
5353b11a16aSHongbin Zheng 
5363b11a16aSHongbin Zheng   for (int VectorLane = 0; VectorLane < getVectorWidth(); VectorLane++)
537731685e6SJohannes Doerfert     BlockGenerator::copyInstruction(Inst, ScalarMaps[VectorLane],
538731685e6SJohannes Doerfert                                     GlobalMaps[VectorLane], VLTS[VectorLane]);
5393b11a16aSHongbin Zheng 
5403b11a16aSHongbin Zheng   if (!VectorType::isValidElementType(Inst->getType()) || !HasVectorOperand)
5413b11a16aSHongbin Zheng     return;
5423b11a16aSHongbin Zheng 
5433b11a16aSHongbin Zheng   // Make the result available as vector value.
5443b11a16aSHongbin Zheng   VectorType *VectorType = VectorType::get(Inst->getType(), VectorWidth);
5453b11a16aSHongbin Zheng   Value *Vector = UndefValue::get(VectorType);
5463b11a16aSHongbin Zheng 
5473b11a16aSHongbin Zheng   for (int i = 0; i < VectorWidth; i++)
5483b11a16aSHongbin Zheng     Vector = Builder.CreateInsertElement(Vector, ScalarMaps[i][Inst],
5493b11a16aSHongbin Zheng                                          Builder.getInt32(i));
5503b11a16aSHongbin Zheng 
5513b11a16aSHongbin Zheng   VectorMap[Inst] = Vector;
5523b11a16aSHongbin Zheng }
5533b11a16aSHongbin Zheng 
554c14582f2STobias Grosser int VectorBlockGenerator::getVectorWidth() { return GlobalMaps.size(); }
5553b11a16aSHongbin Zheng 
5563b11a16aSHongbin Zheng void VectorBlockGenerator::copyInstruction(const Instruction *Inst,
5573b11a16aSHongbin Zheng                                            ValueMapT &VectorMap,
5583b11a16aSHongbin Zheng                                            VectorValueMapT &ScalarMaps) {
5593b11a16aSHongbin Zheng   // Terminator instructions control the control flow. They are explicitly
5603b11a16aSHongbin Zheng   // expressed in the clast and do not need to be copied.
5613b11a16aSHongbin Zheng   if (Inst->isTerminator())
5623b11a16aSHongbin Zheng     return;
5633b11a16aSHongbin Zheng 
564ecfe21b7STobias Grosser   if (canSynthesize(Inst, &P->getAnalysis<LoopInfo>(), &SE,
565ecfe21b7STobias Grosser                     &Statement.getParent()->getRegion()))
566e71c6ab5STobias Grosser     return;
567e71c6ab5STobias Grosser 
5683b11a16aSHongbin Zheng   if (const LoadInst *Load = dyn_cast<LoadInst>(Inst)) {
5693b11a16aSHongbin Zheng     generateLoad(Load, VectorMap, ScalarMaps);
5703b11a16aSHongbin Zheng     return;
5713b11a16aSHongbin Zheng   }
5723b11a16aSHongbin Zheng 
5733b11a16aSHongbin Zheng   if (hasVectorOperands(Inst, VectorMap)) {
5743b11a16aSHongbin Zheng     if (const StoreInst *Store = dyn_cast<StoreInst>(Inst)) {
5753b11a16aSHongbin Zheng       copyStore(Store, VectorMap, ScalarMaps);
5763b11a16aSHongbin Zheng       return;
5773b11a16aSHongbin Zheng     }
5783b11a16aSHongbin Zheng 
5793b11a16aSHongbin Zheng     if (const UnaryInstruction *Unary = dyn_cast<UnaryInstruction>(Inst)) {
5803b11a16aSHongbin Zheng       copyUnaryInst(Unary, VectorMap, ScalarMaps);
5813b11a16aSHongbin Zheng       return;
5823b11a16aSHongbin Zheng     }
5833b11a16aSHongbin Zheng 
5843b11a16aSHongbin Zheng     if (const BinaryOperator *Binary = dyn_cast<BinaryOperator>(Inst)) {
5853b11a16aSHongbin Zheng       copyBinaryInst(Binary, VectorMap, ScalarMaps);
5863b11a16aSHongbin Zheng       return;
5873b11a16aSHongbin Zheng     }
5883b11a16aSHongbin Zheng 
5893b11a16aSHongbin Zheng     // Falltrough: We generate scalar instructions, if we don't know how to
5903b11a16aSHongbin Zheng     // generate vector code.
5913b11a16aSHongbin Zheng   }
5923b11a16aSHongbin Zheng 
5933b11a16aSHongbin Zheng   copyInstScalarized(Inst, VectorMap, ScalarMaps);
5943b11a16aSHongbin Zheng }
5953b11a16aSHongbin Zheng 
5963b11a16aSHongbin Zheng void VectorBlockGenerator::copyBB() {
5973b11a16aSHongbin Zheng   BasicBlock *BB = Statement.getBasicBlock();
598c14582f2STobias Grosser   BasicBlock *CopyBB =
599c14582f2STobias Grosser       SplitBlock(Builder.GetInsertBlock(), Builder.GetInsertPoint(), P);
6003b11a16aSHongbin Zheng   CopyBB->setName("polly.stmt." + BB->getName());
6013b11a16aSHongbin Zheng   Builder.SetInsertPoint(CopyBB->begin());
6023b11a16aSHongbin Zheng 
6033b11a16aSHongbin Zheng   // Create two maps that store the mapping from the original instructions of
6043b11a16aSHongbin Zheng   // the old basic block to their copies in the new basic block. Those maps
6053b11a16aSHongbin Zheng   // are basic block local.
6063b11a16aSHongbin Zheng   //
6073b11a16aSHongbin Zheng   // As vector code generation is supported there is one map for scalar values
6083b11a16aSHongbin Zheng   // and one for vector values.
6093b11a16aSHongbin Zheng   //
6103b11a16aSHongbin Zheng   // In case we just do scalar code generation, the vectorMap is not used and
6113b11a16aSHongbin Zheng   // the scalarMap has just one dimension, which contains the mapping.
6123b11a16aSHongbin Zheng   //
6133b11a16aSHongbin Zheng   // In case vector code generation is done, an instruction may either appear
6143b11a16aSHongbin Zheng   // in the vector map once (as it is calculating >vectorwidth< values at a
6153b11a16aSHongbin Zheng   // time. Or (if the values are calculated using scalar operations), it
6163b11a16aSHongbin Zheng   // appears once in every dimension of the scalarMap.
6173b11a16aSHongbin Zheng   VectorValueMapT ScalarBlockMap(getVectorWidth());
6183b11a16aSHongbin Zheng   ValueMapT VectorBlockMap;
6193b11a16aSHongbin Zheng 
62091f5b262STobias Grosser   for (Instruction &Inst : *BB)
62191f5b262STobias Grosser     copyInstruction(&Inst, VectorBlockMap, ScalarBlockMap);
6223b11a16aSHongbin Zheng }
623