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