1 //===-- PPCISelLowering.cpp - PPC DAG Lowering Implementation -------------===//
3 // The LLVM Compiler Infrastructure
5 // This file was developed by Chris Lattner and is distributed under
6 // the University of Illinois Open Source License. See LICENSE.TXT for details.
8 //===----------------------------------------------------------------------===//
10 // This file implements the PPCISelLowering class.
12 //===----------------------------------------------------------------------===//
14 #include "PPCISelLowering.h"
15 #include "PPCTargetMachine.h"
16 #include "PPCPerfectShuffle.h"
17 #include "llvm/ADT/VectorExtras.h"
18 #include "llvm/Analysis/ScalarEvolutionExpressions.h"
19 #include "llvm/CodeGen/MachineFrameInfo.h"
20 #include "llvm/CodeGen/MachineFunction.h"
21 #include "llvm/CodeGen/MachineInstrBuilder.h"
22 #include "llvm/CodeGen/SelectionDAG.h"
23 #include "llvm/CodeGen/SSARegMap.h"
24 #include "llvm/Constants.h"
25 #include "llvm/Function.h"
26 #include "llvm/Intrinsics.h"
27 #include "llvm/Support/MathExtras.h"
28 #include "llvm/Target/TargetOptions.h"
31 PPCTargetLowering::PPCTargetLowering(TargetMachine &TM)
32 : TargetLowering(TM) {
34 // Fold away setcc operations if possible.
35 setSetCCIsExpensive();
38 // Use _setjmp/_longjmp instead of setjmp/longjmp.
39 setUseUnderscoreSetJmpLongJmp(true);
41 // Set up the register classes.
42 addRegisterClass(MVT::i32, PPC::GPRCRegisterClass);
43 addRegisterClass(MVT::f32, PPC::F4RCRegisterClass);
44 addRegisterClass(MVT::f64, PPC::F8RCRegisterClass);
46 setOperationAction(ISD::ConstantFP, MVT::f64, Expand);
47 setOperationAction(ISD::ConstantFP, MVT::f32, Expand);
49 // PowerPC has no intrinsics for these particular operations
50 setOperationAction(ISD::MEMMOVE, MVT::Other, Expand);
51 setOperationAction(ISD::MEMSET, MVT::Other, Expand);
52 setOperationAction(ISD::MEMCPY, MVT::Other, Expand);
54 // PowerPC has an i16 but no i8 (or i1) SEXTLOAD
55 setOperationAction(ISD::SEXTLOAD, MVT::i1, Expand);
56 setOperationAction(ISD::SEXTLOAD, MVT::i8, Expand);
58 // PowerPC has no SREM/UREM instructions
59 setOperationAction(ISD::SREM, MVT::i32, Expand);
60 setOperationAction(ISD::UREM, MVT::i32, Expand);
62 // We don't support sin/cos/sqrt/fmod
63 setOperationAction(ISD::FSIN , MVT::f64, Expand);
64 setOperationAction(ISD::FCOS , MVT::f64, Expand);
65 setOperationAction(ISD::FREM , MVT::f64, Expand);
66 setOperationAction(ISD::FSIN , MVT::f32, Expand);
67 setOperationAction(ISD::FCOS , MVT::f32, Expand);
68 setOperationAction(ISD::FREM , MVT::f32, Expand);
70 // If we're enabling GP optimizations, use hardware square root
71 if (!TM.getSubtarget<PPCSubtarget>().hasFSQRT()) {
72 setOperationAction(ISD::FSQRT, MVT::f64, Expand);
73 setOperationAction(ISD::FSQRT, MVT::f32, Expand);
76 setOperationAction(ISD::FCOPYSIGN, MVT::f64, Expand);
77 setOperationAction(ISD::FCOPYSIGN, MVT::f32, Expand);
79 // PowerPC does not have BSWAP, CTPOP or CTTZ
80 setOperationAction(ISD::BSWAP, MVT::i32 , Expand);
81 setOperationAction(ISD::CTPOP, MVT::i32 , Expand);
82 setOperationAction(ISD::CTTZ , MVT::i32 , Expand);
84 // PowerPC does not have ROTR
85 setOperationAction(ISD::ROTR, MVT::i32 , Expand);
87 // PowerPC does not have Select
88 setOperationAction(ISD::SELECT, MVT::i32, Expand);
89 setOperationAction(ISD::SELECT, MVT::f32, Expand);
90 setOperationAction(ISD::SELECT, MVT::f64, Expand);
92 // PowerPC wants to turn select_cc of FP into fsel when possible.
93 setOperationAction(ISD::SELECT_CC, MVT::f32, Custom);
94 setOperationAction(ISD::SELECT_CC, MVT::f64, Custom);
96 // PowerPC wants to optimize integer setcc a bit
97 setOperationAction(ISD::SETCC, MVT::i32, Custom);
99 // PowerPC does not have BRCOND which requires SetCC
100 setOperationAction(ISD::BRCOND, MVT::Other, Expand);
102 // PowerPC turns FP_TO_SINT into FCTIWZ and some load/stores.
103 setOperationAction(ISD::FP_TO_SINT, MVT::i32, Custom);
105 // PowerPC does not have [U|S]INT_TO_FP
106 setOperationAction(ISD::SINT_TO_FP, MVT::i32, Expand);
107 setOperationAction(ISD::UINT_TO_FP, MVT::i32, Expand);
109 setOperationAction(ISD::BIT_CONVERT, MVT::f32, Expand);
110 setOperationAction(ISD::BIT_CONVERT, MVT::i32, Expand);
112 // PowerPC does not have truncstore for i1.
113 setOperationAction(ISD::TRUNCSTORE, MVT::i1, Promote);
115 // We cannot sextinreg(i1). Expand to shifts.
116 setOperationAction(ISD::SIGN_EXTEND_INREG, MVT::i1, Expand);
119 // Support label based line numbers.
120 setOperationAction(ISD::LOCATION, MVT::Other, Expand);
121 setOperationAction(ISD::DEBUG_LOC, MVT::Other, Expand);
122 // FIXME - use subtarget debug flags
123 if (!TM.getSubtarget<PPCSubtarget>().isDarwin())
124 setOperationAction(ISD::DEBUG_LABEL, MVT::Other, Expand);
126 // We want to legalize GlobalAddress and ConstantPool nodes into the
127 // appropriate instructions to materialize the address.
128 setOperationAction(ISD::GlobalAddress, MVT::i32, Custom);
129 setOperationAction(ISD::ConstantPool, MVT::i32, Custom);
130 setOperationAction(ISD::JumpTable, MVT::i32, Custom);
132 // RET must be custom lowered, to meet ABI requirements
133 setOperationAction(ISD::RET , MVT::Other, Custom);
135 // VASTART needs to be custom lowered to use the VarArgsFrameIndex
136 setOperationAction(ISD::VASTART , MVT::Other, Custom);
138 // Use the default implementation.
139 setOperationAction(ISD::VAARG , MVT::Other, Expand);
140 setOperationAction(ISD::VACOPY , MVT::Other, Expand);
141 setOperationAction(ISD::VAEND , MVT::Other, Expand);
142 setOperationAction(ISD::STACKSAVE , MVT::Other, Expand);
143 setOperationAction(ISD::STACKRESTORE , MVT::Other, Expand);
144 setOperationAction(ISD::DYNAMIC_STACKALLOC, MVT::i32 , Expand);
146 // We want to custom lower some of our intrinsics.
147 setOperationAction(ISD::INTRINSIC_WO_CHAIN, MVT::Other, Custom);
149 if (TM.getSubtarget<PPCSubtarget>().is64Bit()) {
150 // They also have instructions for converting between i64 and fp.
151 setOperationAction(ISD::FP_TO_SINT, MVT::i64, Custom);
152 setOperationAction(ISD::SINT_TO_FP, MVT::i64, Custom);
154 // FIXME: disable this lowered code. This generates 64-bit register values,
155 // and we don't model the fact that the top part is clobbered by calls. We
156 // need to flag these together so that the value isn't live across a call.
157 //setOperationAction(ISD::SINT_TO_FP, MVT::i32, Custom);
159 // To take advantage of the above i64 FP_TO_SINT, promote i32 FP_TO_UINT
160 setOperationAction(ISD::FP_TO_UINT, MVT::i32, Promote);
162 // PowerPC does not have FP_TO_UINT on 32-bit implementations.
163 setOperationAction(ISD::FP_TO_UINT, MVT::i32, Expand);
166 if (TM.getSubtarget<PPCSubtarget>().has64BitRegs()) {
167 // 64 bit PowerPC implementations can support i64 types directly
168 addRegisterClass(MVT::i64, PPC::G8RCRegisterClass);
169 // BUILD_PAIR can't be handled natively, and should be expanded to shl/or
170 setOperationAction(ISD::BUILD_PAIR, MVT::i64, Expand);
172 // 32 bit PowerPC wants to expand i64 shifts itself.
173 setOperationAction(ISD::SHL, MVT::i64, Custom);
174 setOperationAction(ISD::SRL, MVT::i64, Custom);
175 setOperationAction(ISD::SRA, MVT::i64, Custom);
178 if (TM.getSubtarget<PPCSubtarget>().hasAltivec()) {
179 // First set operation action for all vector types to expand. Then we
180 // will selectively turn on ones that can be effectively codegen'd.
181 for (unsigned VT = (unsigned)MVT::FIRST_VECTOR_VALUETYPE;
182 VT != (unsigned)MVT::LAST_VECTOR_VALUETYPE; ++VT) {
183 // add/sub are legal for all supported vector VT's.
184 setOperationAction(ISD::ADD , (MVT::ValueType)VT, Legal);
185 setOperationAction(ISD::SUB , (MVT::ValueType)VT, Legal);
187 // We promote all shuffles to v16i8.
188 setOperationAction(ISD::VECTOR_SHUFFLE, (MVT::ValueType)VT, Promote);
189 AddPromotedToType (ISD::VECTOR_SHUFFLE, (MVT::ValueType)VT, MVT::v16i8);
191 // We promote all non-typed operations to v4i32.
192 setOperationAction(ISD::AND , (MVT::ValueType)VT, Promote);
193 AddPromotedToType (ISD::AND , (MVT::ValueType)VT, MVT::v4i32);
194 setOperationAction(ISD::OR , (MVT::ValueType)VT, Promote);
195 AddPromotedToType (ISD::OR , (MVT::ValueType)VT, MVT::v4i32);
196 setOperationAction(ISD::XOR , (MVT::ValueType)VT, Promote);
197 AddPromotedToType (ISD::XOR , (MVT::ValueType)VT, MVT::v4i32);
198 setOperationAction(ISD::LOAD , (MVT::ValueType)VT, Promote);
199 AddPromotedToType (ISD::LOAD , (MVT::ValueType)VT, MVT::v4i32);
200 setOperationAction(ISD::SELECT, (MVT::ValueType)VT, Promote);
201 AddPromotedToType (ISD::SELECT, (MVT::ValueType)VT, MVT::v4i32);
202 setOperationAction(ISD::STORE, (MVT::ValueType)VT, Promote);
203 AddPromotedToType (ISD::STORE, (MVT::ValueType)VT, MVT::v4i32);
205 // No other operations are legal.
206 setOperationAction(ISD::MUL , (MVT::ValueType)VT, Expand);
207 setOperationAction(ISD::SDIV, (MVT::ValueType)VT, Expand);
208 setOperationAction(ISD::SREM, (MVT::ValueType)VT, Expand);
209 setOperationAction(ISD::UDIV, (MVT::ValueType)VT, Expand);
210 setOperationAction(ISD::UREM, (MVT::ValueType)VT, Expand);
211 setOperationAction(ISD::EXTRACT_VECTOR_ELT, (MVT::ValueType)VT, Expand);
212 setOperationAction(ISD::INSERT_VECTOR_ELT, (MVT::ValueType)VT, Expand);
213 setOperationAction(ISD::BUILD_VECTOR, (MVT::ValueType)VT, Expand);
215 setOperationAction(ISD::SCALAR_TO_VECTOR, (MVT::ValueType)VT, Expand);
218 // We can custom expand all VECTOR_SHUFFLEs to VPERM, others we can handle
219 // with merges, splats, etc.
220 setOperationAction(ISD::VECTOR_SHUFFLE, MVT::v16i8, Custom);
222 setOperationAction(ISD::AND , MVT::v4i32, Legal);
223 setOperationAction(ISD::OR , MVT::v4i32, Legal);
224 setOperationAction(ISD::XOR , MVT::v4i32, Legal);
225 setOperationAction(ISD::LOAD , MVT::v4i32, Legal);
226 setOperationAction(ISD::SELECT, MVT::v4i32, Expand);
227 setOperationAction(ISD::STORE , MVT::v4i32, Legal);
229 addRegisterClass(MVT::v4f32, PPC::VRRCRegisterClass);
230 addRegisterClass(MVT::v4i32, PPC::VRRCRegisterClass);
231 addRegisterClass(MVT::v8i16, PPC::VRRCRegisterClass);
232 addRegisterClass(MVT::v16i8, PPC::VRRCRegisterClass);
234 setOperationAction(ISD::MUL, MVT::v4f32, Legal);
235 setOperationAction(ISD::MUL, MVT::v4i32, Custom);
236 setOperationAction(ISD::MUL, MVT::v8i16, Custom);
237 setOperationAction(ISD::MUL, MVT::v16i8, Custom);
239 setOperationAction(ISD::SCALAR_TO_VECTOR, MVT::v4f32, Custom);
240 setOperationAction(ISD::SCALAR_TO_VECTOR, MVT::v4i32, Custom);
242 setOperationAction(ISD::BUILD_VECTOR, MVT::v16i8, Custom);
243 setOperationAction(ISD::BUILD_VECTOR, MVT::v8i16, Custom);
244 setOperationAction(ISD::BUILD_VECTOR, MVT::v4i32, Custom);
245 setOperationAction(ISD::BUILD_VECTOR, MVT::v4f32, Custom);
248 setSetCCResultContents(ZeroOrOneSetCCResult);
249 setStackPointerRegisterToSaveRestore(PPC::R1);
251 // We have target-specific dag combine patterns for the following nodes:
252 setTargetDAGCombine(ISD::SINT_TO_FP);
253 setTargetDAGCombine(ISD::STORE);
254 setTargetDAGCombine(ISD::BR_CC);
256 computeRegisterProperties();
259 const char *PPCTargetLowering::getTargetNodeName(unsigned Opcode) const {
262 case PPCISD::FSEL: return "PPCISD::FSEL";
263 case PPCISD::FCFID: return "PPCISD::FCFID";
264 case PPCISD::FCTIDZ: return "PPCISD::FCTIDZ";
265 case PPCISD::FCTIWZ: return "PPCISD::FCTIWZ";
266 case PPCISD::STFIWX: return "PPCISD::STFIWX";
267 case PPCISD::VMADDFP: return "PPCISD::VMADDFP";
268 case PPCISD::VNMSUBFP: return "PPCISD::VNMSUBFP";
269 case PPCISD::VPERM: return "PPCISD::VPERM";
270 case PPCISD::Hi: return "PPCISD::Hi";
271 case PPCISD::Lo: return "PPCISD::Lo";
272 case PPCISD::GlobalBaseReg: return "PPCISD::GlobalBaseReg";
273 case PPCISD::SRL: return "PPCISD::SRL";
274 case PPCISD::SRA: return "PPCISD::SRA";
275 case PPCISD::SHL: return "PPCISD::SHL";
276 case PPCISD::EXTSW_32: return "PPCISD::EXTSW_32";
277 case PPCISD::STD_32: return "PPCISD::STD_32";
278 case PPCISD::CALL: return "PPCISD::CALL";
279 case PPCISD::RET_FLAG: return "PPCISD::RET_FLAG";
280 case PPCISD::MFCR: return "PPCISD::MFCR";
281 case PPCISD::VCMP: return "PPCISD::VCMP";
282 case PPCISD::VCMPo: return "PPCISD::VCMPo";
283 case PPCISD::COND_BRANCH: return "PPCISD::COND_BRANCH";
287 //===----------------------------------------------------------------------===//
288 // Node matching predicates, for use by the tblgen matching code.
289 //===----------------------------------------------------------------------===//
291 /// isFloatingPointZero - Return true if this is 0.0 or -0.0.
292 static bool isFloatingPointZero(SDOperand Op) {
293 if (ConstantFPSDNode *CFP = dyn_cast<ConstantFPSDNode>(Op))
294 return CFP->isExactlyValue(-0.0) || CFP->isExactlyValue(0.0);
295 else if (Op.getOpcode() == ISD::EXTLOAD || Op.getOpcode() == ISD::LOAD) {
296 // Maybe this has already been legalized into the constant pool?
297 if (ConstantPoolSDNode *CP = dyn_cast<ConstantPoolSDNode>(Op.getOperand(1)))
298 if (ConstantFP *CFP = dyn_cast<ConstantFP>(CP->get()))
299 return CFP->isExactlyValue(-0.0) || CFP->isExactlyValue(0.0);
304 /// isConstantOrUndef - Op is either an undef node or a ConstantSDNode. Return
305 /// true if Op is undef or if it matches the specified value.
306 static bool isConstantOrUndef(SDOperand Op, unsigned Val) {
307 return Op.getOpcode() == ISD::UNDEF ||
308 cast<ConstantSDNode>(Op)->getValue() == Val;
311 /// isVPKUHUMShuffleMask - Return true if this is the shuffle mask for a
312 /// VPKUHUM instruction.
313 bool PPC::isVPKUHUMShuffleMask(SDNode *N, bool isUnary) {
315 for (unsigned i = 0; i != 16; ++i)
316 if (!isConstantOrUndef(N->getOperand(i), i*2+1))
319 for (unsigned i = 0; i != 8; ++i)
320 if (!isConstantOrUndef(N->getOperand(i), i*2+1) ||
321 !isConstantOrUndef(N->getOperand(i+8), i*2+1))
327 /// isVPKUWUMShuffleMask - Return true if this is the shuffle mask for a
328 /// VPKUWUM instruction.
329 bool PPC::isVPKUWUMShuffleMask(SDNode *N, bool isUnary) {
331 for (unsigned i = 0; i != 16; i += 2)
332 if (!isConstantOrUndef(N->getOperand(i ), i*2+2) ||
333 !isConstantOrUndef(N->getOperand(i+1), i*2+3))
336 for (unsigned i = 0; i != 8; i += 2)
337 if (!isConstantOrUndef(N->getOperand(i ), i*2+2) ||
338 !isConstantOrUndef(N->getOperand(i+1), i*2+3) ||
339 !isConstantOrUndef(N->getOperand(i+8), i*2+2) ||
340 !isConstantOrUndef(N->getOperand(i+9), i*2+3))
346 /// isVMerge - Common function, used to match vmrg* shuffles.
348 static bool isVMerge(SDNode *N, unsigned UnitSize,
349 unsigned LHSStart, unsigned RHSStart) {
350 assert(N->getOpcode() == ISD::BUILD_VECTOR &&
351 N->getNumOperands() == 16 && "PPC only supports shuffles by bytes!");
352 assert((UnitSize == 1 || UnitSize == 2 || UnitSize == 4) &&
353 "Unsupported merge size!");
355 for (unsigned i = 0; i != 8/UnitSize; ++i) // Step over units
356 for (unsigned j = 0; j != UnitSize; ++j) { // Step over bytes within unit
357 if (!isConstantOrUndef(N->getOperand(i*UnitSize*2+j),
358 LHSStart+j+i*UnitSize) ||
359 !isConstantOrUndef(N->getOperand(i*UnitSize*2+UnitSize+j),
360 RHSStart+j+i*UnitSize))
366 /// isVMRGLShuffleMask - Return true if this is a shuffle mask suitable for
367 /// a VRGL* instruction with the specified unit size (1,2 or 4 bytes).
368 bool PPC::isVMRGLShuffleMask(SDNode *N, unsigned UnitSize, bool isUnary) {
370 return isVMerge(N, UnitSize, 8, 24);
371 return isVMerge(N, UnitSize, 8, 8);
374 /// isVMRGHShuffleMask - Return true if this is a shuffle mask suitable for
375 /// a VRGH* instruction with the specified unit size (1,2 or 4 bytes).
376 bool PPC::isVMRGHShuffleMask(SDNode *N, unsigned UnitSize, bool isUnary) {
378 return isVMerge(N, UnitSize, 0, 16);
379 return isVMerge(N, UnitSize, 0, 0);
383 /// isVSLDOIShuffleMask - If this is a vsldoi shuffle mask, return the shift
384 /// amount, otherwise return -1.
385 int PPC::isVSLDOIShuffleMask(SDNode *N, bool isUnary) {
386 assert(N->getOpcode() == ISD::BUILD_VECTOR &&
387 N->getNumOperands() == 16 && "PPC only supports shuffles by bytes!");
388 // Find the first non-undef value in the shuffle mask.
390 for (i = 0; i != 16 && N->getOperand(i).getOpcode() == ISD::UNDEF; ++i)
393 if (i == 16) return -1; // all undef.
395 // Otherwise, check to see if the rest of the elements are consequtively
396 // numbered from this value.
397 unsigned ShiftAmt = cast<ConstantSDNode>(N->getOperand(i))->getValue();
398 if (ShiftAmt < i) return -1;
402 // Check the rest of the elements to see if they are consequtive.
403 for (++i; i != 16; ++i)
404 if (!isConstantOrUndef(N->getOperand(i), ShiftAmt+i))
407 // Check the rest of the elements to see if they are consequtive.
408 for (++i; i != 16; ++i)
409 if (!isConstantOrUndef(N->getOperand(i), (ShiftAmt+i) & 15))
416 /// isSplatShuffleMask - Return true if the specified VECTOR_SHUFFLE operand
417 /// specifies a splat of a single element that is suitable for input to
418 /// VSPLTB/VSPLTH/VSPLTW.
419 bool PPC::isSplatShuffleMask(SDNode *N, unsigned EltSize) {
420 assert(N->getOpcode() == ISD::BUILD_VECTOR &&
421 N->getNumOperands() == 16 &&
422 (EltSize == 1 || EltSize == 2 || EltSize == 4));
424 // This is a splat operation if each element of the permute is the same, and
425 // if the value doesn't reference the second vector.
426 unsigned ElementBase = 0;
427 SDOperand Elt = N->getOperand(0);
428 if (ConstantSDNode *EltV = dyn_cast<ConstantSDNode>(Elt))
429 ElementBase = EltV->getValue();
431 return false; // FIXME: Handle UNDEF elements too!
433 if (cast<ConstantSDNode>(Elt)->getValue() >= 16)
436 // Check that they are consequtive.
437 for (unsigned i = 1; i != EltSize; ++i) {
438 if (!isa<ConstantSDNode>(N->getOperand(i)) ||
439 cast<ConstantSDNode>(N->getOperand(i))->getValue() != i+ElementBase)
443 assert(isa<ConstantSDNode>(Elt) && "Invalid VECTOR_SHUFFLE mask!");
444 for (unsigned i = EltSize, e = 16; i != e; i += EltSize) {
445 if (N->getOperand(i).getOpcode() == ISD::UNDEF) continue;
446 assert(isa<ConstantSDNode>(N->getOperand(i)) &&
447 "Invalid VECTOR_SHUFFLE mask!");
448 for (unsigned j = 0; j != EltSize; ++j)
449 if (N->getOperand(i+j) != N->getOperand(j))
456 /// getVSPLTImmediate - Return the appropriate VSPLT* immediate to splat the
457 /// specified isSplatShuffleMask VECTOR_SHUFFLE mask.
458 unsigned PPC::getVSPLTImmediate(SDNode *N, unsigned EltSize) {
459 assert(isSplatShuffleMask(N, EltSize));
460 return cast<ConstantSDNode>(N->getOperand(0))->getValue() / EltSize;
463 /// get_VSPLTI_elt - If this is a build_vector of constants which can be formed
464 /// by using a vspltis[bhw] instruction of the specified element size, return
465 /// the constant being splatted. The ByteSize field indicates the number of
466 /// bytes of each element [124] -> [bhw].
467 SDOperand PPC::get_VSPLTI_elt(SDNode *N, unsigned ByteSize, SelectionDAG &DAG) {
468 SDOperand OpVal(0, 0);
470 // If ByteSize of the splat is bigger than the element size of the
471 // build_vector, then we have a case where we are checking for a splat where
472 // multiple elements of the buildvector are folded together into a single
473 // logical element of the splat (e.g. "vsplish 1" to splat {0,1}*8).
474 unsigned EltSize = 16/N->getNumOperands();
475 if (EltSize < ByteSize) {
476 unsigned Multiple = ByteSize/EltSize; // Number of BV entries per spltval.
477 SDOperand UniquedVals[4];
478 assert(Multiple > 1 && Multiple <= 4 && "How can this happen?");
480 // See if all of the elements in the buildvector agree across.
481 for (unsigned i = 0, e = N->getNumOperands(); i != e; ++i) {
482 if (N->getOperand(i).getOpcode() == ISD::UNDEF) continue;
483 // If the element isn't a constant, bail fully out.
484 if (!isa<ConstantSDNode>(N->getOperand(i))) return SDOperand();
487 if (UniquedVals[i&(Multiple-1)].Val == 0)
488 UniquedVals[i&(Multiple-1)] = N->getOperand(i);
489 else if (UniquedVals[i&(Multiple-1)] != N->getOperand(i))
490 return SDOperand(); // no match.
493 // Okay, if we reached this point, UniquedVals[0..Multiple-1] contains
494 // either constant or undef values that are identical for each chunk. See
495 // if these chunks can form into a larger vspltis*.
497 // Check to see if all of the leading entries are either 0 or -1. If
498 // neither, then this won't fit into the immediate field.
499 bool LeadingZero = true;
500 bool LeadingOnes = true;
501 for (unsigned i = 0; i != Multiple-1; ++i) {
502 if (UniquedVals[i].Val == 0) continue; // Must have been undefs.
504 LeadingZero &= cast<ConstantSDNode>(UniquedVals[i])->isNullValue();
505 LeadingOnes &= cast<ConstantSDNode>(UniquedVals[i])->isAllOnesValue();
507 // Finally, check the least significant entry.
509 if (UniquedVals[Multiple-1].Val == 0)
510 return DAG.getTargetConstant(0, MVT::i32); // 0,0,0,undef
511 int Val = cast<ConstantSDNode>(UniquedVals[Multiple-1])->getValue();
513 return DAG.getTargetConstant(Val, MVT::i32); // 0,0,0,4 -> vspltisw(4)
516 if (UniquedVals[Multiple-1].Val == 0)
517 return DAG.getTargetConstant(~0U, MVT::i32); // -1,-1,-1,undef
518 int Val =cast<ConstantSDNode>(UniquedVals[Multiple-1])->getSignExtended();
519 if (Val >= -16) // -1,-1,-1,-2 -> vspltisw(-2)
520 return DAG.getTargetConstant(Val, MVT::i32);
526 // Check to see if this buildvec has a single non-undef value in its elements.
527 for (unsigned i = 0, e = N->getNumOperands(); i != e; ++i) {
528 if (N->getOperand(i).getOpcode() == ISD::UNDEF) continue;
530 OpVal = N->getOperand(i);
531 else if (OpVal != N->getOperand(i))
535 if (OpVal.Val == 0) return SDOperand(); // All UNDEF: use implicit def.
537 unsigned ValSizeInBytes = 0;
539 if (ConstantSDNode *CN = dyn_cast<ConstantSDNode>(OpVal)) {
540 Value = CN->getValue();
541 ValSizeInBytes = MVT::getSizeInBits(CN->getValueType(0))/8;
542 } else if (ConstantFPSDNode *CN = dyn_cast<ConstantFPSDNode>(OpVal)) {
543 assert(CN->getValueType(0) == MVT::f32 && "Only one legal FP vector type!");
544 Value = FloatToBits(CN->getValue());
548 // If the splat value is larger than the element value, then we can never do
549 // this splat. The only case that we could fit the replicated bits into our
550 // immediate field for would be zero, and we prefer to use vxor for it.
551 if (ValSizeInBytes < ByteSize) return SDOperand();
553 // If the element value is larger than the splat value, cut it in half and
554 // check to see if the two halves are equal. Continue doing this until we
555 // get to ByteSize. This allows us to handle 0x01010101 as 0x01.
556 while (ValSizeInBytes > ByteSize) {
557 ValSizeInBytes >>= 1;
559 // If the top half equals the bottom half, we're still ok.
560 if (((Value >> (ValSizeInBytes*8)) & ((1 << (8*ValSizeInBytes))-1)) !=
561 (Value & ((1 << (8*ValSizeInBytes))-1)))
565 // Properly sign extend the value.
566 int ShAmt = (4-ByteSize)*8;
567 int MaskVal = ((int)Value << ShAmt) >> ShAmt;
569 // If this is zero, don't match, zero matches ISD::isBuildVectorAllZeros.
570 if (MaskVal == 0) return SDOperand();
572 // Finally, if this value fits in a 5 bit sext field, return it
573 if (((MaskVal << (32-5)) >> (32-5)) == MaskVal)
574 return DAG.getTargetConstant(MaskVal, MVT::i32);
578 //===----------------------------------------------------------------------===//
579 // LowerOperation implementation
580 //===----------------------------------------------------------------------===//
582 static SDOperand LowerConstantPool(SDOperand Op, SelectionDAG &DAG) {
583 ConstantPoolSDNode *CP = cast<ConstantPoolSDNode>(Op);
584 Constant *C = CP->get();
585 SDOperand CPI = DAG.getTargetConstantPool(C, MVT::i32, CP->getAlignment());
586 SDOperand Zero = DAG.getConstant(0, MVT::i32);
588 const TargetMachine &TM = DAG.getTarget();
590 // If this is a non-darwin platform, we don't support non-static relo models
592 if (TM.getRelocationModel() == Reloc::Static ||
593 !TM.getSubtarget<PPCSubtarget>().isDarwin()) {
594 // Generate non-pic code that has direct accesses to the constant pool.
595 // The address of the global is just (hi(&g)+lo(&g)).
596 SDOperand Hi = DAG.getNode(PPCISD::Hi, MVT::i32, CPI, Zero);
597 SDOperand Lo = DAG.getNode(PPCISD::Lo, MVT::i32, CPI, Zero);
598 return DAG.getNode(ISD::ADD, MVT::i32, Hi, Lo);
601 SDOperand Hi = DAG.getNode(PPCISD::Hi, MVT::i32, CPI, Zero);
602 if (TM.getRelocationModel() == Reloc::PIC) {
603 // With PIC, the first instruction is actually "GR+hi(&G)".
604 Hi = DAG.getNode(ISD::ADD, MVT::i32,
605 DAG.getNode(PPCISD::GlobalBaseReg, MVT::i32), Hi);
608 SDOperand Lo = DAG.getNode(PPCISD::Lo, MVT::i32, CPI, Zero);
609 Lo = DAG.getNode(ISD::ADD, MVT::i32, Hi, Lo);
613 static SDOperand LowerJumpTable(SDOperand Op, SelectionDAG &DAG) {
614 JumpTableSDNode *JT = cast<JumpTableSDNode>(Op);
615 SDOperand JTI = DAG.getTargetJumpTable(JT->getIndex(), MVT::i32);
616 SDOperand Zero = DAG.getConstant(0, MVT::i32);
618 const TargetMachine &TM = DAG.getTarget();
620 // If this is a non-darwin platform, we don't support non-static relo models
622 if (TM.getRelocationModel() == Reloc::Static ||
623 !TM.getSubtarget<PPCSubtarget>().isDarwin()) {
624 // Generate non-pic code that has direct accesses to the constant pool.
625 // The address of the global is just (hi(&g)+lo(&g)).
626 SDOperand Hi = DAG.getNode(PPCISD::Hi, MVT::i32, JTI, Zero);
627 SDOperand Lo = DAG.getNode(PPCISD::Lo, MVT::i32, JTI, Zero);
628 return DAG.getNode(ISD::ADD, MVT::i32, Hi, Lo);
631 SDOperand Hi = DAG.getNode(PPCISD::Hi, MVT::i32, JTI, Zero);
632 if (TM.getRelocationModel() == Reloc::PIC) {
633 // With PIC, the first instruction is actually "GR+hi(&G)".
634 Hi = DAG.getNode(ISD::ADD, MVT::i32,
635 DAG.getNode(PPCISD::GlobalBaseReg, MVT::i32), Hi);
638 SDOperand Lo = DAG.getNode(PPCISD::Lo, MVT::i32, JTI, Zero);
639 Lo = DAG.getNode(ISD::ADD, MVT::i32, Hi, Lo);
643 static SDOperand LowerGlobalAddress(SDOperand Op, SelectionDAG &DAG) {
644 GlobalAddressSDNode *GSDN = cast<GlobalAddressSDNode>(Op);
645 GlobalValue *GV = GSDN->getGlobal();
646 SDOperand GA = DAG.getTargetGlobalAddress(GV, MVT::i32, GSDN->getOffset());
647 SDOperand Zero = DAG.getConstant(0, MVT::i32);
649 const TargetMachine &TM = DAG.getTarget();
651 // If this is a non-darwin platform, we don't support non-static relo models
653 if (TM.getRelocationModel() == Reloc::Static ||
654 !TM.getSubtarget<PPCSubtarget>().isDarwin()) {
655 // Generate non-pic code that has direct accesses to globals.
656 // The address of the global is just (hi(&g)+lo(&g)).
657 SDOperand Hi = DAG.getNode(PPCISD::Hi, MVT::i32, GA, Zero);
658 SDOperand Lo = DAG.getNode(PPCISD::Lo, MVT::i32, GA, Zero);
659 return DAG.getNode(ISD::ADD, MVT::i32, Hi, Lo);
662 SDOperand Hi = DAG.getNode(PPCISD::Hi, MVT::i32, GA, Zero);
663 if (TM.getRelocationModel() == Reloc::PIC) {
664 // With PIC, the first instruction is actually "GR+hi(&G)".
665 Hi = DAG.getNode(ISD::ADD, MVT::i32,
666 DAG.getNode(PPCISD::GlobalBaseReg, MVT::i32), Hi);
669 SDOperand Lo = DAG.getNode(PPCISD::Lo, MVT::i32, GA, Zero);
670 Lo = DAG.getNode(ISD::ADD, MVT::i32, Hi, Lo);
672 if (!GV->hasWeakLinkage() && !GV->hasLinkOnceLinkage() &&
673 (!GV->isExternal() || GV->hasNotBeenReadFromBytecode()))
676 // If the global is weak or external, we have to go through the lazy
678 return DAG.getLoad(MVT::i32, DAG.getEntryNode(), Lo, DAG.getSrcValue(0));
681 static SDOperand LowerSETCC(SDOperand Op, SelectionDAG &DAG) {
682 ISD::CondCode CC = cast<CondCodeSDNode>(Op.getOperand(2))->get();
684 // If we're comparing for equality to zero, expose the fact that this is
685 // implented as a ctlz/srl pair on ppc, so that the dag combiner can
686 // fold the new nodes.
687 if (ConstantSDNode *C = dyn_cast<ConstantSDNode>(Op.getOperand(1))) {
688 if (C->isNullValue() && CC == ISD::SETEQ) {
689 MVT::ValueType VT = Op.getOperand(0).getValueType();
690 SDOperand Zext = Op.getOperand(0);
693 Zext = DAG.getNode(ISD::ZERO_EXTEND, VT, Op.getOperand(0));
695 unsigned Log2b = Log2_32(MVT::getSizeInBits(VT));
696 SDOperand Clz = DAG.getNode(ISD::CTLZ, VT, Zext);
697 SDOperand Scc = DAG.getNode(ISD::SRL, VT, Clz,
698 DAG.getConstant(Log2b, MVT::i32));
699 return DAG.getNode(ISD::TRUNCATE, MVT::i32, Scc);
701 // Leave comparisons against 0 and -1 alone for now, since they're usually
702 // optimized. FIXME: revisit this when we can custom lower all setcc
704 if (C->isAllOnesValue() || C->isNullValue())
708 // If we have an integer seteq/setne, turn it into a compare against zero
709 // by subtracting the rhs from the lhs, which is faster than setting a
710 // condition register, reading it back out, and masking the correct bit.
711 MVT::ValueType LHSVT = Op.getOperand(0).getValueType();
712 if (MVT::isInteger(LHSVT) && (CC == ISD::SETEQ || CC == ISD::SETNE)) {
713 MVT::ValueType VT = Op.getValueType();
714 SDOperand Sub = DAG.getNode(ISD::SUB, LHSVT, Op.getOperand(0),
716 return DAG.getSetCC(VT, Sub, DAG.getConstant(0, LHSVT), CC);
721 static SDOperand LowerVASTART(SDOperand Op, SelectionDAG &DAG,
722 unsigned VarArgsFrameIndex) {
723 // vastart just stores the address of the VarArgsFrameIndex slot into the
724 // memory location argument.
725 SDOperand FR = DAG.getFrameIndex(VarArgsFrameIndex, MVT::i32);
726 return DAG.getNode(ISD::STORE, MVT::Other, Op.getOperand(0), FR,
727 Op.getOperand(1), Op.getOperand(2));
730 static SDOperand LowerFORMAL_ARGUMENTS(SDOperand Op, SelectionDAG &DAG,
731 int &VarArgsFrameIndex) {
732 // TODO: add description of PPC stack frame format, or at least some docs.
734 MachineFunction &MF = DAG.getMachineFunction();
735 MachineFrameInfo *MFI = MF.getFrameInfo();
736 SSARegMap *RegMap = MF.getSSARegMap();
737 std::vector<SDOperand> ArgValues;
738 SDOperand Root = Op.getOperand(0);
740 unsigned ArgOffset = 24;
741 unsigned GPR_remaining = 8;
742 unsigned FPR_remaining = 13;
743 unsigned VR_remaining = 12;
744 unsigned GPR_idx = 0, FPR_idx = 0, VR_idx = 0;
745 static const unsigned GPR[] = {
746 PPC::R3, PPC::R4, PPC::R5, PPC::R6,
747 PPC::R7, PPC::R8, PPC::R9, PPC::R10,
749 static const unsigned FPR[] = {
750 PPC::F1, PPC::F2, PPC::F3, PPC::F4, PPC::F5, PPC::F6, PPC::F7,
751 PPC::F8, PPC::F9, PPC::F10, PPC::F11, PPC::F12, PPC::F13
753 static const unsigned VR[] = {
754 PPC::V2, PPC::V3, PPC::V4, PPC::V5, PPC::V6, PPC::V7, PPC::V8,
755 PPC::V9, PPC::V10, PPC::V11, PPC::V12, PPC::V13
758 // Add DAG nodes to load the arguments or copy them out of registers. On
759 // entry to a function on PPC, the arguments start at offset 24, although the
760 // first ones are often in registers.
761 for (unsigned ArgNo = 0, e = Op.Val->getNumValues()-1; ArgNo != e; ++ArgNo) {
763 bool needsLoad = false;
764 MVT::ValueType ObjectVT = Op.getValue(ArgNo).getValueType();
765 unsigned ObjSize = MVT::getSizeInBits(ObjectVT)/8;
767 unsigned CurArgOffset = ArgOffset;
770 default: assert(0 && "Unhandled argument type!");
772 // All int arguments reserve stack space.
775 if (GPR_remaining > 0) {
776 unsigned VReg = RegMap->createVirtualRegister(&PPC::GPRCRegClass);
777 MF.addLiveIn(GPR[GPR_idx], VReg);
778 ArgVal = DAG.getCopyFromReg(Root, VReg, MVT::i32);
787 // All FP arguments reserve stack space.
788 ArgOffset += ObjSize;
790 // Every 4 bytes of argument space consumes one of the GPRs available for
792 if (GPR_remaining > 0) {
793 unsigned delta = (GPR_remaining > 1 && ObjSize == 8) ? 2 : 1;
794 GPR_remaining -= delta;
797 if (FPR_remaining > 0) {
799 if (ObjectVT == MVT::f32)
800 VReg = RegMap->createVirtualRegister(&PPC::F4RCRegClass);
802 VReg = RegMap->createVirtualRegister(&PPC::F8RCRegClass);
803 MF.addLiveIn(FPR[FPR_idx], VReg);
804 ArgVal = DAG.getCopyFromReg(Root, VReg, ObjectVT);
815 // Note that vector arguments in registers don't reserve stack space.
816 if (VR_remaining > 0) {
817 unsigned VReg = RegMap->createVirtualRegister(&PPC::VRRCRegClass);
818 MF.addLiveIn(VR[VR_idx], VReg);
819 ArgVal = DAG.getCopyFromReg(Root, VReg, ObjectVT);
823 // This should be simple, but requires getting 16-byte aligned stack
825 assert(0 && "Loading VR argument not implemented yet!");
831 // We need to load the argument to a virtual register if we determined above
832 // that we ran out of physical registers of the appropriate type
834 // If the argument is actually used, emit a load from the right stack
836 if (!Op.Val->hasNUsesOfValue(0, ArgNo)) {
837 int FI = MFI->CreateFixedObject(ObjSize, CurArgOffset);
838 SDOperand FIN = DAG.getFrameIndex(FI, MVT::i32);
839 ArgVal = DAG.getLoad(ObjectVT, Root, FIN,
840 DAG.getSrcValue(NULL));
842 // Don't emit a dead load.
843 ArgVal = DAG.getNode(ISD::UNDEF, ObjectVT);
847 ArgValues.push_back(ArgVal);
850 // If the function takes variable number of arguments, make a frame index for
851 // the start of the first vararg value... for expansion of llvm.va_start.
852 bool isVarArg = cast<ConstantSDNode>(Op.getOperand(2))->getValue() != 0;
854 VarArgsFrameIndex = MFI->CreateFixedObject(4, ArgOffset);
855 SDOperand FIN = DAG.getFrameIndex(VarArgsFrameIndex, MVT::i32);
856 // If this function is vararg, store any remaining integer argument regs
857 // to their spots on the stack so that they may be loaded by deferencing the
858 // result of va_next.
859 std::vector<SDOperand> MemOps;
860 for (; GPR_remaining > 0; --GPR_remaining, ++GPR_idx) {
861 unsigned VReg = RegMap->createVirtualRegister(&PPC::GPRCRegClass);
862 MF.addLiveIn(GPR[GPR_idx], VReg);
863 SDOperand Val = DAG.getCopyFromReg(Root, VReg, MVT::i32);
864 SDOperand Store = DAG.getNode(ISD::STORE, MVT::Other, Val.getValue(1),
865 Val, FIN, DAG.getSrcValue(NULL));
866 MemOps.push_back(Store);
867 // Increment the address by four for the next argument to store
868 SDOperand PtrOff = DAG.getConstant(4, MVT::i32);
869 FIN = DAG.getNode(ISD::ADD, MVT::i32, FIN, PtrOff);
872 Root = DAG.getNode(ISD::TokenFactor, MVT::Other, MemOps);
875 ArgValues.push_back(Root);
877 // Return the new list of results.
878 std::vector<MVT::ValueType> RetVT(Op.Val->value_begin(),
879 Op.Val->value_end());
880 return DAG.getNode(ISD::MERGE_VALUES, RetVT, ArgValues);
883 static SDOperand LowerRET(SDOperand Op, SelectionDAG &DAG) {
885 switch(Op.getNumOperands()) {
887 assert(0 && "Do not know how to return this many arguments!");
890 return SDOperand(); // ret void is legal
892 MVT::ValueType ArgVT = Op.getOperand(1).getValueType();
894 if (MVT::isVector(ArgVT))
896 else if (MVT::isInteger(ArgVT))
899 assert(MVT::isFloatingPoint(ArgVT));
903 Copy = DAG.getCopyToReg(Op.getOperand(0), ArgReg, Op.getOperand(1),
906 // If we haven't noted the R3/F1 are live out, do so now.
907 if (DAG.getMachineFunction().liveout_empty())
908 DAG.getMachineFunction().addLiveOut(ArgReg);
912 Copy = DAG.getCopyToReg(Op.getOperand(0), PPC::R3, Op.getOperand(2),
914 Copy = DAG.getCopyToReg(Copy, PPC::R4, Op.getOperand(1),Copy.getValue(1));
915 // If we haven't noted the R3+R4 are live out, do so now.
916 if (DAG.getMachineFunction().liveout_empty()) {
917 DAG.getMachineFunction().addLiveOut(PPC::R3);
918 DAG.getMachineFunction().addLiveOut(PPC::R4);
922 return DAG.getNode(PPCISD::RET_FLAG, MVT::Other, Copy, Copy.getValue(1));
925 /// LowerSELECT_CC - Lower floating point select_cc's into fsel instruction when
927 static SDOperand LowerSELECT_CC(SDOperand Op, SelectionDAG &DAG) {
928 // Not FP? Not a fsel.
929 if (!MVT::isFloatingPoint(Op.getOperand(0).getValueType()) ||
930 !MVT::isFloatingPoint(Op.getOperand(2).getValueType()))
933 ISD::CondCode CC = cast<CondCodeSDNode>(Op.getOperand(4))->get();
935 // Cannot handle SETEQ/SETNE.
936 if (CC == ISD::SETEQ || CC == ISD::SETNE) return SDOperand();
938 MVT::ValueType ResVT = Op.getValueType();
939 MVT::ValueType CmpVT = Op.getOperand(0).getValueType();
940 SDOperand LHS = Op.getOperand(0), RHS = Op.getOperand(1);
941 SDOperand TV = Op.getOperand(2), FV = Op.getOperand(3);
943 // If the RHS of the comparison is a 0.0, we don't need to do the
944 // subtraction at all.
945 if (isFloatingPointZero(RHS))
947 default: break; // SETUO etc aren't handled by fsel.
950 std::swap(TV, FV); // fsel is natively setge, swap operands for setlt
953 if (LHS.getValueType() == MVT::f32) // Comparison is always 64-bits
954 LHS = DAG.getNode(ISD::FP_EXTEND, MVT::f64, LHS);
955 return DAG.getNode(PPCISD::FSEL, ResVT, LHS, TV, FV);
958 std::swap(TV, FV); // fsel is natively setge, swap operands for setlt
961 if (LHS.getValueType() == MVT::f32) // Comparison is always 64-bits
962 LHS = DAG.getNode(ISD::FP_EXTEND, MVT::f64, LHS);
963 return DAG.getNode(PPCISD::FSEL, ResVT,
964 DAG.getNode(ISD::FNEG, MVT::f64, LHS), TV, FV);
969 default: break; // SETUO etc aren't handled by fsel.
972 Cmp = DAG.getNode(ISD::FSUB, CmpVT, LHS, RHS);
973 if (Cmp.getValueType() == MVT::f32) // Comparison is always 64-bits
974 Cmp = DAG.getNode(ISD::FP_EXTEND, MVT::f64, Cmp);
975 return DAG.getNode(PPCISD::FSEL, ResVT, Cmp, FV, TV);
978 Cmp = DAG.getNode(ISD::FSUB, CmpVT, LHS, RHS);
979 if (Cmp.getValueType() == MVT::f32) // Comparison is always 64-bits
980 Cmp = DAG.getNode(ISD::FP_EXTEND, MVT::f64, Cmp);
981 return DAG.getNode(PPCISD::FSEL, ResVT, Cmp, TV, FV);
984 Cmp = DAG.getNode(ISD::FSUB, CmpVT, RHS, LHS);
985 if (Cmp.getValueType() == MVT::f32) // Comparison is always 64-bits
986 Cmp = DAG.getNode(ISD::FP_EXTEND, MVT::f64, Cmp);
987 return DAG.getNode(PPCISD::FSEL, ResVT, Cmp, FV, TV);
990 Cmp = DAG.getNode(ISD::FSUB, CmpVT, RHS, LHS);
991 if (Cmp.getValueType() == MVT::f32) // Comparison is always 64-bits
992 Cmp = DAG.getNode(ISD::FP_EXTEND, MVT::f64, Cmp);
993 return DAG.getNode(PPCISD::FSEL, ResVT, Cmp, TV, FV);
998 static SDOperand LowerFP_TO_SINT(SDOperand Op, SelectionDAG &DAG) {
999 assert(MVT::isFloatingPoint(Op.getOperand(0).getValueType()));
1000 SDOperand Src = Op.getOperand(0);
1001 if (Src.getValueType() == MVT::f32)
1002 Src = DAG.getNode(ISD::FP_EXTEND, MVT::f64, Src);
1005 switch (Op.getValueType()) {
1006 default: assert(0 && "Unhandled FP_TO_SINT type in custom expander!");
1008 Tmp = DAG.getNode(PPCISD::FCTIWZ, MVT::f64, Src);
1011 Tmp = DAG.getNode(PPCISD::FCTIDZ, MVT::f64, Src);
1015 // Convert the FP value to an int value through memory.
1016 SDOperand Bits = DAG.getNode(ISD::BIT_CONVERT, MVT::i64, Tmp);
1017 if (Op.getValueType() == MVT::i32)
1018 Bits = DAG.getNode(ISD::TRUNCATE, MVT::i32, Bits);
1022 static SDOperand LowerSINT_TO_FP(SDOperand Op, SelectionDAG &DAG) {
1023 if (Op.getOperand(0).getValueType() == MVT::i64) {
1024 SDOperand Bits = DAG.getNode(ISD::BIT_CONVERT, MVT::f64, Op.getOperand(0));
1025 SDOperand FP = DAG.getNode(PPCISD::FCFID, MVT::f64, Bits);
1026 if (Op.getValueType() == MVT::f32)
1027 FP = DAG.getNode(ISD::FP_ROUND, MVT::f32, FP);
1031 assert(Op.getOperand(0).getValueType() == MVT::i32 &&
1032 "Unhandled SINT_TO_FP type in custom expander!");
1033 // Since we only generate this in 64-bit mode, we can take advantage of
1034 // 64-bit registers. In particular, sign extend the input value into the
1035 // 64-bit register with extsw, store the WHOLE 64-bit value into the stack
1036 // then lfd it and fcfid it.
1037 MachineFrameInfo *FrameInfo = DAG.getMachineFunction().getFrameInfo();
1038 int FrameIdx = FrameInfo->CreateStackObject(8, 8);
1039 SDOperand FIdx = DAG.getFrameIndex(FrameIdx, MVT::i32);
1041 SDOperand Ext64 = DAG.getNode(PPCISD::EXTSW_32, MVT::i32,
1044 // STD the extended value into the stack slot.
1045 SDOperand Store = DAG.getNode(PPCISD::STD_32, MVT::Other,
1046 DAG.getEntryNode(), Ext64, FIdx,
1047 DAG.getSrcValue(NULL));
1048 // Load the value as a double.
1049 SDOperand Ld = DAG.getLoad(MVT::f64, Store, FIdx, DAG.getSrcValue(NULL));
1051 // FCFID it and return it.
1052 SDOperand FP = DAG.getNode(PPCISD::FCFID, MVT::f64, Ld);
1053 if (Op.getValueType() == MVT::f32)
1054 FP = DAG.getNode(ISD::FP_ROUND, MVT::f32, FP);
1058 static SDOperand LowerSHL(SDOperand Op, SelectionDAG &DAG) {
1059 assert(Op.getValueType() == MVT::i64 &&
1060 Op.getOperand(1).getValueType() == MVT::i32 && "Unexpected SHL!");
1061 // The generic code does a fine job expanding shift by a constant.
1062 if (isa<ConstantSDNode>(Op.getOperand(1))) return SDOperand();
1064 // Otherwise, expand into a bunch of logical ops. Note that these ops
1065 // depend on the PPC behavior for oversized shift amounts.
1066 SDOperand Lo = DAG.getNode(ISD::EXTRACT_ELEMENT, MVT::i32, Op.getOperand(0),
1067 DAG.getConstant(0, MVT::i32));
1068 SDOperand Hi = DAG.getNode(ISD::EXTRACT_ELEMENT, MVT::i32, Op.getOperand(0),
1069 DAG.getConstant(1, MVT::i32));
1070 SDOperand Amt = Op.getOperand(1);
1072 SDOperand Tmp1 = DAG.getNode(ISD::SUB, MVT::i32,
1073 DAG.getConstant(32, MVT::i32), Amt);
1074 SDOperand Tmp2 = DAG.getNode(PPCISD::SHL, MVT::i32, Hi, Amt);
1075 SDOperand Tmp3 = DAG.getNode(PPCISD::SRL, MVT::i32, Lo, Tmp1);
1076 SDOperand Tmp4 = DAG.getNode(ISD::OR , MVT::i32, Tmp2, Tmp3);
1077 SDOperand Tmp5 = DAG.getNode(ISD::ADD, MVT::i32, Amt,
1078 DAG.getConstant(-32U, MVT::i32));
1079 SDOperand Tmp6 = DAG.getNode(PPCISD::SHL, MVT::i32, Lo, Tmp5);
1080 SDOperand OutHi = DAG.getNode(ISD::OR, MVT::i32, Tmp4, Tmp6);
1081 SDOperand OutLo = DAG.getNode(PPCISD::SHL, MVT::i32, Lo, Amt);
1082 return DAG.getNode(ISD::BUILD_PAIR, MVT::i64, OutLo, OutHi);
1085 static SDOperand LowerSRL(SDOperand Op, SelectionDAG &DAG) {
1086 assert(Op.getValueType() == MVT::i64 &&
1087 Op.getOperand(1).getValueType() == MVT::i32 && "Unexpected SHL!");
1088 // The generic code does a fine job expanding shift by a constant.
1089 if (isa<ConstantSDNode>(Op.getOperand(1))) return SDOperand();
1091 // Otherwise, expand into a bunch of logical ops. Note that these ops
1092 // depend on the PPC behavior for oversized shift amounts.
1093 SDOperand Lo = DAG.getNode(ISD::EXTRACT_ELEMENT, MVT::i32, Op.getOperand(0),
1094 DAG.getConstant(0, MVT::i32));
1095 SDOperand Hi = DAG.getNode(ISD::EXTRACT_ELEMENT, MVT::i32, Op.getOperand(0),
1096 DAG.getConstant(1, MVT::i32));
1097 SDOperand Amt = Op.getOperand(1);
1099 SDOperand Tmp1 = DAG.getNode(ISD::SUB, MVT::i32,
1100 DAG.getConstant(32, MVT::i32), Amt);
1101 SDOperand Tmp2 = DAG.getNode(PPCISD::SRL, MVT::i32, Lo, Amt);
1102 SDOperand Tmp3 = DAG.getNode(PPCISD::SHL, MVT::i32, Hi, Tmp1);
1103 SDOperand Tmp4 = DAG.getNode(ISD::OR , MVT::i32, Tmp2, Tmp3);
1104 SDOperand Tmp5 = DAG.getNode(ISD::ADD, MVT::i32, Amt,
1105 DAG.getConstant(-32U, MVT::i32));
1106 SDOperand Tmp6 = DAG.getNode(PPCISD::SRL, MVT::i32, Hi, Tmp5);
1107 SDOperand OutLo = DAG.getNode(ISD::OR, MVT::i32, Tmp4, Tmp6);
1108 SDOperand OutHi = DAG.getNode(PPCISD::SRL, MVT::i32, Hi, Amt);
1109 return DAG.getNode(ISD::BUILD_PAIR, MVT::i64, OutLo, OutHi);
1112 static SDOperand LowerSRA(SDOperand Op, SelectionDAG &DAG) {
1113 assert(Op.getValueType() == MVT::i64 &&
1114 Op.getOperand(1).getValueType() == MVT::i32 && "Unexpected SRA!");
1115 // The generic code does a fine job expanding shift by a constant.
1116 if (isa<ConstantSDNode>(Op.getOperand(1))) return SDOperand();
1118 // Otherwise, expand into a bunch of logical ops, followed by a select_cc.
1119 SDOperand Lo = DAG.getNode(ISD::EXTRACT_ELEMENT, MVT::i32, Op.getOperand(0),
1120 DAG.getConstant(0, MVT::i32));
1121 SDOperand Hi = DAG.getNode(ISD::EXTRACT_ELEMENT, MVT::i32, Op.getOperand(0),
1122 DAG.getConstant(1, MVT::i32));
1123 SDOperand Amt = Op.getOperand(1);
1125 SDOperand Tmp1 = DAG.getNode(ISD::SUB, MVT::i32,
1126 DAG.getConstant(32, MVT::i32), Amt);
1127 SDOperand Tmp2 = DAG.getNode(PPCISD::SRL, MVT::i32, Lo, Amt);
1128 SDOperand Tmp3 = DAG.getNode(PPCISD::SHL, MVT::i32, Hi, Tmp1);
1129 SDOperand Tmp4 = DAG.getNode(ISD::OR , MVT::i32, Tmp2, Tmp3);
1130 SDOperand Tmp5 = DAG.getNode(ISD::ADD, MVT::i32, Amt,
1131 DAG.getConstant(-32U, MVT::i32));
1132 SDOperand Tmp6 = DAG.getNode(PPCISD::SRA, MVT::i32, Hi, Tmp5);
1133 SDOperand OutHi = DAG.getNode(PPCISD::SRA, MVT::i32, Hi, Amt);
1134 SDOperand OutLo = DAG.getSelectCC(Tmp5, DAG.getConstant(0, MVT::i32),
1135 Tmp4, Tmp6, ISD::SETLE);
1136 return DAG.getNode(ISD::BUILD_PAIR, MVT::i64, OutLo, OutHi);
1139 //===----------------------------------------------------------------------===//
1140 // Vector related lowering.
1143 // If this is a vector of constants or undefs, get the bits. A bit in
1144 // UndefBits is set if the corresponding element of the vector is an
1145 // ISD::UNDEF value. For undefs, the corresponding VectorBits values are
1146 // zero. Return true if this is not an array of constants, false if it is.
1148 static bool GetConstantBuildVectorBits(SDNode *BV, uint64_t VectorBits[2],
1149 uint64_t UndefBits[2]) {
1150 // Start with zero'd results.
1151 VectorBits[0] = VectorBits[1] = UndefBits[0] = UndefBits[1] = 0;
1153 unsigned EltBitSize = MVT::getSizeInBits(BV->getOperand(0).getValueType());
1154 for (unsigned i = 0, e = BV->getNumOperands(); i != e; ++i) {
1155 SDOperand OpVal = BV->getOperand(i);
1157 unsigned PartNo = i >= e/2; // In the upper 128 bits?
1158 unsigned SlotNo = e/2 - (i & (e/2-1))-1; // Which subpiece of the uint64_t.
1160 uint64_t EltBits = 0;
1161 if (OpVal.getOpcode() == ISD::UNDEF) {
1162 uint64_t EltUndefBits = ~0U >> (32-EltBitSize);
1163 UndefBits[PartNo] |= EltUndefBits << (SlotNo*EltBitSize);
1165 } else if (ConstantSDNode *CN = dyn_cast<ConstantSDNode>(OpVal)) {
1166 EltBits = CN->getValue() & (~0U >> (32-EltBitSize));
1167 } else if (ConstantFPSDNode *CN = dyn_cast<ConstantFPSDNode>(OpVal)) {
1168 assert(CN->getValueType(0) == MVT::f32 &&
1169 "Only one legal FP vector type!");
1170 EltBits = FloatToBits(CN->getValue());
1172 // Nonconstant element.
1176 VectorBits[PartNo] |= EltBits << (SlotNo*EltBitSize);
1179 //printf("%llx %llx %llx %llx\n",
1180 // VectorBits[0], VectorBits[1], UndefBits[0], UndefBits[1]);
1184 // If this is a splat (repetition) of a value across the whole vector, return
1185 // the smallest size that splats it. For example, "0x01010101010101..." is a
1186 // splat of 0x01, 0x0101, and 0x01010101. We return SplatBits = 0x01 and
1187 // SplatSize = 1 byte.
1188 static bool isConstantSplat(const uint64_t Bits128[2],
1189 const uint64_t Undef128[2],
1190 unsigned &SplatBits, unsigned &SplatUndef,
1191 unsigned &SplatSize) {
1193 // Don't let undefs prevent splats from matching. See if the top 64-bits are
1194 // the same as the lower 64-bits, ignoring undefs.
1195 if ((Bits128[0] & ~Undef128[1]) != (Bits128[1] & ~Undef128[0]))
1196 return false; // Can't be a splat if two pieces don't match.
1198 uint64_t Bits64 = Bits128[0] | Bits128[1];
1199 uint64_t Undef64 = Undef128[0] & Undef128[1];
1201 // Check that the top 32-bits are the same as the lower 32-bits, ignoring
1203 if ((Bits64 & (~Undef64 >> 32)) != ((Bits64 >> 32) & ~Undef64))
1204 return false; // Can't be a splat if two pieces don't match.
1206 uint32_t Bits32 = uint32_t(Bits64) | uint32_t(Bits64 >> 32);
1207 uint32_t Undef32 = uint32_t(Undef64) & uint32_t(Undef64 >> 32);
1209 // If the top 16-bits are different than the lower 16-bits, ignoring
1210 // undefs, we have an i32 splat.
1211 if ((Bits32 & (~Undef32 >> 16)) != ((Bits32 >> 16) & ~Undef32)) {
1213 SplatUndef = Undef32;
1218 uint16_t Bits16 = uint16_t(Bits32) | uint16_t(Bits32 >> 16);
1219 uint16_t Undef16 = uint16_t(Undef32) & uint16_t(Undef32 >> 16);
1221 // If the top 8-bits are different than the lower 8-bits, ignoring
1222 // undefs, we have an i16 splat.
1223 if ((Bits16 & (uint16_t(~Undef16) >> 8)) != ((Bits16 >> 8) & ~Undef16)) {
1225 SplatUndef = Undef16;
1230 // Otherwise, we have an 8-bit splat.
1231 SplatBits = uint8_t(Bits16) | uint8_t(Bits16 >> 8);
1232 SplatUndef = uint8_t(Undef16) & uint8_t(Undef16 >> 8);
1237 /// BuildSplatI - Build a canonical splati of Val with an element size of
1238 /// SplatSize. Cast the result to VT.
1239 static SDOperand BuildSplatI(int Val, unsigned SplatSize, MVT::ValueType VT,
1240 SelectionDAG &DAG) {
1241 assert(Val >= -16 && Val <= 15 && "vsplti is out of range!");
1243 // Force vspltis[hw] -1 to vspltisb -1.
1244 if (Val == -1) SplatSize = 1;
1246 static const MVT::ValueType VTys[] = { // canonical VT to use for each size.
1247 MVT::v16i8, MVT::v8i16, MVT::Other, MVT::v4i32
1249 MVT::ValueType CanonicalVT = VTys[SplatSize-1];
1251 // Build a canonical splat for this value.
1252 SDOperand Elt = DAG.getConstant(Val, MVT::getVectorBaseType(CanonicalVT));
1253 std::vector<SDOperand> Ops(MVT::getVectorNumElements(CanonicalVT), Elt);
1254 SDOperand Res = DAG.getNode(ISD::BUILD_VECTOR, CanonicalVT, Ops);
1255 return DAG.getNode(ISD::BIT_CONVERT, VT, Res);
1258 /// BuildIntrinsicOp - Return a binary operator intrinsic node with the
1259 /// specified intrinsic ID.
1260 static SDOperand BuildIntrinsicOp(unsigned IID, SDOperand LHS, SDOperand RHS,
1262 MVT::ValueType DestVT = MVT::Other) {
1263 if (DestVT == MVT::Other) DestVT = LHS.getValueType();
1264 return DAG.getNode(ISD::INTRINSIC_WO_CHAIN, DestVT,
1265 DAG.getConstant(IID, MVT::i32), LHS, RHS);
1268 /// BuildIntrinsicOp - Return a ternary operator intrinsic node with the
1269 /// specified intrinsic ID.
1270 static SDOperand BuildIntrinsicOp(unsigned IID, SDOperand Op0, SDOperand Op1,
1271 SDOperand Op2, SelectionDAG &DAG,
1272 MVT::ValueType DestVT = MVT::Other) {
1273 if (DestVT == MVT::Other) DestVT = Op0.getValueType();
1274 return DAG.getNode(ISD::INTRINSIC_WO_CHAIN, DestVT,
1275 DAG.getConstant(IID, MVT::i32), Op0, Op1, Op2);
1279 /// BuildVSLDOI - Return a VECTOR_SHUFFLE that is a vsldoi of the specified
1280 /// amount. The result has the specified value type.
1281 static SDOperand BuildVSLDOI(SDOperand LHS, SDOperand RHS, unsigned Amt,
1282 MVT::ValueType VT, SelectionDAG &DAG) {
1283 // Force LHS/RHS to be the right type.
1284 LHS = DAG.getNode(ISD::BIT_CONVERT, MVT::v16i8, LHS);
1285 RHS = DAG.getNode(ISD::BIT_CONVERT, MVT::v16i8, RHS);
1287 std::vector<SDOperand> Ops;
1288 for (unsigned i = 0; i != 16; ++i)
1289 Ops.push_back(DAG.getConstant(i+Amt, MVT::i32));
1290 SDOperand T = DAG.getNode(ISD::VECTOR_SHUFFLE, MVT::v16i8, LHS, RHS,
1291 DAG.getNode(ISD::BUILD_VECTOR, MVT::v16i8, Ops));
1292 return DAG.getNode(ISD::BIT_CONVERT, VT, T);
1295 // If this is a case we can't handle, return null and let the default
1296 // expansion code take care of it. If we CAN select this case, and if it
1297 // selects to a single instruction, return Op. Otherwise, if we can codegen
1298 // this case more efficiently than a constant pool load, lower it to the
1299 // sequence of ops that should be used.
1300 static SDOperand LowerBUILD_VECTOR(SDOperand Op, SelectionDAG &DAG) {
1301 // If this is a vector of constants or undefs, get the bits. A bit in
1302 // UndefBits is set if the corresponding element of the vector is an
1303 // ISD::UNDEF value. For undefs, the corresponding VectorBits values are
1305 uint64_t VectorBits[2];
1306 uint64_t UndefBits[2];
1307 if (GetConstantBuildVectorBits(Op.Val, VectorBits, UndefBits))
1308 return SDOperand(); // Not a constant vector.
1310 // If this is a splat (repetition) of a value across the whole vector, return
1311 // the smallest size that splats it. For example, "0x01010101010101..." is a
1312 // splat of 0x01, 0x0101, and 0x01010101. We return SplatBits = 0x01 and
1313 // SplatSize = 1 byte.
1314 unsigned SplatBits, SplatUndef, SplatSize;
1315 if (isConstantSplat(VectorBits, UndefBits, SplatBits, SplatUndef, SplatSize)){
1316 bool HasAnyUndefs = (UndefBits[0] | UndefBits[1]) != 0;
1318 // First, handle single instruction cases.
1321 if (SplatBits == 0) {
1322 // Canonicalize all zero vectors to be v4i32.
1323 if (Op.getValueType() != MVT::v4i32 || HasAnyUndefs) {
1324 SDOperand Z = DAG.getConstant(0, MVT::i32);
1325 Z = DAG.getNode(ISD::BUILD_VECTOR, MVT::v4i32, Z, Z, Z, Z);
1326 Op = DAG.getNode(ISD::BIT_CONVERT, Op.getValueType(), Z);
1331 // If the sign extended value is in the range [-16,15], use VSPLTI[bhw].
1332 int32_t SextVal= int32_t(SplatBits << (32-8*SplatSize)) >> (32-8*SplatSize);
1333 if (SextVal >= -16 && SextVal <= 15)
1334 return BuildSplatI(SextVal, SplatSize, Op.getValueType(), DAG);
1337 // Two instruction sequences.
1339 // If this value is in the range [-32,30] and is even, use:
1340 // tmp = VSPLTI[bhw], result = add tmp, tmp
1341 if (SextVal >= -32 && SextVal <= 30 && (SextVal & 1) == 0) {
1342 Op = BuildSplatI(SextVal >> 1, SplatSize, Op.getValueType(), DAG);
1343 return DAG.getNode(ISD::ADD, Op.getValueType(), Op, Op);
1346 // If this is 0x8000_0000 x 4, turn into vspltisw + vslw. If it is
1347 // 0x7FFF_FFFF x 4, turn it into not(0x8000_0000). This is important
1349 if (SplatSize == 4 && SplatBits == (0x7FFFFFFF&~SplatUndef)) {
1350 // Make -1 and vspltisw -1:
1351 SDOperand OnesV = BuildSplatI(-1, 4, MVT::v4i32, DAG);
1353 // Make the VSLW intrinsic, computing 0x8000_0000.
1354 SDOperand Res = BuildIntrinsicOp(Intrinsic::ppc_altivec_vslw, OnesV,
1357 // xor by OnesV to invert it.
1358 Res = DAG.getNode(ISD::XOR, MVT::v4i32, Res, OnesV);
1359 return DAG.getNode(ISD::BIT_CONVERT, Op.getValueType(), Res);
1362 // Check to see if this is a wide variety of vsplti*, binop self cases.
1363 unsigned SplatBitSize = SplatSize*8;
1364 static const char SplatCsts[] = {
1365 -1, 1, -2, 2, -3, 3, -4, 4, -5, 5, -6, 6, -7, 7,
1366 -8, 8, -9, 9, -10, 10, -11, 11, -12, 12, -13, 13, 14, -14, 15, -15, -16
1368 for (unsigned idx = 0; idx < sizeof(SplatCsts)/sizeof(SplatCsts[0]); ++idx){
1369 // Indirect through the SplatCsts array so that we favor 'vsplti -1' for
1370 // cases which are ambiguous (e.g. formation of 0x8000_0000). 'vsplti -1'
1371 int i = SplatCsts[idx];
1373 // Figure out what shift amount will be used by altivec if shifted by i in
1375 unsigned TypeShiftAmt = i & (SplatBitSize-1);
1377 // vsplti + shl self.
1378 if (SextVal == (i << (int)TypeShiftAmt)) {
1379 Op = BuildSplatI(i, SplatSize, Op.getValueType(), DAG);
1380 static const unsigned IIDs[] = { // Intrinsic to use for each size.
1381 Intrinsic::ppc_altivec_vslb, Intrinsic::ppc_altivec_vslh, 0,
1382 Intrinsic::ppc_altivec_vslw
1384 return BuildIntrinsicOp(IIDs[SplatSize-1], Op, Op, DAG);
1387 // vsplti + srl self.
1388 if (SextVal == (int)((unsigned)i >> TypeShiftAmt)) {
1389 Op = BuildSplatI(i, SplatSize, Op.getValueType(), DAG);
1390 static const unsigned IIDs[] = { // Intrinsic to use for each size.
1391 Intrinsic::ppc_altivec_vsrb, Intrinsic::ppc_altivec_vsrh, 0,
1392 Intrinsic::ppc_altivec_vsrw
1394 return BuildIntrinsicOp(IIDs[SplatSize-1], Op, Op, DAG);
1397 // vsplti + sra self.
1398 if (SextVal == (int)((unsigned)i >> TypeShiftAmt)) {
1399 Op = BuildSplatI(i, SplatSize, Op.getValueType(), DAG);
1400 static const unsigned IIDs[] = { // Intrinsic to use for each size.
1401 Intrinsic::ppc_altivec_vsrab, Intrinsic::ppc_altivec_vsrah, 0,
1402 Intrinsic::ppc_altivec_vsraw
1404 return BuildIntrinsicOp(IIDs[SplatSize-1], Op, Op, DAG);
1407 // vsplti + rol self.
1408 if (SextVal == (int)(((unsigned)i << TypeShiftAmt) |
1409 ((unsigned)i >> (SplatBitSize-TypeShiftAmt)))) {
1410 Op = BuildSplatI(i, SplatSize, Op.getValueType(), DAG);
1411 static const unsigned IIDs[] = { // Intrinsic to use for each size.
1412 Intrinsic::ppc_altivec_vrlb, Intrinsic::ppc_altivec_vrlh, 0,
1413 Intrinsic::ppc_altivec_vrlw
1415 return BuildIntrinsicOp(IIDs[SplatSize-1], Op, Op, DAG);
1418 // t = vsplti c, result = vsldoi t, t, 1
1419 if (SextVal == ((i << 8) | (i >> (TypeShiftAmt-8)))) {
1420 SDOperand T = BuildSplatI(i, SplatSize, MVT::v16i8, DAG);
1421 return BuildVSLDOI(T, T, 1, Op.getValueType(), DAG);
1423 // t = vsplti c, result = vsldoi t, t, 2
1424 if (SextVal == ((i << 16) | (i >> (TypeShiftAmt-16)))) {
1425 SDOperand T = BuildSplatI(i, SplatSize, MVT::v16i8, DAG);
1426 return BuildVSLDOI(T, T, 2, Op.getValueType(), DAG);
1428 // t = vsplti c, result = vsldoi t, t, 3
1429 if (SextVal == ((i << 24) | (i >> (TypeShiftAmt-24)))) {
1430 SDOperand T = BuildSplatI(i, SplatSize, MVT::v16i8, DAG);
1431 return BuildVSLDOI(T, T, 3, Op.getValueType(), DAG);
1435 // Three instruction sequences.
1437 // Odd, in range [17,31]: (vsplti C)-(vsplti -16).
1438 if (SextVal >= 0 && SextVal <= 31) {
1439 SDOperand LHS = BuildSplatI(SextVal-16, SplatSize, Op.getValueType(),DAG);
1440 SDOperand RHS = BuildSplatI(-16, SplatSize, Op.getValueType(), DAG);
1441 return DAG.getNode(ISD::SUB, Op.getValueType(), LHS, RHS);
1443 // Odd, in range [-31,-17]: (vsplti C)+(vsplti -16).
1444 if (SextVal >= -31 && SextVal <= 0) {
1445 SDOperand LHS = BuildSplatI(SextVal+16, SplatSize, Op.getValueType(),DAG);
1446 SDOperand RHS = BuildSplatI(-16, SplatSize, Op.getValueType(), DAG);
1447 return DAG.getNode(ISD::ADD, Op.getValueType(), LHS, RHS);
1454 /// GeneratePerfectShuffle - Given an entry in the perfect-shuffle table, emit
1455 /// the specified operations to build the shuffle.
1456 static SDOperand GeneratePerfectShuffle(unsigned PFEntry, SDOperand LHS,
1457 SDOperand RHS, SelectionDAG &DAG) {
1458 unsigned OpNum = (PFEntry >> 26) & 0x0F;
1459 unsigned LHSID = (PFEntry >> 13) & ((1 << 13)-1);
1460 unsigned RHSID = (PFEntry >> 0) & ((1 << 13)-1);
1463 OP_COPY = 0, // Copy, used for things like <u,u,u,3> to say it is <0,1,2,3>
1475 if (OpNum == OP_COPY) {
1476 if (LHSID == (1*9+2)*9+3) return LHS;
1477 assert(LHSID == ((4*9+5)*9+6)*9+7 && "Illegal OP_COPY!");
1481 SDOperand OpLHS, OpRHS;
1482 OpLHS = GeneratePerfectShuffle(PerfectShuffleTable[LHSID], LHS, RHS, DAG);
1483 OpRHS = GeneratePerfectShuffle(PerfectShuffleTable[RHSID], LHS, RHS, DAG);
1485 unsigned ShufIdxs[16];
1487 default: assert(0 && "Unknown i32 permute!");
1489 ShufIdxs[ 0] = 0; ShufIdxs[ 1] = 1; ShufIdxs[ 2] = 2; ShufIdxs[ 3] = 3;
1490 ShufIdxs[ 4] = 16; ShufIdxs[ 5] = 17; ShufIdxs[ 6] = 18; ShufIdxs[ 7] = 19;
1491 ShufIdxs[ 8] = 4; ShufIdxs[ 9] = 5; ShufIdxs[10] = 6; ShufIdxs[11] = 7;
1492 ShufIdxs[12] = 20; ShufIdxs[13] = 21; ShufIdxs[14] = 22; ShufIdxs[15] = 23;
1495 ShufIdxs[ 0] = 8; ShufIdxs[ 1] = 9; ShufIdxs[ 2] = 10; ShufIdxs[ 3] = 11;
1496 ShufIdxs[ 4] = 24; ShufIdxs[ 5] = 25; ShufIdxs[ 6] = 26; ShufIdxs[ 7] = 27;
1497 ShufIdxs[ 8] = 12; ShufIdxs[ 9] = 13; ShufIdxs[10] = 14; ShufIdxs[11] = 15;
1498 ShufIdxs[12] = 28; ShufIdxs[13] = 29; ShufIdxs[14] = 30; ShufIdxs[15] = 31;
1501 for (unsigned i = 0; i != 16; ++i)
1502 ShufIdxs[i] = (i&3)+0;
1505 for (unsigned i = 0; i != 16; ++i)
1506 ShufIdxs[i] = (i&3)+4;
1509 for (unsigned i = 0; i != 16; ++i)
1510 ShufIdxs[i] = (i&3)+8;
1513 for (unsigned i = 0; i != 16; ++i)
1514 ShufIdxs[i] = (i&3)+12;
1517 return BuildVSLDOI(OpLHS, OpRHS, 4, OpLHS.getValueType(), DAG);
1519 return BuildVSLDOI(OpLHS, OpRHS, 8, OpLHS.getValueType(), DAG);
1521 return BuildVSLDOI(OpLHS, OpRHS, 12, OpLHS.getValueType(), DAG);
1523 std::vector<SDOperand> Ops;
1524 for (unsigned i = 0; i != 16; ++i)
1525 Ops.push_back(DAG.getConstant(ShufIdxs[i], MVT::i32));
1527 return DAG.getNode(ISD::VECTOR_SHUFFLE, OpLHS.getValueType(), OpLHS, OpRHS,
1528 DAG.getNode(ISD::BUILD_VECTOR, MVT::v16i8, Ops));
1531 /// LowerVECTOR_SHUFFLE - Return the code we lower for VECTOR_SHUFFLE. If this
1532 /// is a shuffle we can handle in a single instruction, return it. Otherwise,
1533 /// return the code it can be lowered into. Worst case, it can always be
1534 /// lowered into a vperm.
1535 static SDOperand LowerVECTOR_SHUFFLE(SDOperand Op, SelectionDAG &DAG) {
1536 SDOperand V1 = Op.getOperand(0);
1537 SDOperand V2 = Op.getOperand(1);
1538 SDOperand PermMask = Op.getOperand(2);
1540 // Cases that are handled by instructions that take permute immediates
1541 // (such as vsplt*) should be left as VECTOR_SHUFFLE nodes so they can be
1542 // selected by the instruction selector.
1543 if (V2.getOpcode() == ISD::UNDEF) {
1544 if (PPC::isSplatShuffleMask(PermMask.Val, 1) ||
1545 PPC::isSplatShuffleMask(PermMask.Val, 2) ||
1546 PPC::isSplatShuffleMask(PermMask.Val, 4) ||
1547 PPC::isVPKUWUMShuffleMask(PermMask.Val, true) ||
1548 PPC::isVPKUHUMShuffleMask(PermMask.Val, true) ||
1549 PPC::isVSLDOIShuffleMask(PermMask.Val, true) != -1 ||
1550 PPC::isVMRGLShuffleMask(PermMask.Val, 1, true) ||
1551 PPC::isVMRGLShuffleMask(PermMask.Val, 2, true) ||
1552 PPC::isVMRGLShuffleMask(PermMask.Val, 4, true) ||
1553 PPC::isVMRGHShuffleMask(PermMask.Val, 1, true) ||
1554 PPC::isVMRGHShuffleMask(PermMask.Val, 2, true) ||
1555 PPC::isVMRGHShuffleMask(PermMask.Val, 4, true)) {
1560 // Altivec has a variety of "shuffle immediates" that take two vector inputs
1561 // and produce a fixed permutation. If any of these match, do not lower to
1563 if (PPC::isVPKUWUMShuffleMask(PermMask.Val, false) ||
1564 PPC::isVPKUHUMShuffleMask(PermMask.Val, false) ||
1565 PPC::isVSLDOIShuffleMask(PermMask.Val, false) != -1 ||
1566 PPC::isVMRGLShuffleMask(PermMask.Val, 1, false) ||
1567 PPC::isVMRGLShuffleMask(PermMask.Val, 2, false) ||
1568 PPC::isVMRGLShuffleMask(PermMask.Val, 4, false) ||
1569 PPC::isVMRGHShuffleMask(PermMask.Val, 1, false) ||
1570 PPC::isVMRGHShuffleMask(PermMask.Val, 2, false) ||
1571 PPC::isVMRGHShuffleMask(PermMask.Val, 4, false))
1574 // Check to see if this is a shuffle of 4-byte values. If so, we can use our
1575 // perfect shuffle table to emit an optimal matching sequence.
1576 unsigned PFIndexes[4];
1577 bool isFourElementShuffle = true;
1578 for (unsigned i = 0; i != 4 && isFourElementShuffle; ++i) { // Element number
1579 unsigned EltNo = 8; // Start out undef.
1580 for (unsigned j = 0; j != 4; ++j) { // Intra-element byte.
1581 if (PermMask.getOperand(i*4+j).getOpcode() == ISD::UNDEF)
1582 continue; // Undef, ignore it.
1584 unsigned ByteSource =
1585 cast<ConstantSDNode>(PermMask.getOperand(i*4+j))->getValue();
1586 if ((ByteSource & 3) != j) {
1587 isFourElementShuffle = false;
1592 EltNo = ByteSource/4;
1593 } else if (EltNo != ByteSource/4) {
1594 isFourElementShuffle = false;
1598 PFIndexes[i] = EltNo;
1601 // If this shuffle can be expressed as a shuffle of 4-byte elements, use the
1602 // perfect shuffle vector to determine if it is cost effective to do this as
1603 // discrete instructions, or whether we should use a vperm.
1604 if (isFourElementShuffle) {
1605 // Compute the index in the perfect shuffle table.
1606 unsigned PFTableIndex =
1607 PFIndexes[0]*9*9*9+PFIndexes[1]*9*9+PFIndexes[2]*9+PFIndexes[3];
1609 unsigned PFEntry = PerfectShuffleTable[PFTableIndex];
1610 unsigned Cost = (PFEntry >> 30);
1612 // Determining when to avoid vperm is tricky. Many things affect the cost
1613 // of vperm, particularly how many times the perm mask needs to be computed.
1614 // For example, if the perm mask can be hoisted out of a loop or is already
1615 // used (perhaps because there are multiple permutes with the same shuffle
1616 // mask?) the vperm has a cost of 1. OTOH, hoisting the permute mask out of
1617 // the loop requires an extra register.
1619 // As a compromise, we only emit discrete instructions if the shuffle can be
1620 // generated in 3 or fewer operations. When we have loop information
1621 // available, if this block is within a loop, we should avoid using vperm
1622 // for 3-operation perms and use a constant pool load instead.
1624 return GeneratePerfectShuffle(PFEntry, V1, V2, DAG);
1627 // Lower this to a VPERM(V1, V2, V3) expression, where V3 is a constant
1628 // vector that will get spilled to the constant pool.
1629 if (V2.getOpcode() == ISD::UNDEF) V2 = V1;
1631 // The SHUFFLE_VECTOR mask is almost exactly what we want for vperm, except
1632 // that it is in input element units, not in bytes. Convert now.
1633 MVT::ValueType EltVT = MVT::getVectorBaseType(V1.getValueType());
1634 unsigned BytesPerElement = MVT::getSizeInBits(EltVT)/8;
1636 std::vector<SDOperand> ResultMask;
1637 for (unsigned i = 0, e = PermMask.getNumOperands(); i != e; ++i) {
1639 if (PermMask.getOperand(i).getOpcode() == ISD::UNDEF)
1642 SrcElt = cast<ConstantSDNode>(PermMask.getOperand(i))->getValue();
1644 for (unsigned j = 0; j != BytesPerElement; ++j)
1645 ResultMask.push_back(DAG.getConstant(SrcElt*BytesPerElement+j,
1649 SDOperand VPermMask = DAG.getNode(ISD::BUILD_VECTOR, MVT::v16i8, ResultMask);
1650 return DAG.getNode(PPCISD::VPERM, V1.getValueType(), V1, V2, VPermMask);
1653 /// getAltivecCompareInfo - Given an intrinsic, return false if it is not an
1654 /// altivec comparison. If it is, return true and fill in Opc/isDot with
1655 /// information about the intrinsic.
1656 static bool getAltivecCompareInfo(SDOperand Intrin, int &CompareOpc,
1658 unsigned IntrinsicID = cast<ConstantSDNode>(Intrin.getOperand(0))->getValue();
1661 switch (IntrinsicID) {
1662 default: return false;
1663 // Comparison predicates.
1664 case Intrinsic::ppc_altivec_vcmpbfp_p: CompareOpc = 966; isDot = 1; break;
1665 case Intrinsic::ppc_altivec_vcmpeqfp_p: CompareOpc = 198; isDot = 1; break;
1666 case Intrinsic::ppc_altivec_vcmpequb_p: CompareOpc = 6; isDot = 1; break;
1667 case Intrinsic::ppc_altivec_vcmpequh_p: CompareOpc = 70; isDot = 1; break;
1668 case Intrinsic::ppc_altivec_vcmpequw_p: CompareOpc = 134; isDot = 1; break;
1669 case Intrinsic::ppc_altivec_vcmpgefp_p: CompareOpc = 454; isDot = 1; break;
1670 case Intrinsic::ppc_altivec_vcmpgtfp_p: CompareOpc = 710; isDot = 1; break;
1671 case Intrinsic::ppc_altivec_vcmpgtsb_p: CompareOpc = 774; isDot = 1; break;
1672 case Intrinsic::ppc_altivec_vcmpgtsh_p: CompareOpc = 838; isDot = 1; break;
1673 case Intrinsic::ppc_altivec_vcmpgtsw_p: CompareOpc = 902; isDot = 1; break;
1674 case Intrinsic::ppc_altivec_vcmpgtub_p: CompareOpc = 518; isDot = 1; break;
1675 case Intrinsic::ppc_altivec_vcmpgtuh_p: CompareOpc = 582; isDot = 1; break;
1676 case Intrinsic::ppc_altivec_vcmpgtuw_p: CompareOpc = 646; isDot = 1; break;
1678 // Normal Comparisons.
1679 case Intrinsic::ppc_altivec_vcmpbfp: CompareOpc = 966; isDot = 0; break;
1680 case Intrinsic::ppc_altivec_vcmpeqfp: CompareOpc = 198; isDot = 0; break;
1681 case Intrinsic::ppc_altivec_vcmpequb: CompareOpc = 6; isDot = 0; break;
1682 case Intrinsic::ppc_altivec_vcmpequh: CompareOpc = 70; isDot = 0; break;
1683 case Intrinsic::ppc_altivec_vcmpequw: CompareOpc = 134; isDot = 0; break;
1684 case Intrinsic::ppc_altivec_vcmpgefp: CompareOpc = 454; isDot = 0; break;
1685 case Intrinsic::ppc_altivec_vcmpgtfp: CompareOpc = 710; isDot = 0; break;
1686 case Intrinsic::ppc_altivec_vcmpgtsb: CompareOpc = 774; isDot = 0; break;
1687 case Intrinsic::ppc_altivec_vcmpgtsh: CompareOpc = 838; isDot = 0; break;
1688 case Intrinsic::ppc_altivec_vcmpgtsw: CompareOpc = 902; isDot = 0; break;
1689 case Intrinsic::ppc_altivec_vcmpgtub: CompareOpc = 518; isDot = 0; break;
1690 case Intrinsic::ppc_altivec_vcmpgtuh: CompareOpc = 582; isDot = 0; break;
1691 case Intrinsic::ppc_altivec_vcmpgtuw: CompareOpc = 646; isDot = 0; break;
1696 /// LowerINTRINSIC_WO_CHAIN - If this is an intrinsic that we want to custom
1697 /// lower, do it, otherwise return null.
1698 static SDOperand LowerINTRINSIC_WO_CHAIN(SDOperand Op, SelectionDAG &DAG) {
1699 // If this is a lowered altivec predicate compare, CompareOpc is set to the
1700 // opcode number of the comparison.
1703 if (!getAltivecCompareInfo(Op, CompareOpc, isDot))
1704 return SDOperand(); // Don't custom lower most intrinsics.
1706 // If this is a non-dot comparison, make the VCMP node and we are done.
1708 SDOperand Tmp = DAG.getNode(PPCISD::VCMP, Op.getOperand(2).getValueType(),
1709 Op.getOperand(1), Op.getOperand(2),
1710 DAG.getConstant(CompareOpc, MVT::i32));
1711 return DAG.getNode(ISD::BIT_CONVERT, Op.getValueType(), Tmp);
1714 // Create the PPCISD altivec 'dot' comparison node.
1715 std::vector<SDOperand> Ops;
1716 std::vector<MVT::ValueType> VTs;
1717 Ops.push_back(Op.getOperand(2)); // LHS
1718 Ops.push_back(Op.getOperand(3)); // RHS
1719 Ops.push_back(DAG.getConstant(CompareOpc, MVT::i32));
1720 VTs.push_back(Op.getOperand(2).getValueType());
1721 VTs.push_back(MVT::Flag);
1722 SDOperand CompNode = DAG.getNode(PPCISD::VCMPo, VTs, Ops);
1724 // Now that we have the comparison, emit a copy from the CR to a GPR.
1725 // This is flagged to the above dot comparison.
1726 SDOperand Flags = DAG.getNode(PPCISD::MFCR, MVT::i32,
1727 DAG.getRegister(PPC::CR6, MVT::i32),
1728 CompNode.getValue(1));
1730 // Unpack the result based on how the target uses it.
1731 unsigned BitNo; // Bit # of CR6.
1732 bool InvertBit; // Invert result?
1733 switch (cast<ConstantSDNode>(Op.getOperand(1))->getValue()) {
1734 default: // Can't happen, don't crash on invalid number though.
1735 case 0: // Return the value of the EQ bit of CR6.
1736 BitNo = 0; InvertBit = false;
1738 case 1: // Return the inverted value of the EQ bit of CR6.
1739 BitNo = 0; InvertBit = true;
1741 case 2: // Return the value of the LT bit of CR6.
1742 BitNo = 2; InvertBit = false;
1744 case 3: // Return the inverted value of the LT bit of CR6.
1745 BitNo = 2; InvertBit = true;
1749 // Shift the bit into the low position.
1750 Flags = DAG.getNode(ISD::SRL, MVT::i32, Flags,
1751 DAG.getConstant(8-(3-BitNo), MVT::i32));
1753 Flags = DAG.getNode(ISD::AND, MVT::i32, Flags,
1754 DAG.getConstant(1, MVT::i32));
1756 // If we are supposed to, toggle the bit.
1758 Flags = DAG.getNode(ISD::XOR, MVT::i32, Flags,
1759 DAG.getConstant(1, MVT::i32));
1763 static SDOperand LowerSCALAR_TO_VECTOR(SDOperand Op, SelectionDAG &DAG) {
1764 // Create a stack slot that is 16-byte aligned.
1765 MachineFrameInfo *FrameInfo = DAG.getMachineFunction().getFrameInfo();
1766 int FrameIdx = FrameInfo->CreateStackObject(16, 16);
1767 SDOperand FIdx = DAG.getFrameIndex(FrameIdx, MVT::i32);
1769 // Store the input value into Value#0 of the stack slot.
1770 SDOperand Store = DAG.getNode(ISD::STORE, MVT::Other, DAG.getEntryNode(),
1771 Op.getOperand(0), FIdx,DAG.getSrcValue(NULL));
1773 return DAG.getLoad(Op.getValueType(), Store, FIdx, DAG.getSrcValue(NULL));
1776 static SDOperand LowerMUL(SDOperand Op, SelectionDAG &DAG) {
1777 if (Op.getValueType() == MVT::v4i32) {
1778 SDOperand LHS = Op.getOperand(0), RHS = Op.getOperand(1);
1780 SDOperand Zero = BuildSplatI( 0, 1, MVT::v4i32, DAG);
1781 SDOperand Neg16 = BuildSplatI(-16, 4, MVT::v4i32, DAG); // +16 as shift amt.
1783 SDOperand RHSSwap = // = vrlw RHS, 16
1784 BuildIntrinsicOp(Intrinsic::ppc_altivec_vrlw, RHS, Neg16, DAG);
1786 // Shrinkify inputs to v8i16.
1787 LHS = DAG.getNode(ISD::BIT_CONVERT, MVT::v8i16, LHS);
1788 RHS = DAG.getNode(ISD::BIT_CONVERT, MVT::v8i16, RHS);
1789 RHSSwap = DAG.getNode(ISD::BIT_CONVERT, MVT::v8i16, RHSSwap);
1791 // Low parts multiplied together, generating 32-bit results (we ignore the
1793 SDOperand LoProd = BuildIntrinsicOp(Intrinsic::ppc_altivec_vmulouh,
1794 LHS, RHS, DAG, MVT::v4i32);
1796 SDOperand HiProd = BuildIntrinsicOp(Intrinsic::ppc_altivec_vmsumuhm,
1797 LHS, RHSSwap, Zero, DAG, MVT::v4i32);
1798 // Shift the high parts up 16 bits.
1799 HiProd = BuildIntrinsicOp(Intrinsic::ppc_altivec_vslw, HiProd, Neg16, DAG);
1800 return DAG.getNode(ISD::ADD, MVT::v4i32, LoProd, HiProd);
1801 } else if (Op.getValueType() == MVT::v8i16) {
1802 SDOperand LHS = Op.getOperand(0), RHS = Op.getOperand(1);
1804 SDOperand Zero = BuildSplatI(0, 1, MVT::v8i16, DAG);
1806 return BuildIntrinsicOp(Intrinsic::ppc_altivec_vmladduhm,
1807 LHS, RHS, Zero, DAG);
1808 } else if (Op.getValueType() == MVT::v16i8) {
1809 SDOperand LHS = Op.getOperand(0), RHS = Op.getOperand(1);
1811 // Multiply the even 8-bit parts, producing 16-bit sums.
1812 SDOperand EvenParts = BuildIntrinsicOp(Intrinsic::ppc_altivec_vmuleub,
1813 LHS, RHS, DAG, MVT::v8i16);
1814 EvenParts = DAG.getNode(ISD::BIT_CONVERT, MVT::v16i8, EvenParts);
1816 // Multiply the odd 8-bit parts, producing 16-bit sums.
1817 SDOperand OddParts = BuildIntrinsicOp(Intrinsic::ppc_altivec_vmuloub,
1818 LHS, RHS, DAG, MVT::v8i16);
1819 OddParts = DAG.getNode(ISD::BIT_CONVERT, MVT::v16i8, OddParts);
1821 // Merge the results together.
1822 std::vector<SDOperand> Ops;
1823 for (unsigned i = 0; i != 8; ++i) {
1824 Ops.push_back(DAG.getConstant(2*i+1, MVT::i8));
1825 Ops.push_back(DAG.getConstant(2*i+1+16, MVT::i8));
1828 return DAG.getNode(ISD::VECTOR_SHUFFLE, MVT::v16i8, EvenParts, OddParts,
1829 DAG.getNode(ISD::BUILD_VECTOR, MVT::v16i8, Ops));
1831 assert(0 && "Unknown mul to lower!");
1836 /// LowerOperation - Provide custom lowering hooks for some operations.
1838 SDOperand PPCTargetLowering::LowerOperation(SDOperand Op, SelectionDAG &DAG) {
1839 switch (Op.getOpcode()) {
1840 default: assert(0 && "Wasn't expecting to be able to lower this!");
1841 case ISD::ConstantPool: return LowerConstantPool(Op, DAG);
1842 case ISD::GlobalAddress: return LowerGlobalAddress(Op, DAG);
1843 case ISD::JumpTable: return LowerJumpTable(Op, DAG);
1844 case ISD::SETCC: return LowerSETCC(Op, DAG);
1845 case ISD::VASTART: return LowerVASTART(Op, DAG, VarArgsFrameIndex);
1846 case ISD::FORMAL_ARGUMENTS: return LowerFORMAL_ARGUMENTS(Op, DAG,
1848 case ISD::RET: return LowerRET(Op, DAG);
1850 case ISD::SELECT_CC: return LowerSELECT_CC(Op, DAG);
1851 case ISD::FP_TO_SINT: return LowerFP_TO_SINT(Op, DAG);
1852 case ISD::SINT_TO_FP: return LowerSINT_TO_FP(Op, DAG);
1854 // Lower 64-bit shifts.
1855 case ISD::SHL: return LowerSHL(Op, DAG);
1856 case ISD::SRL: return LowerSRL(Op, DAG);
1857 case ISD::SRA: return LowerSRA(Op, DAG);
1859 // Vector-related lowering.
1860 case ISD::BUILD_VECTOR: return LowerBUILD_VECTOR(Op, DAG);
1861 case ISD::VECTOR_SHUFFLE: return LowerVECTOR_SHUFFLE(Op, DAG);
1862 case ISD::INTRINSIC_WO_CHAIN: return LowerINTRINSIC_WO_CHAIN(Op, DAG);
1863 case ISD::SCALAR_TO_VECTOR: return LowerSCALAR_TO_VECTOR(Op, DAG);
1864 case ISD::MUL: return LowerMUL(Op, DAG);
1869 //===----------------------------------------------------------------------===//
1870 // Other Lowering Code
1871 //===----------------------------------------------------------------------===//
1873 std::pair<SDOperand, SDOperand>
1874 PPCTargetLowering::LowerCallTo(SDOperand Chain,
1875 const Type *RetTy, bool isVarArg,
1876 unsigned CallingConv, bool isTailCall,
1877 SDOperand Callee, ArgListTy &Args,
1878 SelectionDAG &DAG) {
1879 // args_to_use will accumulate outgoing args for the PPCISD::CALL case in
1880 // SelectExpr to use to put the arguments in the appropriate registers.
1881 std::vector<SDOperand> args_to_use;
1883 // Count how many bytes are to be pushed on the stack, including the linkage
1884 // area, and parameter passing area.
1885 unsigned NumBytes = 24;
1888 Chain = DAG.getCALLSEQ_START(Chain,
1889 DAG.getConstant(NumBytes, getPointerTy()));
1891 for (unsigned i = 0, e = Args.size(); i != e; ++i) {
1892 switch (getValueType(Args[i].second)) {
1893 default: assert(0 && "Unknown value type!");
1908 // Just to be safe, we'll always reserve the full 24 bytes of linkage area
1909 // plus 32 bytes of argument space in case any called code gets funky on us.
1910 // (Required by ABI to support var arg)
1911 if (NumBytes < 56) NumBytes = 56;
1913 // Adjust the stack pointer for the new arguments...
1914 // These operations are automatically eliminated by the prolog/epilog pass
1915 Chain = DAG.getCALLSEQ_START(Chain,
1916 DAG.getConstant(NumBytes, getPointerTy()));
1918 // Set up a copy of the stack pointer for use loading and storing any
1919 // arguments that may not fit in the registers available for argument
1921 SDOperand StackPtr = DAG.getRegister(PPC::R1, MVT::i32);
1923 // Figure out which arguments are going to go in registers, and which in
1924 // memory. Also, if this is a vararg function, floating point operations
1925 // must be stored to our stack, and loaded into integer regs as well, if
1926 // any integer regs are available for argument passing.
1927 unsigned ArgOffset = 24;
1928 unsigned GPR_remaining = 8;
1929 unsigned FPR_remaining = 13;
1931 std::vector<SDOperand> MemOps;
1932 for (unsigned i = 0, e = Args.size(); i != e; ++i) {
1933 // PtrOff will be used to store the current argument to the stack if a
1934 // register cannot be found for it.
1935 SDOperand PtrOff = DAG.getConstant(ArgOffset, getPointerTy());
1936 PtrOff = DAG.getNode(ISD::ADD, MVT::i32, StackPtr, PtrOff);
1937 MVT::ValueType ArgVT = getValueType(Args[i].second);
1940 default: assert(0 && "Unexpected ValueType for argument!");
1944 // Promote the integer to 32 bits. If the input type is signed use a
1945 // sign extend, otherwise use a zero extend.
1946 if (Args[i].second->isSigned())
1947 Args[i].first =DAG.getNode(ISD::SIGN_EXTEND, MVT::i32, Args[i].first);
1949 Args[i].first =DAG.getNode(ISD::ZERO_EXTEND, MVT::i32, Args[i].first);
1952 if (GPR_remaining > 0) {
1953 args_to_use.push_back(Args[i].first);
1956 MemOps.push_back(DAG.getNode(ISD::STORE, MVT::Other, Chain,
1957 Args[i].first, PtrOff,
1958 DAG.getSrcValue(NULL)));
1963 // If we have one free GPR left, we can place the upper half of the i64
1964 // in it, and store the other half to the stack. If we have two or more
1965 // free GPRs, then we can pass both halves of the i64 in registers.
1966 if (GPR_remaining > 0) {
1967 SDOperand Hi = DAG.getNode(ISD::EXTRACT_ELEMENT, MVT::i32,
1968 Args[i].first, DAG.getConstant(1, MVT::i32));
1969 SDOperand Lo = DAG.getNode(ISD::EXTRACT_ELEMENT, MVT::i32,
1970 Args[i].first, DAG.getConstant(0, MVT::i32));
1971 args_to_use.push_back(Hi);
1973 if (GPR_remaining > 0) {
1974 args_to_use.push_back(Lo);
1977 SDOperand ConstFour = DAG.getConstant(4, getPointerTy());
1978 PtrOff = DAG.getNode(ISD::ADD, MVT::i32, PtrOff, ConstFour);
1979 MemOps.push_back(DAG.getNode(ISD::STORE, MVT::Other, Chain,
1980 Lo, PtrOff, DAG.getSrcValue(NULL)));
1983 MemOps.push_back(DAG.getNode(ISD::STORE, MVT::Other, Chain,
1984 Args[i].first, PtrOff,
1985 DAG.getSrcValue(NULL)));
1991 if (FPR_remaining > 0) {
1992 args_to_use.push_back(Args[i].first);
1995 SDOperand Store = DAG.getNode(ISD::STORE, MVT::Other, Chain,
1996 Args[i].first, PtrOff,
1997 DAG.getSrcValue(NULL));
1998 MemOps.push_back(Store);
1999 // Float varargs are always shadowed in available integer registers
2000 if (GPR_remaining > 0) {
2001 SDOperand Load = DAG.getLoad(MVT::i32, Store, PtrOff,
2002 DAG.getSrcValue(NULL));
2003 MemOps.push_back(Load.getValue(1));
2004 args_to_use.push_back(Load);
2007 if (GPR_remaining > 0 && MVT::f64 == ArgVT) {
2008 SDOperand ConstFour = DAG.getConstant(4, getPointerTy());
2009 PtrOff = DAG.getNode(ISD::ADD, MVT::i32, PtrOff, ConstFour);
2010 SDOperand Load = DAG.getLoad(MVT::i32, Store, PtrOff,
2011 DAG.getSrcValue(NULL));
2012 MemOps.push_back(Load.getValue(1));
2013 args_to_use.push_back(Load);
2017 // If we have any FPRs remaining, we may also have GPRs remaining.
2018 // Args passed in FPRs consume either 1 (f32) or 2 (f64) available
2020 if (GPR_remaining > 0) {
2021 args_to_use.push_back(DAG.getNode(ISD::UNDEF, MVT::i32));
2024 if (GPR_remaining > 0 && MVT::f64 == ArgVT) {
2025 args_to_use.push_back(DAG.getNode(ISD::UNDEF, MVT::i32));
2030 MemOps.push_back(DAG.getNode(ISD::STORE, MVT::Other, Chain,
2031 Args[i].first, PtrOff,
2032 DAG.getSrcValue(NULL)));
2034 ArgOffset += (ArgVT == MVT::f32) ? 4 : 8;
2038 if (!MemOps.empty())
2039 Chain = DAG.getNode(ISD::TokenFactor, MVT::Other, MemOps);
2042 std::vector<MVT::ValueType> RetVals;
2043 MVT::ValueType RetTyVT = getValueType(RetTy);
2044 MVT::ValueType ActualRetTyVT = RetTyVT;
2045 if (RetTyVT >= MVT::i1 && RetTyVT <= MVT::i16)
2046 ActualRetTyVT = MVT::i32; // Promote result to i32.
2048 if (RetTyVT == MVT::i64) {
2049 RetVals.push_back(MVT::i32);
2050 RetVals.push_back(MVT::i32);
2051 } else if (RetTyVT != MVT::isVoid) {
2052 RetVals.push_back(ActualRetTyVT);
2054 RetVals.push_back(MVT::Other);
2056 // If the callee is a GlobalAddress node (quite common, every direct call is)
2057 // turn it into a TargetGlobalAddress node so that legalize doesn't hack it.
2058 if (GlobalAddressSDNode *G = dyn_cast<GlobalAddressSDNode>(Callee))
2059 Callee = DAG.getTargetGlobalAddress(G->getGlobal(), MVT::i32);
2061 std::vector<SDOperand> Ops;
2062 Ops.push_back(Chain);
2063 Ops.push_back(Callee);
2064 Ops.insert(Ops.end(), args_to_use.begin(), args_to_use.end());
2065 SDOperand TheCall = DAG.getNode(PPCISD::CALL, RetVals, Ops);
2066 Chain = TheCall.getValue(TheCall.Val->getNumValues()-1);
2067 Chain = DAG.getNode(ISD::CALLSEQ_END, MVT::Other, Chain,
2068 DAG.getConstant(NumBytes, getPointerTy()));
2069 SDOperand RetVal = TheCall;
2071 // If the result is a small value, add a note so that we keep track of the
2072 // information about whether it is sign or zero extended.
2073 if (RetTyVT != ActualRetTyVT) {
2074 RetVal = DAG.getNode(RetTy->isSigned() ? ISD::AssertSext : ISD::AssertZext,
2075 MVT::i32, RetVal, DAG.getValueType(RetTyVT));
2076 RetVal = DAG.getNode(ISD::TRUNCATE, RetTyVT, RetVal);
2077 } else if (RetTyVT == MVT::i64) {
2078 RetVal = DAG.getNode(ISD::BUILD_PAIR, MVT::i64, RetVal, RetVal.getValue(1));
2081 return std::make_pair(RetVal, Chain);
2085 PPCTargetLowering::InsertAtEndOfBasicBlock(MachineInstr *MI,
2086 MachineBasicBlock *BB) {
2087 assert((MI->getOpcode() == PPC::SELECT_CC_Int ||
2088 MI->getOpcode() == PPC::SELECT_CC_F4 ||
2089 MI->getOpcode() == PPC::SELECT_CC_F8 ||
2090 MI->getOpcode() == PPC::SELECT_CC_VRRC) &&
2091 "Unexpected instr type to insert");
2093 // To "insert" a SELECT_CC instruction, we actually have to insert the diamond
2094 // control-flow pattern. The incoming instruction knows the destination vreg
2095 // to set, the condition code register to branch on, the true/false values to
2096 // select between, and a branch opcode to use.
2097 const BasicBlock *LLVM_BB = BB->getBasicBlock();
2098 ilist<MachineBasicBlock>::iterator It = BB;
2104 // cmpTY ccX, r1, r2
2106 // fallthrough --> copy0MBB
2107 MachineBasicBlock *thisMBB = BB;
2108 MachineBasicBlock *copy0MBB = new MachineBasicBlock(LLVM_BB);
2109 MachineBasicBlock *sinkMBB = new MachineBasicBlock(LLVM_BB);
2110 BuildMI(BB, MI->getOperand(4).getImmedValue(), 2)
2111 .addReg(MI->getOperand(1).getReg()).addMBB(sinkMBB);
2112 MachineFunction *F = BB->getParent();
2113 F->getBasicBlockList().insert(It, copy0MBB);
2114 F->getBasicBlockList().insert(It, sinkMBB);
2115 // Update machine-CFG edges by first adding all successors of the current
2116 // block to the new block which will contain the Phi node for the select.
2117 for(MachineBasicBlock::succ_iterator i = BB->succ_begin(),
2118 e = BB->succ_end(); i != e; ++i)
2119 sinkMBB->addSuccessor(*i);
2120 // Next, remove all successors of the current block, and add the true
2121 // and fallthrough blocks as its successors.
2122 while(!BB->succ_empty())
2123 BB->removeSuccessor(BB->succ_begin());
2124 BB->addSuccessor(copy0MBB);
2125 BB->addSuccessor(sinkMBB);
2128 // %FalseValue = ...
2129 // # fallthrough to sinkMBB
2132 // Update machine-CFG edges
2133 BB->addSuccessor(sinkMBB);
2136 // %Result = phi [ %FalseValue, copy0MBB ], [ %TrueValue, thisMBB ]
2139 BuildMI(BB, PPC::PHI, 4, MI->getOperand(0).getReg())
2140 .addReg(MI->getOperand(3).getReg()).addMBB(copy0MBB)
2141 .addReg(MI->getOperand(2).getReg()).addMBB(thisMBB);
2143 delete MI; // The pseudo instruction is gone now.
2147 //===----------------------------------------------------------------------===//
2148 // Target Optimization Hooks
2149 //===----------------------------------------------------------------------===//
2151 SDOperand PPCTargetLowering::PerformDAGCombine(SDNode *N,
2152 DAGCombinerInfo &DCI) const {
2153 TargetMachine &TM = getTargetMachine();
2154 SelectionDAG &DAG = DCI.DAG;
2155 switch (N->getOpcode()) {
2157 case ISD::SINT_TO_FP:
2158 if (TM.getSubtarget<PPCSubtarget>().is64Bit()) {
2159 if (N->getOperand(0).getOpcode() == ISD::FP_TO_SINT) {
2160 // Turn (sint_to_fp (fp_to_sint X)) -> fctidz/fcfid without load/stores.
2161 // We allow the src/dst to be either f32/f64, but the intermediate
2162 // type must be i64.
2163 if (N->getOperand(0).getValueType() == MVT::i64) {
2164 SDOperand Val = N->getOperand(0).getOperand(0);
2165 if (Val.getValueType() == MVT::f32) {
2166 Val = DAG.getNode(ISD::FP_EXTEND, MVT::f64, Val);
2167 DCI.AddToWorklist(Val.Val);
2170 Val = DAG.getNode(PPCISD::FCTIDZ, MVT::f64, Val);
2171 DCI.AddToWorklist(Val.Val);
2172 Val = DAG.getNode(PPCISD::FCFID, MVT::f64, Val);
2173 DCI.AddToWorklist(Val.Val);
2174 if (N->getValueType(0) == MVT::f32) {
2175 Val = DAG.getNode(ISD::FP_ROUND, MVT::f32, Val);
2176 DCI.AddToWorklist(Val.Val);
2179 } else if (N->getOperand(0).getValueType() == MVT::i32) {
2180 // If the intermediate type is i32, we can avoid the load/store here
2187 // Turn STORE (FP_TO_SINT F) -> STFIWX(FCTIWZ(F)).
2188 if (TM.getSubtarget<PPCSubtarget>().hasSTFIWX() &&
2189 N->getOperand(1).getOpcode() == ISD::FP_TO_SINT &&
2190 N->getOperand(1).getValueType() == MVT::i32) {
2191 SDOperand Val = N->getOperand(1).getOperand(0);
2192 if (Val.getValueType() == MVT::f32) {
2193 Val = DAG.getNode(ISD::FP_EXTEND, MVT::f64, Val);
2194 DCI.AddToWorklist(Val.Val);
2196 Val = DAG.getNode(PPCISD::FCTIWZ, MVT::f64, Val);
2197 DCI.AddToWorklist(Val.Val);
2199 Val = DAG.getNode(PPCISD::STFIWX, MVT::Other, N->getOperand(0), Val,
2200 N->getOperand(2), N->getOperand(3));
2201 DCI.AddToWorklist(Val.Val);
2205 case PPCISD::VCMP: {
2206 // If a VCMPo node already exists with exactly the same operands as this
2207 // node, use its result instead of this node (VCMPo computes both a CR6 and
2208 // a normal output).
2210 if (!N->getOperand(0).hasOneUse() &&
2211 !N->getOperand(1).hasOneUse() &&
2212 !N->getOperand(2).hasOneUse()) {
2214 // Scan all of the users of the LHS, looking for VCMPo's that match.
2215 SDNode *VCMPoNode = 0;
2217 SDNode *LHSN = N->getOperand(0).Val;
2218 for (SDNode::use_iterator UI = LHSN->use_begin(), E = LHSN->use_end();
2220 if ((*UI)->getOpcode() == PPCISD::VCMPo &&
2221 (*UI)->getOperand(1) == N->getOperand(1) &&
2222 (*UI)->getOperand(2) == N->getOperand(2) &&
2223 (*UI)->getOperand(0) == N->getOperand(0)) {
2228 // If there is no VCMPo node, or if the flag value has a single use, don't
2230 if (!VCMPoNode || VCMPoNode->hasNUsesOfValue(0, 1))
2233 // Look at the (necessarily single) use of the flag value. If it has a
2234 // chain, this transformation is more complex. Note that multiple things
2235 // could use the value result, which we should ignore.
2236 SDNode *FlagUser = 0;
2237 for (SDNode::use_iterator UI = VCMPoNode->use_begin();
2238 FlagUser == 0; ++UI) {
2239 assert(UI != VCMPoNode->use_end() && "Didn't find user!");
2241 for (unsigned i = 0, e = User->getNumOperands(); i != e; ++i) {
2242 if (User->getOperand(i) == SDOperand(VCMPoNode, 1)) {
2249 // If the user is a MFCR instruction, we know this is safe. Otherwise we
2250 // give up for right now.
2251 if (FlagUser->getOpcode() == PPCISD::MFCR)
2252 return SDOperand(VCMPoNode, 0);
2257 // If this is a branch on an altivec predicate comparison, lower this so
2258 // that we don't have to do a MFCR: instead, branch directly on CR6. This
2259 // lowering is done pre-legalize, because the legalizer lowers the predicate
2260 // compare down to code that is difficult to reassemble.
2261 ISD::CondCode CC = cast<CondCodeSDNode>(N->getOperand(1))->get();
2262 SDOperand LHS = N->getOperand(2), RHS = N->getOperand(3);
2266 if (LHS.getOpcode() == ISD::INTRINSIC_WO_CHAIN &&
2267 isa<ConstantSDNode>(RHS) && (CC == ISD::SETEQ || CC == ISD::SETNE) &&
2268 getAltivecCompareInfo(LHS, CompareOpc, isDot)) {
2269 assert(isDot && "Can't compare against a vector result!");
2271 // If this is a comparison against something other than 0/1, then we know
2272 // that the condition is never/always true.
2273 unsigned Val = cast<ConstantSDNode>(RHS)->getValue();
2274 if (Val != 0 && Val != 1) {
2275 if (CC == ISD::SETEQ) // Cond never true, remove branch.
2276 return N->getOperand(0);
2277 // Always !=, turn it into an unconditional branch.
2278 return DAG.getNode(ISD::BR, MVT::Other,
2279 N->getOperand(0), N->getOperand(4));
2282 bool BranchOnWhenPredTrue = (CC == ISD::SETEQ) ^ (Val == 0);
2284 // Create the PPCISD altivec 'dot' comparison node.
2285 std::vector<SDOperand> Ops;
2286 std::vector<MVT::ValueType> VTs;
2287 Ops.push_back(LHS.getOperand(2)); // LHS of compare
2288 Ops.push_back(LHS.getOperand(3)); // RHS of compare
2289 Ops.push_back(DAG.getConstant(CompareOpc, MVT::i32));
2290 VTs.push_back(LHS.getOperand(2).getValueType());
2291 VTs.push_back(MVT::Flag);
2292 SDOperand CompNode = DAG.getNode(PPCISD::VCMPo, VTs, Ops);
2294 // Unpack the result based on how the target uses it.
2296 switch (cast<ConstantSDNode>(LHS.getOperand(1))->getValue()) {
2297 default: // Can't happen, don't crash on invalid number though.
2298 case 0: // Branch on the value of the EQ bit of CR6.
2299 CompOpc = BranchOnWhenPredTrue ? PPC::BEQ : PPC::BNE;
2301 case 1: // Branch on the inverted value of the EQ bit of CR6.
2302 CompOpc = BranchOnWhenPredTrue ? PPC::BNE : PPC::BEQ;
2304 case 2: // Branch on the value of the LT bit of CR6.
2305 CompOpc = BranchOnWhenPredTrue ? PPC::BLT : PPC::BGE;
2307 case 3: // Branch on the inverted value of the LT bit of CR6.
2308 CompOpc = BranchOnWhenPredTrue ? PPC::BGE : PPC::BLT;
2312 return DAG.getNode(PPCISD::COND_BRANCH, MVT::Other, N->getOperand(0),
2313 DAG.getRegister(PPC::CR6, MVT::i32),
2314 DAG.getConstant(CompOpc, MVT::i32),
2315 N->getOperand(4), CompNode.getValue(1));
2324 //===----------------------------------------------------------------------===//
2325 // Inline Assembly Support
2326 //===----------------------------------------------------------------------===//
2328 void PPCTargetLowering::computeMaskedBitsForTargetNode(const SDOperand Op,
2330 uint64_t &KnownZero,
2332 unsigned Depth) const {
2335 switch (Op.getOpcode()) {
2337 case ISD::INTRINSIC_WO_CHAIN: {
2338 switch (cast<ConstantSDNode>(Op.getOperand(0))->getValue()) {
2340 case Intrinsic::ppc_altivec_vcmpbfp_p:
2341 case Intrinsic::ppc_altivec_vcmpeqfp_p:
2342 case Intrinsic::ppc_altivec_vcmpequb_p:
2343 case Intrinsic::ppc_altivec_vcmpequh_p:
2344 case Intrinsic::ppc_altivec_vcmpequw_p:
2345 case Intrinsic::ppc_altivec_vcmpgefp_p:
2346 case Intrinsic::ppc_altivec_vcmpgtfp_p:
2347 case Intrinsic::ppc_altivec_vcmpgtsb_p:
2348 case Intrinsic::ppc_altivec_vcmpgtsh_p:
2349 case Intrinsic::ppc_altivec_vcmpgtsw_p:
2350 case Intrinsic::ppc_altivec_vcmpgtub_p:
2351 case Intrinsic::ppc_altivec_vcmpgtuh_p:
2352 case Intrinsic::ppc_altivec_vcmpgtuw_p:
2353 KnownZero = ~1U; // All bits but the low one are known to be zero.
2361 /// getConstraintType - Given a constraint letter, return the type of
2362 /// constraint it is for this target.
2363 PPCTargetLowering::ConstraintType
2364 PPCTargetLowering::getConstraintType(char ConstraintLetter) const {
2365 switch (ConstraintLetter) {
2372 return C_RegisterClass;
2374 return TargetLowering::getConstraintType(ConstraintLetter);
2378 std::vector<unsigned> PPCTargetLowering::
2379 getRegClassForInlineAsmConstraint(const std::string &Constraint,
2380 MVT::ValueType VT) const {
2381 if (Constraint.size() == 1) {
2382 switch (Constraint[0]) { // GCC RS6000 Constraint Letters
2383 default: break; // Unknown constriant letter
2385 return make_vector<unsigned>(/*no R0*/ PPC::R1 , PPC::R2 , PPC::R3 ,
2386 PPC::R4 , PPC::R5 , PPC::R6 , PPC::R7 ,
2387 PPC::R8 , PPC::R9 , PPC::R10, PPC::R11,
2388 PPC::R12, PPC::R13, PPC::R14, PPC::R15,
2389 PPC::R16, PPC::R17, PPC::R18, PPC::R19,
2390 PPC::R20, PPC::R21, PPC::R22, PPC::R23,
2391 PPC::R24, PPC::R25, PPC::R26, PPC::R27,
2392 PPC::R28, PPC::R29, PPC::R30, PPC::R31,
2395 return make_vector<unsigned>(PPC::R0 , PPC::R1 , PPC::R2 , PPC::R3 ,
2396 PPC::R4 , PPC::R5 , PPC::R6 , PPC::R7 ,
2397 PPC::R8 , PPC::R9 , PPC::R10, PPC::R11,
2398 PPC::R12, PPC::R13, PPC::R14, PPC::R15,
2399 PPC::R16, PPC::R17, PPC::R18, PPC::R19,
2400 PPC::R20, PPC::R21, PPC::R22, PPC::R23,
2401 PPC::R24, PPC::R25, PPC::R26, PPC::R27,
2402 PPC::R28, PPC::R29, PPC::R30, PPC::R31,
2405 return make_vector<unsigned>(PPC::F0 , PPC::F1 , PPC::F2 , PPC::F3 ,
2406 PPC::F4 , PPC::F5 , PPC::F6 , PPC::F7 ,
2407 PPC::F8 , PPC::F9 , PPC::F10, PPC::F11,
2408 PPC::F12, PPC::F13, PPC::F14, PPC::F15,
2409 PPC::F16, PPC::F17, PPC::F18, PPC::F19,
2410 PPC::F20, PPC::F21, PPC::F22, PPC::F23,
2411 PPC::F24, PPC::F25, PPC::F26, PPC::F27,
2412 PPC::F28, PPC::F29, PPC::F30, PPC::F31,
2415 return make_vector<unsigned>(PPC::V0 , PPC::V1 , PPC::V2 , PPC::V3 ,
2416 PPC::V4 , PPC::V5 , PPC::V6 , PPC::V7 ,
2417 PPC::V8 , PPC::V9 , PPC::V10, PPC::V11,
2418 PPC::V12, PPC::V13, PPC::V14, PPC::V15,
2419 PPC::V16, PPC::V17, PPC::V18, PPC::V19,
2420 PPC::V20, PPC::V21, PPC::V22, PPC::V23,
2421 PPC::V24, PPC::V25, PPC::V26, PPC::V27,
2422 PPC::V28, PPC::V29, PPC::V30, PPC::V31,
2425 return make_vector<unsigned>(PPC::CR0, PPC::CR1, PPC::CR2, PPC::CR3,
2426 PPC::CR4, PPC::CR5, PPC::CR6, PPC::CR7,
2431 return std::vector<unsigned>();
2434 // isOperandValidForConstraint
2435 bool PPCTargetLowering::
2436 isOperandValidForConstraint(SDOperand Op, char Letter) {
2447 if (!isa<ConstantSDNode>(Op)) return false; // Must be an immediate.
2448 unsigned Value = cast<ConstantSDNode>(Op)->getValue();
2450 default: assert(0 && "Unknown constraint letter!");
2451 case 'I': // "I" is a signed 16-bit constant.
2452 return (short)Value == (int)Value;
2453 case 'J': // "J" is a constant with only the high-order 16 bits nonzero.
2454 case 'L': // "L" is a signed 16-bit constant shifted left 16 bits.
2455 return (short)Value == 0;
2456 case 'K': // "K" is a constant with only the low-order 16 bits nonzero.
2457 return (Value >> 16) == 0;
2458 case 'M': // "M" is a constant that is greater than 31.
2460 case 'N': // "N" is a positive constant that is an exact power of two.
2461 return (int)Value > 0 && isPowerOf2_32(Value);
2462 case 'O': // "O" is the constant zero.
2464 case 'P': // "P" is a constant whose negation is a signed 16-bit constant.
2465 return (short)-Value == (int)-Value;
2471 // Handle standard constraint letters.
2472 return TargetLowering::isOperandValidForConstraint(Op, Letter);
2475 /// isLegalAddressImmediate - Return true if the integer value can be used
2476 /// as the offset of the target addressing mode.
2477 bool PPCTargetLowering::isLegalAddressImmediate(int64_t V) const {
2478 // PPC allows a sign-extended 16-bit immediate field.
2479 return (V > -(1 << 16) && V < (1 << 16)-1);