1e1270b16SFlorian Hahn //===- MatrixUtils.cpp - Utilities to lower matrix intrinsics ---*- C++ -*-===//
2e1270b16SFlorian Hahn //
3e1270b16SFlorian Hahn // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4e1270b16SFlorian Hahn // See https://llvm.org/LICENSE.txt for license information.
5e1270b16SFlorian Hahn // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6e1270b16SFlorian Hahn //
7e1270b16SFlorian Hahn //===----------------------------------------------------------------------===//
8e1270b16SFlorian Hahn //
9e1270b16SFlorian Hahn // Utilities for generating tiled loops for matrix operations.
10e1270b16SFlorian Hahn //
11e1270b16SFlorian Hahn //===----------------------------------------------------------------------===//
12e1270b16SFlorian Hahn 
13e1270b16SFlorian Hahn #include "llvm/Transforms/Utils/MatrixUtils.h"
14e1270b16SFlorian Hahn #include "llvm/Analysis/DomTreeUpdater.h"
15e1270b16SFlorian Hahn #include "llvm/Analysis/LoopInfo.h"
16e1270b16SFlorian Hahn #include "llvm/IR/BasicBlock.h"
17e1270b16SFlorian Hahn #include "llvm/IR/Dominators.h"
18e1270b16SFlorian Hahn #include "llvm/IR/IRBuilder.h"
19e1270b16SFlorian Hahn #include "llvm/IR/Type.h"
20e1270b16SFlorian Hahn 
21e1270b16SFlorian Hahn using namespace llvm;
22e1270b16SFlorian Hahn 
CreateLoop(BasicBlock * Preheader,BasicBlock * Exit,Value * Bound,Value * Step,StringRef Name,IRBuilderBase & B,DomTreeUpdater & DTU,Loop * L,LoopInfo & LI)23e1270b16SFlorian Hahn BasicBlock *TileInfo::CreateLoop(BasicBlock *Preheader, BasicBlock *Exit,
24e1270b16SFlorian Hahn                                  Value *Bound, Value *Step, StringRef Name,
25e1270b16SFlorian Hahn                                  IRBuilderBase &B, DomTreeUpdater &DTU, Loop *L,
26e1270b16SFlorian Hahn                                  LoopInfo &LI) {
27e1270b16SFlorian Hahn   LLVMContext &Ctx = Preheader->getContext();
28e1270b16SFlorian Hahn   BasicBlock *Header = BasicBlock::Create(
29e1270b16SFlorian Hahn       Preheader->getContext(), Name + ".header", Preheader->getParent(), Exit);
30e1270b16SFlorian Hahn   BasicBlock *Body = BasicBlock::Create(Header->getContext(), Name + ".body",
31e1270b16SFlorian Hahn                                         Header->getParent(), Exit);
32e1270b16SFlorian Hahn   BasicBlock *Latch = BasicBlock::Create(Header->getContext(), Name + ".latch",
33e1270b16SFlorian Hahn                                          Header->getParent(), Exit);
34e1270b16SFlorian Hahn 
35e1270b16SFlorian Hahn   Type *I32Ty = Type::getInt64Ty(Ctx);
36e1270b16SFlorian Hahn   BranchInst::Create(Body, Header);
37e1270b16SFlorian Hahn   BranchInst::Create(Latch, Body);
38e1270b16SFlorian Hahn   PHINode *IV =
39e1270b16SFlorian Hahn       PHINode::Create(I32Ty, 2, Name + ".iv", Header->getTerminator());
40e1270b16SFlorian Hahn   IV->addIncoming(ConstantInt::get(I32Ty, 0), Preheader);
41e1270b16SFlorian Hahn 
42e1270b16SFlorian Hahn   B.SetInsertPoint(Latch);
43e1270b16SFlorian Hahn   Value *Inc = B.CreateAdd(IV, Step, Name + ".step");
44e1270b16SFlorian Hahn   Value *Cond = B.CreateICmpNE(Inc, Bound, Name + ".cond");
45e1270b16SFlorian Hahn   BranchInst::Create(Header, Exit, Cond, Latch);
46e1270b16SFlorian Hahn   IV->addIncoming(Inc, Latch);
47e1270b16SFlorian Hahn 
48e1270b16SFlorian Hahn   BranchInst *PreheaderBr = cast<BranchInst>(Preheader->getTerminator());
49e1270b16SFlorian Hahn   BasicBlock *Tmp = PreheaderBr->getSuccessor(0);
50e1270b16SFlorian Hahn   PreheaderBr->setSuccessor(0, Header);
51e1270b16SFlorian Hahn   DTU.applyUpdatesPermissive({
52e1270b16SFlorian Hahn       {DominatorTree::Delete, Preheader, Tmp},
53e1270b16SFlorian Hahn       {DominatorTree::Insert, Header, Body},
54e1270b16SFlorian Hahn       {DominatorTree::Insert, Body, Latch},
55e1270b16SFlorian Hahn       {DominatorTree::Insert, Latch, Header},
56e1270b16SFlorian Hahn       {DominatorTree::Insert, Latch, Exit},
57e1270b16SFlorian Hahn       {DominatorTree::Insert, Preheader, Header},
58e1270b16SFlorian Hahn   });
59e1270b16SFlorian Hahn 
60e1270b16SFlorian Hahn   L->addBasicBlockToLoop(Header, LI);
61e1270b16SFlorian Hahn   L->addBasicBlockToLoop(Body, LI);
62e1270b16SFlorian Hahn   L->addBasicBlockToLoop(Latch, LI);
63e1270b16SFlorian Hahn   return Body;
64e1270b16SFlorian Hahn }
65e1270b16SFlorian Hahn 
66e1270b16SFlorian Hahn // Creates the following loop nest skeleton:
67e1270b16SFlorian Hahn //  for C = 0; C < NumColumns; C += TileSize
68e1270b16SFlorian Hahn //    for R = 0; R < NumRows; R += TileSize
69e1270b16SFlorian Hahn //      for K = 0; K < Inner ; K += TileSize
CreateTiledLoops(BasicBlock * Start,BasicBlock * End,IRBuilderBase & B,DomTreeUpdater & DTU,LoopInfo & LI)70e1270b16SFlorian Hahn BasicBlock *TileInfo::CreateTiledLoops(BasicBlock *Start, BasicBlock *End,
71e1270b16SFlorian Hahn                                        IRBuilderBase &B, DomTreeUpdater &DTU,
72e1270b16SFlorian Hahn                                        LoopInfo &LI) {
73*2c6e8b46SFrancis Visoiu Mistrih   Loop *ColumnLoopInfo = LI.AllocateLoop();
74*2c6e8b46SFrancis Visoiu Mistrih   Loop *RowLoopInfo = LI.AllocateLoop();
75*2c6e8b46SFrancis Visoiu Mistrih   Loop *KLoopInfo = LI.AllocateLoop();
76*2c6e8b46SFrancis Visoiu Mistrih   RowLoopInfo->addChildLoop(KLoopInfo);
77*2c6e8b46SFrancis Visoiu Mistrih   ColumnLoopInfo->addChildLoop(RowLoopInfo);
78e1270b16SFlorian Hahn   if (Loop *ParentL = LI.getLoopFor(Start))
79*2c6e8b46SFrancis Visoiu Mistrih     ParentL->addChildLoop(ColumnLoopInfo);
80e1270b16SFlorian Hahn   else
81*2c6e8b46SFrancis Visoiu Mistrih     LI.addTopLevelLoop(ColumnLoopInfo);
82e1270b16SFlorian Hahn 
83e1270b16SFlorian Hahn   BasicBlock *ColBody =
84e1270b16SFlorian Hahn       CreateLoop(Start, End, B.getInt64(NumColumns), B.getInt64(TileSize),
85*2c6e8b46SFrancis Visoiu Mistrih                  "cols", B, DTU, ColumnLoopInfo, LI);
86*2c6e8b46SFrancis Visoiu Mistrih   ColumnLoop.Latch = ColBody->getSingleSuccessor();
87e1270b16SFlorian Hahn   BasicBlock *RowBody =
88*2c6e8b46SFrancis Visoiu Mistrih       CreateLoop(ColBody, ColumnLoop.Latch, B.getInt64(NumRows),
89*2c6e8b46SFrancis Visoiu Mistrih                  B.getInt64(TileSize), "rows", B, DTU, RowLoopInfo, LI);
90*2c6e8b46SFrancis Visoiu Mistrih   RowLoop.Latch = RowBody->getSingleSuccessor();
91e1270b16SFlorian Hahn 
92e1270b16SFlorian Hahn   BasicBlock *InnerBody =
93*2c6e8b46SFrancis Visoiu Mistrih       CreateLoop(RowBody, RowLoop.Latch, B.getInt64(NumInner),
94*2c6e8b46SFrancis Visoiu Mistrih                  B.getInt64(TileSize), "inner", B, DTU, KLoopInfo, LI);
95*2c6e8b46SFrancis Visoiu Mistrih   KLoop.Latch = InnerBody->getSingleSuccessor();
96*2c6e8b46SFrancis Visoiu Mistrih   ColumnLoop.Header = ColBody->getSinglePredecessor();
97*2c6e8b46SFrancis Visoiu Mistrih   RowLoop.Header = RowBody->getSinglePredecessor();
98*2c6e8b46SFrancis Visoiu Mistrih   KLoop.Header = InnerBody->getSinglePredecessor();
99*2c6e8b46SFrancis Visoiu Mistrih   RowLoop.Index = &*RowLoop.Header->begin();
100*2c6e8b46SFrancis Visoiu Mistrih   ColumnLoop.Index = &*ColumnLoop.Header->begin();
101*2c6e8b46SFrancis Visoiu Mistrih   KLoop.Index = &*KLoop.Header->begin();
102e1270b16SFlorian Hahn 
103e1270b16SFlorian Hahn   return InnerBody;
104e1270b16SFlorian Hahn }
105