Change TargetInstrInfo::isMoveInstr to return source and destination sub-register...
[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 "AlphaGenInstrInfo.inc"
17 #include "llvm/ADT/STLExtras.h"
18 #include "llvm/ADT/SmallVector.h"
19 #include "llvm/CodeGen/MachineInstrBuilder.h"
20 using namespace llvm;
21
22 AlphaInstrInfo::AlphaInstrInfo()
23   : TargetInstrInfoImpl(AlphaInsts, array_lengthof(AlphaInsts)),
24     RI(*this) { }
25
26
27 bool AlphaInstrInfo::isMoveInstr(const MachineInstr& MI,
28                                  unsigned& sourceReg, unsigned& destReg,
29                                  unsigned& SrcSR, unsigned& DstSR) const {
30   unsigned oc = MI.getOpcode();
31   if (oc == Alpha::BISr   || 
32       oc == Alpha::CPYSS  || 
33       oc == Alpha::CPYST  ||
34       oc == Alpha::CPYSSt || 
35       oc == Alpha::CPYSTs) {
36     // or r1, r2, r2 
37     // cpys(s|t) r1 r2 r2
38     assert(MI.getNumOperands() >= 3 &&
39            MI.getOperand(0).isReg() &&
40            MI.getOperand(1).isReg() &&
41            MI.getOperand(2).isReg() &&
42            "invalid Alpha BIS instruction!");
43     if (MI.getOperand(1).getReg() == MI.getOperand(2).getReg()) {
44       sourceReg = MI.getOperand(1).getReg();
45       destReg = MI.getOperand(0).getReg();
46       SrcSR = DstSR = 0;
47       return true;
48     }
49   }
50   return false;
51 }
52
53 unsigned 
54 AlphaInstrInfo::isLoadFromStackSlot(const MachineInstr *MI,
55                                     int &FrameIndex) const {
56   switch (MI->getOpcode()) {
57   case Alpha::LDL:
58   case Alpha::LDQ:
59   case Alpha::LDBU:
60   case Alpha::LDWU:
61   case Alpha::LDS:
62   case Alpha::LDT:
63     if (MI->getOperand(1).isFI()) {
64       FrameIndex = MI->getOperand(1).getIndex();
65       return MI->getOperand(0).getReg();
66     }
67     break;
68   }
69   return 0;
70 }
71
72 unsigned 
73 AlphaInstrInfo::isStoreToStackSlot(const MachineInstr *MI,
74                                    int &FrameIndex) const {
75   switch (MI->getOpcode()) {
76   case Alpha::STL:
77   case Alpha::STQ:
78   case Alpha::STB:
79   case Alpha::STW:
80   case Alpha::STS:
81   case Alpha::STT:
82     if (MI->getOperand(1).isFI()) {
83       FrameIndex = MI->getOperand(1).getIndex();
84       return MI->getOperand(0).getReg();
85     }
86     break;
87   }
88   return 0;
89 }
90
91 static bool isAlphaIntCondCode(unsigned Opcode) {
92   switch (Opcode) {
93   case Alpha::BEQ: 
94   case Alpha::BNE: 
95   case Alpha::BGE: 
96   case Alpha::BGT: 
97   case Alpha::BLE: 
98   case Alpha::BLT: 
99   case Alpha::BLBC: 
100   case Alpha::BLBS:
101     return true;
102   default:
103     return false;
104   }
105 }
106
107 unsigned AlphaInstrInfo::InsertBranch(MachineBasicBlock &MBB,
108                             MachineBasicBlock *TBB,
109                             MachineBasicBlock *FBB,
110                             const SmallVectorImpl<MachineOperand> &Cond) const {
111   assert(TBB && "InsertBranch must not be told to insert a fallthrough");
112   assert((Cond.size() == 2 || Cond.size() == 0) && 
113          "Alpha branch conditions have two components!");
114
115   // One-way branch.
116   if (FBB == 0) {
117     if (Cond.empty())   // Unconditional branch
118       BuildMI(&MBB, get(Alpha::BR)).addMBB(TBB);
119     else                // Conditional branch
120       if (isAlphaIntCondCode(Cond[0].getImm()))
121         BuildMI(&MBB, get(Alpha::COND_BRANCH_I))
122           .addImm(Cond[0].getImm()).addReg(Cond[1].getReg()).addMBB(TBB);
123       else
124         BuildMI(&MBB, get(Alpha::COND_BRANCH_F))
125           .addImm(Cond[0].getImm()).addReg(Cond[1].getReg()).addMBB(TBB);
126     return 1;
127   }
128   
129   // Two-way Conditional Branch.
130   if (isAlphaIntCondCode(Cond[0].getImm()))
131     BuildMI(&MBB, get(Alpha::COND_BRANCH_I))
132       .addImm(Cond[0].getImm()).addReg(Cond[1].getReg()).addMBB(TBB);
133   else
134     BuildMI(&MBB, get(Alpha::COND_BRANCH_F))
135       .addImm(Cond[0].getImm()).addReg(Cond[1].getReg()).addMBB(TBB);
136   BuildMI(&MBB, get(Alpha::BR)).addMBB(FBB);
137   return 2;
138 }
139
140 bool AlphaInstrInfo::copyRegToReg(MachineBasicBlock &MBB,
141                                      MachineBasicBlock::iterator MI,
142                                      unsigned DestReg, unsigned SrcReg,
143                                      const TargetRegisterClass *DestRC,
144                                      const TargetRegisterClass *SrcRC) const {
145   //cerr << "copyRegToReg " << DestReg << " <- " << SrcReg << "\n";
146   if (DestRC != SrcRC) {
147     // Not yet supported!
148     return false;
149   }
150
151   if (DestRC == Alpha::GPRCRegisterClass) {
152     BuildMI(MBB, MI, get(Alpha::BISr), DestReg).addReg(SrcReg).addReg(SrcReg);
153   } else if (DestRC == Alpha::F4RCRegisterClass) {
154     BuildMI(MBB, MI, get(Alpha::CPYSS), DestReg).addReg(SrcReg).addReg(SrcReg);
155   } else if (DestRC == Alpha::F8RCRegisterClass) {
156     BuildMI(MBB, MI, get(Alpha::CPYST), DestReg).addReg(SrcReg).addReg(SrcReg);
157   } else {
158     // Attempt to copy register that is not GPR or FPR
159     return false;
160   }
161   
162   return true;
163 }
164
165 void
166 AlphaInstrInfo::storeRegToStackSlot(MachineBasicBlock &MBB,
167                                        MachineBasicBlock::iterator MI,
168                                      unsigned SrcReg, bool isKill, int FrameIdx,
169                                      const TargetRegisterClass *RC) const {
170   //cerr << "Trying to store " << getPrettyName(SrcReg) << " to "
171   //     << FrameIdx << "\n";
172   //BuildMI(MBB, MI, Alpha::WTF, 0).addReg(SrcReg);
173   if (RC == Alpha::F4RCRegisterClass)
174     BuildMI(MBB, MI, get(Alpha::STS))
175       .addReg(SrcReg, false, false, isKill)
176       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
177   else if (RC == Alpha::F8RCRegisterClass)
178     BuildMI(MBB, MI, get(Alpha::STT))
179       .addReg(SrcReg, false, false, isKill)
180       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
181   else if (RC == Alpha::GPRCRegisterClass)
182     BuildMI(MBB, MI, get(Alpha::STQ))
183       .addReg(SrcReg, false, false, isKill)
184       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
185   else
186     abort();
187 }
188
189 void AlphaInstrInfo::storeRegToAddr(MachineFunction &MF, unsigned SrcReg,
190                                        bool isKill,
191                                        SmallVectorImpl<MachineOperand> &Addr,
192                                        const TargetRegisterClass *RC,
193                                  SmallVectorImpl<MachineInstr*> &NewMIs) const {
194   unsigned Opc = 0;
195   if (RC == Alpha::F4RCRegisterClass)
196     Opc = Alpha::STS;
197   else if (RC == Alpha::F8RCRegisterClass)
198     Opc = Alpha::STT;
199   else if (RC == Alpha::GPRCRegisterClass)
200     Opc = Alpha::STQ;
201   else
202     abort();
203   MachineInstrBuilder MIB = 
204     BuildMI(MF, get(Opc)).addReg(SrcReg, false, false, isKill);
205   for (unsigned i = 0, e = Addr.size(); i != e; ++i) {
206     MachineOperand &MO = Addr[i];
207     if (MO.isReg())
208       MIB.addReg(MO.getReg(), MO.isDef(), MO.isImplicit());
209     else
210       MIB.addImm(MO.getImm());
211   }
212   NewMIs.push_back(MIB);
213 }
214
215 void
216 AlphaInstrInfo::loadRegFromStackSlot(MachineBasicBlock &MBB,
217                                         MachineBasicBlock::iterator MI,
218                                         unsigned DestReg, int FrameIdx,
219                                         const TargetRegisterClass *RC) const {
220   //cerr << "Trying to load " << getPrettyName(DestReg) << " to "
221   //     << FrameIdx << "\n";
222   if (RC == Alpha::F4RCRegisterClass)
223     BuildMI(MBB, MI, get(Alpha::LDS), DestReg)
224       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
225   else if (RC == Alpha::F8RCRegisterClass)
226     BuildMI(MBB, MI, get(Alpha::LDT), DestReg)
227       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
228   else if (RC == Alpha::GPRCRegisterClass)
229     BuildMI(MBB, MI, get(Alpha::LDQ), DestReg)
230       .addFrameIndex(FrameIdx).addReg(Alpha::F31);
231   else
232     abort();
233 }
234
235 void AlphaInstrInfo::loadRegFromAddr(MachineFunction &MF, unsigned DestReg,
236                                         SmallVectorImpl<MachineOperand> &Addr,
237                                         const TargetRegisterClass *RC,
238                                  SmallVectorImpl<MachineInstr*> &NewMIs) const {
239   unsigned Opc = 0;
240   if (RC == Alpha::F4RCRegisterClass)
241     Opc = Alpha::LDS;
242   else if (RC == Alpha::F8RCRegisterClass)
243     Opc = Alpha::LDT;
244   else if (RC == Alpha::GPRCRegisterClass)
245     Opc = Alpha::LDQ;
246   else
247     abort();
248   MachineInstrBuilder MIB = 
249     BuildMI(MF, get(Opc), DestReg);
250   for (unsigned i = 0, e = Addr.size(); i != e; ++i) {
251     MachineOperand &MO = Addr[i];
252     if (MO.isReg())
253       MIB.addReg(MO.getReg(), MO.isDef(), MO.isImplicit());
254     else
255       MIB.addImm(MO.getImm());
256   }
257   NewMIs.push_back(MIB);
258 }
259
260 MachineInstr *AlphaInstrInfo::foldMemoryOperandImpl(MachineFunction &MF,
261                                                     MachineInstr *MI,
262                                           const SmallVectorImpl<unsigned> &Ops,
263                                                     int FrameIndex) const {
264    if (Ops.size() != 1) return NULL;
265
266    // Make sure this is a reg-reg copy.
267    unsigned Opc = MI->getOpcode();
268
269    MachineInstr *NewMI = NULL;
270    switch(Opc) {
271    default:
272      break;
273    case Alpha::BISr:
274    case Alpha::CPYSS:
275    case Alpha::CPYST:
276      if (MI->getOperand(1).getReg() == MI->getOperand(2).getReg()) {
277        if (Ops[0] == 0) {  // move -> store
278          unsigned InReg = MI->getOperand(1).getReg();
279          bool isKill = MI->getOperand(1).isKill();
280          Opc = (Opc == Alpha::BISr) ? Alpha::STQ : 
281            ((Opc == Alpha::CPYSS) ? Alpha::STS : Alpha::STT);
282          NewMI = BuildMI(MF, get(Opc)).addReg(InReg, false, false, isKill)
283            .addFrameIndex(FrameIndex)
284            .addReg(Alpha::F31);
285        } else {           // load -> move
286          unsigned OutReg = MI->getOperand(0).getReg();
287          bool isDead = MI->getOperand(0).isDead();
288          Opc = (Opc == Alpha::BISr) ? Alpha::LDQ : 
289            ((Opc == Alpha::CPYSS) ? Alpha::LDS : Alpha::LDT);
290          NewMI = BuildMI(MF, get(Opc)).addReg(OutReg, true, false, false, isDead)
291            .addFrameIndex(FrameIndex)
292            .addReg(Alpha::F31);
293        }
294      }
295      break;
296    }
297   return NewMI;
298 }
299
300 static unsigned AlphaRevCondCode(unsigned Opcode) {
301   switch (Opcode) {
302   case Alpha::BEQ: return Alpha::BNE;
303   case Alpha::BNE: return Alpha::BEQ;
304   case Alpha::BGE: return Alpha::BLT;
305   case Alpha::BGT: return Alpha::BLE;
306   case Alpha::BLE: return Alpha::BGT;
307   case Alpha::BLT: return Alpha::BGE;
308   case Alpha::BLBC: return Alpha::BLBS;
309   case Alpha::BLBS: return Alpha::BLBC;
310   case Alpha::FBEQ: return Alpha::FBNE;
311   case Alpha::FBNE: return Alpha::FBEQ;
312   case Alpha::FBGE: return Alpha::FBLT;
313   case Alpha::FBGT: return Alpha::FBLE;
314   case Alpha::FBLE: return Alpha::FBGT;
315   case Alpha::FBLT: return Alpha::FBGE;
316   default:
317     assert(0 && "Unknown opcode");
318   }
319   return 0; // Not reached
320 }
321
322 // Branch analysis.
323 bool AlphaInstrInfo::AnalyzeBranch(MachineBasicBlock &MBB,MachineBasicBlock *&TBB,
324                                  MachineBasicBlock *&FBB,
325                                  SmallVectorImpl<MachineOperand> &Cond) const {
326   // If the block has no terminators, it just falls into the block after it.
327   MachineBasicBlock::iterator I = MBB.end();
328   if (I == MBB.begin() || !isUnpredicatedTerminator(--I))
329     return false;
330
331   // Get the last instruction in the block.
332   MachineInstr *LastInst = I;
333   
334   // If there is only one terminator instruction, process it.
335   if (I == MBB.begin() || !isUnpredicatedTerminator(--I)) {
336     if (LastInst->getOpcode() == Alpha::BR) {
337       TBB = LastInst->getOperand(0).getMBB();
338       return false;
339     } else if (LastInst->getOpcode() == Alpha::COND_BRANCH_I ||
340                LastInst->getOpcode() == Alpha::COND_BRANCH_F) {
341       // Block ends with fall-through condbranch.
342       TBB = LastInst->getOperand(2).getMBB();
343       Cond.push_back(LastInst->getOperand(0));
344       Cond.push_back(LastInst->getOperand(1));
345       return false;
346     }
347     // Otherwise, don't know what this is.
348     return true;
349   }
350   
351   // Get the instruction before it if it's a terminator.
352   MachineInstr *SecondLastInst = I;
353
354   // If there are three terminators, we don't know what sort of block this is.
355   if (SecondLastInst && I != MBB.begin() &&
356       isUnpredicatedTerminator(--I))
357     return true;
358   
359   // If the block ends with Alpha::BR and Alpha::COND_BRANCH_*, handle it.
360   if ((SecondLastInst->getOpcode() == Alpha::COND_BRANCH_I ||
361       SecondLastInst->getOpcode() == Alpha::COND_BRANCH_F) && 
362       LastInst->getOpcode() == Alpha::BR) {
363     TBB =  SecondLastInst->getOperand(2).getMBB();
364     Cond.push_back(SecondLastInst->getOperand(0));
365     Cond.push_back(SecondLastInst->getOperand(1));
366     FBB = LastInst->getOperand(0).getMBB();
367     return false;
368   }
369   
370   // If the block ends with two Alpha::BRs, handle it.  The second one is not
371   // executed, so remove it.
372   if (SecondLastInst->getOpcode() == Alpha::BR && 
373       LastInst->getOpcode() == Alpha::BR) {
374     TBB = SecondLastInst->getOperand(0).getMBB();
375     I = LastInst;
376     I->eraseFromParent();
377     return false;
378   }
379
380   // Otherwise, can't handle this.
381   return true;
382 }
383
384 unsigned AlphaInstrInfo::RemoveBranch(MachineBasicBlock &MBB) const {
385   MachineBasicBlock::iterator I = MBB.end();
386   if (I == MBB.begin()) return 0;
387   --I;
388   if (I->getOpcode() != Alpha::BR && 
389       I->getOpcode() != Alpha::COND_BRANCH_I &&
390       I->getOpcode() != Alpha::COND_BRANCH_F)
391     return 0;
392   
393   // Remove the branch.
394   I->eraseFromParent();
395   
396   I = MBB.end();
397
398   if (I == MBB.begin()) return 1;
399   --I;
400   if (I->getOpcode() != Alpha::COND_BRANCH_I && 
401       I->getOpcode() != Alpha::COND_BRANCH_F)
402     return 1;
403   
404   // Remove the branch.
405   I->eraseFromParent();
406   return 2;
407 }
408
409 void AlphaInstrInfo::insertNoop(MachineBasicBlock &MBB, 
410                                 MachineBasicBlock::iterator MI) const {
411   BuildMI(MBB, MI, get(Alpha::BISr), Alpha::R31).addReg(Alpha::R31)
412     .addReg(Alpha::R31);
413 }
414
415 bool AlphaInstrInfo::BlockHasNoFallThrough(const MachineBasicBlock &MBB) const {
416   if (MBB.empty()) return false;
417   
418   switch (MBB.back().getOpcode()) {
419   case Alpha::RETDAG: // Return.
420   case Alpha::RETDAGp:
421   case Alpha::BR:     // Uncond branch.
422   case Alpha::JMP:  // Indirect branch.
423     return true;
424   default: return false;
425   }
426 }
427 bool AlphaInstrInfo::
428 ReverseBranchCondition(SmallVectorImpl<MachineOperand> &Cond) const {
429   assert(Cond.size() == 2 && "Invalid Alpha branch opcode!");
430   Cond[0].setImm(AlphaRevCondCode(Cond[0].getImm()));
431   return false;
432 }
433