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 
373b11a16aSHongbin Zheng static cl::opt<bool>
38483a90d1STobias Grosser     Aligned("enable-polly-aligned",
39483a90d1STobias Grosser             cl::desc("Assumed aligned memory accesses."), cl::Hidden,
40483a90d1STobias Grosser             cl::value_desc("OpenMP code generation enabled if true"),
41637bd631STobias Grosser             cl::init(false), cl::ZeroOrMore, cl::cat(PollyCategory));
423b11a16aSHongbin Zheng 
43e602a076STobias Grosser static cl::opt<bool, true>
44483a90d1STobias Grosser     SCEVCodegenF("polly-codegen-scev",
45483a90d1STobias Grosser                  cl::desc("Use SCEV based code generation."), cl::Hidden,
46483a90d1STobias Grosser                  cl::location(SCEVCodegen), cl::init(false), cl::ZeroOrMore,
47483a90d1STobias Grosser                  cl::cat(PollyCategory));
48ecfe21b7STobias Grosser 
49ecfe21b7STobias Grosser bool polly::SCEVCodegen;
50ecfe21b7STobias Grosser 
51ecfe21b7STobias Grosser bool polly::canSynthesize(const Instruction *I, const llvm::LoopInfo *LI,
52ecfe21b7STobias Grosser                           ScalarEvolution *SE, const Region *R) {
53ecfe21b7STobias Grosser   if (SCEVCodegen) {
54ecfe21b7STobias Grosser     if (!I || !SE->isSCEVable(I->getType()))
55ecfe21b7STobias Grosser       return false;
56ecfe21b7STobias Grosser 
57ecfe21b7STobias Grosser     if (const SCEV *Scev = SE->getSCEV(const_cast<Instruction *>(I)))
58ecfe21b7STobias Grosser       if (!isa<SCEVCouldNotCompute>(Scev))
59ecfe21b7STobias Grosser         if (!hasScalarDepsInsideRegion(Scev, R))
60ecfe21b7STobias Grosser           return true;
61ecfe21b7STobias Grosser 
62ecfe21b7STobias Grosser     return false;
63ecfe21b7STobias Grosser   }
64ecfe21b7STobias Grosser 
65ecfe21b7STobias Grosser   Loop *L = LI->getLoopFor(I->getParent());
66e8df5bd9STobias Grosser   return L && I == L->getCanonicalInductionVariable() && R->contains(L);
67ecfe21b7STobias Grosser }
68ecfe21b7STobias Grosser 
69a63b2579SJohannes Doerfert BlockGenerator::BlockGenerator(PollyIRBuilder &B, ScopStmt &Stmt, Pass *P,
702ef3f4fdSJohannes Doerfert                                LoopInfo &LI, ScalarEvolution &SE,
71a63b2579SJohannes Doerfert                                isl_ast_build *Build,
72a63b2579SJohannes Doerfert                                IslExprBuilder *ExprBuilder)
732ef3f4fdSJohannes Doerfert     : Builder(B), Statement(Stmt), P(P), LI(LI), SE(SE), Build(Build),
742ef3f4fdSJohannes Doerfert       ExprBuilder(ExprBuilder) {}
75e71c6ab5STobias Grosser 
765b463ceaSHongbin Zheng Value *BlockGenerator::lookupAvailableValue(const Value *Old, ValueMapT &BBMap,
775b463ceaSHongbin Zheng                                             ValueMapT &GlobalMap) const {
783b11a16aSHongbin Zheng   // We assume constants never change.
793b11a16aSHongbin Zheng   // This avoids map lookups for many calls to this function.
803b11a16aSHongbin Zheng   if (isa<Constant>(Old))
813b11a16aSHongbin Zheng     return const_cast<Value *>(Old);
823b11a16aSHongbin Zheng 
83fe11e287SHongbin Zheng   if (Value *New = GlobalMap.lookup(Old)) {
84c14582f2STobias Grosser     if (Old->getType()->getScalarSizeInBits() <
85c14582f2STobias Grosser         New->getType()->getScalarSizeInBits())
863b11a16aSHongbin Zheng       New = Builder.CreateTruncOrBitCast(New, Old->getType());
873b11a16aSHongbin Zheng 
883b11a16aSHongbin Zheng     return New;
893b11a16aSHongbin Zheng   }
903b11a16aSHongbin Zheng 
915b463ceaSHongbin Zheng   // Or it is probably a scop-constant value defined as global, function
925b463ceaSHongbin Zheng   // parameter or an instruction not within the scop.
935b463ceaSHongbin Zheng   if (isa<GlobalValue>(Old) || isa<Argument>(Old))
945b463ceaSHongbin Zheng     return const_cast<Value *>(Old);
955b463ceaSHongbin Zheng 
965b463ceaSHongbin Zheng   if (const Instruction *Inst = dyn_cast<Instruction>(Old))
975b463ceaSHongbin Zheng     if (!Statement.getParent()->getRegion().contains(Inst->getParent()))
985b463ceaSHongbin Zheng       return const_cast<Value *>(Old);
995b463ceaSHongbin Zheng 
100fe11e287SHongbin Zheng   if (Value *New = BBMap.lookup(Old))
101fe11e287SHongbin Zheng     return New;
1023b11a16aSHongbin Zheng 
1035a56cbf4STobias Grosser   return nullptr;
1045b463ceaSHongbin Zheng }
1055b463ceaSHongbin Zheng 
1065b463ceaSHongbin Zheng Value *BlockGenerator::getNewValue(const Value *Old, ValueMapT &BBMap,
1075b463ceaSHongbin Zheng                                    ValueMapT &GlobalMap, LoopToScevMapT &LTS,
1085b463ceaSHongbin Zheng                                    Loop *L) {
1095b463ceaSHongbin Zheng   if (Value *New = lookupAvailableValue(Old, BBMap, GlobalMap))
1105b463ceaSHongbin Zheng     return New;
1115b463ceaSHongbin Zheng 
112e71c6ab5STobias Grosser   if (SCEVCodegen && SE.isSCEVable(Old->getType()))
113369430ffSTobias Grosser     if (const SCEV *Scev = SE.getSCEVAtScope(const_cast<Value *>(Old), L)) {
114e71c6ab5STobias Grosser       if (!isa<SCEVCouldNotCompute>(Scev)) {
115637b23dcSSebastian Pop         const SCEV *NewScev = apply(Scev, LTS, SE);
116637b23dcSSebastian Pop         ValueToValueMap VTV;
117637b23dcSSebastian Pop         VTV.insert(BBMap.begin(), BBMap.end());
118637b23dcSSebastian Pop         VTV.insert(GlobalMap.begin(), GlobalMap.end());
11947d4ee3eSSebastian Pop         NewScev = SCEVParameterRewriter::rewrite(NewScev, SE, VTV);
120e71c6ab5STobias Grosser         SCEVExpander Expander(SE, "polly");
121e71c6ab5STobias Grosser         Value *Expanded = Expander.expandCodeFor(NewScev, Old->getType(),
122e71c6ab5STobias Grosser                                                  Builder.GetInsertPoint());
123e71c6ab5STobias Grosser 
124e71c6ab5STobias Grosser         BBMap[Old] = Expanded;
125e71c6ab5STobias Grosser         return Expanded;
126e71c6ab5STobias Grosser       }
127369430ffSTobias Grosser     }
128e71c6ab5STobias Grosser 
1295b463ceaSHongbin Zheng   // Now the scalar dependence is neither available nor SCEVCodegenable, this
1305b463ceaSHongbin Zheng   // should never happen in the current code generator.
1315b463ceaSHongbin Zheng   llvm_unreachable("Unexpected scalar dependence in region!");
1325a56cbf4STobias Grosser   return nullptr;
1333b11a16aSHongbin Zheng }
1343b11a16aSHongbin Zheng 
1353b11a16aSHongbin Zheng void BlockGenerator::copyInstScalar(const Instruction *Inst, ValueMapT &BBMap,
1369d10fffaSSebastian Pop                                     ValueMapT &GlobalMap, LoopToScevMapT &LTS) {
137030237d0STobias Grosser   // We do not generate debug intrinsics as we did not investigate how to
138030237d0STobias Grosser   // copy them correctly. At the current state, they just crash the code
139030237d0STobias Grosser   // generation as the meta-data operands are not correctly copied.
140030237d0STobias Grosser   if (isa<DbgInfoIntrinsic>(Inst))
141030237d0STobias Grosser     return;
142030237d0STobias Grosser 
1433b11a16aSHongbin Zheng   Instruction *NewInst = Inst->clone();
1443b11a16aSHongbin Zheng 
1453b11a16aSHongbin Zheng   // Replace old operands with the new ones.
14691f5b262STobias Grosser   for (Value *OldOperand : Inst->operands()) {
147369430ffSTobias Grosser     Value *NewOperand =
148369430ffSTobias Grosser         getNewValue(OldOperand, BBMap, GlobalMap, LTS, getLoopForInst(Inst));
1493b11a16aSHongbin Zheng 
1503b11a16aSHongbin Zheng     if (!NewOperand) {
151c14582f2STobias Grosser       assert(!isa<StoreInst>(NewInst) &&
152c14582f2STobias Grosser              "Store instructions are always needed!");
1533b11a16aSHongbin Zheng       delete NewInst;
1543b11a16aSHongbin Zheng       return;
1553b11a16aSHongbin Zheng     }
1563b11a16aSHongbin Zheng 
1573b11a16aSHongbin Zheng     NewInst->replaceUsesOfWith(OldOperand, NewOperand);
1583b11a16aSHongbin Zheng   }
1593b11a16aSHongbin Zheng 
1603b11a16aSHongbin Zheng   Builder.Insert(NewInst);
1613b11a16aSHongbin Zheng   BBMap[Inst] = NewInst;
1623b11a16aSHongbin Zheng 
1633b11a16aSHongbin Zheng   if (!NewInst->getType()->isVoidTy())
1643b11a16aSHongbin Zheng     NewInst->setName("p_" + Inst->getName());
1653b11a16aSHongbin Zheng }
1663b11a16aSHongbin Zheng 
167a63b2579SJohannes Doerfert Value *BlockGenerator::getNewAccessOperand(const MemoryAccess &MA) {
168*a99130f0SJohannes Doerfert   isl_pw_multi_aff *PWAccRel;
169*a99130f0SJohannes Doerfert   isl_union_map *Schedule;
170a63b2579SJohannes Doerfert   isl_ast_expr *Expr;
1713b11a16aSHongbin Zheng 
172a63b2579SJohannes Doerfert   assert(ExprBuilder && Build &&
173a63b2579SJohannes Doerfert          "Cannot generate new value without IslExprBuilder!");
1743b11a16aSHongbin Zheng 
175*a99130f0SJohannes Doerfert   Schedule = isl_ast_build_get_schedule(Build);
176*a99130f0SJohannes Doerfert   PWAccRel = MA.applyScheduleToAccessRelation(Schedule);
1773b11a16aSHongbin Zheng 
178a63b2579SJohannes Doerfert   Expr = isl_ast_build_access_from_pw_multi_aff(Build, PWAccRel);
179dcb5f1dcSJohannes Doerfert   Expr = isl_ast_expr_address_of(Expr);
180a63b2579SJohannes Doerfert 
181a63b2579SJohannes Doerfert   return ExprBuilder->create(Expr);
1823b11a16aSHongbin Zheng }
1833b11a16aSHongbin Zheng 
184e602a076STobias Grosser Value *BlockGenerator::generateLocationAccessed(const Instruction *Inst,
185e602a076STobias Grosser                                                 const Value *Pointer,
186e602a076STobias Grosser                                                 ValueMapT &BBMap,
187e602a076STobias Grosser                                                 ValueMapT &GlobalMap,
188e602a076STobias Grosser                                                 LoopToScevMapT &LTS) {
189a63b2579SJohannes Doerfert   const MemoryAccess &MA = Statement.getAccessFor(Inst);
1903b11a16aSHongbin Zheng 
1913b11a16aSHongbin Zheng   Value *NewPointer;
192*a99130f0SJohannes Doerfert   if (MA.hasNewAccessRelation())
193a63b2579SJohannes Doerfert     NewPointer = getNewAccessOperand(MA);
194a63b2579SJohannes Doerfert   else
195369430ffSTobias Grosser     NewPointer =
196369430ffSTobias Grosser         getNewValue(Pointer, BBMap, GlobalMap, LTS, getLoopForInst(Inst));
1973b11a16aSHongbin Zheng 
1983b11a16aSHongbin Zheng   return NewPointer;
1993b11a16aSHongbin Zheng }
2003b11a16aSHongbin Zheng 
2014d96c8d7STobias Grosser Loop *BlockGenerator::getLoopForInst(const llvm::Instruction *Inst) {
2022ef3f4fdSJohannes Doerfert   return LI.getLoopFor(Inst->getParent());
203369430ffSTobias Grosser }
204369430ffSTobias Grosser 
205e602a076STobias Grosser Value *BlockGenerator::generateScalarLoad(const LoadInst *Load,
206e602a076STobias Grosser                                           ValueMapT &BBMap,
207e602a076STobias Grosser                                           ValueMapT &GlobalMap,
208e602a076STobias Grosser                                           LoopToScevMapT &LTS) {
2093b11a16aSHongbin Zheng   const Value *Pointer = Load->getPointerOperand();
2107242ad92STobias Grosser   Value *NewPointer =
2111947f863SJohannes Doerfert       generateLocationAccessed(Load, Pointer, BBMap, GlobalMap, LTS);
21287901453SJohannes Doerfert   Value *ScalarLoad = Builder.CreateAlignedLoad(
21387901453SJohannes Doerfert       NewPointer, Load->getAlignment(), Load->getName() + "_p_scalar_");
2143b11a16aSHongbin Zheng   return ScalarLoad;
2153b11a16aSHongbin Zheng }
2163b11a16aSHongbin Zheng 
217e602a076STobias Grosser Value *BlockGenerator::generateScalarStore(const StoreInst *Store,
218e602a076STobias Grosser                                            ValueMapT &BBMap,
219e602a076STobias Grosser                                            ValueMapT &GlobalMap,
220e602a076STobias Grosser                                            LoopToScevMapT &LTS) {
2213b11a16aSHongbin Zheng   const Value *Pointer = Store->getPointerOperand();
222c14582f2STobias Grosser   Value *NewPointer =
2239d10fffaSSebastian Pop       generateLocationAccessed(Store, Pointer, BBMap, GlobalMap, LTS);
224369430ffSTobias Grosser   Value *ValueOperand = getNewValue(Store->getValueOperand(), BBMap, GlobalMap,
225369430ffSTobias Grosser                                     LTS, getLoopForInst(Store));
2263b11a16aSHongbin Zheng 
22787901453SJohannes Doerfert   Value *NewStore = Builder.CreateAlignedStore(ValueOperand, NewPointer,
22887901453SJohannes Doerfert                                                Store->getAlignment());
22987901453SJohannes Doerfert   return NewStore;
2303b11a16aSHongbin Zheng }
2313b11a16aSHongbin Zheng 
232e602a076STobias Grosser void BlockGenerator::copyInstruction(const Instruction *Inst, ValueMapT &BBMap,
233e602a076STobias Grosser                                      ValueMapT &GlobalMap,
234e602a076STobias Grosser                                      LoopToScevMapT &LTS) {
2353b11a16aSHongbin Zheng   // Terminator instructions control the control flow. They are explicitly
2363b11a16aSHongbin Zheng   // expressed in the clast and do not need to be copied.
2373b11a16aSHongbin Zheng   if (Inst->isTerminator())
2383b11a16aSHongbin Zheng     return;
2393b11a16aSHongbin Zheng 
240ecfe21b7STobias Grosser   if (canSynthesize(Inst, &P->getAnalysis<LoopInfo>(), &SE,
241ecfe21b7STobias Grosser                     &Statement.getParent()->getRegion()))
242e71c6ab5STobias Grosser     return;
243e71c6ab5STobias Grosser 
2443b11a16aSHongbin Zheng   if (const LoadInst *Load = dyn_cast<LoadInst>(Inst)) {
245753d43f9SSebastian Pop     Value *NewLoad = generateScalarLoad(Load, BBMap, GlobalMap, LTS);
2463d94fedfSSebastian Pop     // Compute NewLoad before its insertion in BBMap to make the insertion
2473d94fedfSSebastian Pop     // deterministic.
248753d43f9SSebastian Pop     BBMap[Load] = NewLoad;
2493b11a16aSHongbin Zheng     return;
2503b11a16aSHongbin Zheng   }
2513b11a16aSHongbin Zheng 
2523b11a16aSHongbin Zheng   if (const StoreInst *Store = dyn_cast<StoreInst>(Inst)) {
253753d43f9SSebastian Pop     Value *NewStore = generateScalarStore(Store, BBMap, GlobalMap, LTS);
2543d94fedfSSebastian Pop     // Compute NewStore before its insertion in BBMap to make the insertion
2553d94fedfSSebastian Pop     // deterministic.
256753d43f9SSebastian Pop     BBMap[Store] = NewStore;
2573b11a16aSHongbin Zheng     return;
2583b11a16aSHongbin Zheng   }
2593b11a16aSHongbin Zheng 
2609d10fffaSSebastian Pop   copyInstScalar(Inst, BBMap, GlobalMap, LTS);
2613b11a16aSHongbin Zheng }
2623b11a16aSHongbin Zheng 
2639d10fffaSSebastian Pop void BlockGenerator::copyBB(ValueMapT &GlobalMap, LoopToScevMapT &LTS) {
2643b11a16aSHongbin Zheng   BasicBlock *BB = Statement.getBasicBlock();
265c14582f2STobias Grosser   BasicBlock *CopyBB =
266c14582f2STobias Grosser       SplitBlock(Builder.GetInsertBlock(), Builder.GetInsertPoint(), P);
2673b11a16aSHongbin Zheng   CopyBB->setName("polly.stmt." + BB->getName());
2683b11a16aSHongbin Zheng   Builder.SetInsertPoint(CopyBB->begin());
2693b11a16aSHongbin Zheng 
2703b11a16aSHongbin Zheng   ValueMapT BBMap;
2713b11a16aSHongbin Zheng 
27291f5b262STobias Grosser   for (Instruction &Inst : *BB)
27391f5b262STobias Grosser     copyInstruction(&Inst, BBMap, GlobalMap, LTS);
2743b11a16aSHongbin Zheng }
2753b11a16aSHongbin Zheng 
2762ef3f4fdSJohannes Doerfert VectorBlockGenerator::VectorBlockGenerator(
2772ef3f4fdSJohannes Doerfert     PollyIRBuilder &B, VectorValueMapT &GlobalMaps,
2782ef3f4fdSJohannes Doerfert     std::vector<LoopToScevMapT> &VLTS, ScopStmt &Stmt,
279731685e6SJohannes Doerfert     __isl_keep isl_map *Schedule, Pass *P, LoopInfo &LI, ScalarEvolution &SE,
280731685e6SJohannes Doerfert     __isl_keep isl_ast_build *Build, IslExprBuilder *ExprBuilder)
281731685e6SJohannes Doerfert     : BlockGenerator(B, Stmt, P, LI, SE, Build, ExprBuilder),
2822ef3f4fdSJohannes Doerfert       GlobalMaps(GlobalMaps), VLTS(VLTS), Schedule(Schedule) {
2833b11a16aSHongbin Zheng   assert(GlobalMaps.size() > 1 && "Only one vector lane found");
284a00a0291SSebastian Pop   assert(Schedule && "No statement domain provided");
2853b11a16aSHongbin Zheng }
2863b11a16aSHongbin Zheng 
287e602a076STobias Grosser Value *VectorBlockGenerator::getVectorValue(const Value *Old,
288e602a076STobias Grosser                                             ValueMapT &VectorMap,
289e602a076STobias Grosser                                             VectorValueMapT &ScalarMaps,
290e602a076STobias Grosser                                             Loop *L) {
291fe11e287SHongbin Zheng   if (Value *NewValue = VectorMap.lookup(Old))
292fe11e287SHongbin Zheng     return NewValue;
2933b11a16aSHongbin Zheng 
2943b11a16aSHongbin Zheng   int Width = getVectorWidth();
2953b11a16aSHongbin Zheng 
2963b11a16aSHongbin Zheng   Value *Vector = UndefValue::get(VectorType::get(Old->getType(), Width));
2973b11a16aSHongbin Zheng 
2983b11a16aSHongbin Zheng   for (int Lane = 0; Lane < Width; Lane++)
299c14582f2STobias Grosser     Vector = Builder.CreateInsertElement(
3007242ad92STobias Grosser         Vector,
301369430ffSTobias Grosser         getNewValue(Old, ScalarMaps[Lane], GlobalMaps[Lane], VLTS[Lane], L),
3027242ad92STobias Grosser         Builder.getInt32(Lane));
3033b11a16aSHongbin Zheng 
3043b11a16aSHongbin Zheng   VectorMap[Old] = Vector;
3053b11a16aSHongbin Zheng 
3063b11a16aSHongbin Zheng   return Vector;
3073b11a16aSHongbin Zheng }
3083b11a16aSHongbin Zheng 
3093b11a16aSHongbin Zheng Type *VectorBlockGenerator::getVectorPtrTy(const Value *Val, int Width) {
3103b11a16aSHongbin Zheng   PointerType *PointerTy = dyn_cast<PointerType>(Val->getType());
3113b11a16aSHongbin Zheng   assert(PointerTy && "PointerType expected");
3123b11a16aSHongbin Zheng 
3133b11a16aSHongbin Zheng   Type *ScalarType = PointerTy->getElementType();
3143b11a16aSHongbin Zheng   VectorType *VectorType = VectorType::get(ScalarType, Width);
3153b11a16aSHongbin Zheng 
3163b11a16aSHongbin Zheng   return PointerType::getUnqual(VectorType);
3173b11a16aSHongbin Zheng }
3183b11a16aSHongbin Zheng 
3190dd463faSTobias Grosser Value *
3200dd463faSTobias Grosser VectorBlockGenerator::generateStrideOneLoad(const LoadInst *Load,
3210dd463faSTobias Grosser                                             VectorValueMapT &ScalarMaps,
3220dd463faSTobias Grosser                                             bool NegativeStride = false) {
3230dd463faSTobias Grosser   unsigned VectorWidth = getVectorWidth();
3243b11a16aSHongbin Zheng   const Value *Pointer = Load->getPointerOperand();
3250dd463faSTobias Grosser   Type *VectorPtrType = getVectorPtrTy(Pointer, VectorWidth);
3260dd463faSTobias Grosser   unsigned Offset = NegativeStride ? VectorWidth - 1 : 0;
3270dd463faSTobias Grosser 
3285a56cbf4STobias Grosser   Value *NewPointer = nullptr;
329731685e6SJohannes Doerfert   NewPointer = generateLocationAccessed(Load, Pointer, ScalarMaps[Offset],
330731685e6SJohannes Doerfert                                         GlobalMaps[Offset], VLTS[Offset]);
331c14582f2STobias Grosser   Value *VectorPtr =
332c14582f2STobias Grosser       Builder.CreateBitCast(NewPointer, VectorPtrType, "vector_ptr");
333c14582f2STobias Grosser   LoadInst *VecLoad =
334c14582f2STobias Grosser       Builder.CreateLoad(VectorPtr, Load->getName() + "_p_vec_full");
3353b11a16aSHongbin Zheng   if (!Aligned)
3363b11a16aSHongbin Zheng     VecLoad->setAlignment(8);
3373b11a16aSHongbin Zheng 
3380dd463faSTobias Grosser   if (NegativeStride) {
3390dd463faSTobias Grosser     SmallVector<Constant *, 16> Indices;
3400dd463faSTobias Grosser     for (int i = VectorWidth - 1; i >= 0; i--)
3410dd463faSTobias Grosser       Indices.push_back(ConstantInt::get(Builder.getInt32Ty(), i));
3420dd463faSTobias Grosser     Constant *SV = llvm::ConstantVector::get(Indices);
3430dd463faSTobias Grosser     Value *RevVecLoad = Builder.CreateShuffleVector(
3440dd463faSTobias Grosser         VecLoad, VecLoad, SV, Load->getName() + "_reverse");
3450dd463faSTobias Grosser     return RevVecLoad;
3460dd463faSTobias Grosser   }
3470dd463faSTobias Grosser 
3483b11a16aSHongbin Zheng   return VecLoad;
3493b11a16aSHongbin Zheng }
3503b11a16aSHongbin Zheng 
3513b11a16aSHongbin Zheng Value *VectorBlockGenerator::generateStrideZeroLoad(const LoadInst *Load,
3523b11a16aSHongbin Zheng                                                     ValueMapT &BBMap) {
3533b11a16aSHongbin Zheng   const Value *Pointer = Load->getPointerOperand();
3543b11a16aSHongbin Zheng   Type *VectorPtrType = getVectorPtrTy(Pointer, 1);
355369430ffSTobias Grosser   Value *NewPointer =
356731685e6SJohannes Doerfert       generateLocationAccessed(Load, Pointer, BBMap, GlobalMaps[0], VLTS[0]);
3573b11a16aSHongbin Zheng   Value *VectorPtr = Builder.CreateBitCast(NewPointer, VectorPtrType,
3583b11a16aSHongbin Zheng                                            Load->getName() + "_p_vec_p");
359c14582f2STobias Grosser   LoadInst *ScalarLoad =
360c14582f2STobias Grosser       Builder.CreateLoad(VectorPtr, Load->getName() + "_p_splat_one");
3613b11a16aSHongbin Zheng 
3623b11a16aSHongbin Zheng   if (!Aligned)
3633b11a16aSHongbin Zheng     ScalarLoad->setAlignment(8);
3643b11a16aSHongbin Zheng 
365c14582f2STobias Grosser   Constant *SplatVector = Constant::getNullValue(
366c14582f2STobias Grosser       VectorType::get(Builder.getInt32Ty(), getVectorWidth()));
3673b11a16aSHongbin Zheng 
368c14582f2STobias Grosser   Value *VectorLoad = Builder.CreateShuffleVector(
369c14582f2STobias Grosser       ScalarLoad, ScalarLoad, SplatVector, Load->getName() + "_p_splat");
3703b11a16aSHongbin Zheng   return VectorLoad;
3713b11a16aSHongbin Zheng }
3723b11a16aSHongbin Zheng 
373e602a076STobias Grosser Value *
374e602a076STobias Grosser VectorBlockGenerator::generateUnknownStrideLoad(const LoadInst *Load,
375e602a076STobias Grosser                                                 VectorValueMapT &ScalarMaps) {
3763b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
3773b11a16aSHongbin Zheng   const Value *Pointer = Load->getPointerOperand();
3783b11a16aSHongbin Zheng   VectorType *VectorType = VectorType::get(
3793b11a16aSHongbin Zheng       dyn_cast<PointerType>(Pointer->getType())->getElementType(), VectorWidth);
3803b11a16aSHongbin Zheng 
3813b11a16aSHongbin Zheng   Value *Vector = UndefValue::get(VectorType);
3823b11a16aSHongbin Zheng 
3833b11a16aSHongbin Zheng   for (int i = 0; i < VectorWidth; i++) {
384731685e6SJohannes Doerfert     Value *NewPointer = generateLocationAccessed(Load, Pointer, ScalarMaps[i],
385731685e6SJohannes Doerfert                                                  GlobalMaps[i], VLTS[i]);
386c14582f2STobias Grosser     Value *ScalarLoad =
387c14582f2STobias Grosser         Builder.CreateLoad(NewPointer, Load->getName() + "_p_scalar_");
388c14582f2STobias Grosser     Vector = Builder.CreateInsertElement(
389c14582f2STobias Grosser         Vector, ScalarLoad, Builder.getInt32(i), Load->getName() + "_p_vec_");
3903b11a16aSHongbin Zheng   }
3913b11a16aSHongbin Zheng 
3923b11a16aSHongbin Zheng   return Vector;
3933b11a16aSHongbin Zheng }
3943b11a16aSHongbin Zheng 
395e602a076STobias Grosser void VectorBlockGenerator::generateLoad(const LoadInst *Load,
396e602a076STobias Grosser                                         ValueMapT &VectorMap,
397e602a076STobias Grosser                                         VectorValueMapT &ScalarMaps) {
39868794217SHongbin Zheng   if (PollyVectorizerChoice >= VECTORIZER_FIRST_NEED_GROUPED_UNROLL ||
39968794217SHongbin Zheng       !VectorType::isValidElementType(Load->getType())) {
4003b11a16aSHongbin Zheng     for (int i = 0; i < getVectorWidth(); i++)
401c14582f2STobias Grosser       ScalarMaps[i][Load] =
4029d10fffaSSebastian Pop           generateScalarLoad(Load, ScalarMaps[i], GlobalMaps[i], VLTS[i]);
4033b11a16aSHongbin Zheng     return;
4043b11a16aSHongbin Zheng   }
4053b11a16aSHongbin Zheng 
406b5f24a66SHongbin Zheng   const MemoryAccess &Access = Statement.getAccessFor(Load);
4073b11a16aSHongbin Zheng 
40895493984STobias Grosser   // Make sure we have scalar values available to access the pointer to
40995493984STobias Grosser   // the data location.
41095493984STobias Grosser   extractScalarValues(Load, VectorMap, ScalarMaps);
41195493984STobias Grosser 
4123b11a16aSHongbin Zheng   Value *NewLoad;
413a00a0291SSebastian Pop   if (Access.isStrideZero(isl_map_copy(Schedule)))
4143b11a16aSHongbin Zheng     NewLoad = generateStrideZeroLoad(Load, ScalarMaps[0]);
415a00a0291SSebastian Pop   else if (Access.isStrideOne(isl_map_copy(Schedule)))
4160dd463faSTobias Grosser     NewLoad = generateStrideOneLoad(Load, ScalarMaps);
4170dd463faSTobias Grosser   else if (Access.isStrideX(isl_map_copy(Schedule), -1))
4180dd463faSTobias Grosser     NewLoad = generateStrideOneLoad(Load, ScalarMaps, true);
4193b11a16aSHongbin Zheng   else
4203b11a16aSHongbin Zheng     NewLoad = generateUnknownStrideLoad(Load, ScalarMaps);
4213b11a16aSHongbin Zheng 
4223b11a16aSHongbin Zheng   VectorMap[Load] = NewLoad;
4233b11a16aSHongbin Zheng }
4243b11a16aSHongbin Zheng 
4253b11a16aSHongbin Zheng void VectorBlockGenerator::copyUnaryInst(const UnaryInstruction *Inst,
4263b11a16aSHongbin Zheng                                          ValueMapT &VectorMap,
4273b11a16aSHongbin Zheng                                          VectorValueMapT &ScalarMaps) {
4283b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
429369430ffSTobias Grosser   Value *NewOperand = getVectorValue(Inst->getOperand(0), VectorMap, ScalarMaps,
430369430ffSTobias Grosser                                      getLoopForInst(Inst));
4313b11a16aSHongbin Zheng 
4323b11a16aSHongbin Zheng   assert(isa<CastInst>(Inst) && "Can not generate vector code for instruction");
4333b11a16aSHongbin Zheng 
4343b11a16aSHongbin Zheng   const CastInst *Cast = dyn_cast<CastInst>(Inst);
4353b11a16aSHongbin Zheng   VectorType *DestType = VectorType::get(Inst->getType(), VectorWidth);
4363b11a16aSHongbin Zheng   VectorMap[Inst] = Builder.CreateCast(Cast->getOpcode(), NewOperand, DestType);
4373b11a16aSHongbin Zheng }
4383b11a16aSHongbin Zheng 
4393b11a16aSHongbin Zheng void VectorBlockGenerator::copyBinaryInst(const BinaryOperator *Inst,
4403b11a16aSHongbin Zheng                                           ValueMapT &VectorMap,
4413b11a16aSHongbin Zheng                                           VectorValueMapT &ScalarMaps) {
442369430ffSTobias Grosser   Loop *L = getLoopForInst(Inst);
4433b11a16aSHongbin Zheng   Value *OpZero = Inst->getOperand(0);
4443b11a16aSHongbin Zheng   Value *OpOne = Inst->getOperand(1);
4453b11a16aSHongbin Zheng 
4463b11a16aSHongbin Zheng   Value *NewOpZero, *NewOpOne;
447369430ffSTobias Grosser   NewOpZero = getVectorValue(OpZero, VectorMap, ScalarMaps, L);
448369430ffSTobias Grosser   NewOpOne = getVectorValue(OpOne, VectorMap, ScalarMaps, L);
4493b11a16aSHongbin Zheng 
4501bb59b0dSTobias Grosser   Value *NewInst = Builder.CreateBinOp(Inst->getOpcode(), NewOpZero, NewOpOne,
4513b11a16aSHongbin Zheng                                        Inst->getName() + "p_vec");
4523b11a16aSHongbin Zheng   VectorMap[Inst] = NewInst;
4533b11a16aSHongbin Zheng }
4543b11a16aSHongbin Zheng 
455e602a076STobias Grosser void VectorBlockGenerator::copyStore(const StoreInst *Store,
456e602a076STobias Grosser                                      ValueMapT &VectorMap,
457e602a076STobias Grosser                                      VectorValueMapT &ScalarMaps) {
458b5f24a66SHongbin Zheng   const MemoryAccess &Access = Statement.getAccessFor(Store);
4593b11a16aSHongbin Zheng 
4603b11a16aSHongbin Zheng   const Value *Pointer = Store->getPointerOperand();
461369430ffSTobias Grosser   Value *Vector = getVectorValue(Store->getValueOperand(), VectorMap,
462369430ffSTobias Grosser                                  ScalarMaps, getLoopForInst(Store));
4633b11a16aSHongbin Zheng 
46450fd7010STobias Grosser   // Make sure we have scalar values available to access the pointer to
46550fd7010STobias Grosser   // the data location.
46650fd7010STobias Grosser   extractScalarValues(Store, VectorMap, ScalarMaps);
46750fd7010STobias Grosser 
468a00a0291SSebastian Pop   if (Access.isStrideOne(isl_map_copy(Schedule))) {
4691947f863SJohannes Doerfert     Type *VectorPtrType = getVectorPtrTy(Pointer, getVectorWidth());
470731685e6SJohannes Doerfert     Value *NewPointer = generateLocationAccessed(Store, Pointer, ScalarMaps[0],
471731685e6SJohannes Doerfert                                                  GlobalMaps[0], VLTS[0]);
4723b11a16aSHongbin Zheng 
473c14582f2STobias Grosser     Value *VectorPtr =
474c14582f2STobias Grosser         Builder.CreateBitCast(NewPointer, VectorPtrType, "vector_ptr");
4753b11a16aSHongbin Zheng     StoreInst *Store = Builder.CreateStore(Vector, VectorPtr);
4763b11a16aSHongbin Zheng 
4773b11a16aSHongbin Zheng     if (!Aligned)
4783b11a16aSHongbin Zheng       Store->setAlignment(8);
4793b11a16aSHongbin Zheng   } else {
4803b11a16aSHongbin Zheng     for (unsigned i = 0; i < ScalarMaps.size(); i++) {
4811bb59b0dSTobias Grosser       Value *Scalar = Builder.CreateExtractElement(Vector, Builder.getInt32(i));
482731685e6SJohannes Doerfert       Value *NewPointer = generateLocationAccessed(
483731685e6SJohannes Doerfert           Store, Pointer, ScalarMaps[i], GlobalMaps[i], VLTS[i]);
4843b11a16aSHongbin Zheng       Builder.CreateStore(Scalar, NewPointer);
4853b11a16aSHongbin Zheng     }
4863b11a16aSHongbin Zheng   }
4873b11a16aSHongbin Zheng }
4883b11a16aSHongbin Zheng 
4893b11a16aSHongbin Zheng bool VectorBlockGenerator::hasVectorOperands(const Instruction *Inst,
4903b11a16aSHongbin Zheng                                              ValueMapT &VectorMap) {
49191f5b262STobias Grosser   for (Value *Operand : Inst->operands())
49291f5b262STobias Grosser     if (VectorMap.count(Operand))
4933b11a16aSHongbin Zheng       return true;
4943b11a16aSHongbin Zheng   return false;
4953b11a16aSHongbin Zheng }
4963b11a16aSHongbin Zheng 
4973b11a16aSHongbin Zheng bool VectorBlockGenerator::extractScalarValues(const Instruction *Inst,
4983b11a16aSHongbin Zheng                                                ValueMapT &VectorMap,
4993b11a16aSHongbin Zheng                                                VectorValueMapT &ScalarMaps) {
5003b11a16aSHongbin Zheng   bool HasVectorOperand = false;
5013b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
5023b11a16aSHongbin Zheng 
50391f5b262STobias Grosser   for (Value *Operand : Inst->operands()) {
50491f5b262STobias Grosser     ValueMapT::iterator VecOp = VectorMap.find(Operand);
5053b11a16aSHongbin Zheng 
5063b11a16aSHongbin Zheng     if (VecOp == VectorMap.end())
5073b11a16aSHongbin Zheng       continue;
5083b11a16aSHongbin Zheng 
5093b11a16aSHongbin Zheng     HasVectorOperand = true;
5103b11a16aSHongbin Zheng     Value *NewVector = VecOp->second;
5113b11a16aSHongbin Zheng 
5123b11a16aSHongbin Zheng     for (int i = 0; i < VectorWidth; ++i) {
5133b11a16aSHongbin Zheng       ValueMapT &SM = ScalarMaps[i];
5143b11a16aSHongbin Zheng 
5153b11a16aSHongbin Zheng       // If there is one scalar extracted, all scalar elements should have
5163b11a16aSHongbin Zheng       // already been extracted by the code here. So no need to check for the
5173b11a16aSHongbin Zheng       // existance of all of them.
51891f5b262STobias Grosser       if (SM.count(Operand))
5193b11a16aSHongbin Zheng         break;
5203b11a16aSHongbin Zheng 
52191f5b262STobias Grosser       SM[Operand] =
52291f5b262STobias Grosser           Builder.CreateExtractElement(NewVector, Builder.getInt32(i));
5233b11a16aSHongbin Zheng     }
5243b11a16aSHongbin Zheng   }
5253b11a16aSHongbin Zheng 
5263b11a16aSHongbin Zheng   return HasVectorOperand;
5273b11a16aSHongbin Zheng }
5283b11a16aSHongbin Zheng 
5293b11a16aSHongbin Zheng void VectorBlockGenerator::copyInstScalarized(const Instruction *Inst,
5303b11a16aSHongbin Zheng                                               ValueMapT &VectorMap,
5313b11a16aSHongbin Zheng                                               VectorValueMapT &ScalarMaps) {
5323b11a16aSHongbin Zheng   bool HasVectorOperand;
5333b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
5343b11a16aSHongbin Zheng 
5353b11a16aSHongbin Zheng   HasVectorOperand = extractScalarValues(Inst, VectorMap, ScalarMaps);
5363b11a16aSHongbin Zheng 
5373b11a16aSHongbin Zheng   for (int VectorLane = 0; VectorLane < getVectorWidth(); VectorLane++)
538731685e6SJohannes Doerfert     BlockGenerator::copyInstruction(Inst, ScalarMaps[VectorLane],
539731685e6SJohannes Doerfert                                     GlobalMaps[VectorLane], VLTS[VectorLane]);
5403b11a16aSHongbin Zheng 
5413b11a16aSHongbin Zheng   if (!VectorType::isValidElementType(Inst->getType()) || !HasVectorOperand)
5423b11a16aSHongbin Zheng     return;
5433b11a16aSHongbin Zheng 
5443b11a16aSHongbin Zheng   // Make the result available as vector value.
5453b11a16aSHongbin Zheng   VectorType *VectorType = VectorType::get(Inst->getType(), VectorWidth);
5463b11a16aSHongbin Zheng   Value *Vector = UndefValue::get(VectorType);
5473b11a16aSHongbin Zheng 
5483b11a16aSHongbin Zheng   for (int i = 0; i < VectorWidth; i++)
5493b11a16aSHongbin Zheng     Vector = Builder.CreateInsertElement(Vector, ScalarMaps[i][Inst],
5503b11a16aSHongbin Zheng                                          Builder.getInt32(i));
5513b11a16aSHongbin Zheng 
5523b11a16aSHongbin Zheng   VectorMap[Inst] = Vector;
5533b11a16aSHongbin Zheng }
5543b11a16aSHongbin Zheng 
555c14582f2STobias Grosser int VectorBlockGenerator::getVectorWidth() { return GlobalMaps.size(); }
5563b11a16aSHongbin Zheng 
5573b11a16aSHongbin Zheng void VectorBlockGenerator::copyInstruction(const Instruction *Inst,
5583b11a16aSHongbin Zheng                                            ValueMapT &VectorMap,
5593b11a16aSHongbin Zheng                                            VectorValueMapT &ScalarMaps) {
5603b11a16aSHongbin Zheng   // Terminator instructions control the control flow. They are explicitly
5613b11a16aSHongbin Zheng   // expressed in the clast and do not need to be copied.
5623b11a16aSHongbin Zheng   if (Inst->isTerminator())
5633b11a16aSHongbin Zheng     return;
5643b11a16aSHongbin Zheng 
565ecfe21b7STobias Grosser   if (canSynthesize(Inst, &P->getAnalysis<LoopInfo>(), &SE,
566ecfe21b7STobias Grosser                     &Statement.getParent()->getRegion()))
567e71c6ab5STobias Grosser     return;
568e71c6ab5STobias Grosser 
5693b11a16aSHongbin Zheng   if (const LoadInst *Load = dyn_cast<LoadInst>(Inst)) {
5703b11a16aSHongbin Zheng     generateLoad(Load, VectorMap, ScalarMaps);
5713b11a16aSHongbin Zheng     return;
5723b11a16aSHongbin Zheng   }
5733b11a16aSHongbin Zheng 
5743b11a16aSHongbin Zheng   if (hasVectorOperands(Inst, VectorMap)) {
5753b11a16aSHongbin Zheng     if (const StoreInst *Store = dyn_cast<StoreInst>(Inst)) {
5763b11a16aSHongbin Zheng       copyStore(Store, VectorMap, ScalarMaps);
5773b11a16aSHongbin Zheng       return;
5783b11a16aSHongbin Zheng     }
5793b11a16aSHongbin Zheng 
5803b11a16aSHongbin Zheng     if (const UnaryInstruction *Unary = dyn_cast<UnaryInstruction>(Inst)) {
5813b11a16aSHongbin Zheng       copyUnaryInst(Unary, VectorMap, ScalarMaps);
5823b11a16aSHongbin Zheng       return;
5833b11a16aSHongbin Zheng     }
5843b11a16aSHongbin Zheng 
5853b11a16aSHongbin Zheng     if (const BinaryOperator *Binary = dyn_cast<BinaryOperator>(Inst)) {
5863b11a16aSHongbin Zheng       copyBinaryInst(Binary, VectorMap, ScalarMaps);
5873b11a16aSHongbin Zheng       return;
5883b11a16aSHongbin Zheng     }
5893b11a16aSHongbin Zheng 
5903b11a16aSHongbin Zheng     // Falltrough: We generate scalar instructions, if we don't know how to
5913b11a16aSHongbin Zheng     // generate vector code.
5923b11a16aSHongbin Zheng   }
5933b11a16aSHongbin Zheng 
5943b11a16aSHongbin Zheng   copyInstScalarized(Inst, VectorMap, ScalarMaps);
5953b11a16aSHongbin Zheng }
5963b11a16aSHongbin Zheng 
5973b11a16aSHongbin Zheng void VectorBlockGenerator::copyBB() {
5983b11a16aSHongbin Zheng   BasicBlock *BB = Statement.getBasicBlock();
599c14582f2STobias Grosser   BasicBlock *CopyBB =
600c14582f2STobias Grosser       SplitBlock(Builder.GetInsertBlock(), Builder.GetInsertPoint(), P);
6013b11a16aSHongbin Zheng   CopyBB->setName("polly.stmt." + BB->getName());
6023b11a16aSHongbin Zheng   Builder.SetInsertPoint(CopyBB->begin());
6033b11a16aSHongbin Zheng 
6043b11a16aSHongbin Zheng   // Create two maps that store the mapping from the original instructions of
6053b11a16aSHongbin Zheng   // the old basic block to their copies in the new basic block. Those maps
6063b11a16aSHongbin Zheng   // are basic block local.
6073b11a16aSHongbin Zheng   //
6083b11a16aSHongbin Zheng   // As vector code generation is supported there is one map for scalar values
6093b11a16aSHongbin Zheng   // and one for vector values.
6103b11a16aSHongbin Zheng   //
6113b11a16aSHongbin Zheng   // In case we just do scalar code generation, the vectorMap is not used and
6123b11a16aSHongbin Zheng   // the scalarMap has just one dimension, which contains the mapping.
6133b11a16aSHongbin Zheng   //
6143b11a16aSHongbin Zheng   // In case vector code generation is done, an instruction may either appear
6153b11a16aSHongbin Zheng   // in the vector map once (as it is calculating >vectorwidth< values at a
6163b11a16aSHongbin Zheng   // time. Or (if the values are calculated using scalar operations), it
6173b11a16aSHongbin Zheng   // appears once in every dimension of the scalarMap.
6183b11a16aSHongbin Zheng   VectorValueMapT ScalarBlockMap(getVectorWidth());
6193b11a16aSHongbin Zheng   ValueMapT VectorBlockMap;
6203b11a16aSHongbin Zheng 
62191f5b262STobias Grosser   for (Instruction &Inst : *BB)
62291f5b262STobias Grosser     copyInstruction(&Inst, VectorBlockMap, ScalarBlockMap);
6233b11a16aSHongbin Zheng }
624