lib/Target/Sparc/SparcInstrInfo.cpp

   1 //===- SparcInstrInfo.cpp - Sparc 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 Sparc implementation of the TargetInstrInfo class.
  11 //
  12 //===----------------------------------------------------------------------===//
  13
  14 #include "SparcInstrInfo.h"
  15 #include "SparcSubtarget.h"
  16 #include "Sparc.h"
  17 #include "llvm/ADT/STLExtras.h"
  18 #include "llvm/ADT/SmallVector.h"
  19 #include "llvm/CodeGen/MachineInstrBuilder.h"
  20 #include "llvm/CodeGen/MachineRegisterInfo.h"
  21 #include "llvm/Support/ErrorHandling.h"
  22 #include "SparcGenInstrInfo.inc"
  23 #include "SparcMachineFunctionInfo.h"
  24 using namespace llvm;
  25
  26 SparcInstrInfo::SparcInstrInfo(SparcSubtarget &ST)
  27   : TargetInstrInfoImpl(SparcInsts, array_lengthof(SparcInsts)),
  28     RI(ST, *this), Subtarget(ST) {
  29 }
  30
  31 static bool isZeroImm(const MachineOperand &op) {
  32   return op.isImm() && op.getImm() == 0;
  33 }
  34
  35 /// Return true if the instruction is a register to register move and
  36 /// leave the source and dest operands in the passed parameters.
  37 ///
  38 bool SparcInstrInfo::isMoveInstr(const MachineInstr &MI,
  39                                  unsigned &SrcReg, unsigned &DstReg,
  40                                  unsigned &SrcSR, unsigned &DstSR) const {
  41   SrcSR = DstSR = 0; // No sub-registers.
  42
  43   // We look for 3 kinds of patterns here:
  44   // or with G0 or 0
  45   // add with G0 or 0
  46   // fmovs or FpMOVD (pseudo double move).
  47   if (MI.getOpcode() == SP::ORrr || MI.getOpcode() == SP::ADDrr) {
  48     if (MI.getOperand(1).getReg() == SP::G0) {
  49       DstReg = MI.getOperand(0).getReg();
  50       SrcReg = MI.getOperand(2).getReg();
  51       return true;
  52     } else if (MI.getOperand(2).getReg() == SP::G0) {
  53       DstReg = MI.getOperand(0).getReg();
  54       SrcReg = MI.getOperand(1).getReg();
  55       return true;
  56     }
  57   } else if ((MI.getOpcode() == SP::ORri || MI.getOpcode() == SP::ADDri) &&
  58              isZeroImm(MI.getOperand(2)) && MI.getOperand(1).isReg()) {
  59     DstReg = MI.getOperand(0).getReg();
  60     SrcReg = MI.getOperand(1).getReg();
  61     return true;
  62   } else if (MI.getOpcode() == SP::FMOVS || MI.getOpcode() == SP::FpMOVD ||
  63              MI.getOpcode() == SP::FMOVD) {
  64     SrcReg = MI.getOperand(1).getReg();
  65     DstReg = MI.getOperand(0).getReg();
  66     return true;
  67   }
  68   return false;
  69 }
  70
  71 /// isLoadFromStackSlot - If the specified machine instruction is a direct
  72 /// load from a stack slot, return the virtual or physical register number of
  73 /// the destination along with the FrameIndex of the loaded stack slot.  If
  74 /// not, return 0.  This predicate must return 0 if the instruction has
  75 /// any side effects other than loading from the stack slot.
  76 unsigned SparcInstrInfo::isLoadFromStackSlot(const MachineInstr *MI,
  77                                              int &FrameIndex) const {
  78   if (MI->getOpcode() == SP::LDri ||
  79       MI->getOpcode() == SP::LDFri ||
  80       MI->getOpcode() == SP::LDDFri) {
  81     if (MI->getOperand(1).isFI() && MI->getOperand(2).isImm() &&
  82         MI->getOperand(2).getImm() == 0) {
  83       FrameIndex = MI->getOperand(1).getIndex();
  84       return MI->getOperand(0).getReg();
  85     }
  86   }
  87   return 0;
  88 }
  89
  90 /// isStoreToStackSlot - If the specified machine instruction is a direct
  91 /// store to a stack slot, return the virtual or physical register number of
  92 /// the source reg along with the FrameIndex of the loaded stack slot.  If
  93 /// not, return 0.  This predicate must return 0 if the instruction has
  94 /// any side effects other than storing to the stack slot.
  95 unsigned SparcInstrInfo::isStoreToStackSlot(const MachineInstr *MI,
  96                                             int &FrameIndex) const {
  97   if (MI->getOpcode() == SP::STri ||
  98       MI->getOpcode() == SP::STFri ||
  99       MI->getOpcode() == SP::STDFri) {
 100     if (MI->getOperand(0).isFI() && MI->getOperand(1).isImm() &&
 101         MI->getOperand(1).getImm() == 0) {
 102       FrameIndex = MI->getOperand(0).getIndex();
 103       return MI->getOperand(2).getReg();
 104     }
 105   }
 106   return 0;
 107 }
 108
 109 unsigned
 110 SparcInstrInfo::InsertBranch(MachineBasicBlock &MBB,MachineBasicBlock *TBB,
 111                              MachineBasicBlock *FBB,
 112                              const SmallVectorImpl<MachineOperand> &Cond)const{
 113   // FIXME this should probably take a DebugLoc argument
 114   DebugLoc dl;
 115   // Can only insert uncond branches so far.
 116   assert(Cond.empty() && !FBB && TBB && "Can only handle uncond branches!");
 117   BuildMI(&MBB, dl, get(SP::BA)).addMBB(TBB);
 118   return 1;
 119 }
 120
 121 bool SparcInstrInfo::copyRegToReg(MachineBasicBlock &MBB,
 122                                   MachineBasicBlock::iterator I,
 123                                   unsigned DestReg, unsigned SrcReg,
 124                                   const TargetRegisterClass *DestRC,
 125                                   const TargetRegisterClass *SrcRC) const {
 126   if (DestRC != SrcRC) {
 127     // Not yet supported!
 128     return false;
 129   }
 130
 131   DebugLoc DL;
 132   if (I != MBB.end()) DL = I->getDebugLoc();
 133
 134   if (DestRC == SP::IntRegsRegisterClass)
 135     BuildMI(MBB, I, DL, get(SP::ORrr), DestReg).addReg(SP::G0).addReg(SrcReg);
 136   else if (DestRC == SP::FPRegsRegisterClass)
 137     BuildMI(MBB, I, DL, get(SP::FMOVS), DestReg).addReg(SrcReg);
 138   else if (DestRC == SP::DFPRegsRegisterClass)
 139     BuildMI(MBB, I, DL, get(Subtarget.isV9() ? SP::FMOVD : SP::FpMOVD),DestReg)
 140       .addReg(SrcReg);
 141   else
 142     // Can't copy this register
 143     return false;
 144
 145   return true;
 146 }
 147
 148 void SparcInstrInfo::
 149 storeRegToStackSlot(MachineBasicBlock &MBB, MachineBasicBlock::iterator I,
 150                     unsigned SrcReg, bool isKill, int FI,
 151                     const TargetRegisterClass *RC,
 152                     const TargetRegisterInfo *TRI) const {
 153   DebugLoc DL;
 154   if (I != MBB.end()) DL = I->getDebugLoc();
 155
 156   // On the order of operands here: think "[FrameIdx + 0] = SrcReg".
 157   if (RC == SP::IntRegsRegisterClass)
 158     BuildMI(MBB, I, DL, get(SP::STri)).addFrameIndex(FI).addImm(0)
 159       .addReg(SrcReg, getKillRegState(isKill));
 160   else if (RC == SP::FPRegsRegisterClass)
 161     BuildMI(MBB, I, DL, get(SP::STFri)).addFrameIndex(FI).addImm(0)
 162       .addReg(SrcReg,  getKillRegState(isKill));
 163   else if (RC == SP::DFPRegsRegisterClass)
 164     BuildMI(MBB, I, DL, get(SP::STDFri)).addFrameIndex(FI).addImm(0)
 165       .addReg(SrcReg,  getKillRegState(isKill));
 166   else
 167     llvm_unreachable("Can't store this register to stack slot");
 168 }
 169
 170 void SparcInstrInfo::
 171 loadRegFromStackSlot(MachineBasicBlock &MBB, MachineBasicBlock::iterator I,
 172                      unsigned DestReg, int FI,
 173                      const TargetRegisterClass *RC,
 174                      const TargetRegisterInfo *TRI) const {
 175   DebugLoc DL;
 176   if (I != MBB.end()) DL = I->getDebugLoc();
 177
 178   if (RC == SP::IntRegsRegisterClass)
 179     BuildMI(MBB, I, DL, get(SP::LDri), DestReg).addFrameIndex(FI).addImm(0);
 180   else if (RC == SP::FPRegsRegisterClass)
 181     BuildMI(MBB, I, DL, get(SP::LDFri), DestReg).addFrameIndex(FI).addImm(0);
 182   else if (RC == SP::DFPRegsRegisterClass)
 183     BuildMI(MBB, I, DL, get(SP::LDDFri), DestReg).addFrameIndex(FI).addImm(0);
 184   else
 185     llvm_unreachable("Can't load this register from stack slot");
 186 }
 187
 188 MachineInstr *SparcInstrInfo::foldMemoryOperandImpl(MachineFunction &MF,
 189                                                     MachineInstr* MI,
 190                                           const SmallVectorImpl<unsigned> &Ops,
 191                                                     int FI) const {
 192   if (Ops.size() != 1) return NULL;
 193
 194   unsigned OpNum = Ops[0];
 195   bool isFloat = false;
 196   MachineInstr *NewMI = NULL;
 197   switch (MI->getOpcode()) {
 198   case SP::ORrr:
 199     if (MI->getOperand(1).isReg() && MI->getOperand(1).getReg() == SP::G0&&
 200         MI->getOperand(0).isReg() && MI->getOperand(2).isReg()) {
 201       if (OpNum == 0)    // COPY -> STORE
 202         NewMI = BuildMI(MF, MI->getDebugLoc(), get(SP::STri))
 203           .addFrameIndex(FI)
 204           .addImm(0)
 205           .addReg(MI->getOperand(2).getReg());
 206       else               // COPY -> LOAD
 207         NewMI = BuildMI(MF, MI->getDebugLoc(), get(SP::LDri),
 208                         MI->getOperand(0).getReg())
 209           .addFrameIndex(FI)
 210           .addImm(0);
 211     }
 212     break;
 213   case SP::FMOVS:
 214     isFloat = true;
 215     // FALLTHROUGH
 216   case SP::FMOVD:
 217     if (OpNum == 0) { // COPY -> STORE
 218       unsigned SrcReg = MI->getOperand(1).getReg();
 219       bool isKill = MI->getOperand(1).isKill();
 220       bool isUndef = MI->getOperand(1).isUndef();
 221       NewMI = BuildMI(MF, MI->getDebugLoc(),
 222                       get(isFloat ? SP::STFri : SP::STDFri))
 223         .addFrameIndex(FI)
 224         .addImm(0)
 225         .addReg(SrcReg, getKillRegState(isKill) | getUndefRegState(isUndef));
 226     } else {             // COPY -> LOAD
 227       unsigned DstReg = MI->getOperand(0).getReg();
 228       bool isDead = MI->getOperand(0).isDead();
 229       bool isUndef = MI->getOperand(0).isUndef();
 230       NewMI = BuildMI(MF, MI->getDebugLoc(),
 231                       get(isFloat ? SP::LDFri : SP::LDDFri))
 232         .addReg(DstReg, RegState::Define |
 233                 getDeadRegState(isDead) | getUndefRegState(isUndef))
 234         .addFrameIndex(FI)
 235         .addImm(0);
 236     }
 237     break;
 238   }
 239
 240   return NewMI;
 241 }
 242
 243 unsigned SparcInstrInfo::getGlobalBaseReg(MachineFunction *MF) const
 244 {
 245   SparcMachineFunctionInfo *SparcFI = MF->getInfo<SparcMachineFunctionInfo>();
 246   unsigned GlobalBaseReg = SparcFI->getGlobalBaseReg();
 247   if (GlobalBaseReg != 0)
 248     return GlobalBaseReg;
 249
 250   // Insert the set of GlobalBaseReg into the first MBB of the function
 251   MachineBasicBlock &FirstMBB = MF->front();
 252   MachineBasicBlock::iterator MBBI = FirstMBB.begin();
 253   MachineRegisterInfo &RegInfo = MF->getRegInfo();
 254
 255   GlobalBaseReg = RegInfo.createVirtualRegister(&SP::IntRegsRegClass);
 256
 257
 258   DebugLoc dl;
 259
 260   BuildMI(FirstMBB, MBBI, dl, get(SP::GETPCX), GlobalBaseReg);
 261   SparcFI->setGlobalBaseReg(GlobalBaseReg);
 262   return GlobalBaseReg;
 263 }