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