R600/SI: Fix assertion on infinite loops.
[oota-llvm.git] / lib / Target / R600 / SILowerControlFlow.cpp
1 //===-- SILowerControlFlow.cpp - Use predicates for control flow ----------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 /// \file
11 /// \brief This pass lowers the pseudo control flow instructions to real
12 /// machine instructions.
13 ///
14 /// All control flow is handled using predicated instructions and
15 /// a predicate stack.  Each Scalar ALU controls the operations of 64 Vector
16 /// ALUs.  The Scalar ALU can update the predicate for any of the Vector ALUs
17 /// by writting to the 64-bit EXEC register (each bit corresponds to a
18 /// single vector ALU).  Typically, for predicates, a vector ALU will write
19 /// to its bit of the VCC register (like EXEC VCC is 64-bits, one for each
20 /// Vector ALU) and then the ScalarALU will AND the VCC register with the
21 /// EXEC to update the predicates.
22 ///
23 /// For example:
24 /// %VCC = V_CMP_GT_F32 %VGPR1, %VGPR2
25 /// %SGPR0 = SI_IF %VCC
26 ///   %VGPR0 = V_ADD_F32 %VGPR0, %VGPR0
27 /// %SGPR0 = SI_ELSE %SGPR0
28 ///   %VGPR0 = V_SUB_F32 %VGPR0, %VGPR0
29 /// SI_END_CF %SGPR0
30 ///
31 /// becomes:
32 ///
33 /// %SGPR0 = S_AND_SAVEEXEC_B64 %VCC  // Save and update the exec mask
34 /// %SGPR0 = S_XOR_B64 %SGPR0, %EXEC  // Clear live bits from saved exec mask
35 /// S_CBRANCH_EXECZ label0            // This instruction is an optional
36 ///                                   // optimization which allows us to
37 ///                                   // branch if all the bits of
38 ///                                   // EXEC are zero.
39 /// %VGPR0 = V_ADD_F32 %VGPR0, %VGPR0 // Do the IF block of the branch
40 ///
41 /// label0:
42 /// %SGPR0 = S_OR_SAVEEXEC_B64 %EXEC   // Restore the exec mask for the Then block
43 /// %EXEC = S_XOR_B64 %SGPR0, %EXEC    // Clear live bits from saved exec mask
44 /// S_BRANCH_EXECZ label1              // Use our branch optimization
45 ///                                    // instruction again.
46 /// %VGPR0 = V_SUB_F32 %VGPR0, %VGPR   // Do the THEN block
47 /// label1:
48 /// %EXEC = S_OR_B64 %EXEC, %SGPR0     // Re-enable saved exec mask bits
49 //===----------------------------------------------------------------------===//
50
51 #include "AMDGPU.h"
52 #include "SIInstrInfo.h"
53 #include "SIMachineFunctionInfo.h"
54 #include "llvm/CodeGen/MachineFunction.h"
55 #include "llvm/CodeGen/MachineFunctionPass.h"
56 #include "llvm/CodeGen/MachineInstrBuilder.h"
57 #include "llvm/CodeGen/MachineRegisterInfo.h"
58
59 using namespace llvm;
60
61 namespace {
62
63 class SILowerControlFlowPass : public MachineFunctionPass {
64
65 private:
66   static const unsigned SkipThreshold = 12;
67
68   static char ID;
69   const TargetRegisterInfo *TRI;
70   const SIInstrInfo *TII;
71
72   bool shouldSkip(MachineBasicBlock *From, MachineBasicBlock *To);
73
74   void Skip(MachineInstr &From, MachineOperand &To);
75   void SkipIfDead(MachineInstr &MI);
76
77   void If(MachineInstr &MI);
78   void Else(MachineInstr &MI);
79   void Break(MachineInstr &MI);
80   void IfBreak(MachineInstr &MI);
81   void ElseBreak(MachineInstr &MI);
82   void Loop(MachineInstr &MI);
83   void EndCf(MachineInstr &MI);
84
85   void Kill(MachineInstr &MI);
86   void Branch(MachineInstr &MI);
87
88   void LoadM0(MachineInstr &MI, MachineInstr *MovRel);
89   void IndirectSrc(MachineInstr &MI);
90   void IndirectDst(MachineInstr &MI);
91
92 public:
93   SILowerControlFlowPass(TargetMachine &tm) :
94     MachineFunctionPass(ID), TRI(0), TII(0) { }
95
96   virtual bool runOnMachineFunction(MachineFunction &MF);
97
98   const char *getPassName() const {
99     return "SI Lower control flow instructions";
100   }
101
102 };
103
104 } // End anonymous namespace
105
106 char SILowerControlFlowPass::ID = 0;
107
108 FunctionPass *llvm::createSILowerControlFlowPass(TargetMachine &tm) {
109   return new SILowerControlFlowPass(tm);
110 }
111
112 bool SILowerControlFlowPass::shouldSkip(MachineBasicBlock *From,
113                                         MachineBasicBlock *To) {
114
115   unsigned NumInstr = 0;
116
117   for (MachineBasicBlock *MBB = From; MBB != To && !MBB->succ_empty();
118        MBB = *MBB->succ_begin()) {
119
120     for (MachineBasicBlock::iterator I = MBB->begin(), E = MBB->end();
121          NumInstr < SkipThreshold && I != E; ++I) {
122
123       if (I->isBundle() || !I->isBundled())
124         if (++NumInstr >= SkipThreshold)
125           return true;
126     }
127   }
128
129   return false;
130 }
131
132 void SILowerControlFlowPass::Skip(MachineInstr &From, MachineOperand &To) {
133
134   if (!shouldSkip(*From.getParent()->succ_begin(), To.getMBB()))
135     return;
136
137   DebugLoc DL = From.getDebugLoc();
138   BuildMI(*From.getParent(), &From, DL, TII->get(AMDGPU::S_CBRANCH_EXECZ))
139           .addOperand(To)
140           .addReg(AMDGPU::EXEC);
141 }
142
143 void SILowerControlFlowPass::SkipIfDead(MachineInstr &MI) {
144
145   MachineBasicBlock &MBB = *MI.getParent();
146   DebugLoc DL = MI.getDebugLoc();
147
148   if (!shouldSkip(&MBB, &MBB.getParent()->back()))
149     return;
150
151   MachineBasicBlock::iterator Insert = &MI;
152   ++Insert;
153
154   // If the exec mask is non-zero, skip the next two instructions
155   BuildMI(MBB, Insert, DL, TII->get(AMDGPU::S_CBRANCH_EXECNZ))
156           .addImm(3)
157           .addReg(AMDGPU::EXEC);
158
159   // Exec mask is zero: Export to NULL target...
160   BuildMI(MBB, Insert, DL, TII->get(AMDGPU::EXP))
161           .addImm(0)
162           .addImm(0x09) // V_008DFC_SQ_EXP_NULL
163           .addImm(0)
164           .addImm(1)
165           .addImm(1)
166           .addReg(AMDGPU::VGPR0)
167           .addReg(AMDGPU::VGPR0)
168           .addReg(AMDGPU::VGPR0)
169           .addReg(AMDGPU::VGPR0);
170
171   // ... and terminate wavefront
172   BuildMI(MBB, Insert, DL, TII->get(AMDGPU::S_ENDPGM));
173 }
174
175 void SILowerControlFlowPass::If(MachineInstr &MI) {
176   MachineBasicBlock &MBB = *MI.getParent();
177   DebugLoc DL = MI.getDebugLoc();
178   unsigned Reg = MI.getOperand(0).getReg();
179   unsigned Vcc = MI.getOperand(1).getReg();
180
181   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_AND_SAVEEXEC_B64), Reg)
182           .addReg(Vcc);
183
184   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_XOR_B64), Reg)
185           .addReg(AMDGPU::EXEC)
186           .addReg(Reg);
187
188   Skip(MI, MI.getOperand(2));
189
190   MI.eraseFromParent();
191 }
192
193 void SILowerControlFlowPass::Else(MachineInstr &MI) {
194   MachineBasicBlock &MBB = *MI.getParent();
195   DebugLoc DL = MI.getDebugLoc();
196   unsigned Dst = MI.getOperand(0).getReg();
197   unsigned Src = MI.getOperand(1).getReg();
198
199   BuildMI(MBB, MBB.getFirstNonPHI(), DL,
200           TII->get(AMDGPU::S_OR_SAVEEXEC_B64), Dst)
201           .addReg(Src); // Saved EXEC
202
203   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_XOR_B64), AMDGPU::EXEC)
204           .addReg(AMDGPU::EXEC)
205           .addReg(Dst);
206
207   Skip(MI, MI.getOperand(2));
208
209   MI.eraseFromParent();
210 }
211
212 void SILowerControlFlowPass::Break(MachineInstr &MI) {
213   MachineBasicBlock &MBB = *MI.getParent();
214   DebugLoc DL = MI.getDebugLoc();
215
216   unsigned Dst = MI.getOperand(0).getReg();
217   unsigned Src = MI.getOperand(1).getReg();
218  
219   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_OR_B64), Dst)
220           .addReg(AMDGPU::EXEC)
221           .addReg(Src);
222
223   MI.eraseFromParent();
224 }
225
226 void SILowerControlFlowPass::IfBreak(MachineInstr &MI) {
227   MachineBasicBlock &MBB = *MI.getParent();
228   DebugLoc DL = MI.getDebugLoc();
229
230   unsigned Dst = MI.getOperand(0).getReg();
231   unsigned Vcc = MI.getOperand(1).getReg();
232   unsigned Src = MI.getOperand(2).getReg();
233  
234   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_OR_B64), Dst)
235           .addReg(Vcc)
236           .addReg(Src);
237
238   MI.eraseFromParent();
239 }
240
241 void SILowerControlFlowPass::ElseBreak(MachineInstr &MI) {
242   MachineBasicBlock &MBB = *MI.getParent();
243   DebugLoc DL = MI.getDebugLoc();
244
245   unsigned Dst = MI.getOperand(0).getReg();
246   unsigned Saved = MI.getOperand(1).getReg();
247   unsigned Src = MI.getOperand(2).getReg();
248  
249   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_OR_B64), Dst)
250           .addReg(Saved)
251           .addReg(Src);
252
253   MI.eraseFromParent();
254 }
255
256 void SILowerControlFlowPass::Loop(MachineInstr &MI) {
257   MachineBasicBlock &MBB = *MI.getParent();
258   DebugLoc DL = MI.getDebugLoc();
259   unsigned Src = MI.getOperand(0).getReg();
260
261   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_ANDN2_B64), AMDGPU::EXEC)
262           .addReg(AMDGPU::EXEC)
263           .addReg(Src);
264
265   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_CBRANCH_EXECNZ))
266           .addOperand(MI.getOperand(1))
267           .addReg(AMDGPU::EXEC);
268
269   MI.eraseFromParent();
270 }
271
272 void SILowerControlFlowPass::EndCf(MachineInstr &MI) {
273   MachineBasicBlock &MBB = *MI.getParent();
274   DebugLoc DL = MI.getDebugLoc();
275   unsigned Reg = MI.getOperand(0).getReg();
276
277   BuildMI(MBB, MBB.getFirstNonPHI(), DL,
278           TII->get(AMDGPU::S_OR_B64), AMDGPU::EXEC)
279           .addReg(AMDGPU::EXEC)
280           .addReg(Reg);
281
282   MI.eraseFromParent();
283 }
284
285 void SILowerControlFlowPass::Branch(MachineInstr &MI) {
286   if (MI.getOperand(0).getMBB() == MI.getParent()->getNextNode())
287     MI.eraseFromParent();
288
289   // If these aren't equal, this is probably an infinite loop.
290 }
291
292 void SILowerControlFlowPass::Kill(MachineInstr &MI) {
293   MachineBasicBlock &MBB = *MI.getParent();
294   DebugLoc DL = MI.getDebugLoc();
295
296   // Kill is only allowed in pixel shaders
297   assert(MBB.getParent()->getInfo<SIMachineFunctionInfo>()->ShaderType ==
298          ShaderType::PIXEL);
299
300   // Clear this pixel from the exec mask if the operand is negative
301   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::V_CMPX_LE_F32_e32), AMDGPU::VCC)
302           .addImm(0)
303           .addOperand(MI.getOperand(0));
304
305   MI.eraseFromParent();
306 }
307
308 void SILowerControlFlowPass::LoadM0(MachineInstr &MI, MachineInstr *MovRel) {
309
310   MachineBasicBlock &MBB = *MI.getParent();
311   DebugLoc DL = MI.getDebugLoc();
312   MachineBasicBlock::iterator I = MI;
313
314   unsigned Save = MI.getOperand(1).getReg();
315   unsigned Idx = MI.getOperand(3).getReg();
316
317   if (AMDGPU::SReg_32RegClass.contains(Idx)) {
318     BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_MOV_B32), AMDGPU::M0)
319             .addReg(Idx);
320     MBB.insert(I, MovRel);
321     MI.eraseFromParent();
322     return;
323   }
324
325   assert(AMDGPU::SReg_64RegClass.contains(Save));
326   assert(AMDGPU::VReg_32RegClass.contains(Idx));
327
328   // Save the EXEC mask
329   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_MOV_B64), Save)
330           .addReg(AMDGPU::EXEC);
331
332   // Read the next variant into VCC (lower 32 bits) <- also loop target
333   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::V_READFIRSTLANE_B32_e32), AMDGPU::VCC)
334           .addReg(Idx);
335
336   // Move index from VCC into M0
337   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_MOV_B32), AMDGPU::M0)
338           .addReg(AMDGPU::VCC);
339
340   // Compare the just read M0 value to all possible Idx values
341   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::V_CMP_EQ_U32_e32), AMDGPU::VCC)
342           .addReg(AMDGPU::M0)
343           .addReg(Idx);
344
345   // Update EXEC, save the original EXEC value to VCC
346   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_AND_SAVEEXEC_B64), AMDGPU::VCC)
347           .addReg(AMDGPU::VCC);
348
349   // Do the actual move
350   MBB.insert(I, MovRel);
351
352   // Update EXEC, switch all done bits to 0 and all todo bits to 1
353   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_XOR_B64), AMDGPU::EXEC)
354           .addReg(AMDGPU::EXEC)
355           .addReg(AMDGPU::VCC);
356
357   // Loop back to V_READFIRSTLANE_B32 if there are still variants to cover
358   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_CBRANCH_EXECNZ))
359           .addImm(-7)
360           .addReg(AMDGPU::EXEC);
361
362   // Restore EXEC
363   BuildMI(MBB, &MI, DL, TII->get(AMDGPU::S_MOV_B64), AMDGPU::EXEC)
364           .addReg(Save);
365
366   MI.eraseFromParent();
367 }
368
369 void SILowerControlFlowPass::IndirectSrc(MachineInstr &MI) {
370
371   MachineBasicBlock &MBB = *MI.getParent();
372   DebugLoc DL = MI.getDebugLoc();
373
374   unsigned Dst = MI.getOperand(0).getReg();
375   unsigned Vec = MI.getOperand(2).getReg();
376   unsigned Off = MI.getOperand(4).getImm();
377   unsigned SubReg = TRI->getSubReg(Vec, AMDGPU::sub0);
378   if (!SubReg)
379     SubReg = Vec;
380
381   MachineInstr *MovRel =
382     BuildMI(*MBB.getParent(), DL, TII->get(AMDGPU::V_MOVRELS_B32_e32), Dst)
383             .addReg(SubReg + Off)
384             .addReg(AMDGPU::M0, RegState::Implicit)
385             .addReg(Vec, RegState::Implicit);
386
387   LoadM0(MI, MovRel);
388 }
389
390 void SILowerControlFlowPass::IndirectDst(MachineInstr &MI) {
391
392   MachineBasicBlock &MBB = *MI.getParent();
393   DebugLoc DL = MI.getDebugLoc();
394
395   unsigned Dst = MI.getOperand(0).getReg();
396   unsigned Off = MI.getOperand(4).getImm();
397   unsigned Val = MI.getOperand(5).getReg();
398   unsigned SubReg = TRI->getSubReg(Dst, AMDGPU::sub0);
399   if (!SubReg)
400     SubReg = Dst;
401
402   MachineInstr *MovRel = 
403     BuildMI(*MBB.getParent(), DL, TII->get(AMDGPU::V_MOVRELD_B32_e32))
404             .addReg(SubReg + Off, RegState::Define)
405             .addReg(Val)
406             .addReg(AMDGPU::M0, RegState::Implicit)
407             .addReg(Dst, RegState::Implicit);
408
409   LoadM0(MI, MovRel);
410 }
411
412 bool SILowerControlFlowPass::runOnMachineFunction(MachineFunction &MF) {
413   TII = static_cast<const SIInstrInfo*>(MF.getTarget().getInstrInfo());
414   TRI = MF.getTarget().getRegisterInfo();
415   SIMachineFunctionInfo *MFI = MF.getInfo<SIMachineFunctionInfo>();
416
417   bool HaveKill = false;
418   bool NeedM0 = false;
419   bool NeedWQM = false;
420   unsigned Depth = 0;
421
422   for (MachineFunction::iterator BI = MF.begin(), BE = MF.end();
423        BI != BE; ++BI) {
424
425     MachineBasicBlock &MBB = *BI;
426     for (MachineBasicBlock::iterator I = MBB.begin(), Next = llvm::next(I);
427          I != MBB.end(); I = Next) {
428
429       Next = llvm::next(I);
430       MachineInstr &MI = *I;
431       if (TII->isDS(MI.getOpcode())) {
432         NeedM0 = true;
433         NeedWQM = true;
434       }
435
436       switch (MI.getOpcode()) {
437         default: break;
438         case AMDGPU::SI_IF:
439           ++Depth;
440           If(MI);
441           break;
442
443         case AMDGPU::SI_ELSE:
444           Else(MI);
445           break;
446
447         case AMDGPU::SI_BREAK:
448           Break(MI);
449           break;
450
451         case AMDGPU::SI_IF_BREAK:
452           IfBreak(MI);
453           break;
454
455         case AMDGPU::SI_ELSE_BREAK:
456           ElseBreak(MI);
457           break;
458
459         case AMDGPU::SI_LOOP:
460           ++Depth;
461           Loop(MI);
462           break;
463
464         case AMDGPU::SI_END_CF:
465           if (--Depth == 0 && HaveKill) {
466             SkipIfDead(MI);
467             HaveKill = false;
468           }
469           EndCf(MI);
470           break;
471
472         case AMDGPU::SI_KILL:
473           if (Depth == 0)
474             SkipIfDead(MI);
475           else
476             HaveKill = true;
477           Kill(MI);
478           break;
479
480         case AMDGPU::S_BRANCH:
481           Branch(MI);
482           break;
483
484         case AMDGPU::SI_INDIRECT_SRC:
485           IndirectSrc(MI);
486           break;
487
488         case AMDGPU::SI_INDIRECT_DST_V1:
489         case AMDGPU::SI_INDIRECT_DST_V2:
490         case AMDGPU::SI_INDIRECT_DST_V4:
491         case AMDGPU::SI_INDIRECT_DST_V8:
492         case AMDGPU::SI_INDIRECT_DST_V16:
493           IndirectDst(MI);
494           break;
495
496         case AMDGPU::V_INTERP_P1_F32:
497         case AMDGPU::V_INTERP_P2_F32:
498         case AMDGPU::V_INTERP_MOV_F32:
499           NeedWQM = true;
500           break;
501
502       }
503     }
504   }
505
506   if (NeedM0) {
507     MachineBasicBlock &MBB = MF.front();
508     // Initialize M0 to a value that won't cause LDS access to be discarded
509     // due to offset clamping
510     BuildMI(MBB, MBB.getFirstNonPHI(), DebugLoc(), TII->get(AMDGPU::S_MOV_B32),
511             AMDGPU::M0).addImm(0xffffffff);
512   }
513
514   if (NeedWQM && MFI->ShaderType == ShaderType::PIXEL) {
515     MachineBasicBlock &MBB = MF.front();
516     BuildMI(MBB, MBB.getFirstNonPHI(), DebugLoc(), TII->get(AMDGPU::S_WQM_B64),
517             AMDGPU::EXEC).addReg(AMDGPU::EXEC);
518   }
519
520   return true;
521 }