Update XCoreRegisterInfo::eliminateFrameIndex() to handle DBG_VALUE
[oota-llvm.git] / lib / Target / XCore / XCoreRegisterInfo.cpp
1 //===- XCoreRegisterInfo.cpp - XCore Register Information -------*- C++ -*-===//
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 contains the XCore implementation of the MRegisterInfo class.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "XCoreRegisterInfo.h"
15 #include "XCoreMachineFunctionInfo.h"
16 #include "XCore.h"
17 #include "llvm/CodeGen/MachineInstrBuilder.h"
18 #include "llvm/CodeGen/MachineFunction.h"
19 #include "llvm/CodeGen/MachineFrameInfo.h"
20 #include "llvm/CodeGen/MachineLocation.h"
21 #include "llvm/CodeGen/MachineModuleInfo.h"
22 #include "llvm/CodeGen/MachineRegisterInfo.h"
23 #include "llvm/CodeGen/RegisterScavenging.h"
24 #include "llvm/Target/TargetFrameLowering.h"
25 #include "llvm/Target/TargetMachine.h"
26 #include "llvm/Target/TargetOptions.h"
27 #include "llvm/Target/TargetInstrInfo.h"
28 #include "llvm/Type.h"
29 #include "llvm/Function.h"
30 #include "llvm/ADT/BitVector.h"
31 #include "llvm/ADT/STLExtras.h"
32 #include "llvm/Support/Debug.h"
33 #include "llvm/Support/ErrorHandling.h"
34 #include "llvm/Support/raw_ostream.h"
35
36 #define GET_REGINFO_MC_DESC
37 #define GET_REGINFO_TARGET_DESC
38 #include "XCoreGenRegisterInfo.inc"
39
40 using namespace llvm;
41
42 XCoreRegisterInfo::XCoreRegisterInfo(const TargetInstrInfo &tii)
43   : XCoreGenRegisterInfo(), TII(tii) {
44 }
45
46 // helper functions
47 static inline bool isImmUs(unsigned val) {
48   return val <= 11;
49 }
50
51 static inline bool isImmU6(unsigned val) {
52   return val < (1 << 6);
53 }
54
55 static inline bool isImmU16(unsigned val) {
56   return val < (1 << 16);
57 }
58
59 static const unsigned XCore_ArgRegs[] = {
60   XCore::R0, XCore::R1, XCore::R2, XCore::R3
61 };
62
63 const unsigned * XCoreRegisterInfo::getArgRegs(const MachineFunction *MF)
64 {
65   return XCore_ArgRegs;
66 }
67
68 unsigned XCoreRegisterInfo::getNumArgRegs(const MachineFunction *MF)
69 {
70   return array_lengthof(XCore_ArgRegs);
71 }
72
73 bool XCoreRegisterInfo::needsFrameMoves(const MachineFunction &MF) {
74   return MF.getMMI().hasDebugInfo() ||
75     MF.getFunction()->needsUnwindTableEntry();
76 }
77
78 const unsigned* XCoreRegisterInfo::getCalleeSavedRegs(const MachineFunction *MF)
79                                                                          const {
80   static const unsigned CalleeSavedRegs[] = {
81     XCore::R4, XCore::R5, XCore::R6, XCore::R7,
82     XCore::R8, XCore::R9, XCore::R10, XCore::LR,
83     0
84   };
85   return CalleeSavedRegs;
86 }
87
88 BitVector XCoreRegisterInfo::getReservedRegs(const MachineFunction &MF) const {
89   BitVector Reserved(getNumRegs());
90   const TargetFrameLowering *TFI = MF.getTarget().getFrameLowering();
91
92   Reserved.set(XCore::CP);
93   Reserved.set(XCore::DP);
94   Reserved.set(XCore::SP);
95   Reserved.set(XCore::LR);
96   if (TFI->hasFP(MF)) {
97     Reserved.set(XCore::R10);
98   }
99   return Reserved;
100 }
101
102 bool
103 XCoreRegisterInfo::requiresRegisterScavenging(const MachineFunction &MF) const {
104   const TargetFrameLowering *TFI = MF.getTarget().getFrameLowering();
105
106   // TODO can we estimate stack size?
107   return TFI->hasFP(MF);
108 }
109
110 bool
111 XCoreRegisterInfo::useFPForScavengingIndex(const MachineFunction &MF) const {
112   return false;
113 }
114
115 // This function eliminates ADJCALLSTACKDOWN,
116 // ADJCALLSTACKUP pseudo instructions
117 void XCoreRegisterInfo::
118 eliminateCallFramePseudoInstr(MachineFunction &MF, MachineBasicBlock &MBB,
119                               MachineBasicBlock::iterator I) const {
120   const TargetFrameLowering *TFI = MF.getTarget().getFrameLowering();
121
122   if (!TFI->hasReservedCallFrame(MF)) {
123     // Turn the adjcallstackdown instruction into 'extsp <amt>' and the
124     // adjcallstackup instruction into 'ldaw sp, sp[<amt>]'
125     MachineInstr *Old = I;
126     uint64_t Amount = Old->getOperand(0).getImm();
127     if (Amount != 0) {
128       // We need to keep the stack aligned properly.  To do this, we round the
129       // amount of space needed for the outgoing arguments up to the next
130       // alignment boundary.
131       unsigned Align = TFI->getStackAlignment();
132       Amount = (Amount+Align-1)/Align*Align;
133
134       assert(Amount%4 == 0);
135       Amount /= 4;
136
137       bool isU6 = isImmU6(Amount);
138       if (!isU6 && !isImmU16(Amount)) {
139         // FIX could emit multiple instructions in this case.
140 #ifndef NDEBUG
141         errs() << "eliminateCallFramePseudoInstr size too big: "
142                << Amount << "\n";
143 #endif
144         llvm_unreachable(0);
145       }
146
147       MachineInstr *New;
148       if (Old->getOpcode() == XCore::ADJCALLSTACKDOWN) {
149         int Opcode = isU6 ? XCore::EXTSP_u6 : XCore::EXTSP_lu6;
150         New=BuildMI(MF, Old->getDebugLoc(), TII.get(Opcode))
151           .addImm(Amount);
152       } else {
153         assert(Old->getOpcode() == XCore::ADJCALLSTACKUP);
154         int Opcode = isU6 ? XCore::LDAWSP_ru6_RRegs : XCore::LDAWSP_lru6_RRegs;
155         New=BuildMI(MF, Old->getDebugLoc(), TII.get(Opcode), XCore::SP)
156           .addImm(Amount);
157       }
158
159       // Replace the pseudo instruction with a new instruction...
160       MBB.insert(I, New);
161     }
162   }
163   
164   MBB.erase(I);
165 }
166
167 void
168 XCoreRegisterInfo::eliminateFrameIndex(MachineBasicBlock::iterator II,
169                                        int SPAdj, RegScavenger *RS) const {
170   assert(SPAdj == 0 && "Unexpected");
171   MachineInstr &MI = *II;
172   DebugLoc dl = MI.getDebugLoc();
173   unsigned i = 0;
174
175   while (!MI.getOperand(i).isFI()) {
176     ++i;
177     assert(i < MI.getNumOperands() && "Instr doesn't have FrameIndex operand!");
178   }
179
180   MachineOperand &FrameOp = MI.getOperand(i);
181   int FrameIndex = FrameOp.getIndex();
182
183   MachineFunction &MF = *MI.getParent()->getParent();
184   const TargetFrameLowering *TFI = MF.getTarget().getFrameLowering();
185   int Offset = MF.getFrameInfo()->getObjectOffset(FrameIndex);
186   int StackSize = MF.getFrameInfo()->getStackSize();
187
188   #ifndef NDEBUG
189   DEBUG(errs() << "\nFunction         : " 
190         << MF.getFunction()->getName() << "\n");
191   DEBUG(errs() << "<--------->\n");
192   DEBUG(MI.print(errs()));
193   DEBUG(errs() << "FrameIndex         : " << FrameIndex << "\n");
194   DEBUG(errs() << "FrameOffset        : " << Offset << "\n");
195   DEBUG(errs() << "StackSize          : " << StackSize << "\n");
196   #endif
197
198   Offset += StackSize;
199
200   unsigned FrameReg = getFrameRegister(MF);
201
202   // Special handling of DBG_VALUE instructions.
203   if (MI.isDebugValue()) {
204     MI.getOperand(i).ChangeToRegister(FrameReg, false /*isDef*/);
205     MI.getOperand(i+1).ChangeToImmediate(Offset);
206     return;
207   }
208
209   // fold constant into offset.
210   Offset += MI.getOperand(i + 1).getImm();
211   MI.getOperand(i + 1).ChangeToImmediate(0);
212   
213   assert(Offset%4 == 0 && "Misaligned stack offset");
214
215   DEBUG(errs() << "Offset             : " << Offset << "\n" << "<--------->\n");
216   
217   Offset/=4;
218   
219   bool FP = TFI->hasFP(MF);
220
221   unsigned Reg = MI.getOperand(0).getReg();
222   bool isKill = MI.getOpcode() == XCore::STWFI && MI.getOperand(0).isKill();
223
224   assert(XCore::GRRegsRegisterClass->contains(Reg) &&
225          "Unexpected register operand");
226   
227   MachineBasicBlock &MBB = *MI.getParent();
228   
229   if (FP) {
230     bool isUs = isImmUs(Offset);
231     
232     if (!isUs) {
233       if (!RS)
234         report_fatal_error("eliminateFrameIndex Frame size too big: " +
235                            Twine(Offset));
236       unsigned ScratchReg = RS->scavengeRegister(XCore::GRRegsRegisterClass, II,
237                                                  SPAdj);
238       loadConstant(MBB, II, ScratchReg, Offset, dl);
239       switch (MI.getOpcode()) {
240       case XCore::LDWFI:
241         BuildMI(MBB, II, dl, TII.get(XCore::LDW_3r), Reg)
242               .addReg(FrameReg)
243               .addReg(ScratchReg, RegState::Kill);
244         break;
245       case XCore::STWFI:
246         BuildMI(MBB, II, dl, TII.get(XCore::STW_3r))
247               .addReg(Reg, getKillRegState(isKill))
248               .addReg(FrameReg)
249               .addReg(ScratchReg, RegState::Kill);
250         break;
251       case XCore::LDAWFI:
252         BuildMI(MBB, II, dl, TII.get(XCore::LDAWF_l3r), Reg)
253               .addReg(FrameReg)
254               .addReg(ScratchReg, RegState::Kill);
255         break;
256       default:
257         llvm_unreachable("Unexpected Opcode");
258       }
259     } else {
260       switch (MI.getOpcode()) {
261       case XCore::LDWFI:
262         BuildMI(MBB, II, dl, TII.get(XCore::LDW_2rus), Reg)
263               .addReg(FrameReg)
264               .addImm(Offset);
265         break;
266       case XCore::STWFI:
267         BuildMI(MBB, II, dl, TII.get(XCore::STW_2rus))
268               .addReg(Reg, getKillRegState(isKill))
269               .addReg(FrameReg)
270               .addImm(Offset);
271         break;
272       case XCore::LDAWFI:
273         BuildMI(MBB, II, dl, TII.get(XCore::LDAWF_l2rus), Reg)
274               .addReg(FrameReg)
275               .addImm(Offset);
276         break;
277       default:
278         llvm_unreachable("Unexpected Opcode");
279       }
280     }
281   } else {
282     bool isU6 = isImmU6(Offset);
283     if (!isU6 && !isImmU16(Offset))
284       report_fatal_error("eliminateFrameIndex Frame size too big: " +
285                          Twine(Offset));
286
287     switch (MI.getOpcode()) {
288     int NewOpcode;
289     case XCore::LDWFI:
290       NewOpcode = (isU6) ? XCore::LDWSP_ru6 : XCore::LDWSP_lru6;
291       BuildMI(MBB, II, dl, TII.get(NewOpcode), Reg)
292             .addImm(Offset);
293       break;
294     case XCore::STWFI:
295       NewOpcode = (isU6) ? XCore::STWSP_ru6 : XCore::STWSP_lru6;
296       BuildMI(MBB, II, dl, TII.get(NewOpcode))
297             .addReg(Reg, getKillRegState(isKill))
298             .addImm(Offset);
299       break;
300     case XCore::LDAWFI:
301       NewOpcode = (isU6) ? XCore::LDAWSP_ru6 : XCore::LDAWSP_lru6;
302       BuildMI(MBB, II, dl, TII.get(NewOpcode), Reg)
303             .addImm(Offset);
304       break;
305     default:
306       llvm_unreachable("Unexpected Opcode");
307     }
308   }
309   // Erase old instruction.
310   MBB.erase(II);
311 }
312
313 void XCoreRegisterInfo::
314 loadConstant(MachineBasicBlock &MBB, MachineBasicBlock::iterator I,
315             unsigned DstReg, int64_t Value, DebugLoc dl) const {
316   // TODO use mkmsk if possible.
317   if (!isImmU16(Value)) {
318     // TODO use constant pool.
319     report_fatal_error("loadConstant value too big " + Twine(Value));
320   }
321   int Opcode = isImmU6(Value) ? XCore::LDC_ru6 : XCore::LDC_lru6;
322   BuildMI(MBB, I, dl, TII.get(Opcode), DstReg).addImm(Value);
323 }
324
325 int XCoreRegisterInfo::getDwarfRegNum(unsigned RegNum, bool isEH) const {
326   return XCoreGenRegisterInfo::getDwarfRegNumFull(RegNum, 0);
327 }
328
329 int XCoreRegisterInfo::getLLVMRegNum(unsigned DwarfRegNo, bool isEH) const {
330   return XCoreGenRegisterInfo::getLLVMRegNumFull(DwarfRegNo,0);
331 }
332
333 unsigned XCoreRegisterInfo::getFrameRegister(const MachineFunction &MF) const {
334   const TargetFrameLowering *TFI = MF.getTarget().getFrameLowering();
335
336   return TFI->hasFP(MF) ? XCore::R10 : XCore::SP;
337 }
338
339 unsigned XCoreRegisterInfo::getRARegister() const {
340   return XCore::LR;
341 }