13b11a16aSHongbin Zheng //===--- BlockGenerators.cpp - Generate code for statements -----*- C++ -*-===//
23b11a16aSHongbin Zheng //
32946cd70SChandler Carruth // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
42946cd70SChandler Carruth // See https://llvm.org/LICENSE.txt for license information.
52946cd70SChandler Carruth // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
63b11a16aSHongbin Zheng //
73b11a16aSHongbin Zheng //===----------------------------------------------------------------------===//
83b11a16aSHongbin Zheng //
93b11a16aSHongbin Zheng // This file implements the BlockGenerator and VectorBlockGenerator classes,
103b11a16aSHongbin Zheng // which generate sequential code and vectorized code for a polyhedral
113b11a16aSHongbin Zheng // statement, respectively.
123b11a16aSHongbin Zheng //
133b11a16aSHongbin Zheng //===----------------------------------------------------------------------===//
143b11a16aSHongbin Zheng 
158a846610SHongbin Zheng #include "polly/CodeGen/BlockGenerators.h"
16a63b2579SJohannes Doerfert #include "polly/CodeGen/IslExprBuilder.h"
1786bc93a9STobias Grosser #include "polly/CodeGen/RuntimeDebugBuilder.h"
18637bd631STobias Grosser #include "polly/Options.h"
195624d3c9STobias Grosser #include "polly/ScopInfo.h"
20ecfe21b7STobias Grosser #include "polly/Support/ScopHelper.h"
21eedae763SMichael Kruse #include "polly/Support/VirtualInstruction.h"
22e71c6ab5STobias Grosser #include "llvm/Analysis/LoopInfo.h"
23f32d651dSJohannes Doerfert #include "llvm/Analysis/RegionInfo.h"
24e71c6ab5STobias Grosser #include "llvm/Analysis/ScalarEvolution.h"
253b11a16aSHongbin Zheng #include "llvm/Transforms/Utils/BasicBlockUtils.h"
26a998f98bSTobias Grosser #include "llvm/Transforms/Utils/Local.h"
27f32d651dSJohannes Doerfert #include "isl/ast.h"
28f32d651dSJohannes Doerfert #include <deque>
29f32d651dSJohannes Doerfert 
303b11a16aSHongbin Zheng using namespace llvm;
313b11a16aSHongbin Zheng using namespace polly;
323b11a16aSHongbin Zheng 
33878aba49STobias Grosser static cl::opt<bool> Aligned("enable-polly-aligned",
34878aba49STobias Grosser                              cl::desc("Assumed aligned memory accesses."),
35878aba49STobias Grosser                              cl::Hidden, cl::init(false), cl::ZeroOrMore,
36878aba49STobias Grosser                              cl::cat(PollyCategory));
373b11a16aSHongbin Zheng 
381be726a4STobias Grosser bool PollyDebugPrinting;
391be726a4STobias Grosser static cl::opt<bool, true> DebugPrintingX(
4086bc93a9STobias Grosser     "polly-codegen-add-debug-printing",
4186bc93a9STobias Grosser     cl::desc("Add printf calls that show the values loaded/stored."),
421be726a4STobias Grosser     cl::location(PollyDebugPrinting), cl::Hidden, cl::init(false),
431be726a4STobias Grosser     cl::ZeroOrMore, cl::cat(PollyCategory));
4486bc93a9STobias Grosser 
45e819fffeSMichael Kruse static cl::opt<bool> TraceStmts(
46e819fffeSMichael Kruse     "polly-codegen-trace-stmts",
47e819fffeSMichael Kruse     cl::desc("Add printf calls that print the statement being executed"),
48e819fffeSMichael Kruse     cl::Hidden, cl::init(false), cl::ZeroOrMore, cl::cat(PollyCategory));
49e819fffeSMichael Kruse 
50e819fffeSMichael Kruse static cl::opt<bool> TraceScalars(
51e819fffeSMichael Kruse     "polly-codegen-trace-scalars",
52e819fffeSMichael Kruse     cl::desc("Add printf calls that print the values of all scalar values "
53e819fffeSMichael Kruse              "used in a statement. Requires -polly-codegen-trace-stmts."),
54e819fffeSMichael Kruse     cl::Hidden, cl::init(false), cl::ZeroOrMore, cl::cat(PollyCategory));
55e819fffeSMichael Kruse 
56acf80064SEli Friedman BlockGenerator::BlockGenerator(
57acf80064SEli Friedman     PollyIRBuilder &B, LoopInfo &LI, ScalarEvolution &SE, DominatorTree &DT,
58587f1f57STobias Grosser     AllocaMapTy &ScalarMap, EscapeUsersAllocaMapTy &EscapeMap,
59587f1f57STobias Grosser     ValueMapT &GlobalMap, IslExprBuilder *ExprBuilder, BasicBlock *StartBlock)
60ecff11dcSJohannes Doerfert     : Builder(B), LI(LI), SE(SE), ExprBuilder(ExprBuilder), DT(DT),
61587f1f57STobias Grosser       EntryBB(nullptr), ScalarMap(ScalarMap), EscapeMap(EscapeMap),
62587f1f57STobias Grosser       GlobalMap(GlobalMap), StartBlock(StartBlock) {}
63e71c6ab5STobias Grosser 
642f1acac6STobias Grosser Value *BlockGenerator::trySynthesizeNewValue(ScopStmt &Stmt, Value *Old,
6533cb9f94STobias Grosser                                              ValueMapT &BBMap,
6633cb9f94STobias Grosser                                              LoopToScevMapT &LTS,
67bc132607STobias Grosser                                              Loop *L) const {
6842df8d1dSJohannes Doerfert   if (!SE.isSCEVable(Old->getType()))
6942df8d1dSJohannes Doerfert     return nullptr;
7042df8d1dSJohannes Doerfert 
7142df8d1dSJohannes Doerfert   const SCEV *Scev = SE.getSCEVAtScope(Old, L);
7242df8d1dSJohannes Doerfert   if (!Scev)
7342df8d1dSJohannes Doerfert     return nullptr;
7442df8d1dSJohannes Doerfert 
7542df8d1dSJohannes Doerfert   if (isa<SCEVCouldNotCompute>(Scev))
7642df8d1dSJohannes Doerfert     return nullptr;
7742df8d1dSJohannes Doerfert 
7803bcb910SSanjoy Das   const SCEV *NewScev = SCEVLoopAddRecRewriter::rewrite(Scev, LTS, SE);
7909e3697fSJohannes Doerfert   ValueMapT VTV;
80637b23dcSSebastian Pop   VTV.insert(BBMap.begin(), BBMap.end());
81637b23dcSSebastian Pop   VTV.insert(GlobalMap.begin(), GlobalMap.end());
82e69e1141SJohannes Doerfert 
83e69e1141SJohannes Doerfert   Scop &S = *Stmt.getParent();
843f52e354SJohannes Doerfert   const DataLayout &DL = S.getFunction().getParent()->getDataLayout();
85e69e1141SJohannes Doerfert   auto IP = Builder.GetInsertPoint();
86e69e1141SJohannes Doerfert 
87e69e1141SJohannes Doerfert   assert(IP != Builder.GetInsertBlock()->end() &&
8845e7944bSTobias Grosser          "Only instructions can be insert points for SCEVExpander");
8942df8d1dSJohannes Doerfert   Value *Expanded =
90acf80064SEli Friedman       expandCodeFor(S, SE, DL, "polly", NewScev, Old->getType(), &*IP, &VTV,
91acf80064SEli Friedman                     StartBlock->getSinglePredecessor());
92e71c6ab5STobias Grosser 
93e71c6ab5STobias Grosser   BBMap[Old] = Expanded;
94e71c6ab5STobias Grosser   return Expanded;
95e71c6ab5STobias Grosser }
9633cb9f94STobias Grosser 
972f1acac6STobias Grosser Value *BlockGenerator::getNewValue(ScopStmt &Stmt, Value *Old, ValueMapT &BBMap,
982f1acac6STobias Grosser                                    LoopToScevMapT &LTS, Loop *L) const {
9933cb9f94STobias Grosser 
100eedae763SMichael Kruse   auto lookupGlobally = [this](Value *Old) -> Value * {
101eedae763SMichael Kruse     Value *New = GlobalMap.lookup(Old);
102eedae763SMichael Kruse     if (!New)
103eedae763SMichael Kruse       return nullptr;
10428f8ac1dSJohannes Doerfert 
105eedae763SMichael Kruse     // Required by:
106eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/invariant_base_pointer_preloaded.ll
107eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/invariant_base_pointer_preloaded_different_bb.ll
108eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/invariant_base_pointer_preloaded_pass_only_needed.ll
109eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/invariant_base_pointers_preloaded.ll
110eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/loop-body-references-outer-values-3.ll
111eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/single_loop_with_loop_invariant_baseptr.ll
112eedae763SMichael Kruse     // GlobalMap should be a mapping from (value in original SCoP) to (copied
113eedae763SMichael Kruse     // value in generated SCoP), without intermediate mappings, which might
114eedae763SMichael Kruse     // easily require transitiveness as well.
11533cb9f94STobias Grosser     if (Value *NewRemapped = GlobalMap.lookup(New))
11633cb9f94STobias Grosser       New = NewRemapped;
117eedae763SMichael Kruse 
118eedae763SMichael Kruse     // No test case for this code.
11933cb9f94STobias Grosser     if (Old->getType()->getScalarSizeInBits() <
12033cb9f94STobias Grosser         New->getType()->getScalarSizeInBits())
12133cb9f94STobias Grosser       New = Builder.CreateTruncOrBitCast(New, Old->getType());
12233cb9f94STobias Grosser 
12333cb9f94STobias Grosser     return New;
124eedae763SMichael Kruse   };
125eedae763SMichael Kruse 
126eedae763SMichael Kruse   Value *New = nullptr;
127eedae763SMichael Kruse   auto VUse = VirtualUse::create(&Stmt, L, Old, true);
128eedae763SMichael Kruse   switch (VUse.getKind()) {
129eedae763SMichael Kruse   case VirtualUse::Block:
130eedae763SMichael Kruse     // BasicBlock are constants, but the BlockGenerator copies them.
131eedae763SMichael Kruse     New = BBMap.lookup(Old);
132eedae763SMichael Kruse     break;
133eedae763SMichael Kruse 
134eedae763SMichael Kruse   case VirtualUse::Constant:
135eedae763SMichael Kruse     // Used by:
136eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/reference-argument-from-non-affine-region.ll
137eedae763SMichael Kruse     // Constants should not be redefined. In this case, the GlobalMap just
138eedae763SMichael Kruse     // contains a mapping to the same constant, which is unnecessary, but
139eedae763SMichael Kruse     // harmless.
140eedae763SMichael Kruse     if ((New = lookupGlobally(Old)))
141eedae763SMichael Kruse       break;
142eedae763SMichael Kruse 
143eedae763SMichael Kruse     assert(!BBMap.count(Old));
144eedae763SMichael Kruse     New = Old;
145eedae763SMichael Kruse     break;
146eedae763SMichael Kruse 
147eedae763SMichael Kruse   case VirtualUse::ReadOnly:
148eedae763SMichael Kruse     assert(!GlobalMap.count(Old));
149eedae763SMichael Kruse 
150eedae763SMichael Kruse     // Required for:
151eedae763SMichael Kruse     // * Isl/CodeGen/MemAccess/create_arrays.ll
152eedae763SMichael Kruse     // * Isl/CodeGen/read-only-scalars.ll
153eedae763SMichael Kruse     // * ScheduleOptimizer/pattern-matching-based-opts_10.ll
154eedae763SMichael Kruse     // For some reason these reload a read-only value. The reloaded value ends
155eedae763SMichael Kruse     // up in BBMap, buts its value should be identical.
156eedae763SMichael Kruse     //
157eedae763SMichael Kruse     // Required for:
158eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/single_loop_with_param.ll
159eedae763SMichael Kruse     // The parallel subfunctions need to reference the read-only value from the
160eedae763SMichael Kruse     // parent function, this is done by reloading them locally.
161eedae763SMichael Kruse     if ((New = BBMap.lookup(Old)))
162eedae763SMichael Kruse       break;
163eedae763SMichael Kruse 
164eedae763SMichael Kruse     New = Old;
165eedae763SMichael Kruse     break;
166eedae763SMichael Kruse 
167eedae763SMichael Kruse   case VirtualUse::Synthesizable:
168eedae763SMichael Kruse     // Used by:
169eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/loop-body-references-outer-values-3.ll
170eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/recomputed-srem.ll
171eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/reference-other-bb.ll
172eedae763SMichael Kruse     // * Isl/CodeGen/OpenMP/two-parallel-loops-reference-outer-indvar.ll
173eedae763SMichael Kruse     // For some reason synthesizable values end up in GlobalMap. Their values
174eedae763SMichael Kruse     // are the same as trySynthesizeNewValue would return. The legacy
175eedae763SMichael Kruse     // implementation prioritized GlobalMap, so this is what we do here as well.
176eedae763SMichael Kruse     // Ideally, synthesizable values should not end up in GlobalMap.
177eedae763SMichael Kruse     if ((New = lookupGlobally(Old)))
178eedae763SMichael Kruse       break;
179eedae763SMichael Kruse 
180eedae763SMichael Kruse     // Required for:
181eedae763SMichael Kruse     // * Isl/CodeGen/RuntimeDebugBuilder/combine_different_values.ll
182eedae763SMichael Kruse     // * Isl/CodeGen/getNumberOfIterations.ll
183eedae763SMichael Kruse     // * Isl/CodeGen/non_affine_float_compare.ll
184eedae763SMichael Kruse     // * ScheduleOptimizer/pattern-matching-based-opts_10.ll
185eedae763SMichael Kruse     // Ideally, synthesizable values are synthesized by trySynthesizeNewValue,
186eedae763SMichael Kruse     // not precomputed (SCEVExpander has its own caching mechanism).
187eedae763SMichael Kruse     // These tests fail without this, but I think trySynthesizeNewValue would
188eedae763SMichael Kruse     // just re-synthesize the same instructions.
189eedae763SMichael Kruse     if ((New = BBMap.lookup(Old)))
190eedae763SMichael Kruse       break;
191eedae763SMichael Kruse 
192eedae763SMichael Kruse     New = trySynthesizeNewValue(Stmt, Old, BBMap, LTS, L);
193eedae763SMichael Kruse     break;
194eedae763SMichael Kruse 
195eedae763SMichael Kruse   case VirtualUse::Hoisted:
196eedae763SMichael Kruse     // TODO: Hoisted invariant loads should be found in GlobalMap only, but not
197eedae763SMichael Kruse     // redefined locally (which will be ignored anyway). That is, the following
198eedae763SMichael Kruse     // assertion should apply: assert(!BBMap.count(Old))
199eedae763SMichael Kruse 
200eedae763SMichael Kruse     New = lookupGlobally(Old);
201eedae763SMichael Kruse     break;
202eedae763SMichael Kruse 
203eedae763SMichael Kruse   case VirtualUse::Intra:
204eedae763SMichael Kruse   case VirtualUse::Inter:
205eedae763SMichael Kruse     assert(!GlobalMap.count(Old) &&
206eedae763SMichael Kruse            "Intra and inter-stmt values are never global");
207eedae763SMichael Kruse     New = BBMap.lookup(Old);
208eedae763SMichael Kruse     break;
20933cb9f94STobias Grosser   }
210eedae763SMichael Kruse   assert(New && "Unexpected scalar dependence in region!");
21133cb9f94STobias Grosser   return New;
2123b11a16aSHongbin Zheng }
2133b11a16aSHongbin Zheng 
2142f1acac6STobias Grosser void BlockGenerator::copyInstScalar(ScopStmt &Stmt, Instruction *Inst,
215bc132607STobias Grosser                                     ValueMapT &BBMap, LoopToScevMapT &LTS) {
216030237d0STobias Grosser   // We do not generate debug intrinsics as we did not investigate how to
217030237d0STobias Grosser   // copy them correctly. At the current state, they just crash the code
218030237d0STobias Grosser   // generation as the meta-data operands are not correctly copied.
219030237d0STobias Grosser   if (isa<DbgInfoIntrinsic>(Inst))
220030237d0STobias Grosser     return;
221030237d0STobias Grosser 
2223b11a16aSHongbin Zheng   Instruction *NewInst = Inst->clone();
2233b11a16aSHongbin Zheng 
2243b11a16aSHongbin Zheng   // Replace old operands with the new ones.
22591f5b262STobias Grosser   for (Value *OldOperand : Inst->operands()) {
226bc132607STobias Grosser     Value *NewOperand =
2272c3ffc04SJohannes Doerfert         getNewValue(Stmt, OldOperand, BBMap, LTS, getLoopForStmt(Stmt));
2283b11a16aSHongbin Zheng 
2293b11a16aSHongbin Zheng     if (!NewOperand) {
230c14582f2STobias Grosser       assert(!isa<StoreInst>(NewInst) &&
231c14582f2STobias Grosser              "Store instructions are always needed!");
23296ab8726SReid Kleckner       NewInst->deleteValue();
2333b11a16aSHongbin Zheng       return;
2343b11a16aSHongbin Zheng     }
2353b11a16aSHongbin Zheng 
2363b11a16aSHongbin Zheng     NewInst->replaceUsesOfWith(OldOperand, NewOperand);
2373b11a16aSHongbin Zheng   }
2383b11a16aSHongbin Zheng 
2393b11a16aSHongbin Zheng   Builder.Insert(NewInst);
2403b11a16aSHongbin Zheng   BBMap[Inst] = NewInst;
2413b11a16aSHongbin Zheng 
242188053afSSingapuram Sanjay Srivallabh   // When copying the instruction onto the Module meant for the GPU,
243188053afSSingapuram Sanjay Srivallabh   // debug metadata attached to an instruction causes all related
244188053afSSingapuram Sanjay Srivallabh   // metadata to be pulled into the Module. This includes the DICompileUnit,
245188053afSSingapuram Sanjay Srivallabh   // which will not be listed in llvm.dbg.cu of the Module since the Module
246188053afSSingapuram Sanjay Srivallabh   // doesn't contain one. This fails the verification of the Module and the
247188053afSSingapuram Sanjay Srivallabh   // subsequent generation of the ASM string.
248188053afSSingapuram Sanjay Srivallabh   if (NewInst->getModule() != Inst->getModule())
249188053afSSingapuram Sanjay Srivallabh     NewInst->setDebugLoc(llvm::DebugLoc());
250188053afSSingapuram Sanjay Srivallabh 
2513b11a16aSHongbin Zheng   if (!NewInst->getType()->isVoidTy())
2523b11a16aSHongbin Zheng     NewInst->setName("p_" + Inst->getName());
2533b11a16aSHongbin Zheng }
2543b11a16aSHongbin Zheng 
25570131d34SMichael Kruse Value *
25670131d34SMichael Kruse BlockGenerator::generateLocationAccessed(ScopStmt &Stmt, MemAccInst Inst,
25770131d34SMichael Kruse                                          ValueMapT &BBMap, LoopToScevMapT &LTS,
25870131d34SMichael Kruse                                          isl_id_to_ast_expr *NewAccesses) {
25909214772STobias Grosser   const MemoryAccess &MA = Stmt.getArrayAccessFor(Inst);
2602fa35194SMichael Kruse   return generateLocationAccessed(
2612fa35194SMichael Kruse       Stmt, getLoopForStmt(Stmt),
2622fa35194SMichael Kruse       Inst.isNull() ? nullptr : Inst.getPointerOperand(), BBMap, LTS,
263fe46c3ffSTobias Grosser       NewAccesses, MA.getId().release(), MA.getAccessValue()->getType());
2642fa35194SMichael Kruse }
2653b11a16aSHongbin Zheng 
2662fa35194SMichael Kruse Value *BlockGenerator::generateLocationAccessed(
2672fa35194SMichael Kruse     ScopStmt &Stmt, Loop *L, Value *Pointer, ValueMapT &BBMap,
2682fa35194SMichael Kruse     LoopToScevMapT &LTS, isl_id_to_ast_expr *NewAccesses, __isl_take isl_id *Id,
2692fa35194SMichael Kruse     Type *ExpectedType) {
2702fa35194SMichael Kruse   isl_ast_expr *AccessExpr = isl_id_to_ast_expr_get(NewAccesses, Id);
2713b11a16aSHongbin Zheng 
2722d1ed0bfSTobias Grosser   if (AccessExpr) {
2732d1ed0bfSTobias Grosser     AccessExpr = isl_ast_expr_address_of(AccessExpr);
27498b3ee50STobias Grosser     auto Address = ExprBuilder->create(AccessExpr);
27598b3ee50STobias Grosser 
27698b3ee50STobias Grosser     // Cast the address of this memory access to a pointer type that has the
27798b3ee50STobias Grosser     // same element type as the original access, but uses the address space of
27898b3ee50STobias Grosser     // the newly generated pointer.
2792fa35194SMichael Kruse     auto OldPtrTy = ExpectedType->getPointerTo();
28098b3ee50STobias Grosser     auto NewPtrTy = Address->getType();
28143705149SEli Friedman     OldPtrTy = PointerType::getWithSamePointeeType(
28243705149SEli Friedman         OldPtrTy, NewPtrTy->getPointerAddressSpace());
28398b3ee50STobias Grosser 
284d840fc72STobias Grosser     if (OldPtrTy != NewPtrTy)
28598b3ee50STobias Grosser       Address = Builder.CreateBitOrPointerCast(Address, OldPtrTy);
28698b3ee50STobias Grosser     return Address;
2872d1ed0bfSTobias Grosser   }
2882fa35194SMichael Kruse   assert(
2892fa35194SMichael Kruse       Pointer &&
2902fa35194SMichael Kruse       "If expression was not generated, must use the original pointer value");
2912fa35194SMichael Kruse   return getNewValue(Stmt, Pointer, BBMap, LTS, L);
2922fa35194SMichael Kruse }
2932d1ed0bfSTobias Grosser 
2942fa35194SMichael Kruse Value *
2952fa35194SMichael Kruse BlockGenerator::getImplicitAddress(MemoryAccess &Access, Loop *L,
2962fa35194SMichael Kruse                                    LoopToScevMapT &LTS, ValueMapT &BBMap,
2972fa35194SMichael Kruse                                    __isl_keep isl_id_to_ast_expr *NewAccesses) {
2982fa35194SMichael Kruse   if (Access.isLatestArrayKind())
2992fa35194SMichael Kruse     return generateLocationAccessed(*Access.getStatement(), L, nullptr, BBMap,
300fe46c3ffSTobias Grosser                                     LTS, NewAccesses, Access.getId().release(),
3012fa35194SMichael Kruse                                     Access.getAccessValue()->getType());
3022fa35194SMichael Kruse 
303587f1f57STobias Grosser   return getOrCreateAlloca(Access);
3043b11a16aSHongbin Zheng }
3053b11a16aSHongbin Zheng 
3062c3ffc04SJohannes Doerfert Loop *BlockGenerator::getLoopForStmt(const ScopStmt &Stmt) const {
307375cb5feSMichael Kruse   auto *StmtBB = Stmt.getEntryBlock();
3082c3ffc04SJohannes Doerfert   return LI.getLoopFor(StmtBB);
309369430ffSTobias Grosser }
310369430ffSTobias Grosser 
311888ab551SMichael Kruse Value *BlockGenerator::generateArrayLoad(ScopStmt &Stmt, LoadInst *Load,
312bc132607STobias Grosser                                          ValueMapT &BBMap, LoopToScevMapT &LTS,
3132d1ed0bfSTobias Grosser                                          isl_id_to_ast_expr *NewAccesses) {
314c1db67e2SJohannes Doerfert   if (Value *PreloadLoad = GlobalMap.lookup(Load))
315c1db67e2SJohannes Doerfert     return PreloadLoad;
316c1db67e2SJohannes Doerfert 
317bc132607STobias Grosser   Value *NewPointer =
31870131d34SMichael Kruse       generateLocationAccessed(Stmt, Load, BBMap, LTS, NewAccesses);
319ff9b37e9SNikita Popov   Value *ScalarLoad =
320ff9b37e9SNikita Popov       Builder.CreateAlignedLoad(Load->getType(), NewPointer, Load->getAlign(),
32107c9d532SGuillaume Chatelet                                 Load->getName() + "_p_scalar_");
32286bc93a9STobias Grosser 
3231be726a4STobias Grosser   if (PollyDebugPrinting)
32486bc93a9STobias Grosser     RuntimeDebugBuilder::createCPUPrinter(Builder, "Load from ", NewPointer,
32586bc93a9STobias Grosser                                           ": ", ScalarLoad, "\n");
32686bc93a9STobias Grosser 
3273b11a16aSHongbin Zheng   return ScalarLoad;
3283b11a16aSHongbin Zheng }
3293b11a16aSHongbin Zheng 
330888ab551SMichael Kruse void BlockGenerator::generateArrayStore(ScopStmt &Stmt, StoreInst *Store,
331bc132607STobias Grosser                                         ValueMapT &BBMap, LoopToScevMapT &LTS,
3322d1ed0bfSTobias Grosser                                         isl_id_to_ast_expr *NewAccesses) {
333706f79abSMichael Kruse   MemoryAccess &MA = Stmt.getArrayAccessFor(Store);
3341515f6b9STobias Grosser   isl::set AccDom = MA.getAccessRelation().domain();
335fe46c3ffSTobias Grosser   std::string Subject = MA.getId().get_name();
336706f79abSMichael Kruse 
337fe46c3ffSTobias Grosser   generateConditionalExecution(Stmt, AccDom, Subject.c_str(), [&, this]() {
338bc132607STobias Grosser     Value *NewPointer =
33970131d34SMichael Kruse         generateLocationAccessed(Stmt, Store, BBMap, LTS, NewAccesses);
340706f79abSMichael Kruse     Value *ValueOperand = getNewValue(Stmt, Store->getValueOperand(), BBMap,
341706f79abSMichael Kruse                                       LTS, getLoopForStmt(Stmt));
3423b11a16aSHongbin Zheng 
3431be726a4STobias Grosser     if (PollyDebugPrinting)
34486bc93a9STobias Grosser       RuntimeDebugBuilder::createCPUPrinter(Builder, "Store to  ", NewPointer,
34586bc93a9STobias Grosser                                             ": ", ValueOperand, "\n");
34686bc93a9STobias Grosser 
34759f95222SGuillaume Chatelet     Builder.CreateAlignedStore(ValueOperand, NewPointer, Store->getAlign());
348706f79abSMichael Kruse   });
3493b11a16aSHongbin Zheng }
3503b11a16aSHongbin Zheng 
3515dced269SJohannes Doerfert bool BlockGenerator::canSyntheziseInStmt(ScopStmt &Stmt, Instruction *Inst) {
3522c3ffc04SJohannes Doerfert   Loop *L = getLoopForStmt(Stmt);
3535dced269SJohannes Doerfert   return (Stmt.isBlockStmt() || !Stmt.getRegion()->contains(L)) &&
35411c5e079SMichael Kruse          canSynthesize(Inst, *Stmt.getParent(), &SE, L);
3555dced269SJohannes Doerfert }
3565dced269SJohannes Doerfert 
3572f1acac6STobias Grosser void BlockGenerator::copyInstruction(ScopStmt &Stmt, Instruction *Inst,
358bc132607STobias Grosser                                      ValueMapT &BBMap, LoopToScevMapT &LTS,
3592d1ed0bfSTobias Grosser                                      isl_id_to_ast_expr *NewAccesses) {
3603b11a16aSHongbin Zheng   // Terminator instructions control the control flow. They are explicitly
3613b11a16aSHongbin Zheng   // expressed in the clast and do not need to be copied.
3623b11a16aSHongbin Zheng   if (Inst->isTerminator())
3633b11a16aSHongbin Zheng     return;
3643b11a16aSHongbin Zheng 
365aff56c8aSTobias Grosser   // Synthesizable statements will be generated on-demand.
3665dced269SJohannes Doerfert   if (canSyntheziseInStmt(Stmt, Inst))
367e71c6ab5STobias Grosser     return;
368e71c6ab5STobias Grosser 
3699646e3feSTobias Grosser   if (auto *Load = dyn_cast<LoadInst>(Inst)) {
370888ab551SMichael Kruse     Value *NewLoad = generateArrayLoad(Stmt, Load, BBMap, LTS, NewAccesses);
3713d94fedfSSebastian Pop     // Compute NewLoad before its insertion in BBMap to make the insertion
3723d94fedfSSebastian Pop     // deterministic.
373753d43f9SSebastian Pop     BBMap[Load] = NewLoad;
3743b11a16aSHongbin Zheng     return;
3753b11a16aSHongbin Zheng   }
3763b11a16aSHongbin Zheng 
3779646e3feSTobias Grosser   if (auto *Store = dyn_cast<StoreInst>(Inst)) {
3780446d81eSMichael Kruse     // Identified as redundant by -polly-simplify.
3790446d81eSMichael Kruse     if (!Stmt.getArrayAccessOrNULLFor(Store))
3800446d81eSMichael Kruse       return;
3810446d81eSMichael Kruse 
382888ab551SMichael Kruse     generateArrayStore(Stmt, Store, BBMap, LTS, NewAccesses);
3833b11a16aSHongbin Zheng     return;
3843b11a16aSHongbin Zheng   }
3853b11a16aSHongbin Zheng 
3869646e3feSTobias Grosser   if (auto *PHI = dyn_cast<PHINode>(Inst)) {
387bc132607STobias Grosser     copyPHIInstruction(Stmt, PHI, BBMap, LTS);
388ecff11dcSJohannes Doerfert     return;
389ecff11dcSJohannes Doerfert   }
390ecff11dcSJohannes Doerfert 
3913f500fa2SJohannes Doerfert   // Skip some special intrinsics for which we do not adjust the semantics to
3923f500fa2SJohannes Doerfert   // the new schedule. All others are handled like every other instruction.
3939c0ffe3aSTobias Grosser   if (isIgnoredIntrinsic(Inst))
3943f500fa2SJohannes Doerfert     return;
3953f500fa2SJohannes Doerfert 
396bc132607STobias Grosser   copyInstScalar(Stmt, Inst, BBMap, LTS);
3973b11a16aSHongbin Zheng }
3983b11a16aSHongbin Zheng 
3999d12d8adSTobias Grosser void BlockGenerator::removeDeadInstructions(BasicBlock *BB, ValueMapT &BBMap) {
400c59b3ce0STobias Grosser   auto NewBB = Builder.GetInsertBlock();
401c59b3ce0STobias Grosser   for (auto I = NewBB->rbegin(); I != NewBB->rend(); I++) {
402c59b3ce0STobias Grosser     Instruction *NewInst = &*I;
4039d12d8adSTobias Grosser 
4049d12d8adSTobias Grosser     if (!isInstructionTriviallyDead(NewInst))
4059d12d8adSTobias Grosser       continue;
4069d12d8adSTobias Grosser 
407c59b3ce0STobias Grosser     for (auto Pair : BBMap)
408c59b3ce0STobias Grosser       if (Pair.second == NewInst) {
409c59b3ce0STobias Grosser         BBMap.erase(Pair.first);
410c59b3ce0STobias Grosser       }
411c59b3ce0STobias Grosser 
4129d12d8adSTobias Grosser     NewInst->eraseFromParent();
413c59b3ce0STobias Grosser     I = NewBB->rbegin();
4149d12d8adSTobias Grosser   }
4159d12d8adSTobias Grosser }
4169d12d8adSTobias Grosser 
417bc132607STobias Grosser void BlockGenerator::copyStmt(ScopStmt &Stmt, LoopToScevMapT &LTS,
4182d1ed0bfSTobias Grosser                               isl_id_to_ast_expr *NewAccesses) {
419275a1756SJohannes Doerfert   assert(Stmt.isBlockStmt() &&
420275a1756SJohannes Doerfert          "Only block statements can be copied by the block generator");
421275a1756SJohannes Doerfert 
422275a1756SJohannes Doerfert   ValueMapT BBMap;
423275a1756SJohannes Doerfert 
424be9c9117SJohannes Doerfert   BasicBlock *BB = Stmt.getBasicBlock();
425bc132607STobias Grosser   copyBB(Stmt, BB, BBMap, LTS, NewAccesses);
4269d12d8adSTobias Grosser   removeDeadInstructions(BB, BBMap);
427275a1756SJohannes Doerfert }
428275a1756SJohannes Doerfert 
429514f6efaSJohannes Doerfert BasicBlock *BlockGenerator::splitBB(BasicBlock *BB) {
430b8f58b53SDuncan P. N. Exon Smith   BasicBlock *CopyBB = SplitBlock(Builder.GetInsertBlock(),
431b8f58b53SDuncan P. N. Exon Smith                                   &*Builder.GetInsertPoint(), &DT, &LI);
4323b11a16aSHongbin Zheng   CopyBB->setName("polly.stmt." + BB->getName());
433514f6efaSJohannes Doerfert   return CopyBB;
434514f6efaSJohannes Doerfert }
4353b11a16aSHongbin Zheng 
436514f6efaSJohannes Doerfert BasicBlock *BlockGenerator::copyBB(ScopStmt &Stmt, BasicBlock *BB,
437bc132607STobias Grosser                                    ValueMapT &BBMap, LoopToScevMapT &LTS,
4382d1ed0bfSTobias Grosser                                    isl_id_to_ast_expr *NewAccesses) {
439514f6efaSJohannes Doerfert   BasicBlock *CopyBB = splitBB(BB);
440b8f58b53SDuncan P. N. Exon Smith   Builder.SetInsertPoint(&CopyBB->front());
4412fa35194SMichael Kruse   generateScalarLoads(Stmt, LTS, BBMap, NewAccesses);
442e819fffeSMichael Kruse   generateBeginStmtTrace(Stmt, LTS, BBMap);
443225f0d1eSMichael Kruse 
444bc132607STobias Grosser   copyBB(Stmt, BB, CopyBB, BBMap, LTS, NewAccesses);
445225f0d1eSMichael Kruse 
446225f0d1eSMichael Kruse   // After a basic block was copied store all scalars that escape this block in
447225f0d1eSMichael Kruse   // their alloca.
4482fa35194SMichael Kruse   generateScalarStores(Stmt, LTS, BBMap, NewAccesses);
449514f6efaSJohannes Doerfert   return CopyBB;
450514f6efaSJohannes Doerfert }
451514f6efaSJohannes Doerfert 
452514f6efaSJohannes Doerfert void BlockGenerator::copyBB(ScopStmt &Stmt, BasicBlock *BB, BasicBlock *CopyBB,
453bc132607STobias Grosser                             ValueMapT &BBMap, LoopToScevMapT &LTS,
4542d1ed0bfSTobias Grosser                             isl_id_to_ast_expr *NewAccesses) {
455ecff11dcSJohannes Doerfert   EntryBB = &CopyBB->getParent()->getEntryBlock();
456ecff11dcSJohannes Doerfert 
457c43d0360STobias Grosser   // Block statements and the entry blocks of region statement are code
458c43d0360STobias Grosser   // generated from instruction lists. This allow us to optimize the
459c43d0360STobias Grosser   // instructions that belong to a certain scop statement. As the code
460c43d0360STobias Grosser   // structure of region statements might be arbitrary complex, optimizing the
461c43d0360STobias Grosser   // instruction list is not yet supported.
462c43d0360STobias Grosser   if (Stmt.isBlockStmt() || (Stmt.isRegionStmt() && Stmt.getEntryBlock() == BB))
4633bb48299SMichael Kruse     for (Instruction *Inst : Stmt.getInstructions())
4643bb48299SMichael Kruse       copyInstruction(Stmt, Inst, BBMap, LTS, NewAccesses);
4653bb48299SMichael Kruse   else
46691f5b262STobias Grosser     for (Instruction &Inst : *BB)
467bc132607STobias Grosser       copyInstruction(Stmt, &Inst, BBMap, LTS, NewAccesses);
468ecff11dcSJohannes Doerfert }
469ecff11dcSJohannes Doerfert 
470800e17a7SJohannes Doerfert Value *BlockGenerator::getOrCreateAlloca(const MemoryAccess &Access) {
471587f1f57STobias Grosser   assert(!Access.isLatestArrayKind() && "Trying to get alloca for array kind");
4723216f854STobias Grosser 
473587f1f57STobias Grosser   return getOrCreateAlloca(Access.getLatestScopArrayInfo());
474a4f0988dSTobias Grosser }
475a4f0988dSTobias Grosser 
476a4f0988dSTobias Grosser Value *BlockGenerator::getOrCreateAlloca(const ScopArrayInfo *Array) {
4773216f854STobias Grosser   assert(!Array->isArrayKind() && "Trying to get alloca for array kind");
4783216f854STobias Grosser 
479587f1f57STobias Grosser   auto &Addr = ScalarMap[Array];
480587f1f57STobias Grosser 
481587f1f57STobias Grosser   if (Addr) {
482587f1f57STobias Grosser     // Allow allocas to be (temporarily) redirected once by adding a new
483a6d48f59SMichael Kruse     // old-alloca-addr to new-addr mapping to GlobalMap. This functionality
484587f1f57STobias Grosser     // is used for example by the OpenMP code generation where a first use
485587f1f57STobias Grosser     // of a scalar while still in the host code allocates a normal alloca with
486587f1f57STobias Grosser     // getOrCreateAlloca. When the values of this scalar are accessed during
487587f1f57STobias Grosser     // the generation of the parallel subfunction, these values are copied over
488587f1f57STobias Grosser     // to the parallel subfunction and each request for a scalar alloca slot
489a6d48f59SMichael Kruse     // must be forwarded to the temporary in-subfunction slot. This mapping is
490587f1f57STobias Grosser     // removed when the subfunction has been generated and again normal host
491682c5114STobias Grosser     // code is generated. Due to the following reasons it is not possible to
492682c5114STobias Grosser     // perform the GlobalMap lookup right after creating the alloca below, but
493682c5114STobias Grosser     // instead we need to check GlobalMap at each call to getOrCreateAlloca:
494682c5114STobias Grosser     //
495682c5114STobias Grosser     //   1) GlobalMap may be changed multiple times (for each parallel loop),
496682c5114STobias Grosser     //   2) The temporary mapping is commonly only known after the initial
497682c5114STobias Grosser     //      alloca has already been generated, and
498682c5114STobias Grosser     //   3) The original alloca value must be restored after leaving the
499682c5114STobias Grosser     //      sub-function.
500587f1f57STobias Grosser     if (Value *NewAddr = GlobalMap.lookup(&*Addr))
501587f1f57STobias Grosser       return NewAddr;
502587f1f57STobias Grosser     return Addr;
503587f1f57STobias Grosser   }
504587f1f57STobias Grosser 
505587f1f57STobias Grosser   Type *Ty = Array->getElementType();
506587f1f57STobias Grosser   Value *ScalarBase = Array->getBasePtr();
507587f1f57STobias Grosser   std::string NameExt;
508a535dff4STobias Grosser   if (Array->isPHIKind())
509587f1f57STobias Grosser     NameExt = ".phiops";
510f8d55f7eSTobias Grosser   else
511587f1f57STobias Grosser     NameExt = ".s2a";
512587f1f57STobias Grosser 
5137b5a4dfdSTobias Grosser   const DataLayout &DL = Builder.GetInsertBlock()->getModule()->getDataLayout();
514b3e30c32SMatt Arsenault 
5154f04db4bSEli Friedman   Addr =
5164f04db4bSEli Friedman       new AllocaInst(Ty, DL.getAllocaAddrSpace(), nullptr,
5174f04db4bSEli Friedman                      DL.getPrefTypeAlign(Ty), ScalarBase->getName() + NameExt);
518587f1f57STobias Grosser   EntryBB = &Builder.GetInsertBlock()->getParent()->getEntryBlock();
519587f1f57STobias Grosser   Addr->insertBefore(&*EntryBB->getFirstInsertionPt());
520587f1f57STobias Grosser 
521587f1f57STobias Grosser   return Addr;
522f8d55f7eSTobias Grosser }
523f8d55f7eSTobias Grosser 
524587f1f57STobias Grosser void BlockGenerator::handleOutsideUsers(const Scop &S, ScopArrayInfo *Array) {
525587f1f57STobias Grosser   Instruction *Inst = cast<Instruction>(Array->getBasePtr());
526b79a67dfSTobias Grosser 
5272985400aSTobias Grosser   // If there are escape users we get the alloca for this instruction and put it
5282985400aSTobias Grosser   // in the EscapeMap for later finalization. Lastly, if the instruction was
5292985400aSTobias Grosser   // copied multiple times we already did this and can exit.
530acb6ade7SMichael Kruse   if (EscapeMap.count(Inst))
531acb6ade7SMichael Kruse     return;
532e69e1141SJohannes Doerfert 
533ecff11dcSJohannes Doerfert   EscapeUserVectorTy EscapeUsers;
534ecff11dcSJohannes Doerfert   for (User *U : Inst->users()) {
535ecff11dcSJohannes Doerfert 
536ecff11dcSJohannes Doerfert     // Non-instruction user will never escape.
537ecff11dcSJohannes Doerfert     Instruction *UI = dyn_cast<Instruction>(U);
538ecff11dcSJohannes Doerfert     if (!UI)
539ecff11dcSJohannes Doerfert       continue;
540ecff11dcSJohannes Doerfert 
541952b5304SJohannes Doerfert     if (S.contains(UI))
542ecff11dcSJohannes Doerfert       continue;
543ecff11dcSJohannes Doerfert 
544ecff11dcSJohannes Doerfert     EscapeUsers.push_back(UI);
545ecff11dcSJohannes Doerfert   }
546ecff11dcSJohannes Doerfert 
547ecff11dcSJohannes Doerfert   // Exit if no escape uses were found.
548ecff11dcSJohannes Doerfert   if (EscapeUsers.empty())
549ecff11dcSJohannes Doerfert     return;
550ecff11dcSJohannes Doerfert 
551ecff11dcSJohannes Doerfert   // Get or create an escape alloca for this instruction.
552587f1f57STobias Grosser   auto *ScalarAddr = getOrCreateAlloca(Array);
553ecff11dcSJohannes Doerfert 
554ecff11dcSJohannes Doerfert   // Remember that this instruction has escape uses and the escape alloca.
555ecff11dcSJohannes Doerfert   EscapeMap[Inst] = std::make_pair(ScalarAddr, std::move(EscapeUsers));
556ecff11dcSJohannes Doerfert }
557ecff11dcSJohannes Doerfert 
5582fa35194SMichael Kruse void BlockGenerator::generateScalarLoads(
5592fa35194SMichael Kruse     ScopStmt &Stmt, LoopToScevMapT &LTS, ValueMapT &BBMap,
5602fa35194SMichael Kruse     __isl_keep isl_id_to_ast_expr *NewAccesses) {
561225f0d1eSMichael Kruse   for (MemoryAccess *MA : Stmt) {
5622fa35194SMichael Kruse     if (MA->isOriginalArrayKind() || MA->isWrite())
563ecff11dcSJohannes Doerfert       continue;
564ecff11dcSJohannes Doerfert 
56577394f13SMichael Kruse #ifndef NDEBUG
5664485ae08SMichael Kruse     auto StmtDom =
5674485ae08SMichael Kruse         Stmt.getDomain().intersect_params(Stmt.getParent()->getContext());
568388730c9SMichael Kruse     auto AccDom = MA->getAccessRelation().domain();
569388730c9SMichael Kruse     assert(!StmtDom.is_subset(AccDom).is_false() &&
57077394f13SMichael Kruse            "Scalar must be loaded in all statement instances");
57177394f13SMichael Kruse #endif
57277394f13SMichael Kruse 
5732fa35194SMichael Kruse     auto *Address =
5742fa35194SMichael Kruse         getImplicitAddress(*MA, getLoopForStmt(Stmt), LTS, BBMap, NewAccesses);
575eac9726eSMichael Kruse     assert((!isa<Instruction>(Address) ||
576eac9726eSMichael Kruse             DT.dominates(cast<Instruction>(Address)->getParent(),
577eac9726eSMichael Kruse                          Builder.GetInsertBlock())) &&
578eac9726eSMichael Kruse            "Domination violation");
579ff9b37e9SNikita Popov     BBMap[MA->getAccessValue()] = Builder.CreateLoad(
580ff9b37e9SNikita Popov         MA->getElementType(), Address, Address->getName() + ".reload");
581ecff11dcSJohannes Doerfert   }
582ecff11dcSJohannes Doerfert }
583ecff11dcSJohannes Doerfert 
584706f79abSMichael Kruse Value *BlockGenerator::buildContainsCondition(ScopStmt &Stmt,
585706f79abSMichael Kruse                                               const isl::set &Subdomain) {
586132860afSTobias Grosser   isl::ast_build AstBuild = Stmt.getAstBuild();
587dcf8d696STobias Grosser   isl::set Domain = Stmt.getDomain();
588706f79abSMichael Kruse 
5896b6ac900STobias Grosser   isl::union_map USchedule = AstBuild.get_schedule();
5906b6ac900STobias Grosser   USchedule = USchedule.intersect_domain(Domain);
591706f79abSMichael Kruse 
5926b6ac900STobias Grosser   assert(!USchedule.is_empty());
5936b6ac900STobias Grosser   isl::map Schedule = isl::map::from_union_map(USchedule);
594706f79abSMichael Kruse 
5956b6ac900STobias Grosser   isl::set ScheduledDomain = Schedule.range();
5966b6ac900STobias Grosser   isl::set ScheduledSet = Subdomain.apply(Schedule);
597706f79abSMichael Kruse 
5986b6ac900STobias Grosser   isl::ast_build RestrictedBuild = AstBuild.restrict(ScheduledDomain);
5996b6ac900STobias Grosser 
6006b6ac900STobias Grosser   isl::ast_expr IsInSet = RestrictedBuild.expr_from(ScheduledSet);
601706f79abSMichael Kruse   Value *IsInSetExpr = ExprBuilder->create(IsInSet.copy());
602706f79abSMichael Kruse   IsInSetExpr = Builder.CreateICmpNE(
603706f79abSMichael Kruse       IsInSetExpr, ConstantInt::get(IsInSetExpr->getType(), 0));
604706f79abSMichael Kruse 
605706f79abSMichael Kruse   return IsInSetExpr;
606706f79abSMichael Kruse }
607706f79abSMichael Kruse 
608706f79abSMichael Kruse void BlockGenerator::generateConditionalExecution(
609706f79abSMichael Kruse     ScopStmt &Stmt, const isl::set &Subdomain, StringRef Subject,
610706f79abSMichael Kruse     const std::function<void()> &GenThenFunc) {
611dcf8d696STobias Grosser   isl::set StmtDom = Stmt.getDomain();
612706f79abSMichael Kruse 
613706f79abSMichael Kruse   // If the condition is a tautology, don't generate a condition around the
614706f79abSMichael Kruse   // code.
615f51decb5STobias Grosser   bool IsPartialWrite =
6168ea1fc19STobias Grosser       !StmtDom.intersect_params(Stmt.getParent()->getContext())
617f51decb5STobias Grosser            .is_subset(Subdomain);
618f51decb5STobias Grosser   if (!IsPartialWrite) {
619706f79abSMichael Kruse     GenThenFunc();
620706f79abSMichael Kruse     return;
621706f79abSMichael Kruse   }
622706f79abSMichael Kruse 
623706f79abSMichael Kruse   // Generate the condition.
624706f79abSMichael Kruse   Value *Cond = buildContainsCondition(Stmt, Subdomain);
625b795bfc0SMichael Kruse 
626b795bfc0SMichael Kruse   // Don't call GenThenFunc if it is never executed. An ast index expression
627b795bfc0SMichael Kruse   // might not be defined in this case.
628b795bfc0SMichael Kruse   if (auto *Const = dyn_cast<ConstantInt>(Cond))
629b795bfc0SMichael Kruse     if (Const->isZero())
630b795bfc0SMichael Kruse       return;
631b795bfc0SMichael Kruse 
632706f79abSMichael Kruse   BasicBlock *HeadBlock = Builder.GetInsertBlock();
633706f79abSMichael Kruse   StringRef BlockName = HeadBlock->getName();
634706f79abSMichael Kruse 
635706f79abSMichael Kruse   // Generate the conditional block.
636706f79abSMichael Kruse   SplitBlockAndInsertIfThen(Cond, &*Builder.GetInsertPoint(), false, nullptr,
637706f79abSMichael Kruse                             &DT, &LI);
638706f79abSMichael Kruse   BranchInst *Branch = cast<BranchInst>(HeadBlock->getTerminator());
639706f79abSMichael Kruse   BasicBlock *ThenBlock = Branch->getSuccessor(0);
640706f79abSMichael Kruse   BasicBlock *TailBlock = Branch->getSuccessor(1);
641706f79abSMichael Kruse 
642706f79abSMichael Kruse   // Assign descriptive names.
643706f79abSMichael Kruse   if (auto *CondInst = dyn_cast<Instruction>(Cond))
644706f79abSMichael Kruse     CondInst->setName("polly." + Subject + ".cond");
645706f79abSMichael Kruse   ThenBlock->setName(BlockName + "." + Subject + ".partial");
646706f79abSMichael Kruse   TailBlock->setName(BlockName + ".cont");
647706f79abSMichael Kruse 
648706f79abSMichael Kruse   // Put the client code into the conditional block and continue in the merge
649706f79abSMichael Kruse   // block afterwards.
650706f79abSMichael Kruse   Builder.SetInsertPoint(ThenBlock, ThenBlock->getFirstInsertionPt());
651706f79abSMichael Kruse   GenThenFunc();
652706f79abSMichael Kruse   Builder.SetInsertPoint(TailBlock, TailBlock->getFirstInsertionPt());
653706f79abSMichael Kruse }
654706f79abSMichael Kruse 
655e819fffeSMichael Kruse static std::string getInstName(Value *Val) {
656e819fffeSMichael Kruse   std::string Result;
657e819fffeSMichael Kruse   raw_string_ostream OS(Result);
658e819fffeSMichael Kruse   Val->printAsOperand(OS, false);
659e819fffeSMichael Kruse   return OS.str();
660e819fffeSMichael Kruse }
661e819fffeSMichael Kruse 
662e819fffeSMichael Kruse void BlockGenerator::generateBeginStmtTrace(ScopStmt &Stmt, LoopToScevMapT &LTS,
663e819fffeSMichael Kruse                                             ValueMapT &BBMap) {
664e819fffeSMichael Kruse   if (!TraceStmts)
665e819fffeSMichael Kruse     return;
666e819fffeSMichael Kruse 
667e819fffeSMichael Kruse   Scop *S = Stmt.getParent();
668e819fffeSMichael Kruse   const char *BaseName = Stmt.getBaseName();
669e819fffeSMichael Kruse 
670e819fffeSMichael Kruse   isl::ast_build AstBuild = Stmt.getAstBuild();
671e819fffeSMichael Kruse   isl::set Domain = Stmt.getDomain();
672e819fffeSMichael Kruse 
673e819fffeSMichael Kruse   isl::union_map USchedule = AstBuild.get_schedule().intersect_domain(Domain);
674e819fffeSMichael Kruse   isl::map Schedule = isl::map::from_union_map(USchedule);
675e819fffeSMichael Kruse   assert(Schedule.is_empty().is_false() &&
676e819fffeSMichael Kruse          "The stmt must have a valid instance");
677e819fffeSMichael Kruse 
678e819fffeSMichael Kruse   isl::multi_pw_aff ScheduleMultiPwAff =
679e819fffeSMichael Kruse       isl::pw_multi_aff::from_map(Schedule.reverse());
680e819fffeSMichael Kruse   isl::ast_build RestrictedBuild = AstBuild.restrict(Schedule.range());
681e819fffeSMichael Kruse 
682e819fffeSMichael Kruse   // Sequence of strings to print.
683e819fffeSMichael Kruse   SmallVector<llvm::Value *, 8> Values;
684e819fffeSMichael Kruse 
685e819fffeSMichael Kruse   // Print the name of the statement.
686e819fffeSMichael Kruse   // TODO: Indent by the depth of the statement instance in the schedule tree.
687e819fffeSMichael Kruse   Values.push_back(RuntimeDebugBuilder::getPrintableString(Builder, BaseName));
688e819fffeSMichael Kruse   Values.push_back(RuntimeDebugBuilder::getPrintableString(Builder, "("));
689e819fffeSMichael Kruse 
690e819fffeSMichael Kruse   // Add the coordinate of the statement instance.
691e819fffeSMichael Kruse   int DomDims = ScheduleMultiPwAff.dim(isl::dim::out);
692e819fffeSMichael Kruse   for (int i = 0; i < DomDims; i += 1) {
693e819fffeSMichael Kruse     if (i > 0)
694e819fffeSMichael Kruse       Values.push_back(RuntimeDebugBuilder::getPrintableString(Builder, ","));
695e819fffeSMichael Kruse 
696e819fffeSMichael Kruse     isl::ast_expr IsInSet =
697e819fffeSMichael Kruse         RestrictedBuild.expr_from(ScheduleMultiPwAff.get_pw_aff(i));
698e819fffeSMichael Kruse     Values.push_back(ExprBuilder->create(IsInSet.copy()));
699e819fffeSMichael Kruse   }
700e819fffeSMichael Kruse 
701e819fffeSMichael Kruse   if (TraceScalars) {
702e819fffeSMichael Kruse     Values.push_back(RuntimeDebugBuilder::getPrintableString(Builder, ")"));
703e819fffeSMichael Kruse     DenseSet<Instruction *> Encountered;
704e819fffeSMichael Kruse 
705e819fffeSMichael Kruse     // Add the value of each scalar (and the result of PHIs) used in the
706e819fffeSMichael Kruse     // statement.
707e819fffeSMichael Kruse     // TODO: Values used in region-statements.
708e819fffeSMichael Kruse     for (Instruction *Inst : Stmt.insts()) {
709e819fffeSMichael Kruse       if (!RuntimeDebugBuilder::isPrintable(Inst->getType()))
710e819fffeSMichael Kruse         continue;
711e819fffeSMichael Kruse 
712e819fffeSMichael Kruse       if (isa<PHINode>(Inst)) {
713e819fffeSMichael Kruse         Values.push_back(RuntimeDebugBuilder::getPrintableString(Builder, " "));
714e819fffeSMichael Kruse         Values.push_back(RuntimeDebugBuilder::getPrintableString(
715e819fffeSMichael Kruse             Builder, getInstName(Inst)));
716e819fffeSMichael Kruse         Values.push_back(RuntimeDebugBuilder::getPrintableString(Builder, "="));
717e819fffeSMichael Kruse         Values.push_back(getNewValue(Stmt, Inst, BBMap, LTS,
718e819fffeSMichael Kruse                                      LI.getLoopFor(Inst->getParent())));
719e819fffeSMichael Kruse       } else {
720e819fffeSMichael Kruse         for (Value *Op : Inst->operand_values()) {
721e819fffeSMichael Kruse           // Do not print values that cannot change during the execution of the
722e819fffeSMichael Kruse           // SCoP.
723e819fffeSMichael Kruse           auto *OpInst = dyn_cast<Instruction>(Op);
724e819fffeSMichael Kruse           if (!OpInst)
725e819fffeSMichael Kruse             continue;
726e819fffeSMichael Kruse           if (!S->contains(OpInst))
727e819fffeSMichael Kruse             continue;
728e819fffeSMichael Kruse 
729e819fffeSMichael Kruse           // Print each scalar at most once, and exclude values defined in the
730e819fffeSMichael Kruse           // statement itself.
731e819fffeSMichael Kruse           if (Encountered.count(OpInst))
732e819fffeSMichael Kruse             continue;
733e819fffeSMichael Kruse 
734e819fffeSMichael Kruse           Values.push_back(
735e819fffeSMichael Kruse               RuntimeDebugBuilder::getPrintableString(Builder, " "));
736e819fffeSMichael Kruse           Values.push_back(RuntimeDebugBuilder::getPrintableString(
737e819fffeSMichael Kruse               Builder, getInstName(OpInst)));
738e819fffeSMichael Kruse           Values.push_back(
739e819fffeSMichael Kruse               RuntimeDebugBuilder::getPrintableString(Builder, "="));
740e819fffeSMichael Kruse           Values.push_back(getNewValue(Stmt, OpInst, BBMap, LTS,
741e819fffeSMichael Kruse                                        LI.getLoopFor(Inst->getParent())));
742e819fffeSMichael Kruse           Encountered.insert(OpInst);
743e819fffeSMichael Kruse         }
744e819fffeSMichael Kruse       }
745e819fffeSMichael Kruse 
746e819fffeSMichael Kruse       Encountered.insert(Inst);
747e819fffeSMichael Kruse     }
748e819fffeSMichael Kruse 
749e819fffeSMichael Kruse     Values.push_back(RuntimeDebugBuilder::getPrintableString(Builder, "\n"));
750e819fffeSMichael Kruse   } else {
751e819fffeSMichael Kruse     Values.push_back(RuntimeDebugBuilder::getPrintableString(Builder, ")\n"));
752e819fffeSMichael Kruse   }
753e819fffeSMichael Kruse 
754e819fffeSMichael Kruse   RuntimeDebugBuilder::createCPUPrinter(Builder, ArrayRef<Value *>(Values));
755e819fffeSMichael Kruse }
756e819fffeSMichael Kruse 
7572fa35194SMichael Kruse void BlockGenerator::generateScalarStores(
7582fa35194SMichael Kruse     ScopStmt &Stmt, LoopToScevMapT &LTS, ValueMapT &BBMap,
7592fa35194SMichael Kruse     __isl_keep isl_id_to_ast_expr *NewAccesses) {
760f2cdd144STobias Grosser   Loop *L = LI.getLoopFor(Stmt.getBasicBlock());
761ecff11dcSJohannes Doerfert 
76221a059afSTobias Grosser   assert(Stmt.isBlockStmt() &&
76321a059afSTobias Grosser          "Region statements need to use the generateScalarStores() function in "
76421a059afSTobias Grosser          "the RegionGenerator");
765ecff11dcSJohannes Doerfert 
766ecff11dcSJohannes Doerfert   for (MemoryAccess *MA : Stmt) {
7672fa35194SMichael Kruse     if (MA->isOriginalArrayKind() || MA->isRead())
768ecff11dcSJohannes Doerfert       continue;
769ecff11dcSJohannes Doerfert 
7701515f6b9STobias Grosser     isl::set AccDom = MA->getAccessRelation().domain();
771fe46c3ffSTobias Grosser     std::string Subject = MA->getId().get_name();
77277394f13SMichael Kruse 
773fe46c3ffSTobias Grosser     generateConditionalExecution(
774fe46c3ffSTobias Grosser         Stmt, AccDom, Subject.c_str(), [&, this, MA]() {
775d86f2157SJohannes Doerfert           Value *Val = MA->getAccessValue();
776ee6a4fc6SMichael Kruse           if (MA->isAnyPHIKind()) {
777fe46c3ffSTobias Grosser             assert(MA->getIncoming().size() >= 1 &&
778fe46c3ffSTobias Grosser                    "Block statements have exactly one exiting block, or "
779fe46c3ffSTobias Grosser                    "multiple but "
780ee6a4fc6SMichael Kruse                    "with same incoming block and value");
781fe46c3ffSTobias Grosser             assert(std::all_of(MA->getIncoming().begin(),
782fe46c3ffSTobias Grosser                                MA->getIncoming().end(),
783ee6a4fc6SMichael Kruse                                [&](std::pair<BasicBlock *, Value *> p) -> bool {
784ee6a4fc6SMichael Kruse                                  return p.first == Stmt.getBasicBlock();
785ee6a4fc6SMichael Kruse                                }) &&
786ee6a4fc6SMichael Kruse                    "Incoming block must be statement's block");
787ee6a4fc6SMichael Kruse             Val = MA->getIncoming()[0].second;
788ee6a4fc6SMichael Kruse           }
789fe46c3ffSTobias Grosser           auto Address = getImplicitAddress(*MA, getLoopForStmt(Stmt), LTS,
790fe46c3ffSTobias Grosser                                             BBMap, NewAccesses);
791d86f2157SJohannes Doerfert 
792f2cdd144STobias Grosser           Val = getNewValue(Stmt, Val, BBMap, LTS, L);
793eac9726eSMichael Kruse           assert((!isa<Instruction>(Val) ||
794eac9726eSMichael Kruse                   DT.dominates(cast<Instruction>(Val)->getParent(),
795eac9726eSMichael Kruse                                Builder.GetInsertBlock())) &&
796eac9726eSMichael Kruse                  "Domination violation");
797eac9726eSMichael Kruse           assert((!isa<Instruction>(Address) ||
798eac9726eSMichael Kruse                   DT.dominates(cast<Instruction>(Address)->getParent(),
799eac9726eSMichael Kruse                                Builder.GetInsertBlock())) &&
800eac9726eSMichael Kruse                  "Domination violation");
8012f5cbc44SMichael Kruse 
8022f5cbc44SMichael Kruse           // The new Val might have a different type than the old Val due to
8032f5cbc44SMichael Kruse           // ScalarEvolution looking through bitcasts.
8042f5cbc44SMichael Kruse           Address = Builder.CreateBitOrPointerCast(
805*8422bfa3SEli Friedman               Address, Val->getType()->getPointerTo(
806*8422bfa3SEli Friedman                            Address->getType()->getPointerAddressSpace()));
8072f5cbc44SMichael Kruse 
80892245228STobias Grosser           Builder.CreateStore(Val, Address);
809706f79abSMichael Kruse         });
810ecff11dcSJohannes Doerfert   }
811ecff11dcSJohannes Doerfert }
812ecff11dcSJohannes Doerfert 
813c0091a77STobias Grosser void BlockGenerator::createScalarInitialization(Scop &S) {
814ef74443cSJohannes Doerfert   BasicBlock *ExitBB = S.getExit();
815acf80064SEli Friedman   BasicBlock *PreEntryBB = S.getEnteringBlock();
816188542fdSJohannes Doerfert 
817acf80064SEli Friedman   Builder.SetInsertPoint(&*StartBlock->begin());
818ecff11dcSJohannes Doerfert 
819d7754a12SRoman Gareev   for (auto &Array : S.arrays()) {
820c0091a77STobias Grosser     if (Array->getNumberOfDimensions() != 0)
821c0091a77STobias Grosser       continue;
822a535dff4STobias Grosser     if (Array->isPHIKind()) {
823c0091a77STobias Grosser       // For PHI nodes, the only values we need to store are the ones that
824c0091a77STobias Grosser       // reach the PHI node from outside the region. In general there should
825c0091a77STobias Grosser       // only be one such incoming edge and this edge should enter through
826acf80064SEli Friedman       // 'PreEntryBB'.
827c0091a77STobias Grosser       auto PHI = cast<PHINode>(Array->getBasePtr());
828ecff11dcSJohannes Doerfert 
829c0091a77STobias Grosser       for (auto BI = PHI->block_begin(), BE = PHI->block_end(); BI != BE; BI++)
830acf80064SEli Friedman         if (!S.contains(*BI) && *BI != PreEntryBB)
831c0091a77STobias Grosser           llvm_unreachable("Incoming edges from outside the scop should always "
832acf80064SEli Friedman                            "come from PreEntryBB");
833c0091a77STobias Grosser 
834acf80064SEli Friedman       int Idx = PHI->getBasicBlockIndex(PreEntryBB);
835c0091a77STobias Grosser       if (Idx < 0)
836ecff11dcSJohannes Doerfert         continue;
837ecff11dcSJohannes Doerfert 
838c0091a77STobias Grosser       Value *ScalarValue = PHI->getIncomingValue(Idx);
839ecff11dcSJohannes Doerfert 
840587f1f57STobias Grosser       Builder.CreateStore(ScalarValue, getOrCreateAlloca(Array));
841c0091a77STobias Grosser       continue;
842c0091a77STobias Grosser     }
843c0091a77STobias Grosser 
844c0091a77STobias Grosser     auto *Inst = dyn_cast<Instruction>(Array->getBasePtr());
845c0091a77STobias Grosser 
846952b5304SJohannes Doerfert     if (Inst && S.contains(Inst))
847c0091a77STobias Grosser       continue;
848c0091a77STobias Grosser 
849188542fdSJohannes Doerfert     // PHI nodes that are not marked as such in their SAI object are either exit
850188542fdSJohannes Doerfert     // PHI nodes we model as common scalars but without initialization, or
851188542fdSJohannes Doerfert     // incoming phi nodes that need to be initialized. Check if the first is the
852188542fdSJohannes Doerfert     // case for Inst and do not create and initialize memory if so.
853188542fdSJohannes Doerfert     if (auto *PHI = dyn_cast_or_null<PHINode>(Inst))
854188542fdSJohannes Doerfert       if (!S.hasSingleExitEdge() && PHI->getBasicBlockIndex(ExitBB) >= 0)
855717b8667SJohannes Doerfert         continue;
856717b8667SJohannes Doerfert 
857587f1f57STobias Grosser     Builder.CreateStore(Array->getBasePtr(), getOrCreateAlloca(Array));
858ecff11dcSJohannes Doerfert   }
859ecff11dcSJohannes Doerfert }
860ecff11dcSJohannes Doerfert 
861ef74443cSJohannes Doerfert void BlockGenerator::createScalarFinalization(Scop &S) {
862ecff11dcSJohannes Doerfert   // The exit block of the __unoptimized__ region.
863ef74443cSJohannes Doerfert   BasicBlock *ExitBB = S.getExitingBlock();
864ecff11dcSJohannes Doerfert   // The merge block __just after__ the region and the optimized region.
865ef74443cSJohannes Doerfert   BasicBlock *MergeBB = S.getExit();
866ecff11dcSJohannes Doerfert 
867ecff11dcSJohannes Doerfert   // The exit block of the __optimized__ region.
868ecff11dcSJohannes Doerfert   BasicBlock *OptExitBB = *(pred_begin(MergeBB));
869ecff11dcSJohannes Doerfert   if (OptExitBB == ExitBB)
870ecff11dcSJohannes Doerfert     OptExitBB = *(++pred_begin(MergeBB));
871ecff11dcSJohannes Doerfert 
872ecff11dcSJohannes Doerfert   Builder.SetInsertPoint(OptExitBB->getTerminator());
873ecff11dcSJohannes Doerfert   for (const auto &EscapeMapping : EscapeMap) {
874ecff11dcSJohannes Doerfert     // Extract the escaping instruction and the escaping users as well as the
875ecff11dcSJohannes Doerfert     // alloca the instruction was demoted to.
876fbde4355SMichael Kruse     Instruction *EscapeInst = EscapeMapping.first;
877fbde4355SMichael Kruse     const auto &EscapeMappingValue = EscapeMapping.second;
878ecff11dcSJohannes Doerfert     const EscapeUserVectorTy &EscapeUsers = EscapeMappingValue.second;
879ff9b37e9SNikita Popov     auto *ScalarAddr = cast<AllocaInst>(&*EscapeMappingValue.first);
880ecff11dcSJohannes Doerfert 
881ecff11dcSJohannes Doerfert     // Reload the demoted instruction in the optimized version of the SCoP.
882d8b6ad25SJohannes Doerfert     Value *EscapeInstReload =
883ff9b37e9SNikita Popov         Builder.CreateLoad(ScalarAddr->getAllocatedType(), ScalarAddr,
884ff9b37e9SNikita Popov                            EscapeInst->getName() + ".final_reload");
885d8b6ad25SJohannes Doerfert     EscapeInstReload =
886d8b6ad25SJohannes Doerfert         Builder.CreateBitOrPointerCast(EscapeInstReload, EscapeInst->getType());
887ecff11dcSJohannes Doerfert 
888ecff11dcSJohannes Doerfert     // Create the merge PHI that merges the optimized and unoptimized version.
889ecff11dcSJohannes Doerfert     PHINode *MergePHI = PHINode::Create(EscapeInst->getType(), 2,
890ecff11dcSJohannes Doerfert                                         EscapeInst->getName() + ".merge");
891b8f58b53SDuncan P. N. Exon Smith     MergePHI->insertBefore(&*MergeBB->getFirstInsertionPt());
892ecff11dcSJohannes Doerfert 
893ecff11dcSJohannes Doerfert     // Add the respective values to the merge PHI.
894ecff11dcSJohannes Doerfert     MergePHI->addIncoming(EscapeInstReload, OptExitBB);
895ecff11dcSJohannes Doerfert     MergePHI->addIncoming(EscapeInst, ExitBB);
896ecff11dcSJohannes Doerfert 
897ecff11dcSJohannes Doerfert     // The information of scalar evolution about the escaping instruction needs
898ecff11dcSJohannes Doerfert     // to be revoked so the new merged instruction will be used.
899ecff11dcSJohannes Doerfert     if (SE.isSCEVable(EscapeInst->getType()))
900ecff11dcSJohannes Doerfert       SE.forgetValue(EscapeInst);
901ecff11dcSJohannes Doerfert 
902ecff11dcSJohannes Doerfert     // Replace all uses of the demoted instruction with the merge PHI.
903ecff11dcSJohannes Doerfert     for (Instruction *EUser : EscapeUsers)
904ecff11dcSJohannes Doerfert       EUser->replaceUsesOfWith(EscapeInst, MergePHI);
905ecff11dcSJohannes Doerfert   }
906ecff11dcSJohannes Doerfert }
907ecff11dcSJohannes Doerfert 
908ffa2446fSTobias Grosser void BlockGenerator::findOutsideUsers(Scop &S) {
909d7754a12SRoman Gareev   for (auto &Array : S.arrays()) {
910ffa2446fSTobias Grosser 
911ffa2446fSTobias Grosser     if (Array->getNumberOfDimensions() != 0)
912ffa2446fSTobias Grosser       continue;
913ffa2446fSTobias Grosser 
914a535dff4STobias Grosser     if (Array->isPHIKind())
915ffa2446fSTobias Grosser       continue;
916ffa2446fSTobias Grosser 
917ffa2446fSTobias Grosser     auto *Inst = dyn_cast<Instruction>(Array->getBasePtr());
918ffa2446fSTobias Grosser 
919ffa2446fSTobias Grosser     if (!Inst)
920ffa2446fSTobias Grosser       continue;
921ffa2446fSTobias Grosser 
922ffa2446fSTobias Grosser     // Scop invariant hoisting moves some of the base pointers out of the scop.
923ffa2446fSTobias Grosser     // We can ignore these, as the invariant load hoisting already registers the
924ffa2446fSTobias Grosser     // relevant outside users.
925952b5304SJohannes Doerfert     if (!S.contains(Inst))
926ffa2446fSTobias Grosser       continue;
927ffa2446fSTobias Grosser 
928587f1f57STobias Grosser     handleOutsideUsers(S, Array);
929ffa2446fSTobias Grosser   }
930ffa2446fSTobias Grosser }
931ffa2446fSTobias Grosser 
93227d742daSTobias Grosser void BlockGenerator::createExitPHINodeMerges(Scop &S) {
93327d742daSTobias Grosser   if (S.hasSingleExitEdge())
93427d742daSTobias Grosser     return;
93527d742daSTobias Grosser 
936ef74443cSJohannes Doerfert   auto *ExitBB = S.getExitingBlock();
937ef74443cSJohannes Doerfert   auto *MergeBB = S.getExit();
93827d742daSTobias Grosser   auto *AfterMergeBB = MergeBB->getSingleSuccessor();
93927d742daSTobias Grosser   BasicBlock *OptExitBB = *(pred_begin(MergeBB));
94027d742daSTobias Grosser   if (OptExitBB == ExitBB)
94127d742daSTobias Grosser     OptExitBB = *(++pred_begin(MergeBB));
94227d742daSTobias Grosser 
94327d742daSTobias Grosser   Builder.SetInsertPoint(OptExitBB->getTerminator());
94427d742daSTobias Grosser 
945d7754a12SRoman Gareev   for (auto &SAI : S.arrays()) {
94627d742daSTobias Grosser     auto *Val = SAI->getBasePtr();
94727d742daSTobias Grosser 
948faedfcbfSMichael Kruse     // Only Value-like scalars need a merge PHI. Exit block PHIs receive either
949faedfcbfSMichael Kruse     // the original PHI's value or the reloaded incoming values from the
950faedfcbfSMichael Kruse     // generated code. An llvm::Value is merged between the original code's
951faedfcbfSMichael Kruse     // value or the generated one.
952fa53c86dSMichael Kruse     if (!SAI->isExitPHIKind())
953faedfcbfSMichael Kruse       continue;
954faedfcbfSMichael Kruse 
95527d742daSTobias Grosser     PHINode *PHI = dyn_cast<PHINode>(Val);
95627d742daSTobias Grosser     if (!PHI)
95727d742daSTobias Grosser       continue;
95827d742daSTobias Grosser 
959a3f6edaeSTobias Grosser     if (PHI->getParent() != AfterMergeBB)
96027d742daSTobias Grosser       continue;
96127d742daSTobias Grosser 
9620257a921SEli Friedman     std::string Name = PHI->getName().str();
963587f1f57STobias Grosser     Value *ScalarAddr = getOrCreateAlloca(SAI);
964ff9b37e9SNikita Popov     Value *Reload = Builder.CreateLoad(SAI->getElementType(), ScalarAddr,
965ff9b37e9SNikita Popov                                        Name + ".ph.final_reload");
96627d742daSTobias Grosser     Reload = Builder.CreateBitOrPointerCast(Reload, PHI->getType());
96727d742daSTobias Grosser     Value *OriginalValue = PHI->getIncomingValueForBlock(MergeBB);
968faedfcbfSMichael Kruse     assert((!isa<Instruction>(OriginalValue) ||
969faedfcbfSMichael Kruse             cast<Instruction>(OriginalValue)->getParent() != MergeBB) &&
970faedfcbfSMichael Kruse            "Original value must no be one we just generated.");
97127d742daSTobias Grosser     auto *MergePHI = PHINode::Create(PHI->getType(), 2, Name + ".ph.merge");
972b8f58b53SDuncan P. N. Exon Smith     MergePHI->insertBefore(&*MergeBB->getFirstInsertionPt());
97327d742daSTobias Grosser     MergePHI->addIncoming(Reload, OptExitBB);
97427d742daSTobias Grosser     MergePHI->addIncoming(OriginalValue, ExitBB);
97527d742daSTobias Grosser     int Idx = PHI->getBasicBlockIndex(MergeBB);
97627d742daSTobias Grosser     PHI->setIncomingValue(Idx, MergePHI);
97727d742daSTobias Grosser   }
97827d742daSTobias Grosser }
97927d742daSTobias Grosser 
9801c184409STobias Grosser void BlockGenerator::invalidateScalarEvolution(Scop &S) {
9811c184409STobias Grosser   for (auto &Stmt : S)
982b3224adfSRoman Gareev     if (Stmt.isCopyStmt())
983b3224adfSRoman Gareev       continue;
984b3224adfSRoman Gareev     else if (Stmt.isBlockStmt())
9851c184409STobias Grosser       for (auto &Inst : *Stmt.getBasicBlock())
9861c184409STobias Grosser         SE.forgetValue(&Inst);
9871c184409STobias Grosser     else if (Stmt.isRegionStmt())
9881c184409STobias Grosser       for (auto *BB : Stmt.getRegion()->blocks())
9891c184409STobias Grosser         for (auto &Inst : *BB)
9901c184409STobias Grosser           SE.forgetValue(&Inst);
9911c184409STobias Grosser     else
9921c184409STobias Grosser       llvm_unreachable("Unexpected statement type found");
9931aad76c1SMichael Kruse 
9941aad76c1SMichael Kruse   // Invalidate SCEV of loops surrounding the EscapeUsers.
9951aad76c1SMichael Kruse   for (const auto &EscapeMapping : EscapeMap) {
9961aad76c1SMichael Kruse     const EscapeUserVectorTy &EscapeUsers = EscapeMapping.second.second;
9971aad76c1SMichael Kruse     for (Instruction *EUser : EscapeUsers) {
9981aad76c1SMichael Kruse       if (Loop *L = LI.getLoopFor(EUser->getParent()))
9991aad76c1SMichael Kruse         while (L) {
10001aad76c1SMichael Kruse           SE.forgetLoop(L);
10011aad76c1SMichael Kruse           L = L->getParentLoop();
10021aad76c1SMichael Kruse         }
10031aad76c1SMichael Kruse     }
10041aad76c1SMichael Kruse   }
10051c184409STobias Grosser }
10061c184409STobias Grosser 
1007ffa2446fSTobias Grosser void BlockGenerator::finalizeSCoP(Scop &S) {
1008ffa2446fSTobias Grosser   findOutsideUsers(S);
1009c0091a77STobias Grosser   createScalarInitialization(S);
101027d742daSTobias Grosser   createExitPHINodeMerges(S);
1011ef74443cSJohannes Doerfert   createScalarFinalization(S);
10121c184409STobias Grosser   invalidateScalarEvolution(S);
10133b11a16aSHongbin Zheng }
10143b11a16aSHongbin Zheng 
1015be9c9117SJohannes Doerfert VectorBlockGenerator::VectorBlockGenerator(BlockGenerator &BlockGen,
1016be9c9117SJohannes Doerfert                                            std::vector<LoopToScevMapT> &VLTS,
1017be9c9117SJohannes Doerfert                                            isl_map *Schedule)
1018bc132607STobias Grosser     : BlockGenerator(BlockGen), VLTS(VLTS), Schedule(Schedule) {
1019a00a0291SSebastian Pop   assert(Schedule && "No statement domain provided");
10203b11a16aSHongbin Zheng }
10213b11a16aSHongbin Zheng 
10222f1acac6STobias Grosser Value *VectorBlockGenerator::getVectorValue(ScopStmt &Stmt, Value *Old,
1023e602a076STobias Grosser                                             ValueMapT &VectorMap,
1024e602a076STobias Grosser                                             VectorValueMapT &ScalarMaps,
1025e602a076STobias Grosser                                             Loop *L) {
1026fe11e287SHongbin Zheng   if (Value *NewValue = VectorMap.lookup(Old))
1027fe11e287SHongbin Zheng     return NewValue;
10283b11a16aSHongbin Zheng 
10293b11a16aSHongbin Zheng   int Width = getVectorWidth();
10303b11a16aSHongbin Zheng 
1031b82a95f8SChristopher Tetreault   Value *Vector = UndefValue::get(FixedVectorType::get(Old->getType(), Width));
10323b11a16aSHongbin Zheng 
10333b11a16aSHongbin Zheng   for (int Lane = 0; Lane < Width; Lane++)
1034c14582f2STobias Grosser     Vector = Builder.CreateInsertElement(
1035bc132607STobias Grosser         Vector, getNewValue(Stmt, Old, ScalarMaps[Lane], VLTS[Lane], L),
10367242ad92STobias Grosser         Builder.getInt32(Lane));
10373b11a16aSHongbin Zheng 
10383b11a16aSHongbin Zheng   VectorMap[Old] = Vector;
10393b11a16aSHongbin Zheng 
10403b11a16aSHongbin Zheng   return Vector;
10413b11a16aSHongbin Zheng }
10423b11a16aSHongbin Zheng 
1043be9c9117SJohannes Doerfert Value *VectorBlockGenerator::generateStrideOneLoad(
10442f1acac6STobias Grosser     ScopStmt &Stmt, LoadInst *Load, VectorValueMapT &ScalarMaps,
10452d1ed0bfSTobias Grosser     __isl_keep isl_id_to_ast_expr *NewAccesses, bool NegativeStride = false) {
10460dd463faSTobias Grosser   unsigned VectorWidth = getVectorWidth();
1047ff9b37e9SNikita Popov   Type *VectorType = FixedVectorType::get(Load->getType(), VectorWidth);
1048ff9b37e9SNikita Popov   Type *VectorPtrType =
1049ff9b37e9SNikita Popov       PointerType::get(VectorType, Load->getPointerAddressSpace());
10500dd463faSTobias Grosser   unsigned Offset = NegativeStride ? VectorWidth - 1 : 0;
10510dd463faSTobias Grosser 
10528f25b0cbSMichael Kruse   Value *NewPointer = generateLocationAccessed(Stmt, Load, ScalarMaps[Offset],
1053bc132607STobias Grosser                                                VLTS[Offset], NewAccesses);
1054c14582f2STobias Grosser   Value *VectorPtr =
1055c14582f2STobias Grosser       Builder.CreateBitCast(NewPointer, VectorPtrType, "vector_ptr");
1056ff9b37e9SNikita Popov   LoadInst *VecLoad = Builder.CreateLoad(VectorType, VectorPtr,
1057ff9b37e9SNikita Popov                                          Load->getName() + "_p_vec_full");
10583b11a16aSHongbin Zheng   if (!Aligned)
1059725efb35SGuillaume Chatelet     VecLoad->setAlignment(Align(8));
10603b11a16aSHongbin Zheng 
10610dd463faSTobias Grosser   if (NegativeStride) {
10620dd463faSTobias Grosser     SmallVector<Constant *, 16> Indices;
10630dd463faSTobias Grosser     for (int i = VectorWidth - 1; i >= 0; i--)
10640dd463faSTobias Grosser       Indices.push_back(ConstantInt::get(Builder.getInt32Ty(), i));
10650dd463faSTobias Grosser     Constant *SV = llvm::ConstantVector::get(Indices);
10660dd463faSTobias Grosser     Value *RevVecLoad = Builder.CreateShuffleVector(
10670dd463faSTobias Grosser         VecLoad, VecLoad, SV, Load->getName() + "_reverse");
10680dd463faSTobias Grosser     return RevVecLoad;
10690dd463faSTobias Grosser   }
10700dd463faSTobias Grosser 
10713b11a16aSHongbin Zheng   return VecLoad;
10723b11a16aSHongbin Zheng }
10733b11a16aSHongbin Zheng 
10742d1ed0bfSTobias Grosser Value *VectorBlockGenerator::generateStrideZeroLoad(
10752f1acac6STobias Grosser     ScopStmt &Stmt, LoadInst *Load, ValueMapT &BBMap,
10762d1ed0bfSTobias Grosser     __isl_keep isl_id_to_ast_expr *NewAccesses) {
1077ff9b37e9SNikita Popov   Type *VectorType = FixedVectorType::get(Load->getType(), 1);
1078ff9b37e9SNikita Popov   Type *VectorPtrType =
1079ff9b37e9SNikita Popov       PointerType::get(VectorType, Load->getPointerAddressSpace());
108070131d34SMichael Kruse   Value *NewPointer =
108170131d34SMichael Kruse       generateLocationAccessed(Stmt, Load, BBMap, VLTS[0], NewAccesses);
10823b11a16aSHongbin Zheng   Value *VectorPtr = Builder.CreateBitCast(NewPointer, VectorPtrType,
10833b11a16aSHongbin Zheng                                            Load->getName() + "_p_vec_p");
1084ff9b37e9SNikita Popov   LoadInst *ScalarLoad = Builder.CreateLoad(VectorType, VectorPtr,
1085ff9b37e9SNikita Popov                                             Load->getName() + "_p_splat_one");
10863b11a16aSHongbin Zheng 
10873b11a16aSHongbin Zheng   if (!Aligned)
1088725efb35SGuillaume Chatelet     ScalarLoad->setAlignment(Align(8));
10893b11a16aSHongbin Zheng 
1090c14582f2STobias Grosser   Constant *SplatVector = Constant::getNullValue(
1091b82a95f8SChristopher Tetreault       FixedVectorType::get(Builder.getInt32Ty(), getVectorWidth()));
10923b11a16aSHongbin Zheng 
1093c14582f2STobias Grosser   Value *VectorLoad = Builder.CreateShuffleVector(
1094c14582f2STobias Grosser       ScalarLoad, ScalarLoad, SplatVector, Load->getName() + "_p_splat");
10953b11a16aSHongbin Zheng   return VectorLoad;
10963b11a16aSHongbin Zheng }
10973b11a16aSHongbin Zheng 
1098be9c9117SJohannes Doerfert Value *VectorBlockGenerator::generateUnknownStrideLoad(
10992f1acac6STobias Grosser     ScopStmt &Stmt, LoadInst *Load, VectorValueMapT &ScalarMaps,
110009e3697fSJohannes Doerfert     __isl_keep isl_id_to_ast_expr *NewAccesses) {
11013b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
1102ff9b37e9SNikita Popov   Type *ElemTy = Load->getType();
1103ff9b37e9SNikita Popov   auto *FVTy = FixedVectorType::get(ElemTy, VectorWidth);
11043b11a16aSHongbin Zheng 
1105b82a95f8SChristopher Tetreault   Value *Vector = UndefValue::get(FVTy);
11063b11a16aSHongbin Zheng 
11073b11a16aSHongbin Zheng   for (int i = 0; i < VectorWidth; i++) {
110870131d34SMichael Kruse     Value *NewPointer = generateLocationAccessed(Stmt, Load, ScalarMaps[i],
110970131d34SMichael Kruse                                                  VLTS[i], NewAccesses);
1110c14582f2STobias Grosser     Value *ScalarLoad =
1111ff9b37e9SNikita Popov         Builder.CreateLoad(ElemTy, NewPointer, Load->getName() + "_p_scalar_");
1112c14582f2STobias Grosser     Vector = Builder.CreateInsertElement(
1113c14582f2STobias Grosser         Vector, ScalarLoad, Builder.getInt32(i), Load->getName() + "_p_vec_");
11143b11a16aSHongbin Zheng   }
11153b11a16aSHongbin Zheng 
11163b11a16aSHongbin Zheng   return Vector;
11173b11a16aSHongbin Zheng }
11183b11a16aSHongbin Zheng 
11192d1ed0bfSTobias Grosser void VectorBlockGenerator::generateLoad(
11202f1acac6STobias Grosser     ScopStmt &Stmt, LoadInst *Load, ValueMapT &VectorMap,
11212d1ed0bfSTobias Grosser     VectorValueMapT &ScalarMaps, __isl_keep isl_id_to_ast_expr *NewAccesses) {
1122c1db67e2SJohannes Doerfert   if (Value *PreloadLoad = GlobalMap.lookup(Load)) {
1123c1db67e2SJohannes Doerfert     VectorMap[Load] = Builder.CreateVectorSplat(getVectorWidth(), PreloadLoad,
1124c1db67e2SJohannes Doerfert                                                 Load->getName() + "_p");
1125c1db67e2SJohannes Doerfert     return;
1126c1db67e2SJohannes Doerfert   }
1127c1db67e2SJohannes Doerfert 
11282873645cSTobias Grosser   if (!VectorType::isValidElementType(Load->getType())) {
11293b11a16aSHongbin Zheng     for (int i = 0; i < getVectorWidth(); i++)
1130bc132607STobias Grosser       ScalarMaps[i][Load] =
1131888ab551SMichael Kruse           generateArrayLoad(Stmt, Load, ScalarMaps[i], VLTS[i], NewAccesses);
11323b11a16aSHongbin Zheng     return;
11333b11a16aSHongbin Zheng   }
11343b11a16aSHongbin Zheng 
1135184a4926STobias Grosser   const MemoryAccess &Access = Stmt.getArrayAccessFor(Load);
11363b11a16aSHongbin Zheng 
113795493984STobias Grosser   // Make sure we have scalar values available to access the pointer to
113895493984STobias Grosser   // the data location.
113995493984STobias Grosser   extractScalarValues(Load, VectorMap, ScalarMaps);
114095493984STobias Grosser 
11413b11a16aSHongbin Zheng   Value *NewLoad;
1142718d04c6STobias Grosser   if (Access.isStrideZero(isl::manage_copy(Schedule)))
11432d1ed0bfSTobias Grosser     NewLoad = generateStrideZeroLoad(Stmt, Load, ScalarMaps[0], NewAccesses);
1144718d04c6STobias Grosser   else if (Access.isStrideOne(isl::manage_copy(Schedule)))
11452d1ed0bfSTobias Grosser     NewLoad = generateStrideOneLoad(Stmt, Load, ScalarMaps, NewAccesses);
1146718d04c6STobias Grosser   else if (Access.isStrideX(isl::manage_copy(Schedule), -1))
11472d1ed0bfSTobias Grosser     NewLoad = generateStrideOneLoad(Stmt, Load, ScalarMaps, NewAccesses, true);
11483b11a16aSHongbin Zheng   else
11492d1ed0bfSTobias Grosser     NewLoad = generateUnknownStrideLoad(Stmt, Load, ScalarMaps, NewAccesses);
11503b11a16aSHongbin Zheng 
11513b11a16aSHongbin Zheng   VectorMap[Load] = NewLoad;
11523b11a16aSHongbin Zheng }
11533b11a16aSHongbin Zheng 
11542f1acac6STobias Grosser void VectorBlockGenerator::copyUnaryInst(ScopStmt &Stmt, UnaryInstruction *Inst,
11553b11a16aSHongbin Zheng                                          ValueMapT &VectorMap,
11563b11a16aSHongbin Zheng                                          VectorValueMapT &ScalarMaps) {
11573b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
1158be9c9117SJohannes Doerfert   Value *NewOperand = getVectorValue(Stmt, Inst->getOperand(0), VectorMap,
11592c3ffc04SJohannes Doerfert                                      ScalarMaps, getLoopForStmt(Stmt));
11603b11a16aSHongbin Zheng 
11613b11a16aSHongbin Zheng   assert(isa<CastInst>(Inst) && "Can not generate vector code for instruction");
11623b11a16aSHongbin Zheng 
11633b11a16aSHongbin Zheng   const CastInst *Cast = dyn_cast<CastInst>(Inst);
1164b82a95f8SChristopher Tetreault   auto *DestType = FixedVectorType::get(Inst->getType(), VectorWidth);
11653b11a16aSHongbin Zheng   VectorMap[Inst] = Builder.CreateCast(Cast->getOpcode(), NewOperand, DestType);
11663b11a16aSHongbin Zheng }
11673b11a16aSHongbin Zheng 
11682f1acac6STobias Grosser void VectorBlockGenerator::copyBinaryInst(ScopStmt &Stmt, BinaryOperator *Inst,
11693b11a16aSHongbin Zheng                                           ValueMapT &VectorMap,
11703b11a16aSHongbin Zheng                                           VectorValueMapT &ScalarMaps) {
11712c3ffc04SJohannes Doerfert   Loop *L = getLoopForStmt(Stmt);
11723b11a16aSHongbin Zheng   Value *OpZero = Inst->getOperand(0);
11733b11a16aSHongbin Zheng   Value *OpOne = Inst->getOperand(1);
11743b11a16aSHongbin Zheng 
11753b11a16aSHongbin Zheng   Value *NewOpZero, *NewOpOne;
1176be9c9117SJohannes Doerfert   NewOpZero = getVectorValue(Stmt, OpZero, VectorMap, ScalarMaps, L);
1177be9c9117SJohannes Doerfert   NewOpOne = getVectorValue(Stmt, OpOne, VectorMap, ScalarMaps, L);
11783b11a16aSHongbin Zheng 
11791bb59b0dSTobias Grosser   Value *NewInst = Builder.CreateBinOp(Inst->getOpcode(), NewOpZero, NewOpOne,
11803b11a16aSHongbin Zheng                                        Inst->getName() + "p_vec");
11813b11a16aSHongbin Zheng   VectorMap[Inst] = NewInst;
11823b11a16aSHongbin Zheng }
11833b11a16aSHongbin Zheng 
11842d1ed0bfSTobias Grosser void VectorBlockGenerator::copyStore(
11852f1acac6STobias Grosser     ScopStmt &Stmt, StoreInst *Store, ValueMapT &VectorMap,
11862d1ed0bfSTobias Grosser     VectorValueMapT &ScalarMaps, __isl_keep isl_id_to_ast_expr *NewAccesses) {
1187184a4926STobias Grosser   const MemoryAccess &Access = Stmt.getArrayAccessFor(Store);
11883b11a16aSHongbin Zheng 
1189be9c9117SJohannes Doerfert   Value *Vector = getVectorValue(Stmt, Store->getValueOperand(), VectorMap,
11902c3ffc04SJohannes Doerfert                                  ScalarMaps, getLoopForStmt(Stmt));
11913b11a16aSHongbin Zheng 
119250fd7010STobias Grosser   // Make sure we have scalar values available to access the pointer to
119350fd7010STobias Grosser   // the data location.
119450fd7010STobias Grosser   extractScalarValues(Store, VectorMap, ScalarMaps);
119550fd7010STobias Grosser 
1196718d04c6STobias Grosser   if (Access.isStrideOne(isl::manage_copy(Schedule))) {
1197ff9b37e9SNikita Popov     Type *VectorType = FixedVectorType::get(Store->getValueOperand()->getType(),
1198ff9b37e9SNikita Popov                                             getVectorWidth());
1199ff9b37e9SNikita Popov     Type *VectorPtrType =
1200ff9b37e9SNikita Popov         PointerType::get(VectorType, Store->getPointerAddressSpace());
120170131d34SMichael Kruse     Value *NewPointer = generateLocationAccessed(Stmt, Store, ScalarMaps[0],
120270131d34SMichael Kruse                                                  VLTS[0], NewAccesses);
12033b11a16aSHongbin Zheng 
1204c14582f2STobias Grosser     Value *VectorPtr =
1205c14582f2STobias Grosser         Builder.CreateBitCast(NewPointer, VectorPtrType, "vector_ptr");
12063b11a16aSHongbin Zheng     StoreInst *Store = Builder.CreateStore(Vector, VectorPtr);
12073b11a16aSHongbin Zheng 
12083b11a16aSHongbin Zheng     if (!Aligned)
1209d400d451SGuillaume Chatelet       Store->setAlignment(Align(8));
12103b11a16aSHongbin Zheng   } else {
12113b11a16aSHongbin Zheng     for (unsigned i = 0; i < ScalarMaps.size(); i++) {
12121bb59b0dSTobias Grosser       Value *Scalar = Builder.CreateExtractElement(Vector, Builder.getInt32(i));
121370131d34SMichael Kruse       Value *NewPointer = generateLocationAccessed(Stmt, Store, ScalarMaps[i],
121470131d34SMichael Kruse                                                    VLTS[i], NewAccesses);
12153b11a16aSHongbin Zheng       Builder.CreateStore(Scalar, NewPointer);
12163b11a16aSHongbin Zheng     }
12173b11a16aSHongbin Zheng   }
12183b11a16aSHongbin Zheng }
12193b11a16aSHongbin Zheng 
12203b11a16aSHongbin Zheng bool VectorBlockGenerator::hasVectorOperands(const Instruction *Inst,
12213b11a16aSHongbin Zheng                                              ValueMapT &VectorMap) {
122291f5b262STobias Grosser   for (Value *Operand : Inst->operands())
122391f5b262STobias Grosser     if (VectorMap.count(Operand))
12243b11a16aSHongbin Zheng       return true;
12253b11a16aSHongbin Zheng   return false;
12263b11a16aSHongbin Zheng }
12273b11a16aSHongbin Zheng 
12283b11a16aSHongbin Zheng bool VectorBlockGenerator::extractScalarValues(const Instruction *Inst,
12293b11a16aSHongbin Zheng                                                ValueMapT &VectorMap,
12303b11a16aSHongbin Zheng                                                VectorValueMapT &ScalarMaps) {
12313b11a16aSHongbin Zheng   bool HasVectorOperand = false;
12323b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
12333b11a16aSHongbin Zheng 
123491f5b262STobias Grosser   for (Value *Operand : Inst->operands()) {
123591f5b262STobias Grosser     ValueMapT::iterator VecOp = VectorMap.find(Operand);
12363b11a16aSHongbin Zheng 
12373b11a16aSHongbin Zheng     if (VecOp == VectorMap.end())
12383b11a16aSHongbin Zheng       continue;
12393b11a16aSHongbin Zheng 
12403b11a16aSHongbin Zheng     HasVectorOperand = true;
12413b11a16aSHongbin Zheng     Value *NewVector = VecOp->second;
12423b11a16aSHongbin Zheng 
12433b11a16aSHongbin Zheng     for (int i = 0; i < VectorWidth; ++i) {
12443b11a16aSHongbin Zheng       ValueMapT &SM = ScalarMaps[i];
12453b11a16aSHongbin Zheng 
12463b11a16aSHongbin Zheng       // If there is one scalar extracted, all scalar elements should have
12473b11a16aSHongbin Zheng       // already been extracted by the code here. So no need to check for the
12482219d157STobias Grosser       // existence of all of them.
124991f5b262STobias Grosser       if (SM.count(Operand))
12503b11a16aSHongbin Zheng         break;
12513b11a16aSHongbin Zheng 
125291f5b262STobias Grosser       SM[Operand] =
125391f5b262STobias Grosser           Builder.CreateExtractElement(NewVector, Builder.getInt32(i));
12543b11a16aSHongbin Zheng     }
12553b11a16aSHongbin Zheng   }
12563b11a16aSHongbin Zheng 
12573b11a16aSHongbin Zheng   return HasVectorOperand;
12583b11a16aSHongbin Zheng }
12593b11a16aSHongbin Zheng 
12602d1ed0bfSTobias Grosser void VectorBlockGenerator::copyInstScalarized(
12612f1acac6STobias Grosser     ScopStmt &Stmt, Instruction *Inst, ValueMapT &VectorMap,
12622d1ed0bfSTobias Grosser     VectorValueMapT &ScalarMaps, __isl_keep isl_id_to_ast_expr *NewAccesses) {
12633b11a16aSHongbin Zheng   bool HasVectorOperand;
12643b11a16aSHongbin Zheng   int VectorWidth = getVectorWidth();
12653b11a16aSHongbin Zheng 
12663b11a16aSHongbin Zheng   HasVectorOperand = extractScalarValues(Inst, VectorMap, ScalarMaps);
12673b11a16aSHongbin Zheng 
12683b11a16aSHongbin Zheng   for (int VectorLane = 0; VectorLane < getVectorWidth(); VectorLane++)
1269be9c9117SJohannes Doerfert     BlockGenerator::copyInstruction(Stmt, Inst, ScalarMaps[VectorLane],
1270bc132607STobias Grosser                                     VLTS[VectorLane], NewAccesses);
12713b11a16aSHongbin Zheng 
12723b11a16aSHongbin Zheng   if (!VectorType::isValidElementType(Inst->getType()) || !HasVectorOperand)
12733b11a16aSHongbin Zheng     return;
12743b11a16aSHongbin Zheng 
12753b11a16aSHongbin Zheng   // Make the result available as vector value.
1276b82a95f8SChristopher Tetreault   auto *FVTy = FixedVectorType::get(Inst->getType(), VectorWidth);
1277b82a95f8SChristopher Tetreault   Value *Vector = UndefValue::get(FVTy);
12783b11a16aSHongbin Zheng 
12793b11a16aSHongbin Zheng   for (int i = 0; i < VectorWidth; i++)
12803b11a16aSHongbin Zheng     Vector = Builder.CreateInsertElement(Vector, ScalarMaps[i][Inst],
12813b11a16aSHongbin Zheng                                          Builder.getInt32(i));
12823b11a16aSHongbin Zheng 
12833b11a16aSHongbin Zheng   VectorMap[Inst] = Vector;
12843b11a16aSHongbin Zheng }
12853b11a16aSHongbin Zheng 
1286bc132607STobias Grosser int VectorBlockGenerator::getVectorWidth() { return VLTS.size(); }
12873b11a16aSHongbin Zheng 
12882d1ed0bfSTobias Grosser void VectorBlockGenerator::copyInstruction(
12892f1acac6STobias Grosser     ScopStmt &Stmt, Instruction *Inst, ValueMapT &VectorMap,
12902d1ed0bfSTobias Grosser     VectorValueMapT &ScalarMaps, __isl_keep isl_id_to_ast_expr *NewAccesses) {
12913b11a16aSHongbin Zheng   // Terminator instructions control the control flow. They are explicitly
12923b11a16aSHongbin Zheng   // expressed in the clast and do not need to be copied.
12933b11a16aSHongbin Zheng   if (Inst->isTerminator())
12943b11a16aSHongbin Zheng     return;
12953b11a16aSHongbin Zheng 
12965dced269SJohannes Doerfert   if (canSyntheziseInStmt(Stmt, Inst))
1297e71c6ab5STobias Grosser     return;
1298e71c6ab5STobias Grosser 
12999646e3feSTobias Grosser   if (auto *Load = dyn_cast<LoadInst>(Inst)) {
13002d1ed0bfSTobias Grosser     generateLoad(Stmt, Load, VectorMap, ScalarMaps, NewAccesses);
13013b11a16aSHongbin Zheng     return;
13023b11a16aSHongbin Zheng   }
13033b11a16aSHongbin Zheng 
13043b11a16aSHongbin Zheng   if (hasVectorOperands(Inst, VectorMap)) {
13059646e3feSTobias Grosser     if (auto *Store = dyn_cast<StoreInst>(Inst)) {
13060446d81eSMichael Kruse       // Identified as redundant by -polly-simplify.
13070446d81eSMichael Kruse       if (!Stmt.getArrayAccessOrNULLFor(Store))
13080446d81eSMichael Kruse         return;
13090446d81eSMichael Kruse 
13102d1ed0bfSTobias Grosser       copyStore(Stmt, Store, VectorMap, ScalarMaps, NewAccesses);
13113b11a16aSHongbin Zheng       return;
13123b11a16aSHongbin Zheng     }
13133b11a16aSHongbin Zheng 
13149646e3feSTobias Grosser     if (auto *Unary = dyn_cast<UnaryInstruction>(Inst)) {
1315be9c9117SJohannes Doerfert       copyUnaryInst(Stmt, Unary, VectorMap, ScalarMaps);
13163b11a16aSHongbin Zheng       return;
13173b11a16aSHongbin Zheng     }
13183b11a16aSHongbin Zheng 
13199646e3feSTobias Grosser     if (auto *Binary = dyn_cast<BinaryOperator>(Inst)) {
1320be9c9117SJohannes Doerfert       copyBinaryInst(Stmt, Binary, VectorMap, ScalarMaps);
13213b11a16aSHongbin Zheng       return;
13223b11a16aSHongbin Zheng     }
13233b11a16aSHongbin Zheng 
1324a6d48f59SMichael Kruse     // Fallthrough: We generate scalar instructions, if we don't know how to
13253b11a16aSHongbin Zheng     // generate vector code.
13263b11a16aSHongbin Zheng   }
13273b11a16aSHongbin Zheng 
13282d1ed0bfSTobias Grosser   copyInstScalarized(Stmt, Inst, VectorMap, ScalarMaps, NewAccesses);
13293b11a16aSHongbin Zheng }
13303b11a16aSHongbin Zheng 
1331a69d4f0dSTobias Grosser void VectorBlockGenerator::generateScalarVectorLoads(
1332a69d4f0dSTobias Grosser     ScopStmt &Stmt, ValueMapT &VectorBlockMap) {
1333a69d4f0dSTobias Grosser   for (MemoryAccess *MA : Stmt) {
1334a69d4f0dSTobias Grosser     if (MA->isArrayKind() || MA->isWrite())
1335a69d4f0dSTobias Grosser       continue;
1336a69d4f0dSTobias Grosser 
1337a69d4f0dSTobias Grosser     auto *Address = getOrCreateAlloca(*MA);
1338ff9b37e9SNikita Popov     Type *VectorType = FixedVectorType::get(MA->getElementType(), 1);
1339ff9b37e9SNikita Popov     Type *VectorPtrType = PointerType::get(
1340ff9b37e9SNikita Popov         VectorType, Address->getType()->getPointerAddressSpace());
1341a69d4f0dSTobias Grosser     Value *VectorPtr = Builder.CreateBitCast(Address, VectorPtrType,
1342a69d4f0dSTobias Grosser                                              Address->getName() + "_p_vec_p");
1343ff9b37e9SNikita Popov     auto *Val = Builder.CreateLoad(VectorType, VectorPtr,
1344ff9b37e9SNikita Popov                                    Address->getName() + ".reload");
1345a69d4f0dSTobias Grosser     Constant *SplatVector = Constant::getNullValue(
1346b82a95f8SChristopher Tetreault         FixedVectorType::get(Builder.getInt32Ty(), getVectorWidth()));
1347a69d4f0dSTobias Grosser 
1348a69d4f0dSTobias Grosser     Value *VectorVal = Builder.CreateShuffleVector(
1349a69d4f0dSTobias Grosser         Val, Val, SplatVector, Address->getName() + "_p_splat");
1350583be06fSTobias Grosser     VectorBlockMap[MA->getAccessValue()] = VectorVal;
1351a69d4f0dSTobias Grosser   }
1352a69d4f0dSTobias Grosser }
1353a69d4f0dSTobias Grosser 
1354a69d4f0dSTobias Grosser void VectorBlockGenerator::verifyNoScalarStores(ScopStmt &Stmt) {
1355a69d4f0dSTobias Grosser   for (MemoryAccess *MA : Stmt) {
1356a69d4f0dSTobias Grosser     if (MA->isArrayKind() || MA->isRead())
1357a69d4f0dSTobias Grosser       continue;
1358a69d4f0dSTobias Grosser 
1359a69d4f0dSTobias Grosser     llvm_unreachable("Scalar stores not expected in vector loop");
1360a69d4f0dSTobias Grosser   }
1361a69d4f0dSTobias Grosser }
1362a69d4f0dSTobias Grosser 
13632d1ed0bfSTobias Grosser void VectorBlockGenerator::copyStmt(
13642d1ed0bfSTobias Grosser     ScopStmt &Stmt, __isl_keep isl_id_to_ast_expr *NewAccesses) {
136521a059afSTobias Grosser   assert(Stmt.isBlockStmt() &&
136621a059afSTobias Grosser          "TODO: Only block statements can be copied by the vector block "
136721a059afSTobias Grosser          "generator");
1368275a1756SJohannes Doerfert 
1369be9c9117SJohannes Doerfert   BasicBlock *BB = Stmt.getBasicBlock();
1370b8f58b53SDuncan P. N. Exon Smith   BasicBlock *CopyBB = SplitBlock(Builder.GetInsertBlock(),
1371b8f58b53SDuncan P. N. Exon Smith                                   &*Builder.GetInsertPoint(), &DT, &LI);
13723b11a16aSHongbin Zheng   CopyBB->setName("polly.stmt." + BB->getName());
1373b8f58b53SDuncan P. N. Exon Smith   Builder.SetInsertPoint(&CopyBB->front());
13743b11a16aSHongbin Zheng 
13753b11a16aSHongbin Zheng   // Create two maps that store the mapping from the original instructions of
13763b11a16aSHongbin Zheng   // the old basic block to their copies in the new basic block. Those maps
13773b11a16aSHongbin Zheng   // are basic block local.
13783b11a16aSHongbin Zheng   //
13793b11a16aSHongbin Zheng   // As vector code generation is supported there is one map for scalar values
13803b11a16aSHongbin Zheng   // and one for vector values.
13813b11a16aSHongbin Zheng   //
13823b11a16aSHongbin Zheng   // In case we just do scalar code generation, the vectorMap is not used and
13833b11a16aSHongbin Zheng   // the scalarMap has just one dimension, which contains the mapping.
13843b11a16aSHongbin Zheng   //
13853b11a16aSHongbin Zheng   // In case vector code generation is done, an instruction may either appear
13863b11a16aSHongbin Zheng   // in the vector map once (as it is calculating >vectorwidth< values at a
13873b11a16aSHongbin Zheng   // time. Or (if the values are calculated using scalar operations), it
13883b11a16aSHongbin Zheng   // appears once in every dimension of the scalarMap.
13893b11a16aSHongbin Zheng   VectorValueMapT ScalarBlockMap(getVectorWidth());
13903b11a16aSHongbin Zheng   ValueMapT VectorBlockMap;
13913b11a16aSHongbin Zheng 
1392a69d4f0dSTobias Grosser   generateScalarVectorLoads(Stmt, VectorBlockMap);
1393a69d4f0dSTobias Grosser 
13940aff3174SMichael Kruse   for (Instruction *Inst : Stmt.getInstructions())
13950aff3174SMichael Kruse     copyInstruction(Stmt, Inst, VectorBlockMap, ScalarBlockMap, NewAccesses);
1396a69d4f0dSTobias Grosser 
1397a69d4f0dSTobias Grosser   verifyNoScalarStores(Stmt);
13983b11a16aSHongbin Zheng }
1399275a1756SJohannes Doerfert 
1400ecff11dcSJohannes Doerfert BasicBlock *RegionGenerator::repairDominance(BasicBlock *BB,
1401ecff11dcSJohannes Doerfert                                              BasicBlock *BBCopy) {
1402514f6efaSJohannes Doerfert 
1403514f6efaSJohannes Doerfert   BasicBlock *BBIDom = DT.getNode(BB)->getIDom()->getBlock();
1404deefbcedSTobias Grosser   BasicBlock *BBCopyIDom = EndBlockMap.lookup(BBIDom);
1405514f6efaSJohannes Doerfert 
1406514f6efaSJohannes Doerfert   if (BBCopyIDom)
1407514f6efaSJohannes Doerfert     DT.changeImmediateDominator(BBCopy, BBCopyIDom);
1408514f6efaSJohannes Doerfert 
1409deefbcedSTobias Grosser   return StartBlockMap.lookup(BBIDom);
1410514f6efaSJohannes Doerfert }
1411514f6efaSJohannes Doerfert 
1412f33c125dSMichael Kruse // This is to determine whether an llvm::Value (defined in @p BB) is usable when
1413f33c125dSMichael Kruse // leaving a subregion. The straight-forward DT.dominates(BB, R->getExitBlock())
1414f33c125dSMichael Kruse // does not work in cases where the exit block has edges from outside the
1415f33c125dSMichael Kruse // region. In that case the llvm::Value would never be usable in in the exit
1416f33c125dSMichael Kruse // block. The RegionGenerator however creates an new exit block ('ExitBBCopy')
1417f33c125dSMichael Kruse // for the subregion's exiting edges only. We need to determine whether an
1418f33c125dSMichael Kruse // llvm::Value is usable in there. We do this by checking whether it dominates
1419f33c125dSMichael Kruse // all exiting blocks individually.
1420f33c125dSMichael Kruse static bool isDominatingSubregionExit(const DominatorTree &DT, Region *R,
1421f33c125dSMichael Kruse                                       BasicBlock *BB) {
1422f33c125dSMichael Kruse   for (auto ExitingBB : predecessors(R->getExit())) {
1423f33c125dSMichael Kruse     // Check for non-subregion incoming edges.
1424f33c125dSMichael Kruse     if (!R->contains(ExitingBB))
1425f33c125dSMichael Kruse       continue;
1426f33c125dSMichael Kruse 
1427f33c125dSMichael Kruse     if (!DT.dominates(BB, ExitingBB))
1428f33c125dSMichael Kruse       return false;
1429f33c125dSMichael Kruse   }
1430f33c125dSMichael Kruse 
1431f33c125dSMichael Kruse   return true;
1432f33c125dSMichael Kruse }
1433f33c125dSMichael Kruse 
1434f33c125dSMichael Kruse // Find the direct dominator of the subregion's exit block if the subregion was
1435f33c125dSMichael Kruse // simplified.
1436f33c125dSMichael Kruse static BasicBlock *findExitDominator(DominatorTree &DT, Region *R) {
1437f33c125dSMichael Kruse   BasicBlock *Common = nullptr;
1438f33c125dSMichael Kruse   for (auto ExitingBB : predecessors(R->getExit())) {
1439f33c125dSMichael Kruse     // Check for non-subregion incoming edges.
1440f33c125dSMichael Kruse     if (!R->contains(ExitingBB))
1441f33c125dSMichael Kruse       continue;
1442f33c125dSMichael Kruse 
1443f33c125dSMichael Kruse     // First exiting edge.
1444f33c125dSMichael Kruse     if (!Common) {
1445f33c125dSMichael Kruse       Common = ExitingBB;
1446f33c125dSMichael Kruse       continue;
1447f33c125dSMichael Kruse     }
1448f33c125dSMichael Kruse 
1449f33c125dSMichael Kruse     Common = DT.findNearestCommonDominator(Common, ExitingBB);
1450f33c125dSMichael Kruse   }
1451f33c125dSMichael Kruse 
1452f33c125dSMichael Kruse   assert(Common && R->contains(Common));
1453f33c125dSMichael Kruse   return Common;
1454f33c125dSMichael Kruse }
1455f33c125dSMichael Kruse 
1456bc132607STobias Grosser void RegionGenerator::copyStmt(ScopStmt &Stmt, LoopToScevMapT &LTS,
14572d1ed0bfSTobias Grosser                                isl_id_to_ast_expr *IdToAstExp) {
1458275a1756SJohannes Doerfert   assert(Stmt.isRegionStmt() &&
1459d3f21833STobias Grosser          "Only region statements can be copied by the region generator");
1460275a1756SJohannes Doerfert 
1461ecff11dcSJohannes Doerfert   // Forget all old mappings.
1462deefbcedSTobias Grosser   StartBlockMap.clear();
1463deefbcedSTobias Grosser   EndBlockMap.clear();
1464ecff11dcSJohannes Doerfert   RegionMaps.clear();
1465ecff11dcSJohannes Doerfert   IncompletePHINodeMap.clear();
1466ecff11dcSJohannes Doerfert 
1467225f0d1eSMichael Kruse   // Collection of all values related to this subregion.
1468225f0d1eSMichael Kruse   ValueMapT ValueMap;
1469225f0d1eSMichael Kruse 
1470275a1756SJohannes Doerfert   // The region represented by the statement.
1471275a1756SJohannes Doerfert   Region *R = Stmt.getRegion();
1472275a1756SJohannes Doerfert 
1473ecff11dcSJohannes Doerfert   // Create a dedicated entry for the region where we can reload all demoted
1474ecff11dcSJohannes Doerfert   // inputs.
1475ecff11dcSJohannes Doerfert   BasicBlock *EntryBB = R->getEntry();
1476b8f58b53SDuncan P. N. Exon Smith   BasicBlock *EntryBBCopy = SplitBlock(Builder.GetInsertBlock(),
1477b8f58b53SDuncan P. N. Exon Smith                                        &*Builder.GetInsertPoint(), &DT, &LI);
1478ecff11dcSJohannes Doerfert   EntryBBCopy->setName("polly.stmt." + EntryBB->getName() + ".entry");
1479b8f58b53SDuncan P. N. Exon Smith   Builder.SetInsertPoint(&EntryBBCopy->front());
1480514f6efaSJohannes Doerfert 
1481c993739eSMichael Kruse   ValueMapT &EntryBBMap = RegionMaps[EntryBBCopy];
14822fa35194SMichael Kruse   generateScalarLoads(Stmt, LTS, EntryBBMap, IdToAstExp);
1483e819fffeSMichael Kruse   generateBeginStmtTrace(Stmt, LTS, EntryBBMap);
1484225f0d1eSMichael Kruse 
1485ecff11dcSJohannes Doerfert   for (auto PI = pred_begin(EntryBB), PE = pred_end(EntryBB); PI != PE; ++PI)
1486deefbcedSTobias Grosser     if (!R->contains(*PI)) {
1487deefbcedSTobias Grosser       StartBlockMap[*PI] = EntryBBCopy;
1488deefbcedSTobias Grosser       EndBlockMap[*PI] = EntryBBCopy;
1489deefbcedSTobias Grosser     }
1490275a1756SJohannes Doerfert 
1491275a1756SJohannes Doerfert   // Iterate over all blocks in the region in a breadth-first search.
1492275a1756SJohannes Doerfert   std::deque<BasicBlock *> Blocks;
14935b1abfc8SMandeep Singh Grang   SmallSetVector<BasicBlock *, 8> SeenBlocks;
1494ecff11dcSJohannes Doerfert   Blocks.push_back(EntryBB);
1495ecff11dcSJohannes Doerfert   SeenBlocks.insert(EntryBB);
1496275a1756SJohannes Doerfert 
1497275a1756SJohannes Doerfert   while (!Blocks.empty()) {
1498275a1756SJohannes Doerfert     BasicBlock *BB = Blocks.front();
1499275a1756SJohannes Doerfert     Blocks.pop_front();
1500275a1756SJohannes Doerfert 
1501514f6efaSJohannes Doerfert     // First split the block and update dominance information.
1502514f6efaSJohannes Doerfert     BasicBlock *BBCopy = splitBB(BB);
1503ecff11dcSJohannes Doerfert     BasicBlock *BBCopyIDom = repairDominance(BB, BBCopy);
1504ecff11dcSJohannes Doerfert 
1505c993739eSMichael Kruse     // Get the mapping for this block and initialize it with either the scalar
1506c993739eSMichael Kruse     // loads from the generated entering block (which dominates all blocks of
1507c993739eSMichael Kruse     // this subregion) or the maps of the immediate dominator, if part of the
1508c993739eSMichael Kruse     // subregion. The latter necessarily includes the former.
1509c993739eSMichael Kruse     ValueMapT *InitBBMap;
1510c993739eSMichael Kruse     if (BBCopyIDom) {
1511c993739eSMichael Kruse       assert(RegionMaps.count(BBCopyIDom));
1512c993739eSMichael Kruse       InitBBMap = &RegionMaps[BBCopyIDom];
1513c993739eSMichael Kruse     } else
1514c993739eSMichael Kruse       InitBBMap = &EntryBBMap;
1515c993739eSMichael Kruse     auto Inserted = RegionMaps.insert(std::make_pair(BBCopy, *InitBBMap));
1516c993739eSMichael Kruse     ValueMapT &RegionMap = Inserted.first->second;
1517514f6efaSJohannes Doerfert 
1518275a1756SJohannes Doerfert     // Copy the block with the BlockGenerator.
1519b8f58b53SDuncan P. N. Exon Smith     Builder.SetInsertPoint(&BBCopy->front());
1520bc132607STobias Grosser     copyBB(Stmt, BB, BBCopy, RegionMap, LTS, IdToAstExp);
1521275a1756SJohannes Doerfert 
1522ecff11dcSJohannes Doerfert     // In order to remap PHI nodes we store also basic block mappings.
1523deefbcedSTobias Grosser     StartBlockMap[BB] = BBCopy;
1524deefbcedSTobias Grosser     EndBlockMap[BB] = Builder.GetInsertBlock();
1525ecff11dcSJohannes Doerfert 
1526ecff11dcSJohannes Doerfert     // Add values to incomplete PHI nodes waiting for this block to be copied.
1527ecff11dcSJohannes Doerfert     for (const PHINodePairTy &PHINodePair : IncompletePHINodeMap[BB])
1528bc132607STobias Grosser       addOperandToPHI(Stmt, PHINodePair.first, PHINodePair.second, BB, LTS);
1529ecff11dcSJohannes Doerfert     IncompletePHINodeMap[BB].clear();
1530ecff11dcSJohannes Doerfert 
1531275a1756SJohannes Doerfert     // And continue with new successors inside the region.
1532275a1756SJohannes Doerfert     for (auto SI = succ_begin(BB), SE = succ_end(BB); SI != SE; SI++)
15335b1abfc8SMandeep Singh Grang       if (R->contains(*SI) && SeenBlocks.insert(*SI))
1534275a1756SJohannes Doerfert         Blocks.push_back(*SI);
1535ebffcbeeSMichael Kruse 
1536ebffcbeeSMichael Kruse     // Remember value in case it is visible after this subregion.
1537f33c125dSMichael Kruse     if (isDominatingSubregionExit(DT, R, BB))
1538ebffcbeeSMichael Kruse       ValueMap.insert(RegionMap.begin(), RegionMap.end());
1539275a1756SJohannes Doerfert   }
1540275a1756SJohannes Doerfert 
1541275a1756SJohannes Doerfert   // Now create a new dedicated region exit block and add it to the region map.
1542b8f58b53SDuncan P. N. Exon Smith   BasicBlock *ExitBBCopy = SplitBlock(Builder.GetInsertBlock(),
1543b8f58b53SDuncan P. N. Exon Smith                                       &*Builder.GetInsertPoint(), &DT, &LI);
1544ecff11dcSJohannes Doerfert   ExitBBCopy->setName("polly.stmt." + R->getExit()->getName() + ".exit");
1545deefbcedSTobias Grosser   StartBlockMap[R->getExit()] = ExitBBCopy;
1546deefbcedSTobias Grosser   EndBlockMap[R->getExit()] = ExitBBCopy;
1547514f6efaSJohannes Doerfert 
1548deefbcedSTobias Grosser   BasicBlock *ExitDomBBCopy = EndBlockMap.lookup(findExitDominator(DT, R));
154921a059afSTobias Grosser   assert(ExitDomBBCopy &&
155021a059afSTobias Grosser          "Common exit dominator must be within region; at least the entry node "
155121a059afSTobias Grosser          "must match");
1552f33c125dSMichael Kruse   DT.changeImmediateDominator(ExitBBCopy, ExitDomBBCopy);
1553275a1756SJohannes Doerfert 
1554275a1756SJohannes Doerfert   // As the block generator doesn't handle control flow we need to add the
1555275a1756SJohannes Doerfert   // region control flow by hand after all blocks have been copied.
1556275a1756SJohannes Doerfert   for (BasicBlock *BB : SeenBlocks) {
1557275a1756SJohannes Doerfert 
1558deefbcedSTobias Grosser     BasicBlock *BBCopyStart = StartBlockMap[BB];
1559deefbcedSTobias Grosser     BasicBlock *BBCopyEnd = EndBlockMap[BB];
1560e303c87eSChandler Carruth     Instruction *TI = BB->getTerminator();
1561e114dc02SJohannes Doerfert     if (isa<UnreachableInst>(TI)) {
1562deefbcedSTobias Grosser       while (!BBCopyEnd->empty())
1563deefbcedSTobias Grosser         BBCopyEnd->begin()->eraseFromParent();
1564deefbcedSTobias Grosser       new UnreachableInst(BBCopyEnd->getContext(), BBCopyEnd);
1565e114dc02SJohannes Doerfert       continue;
1566e114dc02SJohannes Doerfert     }
1567e114dc02SJohannes Doerfert 
1568deefbcedSTobias Grosser     Instruction *BICopy = BBCopyEnd->getTerminator();
1569275a1756SJohannes Doerfert 
1570deefbcedSTobias Grosser     ValueMapT &RegionMap = RegionMaps[BBCopyStart];
1571deefbcedSTobias Grosser     RegionMap.insert(StartBlockMap.begin(), StartBlockMap.end());
1572514f6efaSJohannes Doerfert 
157345e7944bSTobias Grosser     Builder.SetInsertPoint(BICopy);
15749a132f36SJohannes Doerfert     copyInstScalar(Stmt, TI, RegionMap, LTS);
1575275a1756SJohannes Doerfert     BICopy->eraseFromParent();
1576275a1756SJohannes Doerfert   }
1577275a1756SJohannes Doerfert 
1578ecff11dcSJohannes Doerfert   // Add counting PHI nodes to all loops in the region that can be used as
1579a6d48f59SMichael Kruse   // replacement for SCEVs referring to the old loop.
1580ecff11dcSJohannes Doerfert   for (BasicBlock *BB : SeenBlocks) {
1581ecff11dcSJohannes Doerfert     Loop *L = LI.getLoopFor(BB);
1582bc29e0b2STobias Grosser     if (L == nullptr || L->getHeader() != BB || !R->contains(L))
1583ecff11dcSJohannes Doerfert       continue;
1584ecff11dcSJohannes Doerfert 
1585deefbcedSTobias Grosser     BasicBlock *BBCopy = StartBlockMap[BB];
1586ecff11dcSJohannes Doerfert     Value *NullVal = Builder.getInt32(0);
1587ecff11dcSJohannes Doerfert     PHINode *LoopPHI =
1588ecff11dcSJohannes Doerfert         PHINode::Create(Builder.getInt32Ty(), 2, "polly.subregion.iv");
1589ecff11dcSJohannes Doerfert     Instruction *LoopPHIInc = BinaryOperator::CreateAdd(
1590ecff11dcSJohannes Doerfert         LoopPHI, Builder.getInt32(1), "polly.subregion.iv.inc");
1591b8f58b53SDuncan P. N. Exon Smith     LoopPHI->insertBefore(&BBCopy->front());
1592ecff11dcSJohannes Doerfert     LoopPHIInc->insertBefore(BBCopy->getTerminator());
1593ecff11dcSJohannes Doerfert 
1594ecff11dcSJohannes Doerfert     for (auto *PredBB : make_range(pred_begin(BB), pred_end(BB))) {
1595ecff11dcSJohannes Doerfert       if (!R->contains(PredBB))
1596ecff11dcSJohannes Doerfert         continue;
1597ecff11dcSJohannes Doerfert       if (L->contains(PredBB))
1598deefbcedSTobias Grosser         LoopPHI->addIncoming(LoopPHIInc, EndBlockMap[PredBB]);
1599ecff11dcSJohannes Doerfert       else
1600deefbcedSTobias Grosser         LoopPHI->addIncoming(NullVal, EndBlockMap[PredBB]);
1601ecff11dcSJohannes Doerfert     }
1602ecff11dcSJohannes Doerfert 
1603ecff11dcSJohannes Doerfert     for (auto *PredBBCopy : make_range(pred_begin(BBCopy), pred_end(BBCopy)))
1604ecff11dcSJohannes Doerfert       if (LoopPHI->getBasicBlockIndex(PredBBCopy) < 0)
1605ecff11dcSJohannes Doerfert         LoopPHI->addIncoming(NullVal, PredBBCopy);
1606ecff11dcSJohannes Doerfert 
1607ecff11dcSJohannes Doerfert     LTS[L] = SE.getUnknown(LoopPHI);
1608ecff11dcSJohannes Doerfert   }
1609ecff11dcSJohannes Doerfert 
1610225f0d1eSMichael Kruse   // Continue generating code in the exit block.
1611b8f58b53SDuncan P. N. Exon Smith   Builder.SetInsertPoint(&*ExitBBCopy->getFirstInsertionPt());
1612225f0d1eSMichael Kruse 
1613225f0d1eSMichael Kruse   // Write values visible to other statements.
16142fa35194SMichael Kruse   generateScalarStores(Stmt, LTS, ValueMap, IdToAstExp);
1615deefbcedSTobias Grosser   StartBlockMap.clear();
1616deefbcedSTobias Grosser   EndBlockMap.clear();
16173e956020STobias Grosser   RegionMaps.clear();
16183e956020STobias Grosser   IncompletePHINodeMap.clear();
1619275a1756SJohannes Doerfert }
1620ecff11dcSJohannes Doerfert 
1621ee6a4fc6SMichael Kruse PHINode *RegionGenerator::buildExitPHI(MemoryAccess *MA, LoopToScevMapT &LTS,
1622ee6a4fc6SMichael Kruse                                        ValueMapT &BBMap, Loop *L) {
1623ee6a4fc6SMichael Kruse   ScopStmt *Stmt = MA->getStatement();
1624ee6a4fc6SMichael Kruse   Region *SubR = Stmt->getRegion();
1625ee6a4fc6SMichael Kruse   auto Incoming = MA->getIncoming();
1626ee6a4fc6SMichael Kruse 
1627ee6a4fc6SMichael Kruse   PollyIRBuilder::InsertPointGuard IPGuard(Builder);
1628ee6a4fc6SMichael Kruse   PHINode *OrigPHI = cast<PHINode>(MA->getAccessInstruction());
1629ee6a4fc6SMichael Kruse   BasicBlock *NewSubregionExit = Builder.GetInsertBlock();
1630ee6a4fc6SMichael Kruse 
1631ee6a4fc6SMichael Kruse   // This can happen if the subregion is simplified after the ScopStmts
1632ee6a4fc6SMichael Kruse   // have been created; simplification happens as part of CodeGeneration.
1633ee6a4fc6SMichael Kruse   if (OrigPHI->getParent() != SubR->getExit()) {
1634ee6a4fc6SMichael Kruse     BasicBlock *FormerExit = SubR->getExitingBlock();
1635ee6a4fc6SMichael Kruse     if (FormerExit)
1636deefbcedSTobias Grosser       NewSubregionExit = StartBlockMap.lookup(FormerExit);
1637ee6a4fc6SMichael Kruse   }
1638ee6a4fc6SMichael Kruse 
1639ee6a4fc6SMichael Kruse   PHINode *NewPHI = PHINode::Create(OrigPHI->getType(), Incoming.size(),
1640ee6a4fc6SMichael Kruse                                     "polly." + OrigPHI->getName(),
1641ee6a4fc6SMichael Kruse                                     NewSubregionExit->getFirstNonPHI());
1642ee6a4fc6SMichael Kruse 
1643ee6a4fc6SMichael Kruse   // Add the incoming values to the PHI.
1644ee6a4fc6SMichael Kruse   for (auto &Pair : Incoming) {
1645ee6a4fc6SMichael Kruse     BasicBlock *OrigIncomingBlock = Pair.first;
1646deefbcedSTobias Grosser     BasicBlock *NewIncomingBlockStart = StartBlockMap.lookup(OrigIncomingBlock);
1647deefbcedSTobias Grosser     BasicBlock *NewIncomingBlockEnd = EndBlockMap.lookup(OrigIncomingBlock);
1648deefbcedSTobias Grosser     Builder.SetInsertPoint(NewIncomingBlockEnd->getTerminator());
1649deefbcedSTobias Grosser     assert(RegionMaps.count(NewIncomingBlockStart));
1650deefbcedSTobias Grosser     assert(RegionMaps.count(NewIncomingBlockEnd));
1651deefbcedSTobias Grosser     ValueMapT *LocalBBMap = &RegionMaps[NewIncomingBlockStart];
1652ee6a4fc6SMichael Kruse 
1653ee6a4fc6SMichael Kruse     Value *OrigIncomingValue = Pair.second;
1654ee6a4fc6SMichael Kruse     Value *NewIncomingValue =
1655ee6a4fc6SMichael Kruse         getNewValue(*Stmt, OrigIncomingValue, *LocalBBMap, LTS, L);
1656deefbcedSTobias Grosser     NewPHI->addIncoming(NewIncomingValue, NewIncomingBlockEnd);
1657ee6a4fc6SMichael Kruse   }
1658ee6a4fc6SMichael Kruse 
1659ee6a4fc6SMichael Kruse   return NewPHI;
1660ee6a4fc6SMichael Kruse }
1661ee6a4fc6SMichael Kruse 
1662ee6a4fc6SMichael Kruse Value *RegionGenerator::getExitScalar(MemoryAccess *MA, LoopToScevMapT &LTS,
1663ee6a4fc6SMichael Kruse                                       ValueMapT &BBMap) {
1664ee6a4fc6SMichael Kruse   ScopStmt *Stmt = MA->getStatement();
1665ee6a4fc6SMichael Kruse 
1666ee6a4fc6SMichael Kruse   // TODO: Add some test cases that ensure this is really the right choice.
1667ee6a4fc6SMichael Kruse   Loop *L = LI.getLoopFor(Stmt->getRegion()->getExit());
1668ee6a4fc6SMichael Kruse 
1669ee6a4fc6SMichael Kruse   if (MA->isAnyPHIKind()) {
1670ee6a4fc6SMichael Kruse     auto Incoming = MA->getIncoming();
1671ee6a4fc6SMichael Kruse     assert(!Incoming.empty() &&
1672ee6a4fc6SMichael Kruse            "PHI WRITEs must have originate from at least one incoming block");
1673ee6a4fc6SMichael Kruse 
1674ee6a4fc6SMichael Kruse     // If there is only one incoming value, we do not need to create a PHI.
1675ee6a4fc6SMichael Kruse     if (Incoming.size() == 1) {
1676ee6a4fc6SMichael Kruse       Value *OldVal = Incoming[0].second;
1677ee6a4fc6SMichael Kruse       return getNewValue(*Stmt, OldVal, BBMap, LTS, L);
1678ee6a4fc6SMichael Kruse     }
1679ee6a4fc6SMichael Kruse 
1680ee6a4fc6SMichael Kruse     return buildExitPHI(MA, LTS, BBMap, L);
1681ee6a4fc6SMichael Kruse   }
1682ee6a4fc6SMichael Kruse 
16834d5a9172STobias Grosser   // MemoryKind::Value accesses leaving the subregion must dominate the exit
16844d5a9172STobias Grosser   // block; just pass the copied value.
1685ee6a4fc6SMichael Kruse   Value *OldVal = MA->getAccessValue();
1686ee6a4fc6SMichael Kruse   return getNewValue(*Stmt, OldVal, BBMap, LTS, L);
1687ee6a4fc6SMichael Kruse }
1688ee6a4fc6SMichael Kruse 
16892fa35194SMichael Kruse void RegionGenerator::generateScalarStores(
16902fa35194SMichael Kruse     ScopStmt &Stmt, LoopToScevMapT &LTS, ValueMapT &BBMap,
16912fa35194SMichael Kruse     __isl_keep isl_id_to_ast_expr *NewAccesses) {
169275296901STobias Grosser   assert(Stmt.getRegion() &&
169375296901STobias Grosser          "Block statements need to use the generateScalarStores() "
1694ecff11dcSJohannes Doerfert          "function in the BlockGenerator");
1695ecff11dcSJohannes Doerfert 
1696c4c679c2SMichael Kruse   // Get the exit scalar values before generating the writes.
1697c4c679c2SMichael Kruse   // This is necessary because RegionGenerator::getExitScalar may insert
1698c4c679c2SMichael Kruse   // PHINodes that depend on the region's exiting blocks. But
1699c4c679c2SMichael Kruse   // BlockGenerator::generateConditionalExecution may insert a new basic block
1700c4c679c2SMichael Kruse   // such that the current basic block is not a direct successor of the exiting
1701c4c679c2SMichael Kruse   // blocks anymore. Hence, build the PHINodes while the current block is still
1702c4c679c2SMichael Kruse   // the direct successor.
1703c4c679c2SMichael Kruse   SmallDenseMap<MemoryAccess *, Value *> NewExitScalars;
1704c4c679c2SMichael Kruse   for (MemoryAccess *MA : Stmt) {
1705c4c679c2SMichael Kruse     if (MA->isOriginalArrayKind() || MA->isRead())
1706c4c679c2SMichael Kruse       continue;
1707c4c679c2SMichael Kruse 
1708c4c679c2SMichael Kruse     Value *NewVal = getExitScalar(MA, LTS, BBMap);
1709c4c679c2SMichael Kruse     NewExitScalars[MA] = NewVal;
1710c4c679c2SMichael Kruse   }
1711c4c679c2SMichael Kruse 
1712ecff11dcSJohannes Doerfert   for (MemoryAccess *MA : Stmt) {
17132fa35194SMichael Kruse     if (MA->isOriginalArrayKind() || MA->isRead())
1714ecff11dcSJohannes Doerfert       continue;
1715ecff11dcSJohannes Doerfert 
17161515f6b9STobias Grosser     isl::set AccDom = MA->getAccessRelation().domain();
1717fe46c3ffSTobias Grosser     std::string Subject = MA->getId().get_name();
1718fe46c3ffSTobias Grosser     generateConditionalExecution(
1719fe46c3ffSTobias Grosser         Stmt, AccDom, Subject.c_str(), [&, this, MA]() {
1720c4c679c2SMichael Kruse           Value *NewVal = NewExitScalars.lookup(MA);
1721c4c679c2SMichael Kruse           assert(NewVal && "The exit scalar must be determined before");
1722fe46c3ffSTobias Grosser           Value *Address = getImplicitAddress(*MA, getLoopForStmt(Stmt), LTS,
1723fe46c3ffSTobias Grosser                                               BBMap, NewAccesses);
1724eac9726eSMichael Kruse           assert((!isa<Instruction>(NewVal) ||
1725eac9726eSMichael Kruse                   DT.dominates(cast<Instruction>(NewVal)->getParent(),
1726eac9726eSMichael Kruse                                Builder.GetInsertBlock())) &&
1727eac9726eSMichael Kruse                  "Domination violation");
1728eac9726eSMichael Kruse           assert((!isa<Instruction>(Address) ||
1729eac9726eSMichael Kruse                   DT.dominates(cast<Instruction>(Address)->getParent(),
1730eac9726eSMichael Kruse                                Builder.GetInsertBlock())) &&
1731eac9726eSMichael Kruse                  "Domination violation");
1732ee6a4fc6SMichael Kruse           Builder.CreateStore(NewVal, Address);
1733706f79abSMichael Kruse         });
1734ecff11dcSJohannes Doerfert   }
1735ecff11dcSJohannes Doerfert }
1736ecff11dcSJohannes Doerfert 
1737943c369cSTobias Grosser void RegionGenerator::addOperandToPHI(ScopStmt &Stmt, PHINode *PHI,
1738ecff11dcSJohannes Doerfert                                       PHINode *PHICopy, BasicBlock *IncomingBB,
1739ecff11dcSJohannes Doerfert                                       LoopToScevMapT &LTS) {
1740ecff11dcSJohannes Doerfert   // If the incoming block was not yet copied mark this PHI as incomplete.
1741ecff11dcSJohannes Doerfert   // Once the block will be copied the incoming value will be added.
1742deefbcedSTobias Grosser   BasicBlock *BBCopyStart = StartBlockMap[IncomingBB];
1743deefbcedSTobias Grosser   BasicBlock *BBCopyEnd = EndBlockMap[IncomingBB];
1744deefbcedSTobias Grosser   if (!BBCopyStart) {
1745deefbcedSTobias Grosser     assert(!BBCopyEnd);
17468d89179eSMichael Kruse     assert(Stmt.represents(IncomingBB) &&
1747ecff11dcSJohannes Doerfert            "Bad incoming block for PHI in non-affine region");
1748ecff11dcSJohannes Doerfert     IncompletePHINodeMap[IncomingBB].push_back(std::make_pair(PHI, PHICopy));
1749ecff11dcSJohannes Doerfert     return;
1750ecff11dcSJohannes Doerfert   }
1751ecff11dcSJohannes Doerfert 
1752deefbcedSTobias Grosser   assert(RegionMaps.count(BBCopyStart) &&
1753deefbcedSTobias Grosser          "Incoming PHI block did not have a BBMap");
1754deefbcedSTobias Grosser   ValueMapT &BBCopyMap = RegionMaps[BBCopyStart];
1755ecff11dcSJohannes Doerfert 
175675dfaa1dSTobias Grosser   Value *OpCopy = nullptr;
175775dfaa1dSTobias Grosser 
17588d89179eSMichael Kruse   if (Stmt.represents(IncomingBB)) {
1759ecff11dcSJohannes Doerfert     Value *Op = PHI->getIncomingValueForBlock(IncomingBB);
1760dc122222SMichael Kruse 
17616ba92714SJohannes Doerfert     // If the current insert block is different from the PHIs incoming block
17626ba92714SJohannes Doerfert     // change it, otherwise do not.
17636ba92714SJohannes Doerfert     auto IP = Builder.GetInsertPoint();
1764deefbcedSTobias Grosser     if (IP->getParent() != BBCopyEnd)
1765deefbcedSTobias Grosser       Builder.SetInsertPoint(BBCopyEnd->getTerminator());
17662c3ffc04SJohannes Doerfert     OpCopy = getNewValue(Stmt, Op, BBCopyMap, LTS, getLoopForStmt(Stmt));
1767deefbcedSTobias Grosser     if (IP->getParent() != BBCopyEnd)
17686ba92714SJohannes Doerfert       Builder.SetInsertPoint(&*IP);
1769ecff11dcSJohannes Doerfert   } else {
177075dfaa1dSTobias Grosser     // All edges from outside the non-affine region become a single edge
177175dfaa1dSTobias Grosser     // in the new copy of the non-affine region. Make sure to only add the
177275dfaa1dSTobias Grosser     // corresponding edge the first time we encounter a basic block from
177375dfaa1dSTobias Grosser     // outside the non-affine region.
1774deefbcedSTobias Grosser     if (PHICopy->getBasicBlockIndex(BBCopyEnd) >= 0)
1775ecff11dcSJohannes Doerfert       return;
1776ecff11dcSJohannes Doerfert 
177775dfaa1dSTobias Grosser     // Get the reloaded value.
177875dfaa1dSTobias Grosser     OpCopy = getNewValue(Stmt, PHI, BBCopyMap, LTS, getLoopForStmt(Stmt));
1779ecff11dcSJohannes Doerfert   }
1780ecff11dcSJohannes Doerfert 
1781ecff11dcSJohannes Doerfert   assert(OpCopy && "Incoming PHI value was not copied properly");
1782deefbcedSTobias Grosser   PHICopy->addIncoming(OpCopy, BBCopyEnd);
1783ecff11dcSJohannes Doerfert }
1784ecff11dcSJohannes Doerfert 
17852b809d13STobias Grosser void RegionGenerator::copyPHIInstruction(ScopStmt &Stmt, PHINode *PHI,
1786ecff11dcSJohannes Doerfert                                          ValueMapT &BBMap,
1787ecff11dcSJohannes Doerfert                                          LoopToScevMapT &LTS) {
1788ecff11dcSJohannes Doerfert   unsigned NumIncoming = PHI->getNumIncomingValues();
1789ecff11dcSJohannes Doerfert   PHINode *PHICopy =
1790ecff11dcSJohannes Doerfert       Builder.CreatePHI(PHI->getType(), NumIncoming, "polly." + PHI->getName());
1791ecff11dcSJohannes Doerfert   PHICopy->moveBefore(PHICopy->getParent()->getFirstNonPHI());
1792ecff11dcSJohannes Doerfert   BBMap[PHI] = PHICopy;
1793ecff11dcSJohannes Doerfert 
179497b84909STobias Grosser   for (BasicBlock *IncomingBB : PHI->blocks())
179597b84909STobias Grosser     addOperandToPHI(Stmt, PHI, PHICopy, IncomingBB, LTS);
1796ecff11dcSJohannes Doerfert }
1797