lib/Target/X86/X86ISelDAGToDAG.cpp

   1 //===- X86ISelDAGToDAG.cpp - A DAG pattern matching inst selector for X86 -===//
   2 //
   3 //                     The LLVM Compiler Infrastructure
   4 //
   5 // This file was developed by the Evan Cheng and is distributed under
   6 // the University of Illinois Open Source License. See LICENSE.TXT for details.
   7 //
   8 //===----------------------------------------------------------------------===//
   9 //
  10 // This file defines a DAG pattern matching instruction selector for X86,
  11 // converting from a legalized dag to a X86 dag.
  12 //
  13 //===----------------------------------------------------------------------===//
  14
  15 #define DEBUG_TYPE "x86-isel"
  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/GlobalValue.h"
  23 #include "llvm/Instructions.h"
  24 #include "llvm/Intrinsics.h"
  25 #include "llvm/Support/CFG.h"
  26 #include "llvm/Type.h"
  27 #include "llvm/CodeGen/MachineConstantPool.h"
  28 #include "llvm/CodeGen/MachineFunction.h"
  29 #include "llvm/CodeGen/MachineFrameInfo.h"
  30 #include "llvm/CodeGen/MachineInstrBuilder.h"
  31 #include "llvm/CodeGen/SSARegMap.h"
  32 #include "llvm/CodeGen/SelectionDAGISel.h"
  33 #include "llvm/Target/TargetMachine.h"
  34 #include "llvm/Support/Compiler.h"
  35 #include "llvm/Support/Debug.h"
  36 #include "llvm/Support/MathExtras.h"
  37 #include "llvm/ADT/Statistic.h"
  38 #include <queue>
  39 #include <set>
  40 using namespace llvm;
  41
  42 STATISTIC(NumFPKill   , "Number of FP_REG_KILL instructions added");
  43 STATISTIC(NumLoadMoved, "Number of loads moved below TokenFactor");
  44
  45
  46 //===----------------------------------------------------------------------===//
  47 //                      Pattern Matcher Implementation
  48 //===----------------------------------------------------------------------===//
  49
  50 namespace {
  51   /// X86ISelAddressMode - This corresponds to X86AddressMode, but uses
  52   /// SDOperand's instead of register numbers for the leaves of the matched
  53   /// tree.
  54   struct X86ISelAddressMode {
  55     enum {
  56       RegBase,
  57       FrameIndexBase
  58     } BaseType;
  59
  60     struct {            // This is really a union, discriminated by BaseType!
  61       SDOperand Reg;
  62       int FrameIndex;
  63     } Base;
  64
  65     bool isRIPRel;     // RIP relative?
  66     unsigned Scale;
  67     SDOperand IndexReg;
  68     unsigned Disp;
  69     GlobalValue *GV;
  70     Constant *CP;
  71     const char *ES;
  72     int JT;
  73     unsigned Align;    // CP alignment.
  74
  75     X86ISelAddressMode()
  76       : BaseType(RegBase), isRIPRel(false), Scale(1), IndexReg(), Disp(0),
  77         GV(0), CP(0), ES(0), JT(-1), Align(0) {
  78     }
  79   };
  80 }
  81
  82 namespace {
  83   //===--------------------------------------------------------------------===//
  84   /// ISel - X86 specific code to select X86 machine instructions for
  85   /// SelectionDAG operations.
  86   ///
  87   class VISIBILITY_HIDDEN X86DAGToDAGISel : public SelectionDAGISel {
  88     /// ContainsFPCode - Every instruction we select that uses or defines a FP
  89     /// register should set this to true.
  90     bool ContainsFPCode;
  91
  92     /// FastISel - Enable fast(er) instruction selection.
  93     ///
  94     bool FastISel;
  95
  96     /// TM - Keep a reference to X86TargetMachine.
  97     ///
  98     X86TargetMachine &TM;
  99
 100     /// X86Lowering - This object fully describes how to lower LLVM code to an
 101     /// X86-specific SelectionDAG.
 102     X86TargetLowering X86Lowering;
 103
 104     /// Subtarget - Keep a pointer to the X86Subtarget around so that we can
 105     /// make the right decision when generating code for different targets.
 106     const X86Subtarget *Subtarget;
 107
 108     /// GlobalBaseReg - keeps track of the virtual register mapped onto global
 109     /// base register.
 110     unsigned GlobalBaseReg;
 111
 112   public:
 113     X86DAGToDAGISel(X86TargetMachine &tm, bool fast)
 114       : SelectionDAGISel(X86Lowering),
 115         ContainsFPCode(false), FastISel(fast), TM(tm),
 116         X86Lowering(*TM.getTargetLowering()),
 117         Subtarget(&TM.getSubtarget<X86Subtarget>()) {}
 118
 119     virtual bool runOnFunction(Function &Fn) {
 120       // Make sure we re-emit a set of the global base reg if necessary
 121       GlobalBaseReg = 0;
 122       return SelectionDAGISel::runOnFunction(Fn);
 123     }
 124
 125     virtual const char *getPassName() const {
 126       return "X86 DAG->DAG Instruction Selection";
 127     }
 128
 129     /// InstructionSelectBasicBlock - This callback is invoked by
 130     /// SelectionDAGISel when it has created a SelectionDAG for us to codegen.
 131     virtual void InstructionSelectBasicBlock(SelectionDAG &DAG);
 132
 133     virtual void EmitFunctionEntryCode(Function &Fn, MachineFunction &MF);
 134
 135     virtual bool CanBeFoldedBy(SDNode *N, SDNode *U, SDNode *Root) const;
 136
 137 // Include the pieces autogenerated from the target description.
 138 #include "X86GenDAGISel.inc"
 139
 140   private:
 141     SDNode *Select(SDOperand N);
 142
 143     bool MatchAddress(SDOperand N, X86ISelAddressMode &AM,
 144                       bool isRoot = true, unsigned Depth = 0);
 145     bool MatchAddressBase(SDOperand N, X86ISelAddressMode &AM,
 146                           bool isRoot, unsigned Depth);
 147     bool SelectAddr(SDOperand Op, SDOperand N, SDOperand &Base,
 148                     SDOperand &Scale, SDOperand &Index, SDOperand &Disp);
 149     bool SelectLEAAddr(SDOperand Op, SDOperand N, SDOperand &Base,
 150                        SDOperand &Scale, SDOperand &Index, SDOperand &Disp);
 151     bool SelectScalarSSELoad(SDOperand Op, SDOperand Pred,
 152                              SDOperand N, SDOperand &Base, SDOperand &Scale,
 153                              SDOperand &Index, SDOperand &Disp,
 154                              SDOperand &InChain, SDOperand &OutChain);
 155     bool TryFoldLoad(SDOperand P, SDOperand N,
 156                      SDOperand &Base, SDOperand &Scale,
 157                      SDOperand &Index, SDOperand &Disp);
 158     void InstructionSelectPreprocess(SelectionDAG &DAG);
 159
 160     /// SelectInlineAsmMemoryOperand - Implement addressing mode selection for
 161     /// inline asm expressions.
 162     virtual bool SelectInlineAsmMemoryOperand(const SDOperand &Op,
 163                                               char ConstraintCode,
 164                                               std::vector<SDOperand> &OutOps,
 165                                               SelectionDAG &DAG);
 166
 167     void EmitSpecialCodeForMain(MachineBasicBlock *BB, MachineFrameInfo *MFI);
 168
 169     inline void getAddressOperands(X86ISelAddressMode &AM, SDOperand &Base,
 170                                    SDOperand &Scale, SDOperand &Index,
 171                                    SDOperand &Disp) {
 172       Base  = (AM.BaseType == X86ISelAddressMode::FrameIndexBase) ?
 173         CurDAG->getTargetFrameIndex(AM.Base.FrameIndex, TLI.getPointerTy()) :
 174         AM.Base.Reg;
 175       Scale = getI8Imm(AM.Scale);
 176       Index = AM.IndexReg;
 177       // These are 32-bit even in 64-bit mode since RIP relative offset
 178       // is 32-bit.
 179       if (AM.GV)
 180         Disp = CurDAG->getTargetGlobalAddress(AM.GV, MVT::i32, AM.Disp);
 181       else if (AM.CP)
 182         Disp = CurDAG->getTargetConstantPool(AM.CP, MVT::i32, AM.Align, AM.Disp);
 183       else if (AM.ES)
 184         Disp = CurDAG->getTargetExternalSymbol(AM.ES, MVT::i32);
 185       else if (AM.JT != -1)
 186         Disp = CurDAG->getTargetJumpTable(AM.JT, MVT::i32);
 187       else
 188         Disp = getI32Imm(AM.Disp);
 189     }
 190
 191     /// getI8Imm - Return a target constant with the specified value, of type
 192     /// i8.
 193     inline SDOperand getI8Imm(unsigned Imm) {
 194       return CurDAG->getTargetConstant(Imm, MVT::i8);
 195     }
 196
 197     /// getI16Imm - Return a target constant with the specified value, of type
 198     /// i16.
 199     inline SDOperand getI16Imm(unsigned Imm) {
 200       return CurDAG->getTargetConstant(Imm, MVT::i16);
 201     }
 202
 203     /// getI32Imm - Return a target constant with the specified value, of type
 204     /// i32.
 205     inline SDOperand getI32Imm(unsigned Imm) {
 206       return CurDAG->getTargetConstant(Imm, MVT::i32);
 207     }
 208
 209     /// getGlobalBaseReg - insert code into the entry mbb to materialize the PIC
 210     /// base register.  Return the virtual register that holds this value.
 211     SDNode *getGlobalBaseReg();
 212
 213     /// getTruncate - return an SDNode that implements a subreg based truncate
 214     /// of the specified operand to the the specified value type.
 215     SDNode *getTruncate(SDOperand N0, MVT::ValueType VT);
 216
 217 #ifndef NDEBUG
 218     unsigned Indent;
 219 #endif
 220   };
 221 }
 222
 223 static SDNode *findFlagUse(SDNode *N) {
 224   unsigned FlagResNo = N->getNumValues()-1;
 225   for (SDNode::use_iterator I = N->use_begin(), E = N->use_end(); I != E; ++I) {
 226     SDNode *User = *I;
 227     for (unsigned i = 0, e = User->getNumOperands(); i != e; ++i) {
 228       SDOperand Op = User->getOperand(i);
 229       if (Op.Val == N && Op.ResNo == FlagResNo)
 230         return User;
 231     }
 232   }
 233   return NULL;
 234 }
 235
 236 static void findNonImmUse(SDNode *Use, SDNode* Def, SDNode *ImmedUse,
 237                           SDNode *Root, SDNode *Skip, bool &found,
 238                           std::set<SDNode *> &Visited) {
 239   if (found ||
 240       Use->getNodeId() > Def->getNodeId() ||
 241       !Visited.insert(Use).second)
 242     return;
 243
 244   for (unsigned i = 0, e = Use->getNumOperands(); !found && i != e; ++i) {
 245     SDNode *N = Use->getOperand(i).Val;
 246     if (N == Skip)
 247       continue;
 248     if (N == Def) {
 249       if (Use == ImmedUse)
 250         continue; // Immediate use is ok.
 251       if (Use == Root) {
 252         assert(Use->getOpcode() == ISD::STORE ||
 253                Use->getOpcode() == X86ISD::CMP);
 254         continue;
 255       }
 256       found = true;
 257       break;
 258     }
 259     findNonImmUse(N, Def, ImmedUse, Root, Skip, found, Visited);
 260   }
 261 }
 262
 263 /// isNonImmUse - Start searching from Root up the DAG to check is Def can
 264 /// be reached. Return true if that's the case. However, ignore direct uses
 265 /// by ImmedUse (which would be U in the example illustrated in
 266 /// CanBeFoldedBy) and by Root (which can happen in the store case).
 267 /// FIXME: to be really generic, we should allow direct use by any node
 268 /// that is being folded. But realisticly since we only fold loads which
 269 /// have one non-chain use, we only need to watch out for load/op/store
 270 /// and load/op/cmp case where the root (store / cmp) may reach the load via
 271 /// its chain operand.
 272 static inline bool isNonImmUse(SDNode *Root, SDNode *Def, SDNode *ImmedUse,
 273                                SDNode *Skip = NULL) {
 274   std::set<SDNode *> Visited;
 275   bool found = false;
 276   findNonImmUse(Root, Def, ImmedUse, Root, Skip, found, Visited);
 277   return found;
 278 }
 279
 280
 281 bool X86DAGToDAGISel::CanBeFoldedBy(SDNode *N, SDNode *U, SDNode *Root) const {
 282   if (FastISel) return false;
 283
 284   // If U use can somehow reach N through another path then U can't fold N or
 285   // it will create a cycle. e.g. In the following diagram, U can reach N
 286   // through X. If N is folded into into U, then X is both a predecessor and
 287   // a successor of U.
 288   //
 289   //         [ N ]
 290   //         ^  ^
 291   //         |  |
 292   //        /   \---
 293   //      /        [X]
 294   //      |         ^
 295   //     [U]--------|
 296
 297   if (isNonImmUse(Root, N, U))
 298     return false;
 299
 300   // If U produces a flag, then it gets (even more) interesting. Since it
 301   // would have been "glued" together with its flag use, we need to check if
 302   // it might reach N:
 303   //
 304   //       [ N ]
 305   //        ^ ^
 306   //        | |
 307   //       [U] \--
 308   //        ^   [TF]
 309   //        |    ^
 310   //        |    |
 311   //         \  /
 312   //          [FU]
 313   //
 314   // If FU (flag use) indirectly reach N (the load), and U fold N (call it
 315   // NU), then TF is a predecessor of FU and a successor of NU. But since
 316   // NU and FU are flagged together, this effectively creates a cycle.
 317   bool HasFlagUse = false;
 318   MVT::ValueType VT = Root->getValueType(Root->getNumValues()-1);
 319   while ((VT == MVT::Flag && !Root->use_empty())) {
 320     SDNode *FU = findFlagUse(Root);
 321     if (FU == NULL)
 322       break;
 323     else {
 324       Root = FU;
 325       HasFlagUse = true;
 326     }
 327     VT = Root->getValueType(Root->getNumValues()-1);
 328   }
 329
 330   if (HasFlagUse)
 331     return !isNonImmUse(Root, N, Root, U);
 332   return true;
 333 }
 334
 335 /// MoveBelowTokenFactor - Replace TokenFactor operand with load's chain operand
 336 /// and move load below the TokenFactor. Replace store's chain operand with
 337 /// load's chain result.
 338 static void MoveBelowTokenFactor(SelectionDAG &DAG, SDOperand Load,
 339                                  SDOperand Store, SDOperand TF) {
 340   std::vector<SDOperand> Ops;
 341   for (unsigned i = 0, e = TF.Val->getNumOperands(); i != e; ++i)
 342     if (Load.Val == TF.Val->getOperand(i).Val)
 343       Ops.push_back(Load.Val->getOperand(0));
 344     else
 345       Ops.push_back(TF.Val->getOperand(i));
 346   DAG.UpdateNodeOperands(TF, &Ops[0], Ops.size());
 347   DAG.UpdateNodeOperands(Load, TF, Load.getOperand(1), Load.getOperand(2));
 348   DAG.UpdateNodeOperands(Store, Load.getValue(1), Store.getOperand(1),
 349                          Store.getOperand(2), Store.getOperand(3));
 350 }
 351
 352 /// InstructionSelectPreprocess - Preprocess the DAG to allow the instruction
 353 /// selector to pick more load-modify-store instructions. This is a common
 354 /// case:
 355 ///
 356 ///     [Load chain]
 357 ///         ^
 358 ///         |
 359 ///       [Load]
 360 ///       ^    ^
 361 ///       |    |
 362 ///      /      \-
 363 ///     /         |
 364 /// [TokenFactor] [Op]
 365 ///     ^          ^
 366 ///     |          |
 367 ///      \        /
 368 ///       \      /
 369 ///       [Store]
 370 ///
 371 /// The fact the store's chain operand != load's chain will prevent the
 372 /// (store (op (load))) instruction from being selected. We can transform it to:
 373 ///
 374 ///     [Load chain]
 375 ///         ^
 376 ///         |
 377 ///    [TokenFactor]
 378 ///         ^
 379 ///         |
 380 ///       [Load]
 381 ///       ^    ^
 382 ///       |    |
 383 ///       |     \-
 384 ///       |       |
 385 ///       |     [Op]
 386 ///       |       ^
 387 ///       |       |
 388 ///       \      /
 389 ///        \    /
 390 ///       [Store]
 391 void X86DAGToDAGISel::InstructionSelectPreprocess(SelectionDAG &DAG) {
 392   for (SelectionDAG::allnodes_iterator I = DAG.allnodes_begin(),
 393          E = DAG.allnodes_end(); I != E; ++I) {
 394     if (!ISD::isNON_TRUNCStore(I))
 395       continue;
 396     SDOperand Chain = I->getOperand(0);
 397     if (Chain.Val->getOpcode() != ISD::TokenFactor)
 398       continue;
 399
 400     SDOperand N1 = I->getOperand(1);
 401     SDOperand N2 = I->getOperand(2);
 402     if (MVT::isFloatingPoint(N1.getValueType()) ||
 403         MVT::isVector(N1.getValueType()) ||
 404         !N1.hasOneUse())
 405       continue;
 406
 407     bool RModW = false;
 408     SDOperand Load;
 409     unsigned Opcode = N1.Val->getOpcode();
 410     switch (Opcode) {
 411       case ISD::ADD:
 412       case ISD::MUL:
 413       case ISD::AND:
 414       case ISD::OR:
 415       case ISD::XOR:
 416       case ISD::ADDC:
 417       case ISD::ADDE: {
 418         SDOperand N10 = N1.getOperand(0);
 419         SDOperand N11 = N1.getOperand(1);
 420         if (ISD::isNON_EXTLoad(N10.Val))
 421           RModW = true;
 422         else if (ISD::isNON_EXTLoad(N11.Val)) {
 423           RModW = true;
 424           std::swap(N10, N11);
 425         }
 426         RModW = RModW && N10.Val->isOperand(Chain.Val) && N10.hasOneUse() &&
 427           (N10.getOperand(1) == N2) &&
 428           (N10.Val->getValueType(0) == N1.getValueType());
 429         if (RModW)
 430           Load = N10;
 431         break;
 432       }
 433       case ISD::SUB:
 434       case ISD::SHL:
 435       case ISD::SRA:
 436       case ISD::SRL:
 437       case ISD::ROTL:
 438       case ISD::ROTR:
 439       case ISD::SUBC:
 440       case ISD::SUBE:
 441       case X86ISD::SHLD:
 442       case X86ISD::SHRD: {
 443         SDOperand N10 = N1.getOperand(0);
 444         if (ISD::isNON_EXTLoad(N10.Val))
 445           RModW = N10.Val->isOperand(Chain.Val) && N10.hasOneUse() &&
 446             (N10.getOperand(1) == N2) &&
 447             (N10.Val->getValueType(0) == N1.getValueType());
 448         if (RModW)
 449           Load = N10;
 450         break;
 451       }
 452     }
 453
 454     if (RModW) {
 455       MoveBelowTokenFactor(DAG, Load, SDOperand(I, 0), Chain);
 456       ++NumLoadMoved;
 457     }
 458   }
 459 }
 460
 461 /// InstructionSelectBasicBlock - This callback is invoked by SelectionDAGISel
 462 /// when it has created a SelectionDAG for us to codegen.
 463 void X86DAGToDAGISel::InstructionSelectBasicBlock(SelectionDAG &DAG) {
 464   DEBUG(BB->dump());
 465   MachineFunction::iterator FirstMBB = BB;
 466
 467   if (!FastISel)
 468     InstructionSelectPreprocess(DAG);
 469
 470   // Codegen the basic block.
 471 #ifndef NDEBUG
 472   DOUT << "===== Instruction selection begins:\n";
 473   Indent = 0;
 474 #endif
 475   DAG.setRoot(SelectRoot(DAG.getRoot()));
 476 #ifndef NDEBUG
 477   DOUT << "===== Instruction selection ends:\n";
 478 #endif
 479
 480   DAG.RemoveDeadNodes();
 481
 482   // Emit machine code to BB.
 483   ScheduleAndEmitDAG(DAG);
 484
 485   // If we are emitting FP stack code, scan the basic block to determine if this
 486   // block defines any FP values.  If so, put an FP_REG_KILL instruction before
 487   // the terminator of the block.
 488
 489   // Note that FP stack instructions are used in all modes for long double,
 490   // so we always need to do this check.
 491   // Also note that it's possible for an FP stack register to be live across
 492   // an instruction that produces multiple basic blocks (SSE CMOV) so we
 493   // must check all the generated basic blocks.
 494
 495   // Scan all of the machine instructions in these MBBs, checking for FP
 496   // stores.  (RFP32 and RFP64 will not exist in SSE mode, but RFP80 might.)
 497   MachineFunction::iterator MBBI = FirstMBB;
 498   do {
 499     bool ContainsFPCode = false;
 500     for (MachineBasicBlock::iterator I = MBBI->begin(), E = MBBI->end();
 501          !ContainsFPCode && I != E; ++I) {
 502       if (I->getNumOperands() != 0 && I->getOperand(0).isRegister()) {
 503         const TargetRegisterClass *clas;
 504         for (unsigned op = 0, e = I->getNumOperands(); op != e; ++op) {
 505           if (I->getOperand(op).isRegister() && I->getOperand(op).isDef() &&
 506               MRegisterInfo::isVirtualRegister(I->getOperand(op).getReg()) &&
 507               ((clas = RegMap->getRegClass(I->getOperand(0).getReg())) ==
 508                  X86::RFP32RegisterClass ||
 509                clas == X86::RFP64RegisterClass ||
 510                clas == X86::RFP80RegisterClass)) {
 511             ContainsFPCode = true;
 512             break;
 513           }
 514         }
 515       }
 516     }
 517     // Check PHI nodes in successor blocks.  These PHI's will be lowered to have
 518     // a copy of the input value in this block.  In SSE mode, we only care about
 519     // 80-bit values.
 520     if (!ContainsFPCode) {
 521       // Final check, check LLVM BB's that are successors to the LLVM BB
 522       // corresponding to BB for FP PHI nodes.
 523       const BasicBlock *LLVMBB = BB->getBasicBlock();
 524       const PHINode *PN;
 525       for (succ_const_iterator SI = succ_begin(LLVMBB), E = succ_end(LLVMBB);
 526            !ContainsFPCode && SI != E; ++SI) {
 527         for (BasicBlock::const_iterator II = SI->begin();
 528              (PN = dyn_cast<PHINode>(II)); ++II) {
 529           if (PN->getType()==Type::X86_FP80Ty ||
 530               (!Subtarget->hasSSE1() && PN->getType()->isFloatingPoint()) ||
 531               (!Subtarget->hasSSE2() && PN->getType()==Type::DoubleTy)) {
 532             ContainsFPCode = true;
 533             break;
 534           }
 535         }
 536       }
 537     }
 538     // Finally, if we found any FP code, emit the FP_REG_KILL instruction.
 539     if (ContainsFPCode) {
 540       BuildMI(*MBBI, MBBI->getFirstTerminator(),
 541               TM.getInstrInfo()->get(X86::FP_REG_KILL));
 542       ++NumFPKill;
 543     }
 544   } while (&*(MBBI++) != BB);
 545 }
 546
 547 /// EmitSpecialCodeForMain - Emit any code that needs to be executed only in
 548 /// the main function.
 549 void X86DAGToDAGISel::EmitSpecialCodeForMain(MachineBasicBlock *BB,
 550                                              MachineFrameInfo *MFI) {
 551   const TargetInstrInfo *TII = TM.getInstrInfo();
 552   if (Subtarget->isTargetCygMing())
 553     BuildMI(BB, TII->get(X86::CALLpcrel32)).addExternalSymbol("__main");
 554 }
 555
 556 void X86DAGToDAGISel::EmitFunctionEntryCode(Function &Fn, MachineFunction &MF) {
 557   // If this is main, emit special code for main.
 558   MachineBasicBlock *BB = MF.begin();
 559   if (Fn.hasExternalLinkage() && Fn.getName() == "main")
 560     EmitSpecialCodeForMain(BB, MF.getFrameInfo());
 561 }
 562
 563 /// MatchAddress - Add the specified node to the specified addressing mode,
 564 /// returning true if it cannot be done.  This just pattern matches for the
 565 /// addressing mode
 566 bool X86DAGToDAGISel::MatchAddress(SDOperand N, X86ISelAddressMode &AM,
 567                                    bool isRoot, unsigned Depth) {
 568   // Limit recursion.
 569   if (Depth > 5)
 570     return MatchAddressBase(N, AM, isRoot, Depth);
 571
 572   // RIP relative addressing: %rip + 32-bit displacement!
 573   if (AM.isRIPRel) {
 574     if (!AM.ES && AM.JT != -1 && N.getOpcode() == ISD::Constant) {
 575       int64_t Val = cast<ConstantSDNode>(N)->getSignExtended();
 576       if (isInt32(AM.Disp + Val)) {
 577         AM.Disp += Val;
 578         return false;
 579       }
 580     }
 581     return true;
 582   }
 583
 584   int id = N.Val->getNodeId();
 585   bool Available = isSelected(id);
 586
 587   switch (N.getOpcode()) {
 588   default: break;
 589   case ISD::Constant: {
 590     int64_t Val = cast<ConstantSDNode>(N)->getSignExtended();
 591     if (isInt32(AM.Disp + Val)) {
 592       AM.Disp += Val;
 593       return false;
 594     }
 595     break;
 596   }
 597
 598   case X86ISD::Wrapper: {
 599     bool is64Bit = Subtarget->is64Bit();
 600     // Under X86-64 non-small code model, GV (and friends) are 64-bits.
 601     if (is64Bit && TM.getCodeModel() != CodeModel::Small)
 602       break;
 603     if (AM.GV != 0 || AM.CP != 0 || AM.ES != 0 || AM.JT != -1)
 604       break;
 605     // If value is available in a register both base and index components have
 606     // been picked, we can't fit the result available in the register in the
 607     // addressing mode. Duplicate GlobalAddress or ConstantPool as displacement.
 608     if (!Available || (AM.Base.Reg.Val && AM.IndexReg.Val)) {
 609       bool isStatic = TM.getRelocationModel() == Reloc::Static;
 610       SDOperand N0 = N.getOperand(0);
 611       // Mac OS X X86-64 lower 4G address is not available.
 612       bool isAbs32 = !is64Bit ||
 613         (isStatic && Subtarget->hasLow4GUserSpaceAddress());
 614       if (GlobalAddressSDNode *G = dyn_cast<GlobalAddressSDNode>(N0)) {
 615         GlobalValue *GV = G->getGlobal();
 616         if (isAbs32 || isRoot) {
 617           AM.GV = GV;
 618           AM.Disp += G->getOffset();
 619           AM.isRIPRel = !isAbs32;
 620           return false;
 621         }
 622       } else if (ConstantPoolSDNode *CP = dyn_cast<ConstantPoolSDNode>(N0)) {
 623         if (isAbs32 || isRoot) {
 624           AM.CP = CP->getConstVal();
 625           AM.Align = CP->getAlignment();
 626           AM.Disp += CP->getOffset();
 627           AM.isRIPRel = !isAbs32;
 628           return false;
 629         }
 630       } else if (ExternalSymbolSDNode *S =dyn_cast<ExternalSymbolSDNode>(N0)) {
 631         if (isAbs32 || isRoot) {
 632           AM.ES = S->getSymbol();
 633           AM.isRIPRel = !isAbs32;
 634           return false;
 635         }
 636       } else if (JumpTableSDNode *J = dyn_cast<JumpTableSDNode>(N0)) {
 637         if (isAbs32 || isRoot) {
 638           AM.JT = J->getIndex();
 639           AM.isRIPRel = !isAbs32;
 640           return false;
 641         }
 642       }
 643     }
 644     break;
 645   }
 646
 647   case ISD::FrameIndex:
 648     if (AM.BaseType == X86ISelAddressMode::RegBase && AM.Base.Reg.Val == 0) {
 649       AM.BaseType = X86ISelAddressMode::FrameIndexBase;
 650       AM.Base.FrameIndex = cast<FrameIndexSDNode>(N)->getIndex();
 651       return false;
 652     }
 653     break;
 654
 655   case ISD::SHL:
 656     if (!Available && AM.IndexReg.Val == 0 && AM.Scale == 1)
 657       if (ConstantSDNode *CN = dyn_cast<ConstantSDNode>(N.Val->getOperand(1))) {
 658         unsigned Val = CN->getValue();
 659         if (Val == 1 || Val == 2 || Val == 3) {
 660           AM.Scale = 1 << Val;
 661           SDOperand ShVal = N.Val->getOperand(0);
 662
 663           // Okay, we know that we have a scale by now.  However, if the scaled
 664           // value is an add of something and a constant, we can fold the
 665           // constant into the disp field here.
 666           if (ShVal.Val->getOpcode() == ISD::ADD && ShVal.hasOneUse() &&
 667               isa<ConstantSDNode>(ShVal.Val->getOperand(1))) {
 668             AM.IndexReg = ShVal.Val->getOperand(0);
 669             ConstantSDNode *AddVal =
 670               cast<ConstantSDNode>(ShVal.Val->getOperand(1));
 671             uint64_t Disp = AM.Disp + (AddVal->getValue() << Val);
 672             if (isInt32(Disp))
 673               AM.Disp = Disp;
 674             else
 675               AM.IndexReg = ShVal;
 676           } else {
 677             AM.IndexReg = ShVal;
 678           }
 679           return false;
 680         }
 681       }
 682     break;
 683
 684   case ISD::SMUL_LOHI:
 685   case ISD::UMUL_LOHI:
 686     // A mul_lohi where we need the low part can be folded as a plain multiply.
 687     if (N.ResNo != 0) break;
 688     // FALL THROUGH
 689   case ISD::MUL:
 690     // X*[3,5,9] -> X+X*[2,4,8]
 691     if (!Available &&
 692         AM.BaseType == X86ISelAddressMode::RegBase &&
 693         AM.Base.Reg.Val == 0 &&
 694         AM.IndexReg.Val == 0) {
 695       if (ConstantSDNode *CN = dyn_cast<ConstantSDNode>(N.Val->getOperand(1)))
 696         if (CN->getValue() == 3 || CN->getValue() == 5 || CN->getValue() == 9) {
 697           AM.Scale = unsigned(CN->getValue())-1;
 698
 699           SDOperand MulVal = N.Val->getOperand(0);
 700           SDOperand Reg;
 701
 702           // Okay, we know that we have a scale by now.  However, if the scaled
 703           // value is an add of something and a constant, we can fold the
 704           // constant into the disp field here.
 705           if (MulVal.Val->getOpcode() == ISD::ADD && MulVal.hasOneUse() &&
 706               isa<ConstantSDNode>(MulVal.Val->getOperand(1))) {
 707             Reg = MulVal.Val->getOperand(0);
 708             ConstantSDNode *AddVal =
 709               cast<ConstantSDNode>(MulVal.Val->getOperand(1));
 710             uint64_t Disp = AM.Disp + AddVal->getValue() * CN->getValue();
 711             if (isInt32(Disp))
 712               AM.Disp = Disp;
 713             else
 714               Reg = N.Val->getOperand(0);
 715           } else {
 716             Reg = N.Val->getOperand(0);
 717           }
 718
 719           AM.IndexReg = AM.Base.Reg = Reg;
 720           return false;
 721         }
 722     }
 723     break;
 724
 725   case ISD::ADD:
 726     if (!Available) {
 727       X86ISelAddressMode Backup = AM;
 728       if (!MatchAddress(N.Val->getOperand(0), AM, false, Depth+1) &&
 729           !MatchAddress(N.Val->getOperand(1), AM, false, Depth+1))
 730         return false;
 731       AM = Backup;
 732       if (!MatchAddress(N.Val->getOperand(1), AM, false, Depth+1) &&
 733           !MatchAddress(N.Val->getOperand(0), AM, false, Depth+1))
 734         return false;
 735       AM = Backup;
 736     }
 737     break;
 738
 739   case ISD::OR:
 740     // Handle "X | C" as "X + C" iff X is known to have C bits clear.
 741     if (!Available) {
 742       if (ConstantSDNode *CN = dyn_cast<ConstantSDNode>(N.getOperand(1))) {
 743         X86ISelAddressMode Backup = AM;
 744         // Start with the LHS as an addr mode.
 745         if (!MatchAddress(N.getOperand(0), AM, false) &&
 746             // Address could not have picked a GV address for the displacement.
 747             AM.GV == NULL &&
 748             // On x86-64, the resultant disp must fit in 32-bits.
 749             isInt32(AM.Disp + CN->getSignExtended()) &&
 750             // Check to see if the LHS & C is zero.
 751             CurDAG->MaskedValueIsZero(N.getOperand(0), CN->getValue())) {
 752           AM.Disp += CN->getValue();
 753           return false;
 754         }
 755         AM = Backup;
 756       }
 757     }
 758     break;
 759   }
 760
 761   return MatchAddressBase(N, AM, isRoot, Depth);
 762 }
 763
 764 /// MatchAddressBase - Helper for MatchAddress. Add the specified node to the
 765 /// specified addressing mode without any further recursion.
 766 bool X86DAGToDAGISel::MatchAddressBase(SDOperand N, X86ISelAddressMode &AM,
 767                                        bool isRoot, unsigned Depth) {
 768   // Is the base register already occupied?
 769   if (AM.BaseType != X86ISelAddressMode::RegBase || AM.Base.Reg.Val) {
 770     // If so, check to see if the scale index register is set.
 771     if (AM.IndexReg.Val == 0) {
 772       AM.IndexReg = N;
 773       AM.Scale = 1;
 774       return false;
 775     }
 776
 777     // Otherwise, we cannot select it.
 778     return true;
 779   }
 780
 781   // Default, generate it as a register.
 782   AM.BaseType = X86ISelAddressMode::RegBase;
 783   AM.Base.Reg = N;
 784   return false;
 785 }
 786
 787 /// SelectAddr - returns true if it is able pattern match an addressing mode.
 788 /// It returns the operands which make up the maximal addressing mode it can
 789 /// match by reference.
 790 bool X86DAGToDAGISel::SelectAddr(SDOperand Op, SDOperand N, SDOperand &Base,
 791                                  SDOperand &Scale, SDOperand &Index,
 792                                  SDOperand &Disp) {
 793   X86ISelAddressMode AM;
 794   if (MatchAddress(N, AM))
 795     return false;
 796
 797   MVT::ValueType VT = N.getValueType();
 798   if (AM.BaseType == X86ISelAddressMode::RegBase) {
 799     if (!AM.Base.Reg.Val)
 800       AM.Base.Reg = CurDAG->getRegister(0, VT);
 801   }
 802
 803   if (!AM.IndexReg.Val)
 804     AM.IndexReg = CurDAG->getRegister(0, VT);
 805
 806   getAddressOperands(AM, Base, Scale, Index, Disp);
 807   return true;
 808 }
 809
 810 /// isZeroNode - Returns true if Elt is a constant zero or a floating point
 811 /// constant +0.0.
 812 static inline bool isZeroNode(SDOperand Elt) {
 813   return ((isa<ConstantSDNode>(Elt) &&
 814   cast<ConstantSDNode>(Elt)->getValue() == 0) ||
 815   (isa<ConstantFPSDNode>(Elt) &&
 816   cast<ConstantFPSDNode>(Elt)->getValueAPF().isPosZero()));
 817 }
 818
 819
 820 /// SelectScalarSSELoad - Match a scalar SSE load.  In particular, we want to
 821 /// match a load whose top elements are either undef or zeros.  The load flavor
 822 /// is derived from the type of N, which is either v4f32 or v2f64.
 823 bool X86DAGToDAGISel::SelectScalarSSELoad(SDOperand Op, SDOperand Pred,
 824                                           SDOperand N, SDOperand &Base,
 825                                           SDOperand &Scale, SDOperand &Index,
 826                                           SDOperand &Disp, SDOperand &InChain,
 827                                           SDOperand &OutChain) {
 828   if (N.getOpcode() == ISD::SCALAR_TO_VECTOR) {
 829     InChain = N.getOperand(0).getValue(1);
 830     if (ISD::isNON_EXTLoad(InChain.Val) &&
 831         InChain.getValue(0).hasOneUse() &&
 832         N.hasOneUse() &&
 833         CanBeFoldedBy(N.Val, Pred.Val, Op.Val)) {
 834       LoadSDNode *LD = cast<LoadSDNode>(InChain);
 835       if (!SelectAddr(Op, LD->getBasePtr(), Base, Scale, Index, Disp))
 836         return false;
 837       OutChain = LD->getChain();
 838       return true;
 839     }
 840   }
 841
 842   // Also handle the case where we explicitly require zeros in the top
 843   // elements.  This is a vector shuffle from the zero vector.
 844   if (N.getOpcode() == ISD::VECTOR_SHUFFLE && N.Val->hasOneUse() &&
 845       N.getOperand(0).getOpcode() == ISD::BUILD_VECTOR &&
 846       N.getOperand(1).getOpcode() == ISD::SCALAR_TO_VECTOR &&
 847       N.getOperand(1).Val->hasOneUse() &&
 848       ISD::isNON_EXTLoad(N.getOperand(1).getOperand(0).Val) &&
 849       N.getOperand(1).getOperand(0).hasOneUse()) {
 850     // Check to see if the BUILD_VECTOR is building a zero vector.
 851     SDOperand BV = N.getOperand(0);
 852     for (unsigned i = 0, e = BV.getNumOperands(); i != e; ++i)
 853       if (!isZeroNode(BV.getOperand(i)) &&
 854           BV.getOperand(i).getOpcode() != ISD::UNDEF)
 855         return false;  // Not a zero/undef vector.
 856     // Check to see if the shuffle mask is 4/L/L/L or 2/L, where L is something
 857     // from the LHS.
 858     unsigned VecWidth = BV.getNumOperands();
 859     SDOperand ShufMask = N.getOperand(2);
 860     assert(ShufMask.getOpcode() == ISD::BUILD_VECTOR && "Invalid shuf mask!");
 861     if (ConstantSDNode *C = dyn_cast<ConstantSDNode>(ShufMask.getOperand(0))) {
 862       if (C->getValue() == VecWidth) {
 863         for (unsigned i = 1; i != VecWidth; ++i) {
 864           if (ShufMask.getOperand(i).getOpcode() == ISD::UNDEF) {
 865             // ok.
 866           } else {
 867             ConstantSDNode *C = cast<ConstantSDNode>(ShufMask.getOperand(i));
 868             if (C->getValue() >= VecWidth) return false;
 869           }
 870         }
 871       }
 872
 873       // Okay, this is a zero extending load.  Fold it.
 874       LoadSDNode *LD = cast<LoadSDNode>(N.getOperand(1).getOperand(0));
 875       if (!SelectAddr(Op, LD->getBasePtr(), Base, Scale, Index, Disp))
 876         return false;
 877       OutChain = LD->getChain();
 878       InChain = SDOperand(LD, 1);
 879       return true;
 880     }
 881   }
 882   return false;
 883 }
 884
 885
 886 /// SelectLEAAddr - it calls SelectAddr and determines if the maximal addressing
 887 /// mode it matches can be cost effectively emitted as an LEA instruction.
 888 bool X86DAGToDAGISel::SelectLEAAddr(SDOperand Op, SDOperand N,
 889                                     SDOperand &Base, SDOperand &Scale,
 890                                     SDOperand &Index, SDOperand &Disp) {
 891   X86ISelAddressMode AM;
 892   if (MatchAddress(N, AM))
 893     return false;
 894
 895   MVT::ValueType VT = N.getValueType();
 896   unsigned Complexity = 0;
 897   if (AM.BaseType == X86ISelAddressMode::RegBase)
 898     if (AM.Base.Reg.Val)
 899       Complexity = 1;
 900     else
 901       AM.Base.Reg = CurDAG->getRegister(0, VT);
 902   else if (AM.BaseType == X86ISelAddressMode::FrameIndexBase)
 903     Complexity = 4;
 904
 905   if (AM.IndexReg.Val)
 906     Complexity++;
 907   else
 908     AM.IndexReg = CurDAG->getRegister(0, VT);
 909
 910   // Don't match just leal(,%reg,2). It's cheaper to do addl %reg, %reg, or with
 911   // a simple shift.
 912   if (AM.Scale > 1)
 913     Complexity++;
 914
 915   // FIXME: We are artificially lowering the criteria to turn ADD %reg, $GA
 916   // to a LEA. This is determined with some expermentation but is by no means
 917   // optimal (especially for code size consideration). LEA is nice because of
 918   // its three-address nature. Tweak the cost function again when we can run
 919   // convertToThreeAddress() at register allocation time.
 920   if (AM.GV || AM.CP || AM.ES || AM.JT != -1) {
 921     // For X86-64, we should always use lea to materialize RIP relative
 922     // addresses.
 923     if (Subtarget->is64Bit())
 924       Complexity = 4;
 925     else
 926       Complexity += 2;
 927   }
 928
 929   if (AM.Disp && (AM.Base.Reg.Val || AM.IndexReg.Val))
 930     Complexity++;
 931
 932   if (Complexity > 2) {
 933     getAddressOperands(AM, Base, Scale, Index, Disp);
 934     return true;
 935   }
 936   return false;
 937 }
 938
 939 bool X86DAGToDAGISel::TryFoldLoad(SDOperand P, SDOperand N,
 940                                   SDOperand &Base, SDOperand &Scale,
 941                                   SDOperand &Index, SDOperand &Disp) {
 942   if (ISD::isNON_EXTLoad(N.Val) &&
 943       N.hasOneUse() &&
 944       CanBeFoldedBy(N.Val, P.Val, P.Val))
 945     return SelectAddr(P, N.getOperand(1), Base, Scale, Index, Disp);
 946   return false;
 947 }
 948
 949 /// getGlobalBaseReg - Output the instructions required to put the
 950 /// base address to use for accessing globals into a register.
 951 ///
 952 SDNode *X86DAGToDAGISel::getGlobalBaseReg() {
 953   assert(!Subtarget->is64Bit() && "X86-64 PIC uses RIP relative addressing");
 954   if (!GlobalBaseReg) {
 955     // Insert the set of GlobalBaseReg into the first MBB of the function
 956     MachineBasicBlock &FirstMBB = BB->getParent()->front();
 957     MachineBasicBlock::iterator MBBI = FirstMBB.begin();
 958     SSARegMap *RegMap = BB->getParent()->getSSARegMap();
 959     unsigned PC = RegMap->createVirtualRegister(X86::GR32RegisterClass);
 960
 961     const TargetInstrInfo *TII = TM.getInstrInfo();
 962     BuildMI(FirstMBB, MBBI, TII->get(X86::MovePCtoStack));
 963     BuildMI(FirstMBB, MBBI, TII->get(X86::POP32r), PC);
 964
 965     // If we're using vanilla 'GOT' PIC style, we should use relative addressing
 966     // not to pc, but to _GLOBAL_ADDRESS_TABLE_ external
 967     if (TM.getRelocationModel() == Reloc::PIC_ &&
 968         Subtarget->isPICStyleGOT()) {
 969       GlobalBaseReg = RegMap->createVirtualRegister(X86::GR32RegisterClass);
 970       BuildMI(FirstMBB, MBBI, TII->get(X86::ADD32ri), GlobalBaseReg).
 971         addReg(PC).
 972         addExternalSymbol("_GLOBAL_OFFSET_TABLE_");
 973     } else {
 974       GlobalBaseReg = PC;
 975     }
 976
 977   }
 978   return CurDAG->getRegister(GlobalBaseReg, TLI.getPointerTy()).Val;
 979 }
 980
 981 static SDNode *FindCallStartFromCall(SDNode *Node) {
 982   if (Node->getOpcode() == ISD::CALLSEQ_START) return Node;
 983     assert(Node->getOperand(0).getValueType() == MVT::Other &&
 984          "Node doesn't have a token chain argument!");
 985   return FindCallStartFromCall(Node->getOperand(0).Val);
 986 }
 987
 988 SDNode *X86DAGToDAGISel::getTruncate(SDOperand N0, MVT::ValueType VT) {
 989     SDOperand SRIdx;
 990     switch (VT) {
 991     case MVT::i8:
 992       SRIdx = CurDAG->getTargetConstant(1, MVT::i32); // SubRegSet 1
 993       // Ensure that the source register has an 8-bit subreg on 32-bit targets
 994       if (!Subtarget->is64Bit()) {
 995         unsigned Opc;
 996         MVT::ValueType VT;
 997         switch (N0.getValueType()) {
 998         default: assert(0 && "Unknown truncate!");
 999         case MVT::i16:
1000           Opc = X86::MOV16to16_;
1001           VT = MVT::i16;
1002           break;
1003         case MVT::i32:
1004           Opc = X86::MOV32to32_;
1005           VT = MVT::i32;
1006           break;
1007         }
1008         N0 = SDOperand(CurDAG->getTargetNode(Opc, VT, MVT::Flag, N0), 0);
1009         return CurDAG->getTargetNode(X86::EXTRACT_SUBREG,
1010                                      VT, N0, SRIdx, N0.getValue(1));
1011       }
1012       break;
1013     case MVT::i16:
1014       SRIdx = CurDAG->getTargetConstant(2, MVT::i32); // SubRegSet 2
1015       break;
1016     case MVT::i32:
1017       SRIdx = CurDAG->getTargetConstant(3, MVT::i32); // SubRegSet 3
1018       break;
1019     default: assert(0 && "Unknown truncate!"); break;
1020     }
1021     return CurDAG->getTargetNode(X86::EXTRACT_SUBREG, VT, N0, SRIdx);
1022 }
1023
1024
1025 SDNode *X86DAGToDAGISel::Select(SDOperand N) {
1026   SDNode *Node = N.Val;
1027   MVT::ValueType NVT = Node->getValueType(0);
1028   unsigned Opc, MOpc;
1029   unsigned Opcode = Node->getOpcode();
1030
1031 #ifndef NDEBUG
1032   DOUT << std::string(Indent, ' ') << "Selecting: ";
1033   DEBUG(Node->dump(CurDAG));
1034   DOUT << "\n";
1035   Indent += 2;
1036 #endif
1037
1038   if (Opcode >= ISD::BUILTIN_OP_END && Opcode < X86ISD::FIRST_NUMBER) {
1039 #ifndef NDEBUG
1040     DOUT << std::string(Indent-2, ' ') << "== ";
1041     DEBUG(Node->dump(CurDAG));
1042     DOUT << "\n";
1043     Indent -= 2;
1044 #endif
1045     return NULL;   // Already selected.
1046   }
1047
1048   switch (Opcode) {
1049     default: break;
1050     case X86ISD::GlobalBaseReg:
1051       return getGlobalBaseReg();
1052
1053     case ISD::ADD: {
1054       // Turn ADD X, c to MOV32ri X+c. This cannot be done with tblgen'd
1055       // code and is matched first so to prevent it from being turned into
1056       // LEA32r X+c.
1057       // In 64-bit mode, use LEA to take advantage of RIP-relative addressing.
1058       MVT::ValueType PtrVT = TLI.getPointerTy();
1059       SDOperand N0 = N.getOperand(0);
1060       SDOperand N1 = N.getOperand(1);
1061       if (N.Val->getValueType(0) == PtrVT &&
1062           N0.getOpcode() == X86ISD::Wrapper &&
1063           N1.getOpcode() == ISD::Constant) {
1064         unsigned Offset = (unsigned)cast<ConstantSDNode>(N1)->getValue();
1065         SDOperand C(0, 0);
1066         // TODO: handle ExternalSymbolSDNode.
1067         if (GlobalAddressSDNode *G =
1068             dyn_cast<GlobalAddressSDNode>(N0.getOperand(0))) {
1069           C = CurDAG->getTargetGlobalAddress(G->getGlobal(), PtrVT,
1070                                              G->getOffset() + Offset);
1071         } else if (ConstantPoolSDNode *CP =
1072                    dyn_cast<ConstantPoolSDNode>(N0.getOperand(0))) {
1073           C = CurDAG->getTargetConstantPool(CP->getConstVal(), PtrVT,
1074                                             CP->getAlignment(),
1075                                             CP->getOffset()+Offset);
1076         }
1077
1078         if (C.Val) {
1079           if (Subtarget->is64Bit()) {
1080             SDOperand Ops[] = { CurDAG->getRegister(0, PtrVT), getI8Imm(1),
1081                                 CurDAG->getRegister(0, PtrVT), C };
1082             return CurDAG->SelectNodeTo(N.Val, X86::LEA64r, MVT::i64, Ops, 4);
1083           } else
1084             return CurDAG->SelectNodeTo(N.Val, X86::MOV32ri, PtrVT, C);
1085         }
1086       }
1087
1088       // Other cases are handled by auto-generated code.
1089       break;
1090     }
1091
1092     case ISD::SMUL_LOHI:
1093     case ISD::UMUL_LOHI: {
1094       SDOperand N0 = Node->getOperand(0);
1095       SDOperand N1 = Node->getOperand(1);
1096
1097       // There are several forms of IMUL that just return the low part and
1098       // don't have fixed-register operands. If we don't need the high part,
1099       // use these instead. They can be selected with the generated ISel code.
1100       if (NVT != MVT::i8 &&
1101           N.getValue(1).use_empty()) {
1102         N = CurDAG->getNode(ISD::MUL, NVT, N0, N1);
1103         break;
1104       }
1105
1106       bool isSigned = Opcode == ISD::SMUL_LOHI;
1107       if (!isSigned)
1108         switch (NVT) {
1109         default: assert(0 && "Unsupported VT!");
1110         case MVT::i8:  Opc = X86::MUL8r;  MOpc = X86::MUL8m;  break;
1111         case MVT::i16: Opc = X86::MUL16r; MOpc = X86::MUL16m; break;
1112         case MVT::i32: Opc = X86::MUL32r; MOpc = X86::MUL32m; break;
1113         case MVT::i64: Opc = X86::MUL64r; MOpc = X86::MUL64m; break;
1114         }
1115       else
1116         switch (NVT) {
1117         default: assert(0 && "Unsupported VT!");
1118         case MVT::i8:  Opc = X86::IMUL8r;  MOpc = X86::IMUL8m;  break;
1119         case MVT::i16: Opc = X86::IMUL16r; MOpc = X86::IMUL16m; break;
1120         case MVT::i32: Opc = X86::IMUL32r; MOpc = X86::IMUL32m; break;
1121         case MVT::i64: Opc = X86::IMUL64r; MOpc = X86::IMUL64m; break;
1122         }
1123
1124       unsigned LoReg, HiReg;
1125       switch (NVT) {
1126       default: assert(0 && "Unsupported VT!");
1127       case MVT::i8:  LoReg = X86::AL;  HiReg = X86::AH;  break;
1128       case MVT::i16: LoReg = X86::AX;  HiReg = X86::DX;  break;
1129       case MVT::i32: LoReg = X86::EAX; HiReg = X86::EDX; break;
1130       case MVT::i64: LoReg = X86::RAX; HiReg = X86::RDX; break;
1131       }
1132
1133       SDOperand Tmp0, Tmp1, Tmp2, Tmp3;
1134       bool foldedLoad = TryFoldLoad(N, N1, Tmp0, Tmp1, Tmp2, Tmp3);
1135       // multiplty is commmutative
1136       if (!foldedLoad) {
1137         foldedLoad = TryFoldLoad(N, N0, Tmp0, Tmp1, Tmp2, Tmp3);
1138         if (foldedLoad)
1139           std::swap(N0, N1);
1140       }
1141
1142       AddToISelQueue(N0);
1143       SDOperand InFlag = CurDAG->getCopyToReg(CurDAG->getEntryNode(), LoReg,
1144                                               N0, SDOperand()).getValue(1);
1145
1146       if (foldedLoad) {
1147         AddToISelQueue(N1.getOperand(0));
1148         AddToISelQueue(Tmp0);
1149         AddToISelQueue(Tmp1);
1150         AddToISelQueue(Tmp2);
1151         AddToISelQueue(Tmp3);
1152         SDOperand Ops[] = { Tmp0, Tmp1, Tmp2, Tmp3, N1.getOperand(0), InFlag };
1153         SDNode *CNode =
1154           CurDAG->getTargetNode(MOpc, MVT::Other, MVT::Flag, Ops, 6);
1155         InFlag = SDOperand(CNode, 1);
1156         // Update the chain.
1157         ReplaceUses(N1.getValue(1), SDOperand(CNode, 0));
1158       } else {
1159         AddToISelQueue(N1);
1160         InFlag =
1161           SDOperand(CurDAG->getTargetNode(Opc, MVT::Flag, N1, InFlag), 0);
1162       }
1163
1164       // Copy the low half of the result, if it is needed.
1165       if (!N.getValue(0).use_empty()) {
1166         SDOperand Result = CurDAG->getCopyFromReg(CurDAG->getEntryNode(),
1167                                                   LoReg, NVT, InFlag);
1168         InFlag = Result.getValue(2);
1169         ReplaceUses(N.getValue(0), Result);
1170 #ifndef NDEBUG
1171         DOUT << std::string(Indent-2, ' ') << "=> ";
1172         DEBUG(Result.Val->dump(CurDAG));
1173         DOUT << "\n";
1174 #endif
1175       }
1176       // Copy the high half of the result, if it is needed.
1177       if (!N.getValue(1).use_empty()) {
1178         SDOperand Result;
1179         if (HiReg == X86::AH && Subtarget->is64Bit()) {
1180           // Prevent use of AH in a REX instruction by referencing AX instead.
1181           // Shift it down 8 bits.
1182           Result = CurDAG->getCopyFromReg(CurDAG->getEntryNode(),
1183                                           X86::AX, MVT::i16, InFlag);
1184           InFlag = Result.getValue(2);
1185           Result = SDOperand(CurDAG->getTargetNode(X86::SHR16ri, MVT::i16, Result,
1186                                        CurDAG->getTargetConstant(8, MVT::i8)), 0);
1187           // Then truncate it down to i8.
1188           SDOperand SRIdx = CurDAG->getTargetConstant(1, MVT::i32); // SubRegSet 1
1189           Result = SDOperand(CurDAG->getTargetNode(X86::EXTRACT_SUBREG,
1190                                                    MVT::i8, Result, SRIdx), 0);
1191         } else {
1192           Result = CurDAG->getCopyFromReg(CurDAG->getEntryNode(),
1193                                           HiReg, NVT, InFlag);
1194           InFlag = Result.getValue(2);
1195         }
1196         ReplaceUses(N.getValue(1), Result);
1197 #ifndef NDEBUG
1198         DOUT << std::string(Indent-2, ' ') << "=> ";
1199         DEBUG(Result.Val->dump(CurDAG));
1200         DOUT << "\n";
1201 #endif
1202       }
1203
1204 #ifndef NDEBUG
1205       Indent -= 2;
1206 #endif
1207
1208       return NULL;
1209     }
1210
1211     case ISD::SDIVREM:
1212     case ISD::UDIVREM: {
1213       SDOperand N0 = Node->getOperand(0);
1214       SDOperand N1 = Node->getOperand(1);
1215
1216       bool isSigned = Opcode == ISD::SDIVREM;
1217       if (!isSigned)
1218         switch (NVT) {
1219         default: assert(0 && "Unsupported VT!");
1220         case MVT::i8:  Opc = X86::DIV8r;  MOpc = X86::DIV8m;  break;
1221         case MVT::i16: Opc = X86::DIV16r; MOpc = X86::DIV16m; break;
1222         case MVT::i32: Opc = X86::DIV32r; MOpc = X86::DIV32m; break;
1223         case MVT::i64: Opc = X86::DIV64r; MOpc = X86::DIV64m; break;
1224         }
1225       else
1226         switch (NVT) {
1227         default: assert(0 && "Unsupported VT!");
1228         case MVT::i8:  Opc = X86::IDIV8r;  MOpc = X86::IDIV8m;  break;
1229         case MVT::i16: Opc = X86::IDIV16r; MOpc = X86::IDIV16m; break;
1230         case MVT::i32: Opc = X86::IDIV32r; MOpc = X86::IDIV32m; break;
1231         case MVT::i64: Opc = X86::IDIV64r; MOpc = X86::IDIV64m; break;
1232         }
1233
1234       unsigned LoReg, HiReg;
1235       unsigned ClrOpcode, SExtOpcode;
1236       switch (NVT) {
1237       default: assert(0 && "Unsupported VT!");
1238       case MVT::i8:
1239         LoReg = X86::AL;  HiReg = X86::AH;
1240         ClrOpcode  = 0;
1241         SExtOpcode = X86::CBW;
1242         break;
1243       case MVT::i16:
1244         LoReg = X86::AX;  HiReg = X86::DX;
1245         ClrOpcode  = X86::MOV16r0;
1246         SExtOpcode = X86::CWD;
1247         break;
1248       case MVT::i32:
1249         LoReg = X86::EAX; HiReg = X86::EDX;
1250         ClrOpcode  = X86::MOV32r0;
1251         SExtOpcode = X86::CDQ;
1252         break;
1253       case MVT::i64:
1254         LoReg = X86::RAX; HiReg = X86::RDX;
1255         ClrOpcode  = X86::MOV64r0;
1256         SExtOpcode = X86::CQO;
1257         break;
1258       }
1259
1260       SDOperand Tmp0, Tmp1, Tmp2, Tmp3;
1261       bool foldedLoad = TryFoldLoad(N, N1, Tmp0, Tmp1, Tmp2, Tmp3);
1262
1263       SDOperand InFlag;
1264       if (NVT == MVT::i8 && !isSigned) {
1265         // Special case for div8, just use a move with zero extension to AX to
1266         // clear the upper 8 bits (AH).
1267         SDOperand Tmp0, Tmp1, Tmp2, Tmp3, Move, Chain;
1268         if (TryFoldLoad(N, N0, Tmp0, Tmp1, Tmp2, Tmp3)) {
1269           SDOperand Ops[] = { Tmp0, Tmp1, Tmp2, Tmp3, N0.getOperand(0) };
1270           AddToISelQueue(N0.getOperand(0));
1271           AddToISelQueue(Tmp0);
1272           AddToISelQueue(Tmp1);
1273           AddToISelQueue(Tmp2);
1274           AddToISelQueue(Tmp3);
1275           Move =
1276             SDOperand(CurDAG->getTargetNode(X86::MOVZX16rm8, MVT::i16, MVT::Other,
1277                                             Ops, 5), 0);
1278           Chain = Move.getValue(1);
1279           ReplaceUses(N0.getValue(1), Chain);
1280         } else {
1281           AddToISelQueue(N0);
1282           Move =
1283             SDOperand(CurDAG->getTargetNode(X86::MOVZX16rr8, MVT::i16, N0), 0);
1284           Chain = CurDAG->getEntryNode();
1285         }
1286         Chain  = CurDAG->getCopyToReg(Chain, X86::AX, Move, SDOperand());
1287         InFlag = Chain.getValue(1);
1288       } else {
1289         AddToISelQueue(N0);
1290         InFlag =
1291           CurDAG->getCopyToReg(CurDAG->getEntryNode(),
1292                                LoReg, N0, SDOperand()).getValue(1);
1293         if (isSigned) {
1294           // Sign extend the low part into the high part.
1295           InFlag =
1296             SDOperand(CurDAG->getTargetNode(SExtOpcode, MVT::Flag, InFlag), 0);
1297         } else {
1298           // Zero out the high part, effectively zero extending the input.
1299           SDOperand ClrNode = SDOperand(CurDAG->getTargetNode(ClrOpcode, NVT), 0);
1300           InFlag = CurDAG->getCopyToReg(CurDAG->getEntryNode(), HiReg,
1301                                         ClrNode, InFlag).getValue(1);
1302         }
1303       }
1304
1305       if (foldedLoad) {
1306         AddToISelQueue(N1.getOperand(0));
1307         AddToISelQueue(Tmp0);
1308         AddToISelQueue(Tmp1);
1309         AddToISelQueue(Tmp2);
1310         AddToISelQueue(Tmp3);
1311         SDOperand Ops[] = { Tmp0, Tmp1, Tmp2, Tmp3, N1.getOperand(0), InFlag };
1312         SDNode *CNode =
1313           CurDAG->getTargetNode(MOpc, MVT::Other, MVT::Flag, Ops, 6);
1314         InFlag = SDOperand(CNode, 1);
1315         // Update the chain.
1316         ReplaceUses(N1.getValue(1), SDOperand(CNode, 0));
1317       } else {
1318         AddToISelQueue(N1);
1319         InFlag =
1320           SDOperand(CurDAG->getTargetNode(Opc, MVT::Flag, N1, InFlag), 0);
1321       }
1322
1323       // Copy the division (low) result, if it is needed.
1324       if (!N.getValue(0).use_empty()) {
1325         SDOperand Result = CurDAG->getCopyFromReg(CurDAG->getEntryNode(),
1326                                                   LoReg, NVT, InFlag);
1327         InFlag = Result.getValue(2);
1328         ReplaceUses(N.getValue(0), Result);
1329 #ifndef NDEBUG
1330         DOUT << std::string(Indent-2, ' ') << "=> ";
1331         DEBUG(Result.Val->dump(CurDAG));
1332         DOUT << "\n";
1333 #endif
1334       }
1335       // Copy the remainder (high) result, if it is needed.
1336       if (!N.getValue(1).use_empty()) {
1337         SDOperand Result;
1338         if (HiReg == X86::AH && Subtarget->is64Bit()) {
1339           // Prevent use of AH in a REX instruction by referencing AX instead.
1340           // Shift it down 8 bits.
1341           Result = CurDAG->getCopyFromReg(CurDAG->getEntryNode(),
1342                                           X86::AX, MVT::i16, InFlag);
1343           InFlag = Result.getValue(2);
1344           Result = SDOperand(CurDAG->getTargetNode(X86::SHR16ri, MVT::i16, Result,
1345                                        CurDAG->getTargetConstant(8, MVT::i8)), 0);
1346           // Then truncate it down to i8.
1347           SDOperand SRIdx = CurDAG->getTargetConstant(1, MVT::i32); // SubRegSet 1
1348           Result = SDOperand(CurDAG->getTargetNode(X86::EXTRACT_SUBREG,
1349                                                    MVT::i8, Result, SRIdx), 0);
1350         } else {
1351           Result = CurDAG->getCopyFromReg(CurDAG->getEntryNode(),
1352                                           HiReg, NVT, InFlag);
1353           InFlag = Result.getValue(2);
1354         }
1355         ReplaceUses(N.getValue(1), Result);
1356 #ifndef NDEBUG
1357         DOUT << std::string(Indent-2, ' ') << "=> ";
1358         DEBUG(Result.Val->dump(CurDAG));
1359         DOUT << "\n";
1360 #endif
1361       }
1362
1363 #ifndef NDEBUG
1364       Indent -= 2;
1365 #endif
1366
1367       return NULL;
1368     }
1369
1370     case ISD::ANY_EXTEND: {
1371       SDOperand N0 = Node->getOperand(0);
1372       AddToISelQueue(N0);
1373       if (NVT == MVT::i64 || NVT == MVT::i32 || NVT == MVT::i16) {
1374         SDOperand SRIdx;
1375         switch(N0.getValueType()) {
1376         case MVT::i32:
1377           SRIdx = CurDAG->getTargetConstant(3, MVT::i32); // SubRegSet 3
1378           break;
1379         case MVT::i16:
1380           SRIdx = CurDAG->getTargetConstant(2, MVT::i32); // SubRegSet 2
1381           break;
1382         case MVT::i8:
1383           if (Subtarget->is64Bit())
1384             SRIdx = CurDAG->getTargetConstant(1, MVT::i32); // SubRegSet 1
1385           break;
1386         default: assert(0 && "Unknown any_extend!");
1387         }
1388         if (SRIdx.Val) {
1389           SDNode *ResNode = CurDAG->getTargetNode(X86::INSERT_SUBREG,
1390                                                   NVT, N0, SRIdx);
1391
1392 #ifndef NDEBUG
1393           DOUT << std::string(Indent-2, ' ') << "=> ";
1394           DEBUG(ResNode->dump(CurDAG));
1395           DOUT << "\n";
1396           Indent -= 2;
1397 #endif
1398           return ResNode;
1399         } // Otherwise let generated ISel handle it.
1400       }
1401       break;
1402     }
1403
1404     case ISD::SIGN_EXTEND_INREG: {
1405       SDOperand N0 = Node->getOperand(0);
1406       AddToISelQueue(N0);
1407
1408       MVT::ValueType SVT = cast<VTSDNode>(Node->getOperand(1))->getVT();
1409       SDOperand TruncOp = SDOperand(getTruncate(N0, SVT), 0);
1410       unsigned Opc = 0;
1411       switch (NVT) {
1412       case MVT::i16:
1413         if (SVT == MVT::i8) Opc = X86::MOVSX16rr8;
1414         else assert(0 && "Unknown sign_extend_inreg!");
1415         break;
1416       case MVT::i32:
1417         switch (SVT) {
1418         case MVT::i8:  Opc = X86::MOVSX32rr8;  break;
1419         case MVT::i16: Opc = X86::MOVSX32rr16; break;
1420         default: assert(0 && "Unknown sign_extend_inreg!");
1421         }
1422         break;
1423       case MVT::i64:
1424         switch (SVT) {
1425         case MVT::i8:  Opc = X86::MOVSX64rr8;  break;
1426         case MVT::i16: Opc = X86::MOVSX64rr16; break;
1427         case MVT::i32: Opc = X86::MOVSX64rr32; break;
1428         default: assert(0 && "Unknown sign_extend_inreg!");
1429         }
1430         break;
1431       default: assert(0 && "Unknown sign_extend_inreg!");
1432       }
1433
1434       SDNode *ResNode = CurDAG->getTargetNode(Opc, NVT, TruncOp);
1435
1436 #ifndef NDEBUG
1437       DOUT << std::string(Indent-2, ' ') << "=> ";
1438       DEBUG(TruncOp.Val->dump(CurDAG));
1439       DOUT << "\n";
1440       DOUT << std::string(Indent-2, ' ') << "=> ";
1441       DEBUG(ResNode->dump(CurDAG));
1442       DOUT << "\n";
1443       Indent -= 2;
1444 #endif
1445       return ResNode;
1446       break;
1447     }
1448
1449     case ISD::TRUNCATE: {
1450       SDOperand Input = Node->getOperand(0);
1451       AddToISelQueue(Node->getOperand(0));
1452       SDNode *ResNode = getTruncate(Input, NVT);
1453
1454 #ifndef NDEBUG
1455         DOUT << std::string(Indent-2, ' ') << "=> ";
1456         DEBUG(ResNode->dump(CurDAG));
1457         DOUT << "\n";
1458         Indent -= 2;
1459 #endif
1460       return ResNode;
1461       break;
1462     }
1463   }
1464
1465   SDNode *ResNode = SelectCode(N);
1466
1467 #ifndef NDEBUG
1468   DOUT << std::string(Indent-2, ' ') << "=> ";
1469   if (ResNode == NULL || ResNode == N.Val)
1470     DEBUG(N.Val->dump(CurDAG));
1471   else
1472     DEBUG(ResNode->dump(CurDAG));
1473   DOUT << "\n";
1474   Indent -= 2;
1475 #endif
1476
1477   return ResNode;
1478 }
1479
1480 bool X86DAGToDAGISel::
1481 SelectInlineAsmMemoryOperand(const SDOperand &Op, char ConstraintCode,
1482                              std::vector<SDOperand> &OutOps, SelectionDAG &DAG){
1483   SDOperand Op0, Op1, Op2, Op3;
1484   switch (ConstraintCode) {
1485   case 'o':   // offsetable        ??
1486   case 'v':   // not offsetable    ??
1487   default: return true;
1488   case 'm':   // memory
1489     if (!SelectAddr(Op, Op, Op0, Op1, Op2, Op3))
1490       return true;
1491     break;
1492   }
1493
1494   OutOps.push_back(Op0);
1495   OutOps.push_back(Op1);
1496   OutOps.push_back(Op2);
1497   OutOps.push_back(Op3);
1498   AddToISelQueue(Op0);
1499   AddToISelQueue(Op1);
1500   AddToISelQueue(Op2);
1501   AddToISelQueue(Op3);
1502   return false;
1503 }
1504
1505 /// createX86ISelDag - This pass converts a legalized DAG into a
1506 /// X86-specific DAG, ready for instruction scheduling.
1507 ///
1508 FunctionPass *llvm::createX86ISelDag(X86TargetMachine &TM, bool Fast) {
1509   return new X86DAGToDAGISel(TM, Fast);
1510 }