fix the encoding of the "jump on *cx" family of instructions,
[oota-llvm.git] / lib / Target / Alpha / AlphaInstrInfo.cpp
1 //===- AlphaInstrInfo.cpp - Alpha Instruction 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 Alpha implementation of the TargetInstrInfo class.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #include "Alpha.h"
15 #include "AlphaInstrInfo.h"
16 #include "AlphaMachineFunctionInfo.h"
17 #include "AlphaGenInstrInfo.inc"
18 #include "llvm/CodeGen/MachineRegisterInfo.h"
19 #include "llvm/ADT/STLExtras.h"
20 #include "llvm/ADT/SmallVector.h"
21 #include "llvm/CodeGen/MachineInstrBuilder.h"
22 #include "llvm/Support/ErrorHandling.h"
23 using namespace llvm;
24
25 AlphaInstrInfo::AlphaInstrInfo()
26   : TargetInstrInfoImpl(AlphaInsts, array_lengthof(AlphaInsts)),
27     RI(*this) { }
28
29
30 unsigned 
31 AlphaInstrInfo::isLoadFromStackSlot(const MachineInstr *MI,
32                                     int &FrameIndex) const {
33   switch (MI->getOpcode()) {
34   case Alpha::LDL:
35   case Alpha::LDQ:
36   case Alpha::LDBU:
37   case Alpha::LDWU:
38   case Alpha::LDS:
39   case Alpha::LDT:
40     if (MI->getOperand(1).isFI()) {
41       FrameIndex = MI->getOperand(1).getIndex();
42       return MI->getOperand(0).getReg();
43     }
44     break;
45   }
46   return 0;
47 }
48
49 unsigned 
50 AlphaInstrInfo::isStoreToStackSlot(const MachineInstr *MI,
51                                    int &FrameIndex) const {
52   switch (MI->getOpcode()) {
53   case Alpha::STL:
54   case Alpha::STQ:
55   case Alpha::STB:
56   case Alpha::STW:
57   case Alpha::STS:
58   case Alpha::STT:
59     if (MI->getOperand(1).isFI()) {
60       FrameIndex = MI->getOperand(1).getIndex();
61       return MI->getOperand(0).getReg();
62     }
63     break;
64   }
65   return 0;
66 }
67
68 static bool isAlphaIntCondCode(unsigned Opcode) {
69   switch (Opcode) {
70   case Alpha::BEQ: 
71   case Alpha::BNE: 
72   case Alpha::BGE: 
73   case Alpha::BGT: 
74   case Alpha::BLE: 
75   case Alpha::BLT: 
76   case Alpha::BLBC: 
77   case Alpha::BLBS:
78     return true;
79   default:
80     return false;
81   }
82 }
83
84 unsigned AlphaInstrInfo::InsertBranch(MachineBasicBlock &MBB,
85                                       MachineBasicBlock *TBB,
86                                       MachineBasicBlock *FBB,
87                                       const SmallVectorImpl<MachineOperand> &Cond,
88                                       DebugLoc DL) const {
89   assert(TBB && "InsertBranch must not be told to insert a fallthrough");
90   assert((Cond.size() == 2 || Cond.size() == 0) && 
91          "Alpha branch conditions have two components!");
92
93   // One-way branch.
94   if (FBB == 0) {
95     if (Cond.empty())   // Unconditional branch
96       BuildMI(&MBB, DL, get(Alpha::BR)).addMBB(TBB);
97     else                // Conditional branch
98       if (isAlphaIntCondCode(Cond[0].getImm()))
99         BuildMI(&MBB, DL, get(Alpha::COND_BRANCH_I))
100           .addImm(Cond[0].getImm()).addReg(Cond[1].getReg()).addMBB(TBB);
101       else
102         BuildMI(&MBB, DL, get(Alpha::COND_BRANCH_F))
103           .addImm(Cond[0].getImm()).addReg(Cond[1].getReg()).addMBB(TBB);
104     return 1;
105   }
106   
107   // Two-way Conditional Branch.
108   if (isAlphaIntCondCode(Cond[0].getImm()))
109     BuildMI(&MBB, DL, get(Alpha::COND_BRANCH_I))
110       .addImm(Cond[0].getImm()).addReg(Cond[1].getReg()).addMBB(TBB);
111   else
112     BuildMI(&MBB, DL, get(Alpha::COND_BRANCH_F))
113       .addImm(Cond[0].getImm()).addReg(Cond[1].getReg()).addMBB(TBB);
114   BuildMI(&MBB, DL, get(Alpha::BR)).addMBB(FBB);
115   return 2;
116 }
117
118 void AlphaInstrInfo::copyPhysReg(MachineBasicBlock &MBB,
119                                  MachineBasicBlock::iterator MI, DebugLoc DL,
120                                  unsigned DestReg, unsigned SrcReg,
121                                  bool KillSrc) const {
122   if (Alpha::GPRCRegClass.contains(DestReg, SrcReg)) {
123     BuildMI(MBB, MI, DL, get(Alpha::BISr), DestReg)
124       .addReg(SrcReg)
125       .addReg(SrcReg, getKillRegState(KillSrc));
126   } else if (Alpha::F4RCRegClass.contains(DestReg, SrcReg)) {
127     BuildMI(MBB, MI, DL, get(Alpha::CPYSS), DestReg)
128       .addReg(SrcReg)
129       .addReg(SrcReg, getKillRegState(KillSrc));
130   } else if (Alpha::F8RCRegClass.contains(DestReg, SrcReg)) {
131     BuildMI(MBB, MI, DL, get(Alpha::CPYST), DestReg)
132       .addReg(SrcReg)
133       .addReg(SrcReg, getKillRegState(KillSrc));
134   } else {
135     llvm_unreachable("Attempt to copy register that is not GPR or FPR");
136   }
137 }
138
139 void
140 AlphaInstrInfo::storeRegToStackSlot(MachineBasicBlock &MBB,
141                                     MachineBasicBlock::iterator MI,
142                                     unsigned SrcReg, bool isKill, int FrameIdx,
143                                     const TargetRegisterClass *RC,
144                                     const TargetRegisterInfo *TRI) const {
145   //cerr << "Trying to store " << getPrettyName(SrcReg) << " to "
146   //     << FrameIdx << "\n";
147   //BuildMI(MBB, MI, Alpha::WTF, 0).addReg(SrcReg);
148
149   DebugLoc DL;
150   if (MI != MBB.end()) DL = MI->getDebugLoc();
151
152   if (RC == Alpha::F4RCRegisterClass)
153     BuildMI(MBB, MI, DL, get(Alpha::STS))
154       .addReg(SrcReg, getKillRegState(isKill))
155       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
156   else if (RC == Alpha::F8RCRegisterClass)
157     BuildMI(MBB, MI, DL, get(Alpha::STT))
158       .addReg(SrcReg, getKillRegState(isKill))
159       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
160   else if (RC == Alpha::GPRCRegisterClass)
161     BuildMI(MBB, MI, DL, get(Alpha::STQ))
162       .addReg(SrcReg, getKillRegState(isKill))
163       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
164   else
165     llvm_unreachable("Unhandled register class");
166 }
167
168 void
169 AlphaInstrInfo::loadRegFromStackSlot(MachineBasicBlock &MBB,
170                                         MachineBasicBlock::iterator MI,
171                                         unsigned DestReg, int FrameIdx,
172                                      const TargetRegisterClass *RC,
173                                      const TargetRegisterInfo *TRI) const {
174   //cerr << "Trying to load " << getPrettyName(DestReg) << " to "
175   //     << FrameIdx << "\n";
176   DebugLoc DL;
177   if (MI != MBB.end()) DL = MI->getDebugLoc();
178
179   if (RC == Alpha::F4RCRegisterClass)
180     BuildMI(MBB, MI, DL, get(Alpha::LDS), DestReg)
181       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
182   else if (RC == Alpha::F8RCRegisterClass)
183     BuildMI(MBB, MI, DL, get(Alpha::LDT), DestReg)
184       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
185   else if (RC == Alpha::GPRCRegisterClass)
186     BuildMI(MBB, MI, DL, get(Alpha::LDQ), DestReg)
187       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
188   else
189     llvm_unreachable("Unhandled register class");
190 }
191
192 static unsigned AlphaRevCondCode(unsigned Opcode) {
193   switch (Opcode) {
194   case Alpha::BEQ: return Alpha::BNE;
195   case Alpha::BNE: return Alpha::BEQ;
196   case Alpha::BGE: return Alpha::BLT;
197   case Alpha::BGT: return Alpha::BLE;
198   case Alpha::BLE: return Alpha::BGT;
199   case Alpha::BLT: return Alpha::BGE;
200   case Alpha::BLBC: return Alpha::BLBS;
201   case Alpha::BLBS: return Alpha::BLBC;
202   case Alpha::FBEQ: return Alpha::FBNE;
203   case Alpha::FBNE: return Alpha::FBEQ;
204   case Alpha::FBGE: return Alpha::FBLT;
205   case Alpha::FBGT: return Alpha::FBLE;
206   case Alpha::FBLE: return Alpha::FBGT;
207   case Alpha::FBLT: return Alpha::FBGE;
208   default:
209     llvm_unreachable("Unknown opcode");
210   }
211   return 0; // Not reached
212 }
213
214 // Branch analysis.
215 bool AlphaInstrInfo::AnalyzeBranch(MachineBasicBlock &MBB,MachineBasicBlock *&TBB,
216                                    MachineBasicBlock *&FBB,
217                                    SmallVectorImpl<MachineOperand> &Cond,
218                                    bool AllowModify) const {
219   // If the block has no terminators, it just falls into the block after it.
220   MachineBasicBlock::iterator I = MBB.end();
221   if (I == MBB.begin())
222     return false;
223   --I;
224   while (I->isDebugValue()) {
225     if (I == MBB.begin())
226       return false;
227     --I;
228   }
229   if (!isUnpredicatedTerminator(I))
230     return false;
231
232   // Get the last instruction in the block.
233   MachineInstr *LastInst = I;
234   
235   // If there is only one terminator instruction, process it.
236   if (I == MBB.begin() || !isUnpredicatedTerminator(--I)) {
237     if (LastInst->getOpcode() == Alpha::BR) {
238       TBB = LastInst->getOperand(0).getMBB();
239       return false;
240     } else if (LastInst->getOpcode() == Alpha::COND_BRANCH_I ||
241                LastInst->getOpcode() == Alpha::COND_BRANCH_F) {
242       // Block ends with fall-through condbranch.
243       TBB = LastInst->getOperand(2).getMBB();
244       Cond.push_back(LastInst->getOperand(0));
245       Cond.push_back(LastInst->getOperand(1));
246       return false;
247     }
248     // Otherwise, don't know what this is.
249     return true;
250   }
251   
252   // Get the instruction before it if it's a terminator.
253   MachineInstr *SecondLastInst = I;
254
255   // If there are three terminators, we don't know what sort of block this is.
256   if (SecondLastInst && I != MBB.begin() &&
257       isUnpredicatedTerminator(--I))
258     return true;
259   
260   // If the block ends with Alpha::BR and Alpha::COND_BRANCH_*, handle it.
261   if ((SecondLastInst->getOpcode() == Alpha::COND_BRANCH_I ||
262       SecondLastInst->getOpcode() == Alpha::COND_BRANCH_F) && 
263       LastInst->getOpcode() == Alpha::BR) {
264     TBB =  SecondLastInst->getOperand(2).getMBB();
265     Cond.push_back(SecondLastInst->getOperand(0));
266     Cond.push_back(SecondLastInst->getOperand(1));
267     FBB = LastInst->getOperand(0).getMBB();
268     return false;
269   }
270   
271   // If the block ends with two Alpha::BRs, handle it.  The second one is not
272   // executed, so remove it.
273   if (SecondLastInst->getOpcode() == Alpha::BR && 
274       LastInst->getOpcode() == Alpha::BR) {
275     TBB = SecondLastInst->getOperand(0).getMBB();
276     I = LastInst;
277     if (AllowModify)
278       I->eraseFromParent();
279     return false;
280   }
281
282   // Otherwise, can't handle this.
283   return true;
284 }
285
286 unsigned AlphaInstrInfo::RemoveBranch(MachineBasicBlock &MBB) const {
287   MachineBasicBlock::iterator I = MBB.end();
288   if (I == MBB.begin()) return 0;
289   --I;
290   while (I->isDebugValue()) {
291     if (I == MBB.begin())
292       return 0;
293     --I;
294   }
295   if (I->getOpcode() != Alpha::BR && 
296       I->getOpcode() != Alpha::COND_BRANCH_I &&
297       I->getOpcode() != Alpha::COND_BRANCH_F)
298     return 0;
299   
300   // Remove the branch.
301   I->eraseFromParent();
302   
303   I = MBB.end();
304
305   if (I == MBB.begin()) return 1;
306   --I;
307   if (I->getOpcode() != Alpha::COND_BRANCH_I && 
308       I->getOpcode() != Alpha::COND_BRANCH_F)
309     return 1;
310   
311   // Remove the branch.
312   I->eraseFromParent();
313   return 2;
314 }
315
316 void AlphaInstrInfo::insertNoop(MachineBasicBlock &MBB, 
317                                 MachineBasicBlock::iterator MI) const {
318   DebugLoc DL;
319   BuildMI(MBB, MI, DL, get(Alpha::BISr), Alpha::R31)
320     .addReg(Alpha::R31)
321     .addReg(Alpha::R31);
322 }
323
324 bool AlphaInstrInfo::
325 ReverseBranchCondition(SmallVectorImpl<MachineOperand> &Cond) const {
326   assert(Cond.size() == 2 && "Invalid Alpha branch opcode!");
327   Cond[0].setImm(AlphaRevCondCode(Cond[0].getImm()));
328   return false;
329 }
330
331 /// getGlobalBaseReg - Return a virtual register initialized with the
332 /// the global base register value. Output instructions required to
333 /// initialize the register in the function entry block, if necessary.
334 ///
335 unsigned AlphaInstrInfo::getGlobalBaseReg(MachineFunction *MF) const {
336   AlphaMachineFunctionInfo *AlphaFI = MF->getInfo<AlphaMachineFunctionInfo>();
337   unsigned GlobalBaseReg = AlphaFI->getGlobalBaseReg();
338   if (GlobalBaseReg != 0)
339     return GlobalBaseReg;
340
341   // Insert the set of GlobalBaseReg into the first MBB of the function
342   MachineBasicBlock &FirstMBB = MF->front();
343   MachineBasicBlock::iterator MBBI = FirstMBB.begin();
344   MachineRegisterInfo &RegInfo = MF->getRegInfo();
345   const TargetInstrInfo *TII = MF->getTarget().getInstrInfo();
346
347   GlobalBaseReg = RegInfo.createVirtualRegister(&Alpha::GPRCRegClass);
348   BuildMI(FirstMBB, MBBI, DebugLoc(), TII->get(TargetOpcode::COPY),
349           GlobalBaseReg).addReg(Alpha::R29);
350   RegInfo.addLiveIn(Alpha::R29);
351
352   AlphaFI->setGlobalBaseReg(GlobalBaseReg);
353   return GlobalBaseReg;
354 }
355
356 /// getGlobalRetAddr - Return a virtual register initialized with the
357 /// the global base register value. Output instructions required to
358 /// initialize the register in the function entry block, if necessary.
359 ///
360 unsigned AlphaInstrInfo::getGlobalRetAddr(MachineFunction *MF) const {
361   AlphaMachineFunctionInfo *AlphaFI = MF->getInfo<AlphaMachineFunctionInfo>();
362   unsigned GlobalRetAddr = AlphaFI->getGlobalRetAddr();
363   if (GlobalRetAddr != 0)
364     return GlobalRetAddr;
365
366   // Insert the set of GlobalRetAddr into the first MBB of the function
367   MachineBasicBlock &FirstMBB = MF->front();
368   MachineBasicBlock::iterator MBBI = FirstMBB.begin();
369   MachineRegisterInfo &RegInfo = MF->getRegInfo();
370   const TargetInstrInfo *TII = MF->getTarget().getInstrInfo();
371
372   GlobalRetAddr = RegInfo.createVirtualRegister(&Alpha::GPRCRegClass);
373   BuildMI(FirstMBB, MBBI, DebugLoc(), TII->get(TargetOpcode::COPY),
374           GlobalRetAddr).addReg(Alpha::R26);
375   RegInfo.addLiveIn(Alpha::R26);
376
377   AlphaFI->setGlobalRetAddr(GlobalRetAddr);
378   return GlobalRetAddr;
379 }