lib/Target/X86/X86FastISel.cpp

   1 //===-- X86FastISel.cpp - X86 FastISel implementation ---------------------===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file is distributed under the University of Illinois Open Source
   6 // License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file defines the X86-specific support for the FastISel class. Much
  11 // of the target-specific code is generated by tablegen in the file
  12 // X86GenFastISel.inc, which is #included here.
  13 //
  14 //===----------------------------------------------------------------------===//
  15
  16 #include "X86.h"
  17 #include "X86InstrBuilder.h"
  18 #include "X86ISelLowering.h"
  19 #include "X86RegisterInfo.h"
  20 #include "X86Subtarget.h"
  21 #include "X86TargetMachine.h"
  22 #include "llvm/CallingConv.h"
  23 #include "llvm/DerivedTypes.h"
  24 #include "llvm/GlobalVariable.h"
  25 #include "llvm/Instructions.h"
  26 #include "llvm/Intrinsics.h"
  27 #include "llvm/CodeGen/FastISel.h"
  28 #include "llvm/CodeGen/MachineConstantPool.h"
  29 #include "llvm/CodeGen/MachineFrameInfo.h"
  30 #include "llvm/CodeGen/MachineRegisterInfo.h"
  31 #include "llvm/Support/CallSite.h"
  32 #include "llvm/Support/GetElementPtrTypeIterator.h"
  33 using namespace llvm;
  34
  35 namespace {
  36
  37 class X86FastISel : public FastISel {
  38   /// Subtarget - Keep a pointer to the X86Subtarget around so that we can
  39   /// make the right decision when generating code for different targets.
  40   const X86Subtarget *Subtarget;
  41
  42   /// StackPtr - Register used as the stack pointer.
  43   ///
  44   unsigned StackPtr;
  45
  46   /// X86ScalarSSEf32, X86ScalarSSEf64 - Select between SSE or x87
  47   /// floating point ops.
  48   /// When SSE is available, use it for f32 operations.
  49   /// When SSE2 is available, use it for f64 operations.
  50   bool X86ScalarSSEf64;
  51   bool X86ScalarSSEf32;
  52
  53 public:
  54   explicit X86FastISel(MachineFunction &mf,
  55                        MachineModuleInfo *mmi,
  56                        DwarfWriter *dw,
  57                        DenseMap<const Value *, unsigned> &vm,
  58                        DenseMap<const BasicBlock *, MachineBasicBlock *> &bm,
  59                        DenseMap<const AllocaInst *, int> &am
  60 #ifndef NDEBUG
  61                        , SmallSet<Instruction*, 8> &cil
  62 #endif
  63                        )
  64     : FastISel(mf, mmi, dw, vm, bm, am
  65 #ifndef NDEBUG
  66                , cil
  67 #endif
  68                ) {
  69     Subtarget = &TM.getSubtarget<X86Subtarget>();
  70     StackPtr = Subtarget->is64Bit() ? X86::RSP : X86::ESP;
  71     X86ScalarSSEf64 = Subtarget->hasSSE2();
  72     X86ScalarSSEf32 = Subtarget->hasSSE1();
  73   }
  74
  75   virtual bool TargetSelectInstruction(Instruction *I);
  76
  77 #include "X86GenFastISel.inc"
  78
  79 private:
  80   bool X86FastEmitCompare(Value *LHS, Value *RHS, MVT VT);
  81
  82   bool X86FastEmitLoad(MVT VT, const X86AddressMode &AM, unsigned &RR);
  83
  84   bool X86FastEmitStore(MVT VT, Value *Val,
  85                         const X86AddressMode &AM);
  86   bool X86FastEmitStore(MVT VT, unsigned Val,
  87                         const X86AddressMode &AM);
  88
  89   bool X86FastEmitExtend(ISD::NodeType Opc, MVT DstVT, unsigned Src, MVT SrcVT,
  90                          unsigned &ResultReg);
  91
  92   bool X86SelectAddress(Value *V, X86AddressMode &AM, bool isCall);
  93
  94   bool X86SelectLoad(Instruction *I);
  95
  96   bool X86SelectStore(Instruction *I);
  97
  98   bool X86SelectCmp(Instruction *I);
  99
 100   bool X86SelectZExt(Instruction *I);
 101
 102   bool X86SelectBranch(Instruction *I);
 103
 104   bool X86SelectShift(Instruction *I);
 105
 106   bool X86SelectSelect(Instruction *I);
 107
 108   bool X86SelectTrunc(Instruction *I);
 109
 110   bool X86SelectFPExt(Instruction *I);
 111   bool X86SelectFPTrunc(Instruction *I);
 112
 113   bool X86SelectExtractValue(Instruction *I);
 114
 115   bool X86VisitIntrinsicCall(CallInst &I, unsigned Intrinsic);
 116   bool X86SelectCall(Instruction *I);
 117
 118   CCAssignFn *CCAssignFnForCall(unsigned CC, bool isTailCall = false);
 119
 120   const X86InstrInfo *getInstrInfo() const {
 121     return getTargetMachine()->getInstrInfo();
 122   }
 123   const X86TargetMachine *getTargetMachine() const {
 124     return static_cast<const X86TargetMachine *>(&TM);
 125   }
 126
 127   unsigned TargetMaterializeConstant(Constant *C);
 128
 129   unsigned TargetMaterializeAlloca(AllocaInst *C);
 130
 131   /// isScalarFPTypeInSSEReg - Return true if the specified scalar FP type is
 132   /// computed in an SSE register, not on the X87 floating point stack.
 133   bool isScalarFPTypeInSSEReg(MVT VT) const {
 134     return (VT == MVT::f64 && X86ScalarSSEf64) || // f64 is when SSE2
 135       (VT == MVT::f32 && X86ScalarSSEf32);   // f32 is when SSE1
 136   }
 137
 138   bool isTypeLegal(const Type *Ty, MVT &VT, bool AllowI1 = false);
 139 };
 140
 141 } // end anonymous namespace.
 142
 143 bool X86FastISel::isTypeLegal(const Type *Ty, MVT &VT, bool AllowI1) {
 144   VT = TLI.getValueType(Ty, /*HandleUnknown=*/true);
 145   if (VT == MVT::Other || !VT.isSimple())
 146     // Unhandled type. Halt "fast" selection and bail.
 147     return false;
 148
 149   // For now, require SSE/SSE2 for performing floating-point operations,
 150   // since x87 requires additional work.
 151   if (VT == MVT::f64 && !X86ScalarSSEf64)
 152      return false;
 153   if (VT == MVT::f32 && !X86ScalarSSEf32)
 154      return false;
 155   // Similarly, no f80 support yet.
 156   if (VT == MVT::f80)
 157     return false;
 158   // We only handle legal types. For example, on x86-32 the instruction
 159   // selector contains all of the 64-bit instructions from x86-64,
 160   // under the assumption that i64 won't be used if the target doesn't
 161   // support it.
 162   return (AllowI1 && VT == MVT::i1) || TLI.isTypeLegal(VT);
 163 }
 164
 165 #include "X86GenCallingConv.inc"
 166
 167 /// CCAssignFnForCall - Selects the correct CCAssignFn for a given calling
 168 /// convention.
 169 CCAssignFn *X86FastISel::CCAssignFnForCall(unsigned CC, bool isTaillCall) {
 170   if (Subtarget->is64Bit()) {
 171     if (Subtarget->isTargetWin64())
 172       return CC_X86_Win64_C;
 173     else if (CC == CallingConv::Fast && isTaillCall)
 174       return CC_X86_64_TailCall;
 175     else
 176       return CC_X86_64_C;
 177   }
 178
 179   if (CC == CallingConv::X86_FastCall)
 180     return CC_X86_32_FastCall;
 181   else if (CC == CallingConv::Fast)
 182     return CC_X86_32_FastCC;
 183   else
 184     return CC_X86_32_C;
 185 }
 186
 187 /// X86FastEmitLoad - Emit a machine instruction to load a value of type VT.
 188 /// The address is either pre-computed, i.e. Ptr, or a GlobalAddress, i.e. GV.
 189 /// Return true and the result register by reference if it is possible.
 190 bool X86FastISel::X86FastEmitLoad(MVT VT, const X86AddressMode &AM,
 191                                   unsigned &ResultReg) {
 192   // Get opcode and regclass of the output for the given load instruction.
 193   unsigned Opc = 0;
 194   const TargetRegisterClass *RC = NULL;
 195   switch (VT.getSimpleVT()) {
 196   default: return false;
 197   case MVT::i8:
 198     Opc = X86::MOV8rm;
 199     RC  = X86::GR8RegisterClass;
 200     break;
 201   case MVT::i16:
 202     Opc = X86::MOV16rm;
 203     RC  = X86::GR16RegisterClass;
 204     break;
 205   case MVT::i32:
 206     Opc = X86::MOV32rm;
 207     RC  = X86::GR32RegisterClass;
 208     break;
 209   case MVT::i64:
 210     // Must be in x86-64 mode.
 211     Opc = X86::MOV64rm;
 212     RC  = X86::GR64RegisterClass;
 213     break;
 214   case MVT::f32:
 215     if (Subtarget->hasSSE1()) {
 216       Opc = X86::MOVSSrm;
 217       RC  = X86::FR32RegisterClass;
 218     } else {
 219       Opc = X86::LD_Fp32m;
 220       RC  = X86::RFP32RegisterClass;
 221     }
 222     break;
 223   case MVT::f64:
 224     if (Subtarget->hasSSE2()) {
 225       Opc = X86::MOVSDrm;
 226       RC  = X86::FR64RegisterClass;
 227     } else {
 228       Opc = X86::LD_Fp64m;
 229       RC  = X86::RFP64RegisterClass;
 230     }
 231     break;
 232   case MVT::f80:
 233     // No f80 support yet.
 234     return false;
 235   }
 236
 237   ResultReg = createResultReg(RC);
 238   addFullAddress(BuildMI(MBB, DL, TII.get(Opc), ResultReg), AM);
 239   return true;
 240 }
 241
 242 /// X86FastEmitStore - Emit a machine instruction to store a value Val of
 243 /// type VT. The address is either pre-computed, consisted of a base ptr, Ptr
 244 /// and a displacement offset, or a GlobalAddress,
 245 /// i.e. V. Return true if it is possible.
 246 bool
 247 X86FastISel::X86FastEmitStore(MVT VT, unsigned Val,
 248                               const X86AddressMode &AM) {
 249   // Get opcode and regclass of the output for the given store instruction.
 250   unsigned Opc = 0;
 251   switch (VT.getSimpleVT()) {
 252   case MVT::f80: // No f80 support yet.
 253   default: return false;
 254   case MVT::i8:  Opc = X86::MOV8mr;  break;
 255   case MVT::i16: Opc = X86::MOV16mr; break;
 256   case MVT::i32: Opc = X86::MOV32mr; break;
 257   case MVT::i64: Opc = X86::MOV64mr; break; // Must be in x86-64 mode.
 258   case MVT::f32:
 259     Opc = Subtarget->hasSSE1() ? X86::MOVSSmr : X86::ST_Fp32m;
 260     break;
 261   case MVT::f64:
 262     Opc = Subtarget->hasSSE2() ? X86::MOVSDmr : X86::ST_Fp64m;
 263     break;
 264   }
 265
 266   addFullAddress(BuildMI(MBB, DL, TII.get(Opc)), AM).addReg(Val);
 267   return true;
 268 }
 269
 270 bool X86FastISel::X86FastEmitStore(MVT VT, Value *Val,
 271                                    const X86AddressMode &AM) {
 272   // Handle 'null' like i32/i64 0.
 273   if (isa<ConstantPointerNull>(Val))
 274     Val = Constant::getNullValue(TD.getIntPtrType());
 275
 276   // If this is a store of a simple constant, fold the constant into the store.
 277   if (ConstantInt *CI = dyn_cast<ConstantInt>(Val)) {
 278     unsigned Opc = 0;
 279     switch (VT.getSimpleVT()) {
 280     default: break;
 281     case MVT::i8:  Opc = X86::MOV8mi;  break;
 282     case MVT::i16: Opc = X86::MOV16mi; break;
 283     case MVT::i32: Opc = X86::MOV32mi; break;
 284     case MVT::i64:
 285       // Must be a 32-bit sign extended value.
 286       if ((int)CI->getSExtValue() == CI->getSExtValue())
 287         Opc = X86::MOV64mi32;
 288       break;
 289     }
 290
 291     if (Opc) {
 292       addFullAddress(BuildMI(MBB, DL, TII.get(Opc)), AM)
 293                              .addImm(CI->getSExtValue());
 294       return true;
 295     }
 296   }
 297
 298   unsigned ValReg = getRegForValue(Val);
 299   if (ValReg == 0)
 300     return false;
 301
 302   return X86FastEmitStore(VT, ValReg, AM);
 303 }
 304
 305 /// X86FastEmitExtend - Emit a machine instruction to extend a value Src of
 306 /// type SrcVT to type DstVT using the specified extension opcode Opc (e.g.
 307 /// ISD::SIGN_EXTEND).
 308 bool X86FastISel::X86FastEmitExtend(ISD::NodeType Opc, MVT DstVT,
 309                                     unsigned Src, MVT SrcVT,
 310                                     unsigned &ResultReg) {
 311   unsigned RR = FastEmit_r(SrcVT.getSimpleVT(), DstVT.getSimpleVT(), Opc, Src);
 312
 313   if (RR != 0) {
 314     ResultReg = RR;
 315     return true;
 316   } else
 317     return false;
 318 }
 319
 320 /// X86SelectAddress - Attempt to fill in an address from the given value.
 321 ///
 322 bool X86FastISel::X86SelectAddress(Value *V, X86AddressMode &AM, bool isCall) {
 323   User *U;
 324   unsigned Opcode = Instruction::UserOp1;
 325   if (Instruction *I = dyn_cast<Instruction>(V)) {
 326     Opcode = I->getOpcode();
 327     U = I;
 328   } else if (ConstantExpr *C = dyn_cast<ConstantExpr>(V)) {
 329     Opcode = C->getOpcode();
 330     U = C;
 331   }
 332
 333   switch (Opcode) {
 334   default: break;
 335   case Instruction::BitCast:
 336     // Look past bitcasts.
 337     return X86SelectAddress(U->getOperand(0), AM, isCall);
 338
 339   case Instruction::IntToPtr:
 340     // Look past no-op inttoptrs.
 341     if (TLI.getValueType(U->getOperand(0)->getType()) == TLI.getPointerTy())
 342       return X86SelectAddress(U->getOperand(0), AM, isCall);
 343     break;
 344
 345   case Instruction::PtrToInt:
 346     // Look past no-op ptrtoints.
 347     if (TLI.getValueType(U->getType()) == TLI.getPointerTy())
 348       return X86SelectAddress(U->getOperand(0), AM, isCall);
 349     break;
 350
 351   case Instruction::Alloca: {
 352     if (isCall) break;
 353     // Do static allocas.
 354     const AllocaInst *A = cast<AllocaInst>(V);
 355     DenseMap<const AllocaInst*, int>::iterator SI = StaticAllocaMap.find(A);
 356     if (SI != StaticAllocaMap.end()) {
 357       AM.BaseType = X86AddressMode::FrameIndexBase;
 358       AM.Base.FrameIndex = SI->second;
 359       return true;
 360     }
 361     break;
 362   }
 363
 364   case Instruction::Add: {
 365     if (isCall) break;
 366     // Adds of constants are common and easy enough.
 367     if (ConstantInt *CI = dyn_cast<ConstantInt>(U->getOperand(1))) {
 368       uint64_t Disp = (int32_t)AM.Disp + (uint64_t)CI->getSExtValue();
 369       // They have to fit in the 32-bit signed displacement field though.
 370       if (isInt32(Disp)) {
 371         AM.Disp = (uint32_t)Disp;
 372         return X86SelectAddress(U->getOperand(0), AM, isCall);
 373       }
 374     }
 375     break;
 376   }
 377
 378   case Instruction::GetElementPtr: {
 379     if (isCall) break;
 380     // Pattern-match simple GEPs.
 381     uint64_t Disp = (int32_t)AM.Disp;
 382     unsigned IndexReg = AM.IndexReg;
 383     unsigned Scale = AM.Scale;
 384     gep_type_iterator GTI = gep_type_begin(U);
 385     // Iterate through the indices, folding what we can. Constants can be
 386     // folded, and one dynamic index can be handled, if the scale is supported.
 387     for (User::op_iterator i = U->op_begin() + 1, e = U->op_end();
 388          i != e; ++i, ++GTI) {
 389       Value *Op = *i;
 390       if (const StructType *STy = dyn_cast<StructType>(*GTI)) {
 391         const StructLayout *SL = TD.getStructLayout(STy);
 392         unsigned Idx = cast<ConstantInt>(Op)->getZExtValue();
 393         Disp += SL->getElementOffset(Idx);
 394       } else {
 395         uint64_t S = TD.getTypePaddedSize(GTI.getIndexedType());
 396         if (ConstantInt *CI = dyn_cast<ConstantInt>(Op)) {
 397           // Constant-offset addressing.
 398           Disp += CI->getSExtValue() * S;
 399         } else if (IndexReg == 0 &&
 400                    (!AM.GV ||
 401                     !getTargetMachine()->symbolicAddressesAreRIPRel()) &&
 402                    (S == 1 || S == 2 || S == 4 || S == 8)) {
 403           // Scaled-index addressing.
 404           Scale = S;
 405           IndexReg = getRegForGEPIndex(Op);
 406           if (IndexReg == 0)
 407             return false;
 408         } else
 409           // Unsupported.
 410           goto unsupported_gep;
 411       }
 412     }
 413     // Check for displacement overflow.
 414     if (!isInt32(Disp))
 415       break;
 416     // Ok, the GEP indices were covered by constant-offset and scaled-index
 417     // addressing. Update the address state and move on to examining the base.
 418     AM.IndexReg = IndexReg;
 419     AM.Scale = Scale;
 420     AM.Disp = (uint32_t)Disp;
 421     return X86SelectAddress(U->getOperand(0), AM, isCall);
 422   unsupported_gep:
 423     // Ok, the GEP indices weren't all covered.
 424     break;
 425   }
 426   }
 427
 428   // Handle constant address.
 429   if (GlobalValue *GV = dyn_cast<GlobalValue>(V)) {
 430     // Can't handle alternate code models yet.
 431     if (TM.getCodeModel() != CodeModel::Default &&
 432         TM.getCodeModel() != CodeModel::Small)
 433       return false;
 434
 435     // RIP-relative addresses can't have additional register operands.
 436     if (getTargetMachine()->symbolicAddressesAreRIPRel() &&
 437         (AM.Base.Reg != 0 || AM.IndexReg != 0))
 438       return false;
 439
 440     // Can't handle TLS yet.
 441     if (GlobalVariable *GVar = dyn_cast<GlobalVariable>(GV))
 442       if (GVar->isThreadLocal())
 443         return false;
 444
 445     // Set up the basic address.
 446     AM.GV = GV;
 447     if (!isCall &&
 448         TM.getRelocationModel() == Reloc::PIC_ &&
 449         !Subtarget->is64Bit())
 450       AM.Base.Reg = getInstrInfo()->getGlobalBaseReg(&MF);
 451
 452     // Emit an extra load if the ABI requires it.
 453     if (Subtarget->GVRequiresExtraLoad(GV, TM, isCall)) {
 454       // Check to see if we've already materialized this
 455       // value in a register in this block.
 456       if (unsigned Reg = LocalValueMap[V]) {
 457         AM.Base.Reg = Reg;
 458         AM.GV = 0;
 459         return true;
 460       }
 461       // Issue load from stub if necessary.
 462       unsigned Opc = 0;
 463       const TargetRegisterClass *RC = NULL;
 464       if (TLI.getPointerTy() == MVT::i32) {
 465         Opc = X86::MOV32rm;
 466         RC  = X86::GR32RegisterClass;
 467       } else {
 468         Opc = X86::MOV64rm;
 469         RC  = X86::GR64RegisterClass;
 470       }
 471
 472       X86AddressMode StubAM;
 473       StubAM.Base.Reg = AM.Base.Reg;
 474       StubAM.GV = AM.GV;
 475       unsigned ResultReg = createResultReg(RC);
 476       addFullAddress(BuildMI(MBB, DL, TII.get(Opc), ResultReg), StubAM);
 477
 478       // Now construct the final address. Note that the Disp, Scale,
 479       // and Index values may already be set here.
 480       AM.Base.Reg = ResultReg;
 481       AM.GV = 0;
 482
 483       // Prevent loading GV stub multiple times in same MBB.
 484       LocalValueMap[V] = AM.Base.Reg;
 485     }
 486     return true;
 487   }
 488
 489   // If all else fails, try to materialize the value in a register.
 490   if (!AM.GV || !getTargetMachine()->symbolicAddressesAreRIPRel()) {
 491     if (AM.Base.Reg == 0) {
 492       AM.Base.Reg = getRegForValue(V);
 493       return AM.Base.Reg != 0;
 494     }
 495     if (AM.IndexReg == 0) {
 496       assert(AM.Scale == 1 && "Scale with no index!");
 497       AM.IndexReg = getRegForValue(V);
 498       return AM.IndexReg != 0;
 499     }
 500   }
 501
 502   return false;
 503 }
 504
 505 /// X86SelectStore - Select and emit code to implement store instructions.
 506 bool X86FastISel::X86SelectStore(Instruction* I) {
 507   MVT VT;
 508   if (!isTypeLegal(I->getOperand(0)->getType(), VT))
 509     return false;
 510
 511   X86AddressMode AM;
 512   if (!X86SelectAddress(I->getOperand(1), AM, false))
 513     return false;
 514
 515   return X86FastEmitStore(VT, I->getOperand(0), AM);
 516 }
 517
 518 /// X86SelectLoad - Select and emit code to implement load instructions.
 519 ///
 520 bool X86FastISel::X86SelectLoad(Instruction *I)  {
 521   MVT VT;
 522   if (!isTypeLegal(I->getType(), VT))
 523     return false;
 524
 525   X86AddressMode AM;
 526   if (!X86SelectAddress(I->getOperand(0), AM, false))
 527     return false;
 528
 529   unsigned ResultReg = 0;
 530   if (X86FastEmitLoad(VT, AM, ResultReg)) {
 531     UpdateValueMap(I, ResultReg);
 532     return true;
 533   }
 534   return false;
 535 }
 536
 537 static unsigned X86ChooseCmpOpcode(MVT VT) {
 538   switch (VT.getSimpleVT()) {
 539   default:       return 0;
 540   case MVT::i8:  return X86::CMP8rr;
 541   case MVT::i16: return X86::CMP16rr;
 542   case MVT::i32: return X86::CMP32rr;
 543   case MVT::i64: return X86::CMP64rr;
 544   case MVT::f32: return X86::UCOMISSrr;
 545   case MVT::f64: return X86::UCOMISDrr;
 546   }
 547 }
 548
 549 /// X86ChooseCmpImmediateOpcode - If we have a comparison with RHS as the RHS
 550 /// of the comparison, return an opcode that works for the compare (e.g.
 551 /// CMP32ri) otherwise return 0.
 552 static unsigned X86ChooseCmpImmediateOpcode(MVT VT, ConstantInt *RHSC) {
 553   switch (VT.getSimpleVT()) {
 554   // Otherwise, we can't fold the immediate into this comparison.
 555   default: return 0;
 556   case MVT::i8: return X86::CMP8ri;
 557   case MVT::i16: return X86::CMP16ri;
 558   case MVT::i32: return X86::CMP32ri;
 559   case MVT::i64:
 560     // 64-bit comparisons are only valid if the immediate fits in a 32-bit sext
 561     // field.
 562     if ((int)RHSC->getSExtValue() == RHSC->getSExtValue())
 563       return X86::CMP64ri32;
 564     return 0;
 565   }
 566 }
 567
 568 bool X86FastISel::X86FastEmitCompare(Value *Op0, Value *Op1, MVT VT) {
 569   unsigned Op0Reg = getRegForValue(Op0);
 570   if (Op0Reg == 0) return false;
 571
 572   // Handle 'null' like i32/i64 0.
 573   if (isa<ConstantPointerNull>(Op1))
 574     Op1 = Constant::getNullValue(TD.getIntPtrType());
 575
 576   // We have two options: compare with register or immediate.  If the RHS of
 577   // the compare is an immediate that we can fold into this compare, use
 578   // CMPri, otherwise use CMPrr.
 579   if (ConstantInt *Op1C = dyn_cast<ConstantInt>(Op1)) {
 580     if (unsigned CompareImmOpc = X86ChooseCmpImmediateOpcode(VT, Op1C)) {
 581       BuildMI(MBB, DL, TII.get(CompareImmOpc)).addReg(Op0Reg)
 582                                           .addImm(Op1C->getSExtValue());
 583       return true;
 584     }
 585   }
 586
 587   unsigned CompareOpc = X86ChooseCmpOpcode(VT);
 588   if (CompareOpc == 0) return false;
 589
 590   unsigned Op1Reg = getRegForValue(Op1);
 591   if (Op1Reg == 0) return false;
 592   BuildMI(MBB, DL, TII.get(CompareOpc)).addReg(Op0Reg).addReg(Op1Reg);
 593
 594   return true;
 595 }
 596
 597 bool X86FastISel::X86SelectCmp(Instruction *I) {
 598   CmpInst *CI = cast<CmpInst>(I);
 599
 600   MVT VT;
 601   if (!isTypeLegal(I->getOperand(0)->getType(), VT))
 602     return false;
 603
 604   unsigned ResultReg = createResultReg(&X86::GR8RegClass);
 605   unsigned SetCCOpc;
 606   bool SwapArgs;  // false -> compare Op0, Op1.  true -> compare Op1, Op0.
 607   switch (CI->getPredicate()) {
 608   case CmpInst::FCMP_OEQ: {
 609     if (!X86FastEmitCompare(CI->getOperand(0), CI->getOperand(1), VT))
 610       return false;
 611
 612     unsigned EReg = createResultReg(&X86::GR8RegClass);
 613     unsigned NPReg = createResultReg(&X86::GR8RegClass);
 614     BuildMI(MBB, DL, TII.get(X86::SETEr), EReg);
 615     BuildMI(MBB, DL, TII.get(X86::SETNPr), NPReg);
 616     BuildMI(MBB, DL,
 617             TII.get(X86::AND8rr), ResultReg).addReg(NPReg).addReg(EReg);
 618     UpdateValueMap(I, ResultReg);
 619     return true;
 620   }
 621   case CmpInst::FCMP_UNE: {
 622     if (!X86FastEmitCompare(CI->getOperand(0), CI->getOperand(1), VT))
 623       return false;
 624
 625     unsigned NEReg = createResultReg(&X86::GR8RegClass);
 626     unsigned PReg = createResultReg(&X86::GR8RegClass);
 627     BuildMI(MBB, DL, TII.get(X86::SETNEr), NEReg);
 628     BuildMI(MBB, DL, TII.get(X86::SETPr), PReg);
 629     BuildMI(MBB, DL, TII.get(X86::OR8rr), ResultReg).addReg(PReg).addReg(NEReg);
 630     UpdateValueMap(I, ResultReg);
 631     return true;
 632   }
 633   case CmpInst::FCMP_OGT: SwapArgs = false; SetCCOpc = X86::SETAr;  break;
 634   case CmpInst::FCMP_OGE: SwapArgs = false; SetCCOpc = X86::SETAEr; break;
 635   case CmpInst::FCMP_OLT: SwapArgs = true;  SetCCOpc = X86::SETAr;  break;
 636   case CmpInst::FCMP_OLE: SwapArgs = true;  SetCCOpc = X86::SETAEr; break;
 637   case CmpInst::FCMP_ONE: SwapArgs = false; SetCCOpc = X86::SETNEr; break;
 638   case CmpInst::FCMP_ORD: SwapArgs = false; SetCCOpc = X86::SETNPr; break;
 639   case CmpInst::FCMP_UNO: SwapArgs = false; SetCCOpc = X86::SETPr;  break;
 640   case CmpInst::FCMP_UEQ: SwapArgs = false; SetCCOpc = X86::SETEr;  break;
 641   case CmpInst::FCMP_UGT: SwapArgs = true;  SetCCOpc = X86::SETBr;  break;
 642   case CmpInst::FCMP_UGE: SwapArgs = true;  SetCCOpc = X86::SETBEr; break;
 643   case CmpInst::FCMP_ULT: SwapArgs = false; SetCCOpc = X86::SETBr;  break;
 644   case CmpInst::FCMP_ULE: SwapArgs = false; SetCCOpc = X86::SETBEr; break;
 645
 646   case CmpInst::ICMP_EQ:  SwapArgs = false; SetCCOpc = X86::SETEr;  break;
 647   case CmpInst::ICMP_NE:  SwapArgs = false; SetCCOpc = X86::SETNEr; break;
 648   case CmpInst::ICMP_UGT: SwapArgs = false; SetCCOpc = X86::SETAr;  break;
 649   case CmpInst::ICMP_UGE: SwapArgs = false; SetCCOpc = X86::SETAEr; break;
 650   case CmpInst::ICMP_ULT: SwapArgs = false; SetCCOpc = X86::SETBr;  break;
 651   case CmpInst::ICMP_ULE: SwapArgs = false; SetCCOpc = X86::SETBEr; break;
 652   case CmpInst::ICMP_SGT: SwapArgs = false; SetCCOpc = X86::SETGr;  break;
 653   case CmpInst::ICMP_SGE: SwapArgs = false; SetCCOpc = X86::SETGEr; break;
 654   case CmpInst::ICMP_SLT: SwapArgs = false; SetCCOpc = X86::SETLr;  break;
 655   case CmpInst::ICMP_SLE: SwapArgs = false; SetCCOpc = X86::SETLEr; break;
 656   default:
 657     return false;
 658   }
 659
 660   Value *Op0 = CI->getOperand(0), *Op1 = CI->getOperand(1);
 661   if (SwapArgs)
 662     std::swap(Op0, Op1);
 663
 664   // Emit a compare of Op0/Op1.
 665   if (!X86FastEmitCompare(Op0, Op1, VT))
 666     return false;
 667
 668   BuildMI(MBB, DL, TII.get(SetCCOpc), ResultReg);
 669   UpdateValueMap(I, ResultReg);
 670   return true;
 671 }
 672
 673 bool X86FastISel::X86SelectZExt(Instruction *I) {
 674   // Special-case hack: The only i1 values we know how to produce currently
 675   // set the upper bits of an i8 value to zero.
 676   if (I->getType() == Type::Int8Ty &&
 677       I->getOperand(0)->getType() == Type::Int1Ty) {
 678     unsigned ResultReg = getRegForValue(I->getOperand(0));
 679     if (ResultReg == 0) return false;
 680     UpdateValueMap(I, ResultReg);
 681     return true;
 682   }
 683
 684   return false;
 685 }
 686
 687
 688 bool X86FastISel::X86SelectBranch(Instruction *I) {
 689   // Unconditional branches are selected by tablegen-generated code.
 690   // Handle a conditional branch.
 691   BranchInst *BI = cast<BranchInst>(I);
 692   MachineBasicBlock *TrueMBB = MBBMap[BI->getSuccessor(0)];
 693   MachineBasicBlock *FalseMBB = MBBMap[BI->getSuccessor(1)];
 694
 695   // Fold the common case of a conditional branch with a comparison.
 696   if (CmpInst *CI = dyn_cast<CmpInst>(BI->getCondition())) {
 697     if (CI->hasOneUse()) {
 698       MVT VT = TLI.getValueType(CI->getOperand(0)->getType());
 699
 700       // Try to take advantage of fallthrough opportunities.
 701       CmpInst::Predicate Predicate = CI->getPredicate();
 702       if (MBB->isLayoutSuccessor(TrueMBB)) {
 703         std::swap(TrueMBB, FalseMBB);
 704         Predicate = CmpInst::getInversePredicate(Predicate);
 705       }
 706
 707       bool SwapArgs;  // false -> compare Op0, Op1.  true -> compare Op1, Op0.
 708       unsigned BranchOpc; // Opcode to jump on, e.g. "X86::JA"
 709
 710       switch (Predicate) {
 711       case CmpInst::FCMP_OEQ:
 712         std::swap(TrueMBB, FalseMBB);
 713         Predicate = CmpInst::FCMP_UNE;
 714         // FALL THROUGH
 715       case CmpInst::FCMP_UNE: SwapArgs = false; BranchOpc = X86::JNE; break;
 716       case CmpInst::FCMP_OGT: SwapArgs = false; BranchOpc = X86::JA;  break;
 717       case CmpInst::FCMP_OGE: SwapArgs = false; BranchOpc = X86::JAE; break;
 718       case CmpInst::FCMP_OLT: SwapArgs = true;  BranchOpc = X86::JA;  break;
 719       case CmpInst::FCMP_OLE: SwapArgs = true;  BranchOpc = X86::JAE; break;
 720       case CmpInst::FCMP_ONE: SwapArgs = false; BranchOpc = X86::JNE; break;
 721       case CmpInst::FCMP_ORD: SwapArgs = false; BranchOpc = X86::JNP; break;
 722       case CmpInst::FCMP_UNO: SwapArgs = false; BranchOpc = X86::JP;  break;
 723       case CmpInst::FCMP_UEQ: SwapArgs = false; BranchOpc = X86::JE;  break;
 724       case CmpInst::FCMP_UGT: SwapArgs = true;  BranchOpc = X86::JB;  break;
 725       case CmpInst::FCMP_UGE: SwapArgs = true;  BranchOpc = X86::JBE; break;
 726       case CmpInst::FCMP_ULT: SwapArgs = false; BranchOpc = X86::JB;  break;
 727       case CmpInst::FCMP_ULE: SwapArgs = false; BranchOpc = X86::JBE; break;
 728
 729       case CmpInst::ICMP_EQ:  SwapArgs = false; BranchOpc = X86::JE;  break;
 730       case CmpInst::ICMP_NE:  SwapArgs = false; BranchOpc = X86::JNE; break;
 731       case CmpInst::ICMP_UGT: SwapArgs = false; BranchOpc = X86::JA;  break;
 732       case CmpInst::ICMP_UGE: SwapArgs = false; BranchOpc = X86::JAE; break;
 733       case CmpInst::ICMP_ULT: SwapArgs = false; BranchOpc = X86::JB;  break;
 734       case CmpInst::ICMP_ULE: SwapArgs = false; BranchOpc = X86::JBE; break;
 735       case CmpInst::ICMP_SGT: SwapArgs = false; BranchOpc = X86::JG;  break;
 736       case CmpInst::ICMP_SGE: SwapArgs = false; BranchOpc = X86::JGE; break;
 737       case CmpInst::ICMP_SLT: SwapArgs = false; BranchOpc = X86::JL;  break;
 738       case CmpInst::ICMP_SLE: SwapArgs = false; BranchOpc = X86::JLE; break;
 739       default:
 740         return false;
 741       }
 742
 743       Value *Op0 = CI->getOperand(0), *Op1 = CI->getOperand(1);
 744       if (SwapArgs)
 745         std::swap(Op0, Op1);
 746
 747       // Emit a compare of the LHS and RHS, setting the flags.
 748       if (!X86FastEmitCompare(Op0, Op1, VT))
 749         return false;
 750
 751       BuildMI(MBB, DL, TII.get(BranchOpc)).addMBB(TrueMBB);
 752
 753       if (Predicate == CmpInst::FCMP_UNE) {
 754         // X86 requires a second branch to handle UNE (and OEQ,
 755         // which is mapped to UNE above).
 756         BuildMI(MBB, DL, TII.get(X86::JP)).addMBB(TrueMBB);
 757       }
 758
 759       FastEmitBranch(FalseMBB);
 760       MBB->addSuccessor(TrueMBB);
 761       return true;
 762     }
 763   } else if (ExtractValueInst *EI =
 764              dyn_cast<ExtractValueInst>(BI->getCondition())) {
 765     // Check to see if the branch instruction is from an "arithmetic with
 766     // overflow" intrinsic. The main way these intrinsics are used is:
 767     //
 768     //   %t = call { i32, i1 } @llvm.sadd.with.overflow.i32(i32 %v1, i32 %v2)
 769     //   %sum = extractvalue { i32, i1 } %t, 0
 770     //   %obit = extractvalue { i32, i1 } %t, 1
 771     //   br i1 %obit, label %overflow, label %normal
 772     //
 773     // The %sum and %obit are converted in an ADD and a SETO/SETB before
 774     // reaching the branch. Therefore, we search backwards through the MBB
 775     // looking for the SETO/SETB instruction. If an instruction modifies the
 776     // EFLAGS register before we reach the SETO/SETB instruction, then we can't
 777     // convert the branch into a JO/JB instruction.
 778
 779     Value *Agg = EI->getAggregateOperand();
 780
 781     if (CallInst *CI = dyn_cast<CallInst>(Agg)) {
 782       Function *F = CI->getCalledFunction();
 783
 784       if (F && F->isDeclaration()) {
 785         switch (F->getIntrinsicID()) {
 786         default: break;
 787         case Intrinsic::sadd_with_overflow:
 788         case Intrinsic::uadd_with_overflow: {
 789           const MachineInstr *SetMI = 0;
 790           unsigned Reg = lookUpRegForValue(EI);
 791
 792           for (MachineBasicBlock::const_reverse_iterator
 793                  RI = MBB->rbegin(), RE = MBB->rend(); RI != RE; ++RI) {
 794             const MachineInstr &MI = *RI;
 795
 796             if (MI.modifiesRegister(Reg)) {
 797               unsigned Src, Dst, SrcSR, DstSR;
 798
 799               if (getInstrInfo()->isMoveInstr(MI, Src, Dst, SrcSR, DstSR)) {
 800                 Reg = Src;
 801                 continue;
 802               }
 803
 804               SetMI = &MI;
 805               break;
 806             }
 807
 808             const TargetInstrDesc &TID = MI.getDesc();
 809             const unsigned *ImpDefs = TID.getImplicitDefs();
 810
 811             if (TID.hasUnmodeledSideEffects()) break;
 812
 813             bool ModifiesEFlags = false;
 814
 815             if (ImpDefs) {
 816               for (unsigned u = 0; ImpDefs[u]; ++u)
 817                 if (ImpDefs[u] == X86::EFLAGS) {
 818                   ModifiesEFlags = true;
 819                   break;
 820                 }
 821             }
 822
 823             if (ModifiesEFlags) break;
 824           }
 825
 826           if (SetMI) {
 827             unsigned OpCode = SetMI->getOpcode();
 828
 829             if (OpCode == X86::SETOr || OpCode == X86::SETBr) {
 830               BuildMI(MBB, DL, TII.get((OpCode == X86::SETOr) ?
 831                                    X86::JO : X86::JB)).addMBB(TrueMBB);
 832               FastEmitBranch(FalseMBB);
 833               MBB->addSuccessor(TrueMBB);
 834               return true;
 835             }
 836           }
 837         }
 838         }
 839       }
 840     }
 841   }
 842
 843   // Otherwise do a clumsy setcc and re-test it.
 844   unsigned OpReg = getRegForValue(BI->getCondition());
 845   if (OpReg == 0) return false;
 846
 847   BuildMI(MBB, DL, TII.get(X86::TEST8rr)).addReg(OpReg).addReg(OpReg);
 848   BuildMI(MBB, DL, TII.get(X86::JNE)).addMBB(TrueMBB);
 849   FastEmitBranch(FalseMBB);
 850   MBB->addSuccessor(TrueMBB);
 851   return true;
 852 }
 853
 854 bool X86FastISel::X86SelectShift(Instruction *I) {
 855   unsigned CReg = 0, OpReg = 0, OpImm = 0;
 856   const TargetRegisterClass *RC = NULL;
 857   if (I->getType() == Type::Int8Ty) {
 858     CReg = X86::CL;
 859     RC = &X86::GR8RegClass;
 860     switch (I->getOpcode()) {
 861     case Instruction::LShr: OpReg = X86::SHR8rCL; OpImm = X86::SHR8ri; break;
 862     case Instruction::AShr: OpReg = X86::SAR8rCL; OpImm = X86::SAR8ri; break;
 863     case Instruction::Shl:  OpReg = X86::SHL8rCL; OpImm = X86::SHL8ri; break;
 864     default: return false;
 865     }
 866   } else if (I->getType() == Type::Int16Ty) {
 867     CReg = X86::CX;
 868     RC = &X86::GR16RegClass;
 869     switch (I->getOpcode()) {
 870     case Instruction::LShr: OpReg = X86::SHR16rCL; OpImm = X86::SHR16ri; break;
 871     case Instruction::AShr: OpReg = X86::SAR16rCL; OpImm = X86::SAR16ri; break;
 872     case Instruction::Shl:  OpReg = X86::SHL16rCL; OpImm = X86::SHL16ri; break;
 873     default: return false;
 874     }
 875   } else if (I->getType() == Type::Int32Ty) {
 876     CReg = X86::ECX;
 877     RC = &X86::GR32RegClass;
 878     switch (I->getOpcode()) {
 879     case Instruction::LShr: OpReg = X86::SHR32rCL; OpImm = X86::SHR32ri; break;
 880     case Instruction::AShr: OpReg = X86::SAR32rCL; OpImm = X86::SAR32ri; break;
 881     case Instruction::Shl:  OpReg = X86::SHL32rCL; OpImm = X86::SHL32ri; break;
 882     default: return false;
 883     }
 884   } else if (I->getType() == Type::Int64Ty) {
 885     CReg = X86::RCX;
 886     RC = &X86::GR64RegClass;
 887     switch (I->getOpcode()) {
 888     case Instruction::LShr: OpReg = X86::SHR64rCL; OpImm = X86::SHR64ri; break;
 889     case Instruction::AShr: OpReg = X86::SAR64rCL; OpImm = X86::SAR64ri; break;
 890     case Instruction::Shl:  OpReg = X86::SHL64rCL; OpImm = X86::SHL64ri; break;
 891     default: return false;
 892     }
 893   } else {
 894     return false;
 895   }
 896
 897   MVT VT = TLI.getValueType(I->getType(), /*HandleUnknown=*/true);
 898   if (VT == MVT::Other || !isTypeLegal(I->getType(), VT))
 899     return false;
 900
 901   unsigned Op0Reg = getRegForValue(I->getOperand(0));
 902   if (Op0Reg == 0) return false;
 903
 904   // Fold immediate in shl(x,3).
 905   if (ConstantInt *CI = dyn_cast<ConstantInt>(I->getOperand(1))) {
 906     unsigned ResultReg = createResultReg(RC);
 907     BuildMI(MBB, DL, TII.get(OpImm),
 908             ResultReg).addReg(Op0Reg).addImm(CI->getZExtValue() & 0xff);
 909     UpdateValueMap(I, ResultReg);
 910     return true;
 911   }
 912
 913   unsigned Op1Reg = getRegForValue(I->getOperand(1));
 914   if (Op1Reg == 0) return false;
 915   TII.copyRegToReg(*MBB, MBB->end(), CReg, Op1Reg, RC, RC);
 916
 917   // The shift instruction uses X86::CL. If we defined a super-register
 918   // of X86::CL, emit an EXTRACT_SUBREG to precisely describe what
 919   // we're doing here.
 920   if (CReg != X86::CL)
 921     BuildMI(MBB, DL, TII.get(TargetInstrInfo::EXTRACT_SUBREG), X86::CL)
 922       .addReg(CReg).addImm(X86::SUBREG_8BIT);
 923
 924   unsigned ResultReg = createResultReg(RC);
 925   BuildMI(MBB, DL, TII.get(OpReg), ResultReg).addReg(Op0Reg);
 926   UpdateValueMap(I, ResultReg);
 927   return true;
 928 }
 929
 930 bool X86FastISel::X86SelectSelect(Instruction *I) {
 931   MVT VT = TLI.getValueType(I->getType(), /*HandleUnknown=*/true);
 932   if (VT == MVT::Other || !isTypeLegal(I->getType(), VT))
 933     return false;
 934
 935   unsigned Opc = 0;
 936   const TargetRegisterClass *RC = NULL;
 937   if (VT.getSimpleVT() == MVT::i16) {
 938     Opc = X86::CMOVE16rr;
 939     RC = &X86::GR16RegClass;
 940   } else if (VT.getSimpleVT() == MVT::i32) {
 941     Opc = X86::CMOVE32rr;
 942     RC = &X86::GR32RegClass;
 943   } else if (VT.getSimpleVT() == MVT::i64) {
 944     Opc = X86::CMOVE64rr;
 945     RC = &X86::GR64RegClass;
 946   } else {
 947     return false;
 948   }
 949
 950   unsigned Op0Reg = getRegForValue(I->getOperand(0));
 951   if (Op0Reg == 0) return false;
 952   unsigned Op1Reg = getRegForValue(I->getOperand(1));
 953   if (Op1Reg == 0) return false;
 954   unsigned Op2Reg = getRegForValue(I->getOperand(2));
 955   if (Op2Reg == 0) return false;
 956
 957   BuildMI(MBB, DL, TII.get(X86::TEST8rr)).addReg(Op0Reg).addReg(Op0Reg);
 958   unsigned ResultReg = createResultReg(RC);
 959   BuildMI(MBB, DL, TII.get(Opc), ResultReg).addReg(Op1Reg).addReg(Op2Reg);
 960   UpdateValueMap(I, ResultReg);
 961   return true;
 962 }
 963
 964 bool X86FastISel::X86SelectFPExt(Instruction *I) {
 965   // fpext from float to double.
 966   if (Subtarget->hasSSE2() && I->getType() == Type::DoubleTy) {
 967     Value *V = I->getOperand(0);
 968     if (V->getType() == Type::FloatTy) {
 969       unsigned OpReg = getRegForValue(V);
 970       if (OpReg == 0) return false;
 971       unsigned ResultReg = createResultReg(X86::FR64RegisterClass);
 972       BuildMI(MBB, DL, TII.get(X86::CVTSS2SDrr), ResultReg).addReg(OpReg);
 973       UpdateValueMap(I, ResultReg);
 974       return true;
 975     }
 976   }
 977
 978   return false;
 979 }
 980
 981 bool X86FastISel::X86SelectFPTrunc(Instruction *I) {
 982   if (Subtarget->hasSSE2()) {
 983     if (I->getType() == Type::FloatTy) {
 984       Value *V = I->getOperand(0);
 985       if (V->getType() == Type::DoubleTy) {
 986         unsigned OpReg = getRegForValue(V);
 987         if (OpReg == 0) return false;
 988         unsigned ResultReg = createResultReg(X86::FR32RegisterClass);
 989         BuildMI(MBB, DL, TII.get(X86::CVTSD2SSrr), ResultReg).addReg(OpReg);
 990         UpdateValueMap(I, ResultReg);
 991         return true;
 992       }
 993     }
 994   }
 995
 996   return false;
 997 }
 998
 999 bool X86FastISel::X86SelectTrunc(Instruction *I) {
1000   if (Subtarget->is64Bit())
1001     // All other cases should be handled by the tblgen generated code.
1002     return false;
1003   MVT SrcVT = TLI.getValueType(I->getOperand(0)->getType());
1004   MVT DstVT = TLI.getValueType(I->getType());
1005
1006   // This code only handles truncation to byte right now.
1007   if (DstVT != MVT::i8 && DstVT != MVT::i1)
1008     // All other cases should be handled by the tblgen generated code.
1009     return false;
1010   if (SrcVT != MVT::i16 && SrcVT != MVT::i32)
1011     // All other cases should be handled by the tblgen generated code.
1012     return false;
1013
1014   unsigned InputReg = getRegForValue(I->getOperand(0));
1015   if (!InputReg)
1016     // Unhandled operand.  Halt "fast" selection and bail.
1017     return false;
1018
1019   // First issue a copy to GR16_ or GR32_.
1020   unsigned CopyOpc = (SrcVT == MVT::i16) ? X86::MOV16to16_ : X86::MOV32to32_;
1021   const TargetRegisterClass *CopyRC = (SrcVT == MVT::i16)
1022     ? X86::GR16_RegisterClass : X86::GR32_RegisterClass;
1023   unsigned CopyReg = createResultReg(CopyRC);
1024   BuildMI(MBB, DL, TII.get(CopyOpc), CopyReg).addReg(InputReg);
1025
1026   // Then issue an extract_subreg.
1027   unsigned ResultReg = FastEmitInst_extractsubreg(MVT::i8,
1028                                                   CopyReg, X86::SUBREG_8BIT);
1029   if (!ResultReg)
1030     return false;
1031
1032   UpdateValueMap(I, ResultReg);
1033   return true;
1034 }
1035
1036 bool X86FastISel::X86SelectExtractValue(Instruction *I) {
1037   ExtractValueInst *EI = cast<ExtractValueInst>(I);
1038   Value *Agg = EI->getAggregateOperand();
1039
1040   if (CallInst *CI = dyn_cast<CallInst>(Agg)) {
1041     Function *F = CI->getCalledFunction();
1042
1043     if (F && F->isDeclaration()) {
1044       switch (F->getIntrinsicID()) {
1045       default: break;
1046       case Intrinsic::sadd_with_overflow:
1047       case Intrinsic::uadd_with_overflow:
1048         // Cheat a little. We know that the registers for "add" and "seto" are
1049         // allocated sequentially. However, we only keep track of the register
1050         // for "add" in the value map. Use extractvalue's index to get the
1051         // correct register for "seto".
1052         UpdateValueMap(I, lookUpRegForValue(Agg) + *EI->idx_begin());
1053         return true;
1054       }
1055     }
1056   }
1057
1058   return false;
1059 }
1060
1061 bool X86FastISel::X86VisitIntrinsicCall(CallInst &I, unsigned Intrinsic) {
1062   // FIXME: Handle more intrinsics.
1063   switch (Intrinsic) {
1064   default: return false;
1065   case Intrinsic::sadd_with_overflow:
1066   case Intrinsic::uadd_with_overflow: {
1067     // Replace "add with overflow" intrinsics with an "add" instruction followed
1068     // by a seto/setc instruction. Later on, when the "extractvalue"
1069     // instructions are encountered, we use the fact that two registers were
1070     // created sequentially to get the correct registers for the "sum" and the
1071     // "overflow bit".
1072     MVT VT;
1073     const Function *Callee = I.getCalledFunction();
1074     const Type *RetTy =
1075       cast<StructType>(Callee->getReturnType())->getTypeAtIndex(unsigned(0));
1076
1077     if (!isTypeLegal(RetTy, VT))
1078       return false;
1079
1080     Value *Op1 = I.getOperand(1);
1081     Value *Op2 = I.getOperand(2);
1082     unsigned Reg1 = getRegForValue(Op1);
1083     unsigned Reg2 = getRegForValue(Op2);
1084
1085     if (Reg1 == 0 || Reg2 == 0)
1086       // FIXME: Handle values *not* in registers.
1087       return false;
1088
1089     unsigned OpC = 0;
1090
1091     if (VT == MVT::i32)
1092       OpC = X86::ADD32rr;
1093     else if (VT == MVT::i64)
1094       OpC = X86::ADD64rr;
1095     else
1096       return false;
1097
1098     unsigned ResultReg = createResultReg(TLI.getRegClassFor(VT));
1099     BuildMI(MBB, DL, TII.get(OpC), ResultReg).addReg(Reg1).addReg(Reg2);
1100     UpdateValueMap(&I, ResultReg);
1101
1102     ResultReg = createResultReg(TLI.getRegClassFor(MVT::i8));
1103     BuildMI(MBB, DL, TII.get((Intrinsic == Intrinsic::sadd_with_overflow) ?
1104                          X86::SETOr : X86::SETBr), ResultReg);
1105     return true;
1106   }
1107   }
1108 }
1109
1110 bool X86FastISel::X86SelectCall(Instruction *I) {
1111   CallInst *CI = cast<CallInst>(I);
1112   Value *Callee = I->getOperand(0);
1113
1114   // Can't handle inline asm yet.
1115   if (isa<InlineAsm>(Callee))
1116     return false;
1117
1118   // Handle intrinsic calls.
1119   if (Function *F = CI->getCalledFunction())
1120     if (F->isDeclaration())
1121       if (unsigned IID = F->getIntrinsicID())
1122         return X86VisitIntrinsicCall(*CI, IID);
1123
1124   // Handle only C and fastcc calling conventions for now.
1125   CallSite CS(CI);
1126   unsigned CC = CS.getCallingConv();
1127   if (CC != CallingConv::C &&
1128       CC != CallingConv::Fast &&
1129       CC != CallingConv::X86_FastCall)
1130     return false;
1131
1132   // Let SDISel handle vararg functions.
1133   const PointerType *PT = cast<PointerType>(CS.getCalledValue()->getType());
1134   const FunctionType *FTy = cast<FunctionType>(PT->getElementType());
1135   if (FTy->isVarArg())
1136     return false;
1137
1138   // Handle *simple* calls for now.
1139   const Type *RetTy = CS.getType();
1140   MVT RetVT;
1141   if (RetTy == Type::VoidTy)
1142     RetVT = MVT::isVoid;
1143   else if (!isTypeLegal(RetTy, RetVT, true))
1144     return false;
1145
1146   // Materialize callee address in a register. FIXME: GV address can be
1147   // handled with a CALLpcrel32 instead.
1148   X86AddressMode CalleeAM;
1149   if (!X86SelectAddress(Callee, CalleeAM, true))
1150     return false;
1151   unsigned CalleeOp = 0;
1152   GlobalValue *GV = 0;
1153   if (CalleeAM.Base.Reg != 0) {
1154     assert(CalleeAM.GV == 0);
1155     CalleeOp = CalleeAM.Base.Reg;
1156   } else if (CalleeAM.GV != 0) {
1157     assert(CalleeAM.GV != 0);
1158     GV = CalleeAM.GV;
1159   } else
1160     return false;
1161
1162   // Allow calls which produce i1 results.
1163   bool AndToI1 = false;
1164   if (RetVT == MVT::i1) {
1165     RetVT = MVT::i8;
1166     AndToI1 = true;
1167   }
1168
1169   // Deal with call operands first.
1170   SmallVector<Value*, 8> ArgVals;
1171   SmallVector<unsigned, 8> Args;
1172   SmallVector<MVT, 8> ArgVTs;
1173   SmallVector<ISD::ArgFlagsTy, 8> ArgFlags;
1174   Args.reserve(CS.arg_size());
1175   ArgVals.reserve(CS.arg_size());
1176   ArgVTs.reserve(CS.arg_size());
1177   ArgFlags.reserve(CS.arg_size());
1178   for (CallSite::arg_iterator i = CS.arg_begin(), e = CS.arg_end();
1179        i != e; ++i) {
1180     unsigned Arg = getRegForValue(*i);
1181     if (Arg == 0)
1182       return false;
1183     ISD::ArgFlagsTy Flags;
1184     unsigned AttrInd = i - CS.arg_begin() + 1;
1185     if (CS.paramHasAttr(AttrInd, Attribute::SExt))
1186       Flags.setSExt();
1187     if (CS.paramHasAttr(AttrInd, Attribute::ZExt))
1188       Flags.setZExt();
1189
1190     // FIXME: Only handle *easy* calls for now.
1191     if (CS.paramHasAttr(AttrInd, Attribute::InReg) ||
1192         CS.paramHasAttr(AttrInd, Attribute::StructRet) ||
1193         CS.paramHasAttr(AttrInd, Attribute::Nest) ||
1194         CS.paramHasAttr(AttrInd, Attribute::ByVal))
1195       return false;
1196
1197     const Type *ArgTy = (*i)->getType();
1198     MVT ArgVT;
1199     if (!isTypeLegal(ArgTy, ArgVT))
1200       return false;
1201     unsigned OriginalAlignment = TD.getABITypeAlignment(ArgTy);
1202     Flags.setOrigAlign(OriginalAlignment);
1203
1204     Args.push_back(Arg);
1205     ArgVals.push_back(*i);
1206     ArgVTs.push_back(ArgVT);
1207     ArgFlags.push_back(Flags);
1208   }
1209
1210   // Analyze operands of the call, assigning locations to each operand.
1211   SmallVector<CCValAssign, 16> ArgLocs;
1212   CCState CCInfo(CC, false, TM, ArgLocs);
1213   CCInfo.AnalyzeCallOperands(ArgVTs, ArgFlags, CCAssignFnForCall(CC));
1214
1215   // Get a count of how many bytes are to be pushed on the stack.
1216   unsigned NumBytes = CCInfo.getNextStackOffset();
1217
1218   // Issue CALLSEQ_START
1219   unsigned AdjStackDown = TM.getRegisterInfo()->getCallFrameSetupOpcode();
1220   BuildMI(MBB, DL, TII.get(AdjStackDown)).addImm(NumBytes);
1221
1222   // Process argument: walk the register/memloc assignments, inserting
1223   // copies / loads.
1224   SmallVector<unsigned, 4> RegArgs;
1225   for (unsigned i = 0, e = ArgLocs.size(); i != e; ++i) {
1226     CCValAssign &VA = ArgLocs[i];
1227     unsigned Arg = Args[VA.getValNo()];
1228     MVT ArgVT = ArgVTs[VA.getValNo()];
1229
1230     // Promote the value if needed.
1231     switch (VA.getLocInfo()) {
1232     default: assert(0 && "Unknown loc info!");
1233     case CCValAssign::Full: break;
1234     case CCValAssign::SExt: {
1235       bool Emitted = X86FastEmitExtend(ISD::SIGN_EXTEND, VA.getLocVT(),
1236                                        Arg, ArgVT, Arg);
1237       assert(Emitted && "Failed to emit a sext!"); Emitted=Emitted;
1238       Emitted = true;
1239       ArgVT = VA.getLocVT();
1240       break;
1241     }
1242     case CCValAssign::ZExt: {
1243       bool Emitted = X86FastEmitExtend(ISD::ZERO_EXTEND, VA.getLocVT(),
1244                                        Arg, ArgVT, Arg);
1245       assert(Emitted && "Failed to emit a zext!"); Emitted=Emitted;
1246       Emitted = true;
1247       ArgVT = VA.getLocVT();
1248       break;
1249     }
1250     case CCValAssign::AExt: {
1251       bool Emitted = X86FastEmitExtend(ISD::ANY_EXTEND, VA.getLocVT(),
1252                                        Arg, ArgVT, Arg);
1253       if (!Emitted)
1254         Emitted = X86FastEmitExtend(ISD::ZERO_EXTEND, VA.getLocVT(),
1255                                     Arg, ArgVT, Arg);
1256       if (!Emitted)
1257         Emitted = X86FastEmitExtend(ISD::SIGN_EXTEND, VA.getLocVT(),
1258                                     Arg, ArgVT, Arg);
1259
1260       assert(Emitted && "Failed to emit a aext!"); Emitted=Emitted;
1261       ArgVT = VA.getLocVT();
1262       break;
1263     }
1264     }
1265
1266     if (VA.isRegLoc()) {
1267       TargetRegisterClass* RC = TLI.getRegClassFor(ArgVT);
1268       bool Emitted = TII.copyRegToReg(*MBB, MBB->end(), VA.getLocReg(),
1269                                       Arg, RC, RC);
1270       assert(Emitted && "Failed to emit a copy instruction!"); Emitted=Emitted;
1271       Emitted = true;
1272       RegArgs.push_back(VA.getLocReg());
1273     } else {
1274       unsigned LocMemOffset = VA.getLocMemOffset();
1275       X86AddressMode AM;
1276       AM.Base.Reg = StackPtr;
1277       AM.Disp = LocMemOffset;
1278       Value *ArgVal = ArgVals[VA.getValNo()];
1279
1280       // If this is a really simple value, emit this with the Value* version of
1281       // X86FastEmitStore.  If it isn't simple, we don't want to do this, as it
1282       // can cause us to reevaluate the argument.
1283       if (isa<ConstantInt>(ArgVal) || isa<ConstantPointerNull>(ArgVal))
1284         X86FastEmitStore(ArgVT, ArgVal, AM);
1285       else
1286         X86FastEmitStore(ArgVT, Arg, AM);
1287     }
1288   }
1289
1290   // ELF / PIC requires GOT in the EBX register before function calls via PLT
1291   // GOT pointer.
1292   if (!Subtarget->is64Bit() &&
1293       TM.getRelocationModel() == Reloc::PIC_ &&
1294       Subtarget->isPICStyleGOT()) {
1295     TargetRegisterClass *RC = X86::GR32RegisterClass;
1296     unsigned Base = getInstrInfo()->getGlobalBaseReg(&MF);
1297     bool Emitted = TII.copyRegToReg(*MBB, MBB->end(), X86::EBX, Base, RC, RC);
1298     assert(Emitted && "Failed to emit a copy instruction!"); Emitted=Emitted;
1299     Emitted = true;
1300   }
1301
1302   // Issue the call.
1303   unsigned CallOpc = CalleeOp
1304     ? (Subtarget->is64Bit() ? X86::CALL64r       : X86::CALL32r)
1305     : (Subtarget->is64Bit() ? X86::CALL64pcrel32 : X86::CALLpcrel32);
1306   MachineInstrBuilder MIB = CalleeOp
1307     ? BuildMI(MBB, DL, TII.get(CallOpc)).addReg(CalleeOp)
1308     : BuildMI(MBB, DL, TII.get(CallOpc)).addGlobalAddress(GV);
1309
1310   // Add an implicit use GOT pointer in EBX.
1311   if (!Subtarget->is64Bit() &&
1312       TM.getRelocationModel() == Reloc::PIC_ &&
1313       Subtarget->isPICStyleGOT())
1314     MIB.addReg(X86::EBX);
1315
1316   // Add implicit physical register uses to the call.
1317   for (unsigned i = 0, e = RegArgs.size(); i != e; ++i)
1318     MIB.addReg(RegArgs[i]);
1319
1320   // Issue CALLSEQ_END
1321   unsigned AdjStackUp = TM.getRegisterInfo()->getCallFrameDestroyOpcode();
1322   BuildMI(MBB, DL, TII.get(AdjStackUp)).addImm(NumBytes).addImm(0);
1323
1324   // Now handle call return value (if any).
1325   if (RetVT.getSimpleVT() != MVT::isVoid) {
1326     SmallVector<CCValAssign, 16> RVLocs;
1327     CCState CCInfo(CC, false, TM, RVLocs);
1328     CCInfo.AnalyzeCallResult(RetVT, RetCC_X86);
1329
1330     // Copy all of the result registers out of their specified physreg.
1331     assert(RVLocs.size() == 1 && "Can't handle multi-value calls!");
1332     MVT CopyVT = RVLocs[0].getValVT();
1333     TargetRegisterClass* DstRC = TLI.getRegClassFor(CopyVT);
1334     TargetRegisterClass *SrcRC = DstRC;
1335
1336     // If this is a call to a function that returns an fp value on the x87 fp
1337     // stack, but where we prefer to use the value in xmm registers, copy it
1338     // out as F80 and use a truncate to move it from fp stack reg to xmm reg.
1339     if ((RVLocs[0].getLocReg() == X86::ST0 ||
1340          RVLocs[0].getLocReg() == X86::ST1) &&
1341         isScalarFPTypeInSSEReg(RVLocs[0].getValVT())) {
1342       CopyVT = MVT::f80;
1343       SrcRC = X86::RSTRegisterClass;
1344       DstRC = X86::RFP80RegisterClass;
1345     }
1346
1347     unsigned ResultReg = createResultReg(DstRC);
1348     bool Emitted = TII.copyRegToReg(*MBB, MBB->end(), ResultReg,
1349                                     RVLocs[0].getLocReg(), DstRC, SrcRC);
1350     assert(Emitted && "Failed to emit a copy instruction!"); Emitted=Emitted;
1351     Emitted = true;
1352     if (CopyVT != RVLocs[0].getValVT()) {
1353       // Round the F80 the right size, which also moves to the appropriate xmm
1354       // register. This is accomplished by storing the F80 value in memory and
1355       // then loading it back. Ewww...
1356       MVT ResVT = RVLocs[0].getValVT();
1357       unsigned Opc = ResVT == MVT::f32 ? X86::ST_Fp80m32 : X86::ST_Fp80m64;
1358       unsigned MemSize = ResVT.getSizeInBits()/8;
1359       int FI = MFI.CreateStackObject(MemSize, MemSize);
1360       addFrameReference(BuildMI(MBB, DL, TII.get(Opc)), FI).addReg(ResultReg);
1361       DstRC = ResVT == MVT::f32
1362         ? X86::FR32RegisterClass : X86::FR64RegisterClass;
1363       Opc = ResVT == MVT::f32 ? X86::MOVSSrm : X86::MOVSDrm;
1364       ResultReg = createResultReg(DstRC);
1365       addFrameReference(BuildMI(MBB, DL, TII.get(Opc), ResultReg), FI);
1366     }
1367
1368     if (AndToI1) {
1369       // Mask out all but lowest bit for some call which produces an i1.
1370       unsigned AndResult = createResultReg(X86::GR8RegisterClass);
1371       BuildMI(MBB, DL,
1372               TII.get(X86::AND8ri), AndResult).addReg(ResultReg).addImm(1);
1373       ResultReg = AndResult;
1374     }
1375
1376     UpdateValueMap(I, ResultReg);
1377   }
1378
1379   return true;
1380 }
1381
1382
1383 bool
1384 X86FastISel::TargetSelectInstruction(Instruction *I)  {
1385   switch (I->getOpcode()) {
1386   default: break;
1387   case Instruction::Load:
1388     return X86SelectLoad(I);
1389   case Instruction::Store:
1390     return X86SelectStore(I);
1391   case Instruction::ICmp:
1392   case Instruction::FCmp:
1393     return X86SelectCmp(I);
1394   case Instruction::ZExt:
1395     return X86SelectZExt(I);
1396   case Instruction::Br:
1397     return X86SelectBranch(I);
1398   case Instruction::Call:
1399     return X86SelectCall(I);
1400   case Instruction::LShr:
1401   case Instruction::AShr:
1402   case Instruction::Shl:
1403     return X86SelectShift(I);
1404   case Instruction::Select:
1405     return X86SelectSelect(I);
1406   case Instruction::Trunc:
1407     return X86SelectTrunc(I);
1408   case Instruction::FPExt:
1409     return X86SelectFPExt(I);
1410   case Instruction::FPTrunc:
1411     return X86SelectFPTrunc(I);
1412   case Instruction::ExtractValue:
1413     return X86SelectExtractValue(I);
1414   }
1415
1416   return false;
1417 }
1418
1419 unsigned X86FastISel::TargetMaterializeConstant(Constant *C) {
1420   MVT VT;
1421   if (!isTypeLegal(C->getType(), VT))
1422     return false;
1423
1424   // Get opcode and regclass of the output for the given load instruction.
1425   unsigned Opc = 0;
1426   const TargetRegisterClass *RC = NULL;
1427   switch (VT.getSimpleVT()) {
1428   default: return false;
1429   case MVT::i8:
1430     Opc = X86::MOV8rm;
1431     RC  = X86::GR8RegisterClass;
1432     break;
1433   case MVT::i16:
1434     Opc = X86::MOV16rm;
1435     RC  = X86::GR16RegisterClass;
1436     break;
1437   case MVT::i32:
1438     Opc = X86::MOV32rm;
1439     RC  = X86::GR32RegisterClass;
1440     break;
1441   case MVT::i64:
1442     // Must be in x86-64 mode.
1443     Opc = X86::MOV64rm;
1444     RC  = X86::GR64RegisterClass;
1445     break;
1446   case MVT::f32:
1447     if (Subtarget->hasSSE1()) {
1448       Opc = X86::MOVSSrm;
1449       RC  = X86::FR32RegisterClass;
1450     } else {
1451       Opc = X86::LD_Fp32m;
1452       RC  = X86::RFP32RegisterClass;
1453     }
1454     break;
1455   case MVT::f64:
1456     if (Subtarget->hasSSE2()) {
1457       Opc = X86::MOVSDrm;
1458       RC  = X86::FR64RegisterClass;
1459     } else {
1460       Opc = X86::LD_Fp64m;
1461       RC  = X86::RFP64RegisterClass;
1462     }
1463     break;
1464   case MVT::f80:
1465     // No f80 support yet.
1466     return false;
1467   }
1468
1469   // Materialize addresses with LEA instructions.
1470   if (isa<GlobalValue>(C)) {
1471     X86AddressMode AM;
1472     if (X86SelectAddress(C, AM, false)) {
1473       if (TLI.getPointerTy() == MVT::i32)
1474         Opc = X86::LEA32r;
1475       else
1476         Opc = X86::LEA64r;
1477       unsigned ResultReg = createResultReg(RC);
1478       addFullAddress(BuildMI(MBB, DL, TII.get(Opc), ResultReg), AM);
1479       return ResultReg;
1480     }
1481     return 0;
1482   }
1483
1484   // MachineConstantPool wants an explicit alignment.
1485   unsigned Align = TD.getPrefTypeAlignment(C->getType());
1486   if (Align == 0) {
1487     // Alignment of vector types.  FIXME!
1488     Align = TD.getTypePaddedSize(C->getType());
1489   }
1490
1491   // x86-32 PIC requires a PIC base register for constant pools.
1492   unsigned PICBase = 0;
1493   if (TM.getRelocationModel() == Reloc::PIC_ &&
1494       !Subtarget->is64Bit())
1495     PICBase = getInstrInfo()->getGlobalBaseReg(&MF);
1496
1497   // Create the load from the constant pool.
1498   unsigned MCPOffset = MCP.getConstantPoolIndex(C, Align);
1499   unsigned ResultReg = createResultReg(RC);
1500   addConstantPoolReference(BuildMI(MBB, DL, TII.get(Opc), ResultReg), MCPOffset,
1501                            PICBase);
1502
1503   return ResultReg;
1504 }
1505
1506 unsigned X86FastISel::TargetMaterializeAlloca(AllocaInst *C) {
1507   // Fail on dynamic allocas. At this point, getRegForValue has already
1508   // checked its CSE maps, so if we're here trying to handle a dynamic
1509   // alloca, we're not going to succeed. X86SelectAddress has a
1510   // check for dynamic allocas, because it's called directly from
1511   // various places, but TargetMaterializeAlloca also needs a check
1512   // in order to avoid recursion between getRegForValue,
1513   // X86SelectAddrss, and TargetMaterializeAlloca.
1514   if (!StaticAllocaMap.count(C))
1515     return 0;
1516
1517   X86AddressMode AM;
1518   if (!X86SelectAddress(C, AM, false))
1519     return 0;
1520   unsigned Opc = Subtarget->is64Bit() ? X86::LEA64r : X86::LEA32r;
1521   TargetRegisterClass* RC = TLI.getRegClassFor(TLI.getPointerTy());
1522   unsigned ResultReg = createResultReg(RC);
1523   addFullAddress(BuildMI(MBB, DL, TII.get(Opc), ResultReg), AM);
1524   return ResultReg;
1525 }
1526
1527 namespace llvm {
1528   llvm::FastISel *X86::createFastISel(MachineFunction &mf,
1529                         MachineModuleInfo *mmi,
1530                         DwarfWriter *dw,
1531                         DenseMap<const Value *, unsigned> &vm,
1532                         DenseMap<const BasicBlock *, MachineBasicBlock *> &bm,
1533                         DenseMap<const AllocaInst *, int> &am
1534 #ifndef NDEBUG
1535                         , SmallSet<Instruction*, 8> &cil
1536 #endif
1537                         ) {
1538     return new X86FastISel(mf, mmi, dw, vm, bm, am
1539 #ifndef NDEBUG
1540                            , cil
1541 #endif
1542                            );
1543   }
1544 }