1 //===-- SparcInstrInfo.cpp - Sparc Instruction Information ----------------===//
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 "Sparc.h"
16 #include "SparcMachineFunctionInfo.h"
17 #include "SparcSubtarget.h"
18 #include "llvm/ADT/STLExtras.h"
19 #include "llvm/ADT/SmallVector.h"
20 #include "llvm/CodeGen/MachineFrameInfo.h"
21 #include "llvm/CodeGen/MachineInstrBuilder.h"
22 #include "llvm/CodeGen/MachineMemOperand.h"
23 #include "llvm/CodeGen/MachineRegisterInfo.h"
24 #include "llvm/Support/ErrorHandling.h"
25 #include "llvm/Support/TargetRegistry.h"
26
27 #define GET_INSTRINFO_CTOR
28 #include "SparcGenInstrInfo.inc"
29
30 using namespace llvm;
31
SparcInstrInfo(SparcSubtarget & ST)32 SparcInstrInfo::SparcInstrInfo(SparcSubtarget &ST)
33 : SparcGenInstrInfo(SP::ADJCALLSTACKDOWN, SP::ADJCALLSTACKUP),
34 RI(ST), Subtarget(ST) {
35 }
36
37 /// isLoadFromStackSlot - If the specified machine instruction is a direct
38 /// load from a stack slot, return the virtual or physical register number of
39 /// the destination along with the FrameIndex of the loaded stack slot. If
40 /// not, return 0. This predicate must return 0 if the instruction has
41 /// any side effects other than loading from the stack slot.
isLoadFromStackSlot(const MachineInstr * MI,int & FrameIndex) const42 unsigned SparcInstrInfo::isLoadFromStackSlot(const MachineInstr *MI,
43 int &FrameIndex) const {
44 if (MI->getOpcode() == SP::LDri ||
45 MI->getOpcode() == SP::LDXri ||
46 MI->getOpcode() == SP::LDFri ||
47 MI->getOpcode() == SP::LDDFri) {
48 if (MI->getOperand(1).isFI() && MI->getOperand(2).isImm() &&
49 MI->getOperand(2).getImm() == 0) {
50 FrameIndex = MI->getOperand(1).getIndex();
51 return MI->getOperand(0).getReg();
52 }
53 }
54 return 0;
55 }
56
57 /// isStoreToStackSlot - If the specified machine instruction is a direct
58 /// store to a stack slot, return the virtual or physical register number of
59 /// the source reg along with the FrameIndex of the loaded stack slot. If
60 /// not, return 0. This predicate must return 0 if the instruction has
61 /// any side effects other than storing to the stack slot.
isStoreToStackSlot(const MachineInstr * MI,int & FrameIndex) const62 unsigned SparcInstrInfo::isStoreToStackSlot(const MachineInstr *MI,
63 int &FrameIndex) const {
64 if (MI->getOpcode() == SP::STri ||
65 MI->getOpcode() == SP::STXri ||
66 MI->getOpcode() == SP::STFri ||
67 MI->getOpcode() == SP::STDFri) {
68 if (MI->getOperand(0).isFI() && MI->getOperand(1).isImm() &&
69 MI->getOperand(1).getImm() == 0) {
70 FrameIndex = MI->getOperand(0).getIndex();
71 return MI->getOperand(2).getReg();
72 }
73 }
74 return 0;
75 }
76
IsIntegerCC(unsigned CC)77 static bool IsIntegerCC(unsigned CC)
78 {
79 return (CC <= SPCC::ICC_VC);
80 }
81
82
GetOppositeBranchCondition(SPCC::CondCodes CC)83 static SPCC::CondCodes GetOppositeBranchCondition(SPCC::CondCodes CC)
84 {
85 switch(CC) {
86 case SPCC::ICC_NE: return SPCC::ICC_E;
87 case SPCC::ICC_E: return SPCC::ICC_NE;
88 case SPCC::ICC_G: return SPCC::ICC_LE;
89 case SPCC::ICC_LE: return SPCC::ICC_G;
90 case SPCC::ICC_GE: return SPCC::ICC_L;
91 case SPCC::ICC_L: return SPCC::ICC_GE;
92 case SPCC::ICC_GU: return SPCC::ICC_LEU;
93 case SPCC::ICC_LEU: return SPCC::ICC_GU;
94 case SPCC::ICC_CC: return SPCC::ICC_CS;
95 case SPCC::ICC_CS: return SPCC::ICC_CC;
96 case SPCC::ICC_POS: return SPCC::ICC_NEG;
97 case SPCC::ICC_NEG: return SPCC::ICC_POS;
98 case SPCC::ICC_VC: return SPCC::ICC_VS;
99 case SPCC::ICC_VS: return SPCC::ICC_VC;
100
101 case SPCC::FCC_U: return SPCC::FCC_O;
102 case SPCC::FCC_O: return SPCC::FCC_U;
103 case SPCC::FCC_G: return SPCC::FCC_LE;
104 case SPCC::FCC_LE: return SPCC::FCC_G;
105 case SPCC::FCC_UG: return SPCC::FCC_ULE;
106 case SPCC::FCC_ULE: return SPCC::FCC_UG;
107 case SPCC::FCC_L: return SPCC::FCC_GE;
108 case SPCC::FCC_GE: return SPCC::FCC_L;
109 case SPCC::FCC_UL: return SPCC::FCC_UGE;
110 case SPCC::FCC_UGE: return SPCC::FCC_UL;
111 case SPCC::FCC_LG: return SPCC::FCC_UE;
112 case SPCC::FCC_UE: return SPCC::FCC_LG;
113 case SPCC::FCC_NE: return SPCC::FCC_E;
114 case SPCC::FCC_E: return SPCC::FCC_NE;
115 }
116 llvm_unreachable("Invalid cond code");
117 }
118
AnalyzeBranch(MachineBasicBlock & MBB,MachineBasicBlock * & TBB,MachineBasicBlock * & FBB,SmallVectorImpl<MachineOperand> & Cond,bool AllowModify) const119 bool SparcInstrInfo::AnalyzeBranch(MachineBasicBlock &MBB,
120 MachineBasicBlock *&TBB,
121 MachineBasicBlock *&FBB,
122 SmallVectorImpl<MachineOperand> &Cond,
123 bool AllowModify) const
124 {
125
126 MachineBasicBlock::iterator I = MBB.end();
127 MachineBasicBlock::iterator UnCondBrIter = MBB.end();
128 while (I != MBB.begin()) {
129 --I;
130
131 if (I->isDebugValue())
132 continue;
133
134 // When we see a non-terminator, we are done.
135 if (!isUnpredicatedTerminator(I))
136 break;
137
138 // Terminator is not a branch.
139 if (!I->isBranch())
140 return true;
141
142 // Handle Unconditional branches.
143 if (I->getOpcode() == SP::BA) {
144 UnCondBrIter = I;
145
146 if (!AllowModify) {
147 TBB = I->getOperand(0).getMBB();
148 continue;
149 }
150
151 while (llvm::next(I) != MBB.end())
152 llvm::next(I)->eraseFromParent();
153
154 Cond.clear();
155 FBB = 0;
156
157 if (MBB.isLayoutSuccessor(I->getOperand(0).getMBB())) {
158 TBB = 0;
159 I->eraseFromParent();
160 I = MBB.end();
161 UnCondBrIter = MBB.end();
162 continue;
163 }
164
165 TBB = I->getOperand(0).getMBB();
166 continue;
167 }
168
169 unsigned Opcode = I->getOpcode();
170 if (Opcode != SP::BCOND && Opcode != SP::FBCOND)
171 return true; // Unknown Opcode.
172
173 SPCC::CondCodes BranchCode = (SPCC::CondCodes)I->getOperand(1).getImm();
174
175 if (Cond.empty()) {
176 MachineBasicBlock *TargetBB = I->getOperand(0).getMBB();
177 if (AllowModify && UnCondBrIter != MBB.end() &&
178 MBB.isLayoutSuccessor(TargetBB)) {
179
180 // Transform the code
181 //
182 // brCC L1
183 // ba L2
184 // L1:
185 // ..
186 // L2:
187 //
188 // into
189 //
190 // brnCC L2
191 // L1:
192 // ...
193 // L2:
194 //
195 BranchCode = GetOppositeBranchCondition(BranchCode);
196 MachineBasicBlock::iterator OldInst = I;
197 BuildMI(MBB, UnCondBrIter, MBB.findDebugLoc(I), get(Opcode))
198 .addMBB(UnCondBrIter->getOperand(0).getMBB()).addImm(BranchCode);
199 BuildMI(MBB, UnCondBrIter, MBB.findDebugLoc(I), get(SP::BA))
200 .addMBB(TargetBB);
201
202 OldInst->eraseFromParent();
203 UnCondBrIter->eraseFromParent();
204
205 UnCondBrIter = MBB.end();
206 I = MBB.end();
207 continue;
208 }
209 FBB = TBB;
210 TBB = I->getOperand(0).getMBB();
211 Cond.push_back(MachineOperand::CreateImm(BranchCode));
212 continue;
213 }
214 // FIXME: Handle subsequent conditional branches.
215 // For now, we can't handle multiple conditional branches.
216 return true;
217 }
218 return false;
219 }
220
221 unsigned
InsertBranch(MachineBasicBlock & MBB,MachineBasicBlock * TBB,MachineBasicBlock * FBB,const SmallVectorImpl<MachineOperand> & Cond,DebugLoc DL) const222 SparcInstrInfo::InsertBranch(MachineBasicBlock &MBB,MachineBasicBlock *TBB,
223 MachineBasicBlock *FBB,
224 const SmallVectorImpl<MachineOperand> &Cond,
225 DebugLoc DL) const {
226 assert(TBB && "InsertBranch must not be told to insert a fallthrough");
227 assert((Cond.size() == 1 || Cond.size() == 0) &&
228 "Sparc branch conditions should have one component!");
229
230 if (Cond.empty()) {
231 assert(!FBB && "Unconditional branch with multiple successors!");
232 BuildMI(&MBB, DL, get(SP::BA)).addMBB(TBB);
233 return 1;
234 }
235
236 // Conditional branch
237 unsigned CC = Cond[0].getImm();
238
239 if (IsIntegerCC(CC))
240 BuildMI(&MBB, DL, get(SP::BCOND)).addMBB(TBB).addImm(CC);
241 else
242 BuildMI(&MBB, DL, get(SP::FBCOND)).addMBB(TBB).addImm(CC);
243 if (!FBB)
244 return 1;
245
246 BuildMI(&MBB, DL, get(SP::BA)).addMBB(FBB);
247 return 2;
248 }
249
RemoveBranch(MachineBasicBlock & MBB) const250 unsigned SparcInstrInfo::RemoveBranch(MachineBasicBlock &MBB) const
251 {
252 MachineBasicBlock::iterator I = MBB.end();
253 unsigned Count = 0;
254 while (I != MBB.begin()) {
255 --I;
256
257 if (I->isDebugValue())
258 continue;
259
260 if (I->getOpcode() != SP::BA
261 && I->getOpcode() != SP::BCOND
262 && I->getOpcode() != SP::FBCOND)
263 break; // Not a branch
264
265 I->eraseFromParent();
266 I = MBB.end();
267 ++Count;
268 }
269 return Count;
270 }
271
copyPhysReg(MachineBasicBlock & MBB,MachineBasicBlock::iterator I,DebugLoc DL,unsigned DestReg,unsigned SrcReg,bool KillSrc) const272 void SparcInstrInfo::copyPhysReg(MachineBasicBlock &MBB,
273 MachineBasicBlock::iterator I, DebugLoc DL,
274 unsigned DestReg, unsigned SrcReg,
275 bool KillSrc) const {
276 if (SP::IntRegsRegClass.contains(DestReg, SrcReg))
277 BuildMI(MBB, I, DL, get(SP::ORrr), DestReg).addReg(SP::G0)
278 .addReg(SrcReg, getKillRegState(KillSrc));
279 else if (SP::FPRegsRegClass.contains(DestReg, SrcReg))
280 BuildMI(MBB, I, DL, get(SP::FMOVS), DestReg)
281 .addReg(SrcReg, getKillRegState(KillSrc));
282 else if (SP::DFPRegsRegClass.contains(DestReg, SrcReg)) {
283 if (Subtarget.isV9()) {
284 BuildMI(MBB, I, DL, get(SP::FMOVD), DestReg)
285 .addReg(SrcReg, getKillRegState(KillSrc));
286 } else {
287 // Use two FMOVS instructions.
288 const TargetRegisterInfo *TRI = &getRegisterInfo();
289 MachineInstr *MovMI = 0;
290 unsigned subRegIdx[] = {SP::sub_even, SP::sub_odd};
291 for (unsigned i = 0; i != 2; ++i) {
292 unsigned Dst = TRI->getSubReg(DestReg, subRegIdx[i]);
293 unsigned Src = TRI->getSubReg(SrcReg, subRegIdx[i]);
294 assert(Dst && Src && "Bad sub-register");
295
296 MovMI = BuildMI(MBB, I, DL, get(SP::FMOVS), Dst).addReg(Src);
297 }
298 // Add implicit super-register defs and kills to the last MovMI.
299 MovMI->addRegisterDefined(DestReg, TRI);
300 if (KillSrc)
301 MovMI->addRegisterKilled(SrcReg, TRI);
302 }
303 } else
304 llvm_unreachable("Impossible reg-to-reg copy");
305 }
306
307 void SparcInstrInfo::
storeRegToStackSlot(MachineBasicBlock & MBB,MachineBasicBlock::iterator I,unsigned SrcReg,bool isKill,int FI,const TargetRegisterClass * RC,const TargetRegisterInfo * TRI) const308 storeRegToStackSlot(MachineBasicBlock &MBB, MachineBasicBlock::iterator I,
309 unsigned SrcReg, bool isKill, int FI,
310 const TargetRegisterClass *RC,
311 const TargetRegisterInfo *TRI) const {
312 DebugLoc DL;
313 if (I != MBB.end()) DL = I->getDebugLoc();
314
315 MachineFunction *MF = MBB.getParent();
316 const MachineFrameInfo &MFI = *MF->getFrameInfo();
317 MachineMemOperand *MMO =
318 MF->getMachineMemOperand(MachinePointerInfo::getFixedStack(FI),
319 MachineMemOperand::MOStore,
320 MFI.getObjectSize(FI),
321 MFI.getObjectAlignment(FI));
322
323 // On the order of operands here: think "[FrameIdx + 0] = SrcReg".
324 if (RC == &SP::I64RegsRegClass)
325 BuildMI(MBB, I, DL, get(SP::STXri)).addFrameIndex(FI).addImm(0)
326 .addReg(SrcReg, getKillRegState(isKill)).addMemOperand(MMO);
327 else if (RC == &SP::IntRegsRegClass)
328 BuildMI(MBB, I, DL, get(SP::STri)).addFrameIndex(FI).addImm(0)
329 .addReg(SrcReg, getKillRegState(isKill)).addMemOperand(MMO);
330 else if (RC == &SP::FPRegsRegClass)
331 BuildMI(MBB, I, DL, get(SP::STFri)).addFrameIndex(FI).addImm(0)
332 .addReg(SrcReg, getKillRegState(isKill)).addMemOperand(MMO);
333 else if (RC == &SP::DFPRegsRegClass)
334 BuildMI(MBB, I, DL, get(SP::STDFri)).addFrameIndex(FI).addImm(0)
335 .addReg(SrcReg, getKillRegState(isKill)).addMemOperand(MMO);
336 else
337 llvm_unreachable("Can't store this register to stack slot");
338 }
339
340 void SparcInstrInfo::
loadRegFromStackSlot(MachineBasicBlock & MBB,MachineBasicBlock::iterator I,unsigned DestReg,int FI,const TargetRegisterClass * RC,const TargetRegisterInfo * TRI) const341 loadRegFromStackSlot(MachineBasicBlock &MBB, MachineBasicBlock::iterator I,
342 unsigned DestReg, int FI,
343 const TargetRegisterClass *RC,
344 const TargetRegisterInfo *TRI) const {
345 DebugLoc DL;
346 if (I != MBB.end()) DL = I->getDebugLoc();
347
348 MachineFunction *MF = MBB.getParent();
349 const MachineFrameInfo &MFI = *MF->getFrameInfo();
350 MachineMemOperand *MMO =
351 MF->getMachineMemOperand(MachinePointerInfo::getFixedStack(FI),
352 MachineMemOperand::MOLoad,
353 MFI.getObjectSize(FI),
354 MFI.getObjectAlignment(FI));
355
356 if (RC == &SP::I64RegsRegClass)
357 BuildMI(MBB, I, DL, get(SP::LDXri), DestReg).addFrameIndex(FI).addImm(0)
358 .addMemOperand(MMO);
359 else if (RC == &SP::IntRegsRegClass)
360 BuildMI(MBB, I, DL, get(SP::LDri), DestReg).addFrameIndex(FI).addImm(0)
361 .addMemOperand(MMO);
362 else if (RC == &SP::FPRegsRegClass)
363 BuildMI(MBB, I, DL, get(SP::LDFri), DestReg).addFrameIndex(FI).addImm(0)
364 .addMemOperand(MMO);
365 else if (RC == &SP::DFPRegsRegClass)
366 BuildMI(MBB, I, DL, get(SP::LDDFri), DestReg).addFrameIndex(FI).addImm(0)
367 .addMemOperand(MMO);
368 else
369 llvm_unreachable("Can't load this register from stack slot");
370 }
371
getGlobalBaseReg(MachineFunction * MF) const372 unsigned SparcInstrInfo::getGlobalBaseReg(MachineFunction *MF) const
373 {
374 SparcMachineFunctionInfo *SparcFI = MF->getInfo<SparcMachineFunctionInfo>();
375 unsigned GlobalBaseReg = SparcFI->getGlobalBaseReg();
376 if (GlobalBaseReg != 0)
377 return GlobalBaseReg;
378
379 // Insert the set of GlobalBaseReg into the first MBB of the function
380 MachineBasicBlock &FirstMBB = MF->front();
381 MachineBasicBlock::iterator MBBI = FirstMBB.begin();
382 MachineRegisterInfo &RegInfo = MF->getRegInfo();
383
384 GlobalBaseReg = RegInfo.createVirtualRegister(&SP::IntRegsRegClass);
385
386
387 DebugLoc dl;
388
389 BuildMI(FirstMBB, MBBI, dl, get(SP::GETPCX), GlobalBaseReg);
390 SparcFI->setGlobalBaseReg(GlobalBaseReg);
391 return GlobalBaseReg;
392 }
393