1 //===-- PPCFastISel.cpp - PowerPC FastISel implementation -----------------===//
2 //
3 // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
4 // See https://llvm.org/LICENSE.txt for license information.
5 // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
6 //
7 //===----------------------------------------------------------------------===//
8 //
9 // This file defines the PowerPC-specific support for the FastISel class. Some
10 // of the target-specific code is generated by tablegen in the file
11 // PPCGenFastISel.inc, which is #included here.
12 //
13 //===----------------------------------------------------------------------===//
14 
15 #include "MCTargetDesc/PPCPredicates.h"
16 #include "PPC.h"
17 #include "PPCCCState.h"
18 #include "PPCCallingConv.h"
19 #include "PPCISelLowering.h"
20 #include "PPCMachineFunctionInfo.h"
21 #include "PPCSubtarget.h"
22 #include "PPCTargetMachine.h"
23 #include "llvm/ADT/Optional.h"
24 #include "llvm/CodeGen/CallingConvLower.h"
25 #include "llvm/CodeGen/FastISel.h"
26 #include "llvm/CodeGen/FunctionLoweringInfo.h"
27 #include "llvm/CodeGen/MachineConstantPool.h"
28 #include "llvm/CodeGen/MachineFrameInfo.h"
29 #include "llvm/CodeGen/MachineInstrBuilder.h"
30 #include "llvm/CodeGen/MachineRegisterInfo.h"
31 #include "llvm/CodeGen/TargetLowering.h"
32 #include "llvm/IR/CallingConv.h"
33 #include "llvm/IR/GetElementPtrTypeIterator.h"
34 #include "llvm/IR/GlobalAlias.h"
35 #include "llvm/IR/GlobalVariable.h"
36 #include "llvm/IR/IntrinsicInst.h"
37 #include "llvm/IR/Operator.h"
38 #include "llvm/Support/Debug.h"
39 #include "llvm/Target/TargetMachine.h"
40 
41 //===----------------------------------------------------------------------===//
42 //
43 // TBD:
44 //   fastLowerArguments: Handle simple cases.
45 //   PPCMaterializeGV: Handle TLS.
46 //   SelectCall: Handle function pointers.
47 //   SelectCall: Handle multi-register return values.
48 //   SelectCall: Optimize away nops for local calls.
49 //   processCallArgs: Handle bit-converted arguments.
50 //   finishCall: Handle multi-register return values.
51 //   PPCComputeAddress: Handle parameter references as FrameIndex's.
52 //   PPCEmitCmp: Handle immediate as operand 1.
53 //   SelectCall: Handle small byval arguments.
54 //   SelectIntrinsicCall: Implement.
55 //   SelectSelect: Implement.
56 //   Consider factoring isTypeLegal into the base class.
57 //   Implement switches and jump tables.
58 //
59 //===----------------------------------------------------------------------===//
60 using namespace llvm;
61 
62 #define DEBUG_TYPE "ppcfastisel"
63 
64 namespace {
65 
66 typedef struct Address {
67   enum {
68     RegBase,
69     FrameIndexBase
70   } BaseType;
71 
72   union {
73     unsigned Reg;
74     int FI;
75   } Base;
76 
77   long Offset;
78 
79   // Innocuous defaults for our address.
80   Address()
81    : BaseType(RegBase), Offset(0) {
82      Base.Reg = 0;
83    }
84 } Address;
85 
86 class PPCFastISel final : public FastISel {
87 
88   const TargetMachine &TM;
89   const PPCSubtarget *PPCSubTarget;
90   PPCFunctionInfo *PPCFuncInfo;
91   const TargetInstrInfo &TII;
92   const TargetLowering &TLI;
93   LLVMContext *Context;
94 
95   public:
96     explicit PPCFastISel(FunctionLoweringInfo &FuncInfo,
97                          const TargetLibraryInfo *LibInfo)
98         : FastISel(FuncInfo, LibInfo), TM(FuncInfo.MF->getTarget()),
99           PPCSubTarget(&FuncInfo.MF->getSubtarget<PPCSubtarget>()),
100           PPCFuncInfo(FuncInfo.MF->getInfo<PPCFunctionInfo>()),
101           TII(*PPCSubTarget->getInstrInfo()),
102           TLI(*PPCSubTarget->getTargetLowering()),
103           Context(&FuncInfo.Fn->getContext()) {}
104 
105   // Backend specific FastISel code.
106   private:
107     bool fastSelectInstruction(const Instruction *I) override;
108     unsigned fastMaterializeConstant(const Constant *C) override;
109     unsigned fastMaterializeAlloca(const AllocaInst *AI) override;
110     bool tryToFoldLoadIntoMI(MachineInstr *MI, unsigned OpNo,
111                              const LoadInst *LI) override;
112     bool fastLowerArguments() override;
113     unsigned fastEmit_i(MVT Ty, MVT RetTy, unsigned Opc, uint64_t Imm) override;
114     unsigned fastEmitInst_ri(unsigned MachineInstOpcode,
115                              const TargetRegisterClass *RC,
116                              unsigned Op0, bool Op0IsKill,
117                              uint64_t Imm);
118     unsigned fastEmitInst_r(unsigned MachineInstOpcode,
119                             const TargetRegisterClass *RC,
120                             unsigned Op0, bool Op0IsKill);
121     unsigned fastEmitInst_rr(unsigned MachineInstOpcode,
122                              const TargetRegisterClass *RC,
123                              unsigned Op0, bool Op0IsKill,
124                              unsigned Op1, bool Op1IsKill);
125 
126     bool fastLowerCall(CallLoweringInfo &CLI) override;
127 
128   // Instruction selection routines.
129   private:
130     bool SelectLoad(const Instruction *I);
131     bool SelectStore(const Instruction *I);
132     bool SelectBranch(const Instruction *I);
133     bool SelectIndirectBr(const Instruction *I);
134     bool SelectFPExt(const Instruction *I);
135     bool SelectFPTrunc(const Instruction *I);
136     bool SelectIToFP(const Instruction *I, bool IsSigned);
137     bool SelectFPToI(const Instruction *I, bool IsSigned);
138     bool SelectBinaryIntOp(const Instruction *I, unsigned ISDOpcode);
139     bool SelectRet(const Instruction *I);
140     bool SelectTrunc(const Instruction *I);
141     bool SelectIntExt(const Instruction *I);
142 
143   // Utility routines.
144   private:
145     bool isTypeLegal(Type *Ty, MVT &VT);
146     bool isLoadTypeLegal(Type *Ty, MVT &VT);
147     bool isValueAvailable(const Value *V) const;
148     bool isVSFRCRegClass(const TargetRegisterClass *RC) const {
149       return RC->getID() == PPC::VSFRCRegClassID;
150     }
151     bool isVSSRCRegClass(const TargetRegisterClass *RC) const {
152       return RC->getID() == PPC::VSSRCRegClassID;
153     }
154     bool PPCEmitCmp(const Value *Src1Value, const Value *Src2Value,
155                     bool isZExt, unsigned DestReg,
156                     const PPC::Predicate Pred);
157     bool PPCEmitLoad(MVT VT, unsigned &ResultReg, Address &Addr,
158                      const TargetRegisterClass *RC, bool IsZExt = true,
159                      unsigned FP64LoadOpc = PPC::LFD);
160     bool PPCEmitStore(MVT VT, unsigned SrcReg, Address &Addr);
161     bool PPCComputeAddress(const Value *Obj, Address &Addr);
162     void PPCSimplifyAddress(Address &Addr, bool &UseOffset,
163                             unsigned &IndexReg);
164     bool PPCEmitIntExt(MVT SrcVT, unsigned SrcReg, MVT DestVT,
165                            unsigned DestReg, bool IsZExt);
166     unsigned PPCMaterializeFP(const ConstantFP *CFP, MVT VT);
167     unsigned PPCMaterializeGV(const GlobalValue *GV, MVT VT);
168     unsigned PPCMaterializeInt(const ConstantInt *CI, MVT VT,
169                                bool UseSExt = true);
170     unsigned PPCMaterialize32BitInt(int64_t Imm,
171                                     const TargetRegisterClass *RC);
172     unsigned PPCMaterialize64BitInt(int64_t Imm,
173                                     const TargetRegisterClass *RC);
174     unsigned PPCMoveToIntReg(const Instruction *I, MVT VT,
175                              unsigned SrcReg, bool IsSigned);
176     unsigned PPCMoveToFPReg(MVT VT, unsigned SrcReg, bool IsSigned);
177 
178   // Call handling routines.
179   private:
180     bool processCallArgs(SmallVectorImpl<Value*> &Args,
181                          SmallVectorImpl<unsigned> &ArgRegs,
182                          SmallVectorImpl<MVT> &ArgVTs,
183                          SmallVectorImpl<ISD::ArgFlagsTy> &ArgFlags,
184                          SmallVectorImpl<unsigned> &RegArgs,
185                          CallingConv::ID CC,
186                          unsigned &NumBytes,
187                          bool IsVarArg);
188     bool finishCall(MVT RetVT, CallLoweringInfo &CLI, unsigned &NumBytes);
189     LLVM_ATTRIBUTE_UNUSED CCAssignFn *usePPC32CCs(unsigned Flag);
190 
191   private:
192   #include "PPCGenFastISel.inc"
193 
194 };
195 
196 } // end anonymous namespace
197 
198 #include "PPCGenCallingConv.inc"
199 
200 // Function whose sole purpose is to kill compiler warnings
201 // stemming from unused functions included from PPCGenCallingConv.inc.
202 CCAssignFn *PPCFastISel::usePPC32CCs(unsigned Flag) {
203   if (Flag == 1)
204     return CC_PPC32_SVR4;
205   else if (Flag == 2)
206     return CC_PPC32_SVR4_ByVal;
207   else if (Flag == 3)
208     return CC_PPC32_SVR4_VarArg;
209   else if (Flag == 4)
210     return RetCC_PPC_Cold;
211   else
212     return RetCC_PPC;
213 }
214 
215 static Optional<PPC::Predicate> getComparePred(CmpInst::Predicate Pred) {
216   switch (Pred) {
217     // These are not representable with any single compare.
218     case CmpInst::FCMP_FALSE:
219     case CmpInst::FCMP_TRUE:
220     // Major concern about the following 6 cases is NaN result. The comparison
221     // result consists of 4 bits, indicating lt, eq, gt and un (unordered),
222     // only one of which will be set. The result is generated by fcmpu
223     // instruction. However, bc instruction only inspects one of the first 3
224     // bits, so when un is set, bc instruction may jump to an undesired
225     // place.
226     //
227     // More specifically, if we expect an unordered comparison and un is set, we
228     // expect to always go to true branch; in such case UEQ, UGT and ULT still
229     // give false, which are undesired; but UNE, UGE, ULE happen to give true,
230     // since they are tested by inspecting !eq, !lt, !gt, respectively.
231     //
232     // Similarly, for ordered comparison, when un is set, we always expect the
233     // result to be false. In such case OGT, OLT and OEQ is good, since they are
234     // actually testing GT, LT, and EQ respectively, which are false. OGE, OLE
235     // and ONE are tested through !lt, !gt and !eq, and these are true.
236     case CmpInst::FCMP_UEQ:
237     case CmpInst::FCMP_UGT:
238     case CmpInst::FCMP_ULT:
239     case CmpInst::FCMP_OGE:
240     case CmpInst::FCMP_OLE:
241     case CmpInst::FCMP_ONE:
242     default:
243       return Optional<PPC::Predicate>();
244 
245     case CmpInst::FCMP_OEQ:
246     case CmpInst::ICMP_EQ:
247       return PPC::PRED_EQ;
248 
249     case CmpInst::FCMP_OGT:
250     case CmpInst::ICMP_UGT:
251     case CmpInst::ICMP_SGT:
252       return PPC::PRED_GT;
253 
254     case CmpInst::FCMP_UGE:
255     case CmpInst::ICMP_UGE:
256     case CmpInst::ICMP_SGE:
257       return PPC::PRED_GE;
258 
259     case CmpInst::FCMP_OLT:
260     case CmpInst::ICMP_ULT:
261     case CmpInst::ICMP_SLT:
262       return PPC::PRED_LT;
263 
264     case CmpInst::FCMP_ULE:
265     case CmpInst::ICMP_ULE:
266     case CmpInst::ICMP_SLE:
267       return PPC::PRED_LE;
268 
269     case CmpInst::FCMP_UNE:
270     case CmpInst::ICMP_NE:
271       return PPC::PRED_NE;
272 
273     case CmpInst::FCMP_ORD:
274       return PPC::PRED_NU;
275 
276     case CmpInst::FCMP_UNO:
277       return PPC::PRED_UN;
278   }
279 }
280 
281 // Determine whether the type Ty is simple enough to be handled by
282 // fast-isel, and return its equivalent machine type in VT.
283 // FIXME: Copied directly from ARM -- factor into base class?
284 bool PPCFastISel::isTypeLegal(Type *Ty, MVT &VT) {
285   EVT Evt = TLI.getValueType(DL, Ty, true);
286 
287   // Only handle simple types.
288   if (Evt == MVT::Other || !Evt.isSimple()) return false;
289   VT = Evt.getSimpleVT();
290 
291   // Handle all legal types, i.e. a register that will directly hold this
292   // value.
293   return TLI.isTypeLegal(VT);
294 }
295 
296 // Determine whether the type Ty is simple enough to be handled by
297 // fast-isel as a load target, and return its equivalent machine type in VT.
298 bool PPCFastISel::isLoadTypeLegal(Type *Ty, MVT &VT) {
299   if (isTypeLegal(Ty, VT)) return true;
300 
301   // If this is a type than can be sign or zero-extended to a basic operation
302   // go ahead and accept it now.
303   if (VT == MVT::i8 || VT == MVT::i16 || VT == MVT::i32) {
304     return true;
305   }
306 
307   return false;
308 }
309 
310 bool PPCFastISel::isValueAvailable(const Value *V) const {
311   if (!isa<Instruction>(V))
312     return true;
313 
314   const auto *I = cast<Instruction>(V);
315   return FuncInfo.MBBMap[I->getParent()] == FuncInfo.MBB;
316 }
317 
318 // Given a value Obj, create an Address object Addr that represents its
319 // address.  Return false if we can't handle it.
320 bool PPCFastISel::PPCComputeAddress(const Value *Obj, Address &Addr) {
321   const User *U = nullptr;
322   unsigned Opcode = Instruction::UserOp1;
323   if (const Instruction *I = dyn_cast<Instruction>(Obj)) {
324     // Don't walk into other basic blocks unless the object is an alloca from
325     // another block, otherwise it may not have a virtual register assigned.
326     if (FuncInfo.StaticAllocaMap.count(static_cast<const AllocaInst *>(Obj)) ||
327         FuncInfo.MBBMap[I->getParent()] == FuncInfo.MBB) {
328       Opcode = I->getOpcode();
329       U = I;
330     }
331   } else if (const ConstantExpr *C = dyn_cast<ConstantExpr>(Obj)) {
332     Opcode = C->getOpcode();
333     U = C;
334   }
335 
336   switch (Opcode) {
337     default:
338       break;
339     case Instruction::BitCast:
340       // Look through bitcasts.
341       return PPCComputeAddress(U->getOperand(0), Addr);
342     case Instruction::IntToPtr:
343       // Look past no-op inttoptrs.
344       if (TLI.getValueType(DL, U->getOperand(0)->getType()) ==
345           TLI.getPointerTy(DL))
346         return PPCComputeAddress(U->getOperand(0), Addr);
347       break;
348     case Instruction::PtrToInt:
349       // Look past no-op ptrtoints.
350       if (TLI.getValueType(DL, U->getType()) == TLI.getPointerTy(DL))
351         return PPCComputeAddress(U->getOperand(0), Addr);
352       break;
353     case Instruction::GetElementPtr: {
354       Address SavedAddr = Addr;
355       long TmpOffset = Addr.Offset;
356 
357       // Iterate through the GEP folding the constants into offsets where
358       // we can.
359       gep_type_iterator GTI = gep_type_begin(U);
360       for (User::const_op_iterator II = U->op_begin() + 1, IE = U->op_end();
361            II != IE; ++II, ++GTI) {
362         const Value *Op = *II;
363         if (StructType *STy = GTI.getStructTypeOrNull()) {
364           const StructLayout *SL = DL.getStructLayout(STy);
365           unsigned Idx = cast<ConstantInt>(Op)->getZExtValue();
366           TmpOffset += SL->getElementOffset(Idx);
367         } else {
368           uint64_t S = DL.getTypeAllocSize(GTI.getIndexedType());
369           for (;;) {
370             if (const ConstantInt *CI = dyn_cast<ConstantInt>(Op)) {
371               // Constant-offset addressing.
372               TmpOffset += CI->getSExtValue() * S;
373               break;
374             }
375             if (canFoldAddIntoGEP(U, Op)) {
376               // A compatible add with a constant operand. Fold the constant.
377               ConstantInt *CI =
378               cast<ConstantInt>(cast<AddOperator>(Op)->getOperand(1));
379               TmpOffset += CI->getSExtValue() * S;
380               // Iterate on the other operand.
381               Op = cast<AddOperator>(Op)->getOperand(0);
382               continue;
383             }
384             // Unsupported
385             goto unsupported_gep;
386           }
387         }
388       }
389 
390       // Try to grab the base operand now.
391       Addr.Offset = TmpOffset;
392       if (PPCComputeAddress(U->getOperand(0), Addr)) return true;
393 
394       // We failed, restore everything and try the other options.
395       Addr = SavedAddr;
396 
397       unsupported_gep:
398       break;
399     }
400     case Instruction::Alloca: {
401       const AllocaInst *AI = cast<AllocaInst>(Obj);
402       DenseMap<const AllocaInst*, int>::iterator SI =
403         FuncInfo.StaticAllocaMap.find(AI);
404       if (SI != FuncInfo.StaticAllocaMap.end()) {
405         Addr.BaseType = Address::FrameIndexBase;
406         Addr.Base.FI = SI->second;
407         return true;
408       }
409       break;
410     }
411   }
412 
413   // FIXME: References to parameters fall through to the behavior
414   // below.  They should be able to reference a frame index since
415   // they are stored to the stack, so we can get "ld rx, offset(r1)"
416   // instead of "addi ry, r1, offset / ld rx, 0(ry)".  Obj will
417   // just contain the parameter.  Try to handle this with a FI.
418 
419   // Try to get this in a register if nothing else has worked.
420   if (Addr.Base.Reg == 0)
421     Addr.Base.Reg = getRegForValue(Obj);
422 
423   // Prevent assignment of base register to X0, which is inappropriate
424   // for loads and stores alike.
425   if (Addr.Base.Reg != 0)
426     MRI.setRegClass(Addr.Base.Reg, &PPC::G8RC_and_G8RC_NOX0RegClass);
427 
428   return Addr.Base.Reg != 0;
429 }
430 
431 // Fix up some addresses that can't be used directly.  For example, if
432 // an offset won't fit in an instruction field, we may need to move it
433 // into an index register.
434 void PPCFastISel::PPCSimplifyAddress(Address &Addr, bool &UseOffset,
435                                      unsigned &IndexReg) {
436 
437   // Check whether the offset fits in the instruction field.
438   if (!isInt<16>(Addr.Offset))
439     UseOffset = false;
440 
441   // If this is a stack pointer and the offset needs to be simplified then
442   // put the alloca address into a register, set the base type back to
443   // register and continue. This should almost never happen.
444   if (!UseOffset && Addr.BaseType == Address::FrameIndexBase) {
445     unsigned ResultReg = createResultReg(&PPC::G8RC_and_G8RC_NOX0RegClass);
446     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::ADDI8),
447             ResultReg).addFrameIndex(Addr.Base.FI).addImm(0);
448     Addr.Base.Reg = ResultReg;
449     Addr.BaseType = Address::RegBase;
450   }
451 
452   if (!UseOffset) {
453     IntegerType *OffsetTy = Type::getInt64Ty(*Context);
454     const ConstantInt *Offset =
455       ConstantInt::getSigned(OffsetTy, (int64_t)(Addr.Offset));
456     IndexReg = PPCMaterializeInt(Offset, MVT::i64);
457     assert(IndexReg && "Unexpected error in PPCMaterializeInt!");
458   }
459 }
460 
461 // Emit a load instruction if possible, returning true if we succeeded,
462 // otherwise false.  See commentary below for how the register class of
463 // the load is determined.
464 bool PPCFastISel::PPCEmitLoad(MVT VT, unsigned &ResultReg, Address &Addr,
465                               const TargetRegisterClass *RC,
466                               bool IsZExt, unsigned FP64LoadOpc) {
467   unsigned Opc;
468   bool UseOffset = true;
469   bool HasSPE = PPCSubTarget->hasSPE();
470 
471   // If ResultReg is given, it determines the register class of the load.
472   // Otherwise, RC is the register class to use.  If the result of the
473   // load isn't anticipated in this block, both may be zero, in which
474   // case we must make a conservative guess.  In particular, don't assign
475   // R0 or X0 to the result register, as the result may be used in a load,
476   // store, add-immediate, or isel that won't permit this.  (Though
477   // perhaps the spill and reload of live-exit values would handle this?)
478   const TargetRegisterClass *UseRC =
479     (ResultReg ? MRI.getRegClass(ResultReg) :
480      (RC ? RC :
481       (VT == MVT::f64 ? (HasSPE ? &PPC::SPERCRegClass : &PPC::F8RCRegClass) :
482        (VT == MVT::f32 ? (HasSPE ? &PPC::SPE4RCRegClass : &PPC::F4RCRegClass) :
483         (VT == MVT::i64 ? &PPC::G8RC_and_G8RC_NOX0RegClass :
484          &PPC::GPRC_and_GPRC_NOR0RegClass)))));
485 
486   bool Is32BitInt = UseRC->hasSuperClassEq(&PPC::GPRCRegClass);
487 
488   switch (VT.SimpleTy) {
489     default: // e.g., vector types not handled
490       return false;
491     case MVT::i8:
492       Opc = Is32BitInt ? PPC::LBZ : PPC::LBZ8;
493       break;
494     case MVT::i16:
495       Opc = (IsZExt ? (Is32BitInt ? PPC::LHZ : PPC::LHZ8)
496                     : (Is32BitInt ? PPC::LHA : PPC::LHA8));
497       break;
498     case MVT::i32:
499       Opc = (IsZExt ? (Is32BitInt ? PPC::LWZ : PPC::LWZ8)
500                     : (Is32BitInt ? PPC::LWA_32 : PPC::LWA));
501       if ((Opc == PPC::LWA || Opc == PPC::LWA_32) && ((Addr.Offset & 3) != 0))
502         UseOffset = false;
503       break;
504     case MVT::i64:
505       Opc = PPC::LD;
506       assert(UseRC->hasSuperClassEq(&PPC::G8RCRegClass) &&
507              "64-bit load with 32-bit target??");
508       UseOffset = ((Addr.Offset & 3) == 0);
509       break;
510     case MVT::f32:
511       Opc = PPCSubTarget->hasSPE() ? PPC::SPELWZ : PPC::LFS;
512       break;
513     case MVT::f64:
514       Opc = FP64LoadOpc;
515       break;
516   }
517 
518   // If necessary, materialize the offset into a register and use
519   // the indexed form.  Also handle stack pointers with special needs.
520   unsigned IndexReg = 0;
521   PPCSimplifyAddress(Addr, UseOffset, IndexReg);
522 
523   // If this is a potential VSX load with an offset of 0, a VSX indexed load can
524   // be used.
525   bool IsVSSRC = isVSSRCRegClass(UseRC);
526   bool IsVSFRC = isVSFRCRegClass(UseRC);
527   bool Is32VSXLoad = IsVSSRC && Opc == PPC::LFS;
528   bool Is64VSXLoad = IsVSFRC && Opc == PPC::LFD;
529   if ((Is32VSXLoad || Is64VSXLoad) &&
530       (Addr.BaseType != Address::FrameIndexBase) && UseOffset &&
531       (Addr.Offset == 0)) {
532     UseOffset = false;
533   }
534 
535   if (ResultReg == 0)
536     ResultReg = createResultReg(UseRC);
537 
538   // Note: If we still have a frame index here, we know the offset is
539   // in range, as otherwise PPCSimplifyAddress would have converted it
540   // into a RegBase.
541   if (Addr.BaseType == Address::FrameIndexBase) {
542     // VSX only provides an indexed load.
543     if (Is32VSXLoad || Is64VSXLoad) return false;
544 
545     MachineMemOperand *MMO = FuncInfo.MF->getMachineMemOperand(
546         MachinePointerInfo::getFixedStack(*FuncInfo.MF, Addr.Base.FI,
547                                           Addr.Offset),
548         MachineMemOperand::MOLoad, MFI.getObjectSize(Addr.Base.FI),
549         MFI.getObjectAlignment(Addr.Base.FI));
550 
551     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), ResultReg)
552       .addImm(Addr.Offset).addFrameIndex(Addr.Base.FI).addMemOperand(MMO);
553 
554   // Base reg with offset in range.
555   } else if (UseOffset) {
556     // VSX only provides an indexed load.
557     if (Is32VSXLoad || Is64VSXLoad) return false;
558 
559     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), ResultReg)
560       .addImm(Addr.Offset).addReg(Addr.Base.Reg);
561 
562   // Indexed form.
563   } else {
564     // Get the RR opcode corresponding to the RI one.  FIXME: It would be
565     // preferable to use the ImmToIdxMap from PPCRegisterInfo.cpp, but it
566     // is hard to get at.
567     switch (Opc) {
568       default:        llvm_unreachable("Unexpected opcode!");
569       case PPC::LBZ:    Opc = PPC::LBZX;    break;
570       case PPC::LBZ8:   Opc = PPC::LBZX8;   break;
571       case PPC::LHZ:    Opc = PPC::LHZX;    break;
572       case PPC::LHZ8:   Opc = PPC::LHZX8;   break;
573       case PPC::LHA:    Opc = PPC::LHAX;    break;
574       case PPC::LHA8:   Opc = PPC::LHAX8;   break;
575       case PPC::LWZ:    Opc = PPC::LWZX;    break;
576       case PPC::LWZ8:   Opc = PPC::LWZX8;   break;
577       case PPC::LWA:    Opc = PPC::LWAX;    break;
578       case PPC::LWA_32: Opc = PPC::LWAX_32; break;
579       case PPC::LD:     Opc = PPC::LDX;     break;
580       case PPC::LFS:    Opc = IsVSSRC ? PPC::LXSSPX : PPC::LFSX; break;
581       case PPC::LFD:    Opc = IsVSFRC ? PPC::LXSDX : PPC::LFDX; break;
582       case PPC::EVLDD:  Opc = PPC::EVLDDX;  break;
583       case PPC::SPELWZ: Opc = PPC::SPELWZX;    break;
584     }
585 
586     auto MIB = BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc),
587                        ResultReg);
588 
589     // If we have an index register defined we use it in the store inst,
590     // otherwise we use X0 as base as it makes the vector instructions to
591     // use zero in the computation of the effective address regardless the
592     // content of the register.
593     if (IndexReg)
594       MIB.addReg(Addr.Base.Reg).addReg(IndexReg);
595     else
596       MIB.addReg(PPC::ZERO8).addReg(Addr.Base.Reg);
597   }
598 
599   return true;
600 }
601 
602 // Attempt to fast-select a load instruction.
603 bool PPCFastISel::SelectLoad(const Instruction *I) {
604   // FIXME: No atomic loads are supported.
605   if (cast<LoadInst>(I)->isAtomic())
606     return false;
607 
608   // Verify we have a legal type before going any further.
609   MVT VT;
610   if (!isLoadTypeLegal(I->getType(), VT))
611     return false;
612 
613   // See if we can handle this address.
614   Address Addr;
615   if (!PPCComputeAddress(I->getOperand(0), Addr))
616     return false;
617 
618   // Look at the currently assigned register for this instruction
619   // to determine the required register class.  This is necessary
620   // to constrain RA from using R0/X0 when this is not legal.
621   unsigned AssignedReg = FuncInfo.ValueMap[I];
622   const TargetRegisterClass *RC =
623     AssignedReg ? MRI.getRegClass(AssignedReg) : nullptr;
624 
625   unsigned ResultReg = 0;
626   if (!PPCEmitLoad(VT, ResultReg, Addr, RC, true,
627       PPCSubTarget->hasSPE() ? PPC::EVLDD : PPC::LFD))
628     return false;
629   updateValueMap(I, ResultReg);
630   return true;
631 }
632 
633 // Emit a store instruction to store SrcReg at Addr.
634 bool PPCFastISel::PPCEmitStore(MVT VT, unsigned SrcReg, Address &Addr) {
635   assert(SrcReg && "Nothing to store!");
636   unsigned Opc;
637   bool UseOffset = true;
638 
639   const TargetRegisterClass *RC = MRI.getRegClass(SrcReg);
640   bool Is32BitInt = RC->hasSuperClassEq(&PPC::GPRCRegClass);
641 
642   switch (VT.SimpleTy) {
643     default: // e.g., vector types not handled
644       return false;
645     case MVT::i8:
646       Opc = Is32BitInt ? PPC::STB : PPC::STB8;
647       break;
648     case MVT::i16:
649       Opc = Is32BitInt ? PPC::STH : PPC::STH8;
650       break;
651     case MVT::i32:
652       assert(Is32BitInt && "Not GPRC for i32??");
653       Opc = PPC::STW;
654       break;
655     case MVT::i64:
656       Opc = PPC::STD;
657       UseOffset = ((Addr.Offset & 3) == 0);
658       break;
659     case MVT::f32:
660       Opc = PPCSubTarget->hasSPE() ? PPC::SPESTW : PPC::STFS;
661       break;
662     case MVT::f64:
663       Opc = PPCSubTarget->hasSPE() ? PPC::EVSTDD : PPC::STFD;
664       break;
665   }
666 
667   // If necessary, materialize the offset into a register and use
668   // the indexed form.  Also handle stack pointers with special needs.
669   unsigned IndexReg = 0;
670   PPCSimplifyAddress(Addr, UseOffset, IndexReg);
671 
672   // If this is a potential VSX store with an offset of 0, a VSX indexed store
673   // can be used.
674   bool IsVSSRC = isVSSRCRegClass(RC);
675   bool IsVSFRC = isVSFRCRegClass(RC);
676   bool Is32VSXStore = IsVSSRC && Opc == PPC::STFS;
677   bool Is64VSXStore = IsVSFRC && Opc == PPC::STFD;
678   if ((Is32VSXStore || Is64VSXStore) &&
679       (Addr.BaseType != Address::FrameIndexBase) && UseOffset &&
680       (Addr.Offset == 0)) {
681     UseOffset = false;
682   }
683 
684   // Note: If we still have a frame index here, we know the offset is
685   // in range, as otherwise PPCSimplifyAddress would have converted it
686   // into a RegBase.
687   if (Addr.BaseType == Address::FrameIndexBase) {
688     // VSX only provides an indexed store.
689     if (Is32VSXStore || Is64VSXStore) return false;
690 
691     MachineMemOperand *MMO = FuncInfo.MF->getMachineMemOperand(
692         MachinePointerInfo::getFixedStack(*FuncInfo.MF, Addr.Base.FI,
693                                           Addr.Offset),
694         MachineMemOperand::MOStore, MFI.getObjectSize(Addr.Base.FI),
695         MFI.getObjectAlignment(Addr.Base.FI));
696 
697     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc))
698         .addReg(SrcReg)
699         .addImm(Addr.Offset)
700         .addFrameIndex(Addr.Base.FI)
701         .addMemOperand(MMO);
702 
703   // Base reg with offset in range.
704   } else if (UseOffset) {
705     // VSX only provides an indexed store.
706     if (Is32VSXStore || Is64VSXStore)
707       return false;
708 
709     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc))
710       .addReg(SrcReg).addImm(Addr.Offset).addReg(Addr.Base.Reg);
711 
712   // Indexed form.
713   } else {
714     // Get the RR opcode corresponding to the RI one.  FIXME: It would be
715     // preferable to use the ImmToIdxMap from PPCRegisterInfo.cpp, but it
716     // is hard to get at.
717     switch (Opc) {
718       default:        llvm_unreachable("Unexpected opcode!");
719       case PPC::STB:  Opc = PPC::STBX;  break;
720       case PPC::STH : Opc = PPC::STHX;  break;
721       case PPC::STW : Opc = PPC::STWX;  break;
722       case PPC::STB8: Opc = PPC::STBX8; break;
723       case PPC::STH8: Opc = PPC::STHX8; break;
724       case PPC::STW8: Opc = PPC::STWX8; break;
725       case PPC::STD:  Opc = PPC::STDX;  break;
726       case PPC::STFS: Opc = IsVSSRC ? PPC::STXSSPX : PPC::STFSX; break;
727       case PPC::STFD: Opc = IsVSFRC ? PPC::STXSDX : PPC::STFDX; break;
728       case PPC::EVSTDD: Opc = PPC::EVSTDDX; break;
729       case PPC::SPESTW: Opc = PPC::SPESTWX; break;
730     }
731 
732     auto MIB = BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc))
733         .addReg(SrcReg);
734 
735     // If we have an index register defined we use it in the store inst,
736     // otherwise we use X0 as base as it makes the vector instructions to
737     // use zero in the computation of the effective address regardless the
738     // content of the register.
739     if (IndexReg)
740       MIB.addReg(Addr.Base.Reg).addReg(IndexReg);
741     else
742       MIB.addReg(PPC::ZERO8).addReg(Addr.Base.Reg);
743   }
744 
745   return true;
746 }
747 
748 // Attempt to fast-select a store instruction.
749 bool PPCFastISel::SelectStore(const Instruction *I) {
750   Value *Op0 = I->getOperand(0);
751   unsigned SrcReg = 0;
752 
753   // FIXME: No atomics loads are supported.
754   if (cast<StoreInst>(I)->isAtomic())
755     return false;
756 
757   // Verify we have a legal type before going any further.
758   MVT VT;
759   if (!isLoadTypeLegal(Op0->getType(), VT))
760     return false;
761 
762   // Get the value to be stored into a register.
763   SrcReg = getRegForValue(Op0);
764   if (SrcReg == 0)
765     return false;
766 
767   // See if we can handle this address.
768   Address Addr;
769   if (!PPCComputeAddress(I->getOperand(1), Addr))
770     return false;
771 
772   if (!PPCEmitStore(VT, SrcReg, Addr))
773     return false;
774 
775   return true;
776 }
777 
778 // Attempt to fast-select a branch instruction.
779 bool PPCFastISel::SelectBranch(const Instruction *I) {
780   const BranchInst *BI = cast<BranchInst>(I);
781   MachineBasicBlock *BrBB = FuncInfo.MBB;
782   MachineBasicBlock *TBB = FuncInfo.MBBMap[BI->getSuccessor(0)];
783   MachineBasicBlock *FBB = FuncInfo.MBBMap[BI->getSuccessor(1)];
784 
785   // For now, just try the simplest case where it's fed by a compare.
786   if (const CmpInst *CI = dyn_cast<CmpInst>(BI->getCondition())) {
787     if (isValueAvailable(CI)) {
788       Optional<PPC::Predicate> OptPPCPred = getComparePred(CI->getPredicate());
789       if (!OptPPCPred)
790         return false;
791 
792       PPC::Predicate PPCPred = OptPPCPred.getValue();
793 
794       // Take advantage of fall-through opportunities.
795       if (FuncInfo.MBB->isLayoutSuccessor(TBB)) {
796         std::swap(TBB, FBB);
797         PPCPred = PPC::InvertPredicate(PPCPred);
798       }
799 
800       unsigned CondReg = createResultReg(&PPC::CRRCRegClass);
801 
802       if (!PPCEmitCmp(CI->getOperand(0), CI->getOperand(1), CI->isUnsigned(),
803                       CondReg, PPCPred))
804         return false;
805 
806       BuildMI(*BrBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::BCC))
807         .addImm(PPCSubTarget->hasSPE() ? PPC::PRED_SPE : PPCPred)
808         .addReg(CondReg).addMBB(TBB);
809       finishCondBranch(BI->getParent(), TBB, FBB);
810       return true;
811     }
812   } else if (const ConstantInt *CI =
813              dyn_cast<ConstantInt>(BI->getCondition())) {
814     uint64_t Imm = CI->getZExtValue();
815     MachineBasicBlock *Target = (Imm == 0) ? FBB : TBB;
816     fastEmitBranch(Target, DbgLoc);
817     return true;
818   }
819 
820   // FIXME: ARM looks for a case where the block containing the compare
821   // has been split from the block containing the branch.  If this happens,
822   // there is a vreg available containing the result of the compare.  I'm
823   // not sure we can do much, as we've lost the predicate information with
824   // the compare instruction -- we have a 4-bit CR but don't know which bit
825   // to test here.
826   return false;
827 }
828 
829 // Attempt to emit a compare of the two source values.  Signed and unsigned
830 // comparisons are supported.  Return false if we can't handle it.
831 bool PPCFastISel::PPCEmitCmp(const Value *SrcValue1, const Value *SrcValue2,
832                              bool IsZExt, unsigned DestReg,
833                              const PPC::Predicate Pred) {
834   Type *Ty = SrcValue1->getType();
835   EVT SrcEVT = TLI.getValueType(DL, Ty, true);
836   if (!SrcEVT.isSimple())
837     return false;
838   MVT SrcVT = SrcEVT.getSimpleVT();
839 
840   if (SrcVT == MVT::i1 && PPCSubTarget->useCRBits())
841     return false;
842 
843   // See if operand 2 is an immediate encodeable in the compare.
844   // FIXME: Operands are not in canonical order at -O0, so an immediate
845   // operand in position 1 is a lost opportunity for now.  We are
846   // similar to ARM in this regard.
847   long Imm = 0;
848   bool UseImm = false;
849   const bool HasSPE = PPCSubTarget->hasSPE();
850 
851   // Only 16-bit integer constants can be represented in compares for
852   // PowerPC.  Others will be materialized into a register.
853   if (const ConstantInt *ConstInt = dyn_cast<ConstantInt>(SrcValue2)) {
854     if (SrcVT == MVT::i64 || SrcVT == MVT::i32 || SrcVT == MVT::i16 ||
855         SrcVT == MVT::i8 || SrcVT == MVT::i1) {
856       const APInt &CIVal = ConstInt->getValue();
857       Imm = (IsZExt) ? (long)CIVal.getZExtValue() : (long)CIVal.getSExtValue();
858       if ((IsZExt && isUInt<16>(Imm)) || (!IsZExt && isInt<16>(Imm)))
859         UseImm = true;
860     }
861   }
862 
863   unsigned SrcReg1 = getRegForValue(SrcValue1);
864   if (SrcReg1 == 0)
865     return false;
866 
867   unsigned SrcReg2 = 0;
868   if (!UseImm) {
869     SrcReg2 = getRegForValue(SrcValue2);
870     if (SrcReg2 == 0)
871       return false;
872   }
873 
874   unsigned CmpOpc;
875   bool NeedsExt = false;
876 
877   auto RC1 = MRI.getRegClass(SrcReg1);
878   auto RC2 = SrcReg2 != 0 ? MRI.getRegClass(SrcReg2) : nullptr;
879 
880   switch (SrcVT.SimpleTy) {
881     default: return false;
882     case MVT::f32:
883       if (HasSPE) {
884         switch (Pred) {
885           default: return false;
886           case PPC::PRED_EQ:
887             CmpOpc = PPC::EFSCMPEQ;
888             break;
889           case PPC::PRED_LT:
890             CmpOpc = PPC::EFSCMPLT;
891             break;
892           case PPC::PRED_GT:
893             CmpOpc = PPC::EFSCMPGT;
894             break;
895         }
896       } else {
897         CmpOpc = PPC::FCMPUS;
898         if (isVSSRCRegClass(RC1)) {
899           unsigned TmpReg = createResultReg(&PPC::F4RCRegClass);
900           BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
901                   TII.get(TargetOpcode::COPY), TmpReg).addReg(SrcReg1);
902           SrcReg1 = TmpReg;
903         }
904         if (RC2 && isVSSRCRegClass(RC2)) {
905           unsigned TmpReg = createResultReg(&PPC::F4RCRegClass);
906           BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
907                   TII.get(TargetOpcode::COPY), TmpReg).addReg(SrcReg2);
908           SrcReg2 = TmpReg;
909         }
910       }
911       break;
912     case MVT::f64:
913       if (HasSPE) {
914         switch (Pred) {
915           default: return false;
916           case PPC::PRED_EQ:
917             CmpOpc = PPC::EFDCMPEQ;
918             break;
919           case PPC::PRED_LT:
920             CmpOpc = PPC::EFDCMPLT;
921             break;
922           case PPC::PRED_GT:
923             CmpOpc = PPC::EFDCMPGT;
924             break;
925         }
926       } else if (isVSFRCRegClass(RC1) || (RC2 && isVSFRCRegClass(RC2))) {
927         CmpOpc = PPC::XSCMPUDP;
928       } else {
929         CmpOpc = PPC::FCMPUD;
930       }
931       break;
932     case MVT::i1:
933     case MVT::i8:
934     case MVT::i16:
935       NeedsExt = true;
936       LLVM_FALLTHROUGH;
937     case MVT::i32:
938       if (!UseImm)
939         CmpOpc = IsZExt ? PPC::CMPLW : PPC::CMPW;
940       else
941         CmpOpc = IsZExt ? PPC::CMPLWI : PPC::CMPWI;
942       break;
943     case MVT::i64:
944       if (!UseImm)
945         CmpOpc = IsZExt ? PPC::CMPLD : PPC::CMPD;
946       else
947         CmpOpc = IsZExt ? PPC::CMPLDI : PPC::CMPDI;
948       break;
949   }
950 
951   if (NeedsExt) {
952     unsigned ExtReg = createResultReg(&PPC::GPRCRegClass);
953     if (!PPCEmitIntExt(SrcVT, SrcReg1, MVT::i32, ExtReg, IsZExt))
954       return false;
955     SrcReg1 = ExtReg;
956 
957     if (!UseImm) {
958       unsigned ExtReg = createResultReg(&PPC::GPRCRegClass);
959       if (!PPCEmitIntExt(SrcVT, SrcReg2, MVT::i32, ExtReg, IsZExt))
960         return false;
961       SrcReg2 = ExtReg;
962     }
963   }
964 
965   if (!UseImm)
966     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(CmpOpc), DestReg)
967       .addReg(SrcReg1).addReg(SrcReg2);
968   else
969     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(CmpOpc), DestReg)
970       .addReg(SrcReg1).addImm(Imm);
971 
972   return true;
973 }
974 
975 // Attempt to fast-select a floating-point extend instruction.
976 bool PPCFastISel::SelectFPExt(const Instruction *I) {
977   Value *Src  = I->getOperand(0);
978   EVT SrcVT = TLI.getValueType(DL, Src->getType(), true);
979   EVT DestVT = TLI.getValueType(DL, I->getType(), true);
980 
981   if (SrcVT != MVT::f32 || DestVT != MVT::f64)
982     return false;
983 
984   unsigned SrcReg = getRegForValue(Src);
985   if (!SrcReg)
986     return false;
987 
988   // No code is generated for a FP extend.
989   updateValueMap(I, SrcReg);
990   return true;
991 }
992 
993 // Attempt to fast-select a floating-point truncate instruction.
994 bool PPCFastISel::SelectFPTrunc(const Instruction *I) {
995   Value *Src  = I->getOperand(0);
996   EVT SrcVT = TLI.getValueType(DL, Src->getType(), true);
997   EVT DestVT = TLI.getValueType(DL, I->getType(), true);
998 
999   if (SrcVT != MVT::f64 || DestVT != MVT::f32)
1000     return false;
1001 
1002   unsigned SrcReg = getRegForValue(Src);
1003   if (!SrcReg)
1004     return false;
1005 
1006   // Round the result to single precision.
1007   unsigned DestReg;
1008 
1009   if (PPCSubTarget->hasSPE()) {
1010     DestReg = createResultReg(&PPC::SPE4RCRegClass);
1011     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1012       TII.get(PPC::EFSCFD), DestReg)
1013       .addReg(SrcReg);
1014   } else {
1015     DestReg = createResultReg(&PPC::F4RCRegClass);
1016     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1017       TII.get(PPC::FRSP), DestReg)
1018       .addReg(SrcReg);
1019   }
1020 
1021   updateValueMap(I, DestReg);
1022   return true;
1023 }
1024 
1025 // Move an i32 or i64 value in a GPR to an f64 value in an FPR.
1026 // FIXME: When direct register moves are implemented (see PowerISA 2.07),
1027 // those should be used instead of moving via a stack slot when the
1028 // subtarget permits.
1029 // FIXME: The code here is sloppy for the 4-byte case.  Can use a 4-byte
1030 // stack slot and 4-byte store/load sequence.  Or just sext the 4-byte
1031 // case to 8 bytes which produces tighter code but wastes stack space.
1032 unsigned PPCFastISel::PPCMoveToFPReg(MVT SrcVT, unsigned SrcReg,
1033                                      bool IsSigned) {
1034 
1035   // If necessary, extend 32-bit int to 64-bit.
1036   if (SrcVT == MVT::i32) {
1037     unsigned TmpReg = createResultReg(&PPC::G8RCRegClass);
1038     if (!PPCEmitIntExt(MVT::i32, SrcReg, MVT::i64, TmpReg, !IsSigned))
1039       return 0;
1040     SrcReg = TmpReg;
1041   }
1042 
1043   // Get a stack slot 8 bytes wide, aligned on an 8-byte boundary.
1044   Address Addr;
1045   Addr.BaseType = Address::FrameIndexBase;
1046   Addr.Base.FI = MFI.CreateStackObject(8, 8, false);
1047 
1048   // Store the value from the GPR.
1049   if (!PPCEmitStore(MVT::i64, SrcReg, Addr))
1050     return 0;
1051 
1052   // Load the integer value into an FPR.  The kind of load used depends
1053   // on a number of conditions.
1054   unsigned LoadOpc = PPC::LFD;
1055 
1056   if (SrcVT == MVT::i32) {
1057     if (!IsSigned) {
1058       LoadOpc = PPC::LFIWZX;
1059       Addr.Offset = (PPCSubTarget->isLittleEndian()) ? 0 : 4;
1060     } else if (PPCSubTarget->hasLFIWAX()) {
1061       LoadOpc = PPC::LFIWAX;
1062       Addr.Offset = (PPCSubTarget->isLittleEndian()) ? 0 : 4;
1063     }
1064   }
1065 
1066   const TargetRegisterClass *RC = &PPC::F8RCRegClass;
1067   unsigned ResultReg = 0;
1068   if (!PPCEmitLoad(MVT::f64, ResultReg, Addr, RC, !IsSigned, LoadOpc))
1069     return 0;
1070 
1071   return ResultReg;
1072 }
1073 
1074 // Attempt to fast-select an integer-to-floating-point conversion.
1075 // FIXME: Once fast-isel has better support for VSX, conversions using
1076 //        direct moves should be implemented.
1077 bool PPCFastISel::SelectIToFP(const Instruction *I, bool IsSigned) {
1078   MVT DstVT;
1079   Type *DstTy = I->getType();
1080   if (!isTypeLegal(DstTy, DstVT))
1081     return false;
1082 
1083   if (DstVT != MVT::f32 && DstVT != MVT::f64)
1084     return false;
1085 
1086   Value *Src = I->getOperand(0);
1087   EVT SrcEVT = TLI.getValueType(DL, Src->getType(), true);
1088   if (!SrcEVT.isSimple())
1089     return false;
1090 
1091   MVT SrcVT = SrcEVT.getSimpleVT();
1092 
1093   if (SrcVT != MVT::i8  && SrcVT != MVT::i16 &&
1094       SrcVT != MVT::i32 && SrcVT != MVT::i64)
1095     return false;
1096 
1097   unsigned SrcReg = getRegForValue(Src);
1098   if (SrcReg == 0)
1099     return false;
1100 
1101   // Shortcut for SPE.  Doesn't need to store/load, since it's all in the GPRs
1102   if (PPCSubTarget->hasSPE()) {
1103     unsigned Opc;
1104     if (DstVT == MVT::f32)
1105       Opc = IsSigned ? PPC::EFSCFSI : PPC::EFSCFUI;
1106     else
1107       Opc = IsSigned ? PPC::EFDCFSI : PPC::EFDCFUI;
1108 
1109     unsigned DestReg = createResultReg(&PPC::SPERCRegClass);
1110     // Generate the convert.
1111     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), DestReg)
1112       .addReg(SrcReg);
1113     updateValueMap(I, DestReg);
1114     return true;
1115   }
1116 
1117   // We can only lower an unsigned convert if we have the newer
1118   // floating-point conversion operations.
1119   if (!IsSigned && !PPCSubTarget->hasFPCVT())
1120     return false;
1121 
1122   // FIXME: For now we require the newer floating-point conversion operations
1123   // (which are present only on P7 and A2 server models) when converting
1124   // to single-precision float.  Otherwise we have to generate a lot of
1125   // fiddly code to avoid double rounding.  If necessary, the fiddly code
1126   // can be found in PPCTargetLowering::LowerINT_TO_FP().
1127   if (DstVT == MVT::f32 && !PPCSubTarget->hasFPCVT())
1128     return false;
1129 
1130   // Extend the input if necessary.
1131   if (SrcVT == MVT::i8 || SrcVT == MVT::i16) {
1132     unsigned TmpReg = createResultReg(&PPC::G8RCRegClass);
1133     if (!PPCEmitIntExt(SrcVT, SrcReg, MVT::i64, TmpReg, !IsSigned))
1134       return false;
1135     SrcVT = MVT::i64;
1136     SrcReg = TmpReg;
1137   }
1138 
1139   // Move the integer value to an FPR.
1140   unsigned FPReg = PPCMoveToFPReg(SrcVT, SrcReg, IsSigned);
1141   if (FPReg == 0)
1142     return false;
1143 
1144   // Determine the opcode for the conversion.
1145   const TargetRegisterClass *RC = &PPC::F8RCRegClass;
1146   unsigned DestReg = createResultReg(RC);
1147   unsigned Opc;
1148 
1149   if (DstVT == MVT::f32)
1150     Opc = IsSigned ? PPC::FCFIDS : PPC::FCFIDUS;
1151   else
1152     Opc = IsSigned ? PPC::FCFID : PPC::FCFIDU;
1153 
1154   // Generate the convert.
1155   BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), DestReg)
1156     .addReg(FPReg);
1157 
1158   updateValueMap(I, DestReg);
1159   return true;
1160 }
1161 
1162 // Move the floating-point value in SrcReg into an integer destination
1163 // register, and return the register (or zero if we can't handle it).
1164 // FIXME: When direct register moves are implemented (see PowerISA 2.07),
1165 // those should be used instead of moving via a stack slot when the
1166 // subtarget permits.
1167 unsigned PPCFastISel::PPCMoveToIntReg(const Instruction *I, MVT VT,
1168                                       unsigned SrcReg, bool IsSigned) {
1169   // Get a stack slot 8 bytes wide, aligned on an 8-byte boundary.
1170   // Note that if have STFIWX available, we could use a 4-byte stack
1171   // slot for i32, but this being fast-isel we'll just go with the
1172   // easiest code gen possible.
1173   Address Addr;
1174   Addr.BaseType = Address::FrameIndexBase;
1175   Addr.Base.FI = MFI.CreateStackObject(8, 8, false);
1176 
1177   // Store the value from the FPR.
1178   if (!PPCEmitStore(MVT::f64, SrcReg, Addr))
1179     return 0;
1180 
1181   // Reload it into a GPR.  If we want an i32 on big endian, modify the
1182   // address to have a 4-byte offset so we load from the right place.
1183   if (VT == MVT::i32)
1184     Addr.Offset = (PPCSubTarget->isLittleEndian()) ? 0 : 4;
1185 
1186   // Look at the currently assigned register for this instruction
1187   // to determine the required register class.
1188   unsigned AssignedReg = FuncInfo.ValueMap[I];
1189   const TargetRegisterClass *RC =
1190     AssignedReg ? MRI.getRegClass(AssignedReg) : nullptr;
1191 
1192   unsigned ResultReg = 0;
1193   if (!PPCEmitLoad(VT, ResultReg, Addr, RC, !IsSigned))
1194     return 0;
1195 
1196   return ResultReg;
1197 }
1198 
1199 // Attempt to fast-select a floating-point-to-integer conversion.
1200 // FIXME: Once fast-isel has better support for VSX, conversions using
1201 //        direct moves should be implemented.
1202 bool PPCFastISel::SelectFPToI(const Instruction *I, bool IsSigned) {
1203   MVT DstVT, SrcVT;
1204   Type *DstTy = I->getType();
1205   if (!isTypeLegal(DstTy, DstVT))
1206     return false;
1207 
1208   if (DstVT != MVT::i32 && DstVT != MVT::i64)
1209     return false;
1210 
1211   // If we don't have FCTIDUZ, or SPE, and we need it, punt to SelectionDAG.
1212   if (DstVT == MVT::i64 && !IsSigned &&
1213       !PPCSubTarget->hasFPCVT() && !PPCSubTarget->hasSPE())
1214     return false;
1215 
1216   Value *Src = I->getOperand(0);
1217   Type *SrcTy = Src->getType();
1218   if (!isTypeLegal(SrcTy, SrcVT))
1219     return false;
1220 
1221   if (SrcVT != MVT::f32 && SrcVT != MVT::f64)
1222     return false;
1223 
1224   unsigned SrcReg = getRegForValue(Src);
1225   if (SrcReg == 0)
1226     return false;
1227 
1228   // Convert f32 to f64 if necessary.  This is just a meaningless copy
1229   // to get the register class right.
1230   const TargetRegisterClass *InRC = MRI.getRegClass(SrcReg);
1231   if (InRC == &PPC::F4RCRegClass) {
1232     unsigned TmpReg = createResultReg(&PPC::F8RCRegClass);
1233     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1234             TII.get(TargetOpcode::COPY), TmpReg)
1235       .addReg(SrcReg);
1236     SrcReg = TmpReg;
1237   }
1238 
1239   // Determine the opcode for the conversion, which takes place
1240   // entirely within FPRs.
1241   unsigned DestReg;
1242   unsigned Opc;
1243 
1244   if (PPCSubTarget->hasSPE()) {
1245     DestReg = createResultReg(&PPC::GPRCRegClass);
1246     if (IsSigned)
1247       Opc = InRC == &PPC::SPE4RCRegClass ? PPC::EFSCTSIZ : PPC::EFDCTSIZ;
1248     else
1249       Opc = InRC == &PPC::SPE4RCRegClass ? PPC::EFSCTUIZ : PPC::EFDCTUIZ;
1250   } else {
1251     DestReg = createResultReg(&PPC::F8RCRegClass);
1252     if (DstVT == MVT::i32)
1253       if (IsSigned)
1254         Opc = PPC::FCTIWZ;
1255       else
1256         Opc = PPCSubTarget->hasFPCVT() ? PPC::FCTIWUZ : PPC::FCTIDZ;
1257     else
1258       Opc = IsSigned ? PPC::FCTIDZ : PPC::FCTIDUZ;
1259   }
1260 
1261   // Generate the convert.
1262   BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), DestReg)
1263     .addReg(SrcReg);
1264 
1265   // Now move the integer value from a float register to an integer register.
1266   unsigned IntReg = PPCSubTarget->hasSPE() ? DestReg :
1267     PPCMoveToIntReg(I, DstVT, DestReg, IsSigned);
1268 
1269   if (IntReg == 0)
1270     return false;
1271 
1272   updateValueMap(I, IntReg);
1273   return true;
1274 }
1275 
1276 // Attempt to fast-select a binary integer operation that isn't already
1277 // handled automatically.
1278 bool PPCFastISel::SelectBinaryIntOp(const Instruction *I, unsigned ISDOpcode) {
1279   EVT DestVT = TLI.getValueType(DL, I->getType(), true);
1280 
1281   // We can get here in the case when we have a binary operation on a non-legal
1282   // type and the target independent selector doesn't know how to handle it.
1283   if (DestVT != MVT::i16 && DestVT != MVT::i8)
1284     return false;
1285 
1286   // Look at the currently assigned register for this instruction
1287   // to determine the required register class.  If there is no register,
1288   // make a conservative choice (don't assign R0).
1289   unsigned AssignedReg = FuncInfo.ValueMap[I];
1290   const TargetRegisterClass *RC =
1291     (AssignedReg ? MRI.getRegClass(AssignedReg) :
1292      &PPC::GPRC_and_GPRC_NOR0RegClass);
1293   bool IsGPRC = RC->hasSuperClassEq(&PPC::GPRCRegClass);
1294 
1295   unsigned Opc;
1296   switch (ISDOpcode) {
1297     default: return false;
1298     case ISD::ADD:
1299       Opc = IsGPRC ? PPC::ADD4 : PPC::ADD8;
1300       break;
1301     case ISD::OR:
1302       Opc = IsGPRC ? PPC::OR : PPC::OR8;
1303       break;
1304     case ISD::SUB:
1305       Opc = IsGPRC ? PPC::SUBF : PPC::SUBF8;
1306       break;
1307   }
1308 
1309   unsigned ResultReg = createResultReg(RC ? RC : &PPC::G8RCRegClass);
1310   unsigned SrcReg1 = getRegForValue(I->getOperand(0));
1311   if (SrcReg1 == 0) return false;
1312 
1313   // Handle case of small immediate operand.
1314   if (const ConstantInt *ConstInt = dyn_cast<ConstantInt>(I->getOperand(1))) {
1315     const APInt &CIVal = ConstInt->getValue();
1316     int Imm = (int)CIVal.getSExtValue();
1317     bool UseImm = true;
1318     if (isInt<16>(Imm)) {
1319       switch (Opc) {
1320         default:
1321           llvm_unreachable("Missing case!");
1322         case PPC::ADD4:
1323           Opc = PPC::ADDI;
1324           MRI.setRegClass(SrcReg1, &PPC::GPRC_and_GPRC_NOR0RegClass);
1325           break;
1326         case PPC::ADD8:
1327           Opc = PPC::ADDI8;
1328           MRI.setRegClass(SrcReg1, &PPC::G8RC_and_G8RC_NOX0RegClass);
1329           break;
1330         case PPC::OR:
1331           Opc = PPC::ORI;
1332           break;
1333         case PPC::OR8:
1334           Opc = PPC::ORI8;
1335           break;
1336         case PPC::SUBF:
1337           if (Imm == -32768)
1338             UseImm = false;
1339           else {
1340             Opc = PPC::ADDI;
1341             MRI.setRegClass(SrcReg1, &PPC::GPRC_and_GPRC_NOR0RegClass);
1342             Imm = -Imm;
1343           }
1344           break;
1345         case PPC::SUBF8:
1346           if (Imm == -32768)
1347             UseImm = false;
1348           else {
1349             Opc = PPC::ADDI8;
1350             MRI.setRegClass(SrcReg1, &PPC::G8RC_and_G8RC_NOX0RegClass);
1351             Imm = -Imm;
1352           }
1353           break;
1354       }
1355 
1356       if (UseImm) {
1357         BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc),
1358                 ResultReg)
1359             .addReg(SrcReg1)
1360             .addImm(Imm);
1361         updateValueMap(I, ResultReg);
1362         return true;
1363       }
1364     }
1365   }
1366 
1367   // Reg-reg case.
1368   unsigned SrcReg2 = getRegForValue(I->getOperand(1));
1369   if (SrcReg2 == 0) return false;
1370 
1371   // Reverse operands for subtract-from.
1372   if (ISDOpcode == ISD::SUB)
1373     std::swap(SrcReg1, SrcReg2);
1374 
1375   BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), ResultReg)
1376     .addReg(SrcReg1).addReg(SrcReg2);
1377   updateValueMap(I, ResultReg);
1378   return true;
1379 }
1380 
1381 // Handle arguments to a call that we're attempting to fast-select.
1382 // Return false if the arguments are too complex for us at the moment.
1383 bool PPCFastISel::processCallArgs(SmallVectorImpl<Value*> &Args,
1384                                   SmallVectorImpl<unsigned> &ArgRegs,
1385                                   SmallVectorImpl<MVT> &ArgVTs,
1386                                   SmallVectorImpl<ISD::ArgFlagsTy> &ArgFlags,
1387                                   SmallVectorImpl<unsigned> &RegArgs,
1388                                   CallingConv::ID CC,
1389                                   unsigned &NumBytes,
1390                                   bool IsVarArg) {
1391   SmallVector<CCValAssign, 16> ArgLocs;
1392   CCState CCInfo(CC, IsVarArg, *FuncInfo.MF, ArgLocs, *Context);
1393 
1394   // Reserve space for the linkage area on the stack.
1395   unsigned LinkageSize = PPCSubTarget->getFrameLowering()->getLinkageSize();
1396   CCInfo.AllocateStack(LinkageSize, 8);
1397 
1398   CCInfo.AnalyzeCallOperands(ArgVTs, ArgFlags, CC_PPC64_ELF_FIS);
1399 
1400   // Bail out if we can't handle any of the arguments.
1401   for (unsigned I = 0, E = ArgLocs.size(); I != E; ++I) {
1402     CCValAssign &VA = ArgLocs[I];
1403     MVT ArgVT = ArgVTs[VA.getValNo()];
1404 
1405     // Skip vector arguments for now, as well as long double and
1406     // uint128_t, and anything that isn't passed in a register.
1407     if (ArgVT.isVector() || ArgVT.getSizeInBits() > 64 || ArgVT == MVT::i1 ||
1408         !VA.isRegLoc() || VA.needsCustom())
1409       return false;
1410 
1411     // Skip bit-converted arguments for now.
1412     if (VA.getLocInfo() == CCValAssign::BCvt)
1413       return false;
1414   }
1415 
1416   // Get a count of how many bytes are to be pushed onto the stack.
1417   NumBytes = CCInfo.getNextStackOffset();
1418 
1419   // The prolog code of the callee may store up to 8 GPR argument registers to
1420   // the stack, allowing va_start to index over them in memory if its varargs.
1421   // Because we cannot tell if this is needed on the caller side, we have to
1422   // conservatively assume that it is needed.  As such, make sure we have at
1423   // least enough stack space for the caller to store the 8 GPRs.
1424   // FIXME: On ELFv2, it may be unnecessary to allocate the parameter area.
1425   NumBytes = std::max(NumBytes, LinkageSize + 64);
1426 
1427   // Issue CALLSEQ_START.
1428   BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1429           TII.get(TII.getCallFrameSetupOpcode()))
1430     .addImm(NumBytes).addImm(0);
1431 
1432   // Prepare to assign register arguments.  Every argument uses up a
1433   // GPR protocol register even if it's passed in a floating-point
1434   // register (unless we're using the fast calling convention).
1435   unsigned NextGPR = PPC::X3;
1436   unsigned NextFPR = PPC::F1;
1437 
1438   // Process arguments.
1439   for (unsigned I = 0, E = ArgLocs.size(); I != E; ++I) {
1440     CCValAssign &VA = ArgLocs[I];
1441     unsigned Arg = ArgRegs[VA.getValNo()];
1442     MVT ArgVT = ArgVTs[VA.getValNo()];
1443 
1444     // Handle argument promotion and bitcasts.
1445     switch (VA.getLocInfo()) {
1446       default:
1447         llvm_unreachable("Unknown loc info!");
1448       case CCValAssign::Full:
1449         break;
1450       case CCValAssign::SExt: {
1451         MVT DestVT = VA.getLocVT();
1452         const TargetRegisterClass *RC =
1453           (DestVT == MVT::i64) ? &PPC::G8RCRegClass : &PPC::GPRCRegClass;
1454         unsigned TmpReg = createResultReg(RC);
1455         if (!PPCEmitIntExt(ArgVT, Arg, DestVT, TmpReg, /*IsZExt*/false))
1456           llvm_unreachable("Failed to emit a sext!");
1457         ArgVT = DestVT;
1458         Arg = TmpReg;
1459         break;
1460       }
1461       case CCValAssign::AExt:
1462       case CCValAssign::ZExt: {
1463         MVT DestVT = VA.getLocVT();
1464         const TargetRegisterClass *RC =
1465           (DestVT == MVT::i64) ? &PPC::G8RCRegClass : &PPC::GPRCRegClass;
1466         unsigned TmpReg = createResultReg(RC);
1467         if (!PPCEmitIntExt(ArgVT, Arg, DestVT, TmpReg, /*IsZExt*/true))
1468           llvm_unreachable("Failed to emit a zext!");
1469         ArgVT = DestVT;
1470         Arg = TmpReg;
1471         break;
1472       }
1473       case CCValAssign::BCvt: {
1474         // FIXME: Not yet handled.
1475         llvm_unreachable("Should have bailed before getting here!");
1476         break;
1477       }
1478     }
1479 
1480     // Copy this argument to the appropriate register.
1481     unsigned ArgReg;
1482     if (ArgVT == MVT::f32 || ArgVT == MVT::f64) {
1483       ArgReg = NextFPR++;
1484       if (CC != CallingConv::Fast)
1485         ++NextGPR;
1486     } else
1487       ArgReg = NextGPR++;
1488 
1489     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1490             TII.get(TargetOpcode::COPY), ArgReg).addReg(Arg);
1491     RegArgs.push_back(ArgReg);
1492   }
1493 
1494   return true;
1495 }
1496 
1497 // For a call that we've determined we can fast-select, finish the
1498 // call sequence and generate a copy to obtain the return value (if any).
1499 bool PPCFastISel::finishCall(MVT RetVT, CallLoweringInfo &CLI, unsigned &NumBytes) {
1500   CallingConv::ID CC = CLI.CallConv;
1501 
1502   // Issue CallSEQ_END.
1503   BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1504           TII.get(TII.getCallFrameDestroyOpcode()))
1505     .addImm(NumBytes).addImm(0);
1506 
1507   // Next, generate a copy to obtain the return value.
1508   // FIXME: No multi-register return values yet, though I don't foresee
1509   // any real difficulties there.
1510   if (RetVT != MVT::isVoid) {
1511     SmallVector<CCValAssign, 16> RVLocs;
1512     CCState CCInfo(CC, false, *FuncInfo.MF, RVLocs, *Context);
1513     CCInfo.AnalyzeCallResult(RetVT, RetCC_PPC64_ELF_FIS);
1514     CCValAssign &VA = RVLocs[0];
1515     assert(RVLocs.size() == 1 && "No support for multi-reg return values!");
1516     assert(VA.isRegLoc() && "Can only return in registers!");
1517 
1518     MVT DestVT = VA.getValVT();
1519     MVT CopyVT = DestVT;
1520 
1521     // Ints smaller than a register still arrive in a full 64-bit
1522     // register, so make sure we recognize this.
1523     if (RetVT == MVT::i8 || RetVT == MVT::i16 || RetVT == MVT::i32)
1524       CopyVT = MVT::i64;
1525 
1526     unsigned SourcePhysReg = VA.getLocReg();
1527     unsigned ResultReg = 0;
1528 
1529     if (RetVT == CopyVT) {
1530       const TargetRegisterClass *CpyRC = TLI.getRegClassFor(CopyVT);
1531       ResultReg = createResultReg(CpyRC);
1532 
1533       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1534               TII.get(TargetOpcode::COPY), ResultReg)
1535         .addReg(SourcePhysReg);
1536 
1537     // If necessary, round the floating result to single precision.
1538     } else if (CopyVT == MVT::f64) {
1539       ResultReg = createResultReg(TLI.getRegClassFor(RetVT));
1540       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::FRSP),
1541               ResultReg).addReg(SourcePhysReg);
1542 
1543     // If only the low half of a general register is needed, generate
1544     // a GPRC copy instead of a G8RC copy.  (EXTRACT_SUBREG can't be
1545     // used along the fast-isel path (not lowered), and downstream logic
1546     // also doesn't like a direct subreg copy on a physical reg.)
1547     } else if (RetVT == MVT::i8 || RetVT == MVT::i16 || RetVT == MVT::i32) {
1548       ResultReg = createResultReg(&PPC::GPRCRegClass);
1549       // Convert physical register from G8RC to GPRC.
1550       SourcePhysReg -= PPC::X0 - PPC::R0;
1551       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1552               TII.get(TargetOpcode::COPY), ResultReg)
1553         .addReg(SourcePhysReg);
1554     }
1555 
1556     assert(ResultReg && "ResultReg unset!");
1557     CLI.InRegs.push_back(SourcePhysReg);
1558     CLI.ResultReg = ResultReg;
1559     CLI.NumResultRegs = 1;
1560   }
1561 
1562   return true;
1563 }
1564 
1565 bool PPCFastISel::fastLowerCall(CallLoweringInfo &CLI) {
1566   CallingConv::ID CC  = CLI.CallConv;
1567   bool IsTailCall     = CLI.IsTailCall;
1568   bool IsVarArg       = CLI.IsVarArg;
1569   const Value *Callee = CLI.Callee;
1570   const MCSymbol *Symbol = CLI.Symbol;
1571 
1572   if (!Callee && !Symbol)
1573     return false;
1574 
1575   // Allow SelectionDAG isel to handle tail calls.
1576   if (IsTailCall)
1577     return false;
1578 
1579   // Let SDISel handle vararg functions.
1580   if (IsVarArg)
1581     return false;
1582 
1583   // Handle simple calls for now, with legal return types and
1584   // those that can be extended.
1585   Type *RetTy = CLI.RetTy;
1586   MVT RetVT;
1587   if (RetTy->isVoidTy())
1588     RetVT = MVT::isVoid;
1589   else if (!isTypeLegal(RetTy, RetVT) && RetVT != MVT::i16 &&
1590            RetVT != MVT::i8)
1591     return false;
1592   else if (RetVT == MVT::i1 && PPCSubTarget->useCRBits())
1593     // We can't handle boolean returns when CR bits are in use.
1594     return false;
1595 
1596   // FIXME: No multi-register return values yet.
1597   if (RetVT != MVT::isVoid && RetVT != MVT::i8 && RetVT != MVT::i16 &&
1598       RetVT != MVT::i32 && RetVT != MVT::i64 && RetVT != MVT::f32 &&
1599       RetVT != MVT::f64) {
1600     SmallVector<CCValAssign, 16> RVLocs;
1601     CCState CCInfo(CC, IsVarArg, *FuncInfo.MF, RVLocs, *Context);
1602     CCInfo.AnalyzeCallResult(RetVT, RetCC_PPC64_ELF_FIS);
1603     if (RVLocs.size() > 1)
1604       return false;
1605   }
1606 
1607   // Bail early if more than 8 arguments, as we only currently
1608   // handle arguments passed in registers.
1609   unsigned NumArgs = CLI.OutVals.size();
1610   if (NumArgs > 8)
1611     return false;
1612 
1613   // Set up the argument vectors.
1614   SmallVector<Value*, 8> Args;
1615   SmallVector<unsigned, 8> ArgRegs;
1616   SmallVector<MVT, 8> ArgVTs;
1617   SmallVector<ISD::ArgFlagsTy, 8> ArgFlags;
1618 
1619   Args.reserve(NumArgs);
1620   ArgRegs.reserve(NumArgs);
1621   ArgVTs.reserve(NumArgs);
1622   ArgFlags.reserve(NumArgs);
1623 
1624   for (unsigned i = 0, ie = NumArgs; i != ie; ++i) {
1625     // Only handle easy calls for now.  It would be reasonably easy
1626     // to handle <= 8-byte structures passed ByVal in registers, but we
1627     // have to ensure they are right-justified in the register.
1628     ISD::ArgFlagsTy Flags = CLI.OutFlags[i];
1629     if (Flags.isInReg() || Flags.isSRet() || Flags.isNest() || Flags.isByVal())
1630       return false;
1631 
1632     Value *ArgValue = CLI.OutVals[i];
1633     Type *ArgTy = ArgValue->getType();
1634     MVT ArgVT;
1635     if (!isTypeLegal(ArgTy, ArgVT) && ArgVT != MVT::i16 && ArgVT != MVT::i8)
1636       return false;
1637 
1638     if (ArgVT.isVector())
1639       return false;
1640 
1641     unsigned Arg = getRegForValue(ArgValue);
1642     if (Arg == 0)
1643       return false;
1644 
1645     Args.push_back(ArgValue);
1646     ArgRegs.push_back(Arg);
1647     ArgVTs.push_back(ArgVT);
1648     ArgFlags.push_back(Flags);
1649   }
1650 
1651   // Process the arguments.
1652   SmallVector<unsigned, 8> RegArgs;
1653   unsigned NumBytes;
1654 
1655   if (!processCallArgs(Args, ArgRegs, ArgVTs, ArgFlags,
1656                        RegArgs, CC, NumBytes, IsVarArg))
1657     return false;
1658 
1659   MachineInstrBuilder MIB;
1660   // FIXME: No handling for function pointers yet.  This requires
1661   // implementing the function descriptor (OPD) setup.
1662   const GlobalValue *GV = dyn_cast<GlobalValue>(Callee);
1663   if (!GV) {
1664     // patchpoints are a special case; they always dispatch to a pointer value.
1665     // However, we don't actually want to generate the indirect call sequence
1666     // here (that will be generated, as necessary, during asm printing), and
1667     // the call we generate here will be erased by FastISel::selectPatchpoint,
1668     // so don't try very hard...
1669     if (CLI.IsPatchPoint)
1670       MIB = BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::NOP));
1671     else
1672       return false;
1673   } else {
1674     // Build direct call with NOP for TOC restore.
1675     // FIXME: We can and should optimize away the NOP for local calls.
1676     MIB = BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1677                   TII.get(PPC::BL8_NOP));
1678     // Add callee.
1679     MIB.addGlobalAddress(GV);
1680   }
1681 
1682   // Add implicit physical register uses to the call.
1683   for (unsigned II = 0, IE = RegArgs.size(); II != IE; ++II)
1684     MIB.addReg(RegArgs[II], RegState::Implicit);
1685 
1686   // Direct calls, in both the ELF V1 and V2 ABIs, need the TOC register live
1687   // into the call.
1688   PPCFuncInfo->setUsesTOCBasePtr();
1689   MIB.addReg(PPC::X2, RegState::Implicit);
1690 
1691   // Add a register mask with the call-preserved registers.  Proper
1692   // defs for return values will be added by setPhysRegsDeadExcept().
1693   MIB.addRegMask(TRI.getCallPreservedMask(*FuncInfo.MF, CC));
1694 
1695   CLI.Call = MIB;
1696 
1697   // Finish off the call including any return values.
1698   return finishCall(RetVT, CLI, NumBytes);
1699 }
1700 
1701 // Attempt to fast-select a return instruction.
1702 bool PPCFastISel::SelectRet(const Instruction *I) {
1703 
1704   if (!FuncInfo.CanLowerReturn)
1705     return false;
1706 
1707   if (TLI.supportSplitCSR(FuncInfo.MF))
1708     return false;
1709 
1710   const ReturnInst *Ret = cast<ReturnInst>(I);
1711   const Function &F = *I->getParent()->getParent();
1712 
1713   // Build a list of return value registers.
1714   SmallVector<unsigned, 4> RetRegs;
1715   CallingConv::ID CC = F.getCallingConv();
1716 
1717   if (Ret->getNumOperands() > 0) {
1718     SmallVector<ISD::OutputArg, 4> Outs;
1719     GetReturnInfo(CC, F.getReturnType(), F.getAttributes(), Outs, TLI, DL);
1720 
1721     // Analyze operands of the call, assigning locations to each operand.
1722     SmallVector<CCValAssign, 16> ValLocs;
1723     CCState CCInfo(CC, F.isVarArg(), *FuncInfo.MF, ValLocs, *Context);
1724     CCInfo.AnalyzeReturn(Outs, RetCC_PPC64_ELF_FIS);
1725     const Value *RV = Ret->getOperand(0);
1726 
1727     // FIXME: Only one output register for now.
1728     if (ValLocs.size() > 1)
1729       return false;
1730 
1731     // Special case for returning a constant integer of any size - materialize
1732     // the constant as an i64 and copy it to the return register.
1733     if (const ConstantInt *CI = dyn_cast<ConstantInt>(RV)) {
1734       CCValAssign &VA = ValLocs[0];
1735 
1736       unsigned RetReg = VA.getLocReg();
1737       // We still need to worry about properly extending the sign. For example,
1738       // we could have only a single bit or a constant that needs zero
1739       // extension rather than sign extension. Make sure we pass the return
1740       // value extension property to integer materialization.
1741       unsigned SrcReg =
1742           PPCMaterializeInt(CI, MVT::i64, VA.getLocInfo() != CCValAssign::ZExt);
1743 
1744       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1745             TII.get(TargetOpcode::COPY), RetReg).addReg(SrcReg);
1746 
1747       RetRegs.push_back(RetReg);
1748 
1749     } else {
1750       unsigned Reg = getRegForValue(RV);
1751 
1752       if (Reg == 0)
1753         return false;
1754 
1755       // Copy the result values into the output registers.
1756       for (unsigned i = 0; i < ValLocs.size(); ++i) {
1757 
1758         CCValAssign &VA = ValLocs[i];
1759         assert(VA.isRegLoc() && "Can only return in registers!");
1760         RetRegs.push_back(VA.getLocReg());
1761         unsigned SrcReg = Reg + VA.getValNo();
1762 
1763         EVT RVEVT = TLI.getValueType(DL, RV->getType());
1764         if (!RVEVT.isSimple())
1765           return false;
1766         MVT RVVT = RVEVT.getSimpleVT();
1767         MVT DestVT = VA.getLocVT();
1768 
1769         if (RVVT != DestVT && RVVT != MVT::i8 &&
1770             RVVT != MVT::i16 && RVVT != MVT::i32)
1771           return false;
1772 
1773         if (RVVT != DestVT) {
1774           switch (VA.getLocInfo()) {
1775             default:
1776               llvm_unreachable("Unknown loc info!");
1777             case CCValAssign::Full:
1778               llvm_unreachable("Full value assign but types don't match?");
1779             case CCValAssign::AExt:
1780             case CCValAssign::ZExt: {
1781               const TargetRegisterClass *RC =
1782                 (DestVT == MVT::i64) ? &PPC::G8RCRegClass : &PPC::GPRCRegClass;
1783               unsigned TmpReg = createResultReg(RC);
1784               if (!PPCEmitIntExt(RVVT, SrcReg, DestVT, TmpReg, true))
1785                 return false;
1786               SrcReg = TmpReg;
1787               break;
1788             }
1789             case CCValAssign::SExt: {
1790               const TargetRegisterClass *RC =
1791                 (DestVT == MVT::i64) ? &PPC::G8RCRegClass : &PPC::GPRCRegClass;
1792               unsigned TmpReg = createResultReg(RC);
1793               if (!PPCEmitIntExt(RVVT, SrcReg, DestVT, TmpReg, false))
1794                 return false;
1795               SrcReg = TmpReg;
1796               break;
1797             }
1798           }
1799         }
1800 
1801         BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1802                 TII.get(TargetOpcode::COPY), RetRegs[i])
1803           .addReg(SrcReg);
1804       }
1805     }
1806   }
1807 
1808   MachineInstrBuilder MIB = BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1809                                     TII.get(PPC::BLR8));
1810 
1811   for (unsigned i = 0, e = RetRegs.size(); i != e; ++i)
1812     MIB.addReg(RetRegs[i], RegState::Implicit);
1813 
1814   return true;
1815 }
1816 
1817 // Attempt to emit an integer extend of SrcReg into DestReg.  Both
1818 // signed and zero extensions are supported.  Return false if we
1819 // can't handle it.
1820 bool PPCFastISel::PPCEmitIntExt(MVT SrcVT, unsigned SrcReg, MVT DestVT,
1821                                 unsigned DestReg, bool IsZExt) {
1822   if (DestVT != MVT::i32 && DestVT != MVT::i64)
1823     return false;
1824   if (SrcVT != MVT::i8 && SrcVT != MVT::i16 && SrcVT != MVT::i32)
1825     return false;
1826 
1827   // Signed extensions use EXTSB, EXTSH, EXTSW.
1828   if (!IsZExt) {
1829     unsigned Opc;
1830     if (SrcVT == MVT::i8)
1831       Opc = (DestVT == MVT::i32) ? PPC::EXTSB : PPC::EXTSB8_32_64;
1832     else if (SrcVT == MVT::i16)
1833       Opc = (DestVT == MVT::i32) ? PPC::EXTSH : PPC::EXTSH8_32_64;
1834     else {
1835       assert(DestVT == MVT::i64 && "Signed extend from i32 to i32??");
1836       Opc = PPC::EXTSW_32_64;
1837     }
1838     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), DestReg)
1839       .addReg(SrcReg);
1840 
1841   // Unsigned 32-bit extensions use RLWINM.
1842   } else if (DestVT == MVT::i32) {
1843     unsigned MB;
1844     if (SrcVT == MVT::i8)
1845       MB = 24;
1846     else {
1847       assert(SrcVT == MVT::i16 && "Unsigned extend from i32 to i32??");
1848       MB = 16;
1849     }
1850     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::RLWINM),
1851             DestReg)
1852       .addReg(SrcReg).addImm(/*SH=*/0).addImm(MB).addImm(/*ME=*/31);
1853 
1854   // Unsigned 64-bit extensions use RLDICL (with a 32-bit source).
1855   } else {
1856     unsigned MB;
1857     if (SrcVT == MVT::i8)
1858       MB = 56;
1859     else if (SrcVT == MVT::i16)
1860       MB = 48;
1861     else
1862       MB = 32;
1863     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1864             TII.get(PPC::RLDICL_32_64), DestReg)
1865       .addReg(SrcReg).addImm(/*SH=*/0).addImm(MB);
1866   }
1867 
1868   return true;
1869 }
1870 
1871 // Attempt to fast-select an indirect branch instruction.
1872 bool PPCFastISel::SelectIndirectBr(const Instruction *I) {
1873   unsigned AddrReg = getRegForValue(I->getOperand(0));
1874   if (AddrReg == 0)
1875     return false;
1876 
1877   BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::MTCTR8))
1878     .addReg(AddrReg);
1879   BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::BCTR8));
1880 
1881   const IndirectBrInst *IB = cast<IndirectBrInst>(I);
1882   for (const BasicBlock *SuccBB : IB->successors())
1883     FuncInfo.MBB->addSuccessor(FuncInfo.MBBMap[SuccBB]);
1884 
1885   return true;
1886 }
1887 
1888 // Attempt to fast-select an integer truncate instruction.
1889 bool PPCFastISel::SelectTrunc(const Instruction *I) {
1890   Value *Src  = I->getOperand(0);
1891   EVT SrcVT = TLI.getValueType(DL, Src->getType(), true);
1892   EVT DestVT = TLI.getValueType(DL, I->getType(), true);
1893 
1894   if (SrcVT != MVT::i64 && SrcVT != MVT::i32 && SrcVT != MVT::i16)
1895     return false;
1896 
1897   if (DestVT != MVT::i32 && DestVT != MVT::i16 && DestVT != MVT::i8)
1898     return false;
1899 
1900   unsigned SrcReg = getRegForValue(Src);
1901   if (!SrcReg)
1902     return false;
1903 
1904   // The only interesting case is when we need to switch register classes.
1905   if (SrcVT == MVT::i64) {
1906     unsigned ResultReg = createResultReg(&PPC::GPRCRegClass);
1907     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
1908             TII.get(TargetOpcode::COPY),
1909             ResultReg).addReg(SrcReg, 0, PPC::sub_32);
1910     SrcReg = ResultReg;
1911   }
1912 
1913   updateValueMap(I, SrcReg);
1914   return true;
1915 }
1916 
1917 // Attempt to fast-select an integer extend instruction.
1918 bool PPCFastISel::SelectIntExt(const Instruction *I) {
1919   Type *DestTy = I->getType();
1920   Value *Src = I->getOperand(0);
1921   Type *SrcTy = Src->getType();
1922 
1923   bool IsZExt = isa<ZExtInst>(I);
1924   unsigned SrcReg = getRegForValue(Src);
1925   if (!SrcReg) return false;
1926 
1927   EVT SrcEVT, DestEVT;
1928   SrcEVT = TLI.getValueType(DL, SrcTy, true);
1929   DestEVT = TLI.getValueType(DL, DestTy, true);
1930   if (!SrcEVT.isSimple())
1931     return false;
1932   if (!DestEVT.isSimple())
1933     return false;
1934 
1935   MVT SrcVT = SrcEVT.getSimpleVT();
1936   MVT DestVT = DestEVT.getSimpleVT();
1937 
1938   // If we know the register class needed for the result of this
1939   // instruction, use it.  Otherwise pick the register class of the
1940   // correct size that does not contain X0/R0, since we don't know
1941   // whether downstream uses permit that assignment.
1942   unsigned AssignedReg = FuncInfo.ValueMap[I];
1943   const TargetRegisterClass *RC =
1944     (AssignedReg ? MRI.getRegClass(AssignedReg) :
1945      (DestVT == MVT::i64 ? &PPC::G8RC_and_G8RC_NOX0RegClass :
1946       &PPC::GPRC_and_GPRC_NOR0RegClass));
1947   unsigned ResultReg = createResultReg(RC);
1948 
1949   if (!PPCEmitIntExt(SrcVT, SrcReg, DestVT, ResultReg, IsZExt))
1950     return false;
1951 
1952   updateValueMap(I, ResultReg);
1953   return true;
1954 }
1955 
1956 // Attempt to fast-select an instruction that wasn't handled by
1957 // the table-generated machinery.
1958 bool PPCFastISel::fastSelectInstruction(const Instruction *I) {
1959 
1960   switch (I->getOpcode()) {
1961     case Instruction::Load:
1962       return SelectLoad(I);
1963     case Instruction::Store:
1964       return SelectStore(I);
1965     case Instruction::Br:
1966       return SelectBranch(I);
1967     case Instruction::IndirectBr:
1968       return SelectIndirectBr(I);
1969     case Instruction::FPExt:
1970       return SelectFPExt(I);
1971     case Instruction::FPTrunc:
1972       return SelectFPTrunc(I);
1973     case Instruction::SIToFP:
1974       return SelectIToFP(I, /*IsSigned*/ true);
1975     case Instruction::UIToFP:
1976       return SelectIToFP(I, /*IsSigned*/ false);
1977     case Instruction::FPToSI:
1978       return SelectFPToI(I, /*IsSigned*/ true);
1979     case Instruction::FPToUI:
1980       return SelectFPToI(I, /*IsSigned*/ false);
1981     case Instruction::Add:
1982       return SelectBinaryIntOp(I, ISD::ADD);
1983     case Instruction::Or:
1984       return SelectBinaryIntOp(I, ISD::OR);
1985     case Instruction::Sub:
1986       return SelectBinaryIntOp(I, ISD::SUB);
1987     case Instruction::Call:
1988       return selectCall(I);
1989     case Instruction::Ret:
1990       return SelectRet(I);
1991     case Instruction::Trunc:
1992       return SelectTrunc(I);
1993     case Instruction::ZExt:
1994     case Instruction::SExt:
1995       return SelectIntExt(I);
1996     // Here add other flavors of Instruction::XXX that automated
1997     // cases don't catch.  For example, switches are terminators
1998     // that aren't yet handled.
1999     default:
2000       break;
2001   }
2002   return false;
2003 }
2004 
2005 // Materialize a floating-point constant into a register, and return
2006 // the register number (or zero if we failed to handle it).
2007 unsigned PPCFastISel::PPCMaterializeFP(const ConstantFP *CFP, MVT VT) {
2008   // No plans to handle long double here.
2009   if (VT != MVT::f32 && VT != MVT::f64)
2010     return 0;
2011 
2012   // All FP constants are loaded from the constant pool.
2013   unsigned Align = DL.getPrefTypeAlignment(CFP->getType());
2014   assert(Align > 0 && "Unexpectedly missing alignment information!");
2015   unsigned Idx = MCP.getConstantPoolIndex(cast<Constant>(CFP), Align);
2016   const bool HasSPE = PPCSubTarget->hasSPE();
2017   const TargetRegisterClass *RC;
2018   if (HasSPE)
2019     RC = ((VT == MVT::f32) ? &PPC::SPE4RCRegClass : &PPC::SPERCRegClass);
2020   else
2021     RC = ((VT == MVT::f32) ? &PPC::F4RCRegClass : &PPC::F8RCRegClass);
2022 
2023   unsigned DestReg = createResultReg(RC);
2024   CodeModel::Model CModel = TM.getCodeModel();
2025 
2026   MachineMemOperand *MMO = FuncInfo.MF->getMachineMemOperand(
2027       MachinePointerInfo::getConstantPool(*FuncInfo.MF),
2028       MachineMemOperand::MOLoad, (VT == MVT::f32) ? 4 : 8, Align);
2029 
2030   unsigned Opc;
2031 
2032   if (HasSPE)
2033     Opc = ((VT == MVT::f32) ? PPC::SPELWZ : PPC::EVLDD);
2034   else
2035     Opc = ((VT == MVT::f32) ? PPC::LFS : PPC::LFD);
2036 
2037   unsigned TmpReg = createResultReg(&PPC::G8RC_and_G8RC_NOX0RegClass);
2038 
2039   PPCFuncInfo->setUsesTOCBasePtr();
2040   // For small code model, generate a LF[SD](0, LDtocCPT(Idx, X2)).
2041   if (CModel == CodeModel::Small) {
2042     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::LDtocCPT),
2043             TmpReg)
2044       .addConstantPoolIndex(Idx).addReg(PPC::X2);
2045     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), DestReg)
2046       .addImm(0).addReg(TmpReg).addMemOperand(MMO);
2047   } else {
2048     // Otherwise we generate LF[SD](Idx[lo], ADDIStocHA(X2, Idx)).
2049     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::ADDIStocHA),
2050             TmpReg).addReg(PPC::X2).addConstantPoolIndex(Idx);
2051     // But for large code model, we must generate a LDtocL followed
2052     // by the LF[SD].
2053     if (CModel == CodeModel::Large) {
2054       unsigned TmpReg2 = createResultReg(&PPC::G8RC_and_G8RC_NOX0RegClass);
2055       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::LDtocL),
2056               TmpReg2).addConstantPoolIndex(Idx).addReg(TmpReg);
2057       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), DestReg)
2058           .addImm(0)
2059           .addReg(TmpReg2);
2060     } else
2061       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), DestReg)
2062         .addConstantPoolIndex(Idx, 0, PPCII::MO_TOC_LO)
2063         .addReg(TmpReg)
2064         .addMemOperand(MMO);
2065   }
2066 
2067   return DestReg;
2068 }
2069 
2070 // Materialize the address of a global value into a register, and return
2071 // the register number (or zero if we failed to handle it).
2072 unsigned PPCFastISel::PPCMaterializeGV(const GlobalValue *GV, MVT VT) {
2073   assert(VT == MVT::i64 && "Non-address!");
2074   const TargetRegisterClass *RC = &PPC::G8RC_and_G8RC_NOX0RegClass;
2075   unsigned DestReg = createResultReg(RC);
2076 
2077   // Global values may be plain old object addresses, TLS object
2078   // addresses, constant pool entries, or jump tables.  How we generate
2079   // code for these may depend on small, medium, or large code model.
2080   CodeModel::Model CModel = TM.getCodeModel();
2081 
2082   // FIXME: Jump tables are not yet required because fast-isel doesn't
2083   // handle switches; if that changes, we need them as well.  For now,
2084   // what follows assumes everything's a generic (or TLS) global address.
2085 
2086   // FIXME: We don't yet handle the complexity of TLS.
2087   if (GV->isThreadLocal())
2088     return 0;
2089 
2090   PPCFuncInfo->setUsesTOCBasePtr();
2091   // For small code model, generate a simple TOC load.
2092   if (CModel == CodeModel::Small)
2093     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::LDtoc),
2094             DestReg)
2095         .addGlobalAddress(GV)
2096         .addReg(PPC::X2);
2097   else {
2098     // If the address is an externally defined symbol, a symbol with common
2099     // or externally available linkage, a non-local function address, or a
2100     // jump table address (not yet needed), or if we are generating code
2101     // for large code model, we generate:
2102     //       LDtocL(GV, ADDIStocHA(%x2, GV))
2103     // Otherwise we generate:
2104     //       ADDItocL(ADDIStocHA(%x2, GV), GV)
2105     // Either way, start with the ADDIStocHA:
2106     unsigned HighPartReg = createResultReg(RC);
2107     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::ADDIStocHA),
2108             HighPartReg).addReg(PPC::X2).addGlobalAddress(GV);
2109 
2110     unsigned char GVFlags = PPCSubTarget->classifyGlobalReference(GV);
2111     if (GVFlags & PPCII::MO_NLP_FLAG) {
2112       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::LDtocL),
2113               DestReg).addGlobalAddress(GV).addReg(HighPartReg);
2114     } else {
2115       // Otherwise generate the ADDItocL.
2116       BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::ADDItocL),
2117               DestReg).addReg(HighPartReg).addGlobalAddress(GV);
2118     }
2119   }
2120 
2121   return DestReg;
2122 }
2123 
2124 // Materialize a 32-bit integer constant into a register, and return
2125 // the register number (or zero if we failed to handle it).
2126 unsigned PPCFastISel::PPCMaterialize32BitInt(int64_t Imm,
2127                                              const TargetRegisterClass *RC) {
2128   unsigned Lo = Imm & 0xFFFF;
2129   unsigned Hi = (Imm >> 16) & 0xFFFF;
2130 
2131   unsigned ResultReg = createResultReg(RC);
2132   bool IsGPRC = RC->hasSuperClassEq(&PPC::GPRCRegClass);
2133 
2134   if (isInt<16>(Imm))
2135     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
2136             TII.get(IsGPRC ? PPC::LI : PPC::LI8), ResultReg)
2137       .addImm(Imm);
2138   else if (Lo) {
2139     // Both Lo and Hi have nonzero bits.
2140     unsigned TmpReg = createResultReg(RC);
2141     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
2142             TII.get(IsGPRC ? PPC::LIS : PPC::LIS8), TmpReg)
2143       .addImm(Hi);
2144     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
2145             TII.get(IsGPRC ? PPC::ORI : PPC::ORI8), ResultReg)
2146       .addReg(TmpReg).addImm(Lo);
2147   } else
2148     // Just Hi bits.
2149     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
2150             TII.get(IsGPRC ? PPC::LIS : PPC::LIS8), ResultReg)
2151         .addImm(Hi);
2152 
2153   return ResultReg;
2154 }
2155 
2156 // Materialize a 64-bit integer constant into a register, and return
2157 // the register number (or zero if we failed to handle it).
2158 unsigned PPCFastISel::PPCMaterialize64BitInt(int64_t Imm,
2159                                              const TargetRegisterClass *RC) {
2160   unsigned Remainder = 0;
2161   unsigned Shift = 0;
2162 
2163   // If the value doesn't fit in 32 bits, see if we can shift it
2164   // so that it fits in 32 bits.
2165   if (!isInt<32>(Imm)) {
2166     Shift = countTrailingZeros<uint64_t>(Imm);
2167     int64_t ImmSh = static_cast<uint64_t>(Imm) >> Shift;
2168 
2169     if (isInt<32>(ImmSh))
2170       Imm = ImmSh;
2171     else {
2172       Remainder = Imm;
2173       Shift = 32;
2174       Imm >>= 32;
2175     }
2176   }
2177 
2178   // Handle the high-order 32 bits (if shifted) or the whole 32 bits
2179   // (if not shifted).
2180   unsigned TmpReg1 = PPCMaterialize32BitInt(Imm, RC);
2181   if (!Shift)
2182     return TmpReg1;
2183 
2184   // If upper 32 bits were not zero, we've built them and need to shift
2185   // them into place.
2186   unsigned TmpReg2;
2187   if (Imm) {
2188     TmpReg2 = createResultReg(RC);
2189     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::RLDICR),
2190             TmpReg2).addReg(TmpReg1).addImm(Shift).addImm(63 - Shift);
2191   } else
2192     TmpReg2 = TmpReg1;
2193 
2194   unsigned TmpReg3, Hi, Lo;
2195   if ((Hi = (Remainder >> 16) & 0xFFFF)) {
2196     TmpReg3 = createResultReg(RC);
2197     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::ORIS8),
2198             TmpReg3).addReg(TmpReg2).addImm(Hi);
2199   } else
2200     TmpReg3 = TmpReg2;
2201 
2202   if ((Lo = Remainder & 0xFFFF)) {
2203     unsigned ResultReg = createResultReg(RC);
2204     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::ORI8),
2205             ResultReg).addReg(TmpReg3).addImm(Lo);
2206     return ResultReg;
2207   }
2208 
2209   return TmpReg3;
2210 }
2211 
2212 // Materialize an integer constant into a register, and return
2213 // the register number (or zero if we failed to handle it).
2214 unsigned PPCFastISel::PPCMaterializeInt(const ConstantInt *CI, MVT VT,
2215                                         bool UseSExt) {
2216   // If we're using CR bit registers for i1 values, handle that as a special
2217   // case first.
2218   if (VT == MVT::i1 && PPCSubTarget->useCRBits()) {
2219     unsigned ImmReg = createResultReg(&PPC::CRBITRCRegClass);
2220     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
2221             TII.get(CI->isZero() ? PPC::CRUNSET : PPC::CRSET), ImmReg);
2222     return ImmReg;
2223   }
2224 
2225   if (VT != MVT::i64 && VT != MVT::i32 && VT != MVT::i16 && VT != MVT::i8 &&
2226       VT != MVT::i1)
2227     return 0;
2228 
2229   const TargetRegisterClass *RC =
2230       ((VT == MVT::i64) ? &PPC::G8RCRegClass : &PPC::GPRCRegClass);
2231   int64_t Imm = UseSExt ? CI->getSExtValue() : CI->getZExtValue();
2232 
2233   // If the constant is in range, use a load-immediate.
2234   // Since LI will sign extend the constant we need to make sure that for
2235   // our zeroext constants that the sign extended constant fits into 16-bits -
2236   // a range of 0..0x7fff.
2237   if (isInt<16>(Imm)) {
2238     unsigned Opc = (VT == MVT::i64) ? PPC::LI8 : PPC::LI;
2239     unsigned ImmReg = createResultReg(RC);
2240     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(Opc), ImmReg)
2241         .addImm(Imm);
2242     return ImmReg;
2243   }
2244 
2245   // Construct the constant piecewise.
2246   if (VT == MVT::i64)
2247     return PPCMaterialize64BitInt(Imm, RC);
2248   else if (VT == MVT::i32)
2249     return PPCMaterialize32BitInt(Imm, RC);
2250 
2251   return 0;
2252 }
2253 
2254 // Materialize a constant into a register, and return the register
2255 // number (or zero if we failed to handle it).
2256 unsigned PPCFastISel::fastMaterializeConstant(const Constant *C) {
2257   EVT CEVT = TLI.getValueType(DL, C->getType(), true);
2258 
2259   // Only handle simple types.
2260   if (!CEVT.isSimple()) return 0;
2261   MVT VT = CEVT.getSimpleVT();
2262 
2263   if (const ConstantFP *CFP = dyn_cast<ConstantFP>(C))
2264     return PPCMaterializeFP(CFP, VT);
2265   else if (const GlobalValue *GV = dyn_cast<GlobalValue>(C))
2266     return PPCMaterializeGV(GV, VT);
2267   else if (const ConstantInt *CI = dyn_cast<ConstantInt>(C))
2268     // Note that the code in FunctionLoweringInfo::ComputePHILiveOutRegInfo
2269     // assumes that constant PHI operands will be zero extended, and failure to
2270     // match that assumption will cause problems if we sign extend here but
2271     // some user of a PHI is in a block for which we fall back to full SDAG
2272     // instruction selection.
2273     return PPCMaterializeInt(CI, VT, false);
2274 
2275   return 0;
2276 }
2277 
2278 // Materialize the address created by an alloca into a register, and
2279 // return the register number (or zero if we failed to handle it).
2280 unsigned PPCFastISel::fastMaterializeAlloca(const AllocaInst *AI) {
2281   // Don't handle dynamic allocas.
2282   if (!FuncInfo.StaticAllocaMap.count(AI)) return 0;
2283 
2284   MVT VT;
2285   if (!isLoadTypeLegal(AI->getType(), VT)) return 0;
2286 
2287   DenseMap<const AllocaInst*, int>::iterator SI =
2288     FuncInfo.StaticAllocaMap.find(AI);
2289 
2290   if (SI != FuncInfo.StaticAllocaMap.end()) {
2291     unsigned ResultReg = createResultReg(&PPC::G8RC_and_G8RC_NOX0RegClass);
2292     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc, TII.get(PPC::ADDI8),
2293             ResultReg).addFrameIndex(SI->second).addImm(0);
2294     return ResultReg;
2295   }
2296 
2297   return 0;
2298 }
2299 
2300 // Fold loads into extends when possible.
2301 // FIXME: We can have multiple redundant extend/trunc instructions
2302 // following a load.  The folding only picks up one.  Extend this
2303 // to check subsequent instructions for the same pattern and remove
2304 // them.  Thus ResultReg should be the def reg for the last redundant
2305 // instruction in a chain, and all intervening instructions can be
2306 // removed from parent.  Change test/CodeGen/PowerPC/fast-isel-fold.ll
2307 // to add ELF64-NOT: rldicl to the appropriate tests when this works.
2308 bool PPCFastISel::tryToFoldLoadIntoMI(MachineInstr *MI, unsigned OpNo,
2309                                       const LoadInst *LI) {
2310   // Verify we have a legal type before going any further.
2311   MVT VT;
2312   if (!isLoadTypeLegal(LI->getType(), VT))
2313     return false;
2314 
2315   // Combine load followed by zero- or sign-extend.
2316   bool IsZExt = false;
2317   switch(MI->getOpcode()) {
2318     default:
2319       return false;
2320 
2321     case PPC::RLDICL:
2322     case PPC::RLDICL_32_64: {
2323       IsZExt = true;
2324       unsigned MB = MI->getOperand(3).getImm();
2325       if ((VT == MVT::i8 && MB <= 56) ||
2326           (VT == MVT::i16 && MB <= 48) ||
2327           (VT == MVT::i32 && MB <= 32))
2328         break;
2329       return false;
2330     }
2331 
2332     case PPC::RLWINM:
2333     case PPC::RLWINM8: {
2334       IsZExt = true;
2335       unsigned MB = MI->getOperand(3).getImm();
2336       if ((VT == MVT::i8 && MB <= 24) ||
2337           (VT == MVT::i16 && MB <= 16))
2338         break;
2339       return false;
2340     }
2341 
2342     case PPC::EXTSB:
2343     case PPC::EXTSB8:
2344     case PPC::EXTSB8_32_64:
2345       /* There is no sign-extending load-byte instruction. */
2346       return false;
2347 
2348     case PPC::EXTSH:
2349     case PPC::EXTSH8:
2350     case PPC::EXTSH8_32_64: {
2351       if (VT != MVT::i16 && VT != MVT::i8)
2352         return false;
2353       break;
2354     }
2355 
2356     case PPC::EXTSW:
2357     case PPC::EXTSW_32:
2358     case PPC::EXTSW_32_64: {
2359       if (VT != MVT::i32 && VT != MVT::i16 && VT != MVT::i8)
2360         return false;
2361       break;
2362     }
2363   }
2364 
2365   // See if we can handle this address.
2366   Address Addr;
2367   if (!PPCComputeAddress(LI->getOperand(0), Addr))
2368     return false;
2369 
2370   unsigned ResultReg = MI->getOperand(0).getReg();
2371 
2372   if (!PPCEmitLoad(VT, ResultReg, Addr, nullptr, IsZExt,
2373         PPCSubTarget->hasSPE() ? PPC::EVLDD : PPC::LFD))
2374     return false;
2375 
2376   MachineBasicBlock::iterator I(MI);
2377   removeDeadCode(I, std::next(I));
2378   return true;
2379 }
2380 
2381 // Attempt to lower call arguments in a faster way than done by
2382 // the selection DAG code.
2383 bool PPCFastISel::fastLowerArguments() {
2384   // Defer to normal argument lowering for now.  It's reasonably
2385   // efficient.  Consider doing something like ARM to handle the
2386   // case where all args fit in registers, no varargs, no float
2387   // or vector args.
2388   return false;
2389 }
2390 
2391 // Handle materializing integer constants into a register.  This is not
2392 // automatically generated for PowerPC, so must be explicitly created here.
2393 unsigned PPCFastISel::fastEmit_i(MVT Ty, MVT VT, unsigned Opc, uint64_t Imm) {
2394 
2395   if (Opc != ISD::Constant)
2396     return 0;
2397 
2398   // If we're using CR bit registers for i1 values, handle that as a special
2399   // case first.
2400   if (VT == MVT::i1 && PPCSubTarget->useCRBits()) {
2401     unsigned ImmReg = createResultReg(&PPC::CRBITRCRegClass);
2402     BuildMI(*FuncInfo.MBB, FuncInfo.InsertPt, DbgLoc,
2403             TII.get(Imm == 0 ? PPC::CRUNSET : PPC::CRSET), ImmReg);
2404     return ImmReg;
2405   }
2406 
2407   if (VT != MVT::i64 && VT != MVT::i32 && VT != MVT::i16 && VT != MVT::i8 &&
2408       VT != MVT::i1)
2409     return 0;
2410 
2411   const TargetRegisterClass *RC = ((VT == MVT::i64) ? &PPC::G8RCRegClass :
2412                                    &PPC::GPRCRegClass);
2413   if (VT == MVT::i64)
2414     return PPCMaterialize64BitInt(Imm, RC);
2415   else
2416     return PPCMaterialize32BitInt(Imm, RC);
2417 }
2418 
2419 // Override for ADDI and ADDI8 to set the correct register class
2420 // on RHS operand 0.  The automatic infrastructure naively assumes
2421 // GPRC for i32 and G8RC for i64; the concept of "no R0" is lost
2422 // for these cases.  At the moment, none of the other automatically
2423 // generated RI instructions require special treatment.  However, once
2424 // SelectSelect is implemented, "isel" requires similar handling.
2425 //
2426 // Also be conservative about the output register class.  Avoid
2427 // assigning R0 or X0 to the output register for GPRC and G8RC
2428 // register classes, as any such result could be used in ADDI, etc.,
2429 // where those regs have another meaning.
2430 unsigned PPCFastISel::fastEmitInst_ri(unsigned MachineInstOpcode,
2431                                       const TargetRegisterClass *RC,
2432                                       unsigned Op0, bool Op0IsKill,
2433                                       uint64_t Imm) {
2434   if (MachineInstOpcode == PPC::ADDI)
2435     MRI.setRegClass(Op0, &PPC::GPRC_and_GPRC_NOR0RegClass);
2436   else if (MachineInstOpcode == PPC::ADDI8)
2437     MRI.setRegClass(Op0, &PPC::G8RC_and_G8RC_NOX0RegClass);
2438 
2439   const TargetRegisterClass *UseRC =
2440     (RC == &PPC::GPRCRegClass ? &PPC::GPRC_and_GPRC_NOR0RegClass :
2441      (RC == &PPC::G8RCRegClass ? &PPC::G8RC_and_G8RC_NOX0RegClass : RC));
2442 
2443   return FastISel::fastEmitInst_ri(MachineInstOpcode, UseRC,
2444                                    Op0, Op0IsKill, Imm);
2445 }
2446 
2447 // Override for instructions with one register operand to avoid use of
2448 // R0/X0.  The automatic infrastructure isn't aware of the context so
2449 // we must be conservative.
2450 unsigned PPCFastISel::fastEmitInst_r(unsigned MachineInstOpcode,
2451                                      const TargetRegisterClass* RC,
2452                                      unsigned Op0, bool Op0IsKill) {
2453   const TargetRegisterClass *UseRC =
2454     (RC == &PPC::GPRCRegClass ? &PPC::GPRC_and_GPRC_NOR0RegClass :
2455      (RC == &PPC::G8RCRegClass ? &PPC::G8RC_and_G8RC_NOX0RegClass : RC));
2456 
2457   return FastISel::fastEmitInst_r(MachineInstOpcode, UseRC, Op0, Op0IsKill);
2458 }
2459 
2460 // Override for instructions with two register operands to avoid use
2461 // of R0/X0.  The automatic infrastructure isn't aware of the context
2462 // so we must be conservative.
2463 unsigned PPCFastISel::fastEmitInst_rr(unsigned MachineInstOpcode,
2464                                       const TargetRegisterClass* RC,
2465                                       unsigned Op0, bool Op0IsKill,
2466                                       unsigned Op1, bool Op1IsKill) {
2467   const TargetRegisterClass *UseRC =
2468     (RC == &PPC::GPRCRegClass ? &PPC::GPRC_and_GPRC_NOR0RegClass :
2469      (RC == &PPC::G8RCRegClass ? &PPC::G8RC_and_G8RC_NOX0RegClass : RC));
2470 
2471   return FastISel::fastEmitInst_rr(MachineInstOpcode, UseRC, Op0, Op0IsKill,
2472                                    Op1, Op1IsKill);
2473 }
2474 
2475 namespace llvm {
2476   // Create the fast instruction selector for PowerPC64 ELF.
2477   FastISel *PPC::createFastISel(FunctionLoweringInfo &FuncInfo,
2478                                 const TargetLibraryInfo *LibInfo) {
2479     // Only available on 64-bit ELF for now.
2480     const PPCSubtarget &Subtarget = FuncInfo.MF->getSubtarget<PPCSubtarget>();
2481     if (Subtarget.isPPC64() && Subtarget.isSVR4ABI())
2482       return new PPCFastISel(FuncInfo, LibInfo);
2483     return nullptr;
2484   }
2485 }
2486