0a29ef02bcb3d053c94e0b5850f0bc89917e260b
[oota-llvm.git] / lib / CodeGen / RegisterScavenging.cpp
1 //===-- RegisterScavenging.cpp - Machine register scavenging --------------===//
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 // This file implements the machine register scavenger. It can provide
11 // information, such as unused registers, at any point in a machine basic block.
12 // It also provides a mechanism to make registers available by evicting them to
13 // spill slots.
14 //
15 //===----------------------------------------------------------------------===//
16
17 #define DEBUG_TYPE "reg-scavenging"
18 #include "llvm/CodeGen/RegisterScavenging.h"
19 #include "llvm/CodeGen/MachineFunction.h"
20 #include "llvm/CodeGen/MachineBasicBlock.h"
21 #include "llvm/CodeGen/MachineInstr.h"
22 #include "llvm/CodeGen/MachineRegisterInfo.h"
23 #include "llvm/Support/ErrorHandling.h"
24 #include "llvm/Target/TargetRegisterInfo.h"
25 #include "llvm/Target/TargetInstrInfo.h"
26 #include "llvm/Target/TargetMachine.h"
27 #include "llvm/ADT/SmallPtrSet.h"
28 #include "llvm/ADT/SmallVector.h"
29 #include "llvm/ADT/STLExtras.h"
30 using namespace llvm;
31
32 /// RedefinesSuperRegPart - Return true if the specified register is redefining
33 /// part of a super-register.
34 static bool RedefinesSuperRegPart(const MachineInstr *MI, unsigned SubReg,
35                                   const TargetRegisterInfo *TRI) {
36   bool SeenSuperUse = false;
37   bool SeenSuperDef = false;
38   for (unsigned i = 0, e = MI->getNumOperands(); i != e; ++i) {
39     const MachineOperand &MO = MI->getOperand(i);
40     if (!MO.isReg() || MO.isUndef())
41       continue;
42     if (TRI->isSuperRegister(SubReg, MO.getReg())) {
43       if (MO.isUse())
44         SeenSuperUse = true;
45       else if (MO.isImplicit())
46         SeenSuperDef = true;
47     }
48   }
49
50   return SeenSuperDef && SeenSuperUse;
51 }
52
53 static bool RedefinesSuperRegPart(const MachineInstr *MI,
54                                   const MachineOperand &MO,
55                                   const TargetRegisterInfo *TRI) {
56   assert(MO.isReg() && MO.isDef() && "Not a register def!");
57   return RedefinesSuperRegPart(MI, MO.getReg(), TRI);
58 }
59
60 bool RegScavenger::isSuperRegUsed(unsigned Reg) const {
61   for (const unsigned *SuperRegs = TRI->getSuperRegisters(Reg);
62        unsigned SuperReg = *SuperRegs; ++SuperRegs)
63     if (isUsed(SuperReg))
64       return true;
65   return false;
66 }
67
68 /// setUsed - Set the register and its sub-registers as being used.
69 void RegScavenger::setUsed(unsigned Reg) {
70   RegsAvailable.reset(Reg);
71
72   for (const unsigned *SubRegs = TRI->getSubRegisters(Reg);
73        unsigned SubReg = *SubRegs; ++SubRegs)
74     RegsAvailable.reset(SubReg);
75 }
76
77 /// setUnused - Set the register and its sub-registers as being unused.
78 void RegScavenger::setUnused(unsigned Reg, const MachineInstr *MI) {
79   RegsAvailable.set(Reg);
80
81   for (const unsigned *SubRegs = TRI->getSubRegisters(Reg);
82        unsigned SubReg = *SubRegs; ++SubRegs)
83     if (!RedefinesSuperRegPart(MI, Reg, TRI))
84       RegsAvailable.set(SubReg);
85 }
86
87 void RegScavenger::enterBasicBlock(MachineBasicBlock *mbb) {
88   MachineFunction &MF = *mbb->getParent();
89   const TargetMachine &TM = MF.getTarget();
90   TII = TM.getInstrInfo();
91   TRI = TM.getRegisterInfo();
92   MRI = &MF.getRegInfo();
93
94   assert((NumPhysRegs == 0 || NumPhysRegs == TRI->getNumRegs()) &&
95          "Target changed?");
96
97   if (!MBB) {
98     NumPhysRegs = TRI->getNumRegs();
99     RegsAvailable.resize(NumPhysRegs);
100
101     // Create reserved registers bitvector.
102     ReservedRegs = TRI->getReservedRegs(MF);
103
104     // Create callee-saved registers bitvector.
105     CalleeSavedRegs.resize(NumPhysRegs);
106     const unsigned *CSRegs = TRI->getCalleeSavedRegs();
107     if (CSRegs != NULL)
108       for (unsigned i = 0; CSRegs[i]; ++i)
109         CalleeSavedRegs.set(CSRegs[i]);
110   }
111
112   MBB = mbb;
113   ScavengedReg = 0;
114   ScavengedRC = NULL;
115   ScavengeRestore = NULL;
116   CurrDist = 0;
117   DistanceMap.clear();
118
119   // All registers started out unused.
120   RegsAvailable.set();
121
122   // Reserved registers are always used.
123   RegsAvailable ^= ReservedRegs;
124
125   // Live-in registers are in use.
126   if (!MBB->livein_empty())
127     for (MachineBasicBlock::const_livein_iterator I = MBB->livein_begin(),
128            E = MBB->livein_end(); I != E; ++I)
129       setUsed(*I);
130
131   Tracking = false;
132 }
133
134 void RegScavenger::restoreScavengedReg() {
135   TII->loadRegFromStackSlot(*MBB, MBBI, ScavengedReg,
136                             ScavengingFrameIndex, ScavengedRC);
137   MachineBasicBlock::iterator II = prior(MBBI);
138   TRI->eliminateFrameIndex(II, 0, this);
139   setUsed(ScavengedReg);
140   ScavengedReg = 0;
141   ScavengedRC = NULL;
142 }
143
144 #ifndef NDEBUG
145 /// isLiveInButUnusedBefore - Return true if register is livein the MBB not
146 /// not used before it reaches the MI that defines register.
147 static bool isLiveInButUnusedBefore(unsigned Reg, MachineInstr *MI,
148                                     MachineBasicBlock *MBB,
149                                     const TargetRegisterInfo *TRI,
150                                     MachineRegisterInfo* MRI) {
151   // First check if register is livein.
152   bool isLiveIn = false;
153   for (MachineBasicBlock::const_livein_iterator I = MBB->livein_begin(),
154          E = MBB->livein_end(); I != E; ++I)
155     if (Reg == *I || TRI->isSuperRegister(Reg, *I)) {
156       isLiveIn = true;
157       break;
158     }
159   if (!isLiveIn)
160     return false;
161
162   // Is there any use of it before the specified MI?
163   SmallPtrSet<MachineInstr*, 4> UsesInMBB;
164   for (MachineRegisterInfo::use_iterator UI = MRI->use_begin(Reg),
165          UE = MRI->use_end(); UI != UE; ++UI) {
166     MachineOperand &UseMO = UI.getOperand();
167     if (UseMO.isReg() && UseMO.isUndef())
168       continue;
169     MachineInstr *UseMI = &*UI;
170     if (UseMI->getParent() == MBB)
171       UsesInMBB.insert(UseMI);
172   }
173   if (UsesInMBB.empty())
174     return true;
175
176   for (MachineBasicBlock::iterator I = MBB->begin(), E = MI; I != E; ++I)
177     if (UsesInMBB.count(&*I))
178       return false;
179   return true;
180 }
181 #endif
182
183 void RegScavenger::forward() {
184   // Move ptr forward.
185   if (!Tracking) {
186     MBBI = MBB->begin();
187     Tracking = true;
188   } else {
189     assert(MBBI != MBB->end() && "Already at the end of the basic block!");
190     MBBI = next(MBBI);
191   }
192
193   MachineInstr *MI = MBBI;
194   DistanceMap.insert(std::make_pair(MI, CurrDist++));
195
196   if (MI == ScavengeRestore) {
197     ScavengedReg = 0;
198     ScavengedRC = NULL;
199     ScavengeRestore = NULL;
200   }
201
202 #if 0
203   if (MI->getOpcode() == TargetInstrInfo::IMPLICIT_DEF)
204     return;
205 #endif
206
207   // Separate register operands into 3 classes: uses, defs, earlyclobbers.
208   SmallVector<std::pair<const MachineOperand*,unsigned>, 4> UseMOs;
209   SmallVector<std::pair<const MachineOperand*,unsigned>, 4> DefMOs;
210   SmallVector<std::pair<const MachineOperand*,unsigned>, 4> EarlyClobberMOs;
211   for (unsigned i = 0, e = MI->getNumOperands(); i != e; ++i) {
212     const MachineOperand &MO = MI->getOperand(i);
213     if (!MO.isReg() || MO.getReg() == 0 || MO.isUndef())
214       continue;
215     if (MO.isUse())
216       UseMOs.push_back(std::make_pair(&MO,i));
217     else if (MO.isEarlyClobber())
218       EarlyClobberMOs.push_back(std::make_pair(&MO,i));
219     else
220       DefMOs.push_back(std::make_pair(&MO,i));
221   }
222
223   // Process uses first.
224   BitVector KillRegs(NumPhysRegs);
225   for (unsigned i = 0, e = UseMOs.size(); i != e; ++i) {
226     const MachineOperand MO = *UseMOs[i].first;
227     unsigned Reg = MO.getReg();
228
229     assert((MO.isImplicit() || isUsed(Reg)) && "Using an undefined register!");
230
231     if (MO.isKill() && !isReserved(Reg)) {
232       KillRegs.set(Reg);
233
234       // Mark sub-registers as used.
235       for (const unsigned *SubRegs = TRI->getSubRegisters(Reg);
236            unsigned SubReg = *SubRegs; ++SubRegs)
237         KillRegs.set(SubReg);
238     }
239   }
240
241   // Change states of all registers after all the uses are processed to guard
242   // against multiple uses.
243   setUnused(KillRegs);
244
245   // Process early clobber defs then process defs. We can have a early clobber
246   // that is dead, it should not conflict with a def that happens one "slot"
247   // (see InstrSlots in LiveIntervalAnalysis.h) later.
248   unsigned NumECs = EarlyClobberMOs.size();
249   unsigned NumDefs = DefMOs.size();
250
251   for (unsigned i = 0, e = NumECs + NumDefs; i != e; ++i) {
252     const MachineOperand &MO = (i < NumECs)
253       ? *EarlyClobberMOs[i].first : *DefMOs[i-NumECs].first;
254     unsigned Idx = (i < NumECs)
255       ? EarlyClobberMOs[i].second : DefMOs[i-NumECs].second;
256     unsigned Reg = MO.getReg();
257     if (MO.isUndef())
258       continue;
259
260     // If it's dead upon def, then it is now free.
261     if (MO.isDead()) {
262       setUnused(Reg, MI);
263       continue;
264     }
265
266     // Skip two-address destination operand.
267     unsigned UseIdx;
268     if (MI->isRegTiedToUseOperand(Idx, &UseIdx) &&
269         !MI->getOperand(UseIdx).isUndef()) {
270       assert(!MI->getOperand(UseIdx).isKill() &&
271              "Using an undefined register!");
272       continue;
273     }
274
275     // Skip if this is merely redefining part of a super-register.
276     if (RedefinesSuperRegPart(MI, MO, TRI))
277       continue;
278
279     // Implicit def is allowed to "re-define" any register. Similarly,
280     // implicitly defined registers can be clobbered.
281     assert((MO.isImplicit() || isReserved(Reg) || isUnused(Reg) ||
282             isSuperRegUsed(Reg) ||
283             isLiveInButUnusedBefore(Reg, MI, MBB, TRI, MRI)) &&
284            "Re-defining a live register!");
285     setUsed(Reg);
286   }
287 }
288
289 void RegScavenger::backward() {
290   assert(Tracking && "Not tracking states!");
291   assert(MBBI != MBB->begin() && "Already at start of basic block!");
292   // Move ptr backward.
293   MBBI = prior(MBBI);
294
295   MachineInstr *MI = MBBI;
296   DistanceMap.erase(MI);
297   --CurrDist;
298
299   // Separate register operands into 3 classes: uses, defs, earlyclobbers.
300   SmallVector<std::pair<const MachineOperand*,unsigned>, 4> UseMOs;
301   SmallVector<std::pair<const MachineOperand*,unsigned>, 4> DefMOs;
302   SmallVector<std::pair<const MachineOperand*,unsigned>, 4> EarlyClobberMOs;
303   for (unsigned i = 0, e = MI->getNumOperands(); i != e; ++i) {
304     const MachineOperand &MO = MI->getOperand(i);
305     if (!MO.isReg() || MO.getReg() == 0 || MO.isUndef())
306       continue;
307     if (MO.isUse())
308       UseMOs.push_back(std::make_pair(&MO,i));
309     else if (MO.isEarlyClobber())
310       EarlyClobberMOs.push_back(std::make_pair(&MO,i));
311     else
312       DefMOs.push_back(std::make_pair(&MO,i));
313   }
314
315
316   // Process defs first.
317   unsigned NumECs = EarlyClobberMOs.size();
318   unsigned NumDefs = DefMOs.size();
319   for (unsigned i = 0, e = NumECs + NumDefs; i != e; ++i) {
320     const MachineOperand &MO = (i < NumDefs)
321       ? *DefMOs[i].first : *EarlyClobberMOs[i-NumDefs].first;
322     unsigned Idx = (i < NumECs)
323       ? DefMOs[i].second : EarlyClobberMOs[i-NumDefs].second;
324     if (MO.isUndef())
325       continue;
326
327     // Skip two-address destination operand.
328     if (MI->isRegTiedToUseOperand(Idx))
329       continue;
330
331     unsigned Reg = MO.getReg();
332     assert(isUsed(Reg));
333     if (!isReserved(Reg))
334       setUnused(Reg, MI);
335   }
336
337   // Process uses.
338   BitVector UseRegs(NumPhysRegs);
339   for (unsigned i = 0, e = UseMOs.size(); i != e; ++i) {
340     const MachineOperand MO = *UseMOs[i].first;
341     unsigned Reg = MO.getReg();
342     assert(isUnused(Reg) || isReserved(Reg));
343     UseRegs.set(Reg);
344
345     // Set the sub-registers as "used".
346     for (const unsigned *SubRegs = TRI->getSubRegisters(Reg);
347          unsigned SubReg = *SubRegs; ++SubRegs)
348       UseRegs.set(SubReg);
349   }
350   setUsed(UseRegs);
351 }
352
353 void RegScavenger::getRegsUsed(BitVector &used, bool includeReserved) {
354   if (includeReserved)
355     used = ~RegsAvailable;
356   else
357     used = ~RegsAvailable & ~ReservedRegs;
358 }
359
360 /// CreateRegClassMask - Set the bits that represent the registers in the
361 /// TargetRegisterClass.
362 static void CreateRegClassMask(const TargetRegisterClass *RC, BitVector &Mask) {
363   for (TargetRegisterClass::iterator I = RC->begin(), E = RC->end(); I != E;
364        ++I)
365     Mask.set(*I);
366 }
367
368 unsigned RegScavenger::FindUnusedReg(const TargetRegisterClass *RegClass,
369                                      const BitVector &Candidates) const {
370   // Mask off the registers which are not in the TargetRegisterClass.
371   BitVector RegsAvailableCopy(NumPhysRegs, false);
372   CreateRegClassMask(RegClass, RegsAvailableCopy);
373   RegsAvailableCopy &= RegsAvailable;
374
375   // Restrict the search to candidates.
376   RegsAvailableCopy &= Candidates;
377
378   // Returns the first unused (bit is set) register, or 0 is none is found.
379   int Reg = RegsAvailableCopy.find_first();
380   return (Reg == -1) ? 0 : Reg;
381 }
382
383 unsigned RegScavenger::FindUnusedReg(const TargetRegisterClass *RegClass,
384                                      bool ExCalleeSaved) const {
385   // Mask off the registers which are not in the TargetRegisterClass.
386   BitVector RegsAvailableCopy(NumPhysRegs, false);
387   CreateRegClassMask(RegClass, RegsAvailableCopy);
388   RegsAvailableCopy &= RegsAvailable;
389
390   // If looking for a non-callee-saved register, mask off all the callee-saved
391   // registers.
392   if (ExCalleeSaved)
393     RegsAvailableCopy &= ~CalleeSavedRegs;
394
395   // Returns the first unused (bit is set) register, or 0 is none is found.
396   int Reg = RegsAvailableCopy.find_first();
397   return (Reg == -1) ? 0 : Reg;
398 }
399
400 /// findFirstUse - Calculate the distance to the first use of the
401 /// specified register.
402 MachineInstr*
403 RegScavenger::findFirstUse(MachineBasicBlock *MBB,
404                            MachineBasicBlock::iterator I, unsigned Reg,
405                            unsigned &Dist) {
406   MachineInstr *UseMI = 0;
407   Dist = ~0U;
408   for (MachineRegisterInfo::reg_iterator RI = MRI->reg_begin(Reg),
409          RE = MRI->reg_end(); RI != RE; ++RI) {
410     MachineInstr *UDMI = &*RI;
411     if (UDMI->getParent() != MBB)
412       continue;
413     DenseMap<MachineInstr*, unsigned>::iterator DI = DistanceMap.find(UDMI);
414     if (DI == DistanceMap.end()) {
415       // If it's not in map, it's below current MI, let's initialize the
416       // map.
417       I = next(I);
418       unsigned Dist = CurrDist + 1;
419       while (I != MBB->end()) {
420         DistanceMap.insert(std::make_pair(I, Dist++));
421         I = next(I);
422       }
423     }
424     DI = DistanceMap.find(UDMI);
425     if (DI->second > CurrDist && DI->second < Dist) {
426       Dist = DI->second;
427       UseMI = UDMI;
428     }
429   }
430   return UseMI;
431 }
432
433 unsigned RegScavenger::scavengeRegister(const TargetRegisterClass *RC,
434                                         MachineBasicBlock::iterator I,
435                                         int SPAdj) {
436   assert(ScavengingFrameIndex >= 0 &&
437          "Cannot scavenge a register without an emergency spill slot!");
438
439   // Mask off the registers which are not in the TargetRegisterClass.
440   BitVector Candidates(NumPhysRegs, false);
441   CreateRegClassMask(RC, Candidates);
442   Candidates ^= ReservedRegs & Candidates; // Do not include reserved registers.
443
444   // Exclude all the registers being used by the instruction.
445   for (unsigned i = 0, e = I->getNumOperands(); i != e; ++i) {
446     MachineOperand &MO = I->getOperand(i);
447     if (MO.isReg())
448       Candidates.reset(MO.getReg());
449   }
450
451   // Find the register whose use is furthest away.
452   unsigned SReg = 0;
453   unsigned MaxDist = 0;
454   MachineInstr *MaxUseMI = 0;
455   int Reg = Candidates.find_first();
456   while (Reg != -1) {
457     unsigned Dist;
458     MachineInstr *UseMI = findFirstUse(MBB, I, Reg, Dist);
459     for (const unsigned *AS = TRI->getAliasSet(Reg); *AS; ++AS) {
460       unsigned AsDist;
461       MachineInstr *AsUseMI = findFirstUse(MBB, I, *AS, AsDist);
462       if (AsDist < Dist) {
463         Dist = AsDist;
464         UseMI = AsUseMI;
465       }
466     }
467     if (Dist >= MaxDist) {
468       MaxDist = Dist;
469       MaxUseMI = UseMI;
470       SReg = Reg;
471     }
472     Reg = Candidates.find_next(Reg);
473   }
474
475   assert(ScavengedReg == 0 &&
476          "Scavenger slot is live, unable to scavenge another register!");
477
478   // Make sure SReg is marked as used. It could be considered available if it is
479   // one of the callee saved registers, but hasn't been spilled.
480   if (!isUsed(SReg)) {
481     MBB->addLiveIn(SReg);
482     setUsed(SReg);
483   }
484
485   // Spill the scavenged register before I.
486   TII->storeRegToStackSlot(*MBB, I, SReg, true, ScavengingFrameIndex, RC);
487   MachineBasicBlock::iterator II = prior(I);
488   TRI->eliminateFrameIndex(II, SPAdj, this);
489
490   // Restore the scavenged register before its use (or first terminator).
491   II = MaxUseMI
492     ? MachineBasicBlock::iterator(MaxUseMI) : MBB->getFirstTerminator();
493   TII->loadRegFromStackSlot(*MBB, II, SReg, ScavengingFrameIndex, RC);
494   ScavengeRestore = prior(II);
495   ScavengedReg = SReg;
496   ScavengedRC = RC;
497
498   return SReg;
499 }