Rename ISD::FLT_ROUNDS to ISD::FLT_ROUNDS_ to avoid conflicting
[oota-llvm.git] / lib / CodeGen / SelectionDAG / SelectionDAGISel.cpp
1 //===-- SelectionDAGISel.cpp - Implement the SelectionDAGISel class -------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file is distributed under the University of Illinois Open Source
6 // License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This implements the SelectionDAGISel class.
11 //
12 //===----------------------------------------------------------------------===//
13
14 #define DEBUG_TYPE "isel"
15 #include "llvm/ADT/BitVector.h"
16 #include "llvm/Analysis/AliasAnalysis.h"
17 #include "llvm/CodeGen/SelectionDAGISel.h"
18 #include "llvm/CodeGen/ScheduleDAG.h"
19 #include "llvm/Constants.h"
20 #include "llvm/CallingConv.h"
21 #include "llvm/DerivedTypes.h"
22 #include "llvm/Function.h"
23 #include "llvm/GlobalVariable.h"
24 #include "llvm/InlineAsm.h"
25 #include "llvm/Instructions.h"
26 #include "llvm/Intrinsics.h"
27 #include "llvm/IntrinsicInst.h"
28 #include "llvm/ParameterAttributes.h"
29 #include "llvm/CodeGen/Collector.h"
30 #include "llvm/CodeGen/MachineFunction.h"
31 #include "llvm/CodeGen/MachineFrameInfo.h"
32 #include "llvm/CodeGen/MachineInstrBuilder.h"
33 #include "llvm/CodeGen/MachineJumpTableInfo.h"
34 #include "llvm/CodeGen/MachineModuleInfo.h"
35 #include "llvm/CodeGen/MachineRegisterInfo.h"
36 #include "llvm/CodeGen/SchedulerRegistry.h"
37 #include "llvm/CodeGen/SelectionDAG.h"
38 #include "llvm/Target/MRegisterInfo.h"
39 #include "llvm/Target/TargetData.h"
40 #include "llvm/Target/TargetFrameInfo.h"
41 #include "llvm/Target/TargetInstrInfo.h"
42 #include "llvm/Target/TargetLowering.h"
43 #include "llvm/Target/TargetMachine.h"
44 #include "llvm/Target/TargetOptions.h"
45 #include "llvm/Support/MathExtras.h"
46 #include "llvm/Support/Debug.h"
47 #include "llvm/Support/Compiler.h"
48 #include <algorithm>
49 using namespace llvm;
50
51 #ifndef NDEBUG
52 static cl::opt<bool>
53 ViewISelDAGs("view-isel-dags", cl::Hidden,
54           cl::desc("Pop up a window to show isel dags as they are selected"));
55 static cl::opt<bool>
56 ViewSchedDAGs("view-sched-dags", cl::Hidden,
57           cl::desc("Pop up a window to show sched dags as they are processed"));
58 static cl::opt<bool>
59 ViewSUnitDAGs("view-sunit-dags", cl::Hidden,
60       cl::desc("Pop up a window to show SUnit dags after they are processed"));
61 #else
62 static const bool ViewISelDAGs = 0, ViewSchedDAGs = 0, ViewSUnitDAGs = 0;
63 #endif
64
65 //===---------------------------------------------------------------------===//
66 ///
67 /// RegisterScheduler class - Track the registration of instruction schedulers.
68 ///
69 //===---------------------------------------------------------------------===//
70 MachinePassRegistry RegisterScheduler::Registry;
71
72 //===---------------------------------------------------------------------===//
73 ///
74 /// ISHeuristic command line option for instruction schedulers.
75 ///
76 //===---------------------------------------------------------------------===//
77 namespace {
78   cl::opt<RegisterScheduler::FunctionPassCtor, false,
79           RegisterPassParser<RegisterScheduler> >
80   ISHeuristic("pre-RA-sched",
81               cl::init(&createDefaultScheduler),
82               cl::desc("Instruction schedulers available (before register"
83                        " allocation):"));
84
85   static RegisterScheduler
86   defaultListDAGScheduler("default", "  Best scheduler for the target",
87                           createDefaultScheduler);
88 } // namespace
89
90 namespace { struct AsmOperandInfo; }
91
92 namespace {
93   /// RegsForValue - This struct represents the physical registers that a
94   /// particular value is assigned and the type information about the value.
95   /// This is needed because values can be promoted into larger registers and
96   /// expanded into multiple smaller registers than the value.
97   struct VISIBILITY_HIDDEN RegsForValue {
98     /// Regs - This list holds the register (for legal and promoted values)
99     /// or register set (for expanded values) that the value should be assigned
100     /// to.
101     std::vector<unsigned> Regs;
102     
103     /// RegVT - The value type of each register.
104     ///
105     MVT::ValueType RegVT;
106     
107     /// ValueVT - The value type of the LLVM value, which may be promoted from
108     /// RegVT or made from merging the two expanded parts.
109     MVT::ValueType ValueVT;
110     
111     RegsForValue() : RegVT(MVT::Other), ValueVT(MVT::Other) {}
112     
113     RegsForValue(unsigned Reg, MVT::ValueType regvt, MVT::ValueType valuevt)
114       : RegVT(regvt), ValueVT(valuevt) {
115         Regs.push_back(Reg);
116     }
117     RegsForValue(const std::vector<unsigned> &regs, 
118                  MVT::ValueType regvt, MVT::ValueType valuevt)
119       : Regs(regs), RegVT(regvt), ValueVT(valuevt) {
120     }
121     
122     /// getCopyFromRegs - Emit a series of CopyFromReg nodes that copies from
123     /// this value and returns the result as a ValueVT value.  This uses 
124     /// Chain/Flag as the input and updates them for the output Chain/Flag.
125     /// If the Flag pointer is NULL, no flag is used.
126     SDOperand getCopyFromRegs(SelectionDAG &DAG,
127                               SDOperand &Chain, SDOperand *Flag) const;
128
129     /// getCopyToRegs - Emit a series of CopyToReg nodes that copies the
130     /// specified value into the registers specified by this object.  This uses 
131     /// Chain/Flag as the input and updates them for the output Chain/Flag.
132     /// If the Flag pointer is NULL, no flag is used.
133     void getCopyToRegs(SDOperand Val, SelectionDAG &DAG,
134                        SDOperand &Chain, SDOperand *Flag) const;
135     
136     /// AddInlineAsmOperands - Add this value to the specified inlineasm node
137     /// operand list.  This adds the code marker and includes the number of 
138     /// values added into it.
139     void AddInlineAsmOperands(unsigned Code, SelectionDAG &DAG,
140                               std::vector<SDOperand> &Ops) const;
141   };
142 }
143
144 namespace llvm {
145   //===--------------------------------------------------------------------===//
146   /// createDefaultScheduler - This creates an instruction scheduler appropriate
147   /// for the target.
148   ScheduleDAG* createDefaultScheduler(SelectionDAGISel *IS,
149                                       SelectionDAG *DAG,
150                                       MachineBasicBlock *BB) {
151     TargetLowering &TLI = IS->getTargetLowering();
152     
153     if (TLI.getSchedulingPreference() == TargetLowering::SchedulingForLatency) {
154       return createTDListDAGScheduler(IS, DAG, BB);
155     } else {
156       assert(TLI.getSchedulingPreference() ==
157            TargetLowering::SchedulingForRegPressure && "Unknown sched type!");
158       return createBURRListDAGScheduler(IS, DAG, BB);
159     }
160   }
161
162
163   //===--------------------------------------------------------------------===//
164   /// FunctionLoweringInfo - This contains information that is global to a
165   /// function that is used when lowering a region of the function.
166   class FunctionLoweringInfo {
167   public:
168     TargetLowering &TLI;
169     Function &Fn;
170     MachineFunction &MF;
171     MachineRegisterInfo &RegInfo;
172
173     FunctionLoweringInfo(TargetLowering &TLI, Function &Fn,MachineFunction &MF);
174
175     /// MBBMap - A mapping from LLVM basic blocks to their machine code entry.
176     std::map<const BasicBlock*, MachineBasicBlock *> MBBMap;
177
178     /// ValueMap - Since we emit code for the function a basic block at a time,
179     /// we must remember which virtual registers hold the values for
180     /// cross-basic-block values.
181     DenseMap<const Value*, unsigned> ValueMap;
182
183     /// StaticAllocaMap - Keep track of frame indices for fixed sized allocas in
184     /// the entry block.  This allows the allocas to be efficiently referenced
185     /// anywhere in the function.
186     std::map<const AllocaInst*, int> StaticAllocaMap;
187
188 #ifndef NDEBUG
189     SmallSet<Instruction*, 8> CatchInfoLost;
190     SmallSet<Instruction*, 8> CatchInfoFound;
191 #endif
192
193     unsigned MakeReg(MVT::ValueType VT) {
194       return RegInfo.createVirtualRegister(TLI.getRegClassFor(VT));
195     }
196     
197     /// isExportedInst - Return true if the specified value is an instruction
198     /// exported from its block.
199     bool isExportedInst(const Value *V) {
200       return ValueMap.count(V);
201     }
202
203     unsigned CreateRegForValue(const Value *V);
204     
205     unsigned InitializeRegForValue(const Value *V) {
206       unsigned &R = ValueMap[V];
207       assert(R == 0 && "Already initialized this value register!");
208       return R = CreateRegForValue(V);
209     }
210   };
211 }
212
213 /// isSelector - Return true if this instruction is a call to the
214 /// eh.selector intrinsic.
215 static bool isSelector(Instruction *I) {
216   if (IntrinsicInst *II = dyn_cast<IntrinsicInst>(I))
217     return (II->getIntrinsicID() == Intrinsic::eh_selector_i32 ||
218             II->getIntrinsicID() == Intrinsic::eh_selector_i64);
219   return false;
220 }
221
222 /// isUsedOutsideOfDefiningBlock - Return true if this instruction is used by
223 /// PHI nodes or outside of the basic block that defines it, or used by a 
224 /// switch instruction, which may expand to multiple basic blocks.
225 static bool isUsedOutsideOfDefiningBlock(Instruction *I) {
226   if (isa<PHINode>(I)) return true;
227   BasicBlock *BB = I->getParent();
228   for (Value::use_iterator UI = I->use_begin(), E = I->use_end(); UI != E; ++UI)
229     if (cast<Instruction>(*UI)->getParent() != BB || isa<PHINode>(*UI) ||
230         // FIXME: Remove switchinst special case.
231         isa<SwitchInst>(*UI))
232       return true;
233   return false;
234 }
235
236 /// isOnlyUsedInEntryBlock - If the specified argument is only used in the
237 /// entry block, return true.  This includes arguments used by switches, since
238 /// the switch may expand into multiple basic blocks.
239 static bool isOnlyUsedInEntryBlock(Argument *A) {
240   BasicBlock *Entry = A->getParent()->begin();
241   for (Value::use_iterator UI = A->use_begin(), E = A->use_end(); UI != E; ++UI)
242     if (cast<Instruction>(*UI)->getParent() != Entry || isa<SwitchInst>(*UI))
243       return false;  // Use not in entry block.
244   return true;
245 }
246
247 FunctionLoweringInfo::FunctionLoweringInfo(TargetLowering &tli,
248                                            Function &fn, MachineFunction &mf)
249     : TLI(tli), Fn(fn), MF(mf), RegInfo(MF.getRegInfo()) {
250
251   // Create a vreg for each argument register that is not dead and is used
252   // outside of the entry block for the function.
253   for (Function::arg_iterator AI = Fn.arg_begin(), E = Fn.arg_end();
254        AI != E; ++AI)
255     if (!isOnlyUsedInEntryBlock(AI))
256       InitializeRegForValue(AI);
257
258   // Initialize the mapping of values to registers.  This is only set up for
259   // instruction values that are used outside of the block that defines
260   // them.
261   Function::iterator BB = Fn.begin(), EB = Fn.end();
262   for (BasicBlock::iterator I = BB->begin(), E = BB->end(); I != E; ++I)
263     if (AllocaInst *AI = dyn_cast<AllocaInst>(I))
264       if (ConstantInt *CUI = dyn_cast<ConstantInt>(AI->getArraySize())) {
265         const Type *Ty = AI->getAllocatedType();
266         uint64_t TySize = TLI.getTargetData()->getABITypeSize(Ty);
267         unsigned Align = 
268           std::max((unsigned)TLI.getTargetData()->getPrefTypeAlignment(Ty),
269                    AI->getAlignment());
270
271         TySize *= CUI->getZExtValue();   // Get total allocated size.
272         if (TySize == 0) TySize = 1; // Don't create zero-sized stack objects.
273         StaticAllocaMap[AI] =
274           MF.getFrameInfo()->CreateStackObject(TySize, Align);
275       }
276
277   for (; BB != EB; ++BB)
278     for (BasicBlock::iterator I = BB->begin(), E = BB->end(); I != E; ++I)
279       if (!I->use_empty() && isUsedOutsideOfDefiningBlock(I))
280         if (!isa<AllocaInst>(I) ||
281             !StaticAllocaMap.count(cast<AllocaInst>(I)))
282           InitializeRegForValue(I);
283
284   // Create an initial MachineBasicBlock for each LLVM BasicBlock in F.  This
285   // also creates the initial PHI MachineInstrs, though none of the input
286   // operands are populated.
287   for (BB = Fn.begin(), EB = Fn.end(); BB != EB; ++BB) {
288     MachineBasicBlock *MBB = new MachineBasicBlock(BB);
289     MBBMap[BB] = MBB;
290     MF.getBasicBlockList().push_back(MBB);
291
292     // Create Machine PHI nodes for LLVM PHI nodes, lowering them as
293     // appropriate.
294     PHINode *PN;
295     for (BasicBlock::iterator I = BB->begin();(PN = dyn_cast<PHINode>(I)); ++I){
296       if (PN->use_empty()) continue;
297       
298       MVT::ValueType VT = TLI.getValueType(PN->getType());
299       unsigned NumRegisters = TLI.getNumRegisters(VT);
300       unsigned PHIReg = ValueMap[PN];
301       assert(PHIReg && "PHI node does not have an assigned virtual register!");
302       const TargetInstrInfo *TII = TLI.getTargetMachine().getInstrInfo();
303       for (unsigned i = 0; i != NumRegisters; ++i)
304         BuildMI(MBB, TII->get(TargetInstrInfo::PHI), PHIReg+i);
305     }
306   }
307 }
308
309 /// CreateRegForValue - Allocate the appropriate number of virtual registers of
310 /// the correctly promoted or expanded types.  Assign these registers
311 /// consecutive vreg numbers and return the first assigned number.
312 unsigned FunctionLoweringInfo::CreateRegForValue(const Value *V) {
313   MVT::ValueType VT = TLI.getValueType(V->getType());
314   
315   unsigned NumRegisters = TLI.getNumRegisters(VT);
316   MVT::ValueType RegisterVT = TLI.getRegisterType(VT);
317
318   unsigned R = MakeReg(RegisterVT);
319   for (unsigned i = 1; i != NumRegisters; ++i)
320     MakeReg(RegisterVT);
321
322   return R;
323 }
324
325 //===----------------------------------------------------------------------===//
326 /// SelectionDAGLowering - This is the common target-independent lowering
327 /// implementation that is parameterized by a TargetLowering object.
328 /// Also, targets can overload any lowering method.
329 ///
330 namespace llvm {
331 class SelectionDAGLowering {
332   MachineBasicBlock *CurMBB;
333
334   DenseMap<const Value*, SDOperand> NodeMap;
335
336   /// PendingLoads - Loads are not emitted to the program immediately.  We bunch
337   /// them up and then emit token factor nodes when possible.  This allows us to
338   /// get simple disambiguation between loads without worrying about alias
339   /// analysis.
340   std::vector<SDOperand> PendingLoads;
341
342   /// Case - A struct to record the Value for a switch case, and the
343   /// case's target basic block.
344   struct Case {
345     Constant* Low;
346     Constant* High;
347     MachineBasicBlock* BB;
348
349     Case() : Low(0), High(0), BB(0) { }
350     Case(Constant* low, Constant* high, MachineBasicBlock* bb) :
351       Low(low), High(high), BB(bb) { }
352     uint64_t size() const {
353       uint64_t rHigh = cast<ConstantInt>(High)->getSExtValue();
354       uint64_t rLow  = cast<ConstantInt>(Low)->getSExtValue();
355       return (rHigh - rLow + 1ULL);
356     }
357   };
358
359   struct CaseBits {
360     uint64_t Mask;
361     MachineBasicBlock* BB;
362     unsigned Bits;
363
364     CaseBits(uint64_t mask, MachineBasicBlock* bb, unsigned bits):
365       Mask(mask), BB(bb), Bits(bits) { }
366   };
367
368   typedef std::vector<Case>           CaseVector;
369   typedef std::vector<CaseBits>       CaseBitsVector;
370   typedef CaseVector::iterator        CaseItr;
371   typedef std::pair<CaseItr, CaseItr> CaseRange;
372
373   /// CaseRec - A struct with ctor used in lowering switches to a binary tree
374   /// of conditional branches.
375   struct CaseRec {
376     CaseRec(MachineBasicBlock *bb, Constant *lt, Constant *ge, CaseRange r) :
377     CaseBB(bb), LT(lt), GE(ge), Range(r) {}
378
379     /// CaseBB - The MBB in which to emit the compare and branch
380     MachineBasicBlock *CaseBB;
381     /// LT, GE - If nonzero, we know the current case value must be less-than or
382     /// greater-than-or-equal-to these Constants.
383     Constant *LT;
384     Constant *GE;
385     /// Range - A pair of iterators representing the range of case values to be
386     /// processed at this point in the binary search tree.
387     CaseRange Range;
388   };
389
390   typedef std::vector<CaseRec> CaseRecVector;
391
392   /// The comparison function for sorting the switch case values in the vector.
393   /// WARNING: Case ranges should be disjoint!
394   struct CaseCmp {
395     bool operator () (const Case& C1, const Case& C2) {
396       assert(isa<ConstantInt>(C1.Low) && isa<ConstantInt>(C2.High));
397       const ConstantInt* CI1 = cast<const ConstantInt>(C1.Low);
398       const ConstantInt* CI2 = cast<const ConstantInt>(C2.High);
399       return CI1->getValue().slt(CI2->getValue());
400     }
401   };
402
403   struct CaseBitsCmp {
404     bool operator () (const CaseBits& C1, const CaseBits& C2) {
405       return C1.Bits > C2.Bits;
406     }
407   };
408
409   unsigned Clusterify(CaseVector& Cases, const SwitchInst &SI);
410   
411 public:
412   // TLI - This is information that describes the available target features we
413   // need for lowering.  This indicates when operations are unavailable,
414   // implemented with a libcall, etc.
415   TargetLowering &TLI;
416   SelectionDAG &DAG;
417   const TargetData *TD;
418   AliasAnalysis &AA;
419
420   /// SwitchCases - Vector of CaseBlock structures used to communicate
421   /// SwitchInst code generation information.
422   std::vector<SelectionDAGISel::CaseBlock> SwitchCases;
423   /// JTCases - Vector of JumpTable structures used to communicate
424   /// SwitchInst code generation information.
425   std::vector<SelectionDAGISel::JumpTableBlock> JTCases;
426   std::vector<SelectionDAGISel::BitTestBlock> BitTestCases;
427   
428   /// FuncInfo - Information about the function as a whole.
429   ///
430   FunctionLoweringInfo &FuncInfo;
431   
432   /// GCI - Garbage collection metadata for the function.
433   CollectorMetadata *GCI;
434
435   SelectionDAGLowering(SelectionDAG &dag, TargetLowering &tli,
436                        AliasAnalysis &aa,
437                        FunctionLoweringInfo &funcinfo,
438                        CollectorMetadata *gci)
439     : TLI(tli), DAG(dag), TD(DAG.getTarget().getTargetData()), AA(aa),
440       FuncInfo(funcinfo), GCI(gci) {
441   }
442
443   /// getRoot - Return the current virtual root of the Selection DAG.
444   ///
445   SDOperand getRoot() {
446     if (PendingLoads.empty())
447       return DAG.getRoot();
448
449     if (PendingLoads.size() == 1) {
450       SDOperand Root = PendingLoads[0];
451       DAG.setRoot(Root);
452       PendingLoads.clear();
453       return Root;
454     }
455
456     // Otherwise, we have to make a token factor node.
457     SDOperand Root = DAG.getNode(ISD::TokenFactor, MVT::Other,
458                                  &PendingLoads[0], PendingLoads.size());
459     PendingLoads.clear();
460     DAG.setRoot(Root);
461     return Root;
462   }
463
464   SDOperand CopyValueToVirtualRegister(Value *V, unsigned Reg);
465
466   void visit(Instruction &I) { visit(I.getOpcode(), I); }
467
468   void visit(unsigned Opcode, User &I) {
469     // Note: this doesn't use InstVisitor, because it has to work with
470     // ConstantExpr's in addition to instructions.
471     switch (Opcode) {
472     default: assert(0 && "Unknown instruction type encountered!");
473              abort();
474       // Build the switch statement using the Instruction.def file.
475 #define HANDLE_INST(NUM, OPCODE, CLASS) \
476     case Instruction::OPCODE:return visit##OPCODE((CLASS&)I);
477 #include "llvm/Instruction.def"
478     }
479   }
480
481   void setCurrentBasicBlock(MachineBasicBlock *MBB) { CurMBB = MBB; }
482
483   SDOperand getLoadFrom(const Type *Ty, SDOperand Ptr,
484                         const Value *SV, SDOperand Root,
485                         bool isVolatile, unsigned Alignment);
486
487   SDOperand getValue(const Value *V);
488
489   void setValue(const Value *V, SDOperand NewN) {
490     SDOperand &N = NodeMap[V];
491     assert(N.Val == 0 && "Already set a value for this node!");
492     N = NewN;
493   }
494   
495   void GetRegistersForValue(AsmOperandInfo &OpInfo, bool HasEarlyClobber,
496                             std::set<unsigned> &OutputRegs, 
497                             std::set<unsigned> &InputRegs);
498
499   void FindMergedConditions(Value *Cond, MachineBasicBlock *TBB,
500                             MachineBasicBlock *FBB, MachineBasicBlock *CurBB,
501                             unsigned Opc);
502   bool isExportableFromCurrentBlock(Value *V, const BasicBlock *FromBB);
503   void ExportFromCurrentBlock(Value *V);
504   void LowerCallTo(CallSite CS, SDOperand Callee, bool IsTailCall,
505                    MachineBasicBlock *LandingPad = NULL);
506
507   // Terminator instructions.
508   void visitRet(ReturnInst &I);
509   void visitBr(BranchInst &I);
510   void visitSwitch(SwitchInst &I);
511   void visitUnreachable(UnreachableInst &I) { /* noop */ }
512
513   // Helpers for visitSwitch
514   bool handleSmallSwitchRange(CaseRec& CR,
515                               CaseRecVector& WorkList,
516                               Value* SV,
517                               MachineBasicBlock* Default);
518   bool handleJTSwitchCase(CaseRec& CR,
519                           CaseRecVector& WorkList,
520                           Value* SV,
521                           MachineBasicBlock* Default);
522   bool handleBTSplitSwitchCase(CaseRec& CR,
523                                CaseRecVector& WorkList,
524                                Value* SV,
525                                MachineBasicBlock* Default);
526   bool handleBitTestsSwitchCase(CaseRec& CR,
527                                 CaseRecVector& WorkList,
528                                 Value* SV,
529                                 MachineBasicBlock* Default);  
530   void visitSwitchCase(SelectionDAGISel::CaseBlock &CB);
531   void visitBitTestHeader(SelectionDAGISel::BitTestBlock &B);
532   void visitBitTestCase(MachineBasicBlock* NextMBB,
533                         unsigned Reg,
534                         SelectionDAGISel::BitTestCase &B);
535   void visitJumpTable(SelectionDAGISel::JumpTable &JT);
536   void visitJumpTableHeader(SelectionDAGISel::JumpTable &JT,
537                             SelectionDAGISel::JumpTableHeader &JTH);
538   
539   // These all get lowered before this pass.
540   void visitInvoke(InvokeInst &I);
541   void visitUnwind(UnwindInst &I);
542
543   void visitBinary(User &I, unsigned OpCode);
544   void visitShift(User &I, unsigned Opcode);
545   void visitAdd(User &I) { 
546     if (I.getType()->isFPOrFPVector())
547       visitBinary(I, ISD::FADD);
548     else
549       visitBinary(I, ISD::ADD);
550   }
551   void visitSub(User &I);
552   void visitMul(User &I) {
553     if (I.getType()->isFPOrFPVector())
554       visitBinary(I, ISD::FMUL);
555     else
556       visitBinary(I, ISD::MUL);
557   }
558   void visitURem(User &I) { visitBinary(I, ISD::UREM); }
559   void visitSRem(User &I) { visitBinary(I, ISD::SREM); }
560   void visitFRem(User &I) { visitBinary(I, ISD::FREM); }
561   void visitUDiv(User &I) { visitBinary(I, ISD::UDIV); }
562   void visitSDiv(User &I) { visitBinary(I, ISD::SDIV); }
563   void visitFDiv(User &I) { visitBinary(I, ISD::FDIV); }
564   void visitAnd (User &I) { visitBinary(I, ISD::AND); }
565   void visitOr  (User &I) { visitBinary(I, ISD::OR); }
566   void visitXor (User &I) { visitBinary(I, ISD::XOR); }
567   void visitShl (User &I) { visitShift(I, ISD::SHL); }
568   void visitLShr(User &I) { visitShift(I, ISD::SRL); }
569   void visitAShr(User &I) { visitShift(I, ISD::SRA); }
570   void visitICmp(User &I);
571   void visitFCmp(User &I);
572   // Visit the conversion instructions
573   void visitTrunc(User &I);
574   void visitZExt(User &I);
575   void visitSExt(User &I);
576   void visitFPTrunc(User &I);
577   void visitFPExt(User &I);
578   void visitFPToUI(User &I);
579   void visitFPToSI(User &I);
580   void visitUIToFP(User &I);
581   void visitSIToFP(User &I);
582   void visitPtrToInt(User &I);
583   void visitIntToPtr(User &I);
584   void visitBitCast(User &I);
585
586   void visitExtractElement(User &I);
587   void visitInsertElement(User &I);
588   void visitShuffleVector(User &I);
589
590   void visitGetElementPtr(User &I);
591   void visitSelect(User &I);
592
593   void visitMalloc(MallocInst &I);
594   void visitFree(FreeInst &I);
595   void visitAlloca(AllocaInst &I);
596   void visitLoad(LoadInst &I);
597   void visitStore(StoreInst &I);
598   void visitPHI(PHINode &I) { } // PHI nodes are handled specially.
599   void visitCall(CallInst &I);
600   void visitInlineAsm(CallSite CS);
601   const char *visitIntrinsicCall(CallInst &I, unsigned Intrinsic);
602   void visitTargetIntrinsic(CallInst &I, unsigned Intrinsic);
603
604   void visitVAStart(CallInst &I);
605   void visitVAArg(VAArgInst &I);
606   void visitVAEnd(CallInst &I);
607   void visitVACopy(CallInst &I);
608
609   void visitMemIntrinsic(CallInst &I, unsigned Op);
610
611   void visitUserOp1(Instruction &I) {
612     assert(0 && "UserOp1 should not exist at instruction selection time!");
613     abort();
614   }
615   void visitUserOp2(Instruction &I) {
616     assert(0 && "UserOp2 should not exist at instruction selection time!");
617     abort();
618   }
619 };
620 } // end namespace llvm
621
622
623 /// getCopyFromParts - Create a value that contains the
624 /// specified legal parts combined into the value they represent.
625 static SDOperand getCopyFromParts(SelectionDAG &DAG,
626                                   const SDOperand *Parts,
627                                   unsigned NumParts,
628                                   MVT::ValueType PartVT,
629                                   MVT::ValueType ValueVT,
630                                   ISD::NodeType AssertOp = ISD::DELETED_NODE) {
631   if (!MVT::isVector(ValueVT) || NumParts == 1) {
632     SDOperand Val = Parts[0];
633
634     // If the value was expanded, copy from the top part.
635     if (NumParts > 1) {
636       assert(NumParts == 2 &&
637              "Cannot expand to more than 2 elts yet!");
638       SDOperand Hi = Parts[1];
639       if (!DAG.getTargetLoweringInfo().isLittleEndian())
640         std::swap(Val, Hi);
641       return DAG.getNode(ISD::BUILD_PAIR, ValueVT, Val, Hi);
642     }
643
644     // Otherwise, if the value was promoted or extended, truncate it to the
645     // appropriate type.
646     if (PartVT == ValueVT)
647       return Val;
648   
649     if (MVT::isVector(PartVT)) {
650       assert(MVT::isVector(ValueVT) && "Unknown vector conversion!");
651       return DAG.getNode(ISD::BIT_CONVERT, ValueVT, Val);
652     }
653   
654     if (MVT::isVector(ValueVT)) {
655       assert(NumParts == 1 &&
656              MVT::getVectorElementType(ValueVT) == PartVT &&
657              MVT::getVectorNumElements(ValueVT) == 1 &&
658              "Only trivial scalar-to-vector conversions should get here!");
659       return DAG.getNode(ISD::BUILD_VECTOR, ValueVT, Val);
660     }
661   
662     if (MVT::isInteger(PartVT) &&
663         MVT::isInteger(ValueVT)) {
664       if (ValueVT < PartVT) {
665         // For a truncate, see if we have any information to
666         // indicate whether the truncated bits will always be
667         // zero or sign-extension.
668         if (AssertOp != ISD::DELETED_NODE)
669           Val = DAG.getNode(AssertOp, PartVT, Val,
670                             DAG.getValueType(ValueVT));
671         return DAG.getNode(ISD::TRUNCATE, ValueVT, Val);
672       } else {
673         return DAG.getNode(ISD::ANY_EXTEND, ValueVT, Val);
674       }
675     }
676   
677     if (MVT::isFloatingPoint(PartVT) && MVT::isFloatingPoint(ValueVT))
678       return DAG.getNode(ISD::FP_ROUND, ValueVT, Val, DAG.getIntPtrConstant(0));
679
680     if (MVT::getSizeInBits(PartVT) == MVT::getSizeInBits(ValueVT))
681       return DAG.getNode(ISD::BIT_CONVERT, ValueVT, Val);
682
683     assert(0 && "Unknown mismatch!");
684   }
685
686   // Handle a multi-element vector.
687   MVT::ValueType IntermediateVT, RegisterVT;
688   unsigned NumIntermediates;
689   unsigned NumRegs =
690     DAG.getTargetLoweringInfo()
691       .getVectorTypeBreakdown(ValueVT, IntermediateVT, NumIntermediates,
692                               RegisterVT);
693
694   assert(NumRegs == NumParts && "Part count doesn't match vector breakdown!");
695   assert(RegisterVT == PartVT && "Part type doesn't match vector breakdown!");
696   assert(RegisterVT == Parts[0].getValueType() &&
697          "Part type doesn't match part!");
698
699   // Assemble the parts into intermediate operands.
700   SmallVector<SDOperand, 8> Ops(NumIntermediates);
701   if (NumIntermediates == NumParts) {
702     // If the register was not expanded, truncate or copy the value,
703     // as appropriate.
704     for (unsigned i = 0; i != NumParts; ++i)
705       Ops[i] = getCopyFromParts(DAG, &Parts[i], 1,
706                                 PartVT, IntermediateVT);
707   } else if (NumParts > 0) {
708     // If the intermediate type was expanded, build the intermediate operands
709     // from the parts.
710     assert(NumParts % NumIntermediates == 0 &&
711            "Must expand into a divisible number of parts!");
712     unsigned Factor = NumParts / NumIntermediates;
713     for (unsigned i = 0; i != NumIntermediates; ++i)
714       Ops[i] = getCopyFromParts(DAG, &Parts[i * Factor], Factor,
715                                 PartVT, IntermediateVT);
716   }
717   
718   // Build a vector with BUILD_VECTOR or CONCAT_VECTORS from the intermediate
719   // operands.
720   return DAG.getNode(MVT::isVector(IntermediateVT) ?
721                        ISD::CONCAT_VECTORS :
722                        ISD::BUILD_VECTOR,
723                      ValueVT, &Ops[0], NumIntermediates);
724 }
725
726 /// getCopyToParts - Create a series of nodes that contain the
727 /// specified value split into legal parts.
728 static void getCopyToParts(SelectionDAG &DAG,
729                            SDOperand Val,
730                            SDOperand *Parts,
731                            unsigned NumParts,
732                            MVT::ValueType PartVT) {
733   TargetLowering &TLI = DAG.getTargetLoweringInfo();
734   MVT::ValueType PtrVT = TLI.getPointerTy();
735   MVT::ValueType ValueVT = Val.getValueType();
736
737   if (!MVT::isVector(ValueVT) || NumParts == 1) {
738     // If the value was expanded, copy from the parts.
739     if (NumParts > 1) {
740       for (unsigned i = 0; i != NumParts; ++i)
741         Parts[i] = DAG.getNode(ISD::EXTRACT_ELEMENT, PartVT, Val,
742                                DAG.getConstant(i, PtrVT));
743       if (!DAG.getTargetLoweringInfo().isLittleEndian())
744         std::reverse(Parts, Parts + NumParts);
745       return;
746     }
747
748     // If there is a single part and the types differ, this must be
749     // a promotion.
750     if (PartVT != ValueVT) {
751       if (MVT::isVector(PartVT)) {
752         assert(MVT::isVector(ValueVT) &&
753                "Not a vector-vector cast?");
754         Val = DAG.getNode(ISD::BIT_CONVERT, PartVT, Val);
755       } else if (MVT::isVector(ValueVT)) {
756         assert(NumParts == 1 &&
757                MVT::getVectorElementType(ValueVT) == PartVT &&
758                MVT::getVectorNumElements(ValueVT) == 1 &&
759                "Only trivial vector-to-scalar conversions should get here!");
760         Val = DAG.getNode(ISD::EXTRACT_VECTOR_ELT, PartVT, Val,
761                           DAG.getConstant(0, PtrVT));
762       } else if (MVT::isInteger(PartVT) && MVT::isInteger(ValueVT)) {
763         if (PartVT < ValueVT)
764           Val = DAG.getNode(ISD::TRUNCATE, PartVT, Val);
765         else
766           Val = DAG.getNode(ISD::ANY_EXTEND, PartVT, Val);
767       } else if (MVT::isFloatingPoint(PartVT) &&
768                  MVT::isFloatingPoint(ValueVT)) {
769         Val = DAG.getNode(ISD::FP_EXTEND, PartVT, Val);
770       } else if (MVT::getSizeInBits(PartVT) == 
771                  MVT::getSizeInBits(ValueVT)) {
772         Val = DAG.getNode(ISD::BIT_CONVERT, PartVT, Val);
773       } else {
774         assert(0 && "Unknown mismatch!");
775       }
776     }
777     Parts[0] = Val;
778     return;
779   }
780
781   // Handle a multi-element vector.
782   MVT::ValueType IntermediateVT, RegisterVT;
783   unsigned NumIntermediates;
784   unsigned NumRegs =
785     DAG.getTargetLoweringInfo()
786       .getVectorTypeBreakdown(ValueVT, IntermediateVT, NumIntermediates,
787                               RegisterVT);
788   unsigned NumElements = MVT::getVectorNumElements(ValueVT);
789
790   assert(NumRegs == NumParts && "Part count doesn't match vector breakdown!");
791   assert(RegisterVT == PartVT && "Part type doesn't match vector breakdown!");
792
793   // Split the vector into intermediate operands.
794   SmallVector<SDOperand, 8> Ops(NumIntermediates);
795   for (unsigned i = 0; i != NumIntermediates; ++i)
796     if (MVT::isVector(IntermediateVT))
797       Ops[i] = DAG.getNode(ISD::EXTRACT_SUBVECTOR,
798                            IntermediateVT, Val,
799                            DAG.getConstant(i * (NumElements / NumIntermediates),
800                                            PtrVT));
801     else
802       Ops[i] = DAG.getNode(ISD::EXTRACT_VECTOR_ELT,
803                            IntermediateVT, Val, 
804                            DAG.getConstant(i, PtrVT));
805
806   // Split the intermediate operands into legal parts.
807   if (NumParts == NumIntermediates) {
808     // If the register was not expanded, promote or copy the value,
809     // as appropriate.
810     for (unsigned i = 0; i != NumParts; ++i)
811       getCopyToParts(DAG, Ops[i], &Parts[i], 1, PartVT);
812   } else if (NumParts > 0) {
813     // If the intermediate type was expanded, split each the value into
814     // legal parts.
815     assert(NumParts % NumIntermediates == 0 &&
816            "Must expand into a divisible number of parts!");
817     unsigned Factor = NumParts / NumIntermediates;
818     for (unsigned i = 0; i != NumIntermediates; ++i)
819       getCopyToParts(DAG, Ops[i], &Parts[i * Factor], Factor, PartVT);
820   }
821 }
822
823
824 SDOperand SelectionDAGLowering::getValue(const Value *V) {
825   SDOperand &N = NodeMap[V];
826   if (N.Val) return N;
827   
828   const Type *VTy = V->getType();
829   MVT::ValueType VT = TLI.getValueType(VTy);
830   if (Constant *C = const_cast<Constant*>(dyn_cast<Constant>(V))) {
831     if (ConstantExpr *CE = dyn_cast<ConstantExpr>(C)) {
832       visit(CE->getOpcode(), *CE);
833       SDOperand N1 = NodeMap[V];
834       assert(N1.Val && "visit didn't populate the ValueMap!");
835       return N1;
836     } else if (GlobalValue *GV = dyn_cast<GlobalValue>(C)) {
837       return N = DAG.getGlobalAddress(GV, VT);
838     } else if (isa<ConstantPointerNull>(C)) {
839       return N = DAG.getConstant(0, TLI.getPointerTy());
840     } else if (isa<UndefValue>(C)) {
841       if (!isa<VectorType>(VTy))
842         return N = DAG.getNode(ISD::UNDEF, VT);
843
844       // Create a BUILD_VECTOR of undef nodes.
845       const VectorType *PTy = cast<VectorType>(VTy);
846       unsigned NumElements = PTy->getNumElements();
847       MVT::ValueType PVT = TLI.getValueType(PTy->getElementType());
848
849       SmallVector<SDOperand, 8> Ops;
850       Ops.assign(NumElements, DAG.getNode(ISD::UNDEF, PVT));
851       
852       // Create a VConstant node with generic Vector type.
853       MVT::ValueType VT = MVT::getVectorType(PVT, NumElements);
854       return N = DAG.getNode(ISD::BUILD_VECTOR, VT,
855                              &Ops[0], Ops.size());
856     } else if (ConstantFP *CFP = dyn_cast<ConstantFP>(C)) {
857       return N = DAG.getConstantFP(CFP->getValueAPF(), VT);
858     } else if (const VectorType *PTy = dyn_cast<VectorType>(VTy)) {
859       unsigned NumElements = PTy->getNumElements();
860       MVT::ValueType PVT = TLI.getValueType(PTy->getElementType());
861       
862       // Now that we know the number and type of the elements, push a
863       // Constant or ConstantFP node onto the ops list for each element of
864       // the vector constant.
865       SmallVector<SDOperand, 8> Ops;
866       if (ConstantVector *CP = dyn_cast<ConstantVector>(C)) {
867         for (unsigned i = 0; i != NumElements; ++i)
868           Ops.push_back(getValue(CP->getOperand(i)));
869       } else {
870         assert(isa<ConstantAggregateZero>(C) && "Unknown vector constant!");
871         SDOperand Op;
872         if (MVT::isFloatingPoint(PVT))
873           Op = DAG.getConstantFP(0, PVT);
874         else
875           Op = DAG.getConstant(0, PVT);
876         Ops.assign(NumElements, Op);
877       }
878       
879       // Create a BUILD_VECTOR node.
880       MVT::ValueType VT = MVT::getVectorType(PVT, NumElements);
881       return NodeMap[V] = DAG.getNode(ISD::BUILD_VECTOR, VT, &Ops[0],
882                                       Ops.size());
883     } else {
884       // Canonicalize all constant ints to be unsigned.
885       return N = DAG.getConstant(cast<ConstantInt>(C)->getZExtValue(),VT);
886     }
887   }
888       
889   if (const AllocaInst *AI = dyn_cast<AllocaInst>(V)) {
890     std::map<const AllocaInst*, int>::iterator SI =
891     FuncInfo.StaticAllocaMap.find(AI);
892     if (SI != FuncInfo.StaticAllocaMap.end())
893       return DAG.getFrameIndex(SI->second, TLI.getPointerTy());
894   }
895       
896   unsigned InReg = FuncInfo.ValueMap[V];
897   assert(InReg && "Value not in map!");
898   
899   MVT::ValueType RegisterVT = TLI.getRegisterType(VT);
900   unsigned NumRegs = TLI.getNumRegisters(VT);
901
902   std::vector<unsigned> Regs(NumRegs);
903   for (unsigned i = 0; i != NumRegs; ++i)
904     Regs[i] = InReg + i;
905
906   RegsForValue RFV(Regs, RegisterVT, VT);
907   SDOperand Chain = DAG.getEntryNode();
908
909   return RFV.getCopyFromRegs(DAG, Chain, NULL);
910 }
911
912
913 void SelectionDAGLowering::visitRet(ReturnInst &I) {
914   if (I.getNumOperands() == 0) {
915     DAG.setRoot(DAG.getNode(ISD::RET, MVT::Other, getRoot()));
916     return;
917   }
918   SmallVector<SDOperand, 8> NewValues;
919   NewValues.push_back(getRoot());
920   for (unsigned i = 0, e = I.getNumOperands(); i != e; ++i) {
921     SDOperand RetOp = getValue(I.getOperand(i));
922     
923     // If this is an integer return value, we need to promote it ourselves to
924     // the full width of a register, since getCopyToParts and Legalize will use
925     // ANY_EXTEND rather than sign/zero.
926     // FIXME: C calling convention requires the return type to be promoted to
927     // at least 32-bit. But this is not necessary for non-C calling conventions.
928     if (MVT::isInteger(RetOp.getValueType()) && 
929         RetOp.getValueType() < MVT::i64) {
930       MVT::ValueType TmpVT;
931       if (TLI.getTypeAction(MVT::i32) == TargetLowering::Promote)
932         TmpVT = TLI.getTypeToTransformTo(MVT::i32);
933       else
934         TmpVT = MVT::i32;
935       const Function *F = I.getParent()->getParent();
936       ISD::NodeType ExtendKind = ISD::ANY_EXTEND;
937       if (F->paramHasAttr(0, ParamAttr::SExt))
938         ExtendKind = ISD::SIGN_EXTEND;
939       if (F->paramHasAttr(0, ParamAttr::ZExt))
940         ExtendKind = ISD::ZERO_EXTEND;
941       RetOp = DAG.getNode(ExtendKind, TmpVT, RetOp);
942       NewValues.push_back(RetOp);
943       NewValues.push_back(DAG.getConstant(false, MVT::i32));
944     } else {
945       MVT::ValueType VT = RetOp.getValueType();
946       unsigned NumParts = TLI.getNumRegisters(VT);
947       MVT::ValueType PartVT = TLI.getRegisterType(VT);
948       SmallVector<SDOperand, 4> Parts(NumParts);
949       getCopyToParts(DAG, RetOp, &Parts[0], NumParts, PartVT);
950       for (unsigned i = 0; i < NumParts; ++i) {
951         NewValues.push_back(Parts[i]);
952         NewValues.push_back(DAG.getConstant(false, MVT::i32));
953       }
954     }
955   }
956   DAG.setRoot(DAG.getNode(ISD::RET, MVT::Other,
957                           &NewValues[0], NewValues.size()));
958 }
959
960 /// ExportFromCurrentBlock - If this condition isn't known to be exported from
961 /// the current basic block, add it to ValueMap now so that we'll get a
962 /// CopyTo/FromReg.
963 void SelectionDAGLowering::ExportFromCurrentBlock(Value *V) {
964   // No need to export constants.
965   if (!isa<Instruction>(V) && !isa<Argument>(V)) return;
966   
967   // Already exported?
968   if (FuncInfo.isExportedInst(V)) return;
969
970   unsigned Reg = FuncInfo.InitializeRegForValue(V);
971   PendingLoads.push_back(CopyValueToVirtualRegister(V, Reg));
972 }
973
974 bool SelectionDAGLowering::isExportableFromCurrentBlock(Value *V,
975                                                     const BasicBlock *FromBB) {
976   // The operands of the setcc have to be in this block.  We don't know
977   // how to export them from some other block.
978   if (Instruction *VI = dyn_cast<Instruction>(V)) {
979     // Can export from current BB.
980     if (VI->getParent() == FromBB)
981       return true;
982     
983     // Is already exported, noop.
984     return FuncInfo.isExportedInst(V);
985   }
986   
987   // If this is an argument, we can export it if the BB is the entry block or
988   // if it is already exported.
989   if (isa<Argument>(V)) {
990     if (FromBB == &FromBB->getParent()->getEntryBlock())
991       return true;
992
993     // Otherwise, can only export this if it is already exported.
994     return FuncInfo.isExportedInst(V);
995   }
996   
997   // Otherwise, constants can always be exported.
998   return true;
999 }
1000
1001 static bool InBlock(const Value *V, const BasicBlock *BB) {
1002   if (const Instruction *I = dyn_cast<Instruction>(V))
1003     return I->getParent() == BB;
1004   return true;
1005 }
1006
1007 /// FindMergedConditions - If Cond is an expression like 
1008 void SelectionDAGLowering::FindMergedConditions(Value *Cond,
1009                                                 MachineBasicBlock *TBB,
1010                                                 MachineBasicBlock *FBB,
1011                                                 MachineBasicBlock *CurBB,
1012                                                 unsigned Opc) {
1013   // If this node is not part of the or/and tree, emit it as a branch.
1014   Instruction *BOp = dyn_cast<Instruction>(Cond);
1015
1016   if (!BOp || !(isa<BinaryOperator>(BOp) || isa<CmpInst>(BOp)) || 
1017       (unsigned)BOp->getOpcode() != Opc || !BOp->hasOneUse() ||
1018       BOp->getParent() != CurBB->getBasicBlock() ||
1019       !InBlock(BOp->getOperand(0), CurBB->getBasicBlock()) ||
1020       !InBlock(BOp->getOperand(1), CurBB->getBasicBlock())) {
1021     const BasicBlock *BB = CurBB->getBasicBlock();
1022     
1023     // If the leaf of the tree is a comparison, merge the condition into 
1024     // the caseblock.
1025     if ((isa<ICmpInst>(Cond) || isa<FCmpInst>(Cond)) &&
1026         // The operands of the cmp have to be in this block.  We don't know
1027         // how to export them from some other block.  If this is the first block
1028         // of the sequence, no exporting is needed.
1029         (CurBB == CurMBB ||
1030          (isExportableFromCurrentBlock(BOp->getOperand(0), BB) &&
1031           isExportableFromCurrentBlock(BOp->getOperand(1), BB)))) {
1032       BOp = cast<Instruction>(Cond);
1033       ISD::CondCode Condition;
1034       if (ICmpInst *IC = dyn_cast<ICmpInst>(Cond)) {
1035         switch (IC->getPredicate()) {
1036         default: assert(0 && "Unknown icmp predicate opcode!");
1037         case ICmpInst::ICMP_EQ:  Condition = ISD::SETEQ;  break;
1038         case ICmpInst::ICMP_NE:  Condition = ISD::SETNE;  break;
1039         case ICmpInst::ICMP_SLE: Condition = ISD::SETLE;  break;
1040         case ICmpInst::ICMP_ULE: Condition = ISD::SETULE; break;
1041         case ICmpInst::ICMP_SGE: Condition = ISD::SETGE;  break;
1042         case ICmpInst::ICMP_UGE: Condition = ISD::SETUGE; break;
1043         case ICmpInst::ICMP_SLT: Condition = ISD::SETLT;  break;
1044         case ICmpInst::ICMP_ULT: Condition = ISD::SETULT; break;
1045         case ICmpInst::ICMP_SGT: Condition = ISD::SETGT;  break;
1046         case ICmpInst::ICMP_UGT: Condition = ISD::SETUGT; break;
1047         }
1048       } else if (FCmpInst *FC = dyn_cast<FCmpInst>(Cond)) {
1049         ISD::CondCode FPC, FOC;
1050         switch (FC->getPredicate()) {
1051         default: assert(0 && "Unknown fcmp predicate opcode!");
1052         case FCmpInst::FCMP_FALSE: FOC = FPC = ISD::SETFALSE; break;
1053         case FCmpInst::FCMP_OEQ:   FOC = ISD::SETEQ; FPC = ISD::SETOEQ; break;
1054         case FCmpInst::FCMP_OGT:   FOC = ISD::SETGT; FPC = ISD::SETOGT; break;
1055         case FCmpInst::FCMP_OGE:   FOC = ISD::SETGE; FPC = ISD::SETOGE; break;
1056         case FCmpInst::FCMP_OLT:   FOC = ISD::SETLT; FPC = ISD::SETOLT; break;
1057         case FCmpInst::FCMP_OLE:   FOC = ISD::SETLE; FPC = ISD::SETOLE; break;
1058         case FCmpInst::FCMP_ONE:   FOC = ISD::SETNE; FPC = ISD::SETONE; break;
1059         case FCmpInst::FCMP_ORD:   FOC = ISD::SETEQ; FPC = ISD::SETO;   break;
1060         case FCmpInst::FCMP_UNO:   FOC = ISD::SETNE; FPC = ISD::SETUO;  break;
1061         case FCmpInst::FCMP_UEQ:   FOC = ISD::SETEQ; FPC = ISD::SETUEQ; break;
1062         case FCmpInst::FCMP_UGT:   FOC = ISD::SETGT; FPC = ISD::SETUGT; break;
1063         case FCmpInst::FCMP_UGE:   FOC = ISD::SETGE; FPC = ISD::SETUGE; break;
1064         case FCmpInst::FCMP_ULT:   FOC = ISD::SETLT; FPC = ISD::SETULT; break;
1065         case FCmpInst::FCMP_ULE:   FOC = ISD::SETLE; FPC = ISD::SETULE; break;
1066         case FCmpInst::FCMP_UNE:   FOC = ISD::SETNE; FPC = ISD::SETUNE; break;
1067         case FCmpInst::FCMP_TRUE:  FOC = FPC = ISD::SETTRUE; break;
1068         }
1069         if (FiniteOnlyFPMath())
1070           Condition = FOC;
1071         else 
1072           Condition = FPC;
1073       } else {
1074         Condition = ISD::SETEQ; // silence warning.
1075         assert(0 && "Unknown compare instruction");
1076       }
1077       
1078       SelectionDAGISel::CaseBlock CB(Condition, BOp->getOperand(0), 
1079                                      BOp->getOperand(1), NULL, TBB, FBB, CurBB);
1080       SwitchCases.push_back(CB);
1081       return;
1082     }
1083     
1084     // Create a CaseBlock record representing this branch.
1085     SelectionDAGISel::CaseBlock CB(ISD::SETEQ, Cond, ConstantInt::getTrue(),
1086                                    NULL, TBB, FBB, CurBB);
1087     SwitchCases.push_back(CB);
1088     return;
1089   }
1090   
1091   
1092   //  Create TmpBB after CurBB.
1093   MachineFunction::iterator BBI = CurBB;
1094   MachineBasicBlock *TmpBB = new MachineBasicBlock(CurBB->getBasicBlock());
1095   CurBB->getParent()->getBasicBlockList().insert(++BBI, TmpBB);
1096   
1097   if (Opc == Instruction::Or) {
1098     // Codegen X | Y as:
1099     //   jmp_if_X TBB
1100     //   jmp TmpBB
1101     // TmpBB:
1102     //   jmp_if_Y TBB
1103     //   jmp FBB
1104     //
1105   
1106     // Emit the LHS condition.
1107     FindMergedConditions(BOp->getOperand(0), TBB, TmpBB, CurBB, Opc);
1108   
1109     // Emit the RHS condition into TmpBB.
1110     FindMergedConditions(BOp->getOperand(1), TBB, FBB, TmpBB, Opc);
1111   } else {
1112     assert(Opc == Instruction::And && "Unknown merge op!");
1113     // Codegen X & Y as:
1114     //   jmp_if_X TmpBB
1115     //   jmp FBB
1116     // TmpBB:
1117     //   jmp_if_Y TBB
1118     //   jmp FBB
1119     //
1120     //  This requires creation of TmpBB after CurBB.
1121     
1122     // Emit the LHS condition.
1123     FindMergedConditions(BOp->getOperand(0), TmpBB, FBB, CurBB, Opc);
1124     
1125     // Emit the RHS condition into TmpBB.
1126     FindMergedConditions(BOp->getOperand(1), TBB, FBB, TmpBB, Opc);
1127   }
1128 }
1129
1130 /// If the set of cases should be emitted as a series of branches, return true.
1131 /// If we should emit this as a bunch of and/or'd together conditions, return
1132 /// false.
1133 static bool 
1134 ShouldEmitAsBranches(const std::vector<SelectionDAGISel::CaseBlock> &Cases) {
1135   if (Cases.size() != 2) return true;
1136   
1137   // If this is two comparisons of the same values or'd or and'd together, they
1138   // will get folded into a single comparison, so don't emit two blocks.
1139   if ((Cases[0].CmpLHS == Cases[1].CmpLHS &&
1140        Cases[0].CmpRHS == Cases[1].CmpRHS) ||
1141       (Cases[0].CmpRHS == Cases[1].CmpLHS &&
1142        Cases[0].CmpLHS == Cases[1].CmpRHS)) {
1143     return false;
1144   }
1145   
1146   return true;
1147 }
1148
1149 void SelectionDAGLowering::visitBr(BranchInst &I) {
1150   // Update machine-CFG edges.
1151   MachineBasicBlock *Succ0MBB = FuncInfo.MBBMap[I.getSuccessor(0)];
1152
1153   // Figure out which block is immediately after the current one.
1154   MachineBasicBlock *NextBlock = 0;
1155   MachineFunction::iterator BBI = CurMBB;
1156   if (++BBI != CurMBB->getParent()->end())
1157     NextBlock = BBI;
1158
1159   if (I.isUnconditional()) {
1160     // If this is not a fall-through branch, emit the branch.
1161     if (Succ0MBB != NextBlock)
1162       DAG.setRoot(DAG.getNode(ISD::BR, MVT::Other, getRoot(),
1163                               DAG.getBasicBlock(Succ0MBB)));
1164
1165     // Update machine-CFG edges.
1166     CurMBB->addSuccessor(Succ0MBB);
1167     return;
1168   }
1169
1170   // If this condition is one of the special cases we handle, do special stuff
1171   // now.
1172   Value *CondVal = I.getCondition();
1173   MachineBasicBlock *Succ1MBB = FuncInfo.MBBMap[I.getSuccessor(1)];
1174
1175   // If this is a series of conditions that are or'd or and'd together, emit
1176   // this as a sequence of branches instead of setcc's with and/or operations.
1177   // For example, instead of something like:
1178   //     cmp A, B
1179   //     C = seteq 
1180   //     cmp D, E
1181   //     F = setle 
1182   //     or C, F
1183   //     jnz foo
1184   // Emit:
1185   //     cmp A, B
1186   //     je foo
1187   //     cmp D, E
1188   //     jle foo
1189   //
1190   if (BinaryOperator *BOp = dyn_cast<BinaryOperator>(CondVal)) {
1191     if (BOp->hasOneUse() && 
1192         (BOp->getOpcode() == Instruction::And ||
1193          BOp->getOpcode() == Instruction::Or)) {
1194       FindMergedConditions(BOp, Succ0MBB, Succ1MBB, CurMBB, BOp->getOpcode());
1195       // If the compares in later blocks need to use values not currently
1196       // exported from this block, export them now.  This block should always
1197       // be the first entry.
1198       assert(SwitchCases[0].ThisBB == CurMBB && "Unexpected lowering!");
1199       
1200       // Allow some cases to be rejected.
1201       if (ShouldEmitAsBranches(SwitchCases)) {
1202         for (unsigned i = 1, e = SwitchCases.size(); i != e; ++i) {
1203           ExportFromCurrentBlock(SwitchCases[i].CmpLHS);
1204           ExportFromCurrentBlock(SwitchCases[i].CmpRHS);
1205         }
1206         
1207         // Emit the branch for this block.
1208         visitSwitchCase(SwitchCases[0]);
1209         SwitchCases.erase(SwitchCases.begin());
1210         return;
1211       }
1212       
1213       // Okay, we decided not to do this, remove any inserted MBB's and clear
1214       // SwitchCases.
1215       for (unsigned i = 1, e = SwitchCases.size(); i != e; ++i)
1216         CurMBB->getParent()->getBasicBlockList().erase(SwitchCases[i].ThisBB);
1217       
1218       SwitchCases.clear();
1219     }
1220   }
1221   
1222   // Create a CaseBlock record representing this branch.
1223   SelectionDAGISel::CaseBlock CB(ISD::SETEQ, CondVal, ConstantInt::getTrue(),
1224                                  NULL, Succ0MBB, Succ1MBB, CurMBB);
1225   // Use visitSwitchCase to actually insert the fast branch sequence for this
1226   // cond branch.
1227   visitSwitchCase(CB);
1228 }
1229
1230 /// visitSwitchCase - Emits the necessary code to represent a single node in
1231 /// the binary search tree resulting from lowering a switch instruction.
1232 void SelectionDAGLowering::visitSwitchCase(SelectionDAGISel::CaseBlock &CB) {
1233   SDOperand Cond;
1234   SDOperand CondLHS = getValue(CB.CmpLHS);
1235   
1236   // Build the setcc now. 
1237   if (CB.CmpMHS == NULL) {
1238     // Fold "(X == true)" to X and "(X == false)" to !X to
1239     // handle common cases produced by branch lowering.
1240     if (CB.CmpRHS == ConstantInt::getTrue() && CB.CC == ISD::SETEQ)
1241       Cond = CondLHS;
1242     else if (CB.CmpRHS == ConstantInt::getFalse() && CB.CC == ISD::SETEQ) {
1243       SDOperand True = DAG.getConstant(1, CondLHS.getValueType());
1244       Cond = DAG.getNode(ISD::XOR, CondLHS.getValueType(), CondLHS, True);
1245     } else
1246       Cond = DAG.getSetCC(MVT::i1, CondLHS, getValue(CB.CmpRHS), CB.CC);
1247   } else {
1248     assert(CB.CC == ISD::SETLE && "Can handle only LE ranges now");
1249
1250     uint64_t Low = cast<ConstantInt>(CB.CmpLHS)->getSExtValue();
1251     uint64_t High  = cast<ConstantInt>(CB.CmpRHS)->getSExtValue();
1252
1253     SDOperand CmpOp = getValue(CB.CmpMHS);
1254     MVT::ValueType VT = CmpOp.getValueType();
1255
1256     if (cast<ConstantInt>(CB.CmpLHS)->isMinValue(true)) {
1257       Cond = DAG.getSetCC(MVT::i1, CmpOp, DAG.getConstant(High, VT), ISD::SETLE);
1258     } else {
1259       SDOperand SUB = DAG.getNode(ISD::SUB, VT, CmpOp, DAG.getConstant(Low, VT));
1260       Cond = DAG.getSetCC(MVT::i1, SUB,
1261                           DAG.getConstant(High-Low, VT), ISD::SETULE);
1262     }
1263     
1264   }
1265   
1266   // Set NextBlock to be the MBB immediately after the current one, if any.
1267   // This is used to avoid emitting unnecessary branches to the next block.
1268   MachineBasicBlock *NextBlock = 0;
1269   MachineFunction::iterator BBI = CurMBB;
1270   if (++BBI != CurMBB->getParent()->end())
1271     NextBlock = BBI;
1272   
1273   // If the lhs block is the next block, invert the condition so that we can
1274   // fall through to the lhs instead of the rhs block.
1275   if (CB.TrueBB == NextBlock) {
1276     std::swap(CB.TrueBB, CB.FalseBB);
1277     SDOperand True = DAG.getConstant(1, Cond.getValueType());
1278     Cond = DAG.getNode(ISD::XOR, Cond.getValueType(), Cond, True);
1279   }
1280   SDOperand BrCond = DAG.getNode(ISD::BRCOND, MVT::Other, getRoot(), Cond,
1281                                  DAG.getBasicBlock(CB.TrueBB));
1282   if (CB.FalseBB == NextBlock)
1283     DAG.setRoot(BrCond);
1284   else
1285     DAG.setRoot(DAG.getNode(ISD::BR, MVT::Other, BrCond, 
1286                             DAG.getBasicBlock(CB.FalseBB)));
1287   // Update successor info
1288   CurMBB->addSuccessor(CB.TrueBB);
1289   CurMBB->addSuccessor(CB.FalseBB);
1290 }
1291
1292 /// visitJumpTable - Emit JumpTable node in the current MBB
1293 void SelectionDAGLowering::visitJumpTable(SelectionDAGISel::JumpTable &JT) {
1294   // Emit the code for the jump table
1295   assert(JT.Reg != -1U && "Should lower JT Header first!");
1296   MVT::ValueType PTy = TLI.getPointerTy();
1297   SDOperand Index = DAG.getCopyFromReg(getRoot(), JT.Reg, PTy);
1298   SDOperand Table = DAG.getJumpTable(JT.JTI, PTy);
1299   DAG.setRoot(DAG.getNode(ISD::BR_JT, MVT::Other, Index.getValue(1),
1300                           Table, Index));
1301   return;
1302 }
1303
1304 /// visitJumpTableHeader - This function emits necessary code to produce index
1305 /// in the JumpTable from switch case.
1306 void SelectionDAGLowering::visitJumpTableHeader(SelectionDAGISel::JumpTable &JT,
1307                                          SelectionDAGISel::JumpTableHeader &JTH) {
1308   // Subtract the lowest switch case value from the value being switched on
1309   // and conditional branch to default mbb if the result is greater than the
1310   // difference between smallest and largest cases.
1311   SDOperand SwitchOp = getValue(JTH.SValue);
1312   MVT::ValueType VT = SwitchOp.getValueType();
1313   SDOperand SUB = DAG.getNode(ISD::SUB, VT, SwitchOp,
1314                               DAG.getConstant(JTH.First, VT));
1315   
1316   // The SDNode we just created, which holds the value being switched on
1317   // minus the the smallest case value, needs to be copied to a virtual
1318   // register so it can be used as an index into the jump table in a 
1319   // subsequent basic block.  This value may be smaller or larger than the
1320   // target's pointer type, and therefore require extension or truncating.
1321   if (MVT::getSizeInBits(VT) > MVT::getSizeInBits(TLI.getPointerTy()))
1322     SwitchOp = DAG.getNode(ISD::TRUNCATE, TLI.getPointerTy(), SUB);
1323   else
1324     SwitchOp = DAG.getNode(ISD::ZERO_EXTEND, TLI.getPointerTy(), SUB);
1325   
1326   unsigned JumpTableReg = FuncInfo.MakeReg(TLI.getPointerTy());
1327   SDOperand CopyTo = DAG.getCopyToReg(getRoot(), JumpTableReg, SwitchOp);
1328   JT.Reg = JumpTableReg;
1329
1330   // Emit the range check for the jump table, and branch to the default
1331   // block for the switch statement if the value being switched on exceeds
1332   // the largest case in the switch.
1333   SDOperand CMP = DAG.getSetCC(TLI.getSetCCResultTy(), SUB,
1334                                DAG.getConstant(JTH.Last-JTH.First,VT),
1335                                ISD::SETUGT);
1336
1337   // Set NextBlock to be the MBB immediately after the current one, if any.
1338   // This is used to avoid emitting unnecessary branches to the next block.
1339   MachineBasicBlock *NextBlock = 0;
1340   MachineFunction::iterator BBI = CurMBB;
1341   if (++BBI != CurMBB->getParent()->end())
1342     NextBlock = BBI;
1343
1344   SDOperand BrCond = DAG.getNode(ISD::BRCOND, MVT::Other, CopyTo, CMP,
1345                                  DAG.getBasicBlock(JT.Default));
1346
1347   if (JT.MBB == NextBlock)
1348     DAG.setRoot(BrCond);
1349   else
1350     DAG.setRoot(DAG.getNode(ISD::BR, MVT::Other, BrCond, 
1351                             DAG.getBasicBlock(JT.MBB)));
1352
1353   return;
1354 }
1355
1356 /// visitBitTestHeader - This function emits necessary code to produce value
1357 /// suitable for "bit tests"
1358 void SelectionDAGLowering::visitBitTestHeader(SelectionDAGISel::BitTestBlock &B) {
1359   // Subtract the minimum value
1360   SDOperand SwitchOp = getValue(B.SValue);
1361   MVT::ValueType VT = SwitchOp.getValueType();
1362   SDOperand SUB = DAG.getNode(ISD::SUB, VT, SwitchOp,
1363                               DAG.getConstant(B.First, VT));
1364
1365   // Check range
1366   SDOperand RangeCmp = DAG.getSetCC(TLI.getSetCCResultTy(), SUB,
1367                                     DAG.getConstant(B.Range, VT),
1368                                     ISD::SETUGT);
1369
1370   SDOperand ShiftOp;
1371   if (MVT::getSizeInBits(VT) > MVT::getSizeInBits(TLI.getShiftAmountTy()))
1372     ShiftOp = DAG.getNode(ISD::TRUNCATE, TLI.getShiftAmountTy(), SUB);
1373   else
1374     ShiftOp = DAG.getNode(ISD::ZERO_EXTEND, TLI.getShiftAmountTy(), SUB);
1375
1376   // Make desired shift
1377   SDOperand SwitchVal = DAG.getNode(ISD::SHL, TLI.getPointerTy(),
1378                                     DAG.getConstant(1, TLI.getPointerTy()),
1379                                     ShiftOp);
1380
1381   unsigned SwitchReg = FuncInfo.MakeReg(TLI.getPointerTy());
1382   SDOperand CopyTo = DAG.getCopyToReg(getRoot(), SwitchReg, SwitchVal);
1383   B.Reg = SwitchReg;
1384
1385   SDOperand BrRange = DAG.getNode(ISD::BRCOND, MVT::Other, CopyTo, RangeCmp,
1386                                   DAG.getBasicBlock(B.Default));
1387
1388   // Set NextBlock to be the MBB immediately after the current one, if any.
1389   // This is used to avoid emitting unnecessary branches to the next block.
1390   MachineBasicBlock *NextBlock = 0;
1391   MachineFunction::iterator BBI = CurMBB;
1392   if (++BBI != CurMBB->getParent()->end())
1393     NextBlock = BBI;
1394
1395   MachineBasicBlock* MBB = B.Cases[0].ThisBB;
1396   if (MBB == NextBlock)
1397     DAG.setRoot(BrRange);
1398   else
1399     DAG.setRoot(DAG.getNode(ISD::BR, MVT::Other, CopyTo,
1400                             DAG.getBasicBlock(MBB)));
1401
1402   CurMBB->addSuccessor(B.Default);
1403   CurMBB->addSuccessor(MBB);
1404
1405   return;
1406 }
1407
1408 /// visitBitTestCase - this function produces one "bit test"
1409 void SelectionDAGLowering::visitBitTestCase(MachineBasicBlock* NextMBB,
1410                                             unsigned Reg,
1411                                             SelectionDAGISel::BitTestCase &B) {
1412   // Emit bit tests and jumps
1413   SDOperand SwitchVal = DAG.getCopyFromReg(getRoot(), Reg, TLI.getPointerTy());
1414   
1415   SDOperand AndOp = DAG.getNode(ISD::AND, TLI.getPointerTy(),
1416                                 SwitchVal,
1417                                 DAG.getConstant(B.Mask,
1418                                                 TLI.getPointerTy()));
1419   SDOperand AndCmp = DAG.getSetCC(TLI.getSetCCResultTy(), AndOp,
1420                                   DAG.getConstant(0, TLI.getPointerTy()),
1421                                   ISD::SETNE);
1422   SDOperand BrAnd = DAG.getNode(ISD::BRCOND, MVT::Other, getRoot(),
1423                                 AndCmp, DAG.getBasicBlock(B.TargetBB));
1424
1425   // Set NextBlock to be the MBB immediately after the current one, if any.
1426   // This is used to avoid emitting unnecessary branches to the next block.
1427   MachineBasicBlock *NextBlock = 0;
1428   MachineFunction::iterator BBI = CurMBB;
1429   if (++BBI != CurMBB->getParent()->end())
1430     NextBlock = BBI;
1431
1432   if (NextMBB == NextBlock)
1433     DAG.setRoot(BrAnd);
1434   else
1435     DAG.setRoot(DAG.getNode(ISD::BR, MVT::Other, BrAnd,
1436                             DAG.getBasicBlock(NextMBB)));
1437
1438   CurMBB->addSuccessor(B.TargetBB);
1439   CurMBB->addSuccessor(NextMBB);
1440
1441   return;
1442 }
1443
1444 void SelectionDAGLowering::visitInvoke(InvokeInst &I) {
1445   // Retrieve successors.
1446   MachineBasicBlock *Return = FuncInfo.MBBMap[I.getSuccessor(0)];
1447   MachineBasicBlock *LandingPad = FuncInfo.MBBMap[I.getSuccessor(1)];
1448
1449   if (isa<InlineAsm>(I.getCalledValue()))
1450     visitInlineAsm(&I);
1451   else
1452     LowerCallTo(&I, getValue(I.getOperand(0)), false, LandingPad);
1453
1454   // If the value of the invoke is used outside of its defining block, make it
1455   // available as a virtual register.
1456   if (!I.use_empty()) {
1457     DenseMap<const Value*, unsigned>::iterator VMI = FuncInfo.ValueMap.find(&I);
1458     if (VMI != FuncInfo.ValueMap.end())
1459       DAG.setRoot(CopyValueToVirtualRegister(&I, VMI->second));
1460   }
1461
1462   // Drop into normal successor.
1463   DAG.setRoot(DAG.getNode(ISD::BR, MVT::Other, getRoot(),
1464                           DAG.getBasicBlock(Return)));
1465
1466   // Update successor info
1467   CurMBB->addSuccessor(Return);
1468   CurMBB->addSuccessor(LandingPad);
1469 }
1470
1471 void SelectionDAGLowering::visitUnwind(UnwindInst &I) {
1472 }
1473
1474 /// handleSmallSwitchCaseRange - Emit a series of specific tests (suitable for
1475 /// small case ranges).
1476 bool SelectionDAGLowering::handleSmallSwitchRange(CaseRec& CR,
1477                                                   CaseRecVector& WorkList,
1478                                                   Value* SV,
1479                                                   MachineBasicBlock* Default) {
1480   Case& BackCase  = *(CR.Range.second-1);
1481   
1482   // Size is the number of Cases represented by this range.
1483   unsigned Size = CR.Range.second - CR.Range.first;
1484   if (Size > 3)
1485     return false;  
1486   
1487   // Get the MachineFunction which holds the current MBB.  This is used when
1488   // inserting any additional MBBs necessary to represent the switch.
1489   MachineFunction *CurMF = CurMBB->getParent();  
1490
1491   // Figure out which block is immediately after the current one.
1492   MachineBasicBlock *NextBlock = 0;
1493   MachineFunction::iterator BBI = CR.CaseBB;
1494
1495   if (++BBI != CurMBB->getParent()->end())
1496     NextBlock = BBI;
1497
1498   // TODO: If any two of the cases has the same destination, and if one value
1499   // is the same as the other, but has one bit unset that the other has set,
1500   // use bit manipulation to do two compares at once.  For example:
1501   // "if (X == 6 || X == 4)" -> "if ((X|2) == 6)"
1502     
1503   // Rearrange the case blocks so that the last one falls through if possible.
1504   if (NextBlock && Default != NextBlock && BackCase.BB != NextBlock) {
1505     // The last case block won't fall through into 'NextBlock' if we emit the
1506     // branches in this order.  See if rearranging a case value would help.
1507     for (CaseItr I = CR.Range.first, E = CR.Range.second-1; I != E; ++I) {
1508       if (I->BB == NextBlock) {
1509         std::swap(*I, BackCase);
1510         break;
1511       }
1512     }
1513   }
1514   
1515   // Create a CaseBlock record representing a conditional branch to
1516   // the Case's target mbb if the value being switched on SV is equal
1517   // to C.
1518   MachineBasicBlock *CurBlock = CR.CaseBB;
1519   for (CaseItr I = CR.Range.first, E = CR.Range.second; I != E; ++I) {
1520     MachineBasicBlock *FallThrough;
1521     if (I != E-1) {
1522       FallThrough = new MachineBasicBlock(CurBlock->getBasicBlock());
1523       CurMF->getBasicBlockList().insert(BBI, FallThrough);
1524     } else {
1525       // If the last case doesn't match, go to the default block.
1526       FallThrough = Default;
1527     }
1528
1529     Value *RHS, *LHS, *MHS;
1530     ISD::CondCode CC;
1531     if (I->High == I->Low) {
1532       // This is just small small case range :) containing exactly 1 case
1533       CC = ISD::SETEQ;
1534       LHS = SV; RHS = I->High; MHS = NULL;
1535     } else {
1536       CC = ISD::SETLE;
1537       LHS = I->Low; MHS = SV; RHS = I->High;
1538     }
1539     SelectionDAGISel::CaseBlock CB(CC, LHS, RHS, MHS,
1540                                    I->BB, FallThrough, CurBlock);
1541     
1542     // If emitting the first comparison, just call visitSwitchCase to emit the
1543     // code into the current block.  Otherwise, push the CaseBlock onto the
1544     // vector to be later processed by SDISel, and insert the node's MBB
1545     // before the next MBB.
1546     if (CurBlock == CurMBB)
1547       visitSwitchCase(CB);
1548     else
1549       SwitchCases.push_back(CB);
1550     
1551     CurBlock = FallThrough;
1552   }
1553
1554   return true;
1555 }
1556
1557 static inline bool areJTsAllowed(const TargetLowering &TLI) {
1558   return (TLI.isOperationLegal(ISD::BR_JT, MVT::Other) ||
1559           TLI.isOperationLegal(ISD::BRIND, MVT::Other));
1560 }
1561   
1562 /// handleJTSwitchCase - Emit jumptable for current switch case range
1563 bool SelectionDAGLowering::handleJTSwitchCase(CaseRec& CR,
1564                                               CaseRecVector& WorkList,
1565                                               Value* SV,
1566                                               MachineBasicBlock* Default) {
1567   Case& FrontCase = *CR.Range.first;
1568   Case& BackCase  = *(CR.Range.second-1);
1569
1570   int64_t First = cast<ConstantInt>(FrontCase.Low)->getSExtValue();
1571   int64_t Last  = cast<ConstantInt>(BackCase.High)->getSExtValue();
1572
1573   uint64_t TSize = 0;
1574   for (CaseItr I = CR.Range.first, E = CR.Range.second;
1575        I!=E; ++I)
1576     TSize += I->size();
1577
1578   if (!areJTsAllowed(TLI) || TSize <= 3)
1579     return false;
1580   
1581   double Density = (double)TSize / (double)((Last - First) + 1ULL);  
1582   if (Density < 0.4)
1583     return false;
1584
1585   DOUT << "Lowering jump table\n"
1586        << "First entry: " << First << ". Last entry: " << Last << "\n"
1587        << "Size: " << TSize << ". Density: " << Density << "\n\n";
1588
1589   // Get the MachineFunction which holds the current MBB.  This is used when
1590   // inserting any additional MBBs necessary to represent the switch.
1591   MachineFunction *CurMF = CurMBB->getParent();
1592
1593   // Figure out which block is immediately after the current one.
1594   MachineBasicBlock *NextBlock = 0;
1595   MachineFunction::iterator BBI = CR.CaseBB;
1596
1597   if (++BBI != CurMBB->getParent()->end())
1598     NextBlock = BBI;
1599
1600   const BasicBlock *LLVMBB = CR.CaseBB->getBasicBlock();
1601
1602   // Create a new basic block to hold the code for loading the address
1603   // of the jump table, and jumping to it.  Update successor information;
1604   // we will either branch to the default case for the switch, or the jump
1605   // table.
1606   MachineBasicBlock *JumpTableBB = new MachineBasicBlock(LLVMBB);
1607   CurMF->getBasicBlockList().insert(BBI, JumpTableBB);
1608   CR.CaseBB->addSuccessor(Default);
1609   CR.CaseBB->addSuccessor(JumpTableBB);
1610                 
1611   // Build a vector of destination BBs, corresponding to each target
1612   // of the jump table. If the value of the jump table slot corresponds to
1613   // a case statement, push the case's BB onto the vector, otherwise, push
1614   // the default BB.
1615   std::vector<MachineBasicBlock*> DestBBs;
1616   int64_t TEI = First;
1617   for (CaseItr I = CR.Range.first, E = CR.Range.second; I != E; ++TEI) {
1618     int64_t Low = cast<ConstantInt>(I->Low)->getSExtValue();
1619     int64_t High = cast<ConstantInt>(I->High)->getSExtValue();
1620     
1621     if ((Low <= TEI) && (TEI <= High)) {
1622       DestBBs.push_back(I->BB);
1623       if (TEI==High)
1624         ++I;
1625     } else {
1626       DestBBs.push_back(Default);
1627     }
1628   }
1629   
1630   // Update successor info. Add one edge to each unique successor.
1631   BitVector SuccsHandled(CR.CaseBB->getParent()->getNumBlockIDs());  
1632   for (std::vector<MachineBasicBlock*>::iterator I = DestBBs.begin(), 
1633          E = DestBBs.end(); I != E; ++I) {
1634     if (!SuccsHandled[(*I)->getNumber()]) {
1635       SuccsHandled[(*I)->getNumber()] = true;
1636       JumpTableBB->addSuccessor(*I);
1637     }
1638   }
1639       
1640   // Create a jump table index for this jump table, or return an existing
1641   // one.
1642   unsigned JTI = CurMF->getJumpTableInfo()->getJumpTableIndex(DestBBs);
1643   
1644   // Set the jump table information so that we can codegen it as a second
1645   // MachineBasicBlock
1646   SelectionDAGISel::JumpTable JT(-1U, JTI, JumpTableBB, Default);
1647   SelectionDAGISel::JumpTableHeader JTH(First, Last, SV, CR.CaseBB,
1648                                         (CR.CaseBB == CurMBB));
1649   if (CR.CaseBB == CurMBB)
1650     visitJumpTableHeader(JT, JTH);
1651         
1652   JTCases.push_back(SelectionDAGISel::JumpTableBlock(JTH, JT));
1653
1654   return true;
1655 }
1656
1657 /// handleBTSplitSwitchCase - emit comparison and split binary search tree into
1658 /// 2 subtrees.
1659 bool SelectionDAGLowering::handleBTSplitSwitchCase(CaseRec& CR,
1660                                                    CaseRecVector& WorkList,
1661                                                    Value* SV,
1662                                                    MachineBasicBlock* Default) {
1663   // Get the MachineFunction which holds the current MBB.  This is used when
1664   // inserting any additional MBBs necessary to represent the switch.
1665   MachineFunction *CurMF = CurMBB->getParent();  
1666
1667   // Figure out which block is immediately after the current one.
1668   MachineBasicBlock *NextBlock = 0;
1669   MachineFunction::iterator BBI = CR.CaseBB;
1670
1671   if (++BBI != CurMBB->getParent()->end())
1672     NextBlock = BBI;
1673
1674   Case& FrontCase = *CR.Range.first;
1675   Case& BackCase  = *(CR.Range.second-1);
1676   const BasicBlock *LLVMBB = CR.CaseBB->getBasicBlock();
1677
1678   // Size is the number of Cases represented by this range.
1679   unsigned Size = CR.Range.second - CR.Range.first;
1680
1681   int64_t First = cast<ConstantInt>(FrontCase.Low)->getSExtValue();
1682   int64_t Last  = cast<ConstantInt>(BackCase.High)->getSExtValue();
1683   double FMetric = 0;
1684   CaseItr Pivot = CR.Range.first + Size/2;
1685
1686   // Select optimal pivot, maximizing sum density of LHS and RHS. This will
1687   // (heuristically) allow us to emit JumpTable's later.
1688   uint64_t TSize = 0;
1689   for (CaseItr I = CR.Range.first, E = CR.Range.second;
1690        I!=E; ++I)
1691     TSize += I->size();
1692
1693   uint64_t LSize = FrontCase.size();
1694   uint64_t RSize = TSize-LSize;
1695   DOUT << "Selecting best pivot: \n"
1696        << "First: " << First << ", Last: " << Last <<"\n"
1697        << "LSize: " << LSize << ", RSize: " << RSize << "\n";
1698   for (CaseItr I = CR.Range.first, J=I+1, E = CR.Range.second;
1699        J!=E; ++I, ++J) {
1700     int64_t LEnd = cast<ConstantInt>(I->High)->getSExtValue();
1701     int64_t RBegin = cast<ConstantInt>(J->Low)->getSExtValue();
1702     assert((RBegin-LEnd>=1) && "Invalid case distance");
1703     double LDensity = (double)LSize / (double)((LEnd - First) + 1ULL);
1704     double RDensity = (double)RSize / (double)((Last - RBegin) + 1ULL);
1705     double Metric = Log2_64(RBegin-LEnd)*(LDensity+RDensity);
1706     // Should always split in some non-trivial place
1707     DOUT <<"=>Step\n"
1708          << "LEnd: " << LEnd << ", RBegin: " << RBegin << "\n"
1709          << "LDensity: " << LDensity << ", RDensity: " << RDensity << "\n"
1710          << "Metric: " << Metric << "\n"; 
1711     if (FMetric < Metric) {
1712       Pivot = J;
1713       FMetric = Metric;
1714       DOUT << "Current metric set to: " << FMetric << "\n";
1715     }
1716
1717     LSize += J->size();
1718     RSize -= J->size();
1719   }
1720   if (areJTsAllowed(TLI)) {
1721     // If our case is dense we *really* should handle it earlier!
1722     assert((FMetric > 0) && "Should handle dense range earlier!");
1723   } else {
1724     Pivot = CR.Range.first + Size/2;
1725   }
1726   
1727   CaseRange LHSR(CR.Range.first, Pivot);
1728   CaseRange RHSR(Pivot, CR.Range.second);
1729   Constant *C = Pivot->Low;
1730   MachineBasicBlock *FalseBB = 0, *TrueBB = 0;
1731       
1732   // We know that we branch to the LHS if the Value being switched on is
1733   // less than the Pivot value, C.  We use this to optimize our binary 
1734   // tree a bit, by recognizing that if SV is greater than or equal to the
1735   // LHS's Case Value, and that Case Value is exactly one less than the 
1736   // Pivot's Value, then we can branch directly to the LHS's Target,
1737   // rather than creating a leaf node for it.
1738   if ((LHSR.second - LHSR.first) == 1 &&
1739       LHSR.first->High == CR.GE &&
1740       cast<ConstantInt>(C)->getSExtValue() ==
1741       (cast<ConstantInt>(CR.GE)->getSExtValue() + 1LL)) {
1742     TrueBB = LHSR.first->BB;
1743   } else {
1744     TrueBB = new MachineBasicBlock(LLVMBB);
1745     CurMF->getBasicBlockList().insert(BBI, TrueBB);
1746     WorkList.push_back(CaseRec(TrueBB, C, CR.GE, LHSR));
1747   }
1748   
1749   // Similar to the optimization above, if the Value being switched on is
1750   // known to be less than the Constant CR.LT, and the current Case Value
1751   // is CR.LT - 1, then we can branch directly to the target block for
1752   // the current Case Value, rather than emitting a RHS leaf node for it.
1753   if ((RHSR.second - RHSR.first) == 1 && CR.LT &&
1754       cast<ConstantInt>(RHSR.first->Low)->getSExtValue() ==
1755       (cast<ConstantInt>(CR.LT)->getSExtValue() - 1LL)) {
1756     FalseBB = RHSR.first->BB;
1757   } else {
1758     FalseBB = new MachineBasicBlock(LLVMBB);
1759     CurMF->getBasicBlockList().insert(BBI, FalseBB);
1760     WorkList.push_back(CaseRec(FalseBB,CR.LT,C,RHSR));
1761   }
1762
1763   // Create a CaseBlock record representing a conditional branch to
1764   // the LHS node if the value being switched on SV is less than C. 
1765   // Otherwise, branch to LHS.
1766   SelectionDAGISel::CaseBlock CB(ISD::SETLT, SV, C, NULL,
1767                                  TrueBB, FalseBB, CR.CaseBB);
1768
1769   if (CR.CaseBB == CurMBB)
1770     visitSwitchCase(CB);
1771   else
1772     SwitchCases.push_back(CB);
1773
1774   return true;
1775 }
1776
1777 /// handleBitTestsSwitchCase - if current case range has few destination and
1778 /// range span less, than machine word bitwidth, encode case range into series
1779 /// of masks and emit bit tests with these masks.
1780 bool SelectionDAGLowering::handleBitTestsSwitchCase(CaseRec& CR,
1781                                                     CaseRecVector& WorkList,
1782                                                     Value* SV,
1783                                                     MachineBasicBlock* Default){
1784   unsigned IntPtrBits = MVT::getSizeInBits(TLI.getPointerTy());
1785
1786   Case& FrontCase = *CR.Range.first;
1787   Case& BackCase  = *(CR.Range.second-1);
1788
1789   // Get the MachineFunction which holds the current MBB.  This is used when
1790   // inserting any additional MBBs necessary to represent the switch.
1791   MachineFunction *CurMF = CurMBB->getParent();  
1792
1793   unsigned numCmps = 0;
1794   for (CaseItr I = CR.Range.first, E = CR.Range.second;
1795        I!=E; ++I) {
1796     // Single case counts one, case range - two.
1797     if (I->Low == I->High)
1798       numCmps +=1;
1799     else
1800       numCmps +=2;
1801   }
1802     
1803   // Count unique destinations
1804   SmallSet<MachineBasicBlock*, 4> Dests;
1805   for (CaseItr I = CR.Range.first, E = CR.Range.second; I!=E; ++I) {
1806     Dests.insert(I->BB);
1807     if (Dests.size() > 3)
1808       // Don't bother the code below, if there are too much unique destinations
1809       return false;
1810   }
1811   DOUT << "Total number of unique destinations: " << Dests.size() << "\n"
1812        << "Total number of comparisons: " << numCmps << "\n";
1813   
1814   // Compute span of values.
1815   Constant* minValue = FrontCase.Low;
1816   Constant* maxValue = BackCase.High;
1817   uint64_t range = cast<ConstantInt>(maxValue)->getSExtValue() -
1818                    cast<ConstantInt>(minValue)->getSExtValue();
1819   DOUT << "Compare range: " << range << "\n"
1820        << "Low bound: " << cast<ConstantInt>(minValue)->getSExtValue() << "\n"
1821        << "High bound: " << cast<ConstantInt>(maxValue)->getSExtValue() << "\n";
1822   
1823   if (range>=IntPtrBits ||
1824       (!(Dests.size() == 1 && numCmps >= 3) &&
1825        !(Dests.size() == 2 && numCmps >= 5) &&
1826        !(Dests.size() >= 3 && numCmps >= 6)))
1827     return false;
1828   
1829   DOUT << "Emitting bit tests\n";
1830   int64_t lowBound = 0;
1831     
1832   // Optimize the case where all the case values fit in a
1833   // word without having to subtract minValue. In this case,
1834   // we can optimize away the subtraction.
1835   if (cast<ConstantInt>(minValue)->getSExtValue() >= 0 &&
1836       cast<ConstantInt>(maxValue)->getSExtValue() <  IntPtrBits) {
1837     range = cast<ConstantInt>(maxValue)->getSExtValue();
1838   } else {
1839     lowBound = cast<ConstantInt>(minValue)->getSExtValue();
1840   }
1841     
1842   CaseBitsVector CasesBits;
1843   unsigned i, count = 0;
1844
1845   for (CaseItr I = CR.Range.first, E = CR.Range.second; I!=E; ++I) {
1846     MachineBasicBlock* Dest = I->BB;
1847     for (i = 0; i < count; ++i)
1848       if (Dest == CasesBits[i].BB)
1849         break;
1850     
1851     if (i == count) {
1852       assert((count < 3) && "Too much destinations to test!");
1853       CasesBits.push_back(CaseBits(0, Dest, 0));
1854       count++;
1855     }
1856     
1857     uint64_t lo = cast<ConstantInt>(I->Low)->getSExtValue() - lowBound;
1858     uint64_t hi = cast<ConstantInt>(I->High)->getSExtValue() - lowBound;
1859     
1860     for (uint64_t j = lo; j <= hi; j++) {
1861       CasesBits[i].Mask |=  1ULL << j;
1862       CasesBits[i].Bits++;
1863     }
1864       
1865   }
1866   std::sort(CasesBits.begin(), CasesBits.end(), CaseBitsCmp());
1867   
1868   SelectionDAGISel::BitTestInfo BTC;
1869
1870   // Figure out which block is immediately after the current one.
1871   MachineFunction::iterator BBI = CR.CaseBB;
1872   ++BBI;
1873
1874   const BasicBlock *LLVMBB = CR.CaseBB->getBasicBlock();
1875
1876   DOUT << "Cases:\n";
1877   for (unsigned i = 0, e = CasesBits.size(); i!=e; ++i) {
1878     DOUT << "Mask: " << CasesBits[i].Mask << ", Bits: " << CasesBits[i].Bits
1879          << ", BB: " << CasesBits[i].BB << "\n";
1880
1881     MachineBasicBlock *CaseBB = new MachineBasicBlock(LLVMBB);
1882     CurMF->getBasicBlockList().insert(BBI, CaseBB);
1883     BTC.push_back(SelectionDAGISel::BitTestCase(CasesBits[i].Mask,
1884                                                 CaseBB,
1885                                                 CasesBits[i].BB));
1886   }
1887   
1888   SelectionDAGISel::BitTestBlock BTB(lowBound, range, SV,
1889                                      -1U, (CR.CaseBB == CurMBB),
1890                                      CR.CaseBB, Default, BTC);
1891
1892   if (CR.CaseBB == CurMBB)
1893     visitBitTestHeader(BTB);
1894   
1895   BitTestCases.push_back(BTB);
1896
1897   return true;
1898 }
1899
1900
1901 // Clusterify - Transform simple list of Cases into list of CaseRange's
1902 unsigned SelectionDAGLowering::Clusterify(CaseVector& Cases,
1903                                           const SwitchInst& SI) {
1904   unsigned numCmps = 0;
1905
1906   // Start with "simple" cases
1907   for (unsigned i = 1; i < SI.getNumSuccessors(); ++i) {
1908     MachineBasicBlock *SMBB = FuncInfo.MBBMap[SI.getSuccessor(i)];
1909     Cases.push_back(Case(SI.getSuccessorValue(i),
1910                          SI.getSuccessorValue(i),
1911                          SMBB));
1912   }
1913   std::sort(Cases.begin(), Cases.end(), CaseCmp());
1914
1915   // Merge case into clusters
1916   if (Cases.size()>=2)
1917     // Must recompute end() each iteration because it may be
1918     // invalidated by erase if we hold on to it
1919     for (CaseItr I=Cases.begin(), J=++(Cases.begin()); J!=Cases.end(); ) {
1920       int64_t nextValue = cast<ConstantInt>(J->Low)->getSExtValue();
1921       int64_t currentValue = cast<ConstantInt>(I->High)->getSExtValue();
1922       MachineBasicBlock* nextBB = J->BB;
1923       MachineBasicBlock* currentBB = I->BB;
1924
1925       // If the two neighboring cases go to the same destination, merge them
1926       // into a single case.
1927       if ((nextValue-currentValue==1) && (currentBB == nextBB)) {
1928         I->High = J->High;
1929         J = Cases.erase(J);
1930       } else {
1931         I = J++;
1932       }
1933     }
1934
1935   for (CaseItr I=Cases.begin(), E=Cases.end(); I!=E; ++I, ++numCmps) {
1936     if (I->Low != I->High)
1937       // A range counts double, since it requires two compares.
1938       ++numCmps;
1939   }
1940
1941   return numCmps;
1942 }
1943
1944 void SelectionDAGLowering::visitSwitch(SwitchInst &SI) {  
1945   // Figure out which block is immediately after the current one.
1946   MachineBasicBlock *NextBlock = 0;
1947   MachineFunction::iterator BBI = CurMBB;
1948
1949   MachineBasicBlock *Default = FuncInfo.MBBMap[SI.getDefaultDest()];
1950
1951   // If there is only the default destination, branch to it if it is not the
1952   // next basic block.  Otherwise, just fall through.
1953   if (SI.getNumOperands() == 2) {
1954     // Update machine-CFG edges.
1955
1956     // If this is not a fall-through branch, emit the branch.
1957     if (Default != NextBlock)
1958       DAG.setRoot(DAG.getNode(ISD::BR, MVT::Other, getRoot(),
1959                               DAG.getBasicBlock(Default)));
1960
1961     CurMBB->addSuccessor(Default);
1962     return;
1963   }
1964   
1965   // If there are any non-default case statements, create a vector of Cases
1966   // representing each one, and sort the vector so that we can efficiently
1967   // create a binary search tree from them.
1968   CaseVector Cases;
1969   unsigned numCmps = Clusterify(Cases, SI);
1970   DOUT << "Clusterify finished. Total clusters: " << Cases.size()
1971        << ". Total compares: " << numCmps << "\n";
1972
1973   // Get the Value to be switched on and default basic blocks, which will be
1974   // inserted into CaseBlock records, representing basic blocks in the binary
1975   // search tree.
1976   Value *SV = SI.getOperand(0);
1977
1978   // Push the initial CaseRec onto the worklist
1979   CaseRecVector WorkList;
1980   WorkList.push_back(CaseRec(CurMBB,0,0,CaseRange(Cases.begin(),Cases.end())));
1981
1982   while (!WorkList.empty()) {
1983     // Grab a record representing a case range to process off the worklist
1984     CaseRec CR = WorkList.back();
1985     WorkList.pop_back();
1986
1987     if (handleBitTestsSwitchCase(CR, WorkList, SV, Default))
1988       continue;
1989     
1990     // If the range has few cases (two or less) emit a series of specific
1991     // tests.
1992     if (handleSmallSwitchRange(CR, WorkList, SV, Default))
1993       continue;
1994     
1995     // If the switch has more than 5 blocks, and at least 40% dense, and the 
1996     // target supports indirect branches, then emit a jump table rather than 
1997     // lowering the switch to a binary tree of conditional branches.
1998     if (handleJTSwitchCase(CR, WorkList, SV, Default))
1999       continue;
2000           
2001     // Emit binary tree. We need to pick a pivot, and push left and right ranges
2002     // onto the worklist. Leafs are handled via handleSmallSwitchRange() call.
2003     handleBTSplitSwitchCase(CR, WorkList, SV, Default);
2004   }
2005 }
2006
2007
2008 void SelectionDAGLowering::visitSub(User &I) {
2009   // -0.0 - X --> fneg
2010   const Type *Ty = I.getType();
2011   if (isa<VectorType>(Ty)) {
2012     if (ConstantVector *CV = dyn_cast<ConstantVector>(I.getOperand(0))) {
2013       const VectorType *DestTy = cast<VectorType>(I.getType());
2014       const Type *ElTy = DestTy->getElementType();
2015       if (ElTy->isFloatingPoint()) {
2016         unsigned VL = DestTy->getNumElements();
2017         std::vector<Constant*> NZ(VL, ConstantFP::getNegativeZero(ElTy));
2018         Constant *CNZ = ConstantVector::get(&NZ[0], NZ.size());
2019         if (CV == CNZ) {
2020           SDOperand Op2 = getValue(I.getOperand(1));
2021           setValue(&I, DAG.getNode(ISD::FNEG, Op2.getValueType(), Op2));
2022           return;
2023         }
2024       }
2025     }
2026   }
2027   if (Ty->isFloatingPoint()) {
2028     if (ConstantFP *CFP = dyn_cast<ConstantFP>(I.getOperand(0)))
2029       if (CFP->isExactlyValue(ConstantFP::getNegativeZero(Ty)->getValueAPF())) {
2030         SDOperand Op2 = getValue(I.getOperand(1));
2031         setValue(&I, DAG.getNode(ISD::FNEG, Op2.getValueType(), Op2));
2032         return;
2033       }
2034   }
2035
2036   visitBinary(I, Ty->isFPOrFPVector() ? ISD::FSUB : ISD::SUB);
2037 }
2038
2039 void SelectionDAGLowering::visitBinary(User &I, unsigned OpCode) {
2040   SDOperand Op1 = getValue(I.getOperand(0));
2041   SDOperand Op2 = getValue(I.getOperand(1));
2042   
2043   setValue(&I, DAG.getNode(OpCode, Op1.getValueType(), Op1, Op2));
2044 }
2045
2046 void SelectionDAGLowering::visitShift(User &I, unsigned Opcode) {
2047   SDOperand Op1 = getValue(I.getOperand(0));
2048   SDOperand Op2 = getValue(I.getOperand(1));
2049   
2050   if (MVT::getSizeInBits(TLI.getShiftAmountTy()) <
2051       MVT::getSizeInBits(Op2.getValueType()))
2052     Op2 = DAG.getNode(ISD::TRUNCATE, TLI.getShiftAmountTy(), Op2);
2053   else if (TLI.getShiftAmountTy() > Op2.getValueType())
2054     Op2 = DAG.getNode(ISD::ANY_EXTEND, TLI.getShiftAmountTy(), Op2);
2055   
2056   setValue(&I, DAG.getNode(Opcode, Op1.getValueType(), Op1, Op2));
2057 }
2058
2059 void SelectionDAGLowering::visitICmp(User &I) {
2060   ICmpInst::Predicate predicate = ICmpInst::BAD_ICMP_PREDICATE;
2061   if (ICmpInst *IC = dyn_cast<ICmpInst>(&I))
2062     predicate = IC->getPredicate();
2063   else if (ConstantExpr *IC = dyn_cast<ConstantExpr>(&I))
2064     predicate = ICmpInst::Predicate(IC->getPredicate());
2065   SDOperand Op1 = getValue(I.getOperand(0));
2066   SDOperand Op2 = getValue(I.getOperand(1));
2067   ISD::CondCode Opcode;
2068   switch (predicate) {
2069     case ICmpInst::ICMP_EQ  : Opcode = ISD::SETEQ; break;
2070     case ICmpInst::ICMP_NE  : Opcode = ISD::SETNE; break;
2071     case ICmpInst::ICMP_UGT : Opcode = ISD::SETUGT; break;
2072     case ICmpInst::ICMP_UGE : Opcode = ISD::SETUGE; break;
2073     case ICmpInst::ICMP_ULT : Opcode = ISD::SETULT; break;
2074     case ICmpInst::ICMP_ULE : Opcode = ISD::SETULE; break;
2075     case ICmpInst::ICMP_SGT : Opcode = ISD::SETGT; break;
2076     case ICmpInst::ICMP_SGE : Opcode = ISD::SETGE; break;
2077     case ICmpInst::ICMP_SLT : Opcode = ISD::SETLT; break;
2078     case ICmpInst::ICMP_SLE : Opcode = ISD::SETLE; break;
2079     default:
2080       assert(!"Invalid ICmp predicate value");
2081       Opcode = ISD::SETEQ;
2082       break;
2083   }
2084   setValue(&I, DAG.getSetCC(MVT::i1, Op1, Op2, Opcode));
2085 }
2086
2087 void SelectionDAGLowering::visitFCmp(User &I) {
2088   FCmpInst::Predicate predicate = FCmpInst::BAD_FCMP_PREDICATE;
2089   if (FCmpInst *FC = dyn_cast<FCmpInst>(&I))
2090     predicate = FC->getPredicate();
2091   else if (ConstantExpr *FC = dyn_cast<ConstantExpr>(&I))
2092     predicate = FCmpInst::Predicate(FC->getPredicate());
2093   SDOperand Op1 = getValue(I.getOperand(0));
2094   SDOperand Op2 = getValue(I.getOperand(1));
2095   ISD::CondCode Condition, FOC, FPC;
2096   switch (predicate) {
2097     case FCmpInst::FCMP_FALSE: FOC = FPC = ISD::SETFALSE; break;
2098     case FCmpInst::FCMP_OEQ:   FOC = ISD::SETEQ; FPC = ISD::SETOEQ; break;
2099     case FCmpInst::FCMP_OGT:   FOC = ISD::SETGT; FPC = ISD::SETOGT; break;
2100     case FCmpInst::FCMP_OGE:   FOC = ISD::SETGE; FPC = ISD::SETOGE; break;
2101     case FCmpInst::FCMP_OLT:   FOC = ISD::SETLT; FPC = ISD::SETOLT; break;
2102     case FCmpInst::FCMP_OLE:   FOC = ISD::SETLE; FPC = ISD::SETOLE; break;
2103     case FCmpInst::FCMP_ONE:   FOC = ISD::SETNE; FPC = ISD::SETONE; break;
2104     case FCmpInst::FCMP_ORD:   FOC = ISD::SETEQ; FPC = ISD::SETO;   break;
2105     case FCmpInst::FCMP_UNO:   FOC = ISD::SETNE; FPC = ISD::SETUO;  break;
2106     case FCmpInst::FCMP_UEQ:   FOC = ISD::SETEQ; FPC = ISD::SETUEQ; break;
2107     case FCmpInst::FCMP_UGT:   FOC = ISD::SETGT; FPC = ISD::SETUGT; break;
2108     case FCmpInst::FCMP_UGE:   FOC = ISD::SETGE; FPC = ISD::SETUGE; break;
2109     case FCmpInst::FCMP_ULT:   FOC = ISD::SETLT; FPC = ISD::SETULT; break;
2110     case FCmpInst::FCMP_ULE:   FOC = ISD::SETLE; FPC = ISD::SETULE; break;
2111     case FCmpInst::FCMP_UNE:   FOC = ISD::SETNE; FPC = ISD::SETUNE; break;
2112     case FCmpInst::FCMP_TRUE:  FOC = FPC = ISD::SETTRUE; break;
2113     default:
2114       assert(!"Invalid FCmp predicate value");
2115       FOC = FPC = ISD::SETFALSE;
2116       break;
2117   }
2118   if (FiniteOnlyFPMath())
2119     Condition = FOC;
2120   else 
2121     Condition = FPC;
2122   setValue(&I, DAG.getSetCC(MVT::i1, Op1, Op2, Condition));
2123 }
2124
2125 void SelectionDAGLowering::visitSelect(User &I) {
2126   SDOperand Cond     = getValue(I.getOperand(0));
2127   SDOperand TrueVal  = getValue(I.getOperand(1));
2128   SDOperand FalseVal = getValue(I.getOperand(2));
2129   setValue(&I, DAG.getNode(ISD::SELECT, TrueVal.getValueType(), Cond,
2130                            TrueVal, FalseVal));
2131 }
2132
2133
2134 void SelectionDAGLowering::visitTrunc(User &I) {
2135   // TruncInst cannot be a no-op cast because sizeof(src) > sizeof(dest).
2136   SDOperand N = getValue(I.getOperand(0));
2137   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2138   setValue(&I, DAG.getNode(ISD::TRUNCATE, DestVT, N));
2139 }
2140
2141 void SelectionDAGLowering::visitZExt(User &I) {
2142   // ZExt cannot be a no-op cast because sizeof(src) < sizeof(dest).
2143   // ZExt also can't be a cast to bool for same reason. So, nothing much to do
2144   SDOperand N = getValue(I.getOperand(0));
2145   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2146   setValue(&I, DAG.getNode(ISD::ZERO_EXTEND, DestVT, N));
2147 }
2148
2149 void SelectionDAGLowering::visitSExt(User &I) {
2150   // SExt cannot be a no-op cast because sizeof(src) < sizeof(dest).
2151   // SExt also can't be a cast to bool for same reason. So, nothing much to do
2152   SDOperand N = getValue(I.getOperand(0));
2153   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2154   setValue(&I, DAG.getNode(ISD::SIGN_EXTEND, DestVT, N));
2155 }
2156
2157 void SelectionDAGLowering::visitFPTrunc(User &I) {
2158   // FPTrunc is never a no-op cast, no need to check
2159   SDOperand N = getValue(I.getOperand(0));
2160   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2161   setValue(&I, DAG.getNode(ISD::FP_ROUND, DestVT, N, DAG.getIntPtrConstant(0)));
2162 }
2163
2164 void SelectionDAGLowering::visitFPExt(User &I){ 
2165   // FPTrunc is never a no-op cast, no need to check
2166   SDOperand N = getValue(I.getOperand(0));
2167   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2168   setValue(&I, DAG.getNode(ISD::FP_EXTEND, DestVT, N));
2169 }
2170
2171 void SelectionDAGLowering::visitFPToUI(User &I) { 
2172   // FPToUI is never a no-op cast, no need to check
2173   SDOperand N = getValue(I.getOperand(0));
2174   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2175   setValue(&I, DAG.getNode(ISD::FP_TO_UINT, DestVT, N));
2176 }
2177
2178 void SelectionDAGLowering::visitFPToSI(User &I) {
2179   // FPToSI is never a no-op cast, no need to check
2180   SDOperand N = getValue(I.getOperand(0));
2181   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2182   setValue(&I, DAG.getNode(ISD::FP_TO_SINT, DestVT, N));
2183 }
2184
2185 void SelectionDAGLowering::visitUIToFP(User &I) { 
2186   // UIToFP is never a no-op cast, no need to check
2187   SDOperand N = getValue(I.getOperand(0));
2188   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2189   setValue(&I, DAG.getNode(ISD::UINT_TO_FP, DestVT, N));
2190 }
2191
2192 void SelectionDAGLowering::visitSIToFP(User &I){ 
2193   // UIToFP is never a no-op cast, no need to check
2194   SDOperand N = getValue(I.getOperand(0));
2195   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2196   setValue(&I, DAG.getNode(ISD::SINT_TO_FP, DestVT, N));
2197 }
2198
2199 void SelectionDAGLowering::visitPtrToInt(User &I) {
2200   // What to do depends on the size of the integer and the size of the pointer.
2201   // We can either truncate, zero extend, or no-op, accordingly.
2202   SDOperand N = getValue(I.getOperand(0));
2203   MVT::ValueType SrcVT = N.getValueType();
2204   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2205   SDOperand Result;
2206   if (MVT::getSizeInBits(DestVT) < MVT::getSizeInBits(SrcVT))
2207     Result = DAG.getNode(ISD::TRUNCATE, DestVT, N);
2208   else 
2209     // Note: ZERO_EXTEND can handle cases where the sizes are equal too
2210     Result = DAG.getNode(ISD::ZERO_EXTEND, DestVT, N);
2211   setValue(&I, Result);
2212 }
2213
2214 void SelectionDAGLowering::visitIntToPtr(User &I) {
2215   // What to do depends on the size of the integer and the size of the pointer.
2216   // We can either truncate, zero extend, or no-op, accordingly.
2217   SDOperand N = getValue(I.getOperand(0));
2218   MVT::ValueType SrcVT = N.getValueType();
2219   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2220   if (MVT::getSizeInBits(DestVT) < MVT::getSizeInBits(SrcVT))
2221     setValue(&I, DAG.getNode(ISD::TRUNCATE, DestVT, N));
2222   else 
2223     // Note: ZERO_EXTEND can handle cases where the sizes are equal too
2224     setValue(&I, DAG.getNode(ISD::ZERO_EXTEND, DestVT, N));
2225 }
2226
2227 void SelectionDAGLowering::visitBitCast(User &I) { 
2228   SDOperand N = getValue(I.getOperand(0));
2229   MVT::ValueType DestVT = TLI.getValueType(I.getType());
2230
2231   // BitCast assures us that source and destination are the same size so this 
2232   // is either a BIT_CONVERT or a no-op.
2233   if (DestVT != N.getValueType())
2234     setValue(&I, DAG.getNode(ISD::BIT_CONVERT, DestVT, N)); // convert types
2235   else
2236     setValue(&I, N); // noop cast.
2237 }
2238
2239 void SelectionDAGLowering::visitInsertElement(User &I) {
2240   SDOperand InVec = getValue(I.getOperand(0));
2241   SDOperand InVal = getValue(I.getOperand(1));
2242   SDOperand InIdx = DAG.getNode(ISD::ZERO_EXTEND, TLI.getPointerTy(),
2243                                 getValue(I.getOperand(2)));
2244
2245   setValue(&I, DAG.getNode(ISD::INSERT_VECTOR_ELT,
2246                            TLI.getValueType(I.getType()),
2247                            InVec, InVal, InIdx));
2248 }
2249
2250 void SelectionDAGLowering::visitExtractElement(User &I) {
2251   SDOperand InVec = getValue(I.getOperand(0));
2252   SDOperand InIdx = DAG.getNode(ISD::ZERO_EXTEND, TLI.getPointerTy(),
2253                                 getValue(I.getOperand(1)));
2254   setValue(&I, DAG.getNode(ISD::EXTRACT_VECTOR_ELT,
2255                            TLI.getValueType(I.getType()), InVec, InIdx));
2256 }
2257
2258 void SelectionDAGLowering::visitShuffleVector(User &I) {
2259   SDOperand V1   = getValue(I.getOperand(0));
2260   SDOperand V2   = getValue(I.getOperand(1));
2261   SDOperand Mask = getValue(I.getOperand(2));
2262
2263   setValue(&I, DAG.getNode(ISD::VECTOR_SHUFFLE,
2264                            TLI.getValueType(I.getType()),
2265                            V1, V2, Mask));
2266 }
2267
2268
2269 void SelectionDAGLowering::visitGetElementPtr(User &I) {
2270   SDOperand N = getValue(I.getOperand(0));
2271   const Type *Ty = I.getOperand(0)->getType();
2272
2273   for (GetElementPtrInst::op_iterator OI = I.op_begin()+1, E = I.op_end();
2274        OI != E; ++OI) {
2275     Value *Idx = *OI;
2276     if (const StructType *StTy = dyn_cast<StructType>(Ty)) {
2277       unsigned Field = cast<ConstantInt>(Idx)->getZExtValue();
2278       if (Field) {
2279         // N = N + Offset
2280         uint64_t Offset = TD->getStructLayout(StTy)->getElementOffset(Field);
2281         N = DAG.getNode(ISD::ADD, N.getValueType(), N,
2282                         DAG.getIntPtrConstant(Offset));
2283       }
2284       Ty = StTy->getElementType(Field);
2285     } else {
2286       Ty = cast<SequentialType>(Ty)->getElementType();
2287
2288       // If this is a constant subscript, handle it quickly.
2289       if (ConstantInt *CI = dyn_cast<ConstantInt>(Idx)) {
2290         if (CI->getZExtValue() == 0) continue;
2291         uint64_t Offs = 
2292             TD->getABITypeSize(Ty)*cast<ConstantInt>(CI)->getSExtValue();
2293         N = DAG.getNode(ISD::ADD, N.getValueType(), N,
2294                         DAG.getIntPtrConstant(Offs));
2295         continue;
2296       }
2297       
2298       // N = N + Idx * ElementSize;
2299       uint64_t ElementSize = TD->getABITypeSize(Ty);
2300       SDOperand IdxN = getValue(Idx);
2301
2302       // If the index is smaller or larger than intptr_t, truncate or extend
2303       // it.
2304       if (IdxN.getValueType() < N.getValueType()) {
2305         IdxN = DAG.getNode(ISD::SIGN_EXTEND, N.getValueType(), IdxN);
2306       } else if (IdxN.getValueType() > N.getValueType())
2307         IdxN = DAG.getNode(ISD::TRUNCATE, N.getValueType(), IdxN);
2308
2309       // If this is a multiply by a power of two, turn it into a shl
2310       // immediately.  This is a very common case.
2311       if (isPowerOf2_64(ElementSize)) {
2312         unsigned Amt = Log2_64(ElementSize);
2313         IdxN = DAG.getNode(ISD::SHL, N.getValueType(), IdxN,
2314                            DAG.getConstant(Amt, TLI.getShiftAmountTy()));
2315         N = DAG.getNode(ISD::ADD, N.getValueType(), N, IdxN);
2316         continue;
2317       }
2318       
2319       SDOperand Scale = DAG.getIntPtrConstant(ElementSize);
2320       IdxN = DAG.getNode(ISD::MUL, N.getValueType(), IdxN, Scale);
2321       N = DAG.getNode(ISD::ADD, N.getValueType(), N, IdxN);
2322     }
2323   }
2324   setValue(&I, N);
2325 }
2326
2327 void SelectionDAGLowering::visitAlloca(AllocaInst &I) {
2328   // If this is a fixed sized alloca in the entry block of the function,
2329   // allocate it statically on the stack.
2330   if (FuncInfo.StaticAllocaMap.count(&I))
2331     return;   // getValue will auto-populate this.
2332
2333   const Type *Ty = I.getAllocatedType();
2334   uint64_t TySize = TLI.getTargetData()->getABITypeSize(Ty);
2335   unsigned Align =
2336     std::max((unsigned)TLI.getTargetData()->getPrefTypeAlignment(Ty),
2337              I.getAlignment());
2338
2339   SDOperand AllocSize = getValue(I.getArraySize());
2340   MVT::ValueType IntPtr = TLI.getPointerTy();
2341   if (IntPtr < AllocSize.getValueType())
2342     AllocSize = DAG.getNode(ISD::TRUNCATE, IntPtr, AllocSize);
2343   else if (IntPtr > AllocSize.getValueType())
2344     AllocSize = DAG.getNode(ISD::ZERO_EXTEND, IntPtr, AllocSize);
2345
2346   AllocSize = DAG.getNode(ISD::MUL, IntPtr, AllocSize,
2347                           DAG.getIntPtrConstant(TySize));
2348
2349   // Handle alignment.  If the requested alignment is less than or equal to
2350   // the stack alignment, ignore it.  If the size is greater than or equal to
2351   // the stack alignment, we note this in the DYNAMIC_STACKALLOC node.
2352   unsigned StackAlign =
2353     TLI.getTargetMachine().getFrameInfo()->getStackAlignment();
2354   if (Align <= StackAlign)
2355     Align = 0;
2356
2357   // Round the size of the allocation up to the stack alignment size
2358   // by add SA-1 to the size.
2359   AllocSize = DAG.getNode(ISD::ADD, AllocSize.getValueType(), AllocSize,
2360                           DAG.getIntPtrConstant(StackAlign-1));
2361   // Mask out the low bits for alignment purposes.
2362   AllocSize = DAG.getNode(ISD::AND, AllocSize.getValueType(), AllocSize,
2363                           DAG.getIntPtrConstant(~(uint64_t)(StackAlign-1)));
2364
2365   SDOperand Ops[] = { getRoot(), AllocSize, DAG.getIntPtrConstant(Align) };
2366   const MVT::ValueType *VTs = DAG.getNodeValueTypes(AllocSize.getValueType(),
2367                                                     MVT::Other);
2368   SDOperand DSA = DAG.getNode(ISD::DYNAMIC_STACKALLOC, VTs, 2, Ops, 3);
2369   setValue(&I, DSA);
2370   DAG.setRoot(DSA.getValue(1));
2371
2372   // Inform the Frame Information that we have just allocated a variable-sized
2373   // object.
2374   CurMBB->getParent()->getFrameInfo()->CreateVariableSizedObject();
2375 }
2376
2377 void SelectionDAGLowering::visitLoad(LoadInst &I) {
2378   SDOperand Ptr = getValue(I.getOperand(0));
2379
2380   SDOperand Root;
2381   if (I.isVolatile())
2382     Root = getRoot();
2383   else {
2384     // Do not serialize non-volatile loads against each other.
2385     Root = DAG.getRoot();
2386   }
2387
2388   setValue(&I, getLoadFrom(I.getType(), Ptr, I.getOperand(0),
2389                            Root, I.isVolatile(), I.getAlignment()));
2390 }
2391
2392 SDOperand SelectionDAGLowering::getLoadFrom(const Type *Ty, SDOperand Ptr,
2393                                             const Value *SV, SDOperand Root,
2394                                             bool isVolatile, 
2395                                             unsigned Alignment) {
2396   SDOperand L =
2397     DAG.getLoad(TLI.getValueType(Ty), Root, Ptr, SV, 0, 
2398                 isVolatile, Alignment);
2399
2400   if (isVolatile)
2401     DAG.setRoot(L.getValue(1));
2402   else
2403     PendingLoads.push_back(L.getValue(1));
2404   
2405   return L;
2406 }
2407
2408
2409 void SelectionDAGLowering::visitStore(StoreInst &I) {
2410   Value *SrcV = I.getOperand(0);
2411   SDOperand Src = getValue(SrcV);
2412   SDOperand Ptr = getValue(I.getOperand(1));
2413   DAG.setRoot(DAG.getStore(getRoot(), Src, Ptr, I.getOperand(1), 0,
2414                            I.isVolatile(), I.getAlignment()));
2415 }
2416
2417 /// visitTargetIntrinsic - Lower a call of a target intrinsic to an INTRINSIC
2418 /// node.
2419 void SelectionDAGLowering::visitTargetIntrinsic(CallInst &I, 
2420                                                 unsigned Intrinsic) {
2421   bool HasChain = !I.doesNotAccessMemory();
2422   bool OnlyLoad = HasChain && I.onlyReadsMemory();
2423
2424   // Build the operand list.
2425   SmallVector<SDOperand, 8> Ops;
2426   if (HasChain) {  // If this intrinsic has side-effects, chainify it.
2427     if (OnlyLoad) {
2428       // We don't need to serialize loads against other loads.
2429       Ops.push_back(DAG.getRoot());
2430     } else { 
2431       Ops.push_back(getRoot());
2432     }
2433   }
2434   
2435   // Add the intrinsic ID as an integer operand.
2436   Ops.push_back(DAG.getConstant(Intrinsic, TLI.getPointerTy()));
2437
2438   // Add all operands of the call to the operand list.
2439   for (unsigned i = 1, e = I.getNumOperands(); i != e; ++i) {
2440     SDOperand Op = getValue(I.getOperand(i));
2441     assert(TLI.isTypeLegal(Op.getValueType()) &&
2442            "Intrinsic uses a non-legal type?");
2443     Ops.push_back(Op);
2444   }
2445
2446   std::vector<MVT::ValueType> VTs;
2447   if (I.getType() != Type::VoidTy) {
2448     MVT::ValueType VT = TLI.getValueType(I.getType());
2449     if (MVT::isVector(VT)) {
2450       const VectorType *DestTy = cast<VectorType>(I.getType());
2451       MVT::ValueType EltVT = TLI.getValueType(DestTy->getElementType());
2452       
2453       VT = MVT::getVectorType(EltVT, DestTy->getNumElements());
2454       assert(VT != MVT::Other && "Intrinsic uses a non-legal type?");
2455     }
2456     
2457     assert(TLI.isTypeLegal(VT) && "Intrinsic uses a non-legal type?");
2458     VTs.push_back(VT);
2459   }
2460   if (HasChain)
2461     VTs.push_back(MVT::Other);
2462
2463   const MVT::ValueType *VTList = DAG.getNodeValueTypes(VTs);
2464
2465   // Create the node.
2466   SDOperand Result;
2467   if (!HasChain)
2468     Result = DAG.getNode(ISD::INTRINSIC_WO_CHAIN, VTList, VTs.size(),
2469                          &Ops[0], Ops.size());
2470   else if (I.getType() != Type::VoidTy)
2471     Result = DAG.getNode(ISD::INTRINSIC_W_CHAIN, VTList, VTs.size(),
2472                          &Ops[0], Ops.size());
2473   else
2474     Result = DAG.getNode(ISD::INTRINSIC_VOID, VTList, VTs.size(),
2475                          &Ops[0], Ops.size());
2476
2477   if (HasChain) {
2478     SDOperand Chain = Result.getValue(Result.Val->getNumValues()-1);
2479     if (OnlyLoad)
2480       PendingLoads.push_back(Chain);
2481     else
2482       DAG.setRoot(Chain);
2483   }
2484   if (I.getType() != Type::VoidTy) {
2485     if (const VectorType *PTy = dyn_cast<VectorType>(I.getType())) {
2486       MVT::ValueType VT = TLI.getValueType(PTy);
2487       Result = DAG.getNode(ISD::BIT_CONVERT, VT, Result);
2488     } 
2489     setValue(&I, Result);
2490   }
2491 }
2492
2493 /// ExtractTypeInfo - Returns the type info, possibly bitcast, encoded in V.
2494 static GlobalVariable *ExtractTypeInfo (Value *V) {
2495   V = IntrinsicInst::StripPointerCasts(V);
2496   GlobalVariable *GV = dyn_cast<GlobalVariable>(V);
2497   assert (GV || isa<ConstantPointerNull>(V) &&
2498           "TypeInfo must be a global variable or NULL");
2499   return GV;
2500 }
2501
2502 /// addCatchInfo - Extract the personality and type infos from an eh.selector
2503 /// call, and add them to the specified machine basic block.
2504 static void addCatchInfo(CallInst &I, MachineModuleInfo *MMI,
2505                          MachineBasicBlock *MBB) {
2506   // Inform the MachineModuleInfo of the personality for this landing pad.
2507   ConstantExpr *CE = cast<ConstantExpr>(I.getOperand(2));
2508   assert(CE->getOpcode() == Instruction::BitCast &&
2509          isa<Function>(CE->getOperand(0)) &&
2510          "Personality should be a function");
2511   MMI->addPersonality(MBB, cast<Function>(CE->getOperand(0)));
2512
2513   // Gather all the type infos for this landing pad and pass them along to
2514   // MachineModuleInfo.
2515   std::vector<GlobalVariable *> TyInfo;
2516   unsigned N = I.getNumOperands();
2517
2518   for (unsigned i = N - 1; i > 2; --i) {
2519     if (ConstantInt *CI = dyn_cast<ConstantInt>(I.getOperand(i))) {
2520       unsigned FilterLength = CI->getZExtValue();
2521       unsigned FirstCatch = i + FilterLength + !FilterLength;
2522       assert (FirstCatch <= N && "Invalid filter length");
2523
2524       if (FirstCatch < N) {
2525         TyInfo.reserve(N - FirstCatch);
2526         for (unsigned j = FirstCatch; j < N; ++j)
2527           TyInfo.push_back(ExtractTypeInfo(I.getOperand(j)));
2528         MMI->addCatchTypeInfo(MBB, TyInfo);
2529         TyInfo.clear();
2530       }
2531
2532       if (!FilterLength) {
2533         // Cleanup.
2534         MMI->addCleanup(MBB);
2535       } else {
2536         // Filter.
2537         TyInfo.reserve(FilterLength - 1);
2538         for (unsigned j = i + 1; j < FirstCatch; ++j)
2539           TyInfo.push_back(ExtractTypeInfo(I.getOperand(j)));
2540         MMI->addFilterTypeInfo(MBB, TyInfo);
2541         TyInfo.clear();
2542       }
2543
2544       N = i;
2545     }
2546   }
2547
2548   if (N > 3) {
2549     TyInfo.reserve(N - 3);
2550     for (unsigned j = 3; j < N; ++j)
2551       TyInfo.push_back(ExtractTypeInfo(I.getOperand(j)));
2552     MMI->addCatchTypeInfo(MBB, TyInfo);
2553   }
2554 }
2555
2556 /// visitIntrinsicCall - Lower the call to the specified intrinsic function.  If
2557 /// we want to emit this as a call to a named external function, return the name
2558 /// otherwise lower it and return null.
2559 const char *
2560 SelectionDAGLowering::visitIntrinsicCall(CallInst &I, unsigned Intrinsic) {
2561   switch (Intrinsic) {
2562   default:
2563     // By default, turn this into a target intrinsic node.
2564     visitTargetIntrinsic(I, Intrinsic);
2565     return 0;
2566   case Intrinsic::vastart:  visitVAStart(I); return 0;
2567   case Intrinsic::vaend:    visitVAEnd(I); return 0;
2568   case Intrinsic::vacopy:   visitVACopy(I); return 0;
2569   case Intrinsic::returnaddress:
2570     setValue(&I, DAG.getNode(ISD::RETURNADDR, TLI.getPointerTy(),
2571                              getValue(I.getOperand(1))));
2572     return 0;
2573   case Intrinsic::frameaddress:
2574     setValue(&I, DAG.getNode(ISD::FRAMEADDR, TLI.getPointerTy(),
2575                              getValue(I.getOperand(1))));
2576     return 0;
2577   case Intrinsic::setjmp:
2578     return "_setjmp"+!TLI.usesUnderscoreSetJmp();
2579     break;
2580   case Intrinsic::longjmp:
2581     return "_longjmp"+!TLI.usesUnderscoreLongJmp();
2582     break;
2583   case Intrinsic::memcpy_i32:
2584   case Intrinsic::memcpy_i64:
2585     visitMemIntrinsic(I, ISD::MEMCPY);
2586     return 0;
2587   case Intrinsic::memset_i32:
2588   case Intrinsic::memset_i64:
2589     visitMemIntrinsic(I, ISD::MEMSET);
2590     return 0;
2591   case Intrinsic::memmove_i32:
2592   case Intrinsic::memmove_i64:
2593     visitMemIntrinsic(I, ISD::MEMMOVE);
2594     return 0;
2595     
2596   case Intrinsic::dbg_stoppoint: {
2597     MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2598     DbgStopPointInst &SPI = cast<DbgStopPointInst>(I);
2599     if (MMI && SPI.getContext() && MMI->Verify(SPI.getContext())) {
2600       SDOperand Ops[5];
2601
2602       Ops[0] = getRoot();
2603       Ops[1] = getValue(SPI.getLineValue());
2604       Ops[2] = getValue(SPI.getColumnValue());
2605
2606       DebugInfoDesc *DD = MMI->getDescFor(SPI.getContext());
2607       assert(DD && "Not a debug information descriptor");
2608       CompileUnitDesc *CompileUnit = cast<CompileUnitDesc>(DD);
2609       
2610       Ops[3] = DAG.getString(CompileUnit->getFileName());
2611       Ops[4] = DAG.getString(CompileUnit->getDirectory());
2612       
2613       DAG.setRoot(DAG.getNode(ISD::LOCATION, MVT::Other, Ops, 5));
2614     }
2615
2616     return 0;
2617   }
2618   case Intrinsic::dbg_region_start: {
2619     MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2620     DbgRegionStartInst &RSI = cast<DbgRegionStartInst>(I);
2621     if (MMI && RSI.getContext() && MMI->Verify(RSI.getContext())) {
2622       unsigned LabelID = MMI->RecordRegionStart(RSI.getContext());
2623       DAG.setRoot(DAG.getNode(ISD::LABEL, MVT::Other, getRoot(),
2624                               DAG.getConstant(LabelID, MVT::i32)));
2625     }
2626
2627     return 0;
2628   }
2629   case Intrinsic::dbg_region_end: {
2630     MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2631     DbgRegionEndInst &REI = cast<DbgRegionEndInst>(I);
2632     if (MMI && REI.getContext() && MMI->Verify(REI.getContext())) {
2633       unsigned LabelID = MMI->RecordRegionEnd(REI.getContext());
2634       DAG.setRoot(DAG.getNode(ISD::LABEL, MVT::Other,
2635                               getRoot(), DAG.getConstant(LabelID, MVT::i32)));
2636     }
2637
2638     return 0;
2639   }
2640   case Intrinsic::dbg_func_start: {
2641     MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2642     DbgFuncStartInst &FSI = cast<DbgFuncStartInst>(I);
2643     if (MMI && FSI.getSubprogram() &&
2644         MMI->Verify(FSI.getSubprogram())) {
2645       unsigned LabelID = MMI->RecordRegionStart(FSI.getSubprogram());
2646       DAG.setRoot(DAG.getNode(ISD::LABEL, MVT::Other,
2647                   getRoot(), DAG.getConstant(LabelID, MVT::i32)));
2648     }
2649
2650     return 0;
2651   }
2652   case Intrinsic::dbg_declare: {
2653     MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2654     DbgDeclareInst &DI = cast<DbgDeclareInst>(I);
2655     if (MMI && DI.getVariable() && MMI->Verify(DI.getVariable())) {
2656       SDOperand AddressOp  = getValue(DI.getAddress());
2657       if (FrameIndexSDNode *FI = dyn_cast<FrameIndexSDNode>(AddressOp))
2658         MMI->RecordVariable(DI.getVariable(), FI->getIndex());
2659     }
2660
2661     return 0;
2662   }
2663     
2664   case Intrinsic::eh_exception: {
2665     if (ExceptionHandling) {
2666       if (!CurMBB->isLandingPad()) {
2667         // FIXME: Mark exception register as live in.  Hack for PR1508.
2668         unsigned Reg = TLI.getExceptionAddressRegister();
2669         if (Reg) CurMBB->addLiveIn(Reg);
2670       }
2671       // Insert the EXCEPTIONADDR instruction.
2672       SDVTList VTs = DAG.getVTList(TLI.getPointerTy(), MVT::Other);
2673       SDOperand Ops[1];
2674       Ops[0] = DAG.getRoot();
2675       SDOperand Op = DAG.getNode(ISD::EXCEPTIONADDR, VTs, Ops, 1);
2676       setValue(&I, Op);
2677       DAG.setRoot(Op.getValue(1));
2678     } else {
2679       setValue(&I, DAG.getConstant(0, TLI.getPointerTy()));
2680     }
2681     return 0;
2682   }
2683
2684   case Intrinsic::eh_selector_i32:
2685   case Intrinsic::eh_selector_i64: {
2686     MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2687     MVT::ValueType VT = (Intrinsic == Intrinsic::eh_selector_i32 ?
2688                          MVT::i32 : MVT::i64);
2689     
2690     if (ExceptionHandling && MMI) {
2691       if (CurMBB->isLandingPad())
2692         addCatchInfo(I, MMI, CurMBB);
2693       else {
2694 #ifndef NDEBUG
2695         FuncInfo.CatchInfoLost.insert(&I);
2696 #endif
2697         // FIXME: Mark exception selector register as live in.  Hack for PR1508.
2698         unsigned Reg = TLI.getExceptionSelectorRegister();
2699         if (Reg) CurMBB->addLiveIn(Reg);
2700       }
2701
2702       // Insert the EHSELECTION instruction.
2703       SDVTList VTs = DAG.getVTList(VT, MVT::Other);
2704       SDOperand Ops[2];
2705       Ops[0] = getValue(I.getOperand(1));
2706       Ops[1] = getRoot();
2707       SDOperand Op = DAG.getNode(ISD::EHSELECTION, VTs, Ops, 2);
2708       setValue(&I, Op);
2709       DAG.setRoot(Op.getValue(1));
2710     } else {
2711       setValue(&I, DAG.getConstant(0, VT));
2712     }
2713     
2714     return 0;
2715   }
2716
2717   case Intrinsic::eh_typeid_for_i32:
2718   case Intrinsic::eh_typeid_for_i64: {
2719     MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2720     MVT::ValueType VT = (Intrinsic == Intrinsic::eh_typeid_for_i32 ?
2721                          MVT::i32 : MVT::i64);
2722     
2723     if (MMI) {
2724       // Find the type id for the given typeinfo.
2725       GlobalVariable *GV = ExtractTypeInfo(I.getOperand(1));
2726
2727       unsigned TypeID = MMI->getTypeIDFor(GV);
2728       setValue(&I, DAG.getConstant(TypeID, VT));
2729     } else {
2730       // Return something different to eh_selector.
2731       setValue(&I, DAG.getConstant(1, VT));
2732     }
2733
2734     return 0;
2735   }
2736
2737   case Intrinsic::eh_return: {
2738     MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2739
2740     if (MMI && ExceptionHandling) {
2741       MMI->setCallsEHReturn(true);
2742       DAG.setRoot(DAG.getNode(ISD::EH_RETURN,
2743                               MVT::Other,
2744                               getRoot(),
2745                               getValue(I.getOperand(1)),
2746                               getValue(I.getOperand(2))));
2747     } else {
2748       setValue(&I, DAG.getConstant(0, TLI.getPointerTy()));
2749     }
2750
2751     return 0;
2752   }
2753
2754    case Intrinsic::eh_unwind_init: {    
2755      if (MachineModuleInfo *MMI = DAG.getMachineModuleInfo()) {
2756        MMI->setCallsUnwindInit(true);
2757      }
2758
2759      return 0;
2760    }
2761
2762    case Intrinsic::eh_dwarf_cfa: {
2763      if (ExceptionHandling) {
2764        MVT::ValueType VT = getValue(I.getOperand(1)).getValueType();
2765        SDOperand CfaArg;
2766        if (MVT::getSizeInBits(VT) > MVT::getSizeInBits(TLI.getPointerTy()))
2767          CfaArg = DAG.getNode(ISD::TRUNCATE,
2768                               TLI.getPointerTy(), getValue(I.getOperand(1)));
2769        else
2770          CfaArg = DAG.getNode(ISD::SIGN_EXTEND,
2771                               TLI.getPointerTy(), getValue(I.getOperand(1)));
2772        
2773        SDOperand Offset = DAG.getNode(ISD::ADD,
2774                                       TLI.getPointerTy(),
2775                                       DAG.getNode(ISD::FRAME_TO_ARGS_OFFSET,
2776                                                   TLI.getPointerTy()),
2777                                       CfaArg);
2778        setValue(&I, DAG.getNode(ISD::ADD,
2779                                 TLI.getPointerTy(),
2780                                 DAG.getNode(ISD::FRAMEADDR,
2781                                             TLI.getPointerTy(),
2782                                             DAG.getConstant(0,
2783                                                             TLI.getPointerTy())),
2784                                 Offset));
2785      } else {
2786        setValue(&I, DAG.getConstant(0, TLI.getPointerTy()));
2787      }
2788
2789      return 0;
2790   }
2791
2792   case Intrinsic::sqrt:
2793     setValue(&I, DAG.getNode(ISD::FSQRT,
2794                              getValue(I.getOperand(1)).getValueType(),
2795                              getValue(I.getOperand(1))));
2796     return 0;
2797   case Intrinsic::powi:
2798     setValue(&I, DAG.getNode(ISD::FPOWI,
2799                              getValue(I.getOperand(1)).getValueType(),
2800                              getValue(I.getOperand(1)),
2801                              getValue(I.getOperand(2))));
2802     return 0;
2803   case Intrinsic::sin:
2804     setValue(&I, DAG.getNode(ISD::FSIN,
2805                              getValue(I.getOperand(1)).getValueType(),
2806                              getValue(I.getOperand(1))));
2807     return 0;
2808   case Intrinsic::cos:
2809     setValue(&I, DAG.getNode(ISD::FCOS,
2810                              getValue(I.getOperand(1)).getValueType(),
2811                              getValue(I.getOperand(1))));
2812     return 0;
2813   case Intrinsic::pow:
2814     setValue(&I, DAG.getNode(ISD::FPOW,
2815                              getValue(I.getOperand(1)).getValueType(),
2816                              getValue(I.getOperand(1)),
2817                              getValue(I.getOperand(2))));
2818     return 0;
2819   case Intrinsic::pcmarker: {
2820     SDOperand Tmp = getValue(I.getOperand(1));
2821     DAG.setRoot(DAG.getNode(ISD::PCMARKER, MVT::Other, getRoot(), Tmp));
2822     return 0;
2823   }
2824   case Intrinsic::readcyclecounter: {
2825     SDOperand Op = getRoot();
2826     SDOperand Tmp = DAG.getNode(ISD::READCYCLECOUNTER,
2827                                 DAG.getNodeValueTypes(MVT::i64, MVT::Other), 2,
2828                                 &Op, 1);
2829     setValue(&I, Tmp);
2830     DAG.setRoot(Tmp.getValue(1));
2831     return 0;
2832   }
2833   case Intrinsic::part_select: {
2834     // Currently not implemented: just abort
2835     assert(0 && "part_select intrinsic not implemented");
2836     abort();
2837   }
2838   case Intrinsic::part_set: {
2839     // Currently not implemented: just abort
2840     assert(0 && "part_set intrinsic not implemented");
2841     abort();
2842   }
2843   case Intrinsic::bswap:
2844     setValue(&I, DAG.getNode(ISD::BSWAP,
2845                              getValue(I.getOperand(1)).getValueType(),
2846                              getValue(I.getOperand(1))));
2847     return 0;
2848   case Intrinsic::cttz: {
2849     SDOperand Arg = getValue(I.getOperand(1));
2850     MVT::ValueType Ty = Arg.getValueType();
2851     SDOperand result = DAG.getNode(ISD::CTTZ, Ty, Arg);
2852     setValue(&I, result);
2853     return 0;
2854   }
2855   case Intrinsic::ctlz: {
2856     SDOperand Arg = getValue(I.getOperand(1));
2857     MVT::ValueType Ty = Arg.getValueType();
2858     SDOperand result = DAG.getNode(ISD::CTLZ, Ty, Arg);
2859     setValue(&I, result);
2860     return 0;
2861   }
2862   case Intrinsic::ctpop: {
2863     SDOperand Arg = getValue(I.getOperand(1));
2864     MVT::ValueType Ty = Arg.getValueType();
2865     SDOperand result = DAG.getNode(ISD::CTPOP, Ty, Arg);
2866     setValue(&I, result);
2867     return 0;
2868   }
2869   case Intrinsic::stacksave: {
2870     SDOperand Op = getRoot();
2871     SDOperand Tmp = DAG.getNode(ISD::STACKSAVE,
2872               DAG.getNodeValueTypes(TLI.getPointerTy(), MVT::Other), 2, &Op, 1);
2873     setValue(&I, Tmp);
2874     DAG.setRoot(Tmp.getValue(1));
2875     return 0;
2876   }
2877   case Intrinsic::stackrestore: {
2878     SDOperand Tmp = getValue(I.getOperand(1));
2879     DAG.setRoot(DAG.getNode(ISD::STACKRESTORE, MVT::Other, getRoot(), Tmp));
2880     return 0;
2881   }
2882   case Intrinsic::prefetch:
2883     // FIXME: Currently discarding prefetches.
2884     return 0;
2885   
2886   case Intrinsic::var_annotation:
2887     // Discard annotate attributes
2888     return 0;
2889
2890   case Intrinsic::init_trampoline: {
2891     const Function *F =
2892       cast<Function>(IntrinsicInst::StripPointerCasts(I.getOperand(2)));
2893
2894     SDOperand Ops[6];
2895     Ops[0] = getRoot();
2896     Ops[1] = getValue(I.getOperand(1));
2897     Ops[2] = getValue(I.getOperand(2));
2898     Ops[3] = getValue(I.getOperand(3));
2899     Ops[4] = DAG.getSrcValue(I.getOperand(1));
2900     Ops[5] = DAG.getSrcValue(F);
2901
2902     SDOperand Tmp = DAG.getNode(ISD::TRAMPOLINE,
2903                                 DAG.getNodeValueTypes(TLI.getPointerTy(),
2904                                                       MVT::Other), 2,
2905                                 Ops, 6);
2906
2907     setValue(&I, Tmp);
2908     DAG.setRoot(Tmp.getValue(1));
2909     return 0;
2910   }
2911
2912   case Intrinsic::gcroot:
2913     if (GCI) {
2914       Value *Alloca = I.getOperand(1);
2915       Constant *TypeMap = cast<Constant>(I.getOperand(2));
2916       
2917       FrameIndexSDNode *FI = cast<FrameIndexSDNode>(getValue(Alloca).Val);
2918       GCI->addStackRoot(FI->getIndex(), TypeMap);
2919     }
2920     return 0;
2921
2922   case Intrinsic::gcread:
2923   case Intrinsic::gcwrite:
2924     assert(0 && "Collector failed to lower gcread/gcwrite intrinsics!");
2925     return 0;
2926
2927   case Intrinsic::flt_rounds: {
2928     setValue(&I, DAG.getNode(ISD::FLT_ROUNDS_, MVT::i32));
2929     return 0;
2930   }
2931
2932   case Intrinsic::trap: {
2933     DAG.setRoot(DAG.getNode(ISD::TRAP, MVT::Other, getRoot()));
2934     return 0;
2935   }
2936   }
2937 }
2938
2939
2940 void SelectionDAGLowering::LowerCallTo(CallSite CS, SDOperand Callee,
2941                                        bool IsTailCall,
2942                                        MachineBasicBlock *LandingPad) {
2943   const PointerType *PT = cast<PointerType>(CS.getCalledValue()->getType());
2944   const FunctionType *FTy = cast<FunctionType>(PT->getElementType());
2945   MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
2946   unsigned BeginLabel = 0, EndLabel = 0;
2947
2948   TargetLowering::ArgListTy Args;
2949   TargetLowering::ArgListEntry Entry;
2950   Args.reserve(CS.arg_size());
2951   for (CallSite::arg_iterator i = CS.arg_begin(), e = CS.arg_end();
2952        i != e; ++i) {
2953     SDOperand ArgNode = getValue(*i);
2954     Entry.Node = ArgNode; Entry.Ty = (*i)->getType();
2955
2956     unsigned attrInd = i - CS.arg_begin() + 1;
2957     Entry.isSExt  = CS.paramHasAttr(attrInd, ParamAttr::SExt);
2958     Entry.isZExt  = CS.paramHasAttr(attrInd, ParamAttr::ZExt);
2959     Entry.isInReg = CS.paramHasAttr(attrInd, ParamAttr::InReg);
2960     Entry.isSRet  = CS.paramHasAttr(attrInd, ParamAttr::StructRet);
2961     Entry.isNest  = CS.paramHasAttr(attrInd, ParamAttr::Nest);
2962     Entry.isByVal = CS.paramHasAttr(attrInd, ParamAttr::ByVal);
2963     Args.push_back(Entry);
2964   }
2965
2966   bool MarkTryRange = LandingPad ||
2967     // C++ requires special handling of 'nounwind' calls.
2968     (CS.doesNotThrow());
2969
2970   if (MarkTryRange && ExceptionHandling && MMI) {
2971     // Insert a label before the invoke call to mark the try range.  This can be
2972     // used to detect deletion of the invoke via the MachineModuleInfo.
2973     BeginLabel = MMI->NextLabelID();
2974     DAG.setRoot(DAG.getNode(ISD::LABEL, MVT::Other, getRoot(),
2975                             DAG.getConstant(BeginLabel, MVT::i32)));
2976   }
2977
2978   std::pair<SDOperand,SDOperand> Result =
2979     TLI.LowerCallTo(getRoot(), CS.getType(),
2980                     CS.paramHasAttr(0, ParamAttr::SExt),
2981                     FTy->isVarArg(), CS.getCallingConv(), IsTailCall,
2982                     Callee, Args, DAG);
2983   if (CS.getType() != Type::VoidTy)
2984     setValue(CS.getInstruction(), Result.first);
2985   DAG.setRoot(Result.second);
2986
2987   if (MarkTryRange && ExceptionHandling && MMI) {
2988     // Insert a label at the end of the invoke call to mark the try range.  This
2989     // can be used to detect deletion of the invoke via the MachineModuleInfo.
2990     EndLabel = MMI->NextLabelID();
2991     DAG.setRoot(DAG.getNode(ISD::LABEL, MVT::Other, getRoot(),
2992                             DAG.getConstant(EndLabel, MVT::i32)));
2993
2994     // Inform MachineModuleInfo of range.
2995     MMI->addInvoke(LandingPad, BeginLabel, EndLabel);
2996   }
2997 }
2998
2999
3000 void SelectionDAGLowering::visitCall(CallInst &I) {
3001   const char *RenameFn = 0;
3002   if (Function *F = I.getCalledFunction()) {
3003     if (F->isDeclaration()) {
3004       if (unsigned IID = F->getIntrinsicID()) {
3005         RenameFn = visitIntrinsicCall(I, IID);
3006         if (!RenameFn)
3007           return;
3008       }
3009     }
3010
3011     // Check for well-known libc/libm calls.  If the function is internal, it
3012     // can't be a library call.
3013     unsigned NameLen = F->getNameLen();
3014     if (!F->hasInternalLinkage() && NameLen) {
3015       const char *NameStr = F->getNameStart();
3016       if (NameStr[0] == 'c' &&
3017           ((NameLen == 8 && !strcmp(NameStr, "copysign")) ||
3018            (NameLen == 9 && !strcmp(NameStr, "copysignf")))) {
3019         if (I.getNumOperands() == 3 &&   // Basic sanity checks.
3020             I.getOperand(1)->getType()->isFloatingPoint() &&
3021             I.getType() == I.getOperand(1)->getType() &&
3022             I.getType() == I.getOperand(2)->getType()) {
3023           SDOperand LHS = getValue(I.getOperand(1));
3024           SDOperand RHS = getValue(I.getOperand(2));
3025           setValue(&I, DAG.getNode(ISD::FCOPYSIGN, LHS.getValueType(),
3026                                    LHS, RHS));
3027           return;
3028         }
3029       } else if (NameStr[0] == 'f' &&
3030                  ((NameLen == 4 && !strcmp(NameStr, "fabs")) ||
3031                   (NameLen == 5 && !strcmp(NameStr, "fabsf")) ||
3032                   (NameLen == 5 && !strcmp(NameStr, "fabsl")))) {
3033         if (I.getNumOperands() == 2 &&   // Basic sanity checks.
3034             I.getOperand(1)->getType()->isFloatingPoint() &&
3035             I.getType() == I.getOperand(1)->getType()) {
3036           SDOperand Tmp = getValue(I.getOperand(1));
3037           setValue(&I, DAG.getNode(ISD::FABS, Tmp.getValueType(), Tmp));
3038           return;
3039         }
3040       } else if (NameStr[0] == 's' && 
3041                  ((NameLen == 3 && !strcmp(NameStr, "sin")) ||
3042                   (NameLen == 4 && !strcmp(NameStr, "sinf")) ||
3043                   (NameLen == 4 && !strcmp(NameStr, "sinl")))) {
3044         if (I.getNumOperands() == 2 &&   // Basic sanity checks.
3045             I.getOperand(1)->getType()->isFloatingPoint() &&
3046             I.getType() == I.getOperand(1)->getType()) {
3047           SDOperand Tmp = getValue(I.getOperand(1));
3048           setValue(&I, DAG.getNode(ISD::FSIN, Tmp.getValueType(), Tmp));
3049           return;
3050         }
3051       } else if (NameStr[0] == 'c' &&
3052                  ((NameLen == 3 && !strcmp(NameStr, "cos")) ||
3053                   (NameLen == 4 && !strcmp(NameStr, "cosf")) ||
3054                   (NameLen == 4 && !strcmp(NameStr, "cosl")))) {
3055         if (I.getNumOperands() == 2 &&   // Basic sanity checks.
3056             I.getOperand(1)->getType()->isFloatingPoint() &&
3057             I.getType() == I.getOperand(1)->getType()) {
3058           SDOperand Tmp = getValue(I.getOperand(1));
3059           setValue(&I, DAG.getNode(ISD::FCOS, Tmp.getValueType(), Tmp));
3060           return;
3061         }
3062       }
3063     }
3064   } else if (isa<InlineAsm>(I.getOperand(0))) {
3065     visitInlineAsm(&I);
3066     return;
3067   }
3068
3069   SDOperand Callee;
3070   if (!RenameFn)
3071     Callee = getValue(I.getOperand(0));
3072   else
3073     Callee = DAG.getExternalSymbol(RenameFn, TLI.getPointerTy());
3074
3075   LowerCallTo(&I, Callee, I.isTailCall());
3076 }
3077
3078
3079 /// getCopyFromRegs - Emit a series of CopyFromReg nodes that copies from
3080 /// this value and returns the result as a ValueVT value.  This uses 
3081 /// Chain/Flag as the input and updates them for the output Chain/Flag.
3082 /// If the Flag pointer is NULL, no flag is used.
3083 SDOperand RegsForValue::getCopyFromRegs(SelectionDAG &DAG,
3084                                         SDOperand &Chain, SDOperand *Flag)const{
3085   // Copy the legal parts from the registers.
3086   unsigned NumParts = Regs.size();
3087   SmallVector<SDOperand, 8> Parts(NumParts);
3088   for (unsigned i = 0; i != NumParts; ++i) {
3089     SDOperand Part = Flag ?
3090                      DAG.getCopyFromReg(Chain, Regs[i], RegVT, *Flag) :
3091                      DAG.getCopyFromReg(Chain, Regs[i], RegVT);
3092     Chain = Part.getValue(1);
3093     if (Flag)
3094       *Flag = Part.getValue(2);
3095     Parts[i] = Part;
3096   }
3097   
3098   // Assemble the legal parts into the final value.
3099   return getCopyFromParts(DAG, &Parts[0], NumParts, RegVT, ValueVT);
3100 }
3101
3102 /// getCopyToRegs - Emit a series of CopyToReg nodes that copies the
3103 /// specified value into the registers specified by this object.  This uses 
3104 /// Chain/Flag as the input and updates them for the output Chain/Flag.
3105 /// If the Flag pointer is NULL, no flag is used.
3106 void RegsForValue::getCopyToRegs(SDOperand Val, SelectionDAG &DAG,
3107                                  SDOperand &Chain, SDOperand *Flag) const {
3108   // Get the list of the values's legal parts.
3109   unsigned NumParts = Regs.size();
3110   SmallVector<SDOperand, 8> Parts(NumParts);
3111   getCopyToParts(DAG, Val, &Parts[0], NumParts, RegVT);
3112
3113   // Copy the parts into the registers.
3114   for (unsigned i = 0; i != NumParts; ++i) {
3115     SDOperand Part = Flag ?
3116                      DAG.getCopyToReg(Chain, Regs[i], Parts[i], *Flag) :
3117                      DAG.getCopyToReg(Chain, Regs[i], Parts[i]);
3118     Chain = Part.getValue(0);
3119     if (Flag)
3120       *Flag = Part.getValue(1);
3121   }
3122 }
3123
3124 /// AddInlineAsmOperands - Add this value to the specified inlineasm node
3125 /// operand list.  This adds the code marker and includes the number of 
3126 /// values added into it.
3127 void RegsForValue::AddInlineAsmOperands(unsigned Code, SelectionDAG &DAG,
3128                                         std::vector<SDOperand> &Ops) const {
3129   MVT::ValueType IntPtrTy = DAG.getTargetLoweringInfo().getPointerTy();
3130   Ops.push_back(DAG.getTargetConstant(Code | (Regs.size() << 3), IntPtrTy));
3131   for (unsigned i = 0, e = Regs.size(); i != e; ++i)
3132     Ops.push_back(DAG.getRegister(Regs[i], RegVT));
3133 }
3134
3135 /// isAllocatableRegister - If the specified register is safe to allocate, 
3136 /// i.e. it isn't a stack pointer or some other special register, return the
3137 /// register class for the register.  Otherwise, return null.
3138 static const TargetRegisterClass *
3139 isAllocatableRegister(unsigned Reg, MachineFunction &MF,
3140                       const TargetLowering &TLI, const MRegisterInfo *MRI) {
3141   MVT::ValueType FoundVT = MVT::Other;
3142   const TargetRegisterClass *FoundRC = 0;
3143   for (MRegisterInfo::regclass_iterator RCI = MRI->regclass_begin(),
3144        E = MRI->regclass_end(); RCI != E; ++RCI) {
3145     MVT::ValueType ThisVT = MVT::Other;
3146
3147     const TargetRegisterClass *RC = *RCI;
3148     // If none of the the value types for this register class are valid, we 
3149     // can't use it.  For example, 64-bit reg classes on 32-bit targets.
3150     for (TargetRegisterClass::vt_iterator I = RC->vt_begin(), E = RC->vt_end();
3151          I != E; ++I) {
3152       if (TLI.isTypeLegal(*I)) {
3153         // If we have already found this register in a different register class,
3154         // choose the one with the largest VT specified.  For example, on
3155         // PowerPC, we favor f64 register classes over f32.
3156         if (FoundVT == MVT::Other || 
3157             MVT::getSizeInBits(FoundVT) < MVT::getSizeInBits(*I)) {
3158           ThisVT = *I;
3159           break;
3160         }
3161       }
3162     }
3163     
3164     if (ThisVT == MVT::Other) continue;
3165     
3166     // NOTE: This isn't ideal.  In particular, this might allocate the
3167     // frame pointer in functions that need it (due to them not being taken
3168     // out of allocation, because a variable sized allocation hasn't been seen
3169     // yet).  This is a slight code pessimization, but should still work.
3170     for (TargetRegisterClass::iterator I = RC->allocation_order_begin(MF),
3171          E = RC->allocation_order_end(MF); I != E; ++I)
3172       if (*I == Reg) {
3173         // We found a matching register class.  Keep looking at others in case
3174         // we find one with larger registers that this physreg is also in.
3175         FoundRC = RC;
3176         FoundVT = ThisVT;
3177         break;
3178       }
3179   }
3180   return FoundRC;
3181 }    
3182
3183
3184 namespace {
3185 /// AsmOperandInfo - This contains information for each constraint that we are
3186 /// lowering.
3187 struct AsmOperandInfo : public InlineAsm::ConstraintInfo {
3188   /// ConstraintCode - This contains the actual string for the code, like "m".
3189   std::string ConstraintCode;
3190
3191   /// ConstraintType - Information about the constraint code, e.g. Register,
3192   /// RegisterClass, Memory, Other, Unknown.
3193   TargetLowering::ConstraintType ConstraintType;
3194   
3195   /// CallOperand/CallOperandval - If this is the result output operand or a
3196   /// clobber, this is null, otherwise it is the incoming operand to the
3197   /// CallInst.  This gets modified as the asm is processed.
3198   SDOperand CallOperand;
3199   Value *CallOperandVal;
3200   
3201   /// ConstraintVT - The ValueType for the operand value.
3202   MVT::ValueType ConstraintVT;
3203   
3204   /// AssignedRegs - If this is a register or register class operand, this
3205   /// contains the set of register corresponding to the operand.
3206   RegsForValue AssignedRegs;
3207   
3208   AsmOperandInfo(const InlineAsm::ConstraintInfo &info)
3209     : InlineAsm::ConstraintInfo(info), 
3210       ConstraintType(TargetLowering::C_Unknown),
3211       CallOperand(0,0), CallOperandVal(0), ConstraintVT(MVT::Other) {
3212   }
3213   
3214   void ComputeConstraintToUse(const TargetLowering &TLI);
3215   
3216   /// MarkAllocatedRegs - Once AssignedRegs is set, mark the assigned registers
3217   /// busy in OutputRegs/InputRegs.
3218   void MarkAllocatedRegs(bool isOutReg, bool isInReg,
3219                          std::set<unsigned> &OutputRegs, 
3220                          std::set<unsigned> &InputRegs) const {
3221      if (isOutReg)
3222        OutputRegs.insert(AssignedRegs.Regs.begin(), AssignedRegs.Regs.end());
3223      if (isInReg)
3224        InputRegs.insert(AssignedRegs.Regs.begin(), AssignedRegs.Regs.end());
3225    }
3226 };
3227 } // end anon namespace.
3228
3229 /// getConstraintGenerality - Return an integer indicating how general CT is.
3230 static unsigned getConstraintGenerality(TargetLowering::ConstraintType CT) {
3231   switch (CT) {
3232     default: assert(0 && "Unknown constraint type!");
3233     case TargetLowering::C_Other:
3234     case TargetLowering::C_Unknown:
3235       return 0;
3236     case TargetLowering::C_Register:
3237       return 1;
3238     case TargetLowering::C_RegisterClass:
3239       return 2;
3240     case TargetLowering::C_Memory:
3241       return 3;
3242   }
3243 }
3244
3245 void AsmOperandInfo::ComputeConstraintToUse(const TargetLowering &TLI) {
3246   assert(!Codes.empty() && "Must have at least one constraint");
3247   
3248   std::string *Current = &Codes[0];
3249   TargetLowering::ConstraintType CurType = TLI.getConstraintType(*Current);
3250   if (Codes.size() == 1) {   // Single-letter constraints ('r') are very common.
3251     ConstraintCode = *Current;
3252     ConstraintType = CurType;
3253   } else {
3254     unsigned CurGenerality = getConstraintGenerality(CurType);
3255
3256     // If we have multiple constraints, try to pick the most general one ahead
3257     // of time.  This isn't a wonderful solution, but handles common cases.
3258     for (unsigned j = 1, e = Codes.size(); j != e; ++j) {
3259       TargetLowering::ConstraintType ThisType = TLI.getConstraintType(Codes[j]);
3260       unsigned ThisGenerality = getConstraintGenerality(ThisType);
3261       if (ThisGenerality > CurGenerality) {
3262         // This constraint letter is more general than the previous one,
3263         // use it.
3264         CurType = ThisType;
3265         Current = &Codes[j];
3266         CurGenerality = ThisGenerality;
3267       }
3268     }
3269
3270     ConstraintCode = *Current;
3271     ConstraintType = CurType;
3272   }
3273
3274   if (ConstraintCode == "X") {
3275     if (isa<BasicBlock>(CallOperandVal) || isa<ConstantInt>(CallOperandVal))
3276       return;
3277     // This matches anything.  Labels and constants we handle elsewhere 
3278     // ('X' is the only thing that matches labels).  Otherwise, try to 
3279     // resolve it to something we know about by looking at the actual 
3280     // operand type.
3281     std::string s = "";
3282     TLI.lowerXConstraint(ConstraintVT, s);
3283     if (s!="") {
3284       ConstraintCode = s;
3285       ConstraintType = TLI.getConstraintType(ConstraintCode);
3286     }
3287   }
3288 }
3289
3290
3291 void SelectionDAGLowering::
3292 GetRegistersForValue(AsmOperandInfo &OpInfo, bool HasEarlyClobber,
3293                      std::set<unsigned> &OutputRegs, 
3294                      std::set<unsigned> &InputRegs) {
3295   // Compute whether this value requires an input register, an output register,
3296   // or both.
3297   bool isOutReg = false;
3298   bool isInReg = false;
3299   switch (OpInfo.Type) {
3300   case InlineAsm::isOutput:
3301     isOutReg = true;
3302     
3303     // If this is an early-clobber output, or if there is an input
3304     // constraint that matches this, we need to reserve the input register
3305     // so no other inputs allocate to it.
3306     isInReg = OpInfo.isEarlyClobber || OpInfo.hasMatchingInput;
3307     break;
3308   case InlineAsm::isInput:
3309     isInReg = true;
3310     isOutReg = false;
3311     break;
3312   case InlineAsm::isClobber:
3313     isOutReg = true;
3314     isInReg = true;
3315     break;
3316   }
3317   
3318   
3319   MachineFunction &MF = DAG.getMachineFunction();
3320   std::vector<unsigned> Regs;
3321   
3322   // If this is a constraint for a single physreg, or a constraint for a
3323   // register class, find it.
3324   std::pair<unsigned, const TargetRegisterClass*> PhysReg = 
3325     TLI.getRegForInlineAsmConstraint(OpInfo.ConstraintCode,
3326                                      OpInfo.ConstraintVT);
3327
3328   unsigned NumRegs = 1;
3329   if (OpInfo.ConstraintVT != MVT::Other)
3330     NumRegs = TLI.getNumRegisters(OpInfo.ConstraintVT);
3331   MVT::ValueType RegVT;
3332   MVT::ValueType ValueVT = OpInfo.ConstraintVT;
3333   
3334
3335   // If this is a constraint for a specific physical register, like {r17},
3336   // assign it now.
3337   if (PhysReg.first) {
3338     if (OpInfo.ConstraintVT == MVT::Other)
3339       ValueVT = *PhysReg.second->vt_begin();
3340     
3341     // Get the actual register value type.  This is important, because the user
3342     // may have asked for (e.g.) the AX register in i32 type.  We need to
3343     // remember that AX is actually i16 to get the right extension.
3344     RegVT = *PhysReg.second->vt_begin();
3345     
3346     // This is a explicit reference to a physical register.
3347     Regs.push_back(PhysReg.first);
3348
3349     // If this is an expanded reference, add the rest of the regs to Regs.
3350     if (NumRegs != 1) {
3351       TargetRegisterClass::iterator I = PhysReg.second->begin();
3352       TargetRegisterClass::iterator E = PhysReg.second->end();
3353       for (; *I != PhysReg.first; ++I)
3354         assert(I != E && "Didn't find reg!"); 
3355       
3356       // Already added the first reg.
3357       --NumRegs; ++I;
3358       for (; NumRegs; --NumRegs, ++I) {
3359         assert(I != E && "Ran out of registers to allocate!");
3360         Regs.push_back(*I);
3361       }
3362     }
3363     OpInfo.AssignedRegs = RegsForValue(Regs, RegVT, ValueVT);
3364     OpInfo.MarkAllocatedRegs(isOutReg, isInReg, OutputRegs, InputRegs);
3365     return;
3366   }
3367   
3368   // Otherwise, if this was a reference to an LLVM register class, create vregs
3369   // for this reference.
3370   std::vector<unsigned> RegClassRegs;
3371   const TargetRegisterClass *RC = PhysReg.second;
3372   if (RC) {
3373     // If this is an early clobber or tied register, our regalloc doesn't know
3374     // how to maintain the constraint.  If it isn't, go ahead and create vreg
3375     // and let the regalloc do the right thing.
3376     if (!OpInfo.hasMatchingInput && !OpInfo.isEarlyClobber &&
3377         // If there is some other early clobber and this is an input register,
3378         // then we are forced to pre-allocate the input reg so it doesn't
3379         // conflict with the earlyclobber.
3380         !(OpInfo.Type == InlineAsm::isInput && HasEarlyClobber)) {
3381       RegVT = *PhysReg.second->vt_begin();
3382       
3383       if (OpInfo.ConstraintVT == MVT::Other)
3384         ValueVT = RegVT;
3385
3386       // Create the appropriate number of virtual registers.
3387       MachineRegisterInfo &RegInfo = MF.getRegInfo();
3388       for (; NumRegs; --NumRegs)
3389         Regs.push_back(RegInfo.createVirtualRegister(PhysReg.second));
3390       
3391       OpInfo.AssignedRegs = RegsForValue(Regs, RegVT, ValueVT);
3392       OpInfo.MarkAllocatedRegs(isOutReg, isInReg, OutputRegs, InputRegs);
3393       return;
3394     }
3395     
3396     // Otherwise, we can't allocate it.  Let the code below figure out how to
3397     // maintain these constraints.
3398     RegClassRegs.assign(PhysReg.second->begin(), PhysReg.second->end());
3399     
3400   } else {
3401     // This is a reference to a register class that doesn't directly correspond
3402     // to an LLVM register class.  Allocate NumRegs consecutive, available,
3403     // registers from the class.
3404     RegClassRegs = TLI.getRegClassForInlineAsmConstraint(OpInfo.ConstraintCode,
3405                                                          OpInfo.ConstraintVT);
3406   }
3407   
3408   const MRegisterInfo *MRI = DAG.getTarget().getRegisterInfo();
3409   unsigned NumAllocated = 0;
3410   for (unsigned i = 0, e = RegClassRegs.size(); i != e; ++i) {
3411     unsigned Reg = RegClassRegs[i];
3412     // See if this register is available.
3413     if ((isOutReg && OutputRegs.count(Reg)) ||   // Already used.
3414         (isInReg  && InputRegs.count(Reg))) {    // Already used.
3415       // Make sure we find consecutive registers.
3416       NumAllocated = 0;
3417       continue;
3418     }
3419     
3420     // Check to see if this register is allocatable (i.e. don't give out the
3421     // stack pointer).
3422     if (RC == 0) {
3423       RC = isAllocatableRegister(Reg, MF, TLI, MRI);
3424       if (!RC) {        // Couldn't allocate this register.
3425         // Reset NumAllocated to make sure we return consecutive registers.
3426         NumAllocated = 0;
3427         continue;
3428       }
3429     }
3430     
3431     // Okay, this register is good, we can use it.
3432     ++NumAllocated;
3433
3434     // If we allocated enough consecutive registers, succeed.
3435     if (NumAllocated == NumRegs) {
3436       unsigned RegStart = (i-NumAllocated)+1;
3437       unsigned RegEnd   = i+1;
3438       // Mark all of the allocated registers used.
3439       for (unsigned i = RegStart; i != RegEnd; ++i)
3440         Regs.push_back(RegClassRegs[i]);
3441       
3442       OpInfo.AssignedRegs = RegsForValue(Regs, *RC->vt_begin(), 
3443                                          OpInfo.ConstraintVT);
3444       OpInfo.MarkAllocatedRegs(isOutReg, isInReg, OutputRegs, InputRegs);
3445       return;
3446     }
3447   }
3448   
3449   // Otherwise, we couldn't allocate enough registers for this.
3450   return;
3451 }
3452
3453
3454 /// visitInlineAsm - Handle a call to an InlineAsm object.
3455 ///
3456 void SelectionDAGLowering::visitInlineAsm(CallSite CS) {
3457   InlineAsm *IA = cast<InlineAsm>(CS.getCalledValue());
3458
3459   /// ConstraintOperands - Information about all of the constraints.
3460   std::vector<AsmOperandInfo> ConstraintOperands;
3461   
3462   SDOperand Chain = getRoot();
3463   SDOperand Flag;
3464   
3465   std::set<unsigned> OutputRegs, InputRegs;
3466
3467   // Do a prepass over the constraints, canonicalizing them, and building up the
3468   // ConstraintOperands list.
3469   std::vector<InlineAsm::ConstraintInfo>
3470     ConstraintInfos = IA->ParseConstraints();
3471
3472   // SawEarlyClobber - Keep track of whether we saw an earlyclobber output
3473   // constraint.  If so, we can't let the register allocator allocate any input
3474   // registers, because it will not know to avoid the earlyclobbered output reg.
3475   bool SawEarlyClobber = false;
3476   
3477   unsigned ArgNo = 0;   // ArgNo - The argument of the CallInst.
3478   for (unsigned i = 0, e = ConstraintInfos.size(); i != e; ++i) {
3479     ConstraintOperands.push_back(AsmOperandInfo(ConstraintInfos[i]));
3480     AsmOperandInfo &OpInfo = ConstraintOperands.back();
3481     
3482     MVT::ValueType OpVT = MVT::Other;
3483
3484     // Compute the value type for each operand.
3485     switch (OpInfo.Type) {
3486     case InlineAsm::isOutput:
3487       if (!OpInfo.isIndirect) {
3488         // The return value of the call is this value.  As such, there is no
3489         // corresponding argument.
3490         assert(CS.getType() != Type::VoidTy && "Bad inline asm!");
3491         OpVT = TLI.getValueType(CS.getType());
3492       } else {
3493         OpInfo.CallOperandVal = CS.getArgument(ArgNo++);
3494       }
3495       break;
3496     case InlineAsm::isInput:
3497       OpInfo.CallOperandVal = CS.getArgument(ArgNo++);
3498       break;
3499     case InlineAsm::isClobber:
3500       // Nothing to do.
3501       break;
3502     }
3503
3504     // If this is an input or an indirect output, process the call argument.
3505     // BasicBlocks are labels, currently appearing only in asm's.
3506     if (OpInfo.CallOperandVal) {
3507       if (isa<BasicBlock>(OpInfo.CallOperandVal))
3508         OpInfo.CallOperand = 
3509           DAG.getBasicBlock(FuncInfo.MBBMap[cast<BasicBlock>(
3510                                                  OpInfo.CallOperandVal)]);
3511       else {
3512         OpInfo.CallOperand = getValue(OpInfo.CallOperandVal);
3513         const Type *OpTy = OpInfo.CallOperandVal->getType();
3514         // If this is an indirect operand, the operand is a pointer to the
3515         // accessed type.
3516         if (OpInfo.isIndirect)
3517           OpTy = cast<PointerType>(OpTy)->getElementType();
3518
3519         // If OpTy is not a first-class value, it may be a struct/union that we
3520         // can tile with integers.
3521         if (!OpTy->isFirstClassType() && OpTy->isSized()) {
3522           unsigned BitSize = TD->getTypeSizeInBits(OpTy);
3523           switch (BitSize) {
3524           default: break;
3525           case 1:
3526           case 8:
3527           case 16:
3528           case 32:
3529           case 64:
3530             OpTy = IntegerType::get(BitSize);
3531             break;
3532           }
3533         }
3534
3535         OpVT = TLI.getValueType(OpTy, true);
3536       }
3537     }
3538     
3539     OpInfo.ConstraintVT = OpVT;
3540     
3541     // Compute the constraint code and ConstraintType to use.
3542     OpInfo.ComputeConstraintToUse(TLI);
3543
3544     // Keep track of whether we see an earlyclobber.
3545     SawEarlyClobber |= OpInfo.isEarlyClobber;
3546     
3547     // If this is a memory input, and if the operand is not indirect, do what we
3548     // need to to provide an address for the memory input.
3549     if (OpInfo.ConstraintType == TargetLowering::C_Memory &&
3550         !OpInfo.isIndirect) {
3551       assert(OpInfo.Type == InlineAsm::isInput &&
3552              "Can only indirectify direct input operands!");
3553       
3554       // Memory operands really want the address of the value.  If we don't have
3555       // an indirect input, put it in the constpool if we can, otherwise spill
3556       // it to a stack slot.
3557       
3558       // If the operand is a float, integer, or vector constant, spill to a
3559       // constant pool entry to get its address.
3560       Value *OpVal = OpInfo.CallOperandVal;
3561       if (isa<ConstantFP>(OpVal) || isa<ConstantInt>(OpVal) ||
3562           isa<ConstantVector>(OpVal)) {
3563         OpInfo.CallOperand = DAG.getConstantPool(cast<Constant>(OpVal),
3564                                                  TLI.getPointerTy());
3565       } else {
3566         // Otherwise, create a stack slot and emit a store to it before the
3567         // asm.
3568         const Type *Ty = OpVal->getType();
3569         uint64_t TySize = TLI.getTargetData()->getABITypeSize(Ty);
3570         unsigned Align  = TLI.getTargetData()->getPrefTypeAlignment(Ty);
3571         MachineFunction &MF = DAG.getMachineFunction();
3572         int SSFI = MF.getFrameInfo()->CreateStackObject(TySize, Align);
3573         SDOperand StackSlot = DAG.getFrameIndex(SSFI, TLI.getPointerTy());
3574         Chain = DAG.getStore(Chain, OpInfo.CallOperand, StackSlot, NULL, 0);
3575         OpInfo.CallOperand = StackSlot;
3576       }
3577      
3578       // There is no longer a Value* corresponding to this operand.
3579       OpInfo.CallOperandVal = 0;
3580       // It is now an indirect operand.
3581       OpInfo.isIndirect = true;
3582     }
3583     
3584     // If this constraint is for a specific register, allocate it before
3585     // anything else.
3586     if (OpInfo.ConstraintType == TargetLowering::C_Register)
3587       GetRegistersForValue(OpInfo, SawEarlyClobber, OutputRegs, InputRegs);
3588   }
3589   ConstraintInfos.clear();
3590   
3591   
3592   // Second pass - Loop over all of the operands, assigning virtual or physregs
3593   // to registerclass operands.
3594   for (unsigned i = 0, e = ConstraintOperands.size(); i != e; ++i) {
3595     AsmOperandInfo &OpInfo = ConstraintOperands[i];
3596     
3597     // C_Register operands have already been allocated, Other/Memory don't need
3598     // to be.
3599     if (OpInfo.ConstraintType == TargetLowering::C_RegisterClass)
3600       GetRegistersForValue(OpInfo, SawEarlyClobber, OutputRegs, InputRegs);
3601   }    
3602   
3603   // AsmNodeOperands - The operands for the ISD::INLINEASM node.
3604   std::vector<SDOperand> AsmNodeOperands;
3605   AsmNodeOperands.push_back(SDOperand());  // reserve space for input chain
3606   AsmNodeOperands.push_back(
3607           DAG.getTargetExternalSymbol(IA->getAsmString().c_str(), MVT::Other));
3608   
3609   
3610   // Loop over all of the inputs, copying the operand values into the
3611   // appropriate registers and processing the output regs.
3612   RegsForValue RetValRegs;
3613   
3614   // IndirectStoresToEmit - The set of stores to emit after the inline asm node.
3615   std::vector<std::pair<RegsForValue, Value*> > IndirectStoresToEmit;
3616   
3617   for (unsigned i = 0, e = ConstraintOperands.size(); i != e; ++i) {
3618     AsmOperandInfo &OpInfo = ConstraintOperands[i];
3619
3620     switch (OpInfo.Type) {
3621     case InlineAsm::isOutput: {
3622       if (OpInfo.ConstraintType != TargetLowering::C_RegisterClass &&
3623           OpInfo.ConstraintType != TargetLowering::C_Register) {
3624         // Memory output, or 'other' output (e.g. 'X' constraint).
3625         assert(OpInfo.isIndirect && "Memory output must be indirect operand");
3626
3627         // Add information to the INLINEASM node to know about this output.
3628         unsigned ResOpType = 4/*MEM*/ | (1 << 3);
3629         AsmNodeOperands.push_back(DAG.getTargetConstant(ResOpType, 
3630                                                         TLI.getPointerTy()));
3631         AsmNodeOperands.push_back(OpInfo.CallOperand);
3632         break;
3633       }
3634
3635       // Otherwise, this is a register or register class output.
3636
3637       // Copy the output from the appropriate register.  Find a register that
3638       // we can use.
3639       if (OpInfo.AssignedRegs.Regs.empty()) {
3640         cerr << "Couldn't allocate output reg for contraint '"
3641              << OpInfo.ConstraintCode << "'!\n";
3642         exit(1);
3643       }
3644
3645       if (!OpInfo.isIndirect) {
3646         // This is the result value of the call.
3647         assert(RetValRegs.Regs.empty() &&
3648                "Cannot have multiple output constraints yet!");
3649         assert(CS.getType() != Type::VoidTy && "Bad inline asm!");
3650         RetValRegs = OpInfo.AssignedRegs;
3651       } else {
3652         IndirectStoresToEmit.push_back(std::make_pair(OpInfo.AssignedRegs,
3653                                                       OpInfo.CallOperandVal));
3654       }
3655       
3656       // Add information to the INLINEASM node to know that this register is
3657       // set.
3658       OpInfo.AssignedRegs.AddInlineAsmOperands(2 /*REGDEF*/, DAG,
3659                                                AsmNodeOperands);
3660       break;
3661     }
3662     case InlineAsm::isInput: {
3663       SDOperand InOperandVal = OpInfo.CallOperand;
3664       
3665       if (isdigit(OpInfo.ConstraintCode[0])) {    // Matching constraint?
3666         // If this is required to match an output register we have already set,
3667         // just use its register.
3668         unsigned OperandNo = atoi(OpInfo.ConstraintCode.c_str());
3669         
3670         // Scan until we find the definition we already emitted of this operand.
3671         // When we find it, create a RegsForValue operand.
3672         unsigned CurOp = 2;  // The first operand.
3673         for (; OperandNo; --OperandNo) {
3674           // Advance to the next operand.
3675           unsigned NumOps = 
3676             cast<ConstantSDNode>(AsmNodeOperands[CurOp])->getValue();
3677           assert(((NumOps & 7) == 2 /*REGDEF*/ ||
3678                   (NumOps & 7) == 4 /*MEM*/) &&
3679                  "Skipped past definitions?");
3680           CurOp += (NumOps>>3)+1;
3681         }
3682
3683         unsigned NumOps = 
3684           cast<ConstantSDNode>(AsmNodeOperands[CurOp])->getValue();
3685         if ((NumOps & 7) == 2 /*REGDEF*/) {
3686           // Add NumOps>>3 registers to MatchedRegs.
3687           RegsForValue MatchedRegs;
3688           MatchedRegs.ValueVT = InOperandVal.getValueType();
3689           MatchedRegs.RegVT   = AsmNodeOperands[CurOp+1].getValueType();
3690           for (unsigned i = 0, e = NumOps>>3; i != e; ++i) {
3691             unsigned Reg =
3692               cast<RegisterSDNode>(AsmNodeOperands[++CurOp])->getReg();
3693             MatchedRegs.Regs.push_back(Reg);
3694           }
3695         
3696           // Use the produced MatchedRegs object to 
3697           MatchedRegs.getCopyToRegs(InOperandVal, DAG, Chain, &Flag);
3698           MatchedRegs.AddInlineAsmOperands(1 /*REGUSE*/, DAG, AsmNodeOperands);
3699           break;
3700         } else {
3701           assert((NumOps & 7) == 4/*MEM*/ && "Unknown matching constraint!");
3702           assert(0 && "matching constraints for memory operands unimp");
3703         }
3704       }
3705       
3706       if (OpInfo.ConstraintType == TargetLowering::C_Other) {
3707         assert(!OpInfo.isIndirect && 
3708                "Don't know how to handle indirect other inputs yet!");
3709         
3710         std::vector<SDOperand> Ops;
3711         TLI.LowerAsmOperandForConstraint(InOperandVal, OpInfo.ConstraintCode[0],
3712                                          Ops, DAG);
3713         if (Ops.empty()) {
3714           cerr << "Invalid operand for inline asm constraint '"
3715                << OpInfo.ConstraintCode << "'!\n";
3716           exit(1);
3717         }
3718         
3719         // Add information to the INLINEASM node to know about this input.
3720         unsigned ResOpType = 3 /*IMM*/ | (Ops.size() << 3);
3721         AsmNodeOperands.push_back(DAG.getTargetConstant(ResOpType, 
3722                                                         TLI.getPointerTy()));
3723         AsmNodeOperands.insert(AsmNodeOperands.end(), Ops.begin(), Ops.end());
3724         break;
3725       } else if (OpInfo.ConstraintType == TargetLowering::C_Memory) {
3726         assert(OpInfo.isIndirect && "Operand must be indirect to be a mem!");
3727         assert(InOperandVal.getValueType() == TLI.getPointerTy() &&
3728                "Memory operands expect pointer values");
3729                
3730         // Add information to the INLINEASM node to know about this input.
3731         unsigned ResOpType = 4/*MEM*/ | (1 << 3);
3732         AsmNodeOperands.push_back(DAG.getTargetConstant(ResOpType,
3733                                                         TLI.getPointerTy()));
3734         AsmNodeOperands.push_back(InOperandVal);
3735         break;
3736       }
3737         
3738       assert((OpInfo.ConstraintType == TargetLowering::C_RegisterClass ||
3739               OpInfo.ConstraintType == TargetLowering::C_Register) &&
3740              "Unknown constraint type!");
3741       assert(!OpInfo.isIndirect && 
3742              "Don't know how to handle indirect register inputs yet!");
3743
3744       // Copy the input into the appropriate registers.
3745       assert(!OpInfo.AssignedRegs.Regs.empty() &&
3746              "Couldn't allocate input reg!");
3747
3748       OpInfo.AssignedRegs.getCopyToRegs(InOperandVal, DAG, Chain, &Flag);
3749       
3750       OpInfo.AssignedRegs.AddInlineAsmOperands(1/*REGUSE*/, DAG,
3751                                                AsmNodeOperands);
3752       break;
3753     }
3754     case InlineAsm::isClobber: {
3755       // Add the clobbered value to the operand list, so that the register
3756       // allocator is aware that the physreg got clobbered.
3757       if (!OpInfo.AssignedRegs.Regs.empty())
3758         OpInfo.AssignedRegs.AddInlineAsmOperands(2/*REGDEF*/, DAG,
3759                                                  AsmNodeOperands);
3760       break;
3761     }
3762     }
3763   }
3764   
3765   // Finish up input operands.
3766   AsmNodeOperands[0] = Chain;
3767   if (Flag.Val) AsmNodeOperands.push_back(Flag);
3768   
3769   Chain = DAG.getNode(ISD::INLINEASM, 
3770                       DAG.getNodeValueTypes(MVT::Other, MVT::Flag), 2,
3771                       &AsmNodeOperands[0], AsmNodeOperands.size());
3772   Flag = Chain.getValue(1);
3773
3774   // If this asm returns a register value, copy the result from that register
3775   // and set it as the value of the call.
3776   if (!RetValRegs.Regs.empty()) {
3777     SDOperand Val = RetValRegs.getCopyFromRegs(DAG, Chain, &Flag);
3778     
3779     // If the result of the inline asm is a vector, it may have the wrong
3780     // width/num elts.  Make sure to convert it to the right type with
3781     // bit_convert.
3782     if (MVT::isVector(Val.getValueType())) {
3783       const VectorType *VTy = cast<VectorType>(CS.getType());
3784       MVT::ValueType DesiredVT = TLI.getValueType(VTy);
3785       
3786       Val = DAG.getNode(ISD::BIT_CONVERT, DesiredVT, Val);
3787     }
3788     
3789     setValue(CS.getInstruction(), Val);
3790   }
3791   
3792   std::vector<std::pair<SDOperand, Value*> > StoresToEmit;
3793   
3794   // Process indirect outputs, first output all of the flagged copies out of
3795   // physregs.
3796   for (unsigned i = 0, e = IndirectStoresToEmit.size(); i != e; ++i) {
3797     RegsForValue &OutRegs = IndirectStoresToEmit[i].first;
3798     Value *Ptr = IndirectStoresToEmit[i].second;
3799     SDOperand OutVal = OutRegs.getCopyFromRegs(DAG, Chain, &Flag);
3800     StoresToEmit.push_back(std::make_pair(OutVal, Ptr));
3801   }
3802   
3803   // Emit the non-flagged stores from the physregs.
3804   SmallVector<SDOperand, 8> OutChains;
3805   for (unsigned i = 0, e = StoresToEmit.size(); i != e; ++i)
3806     OutChains.push_back(DAG.getStore(Chain, StoresToEmit[i].first,
3807                                     getValue(StoresToEmit[i].second),
3808                                     StoresToEmit[i].second, 0));
3809   if (!OutChains.empty())
3810     Chain = DAG.getNode(ISD::TokenFactor, MVT::Other,
3811                         &OutChains[0], OutChains.size());
3812   DAG.setRoot(Chain);
3813 }
3814
3815
3816 void SelectionDAGLowering::visitMalloc(MallocInst &I) {
3817   SDOperand Src = getValue(I.getOperand(0));
3818
3819   MVT::ValueType IntPtr = TLI.getPointerTy();
3820
3821   if (IntPtr < Src.getValueType())
3822     Src = DAG.getNode(ISD::TRUNCATE, IntPtr, Src);
3823   else if (IntPtr > Src.getValueType())
3824     Src = DAG.getNode(ISD::ZERO_EXTEND, IntPtr, Src);
3825
3826   // Scale the source by the type size.
3827   uint64_t ElementSize = TD->getABITypeSize(I.getType()->getElementType());
3828   Src = DAG.getNode(ISD::MUL, Src.getValueType(),
3829                     Src, DAG.getIntPtrConstant(ElementSize));
3830
3831   TargetLowering::ArgListTy Args;
3832   TargetLowering::ArgListEntry Entry;
3833   Entry.Node = Src;
3834   Entry.Ty = TLI.getTargetData()->getIntPtrType();
3835   Args.push_back(Entry);
3836
3837   std::pair<SDOperand,SDOperand> Result =
3838     TLI.LowerCallTo(getRoot(), I.getType(), false, false, CallingConv::C, true,
3839                     DAG.getExternalSymbol("malloc", IntPtr),
3840                     Args, DAG);
3841   setValue(&I, Result.first);  // Pointers always fit in registers
3842   DAG.setRoot(Result.second);
3843 }
3844
3845 void SelectionDAGLowering::visitFree(FreeInst &I) {
3846   TargetLowering::ArgListTy Args;
3847   TargetLowering::ArgListEntry Entry;
3848   Entry.Node = getValue(I.getOperand(0));
3849   Entry.Ty = TLI.getTargetData()->getIntPtrType();
3850   Args.push_back(Entry);
3851   MVT::ValueType IntPtr = TLI.getPointerTy();
3852   std::pair<SDOperand,SDOperand> Result =
3853     TLI.LowerCallTo(getRoot(), Type::VoidTy, false, false, CallingConv::C, true,
3854                     DAG.getExternalSymbol("free", IntPtr), Args, DAG);
3855   DAG.setRoot(Result.second);
3856 }
3857
3858 // EmitInstrWithCustomInserter - This method should be implemented by targets
3859 // that mark instructions with the 'usesCustomDAGSchedInserter' flag.  These
3860 // instructions are special in various ways, which require special support to
3861 // insert.  The specified MachineInstr is created but not inserted into any
3862 // basic blocks, and the scheduler passes ownership of it to this method.
3863 MachineBasicBlock *TargetLowering::EmitInstrWithCustomInserter(MachineInstr *MI,
3864                                                        MachineBasicBlock *MBB) {
3865   cerr << "If a target marks an instruction with "
3866        << "'usesCustomDAGSchedInserter', it must implement "
3867        << "TargetLowering::EmitInstrWithCustomInserter!\n";
3868   abort();
3869   return 0;  
3870 }
3871
3872 void SelectionDAGLowering::visitVAStart(CallInst &I) {
3873   DAG.setRoot(DAG.getNode(ISD::VASTART, MVT::Other, getRoot(), 
3874                           getValue(I.getOperand(1)), 
3875                           DAG.getSrcValue(I.getOperand(1))));
3876 }
3877
3878 void SelectionDAGLowering::visitVAArg(VAArgInst &I) {
3879   SDOperand V = DAG.getVAArg(TLI.getValueType(I.getType()), getRoot(),
3880                              getValue(I.getOperand(0)),
3881                              DAG.getSrcValue(I.getOperand(0)));
3882   setValue(&I, V);
3883   DAG.setRoot(V.getValue(1));
3884 }
3885
3886 void SelectionDAGLowering::visitVAEnd(CallInst &I) {
3887   DAG.setRoot(DAG.getNode(ISD::VAEND, MVT::Other, getRoot(),
3888                           getValue(I.getOperand(1)), 
3889                           DAG.getSrcValue(I.getOperand(1))));
3890 }
3891
3892 void SelectionDAGLowering::visitVACopy(CallInst &I) {
3893   DAG.setRoot(DAG.getNode(ISD::VACOPY, MVT::Other, getRoot(), 
3894                           getValue(I.getOperand(1)), 
3895                           getValue(I.getOperand(2)),
3896                           DAG.getSrcValue(I.getOperand(1)),
3897                           DAG.getSrcValue(I.getOperand(2))));
3898 }
3899
3900 /// TargetLowering::LowerArguments - This is the default LowerArguments
3901 /// implementation, which just inserts a FORMAL_ARGUMENTS node.  FIXME: When all
3902 /// targets are migrated to using FORMAL_ARGUMENTS, this hook should be 
3903 /// integrated into SDISel.
3904 std::vector<SDOperand> 
3905 TargetLowering::LowerArguments(Function &F, SelectionDAG &DAG) {
3906   // Add CC# and isVararg as operands to the FORMAL_ARGUMENTS node.
3907   std::vector<SDOperand> Ops;
3908   Ops.push_back(DAG.getRoot());
3909   Ops.push_back(DAG.getConstant(F.getCallingConv(), getPointerTy()));
3910   Ops.push_back(DAG.getConstant(F.isVarArg(), getPointerTy()));
3911
3912   // Add one result value for each formal argument.
3913   std::vector<MVT::ValueType> RetVals;
3914   unsigned j = 1;
3915   for (Function::arg_iterator I = F.arg_begin(), E = F.arg_end();
3916        I != E; ++I, ++j) {
3917     MVT::ValueType VT = getValueType(I->getType());
3918     unsigned Flags = ISD::ParamFlags::NoFlagSet;
3919     unsigned OriginalAlignment =
3920       getTargetData()->getABITypeAlignment(I->getType());
3921
3922     // FIXME: Distinguish between a formal with no [sz]ext attribute from one
3923     // that is zero extended!
3924     if (F.paramHasAttr(j, ParamAttr::ZExt))
3925       Flags &= ~(ISD::ParamFlags::SExt);
3926     if (F.paramHasAttr(j, ParamAttr::SExt))
3927       Flags |= ISD::ParamFlags::SExt;
3928     if (F.paramHasAttr(j, ParamAttr::InReg))
3929       Flags |= ISD::ParamFlags::InReg;
3930     if (F.paramHasAttr(j, ParamAttr::StructRet))
3931       Flags |= ISD::ParamFlags::StructReturn;
3932     if (F.paramHasAttr(j, ParamAttr::ByVal)) {
3933       Flags |= ISD::ParamFlags::ByVal;
3934       const PointerType *Ty = cast<PointerType>(I->getType());
3935       const Type *ElementTy = Ty->getElementType();
3936       unsigned FrameAlign = Log2_32(getByValTypeAlignment(ElementTy));
3937       unsigned FrameSize  = getTargetData()->getABITypeSize(ElementTy);
3938       Flags |= (FrameAlign << ISD::ParamFlags::ByValAlignOffs);
3939       Flags |= (FrameSize  << ISD::ParamFlags::ByValSizeOffs);
3940     }
3941     if (F.paramHasAttr(j, ParamAttr::Nest))
3942       Flags |= ISD::ParamFlags::Nest;
3943     Flags |= (OriginalAlignment << ISD::ParamFlags::OrigAlignmentOffs);
3944     
3945     switch (getTypeAction(VT)) {
3946     default: assert(0 && "Unknown type action!");
3947     case Legal: 
3948       RetVals.push_back(VT);
3949       Ops.push_back(DAG.getConstant(Flags, MVT::i32));
3950       break;
3951     case Promote:
3952       RetVals.push_back(getTypeToTransformTo(VT));
3953       Ops.push_back(DAG.getConstant(Flags, MVT::i32));
3954       break;
3955     case Expand: {
3956       // If this is an illegal type, it needs to be broken up to fit into 
3957       // registers.
3958       MVT::ValueType RegisterVT = getRegisterType(VT);
3959       unsigned NumRegs = getNumRegisters(VT);
3960       for (unsigned i = 0; i != NumRegs; ++i) {
3961         RetVals.push_back(RegisterVT);
3962         // if it isn't first piece, alignment must be 1
3963         if (i > 0)
3964           Flags = (Flags & (~ISD::ParamFlags::OrigAlignment)) |
3965             (1 << ISD::ParamFlags::OrigAlignmentOffs);
3966         Ops.push_back(DAG.getConstant(Flags, MVT::i32));
3967       }
3968       break;
3969     }
3970     }
3971   }
3972
3973   RetVals.push_back(MVT::Other);
3974   
3975   // Create the node.
3976   SDNode *Result = DAG.getNode(ISD::FORMAL_ARGUMENTS,
3977                                DAG.getNodeValueTypes(RetVals), RetVals.size(),
3978                                &Ops[0], Ops.size()).Val;
3979   unsigned NumArgRegs = Result->getNumValues() - 1;
3980   DAG.setRoot(SDOperand(Result, NumArgRegs));
3981
3982   // Set up the return result vector.
3983   Ops.clear();
3984   unsigned i = 0;
3985   unsigned Idx = 1;
3986   for (Function::arg_iterator I = F.arg_begin(), E = F.arg_end(); I != E; 
3987       ++I, ++Idx) {
3988     MVT::ValueType VT = getValueType(I->getType());
3989     
3990     switch (getTypeAction(VT)) {
3991     default: assert(0 && "Unknown type action!");
3992     case Legal: 
3993       Ops.push_back(SDOperand(Result, i++));
3994       break;
3995     case Promote: {
3996       SDOperand Op(Result, i++);
3997       if (MVT::isInteger(VT)) {
3998         if (F.paramHasAttr(Idx, ParamAttr::SExt))
3999           Op = DAG.getNode(ISD::AssertSext, Op.getValueType(), Op,
4000                            DAG.getValueType(VT));
4001         else if (F.paramHasAttr(Idx, ParamAttr::ZExt))
4002           Op = DAG.getNode(ISD::AssertZext, Op.getValueType(), Op,
4003                            DAG.getValueType(VT));
4004         Op = DAG.getNode(ISD::TRUNCATE, VT, Op);
4005       } else {
4006         assert(MVT::isFloatingPoint(VT) && "Not int or FP?");
4007         Op = DAG.getNode(ISD::FP_ROUND, VT, Op, DAG.getIntPtrConstant(1));
4008       }
4009       Ops.push_back(Op);
4010       break;
4011     }
4012     case Expand: {
4013       MVT::ValueType PartVT = getRegisterType(VT);
4014       unsigned NumParts = getNumRegisters(VT);
4015       SmallVector<SDOperand, 4> Parts(NumParts);
4016       for (unsigned j = 0; j != NumParts; ++j)
4017         Parts[j] = SDOperand(Result, i++);
4018       Ops.push_back(getCopyFromParts(DAG, &Parts[0], NumParts, PartVT, VT));
4019       break;
4020     }
4021     }
4022   }
4023   assert(i == NumArgRegs && "Argument register count mismatch!");
4024   return Ops;
4025 }
4026
4027
4028 /// TargetLowering::LowerCallTo - This is the default LowerCallTo
4029 /// implementation, which just inserts an ISD::CALL node, which is later custom
4030 /// lowered by the target to something concrete.  FIXME: When all targets are
4031 /// migrated to using ISD::CALL, this hook should be integrated into SDISel.
4032 std::pair<SDOperand, SDOperand>
4033 TargetLowering::LowerCallTo(SDOperand Chain, const Type *RetTy, 
4034                             bool RetTyIsSigned, bool isVarArg,
4035                             unsigned CallingConv, bool isTailCall, 
4036                             SDOperand Callee,
4037                             ArgListTy &Args, SelectionDAG &DAG) {
4038   SmallVector<SDOperand, 32> Ops;
4039   Ops.push_back(Chain);   // Op#0 - Chain
4040   Ops.push_back(DAG.getConstant(CallingConv, getPointerTy())); // Op#1 - CC
4041   Ops.push_back(DAG.getConstant(isVarArg, getPointerTy()));    // Op#2 - VarArg
4042   Ops.push_back(DAG.getConstant(isTailCall, getPointerTy()));  // Op#3 - Tail
4043   Ops.push_back(Callee);
4044   
4045   // Handle all of the outgoing arguments.
4046   for (unsigned i = 0, e = Args.size(); i != e; ++i) {
4047     MVT::ValueType VT = getValueType(Args[i].Ty);
4048     SDOperand Op = Args[i].Node;
4049     unsigned Flags = ISD::ParamFlags::NoFlagSet;
4050     unsigned OriginalAlignment =
4051       getTargetData()->getABITypeAlignment(Args[i].Ty);
4052     
4053     if (Args[i].isSExt)
4054       Flags |= ISD::ParamFlags::SExt;
4055     if (Args[i].isZExt)
4056       Flags |= ISD::ParamFlags::ZExt;
4057     if (Args[i].isInReg)
4058       Flags |= ISD::ParamFlags::InReg;
4059     if (Args[i].isSRet)
4060       Flags |= ISD::ParamFlags::StructReturn;
4061     if (Args[i].isByVal) {
4062       Flags |= ISD::ParamFlags::ByVal;
4063       const PointerType *Ty = cast<PointerType>(Args[i].Ty);
4064       const Type *ElementTy = Ty->getElementType();
4065       unsigned FrameAlign = Log2_32(getByValTypeAlignment(ElementTy));
4066       unsigned FrameSize  = getTargetData()->getABITypeSize(ElementTy);
4067       Flags |= (FrameAlign << ISD::ParamFlags::ByValAlignOffs);
4068       Flags |= (FrameSize  << ISD::ParamFlags::ByValSizeOffs);
4069     }
4070     if (Args[i].isNest)
4071       Flags |= ISD::ParamFlags::Nest;
4072     Flags |= OriginalAlignment << ISD::ParamFlags::OrigAlignmentOffs;
4073     
4074     switch (getTypeAction(VT)) {
4075     default: assert(0 && "Unknown type action!");
4076     case Legal:
4077       Ops.push_back(Op);
4078       Ops.push_back(DAG.getConstant(Flags, MVT::i32));
4079       break;
4080     case Promote:
4081       if (MVT::isInteger(VT)) {
4082         unsigned ExtOp;
4083         if (Args[i].isSExt)
4084           ExtOp = ISD::SIGN_EXTEND;
4085         else if (Args[i].isZExt)
4086           ExtOp = ISD::ZERO_EXTEND;
4087         else
4088           ExtOp = ISD::ANY_EXTEND;
4089         Op = DAG.getNode(ExtOp, getTypeToTransformTo(VT), Op);
4090       } else {
4091         assert(MVT::isFloatingPoint(VT) && "Not int or FP?");
4092         Op = DAG.getNode(ISD::FP_EXTEND, getTypeToTransformTo(VT), Op);
4093       }
4094       Ops.push_back(Op);
4095       Ops.push_back(DAG.getConstant(Flags, MVT::i32));
4096       break;
4097     case Expand: {
4098       MVT::ValueType PartVT = getRegisterType(VT);
4099       unsigned NumParts = getNumRegisters(VT);
4100       SmallVector<SDOperand, 4> Parts(NumParts);
4101       getCopyToParts(DAG, Op, &Parts[0], NumParts, PartVT);
4102       for (unsigned i = 0; i != NumParts; ++i) {
4103         // if it isn't first piece, alignment must be 1
4104         unsigned MyFlags = Flags;
4105         if (i != 0)
4106           MyFlags = (MyFlags & (~ISD::ParamFlags::OrigAlignment)) |
4107             (1 << ISD::ParamFlags::OrigAlignmentOffs);
4108
4109         Ops.push_back(Parts[i]);
4110         Ops.push_back(DAG.getConstant(MyFlags, MVT::i32));
4111       }
4112       break;
4113     }
4114     }
4115   }
4116   
4117   // Figure out the result value types.
4118   MVT::ValueType VT = getValueType(RetTy);
4119   MVT::ValueType RegisterVT = getRegisterType(VT);
4120   unsigned NumRegs = getNumRegisters(VT);
4121   SmallVector<MVT::ValueType, 4> RetTys(NumRegs);
4122   for (unsigned i = 0; i != NumRegs; ++i)
4123     RetTys[i] = RegisterVT;
4124   
4125   RetTys.push_back(MVT::Other);  // Always has a chain.
4126   
4127   // Create the CALL node.
4128   SDOperand Res = DAG.getNode(ISD::CALL,
4129                               DAG.getVTList(&RetTys[0], NumRegs + 1),
4130                               &Ops[0], Ops.size());
4131   Chain = Res.getValue(NumRegs);
4132
4133   // Gather up the call result into a single value.
4134   if (RetTy != Type::VoidTy) {
4135     ISD::NodeType AssertOp = ISD::AssertSext;
4136     if (!RetTyIsSigned)
4137       AssertOp = ISD::AssertZext;
4138     SmallVector<SDOperand, 4> Results(NumRegs);
4139     for (unsigned i = 0; i != NumRegs; ++i)
4140       Results[i] = Res.getValue(i);
4141     Res = getCopyFromParts(DAG, &Results[0], NumRegs, RegisterVT, VT, AssertOp);
4142   }
4143
4144   return std::make_pair(Res, Chain);
4145 }
4146
4147 SDOperand TargetLowering::LowerOperation(SDOperand Op, SelectionDAG &DAG) {
4148   assert(0 && "LowerOperation not implemented for this target!");
4149   abort();
4150   return SDOperand();
4151 }
4152
4153 SDOperand TargetLowering::CustomPromoteOperation(SDOperand Op,
4154                                                  SelectionDAG &DAG) {
4155   assert(0 && "CustomPromoteOperation not implemented for this target!");
4156   abort();
4157   return SDOperand();
4158 }
4159
4160 /// getMemsetValue - Vectorized representation of the memset value
4161 /// operand.
4162 static SDOperand getMemsetValue(SDOperand Value, MVT::ValueType VT,
4163                                 SelectionDAG &DAG) {
4164   MVT::ValueType CurVT = VT;
4165   if (ConstantSDNode *C = dyn_cast<ConstantSDNode>(Value)) {
4166     uint64_t Val   = C->getValue() & 255;
4167     unsigned Shift = 8;
4168     while (CurVT != MVT::i8) {
4169       Val = (Val << Shift) | Val;
4170       Shift <<= 1;
4171       CurVT = (MVT::ValueType)((unsigned)CurVT - 1);
4172     }
4173     return DAG.getConstant(Val, VT);
4174   } else {
4175     Value = DAG.getNode(ISD::ZERO_EXTEND, VT, Value);
4176     unsigned Shift = 8;
4177     while (CurVT != MVT::i8) {
4178       Value =
4179         DAG.getNode(ISD::OR, VT,
4180                     DAG.getNode(ISD::SHL, VT, Value,
4181                                 DAG.getConstant(Shift, MVT::i8)), Value);
4182       Shift <<= 1;
4183       CurVT = (MVT::ValueType)((unsigned)CurVT - 1);
4184     }
4185
4186     return Value;
4187   }
4188 }
4189
4190 /// getMemsetStringVal - Similar to getMemsetValue. Except this is only
4191 /// used when a memcpy is turned into a memset when the source is a constant
4192 /// string ptr.
4193 static SDOperand getMemsetStringVal(MVT::ValueType VT,
4194                                     SelectionDAG &DAG, TargetLowering &TLI,
4195                                     std::string &Str, unsigned Offset) {
4196   uint64_t Val = 0;
4197   unsigned MSB = MVT::getSizeInBits(VT) / 8;
4198   if (TLI.isLittleEndian())
4199     Offset = Offset + MSB - 1;
4200   for (unsigned i = 0; i != MSB; ++i) {
4201     Val = (Val << 8) | (unsigned char)Str[Offset];
4202     Offset += TLI.isLittleEndian() ? -1 : 1;
4203   }
4204   return DAG.getConstant(Val, VT);
4205 }
4206
4207 /// getMemBasePlusOffset - Returns base and offset node for the 
4208 static SDOperand getMemBasePlusOffset(SDOperand Base, unsigned Offset,
4209                                       SelectionDAG &DAG, TargetLowering &TLI) {
4210   MVT::ValueType VT = Base.getValueType();
4211   return DAG.getNode(ISD::ADD, VT, Base, DAG.getConstant(Offset, VT));
4212 }
4213
4214 /// MeetsMaxMemopRequirement - Determines if the number of memory ops required
4215 /// to replace the memset / memcpy is below the threshold. It also returns the
4216 /// types of the sequence of  memory ops to perform memset / memcpy.
4217 static bool MeetsMaxMemopRequirement(std::vector<MVT::ValueType> &MemOps,
4218                                      unsigned Limit, uint64_t Size,
4219                                      unsigned Align, TargetLowering &TLI) {
4220   MVT::ValueType VT;
4221
4222   if (TLI.allowsUnalignedMemoryAccesses()) {
4223     VT = MVT::i64;
4224   } else {
4225     switch (Align & 7) {
4226     case 0:
4227       VT = MVT::i64;
4228       break;
4229     case 4:
4230       VT = MVT::i32;
4231       break;
4232     case 2:
4233       VT = MVT::i16;
4234       break;
4235     default:
4236       VT = MVT::i8;
4237       break;
4238     }
4239   }
4240
4241   MVT::ValueType LVT = MVT::i64;
4242   while (!TLI.isTypeLegal(LVT))
4243     LVT = (MVT::ValueType)((unsigned)LVT - 1);
4244   assert(MVT::isInteger(LVT));
4245
4246   if (VT > LVT)
4247     VT = LVT;
4248
4249   unsigned NumMemOps = 0;
4250   while (Size != 0) {
4251     unsigned VTSize = MVT::getSizeInBits(VT) / 8;
4252     while (VTSize > Size) {
4253       VT = (MVT::ValueType)((unsigned)VT - 1);
4254       VTSize >>= 1;
4255     }
4256     assert(MVT::isInteger(VT));
4257
4258     if (++NumMemOps > Limit)
4259       return false;
4260     MemOps.push_back(VT);
4261     Size -= VTSize;
4262   }
4263
4264   return true;
4265 }
4266
4267 void SelectionDAGLowering::visitMemIntrinsic(CallInst &I, unsigned Op) {
4268   SDOperand Op1 = getValue(I.getOperand(1));
4269   SDOperand Op2 = getValue(I.getOperand(2));
4270   SDOperand Op3 = getValue(I.getOperand(3));
4271   SDOperand Op4 = getValue(I.getOperand(4));
4272   unsigned Align = (unsigned)cast<ConstantSDNode>(Op4)->getValue();
4273   if (Align == 0) Align = 1;
4274
4275   // If the source and destination are known to not be aliases, we can
4276   // lower memmove as memcpy.
4277   if (Op == ISD::MEMMOVE) {
4278     uint64_t Size = -1ULL;
4279     if (ConstantSDNode *C = dyn_cast<ConstantSDNode>(Op3))
4280       Size = C->getValue();
4281     if (AA.alias(I.getOperand(1), Size, I.getOperand(2), Size) ==
4282         AliasAnalysis::NoAlias)
4283       Op = ISD::MEMCPY;
4284   }
4285
4286   if (ConstantSDNode *Size = dyn_cast<ConstantSDNode>(Op3)) {
4287     std::vector<MVT::ValueType> MemOps;
4288
4289     // Expand memset / memcpy to a series of load / store ops
4290     // if the size operand falls below a certain threshold.
4291     SmallVector<SDOperand, 8> OutChains;
4292     switch (Op) {
4293     default: break;  // Do nothing for now.
4294     case ISD::MEMSET: {
4295       if (MeetsMaxMemopRequirement(MemOps, TLI.getMaxStoresPerMemset(),
4296                                    Size->getValue(), Align, TLI)) {
4297         unsigned NumMemOps = MemOps.size();
4298         unsigned Offset = 0;
4299         for (unsigned i = 0; i < NumMemOps; i++) {
4300           MVT::ValueType VT = MemOps[i];
4301           unsigned VTSize = MVT::getSizeInBits(VT) / 8;
4302           SDOperand Value = getMemsetValue(Op2, VT, DAG);
4303           SDOperand Store = DAG.getStore(getRoot(), Value,
4304                                     getMemBasePlusOffset(Op1, Offset, DAG, TLI),
4305                                          I.getOperand(1), Offset);
4306           OutChains.push_back(Store);
4307           Offset += VTSize;
4308         }
4309       }
4310       break;
4311     }
4312     case ISD::MEMCPY: {
4313       if (MeetsMaxMemopRequirement(MemOps, TLI.getMaxStoresPerMemcpy(),
4314                                    Size->getValue(), Align, TLI)) {
4315         unsigned NumMemOps = MemOps.size();
4316         unsigned SrcOff = 0, DstOff = 0, SrcDelta = 0;
4317         GlobalAddressSDNode *G = NULL;
4318         std::string Str;
4319         bool CopyFromStr = false;
4320
4321         if (Op2.getOpcode() == ISD::GlobalAddress)
4322           G = cast<GlobalAddressSDNode>(Op2);
4323         else if (Op2.getOpcode() == ISD::ADD &&
4324                  Op2.getOperand(0).getOpcode() == ISD::GlobalAddress &&
4325                  Op2.getOperand(1).getOpcode() == ISD::Constant) {
4326           G = cast<GlobalAddressSDNode>(Op2.getOperand(0));
4327           SrcDelta = cast<ConstantSDNode>(Op2.getOperand(1))->getValue();
4328         }
4329         if (G) {
4330           GlobalVariable *GV = dyn_cast<GlobalVariable>(G->getGlobal());
4331           if (GV && GV->isConstant()) {
4332             Str = GV->getStringValue(false);
4333             if (!Str.empty()) {
4334               CopyFromStr = true;
4335               SrcOff += SrcDelta;
4336             }
4337           }
4338         }
4339
4340         for (unsigned i = 0; i < NumMemOps; i++) {
4341           MVT::ValueType VT = MemOps[i];
4342           unsigned VTSize = MVT::getSizeInBits(VT) / 8;
4343           SDOperand Value, Chain, Store;
4344
4345           if (CopyFromStr) {
4346             Value = getMemsetStringVal(VT, DAG, TLI, Str, SrcOff);
4347             Chain = getRoot();
4348             Store =
4349               DAG.getStore(Chain, Value,
4350                            getMemBasePlusOffset(Op1, DstOff, DAG, TLI),
4351                            I.getOperand(1), DstOff);
4352           } else {
4353             Value = DAG.getLoad(VT, getRoot(),
4354                                 getMemBasePlusOffset(Op2, SrcOff, DAG, TLI),
4355                                 I.getOperand(2), SrcOff, false, Align);
4356             Chain = Value.getValue(1);
4357             Store =
4358               DAG.getStore(Chain, Value,
4359                            getMemBasePlusOffset(Op1, DstOff, DAG, TLI),
4360                            I.getOperand(1), DstOff, false, Align);
4361           }
4362           OutChains.push_back(Store);
4363           SrcOff += VTSize;
4364           DstOff += VTSize;
4365         }
4366       }
4367       break;
4368     }
4369     }
4370
4371     if (!OutChains.empty()) {
4372       DAG.setRoot(DAG.getNode(ISD::TokenFactor, MVT::Other,
4373                   &OutChains[0], OutChains.size()));
4374       return;
4375     }
4376   }
4377
4378   SDOperand AlwaysInline = DAG.getConstant(0, MVT::i1);
4379   SDOperand Node;
4380   switch(Op) {
4381     default:
4382       assert(0 && "Unknown Op");
4383     case ISD::MEMCPY:
4384       Node = DAG.getMemcpy(getRoot(), Op1, Op2, Op3, Op4, AlwaysInline);
4385       break;
4386     case ISD::MEMMOVE:
4387       Node = DAG.getMemmove(getRoot(), Op1, Op2, Op3, Op4, AlwaysInline);
4388       break;
4389     case ISD::MEMSET:
4390       Node = DAG.getMemset(getRoot(), Op1, Op2, Op3, Op4, AlwaysInline);
4391       break;
4392   }
4393   DAG.setRoot(Node);
4394 }
4395
4396 //===----------------------------------------------------------------------===//
4397 // SelectionDAGISel code
4398 //===----------------------------------------------------------------------===//
4399
4400 unsigned SelectionDAGISel::MakeReg(MVT::ValueType VT) {
4401   return RegInfo->createVirtualRegister(TLI.getRegClassFor(VT));
4402 }
4403
4404 void SelectionDAGISel::getAnalysisUsage(AnalysisUsage &AU) const {
4405   AU.addRequired<AliasAnalysis>();
4406   AU.addRequired<CollectorModuleMetadata>();
4407   AU.setPreservesAll();
4408 }
4409
4410
4411
4412 bool SelectionDAGISel::runOnFunction(Function &Fn) {
4413   // Get alias analysis for load/store combining.
4414   AA = &getAnalysis<AliasAnalysis>();
4415
4416   MachineFunction &MF = MachineFunction::construct(&Fn, TLI.getTargetMachine());
4417   if (MF.getFunction()->hasCollector())
4418     GCI = &getAnalysis<CollectorModuleMetadata>().get(*MF.getFunction());
4419   else
4420     GCI = 0;
4421   RegInfo = &MF.getRegInfo();
4422   DOUT << "\n\n\n=== " << Fn.getName() << "\n";
4423
4424   FunctionLoweringInfo FuncInfo(TLI, Fn, MF);
4425
4426   if (ExceptionHandling)
4427     for (Function::iterator I = Fn.begin(), E = Fn.end(); I != E; ++I)
4428       if (InvokeInst *Invoke = dyn_cast<InvokeInst>(I->getTerminator()))
4429         // Mark landing pad.
4430         FuncInfo.MBBMap[Invoke->getSuccessor(1)]->setIsLandingPad();
4431
4432   for (Function::iterator I = Fn.begin(), E = Fn.end(); I != E; ++I)
4433     SelectBasicBlock(I, MF, FuncInfo);
4434
4435   // Add function live-ins to entry block live-in set.
4436   BasicBlock *EntryBB = &Fn.getEntryBlock();
4437   BB = FuncInfo.MBBMap[EntryBB];
4438   if (!RegInfo->livein_empty())
4439     for (MachineRegisterInfo::livein_iterator I = RegInfo->livein_begin(),
4440            E = RegInfo->livein_end(); I != E; ++I)
4441       BB->addLiveIn(I->first);
4442
4443 #ifndef NDEBUG
4444   assert(FuncInfo.CatchInfoFound.size() == FuncInfo.CatchInfoLost.size() &&
4445          "Not all catch info was assigned to a landing pad!");
4446 #endif
4447
4448   return true;
4449 }
4450
4451 SDOperand SelectionDAGLowering::CopyValueToVirtualRegister(Value *V, 
4452                                                            unsigned Reg) {
4453   SDOperand Op = getValue(V);
4454   assert((Op.getOpcode() != ISD::CopyFromReg ||
4455           cast<RegisterSDNode>(Op.getOperand(1))->getReg() != Reg) &&
4456          "Copy from a reg to the same reg!");
4457   
4458   MVT::ValueType SrcVT = Op.getValueType();
4459   MVT::ValueType RegisterVT = TLI.getRegisterType(SrcVT);
4460   unsigned NumRegs = TLI.getNumRegisters(SrcVT);
4461   SmallVector<SDOperand, 8> Regs(NumRegs);
4462   SmallVector<SDOperand, 8> Chains(NumRegs);
4463
4464   // Copy the value by legal parts into sequential virtual registers.
4465   getCopyToParts(DAG, Op, &Regs[0], NumRegs, RegisterVT);
4466   for (unsigned i = 0; i != NumRegs; ++i)
4467     Chains[i] = DAG.getCopyToReg(getRoot(), Reg + i, Regs[i]);
4468   return DAG.getNode(ISD::TokenFactor, MVT::Other, &Chains[0], NumRegs);
4469 }
4470
4471 void SelectionDAGISel::
4472 LowerArguments(BasicBlock *LLVMBB, SelectionDAGLowering &SDL,
4473                std::vector<SDOperand> &UnorderedChains) {
4474   // If this is the entry block, emit arguments.
4475   Function &F = *LLVMBB->getParent();
4476   FunctionLoweringInfo &FuncInfo = SDL.FuncInfo;
4477   SDOperand OldRoot = SDL.DAG.getRoot();
4478   std::vector<SDOperand> Args = TLI.LowerArguments(F, SDL.DAG);
4479
4480   unsigned a = 0;
4481   for (Function::arg_iterator AI = F.arg_begin(), E = F.arg_end();
4482        AI != E; ++AI, ++a)
4483     if (!AI->use_empty()) {
4484       SDL.setValue(AI, Args[a]);
4485
4486       // If this argument is live outside of the entry block, insert a copy from
4487       // whereever we got it to the vreg that other BB's will reference it as.
4488       DenseMap<const Value*, unsigned>::iterator VMI=FuncInfo.ValueMap.find(AI);
4489       if (VMI != FuncInfo.ValueMap.end()) {
4490         SDOperand Copy = SDL.CopyValueToVirtualRegister(AI, VMI->second);
4491         UnorderedChains.push_back(Copy);
4492       }
4493     }
4494
4495   // Finally, if the target has anything special to do, allow it to do so.
4496   // FIXME: this should insert code into the DAG!
4497   EmitFunctionEntryCode(F, SDL.DAG.getMachineFunction());
4498 }
4499
4500 static void copyCatchInfo(BasicBlock *SrcBB, BasicBlock *DestBB,
4501                           MachineModuleInfo *MMI, FunctionLoweringInfo &FLI) {
4502   for (BasicBlock::iterator I = SrcBB->begin(), E = --SrcBB->end(); I != E; ++I)
4503     if (isSelector(I)) {
4504       // Apply the catch info to DestBB.
4505       addCatchInfo(cast<CallInst>(*I), MMI, FLI.MBBMap[DestBB]);
4506 #ifndef NDEBUG
4507       if (!FLI.MBBMap[SrcBB]->isLandingPad())
4508         FLI.CatchInfoFound.insert(I);
4509 #endif
4510     }
4511 }
4512
4513 /// CheckDAGForTailCallsAndFixThem - This Function looks for CALL nodes in the
4514 /// DAG and fixes their tailcall attribute operand.
4515 static void CheckDAGForTailCallsAndFixThem(SelectionDAG &DAG, 
4516                                            TargetLowering& TLI) {
4517   SDNode * Ret = NULL;
4518   SDOperand Terminator = DAG.getRoot();
4519
4520   // Find RET node.
4521   if (Terminator.getOpcode() == ISD::RET) {
4522     Ret = Terminator.Val;
4523   }
4524  
4525   // Fix tail call attribute of CALL nodes.
4526   for (SelectionDAG::allnodes_iterator BE = DAG.allnodes_begin(),
4527          BI = prior(DAG.allnodes_end()); BI != BE; --BI) {
4528     if (BI->getOpcode() == ISD::CALL) {
4529       SDOperand OpRet(Ret, 0);
4530       SDOperand OpCall(static_cast<SDNode*>(BI), 0);
4531       bool isMarkedTailCall = 
4532         cast<ConstantSDNode>(OpCall.getOperand(3))->getValue() != 0;
4533       // If CALL node has tail call attribute set to true and the call is not
4534       // eligible (no RET or the target rejects) the attribute is fixed to
4535       // false. The TargetLowering::IsEligibleForTailCallOptimization function
4536       // must correctly identify tail call optimizable calls.
4537       if (isMarkedTailCall && 
4538           (Ret==NULL || 
4539            !TLI.IsEligibleForTailCallOptimization(OpCall, OpRet, DAG))) {
4540         SmallVector<SDOperand, 32> Ops;
4541         unsigned idx=0;
4542         for(SDNode::op_iterator I =OpCall.Val->op_begin(), 
4543               E=OpCall.Val->op_end(); I!=E; I++, idx++) {
4544           if (idx!=3)
4545             Ops.push_back(*I);
4546           else 
4547             Ops.push_back(DAG.getConstant(false, TLI.getPointerTy()));
4548         }
4549         DAG.UpdateNodeOperands(OpCall, Ops.begin(), Ops.size());
4550       }
4551     }
4552   }
4553 }
4554
4555 void SelectionDAGISel::BuildSelectionDAG(SelectionDAG &DAG, BasicBlock *LLVMBB,
4556        std::vector<std::pair<MachineInstr*, unsigned> > &PHINodesToUpdate,
4557                                          FunctionLoweringInfo &FuncInfo) {
4558   SelectionDAGLowering SDL(DAG, TLI, *AA, FuncInfo, GCI);
4559
4560   std::vector<SDOperand> UnorderedChains;
4561
4562   // Lower any arguments needed in this block if this is the entry block.
4563   if (LLVMBB == &LLVMBB->getParent()->getEntryBlock())
4564     LowerArguments(LLVMBB, SDL, UnorderedChains);
4565
4566   BB = FuncInfo.MBBMap[LLVMBB];
4567   SDL.setCurrentBasicBlock(BB);
4568
4569   MachineModuleInfo *MMI = DAG.getMachineModuleInfo();
4570
4571   if (ExceptionHandling && MMI && BB->isLandingPad()) {
4572     // Add a label to mark the beginning of the landing pad.  Deletion of the
4573     // landing pad can thus be detected via the MachineModuleInfo.
4574     unsigned LabelID = MMI->addLandingPad(BB);
4575     DAG.setRoot(DAG.getNode(ISD::LABEL, MVT::Other, DAG.getEntryNode(),
4576                             DAG.getConstant(LabelID, MVT::i32)));
4577
4578     // Mark exception register as live in.
4579     unsigned Reg = TLI.getExceptionAddressRegister();
4580     if (Reg) BB->addLiveIn(Reg);
4581
4582     // Mark exception selector register as live in.
4583     Reg = TLI.getExceptionSelectorRegister();
4584     if (Reg) BB->addLiveIn(Reg);
4585
4586     // FIXME: Hack around an exception handling flaw (PR1508): the personality
4587     // function and list of typeids logically belong to the invoke (or, if you
4588     // like, the basic block containing the invoke), and need to be associated
4589     // with it in the dwarf exception handling tables.  Currently however the
4590     // information is provided by an intrinsic (eh.selector) that can be moved
4591     // to unexpected places by the optimizers: if the unwind edge is critical,
4592     // then breaking it can result in the intrinsics being in the successor of
4593     // the landing pad, not the landing pad itself.  This results in exceptions
4594     // not being caught because no typeids are associated with the invoke.
4595     // This may not be the only way things can go wrong, but it is the only way
4596     // we try to work around for the moment.
4597     BranchInst *Br = dyn_cast<BranchInst>(LLVMBB->getTerminator());
4598
4599     if (Br && Br->isUnconditional()) { // Critical edge?
4600       BasicBlock::iterator I, E;
4601       for (I = LLVMBB->begin(), E = --LLVMBB->end(); I != E; ++I)
4602         if (isSelector(I))
4603           break;
4604
4605       if (I == E)
4606         // No catch info found - try to extract some from the successor.
4607         copyCatchInfo(Br->getSuccessor(0), LLVMBB, MMI, FuncInfo);
4608     }
4609   }
4610
4611   // Lower all of the non-terminator instructions.
4612   for (BasicBlock::iterator I = LLVMBB->begin(), E = --LLVMBB->end();
4613        I != E; ++I)
4614     SDL.visit(*I);
4615
4616   // Ensure that all instructions which are used outside of their defining
4617   // blocks are available as virtual registers.  Invoke is handled elsewhere.
4618   for (BasicBlock::iterator I = LLVMBB->begin(), E = LLVMBB->end(); I != E;++I)
4619     if (!I->use_empty() && !isa<PHINode>(I) && !isa<InvokeInst>(I)) {
4620       DenseMap<const Value*, unsigned>::iterator VMI =FuncInfo.ValueMap.find(I);
4621       if (VMI != FuncInfo.ValueMap.end())
4622         UnorderedChains.push_back(
4623                                 SDL.CopyValueToVirtualRegister(I, VMI->second));
4624     }
4625
4626   // Handle PHI nodes in successor blocks.  Emit code into the SelectionDAG to
4627   // ensure constants are generated when needed.  Remember the virtual registers
4628   // that need to be added to the Machine PHI nodes as input.  We cannot just
4629   // directly add them, because expansion might result in multiple MBB's for one
4630   // BB.  As such, the start of the BB might correspond to a different MBB than
4631   // the end.
4632   //
4633   TerminatorInst *TI = LLVMBB->getTerminator();
4634
4635   // Emit constants only once even if used by multiple PHI nodes.
4636   std::map<Constant*, unsigned> ConstantsOut;
4637   
4638   // Vector bool would be better, but vector<bool> is really slow.
4639   std::vector<unsigned char> SuccsHandled;
4640   if (TI->getNumSuccessors())
4641     SuccsHandled.resize(BB->getParent()->getNumBlockIDs());
4642     
4643   // Check successor nodes' PHI nodes that expect a constant to be available
4644   // from this block.
4645   for (unsigned succ = 0, e = TI->getNumSuccessors(); succ != e; ++succ) {
4646     BasicBlock *SuccBB = TI->getSuccessor(succ);
4647     if (!isa<PHINode>(SuccBB->begin())) continue;
4648     MachineBasicBlock *SuccMBB = FuncInfo.MBBMap[SuccBB];
4649     
4650     // If this terminator has multiple identical successors (common for
4651     // switches), only handle each succ once.
4652     unsigned SuccMBBNo = SuccMBB->getNumber();
4653     if (SuccsHandled[SuccMBBNo]) continue;
4654     SuccsHandled[SuccMBBNo] = true;
4655     
4656     MachineBasicBlock::iterator MBBI = SuccMBB->begin();
4657     PHINode *PN;
4658
4659     // At this point we know that there is a 1-1 correspondence between LLVM PHI
4660     // nodes and Machine PHI nodes, but the incoming operands have not been
4661     // emitted yet.
4662     for (BasicBlock::iterator I = SuccBB->begin();
4663          (PN = dyn_cast<PHINode>(I)); ++I) {
4664       // Ignore dead phi's.
4665       if (PN->use_empty()) continue;
4666       
4667       unsigned Reg;
4668       Value *PHIOp = PN->getIncomingValueForBlock(LLVMBB);
4669       
4670       if (Constant *C = dyn_cast<Constant>(PHIOp)) {
4671         unsigned &RegOut = ConstantsOut[C];
4672         if (RegOut == 0) {
4673           RegOut = FuncInfo.CreateRegForValue(C);
4674           UnorderedChains.push_back(
4675                            SDL.CopyValueToVirtualRegister(C, RegOut));
4676         }
4677         Reg = RegOut;
4678       } else {
4679         Reg = FuncInfo.ValueMap[PHIOp];
4680         if (Reg == 0) {
4681           assert(isa<AllocaInst>(PHIOp) &&
4682                  FuncInfo.StaticAllocaMap.count(cast<AllocaInst>(PHIOp)) &&
4683                  "Didn't codegen value into a register!??");
4684           Reg = FuncInfo.CreateRegForValue(PHIOp);
4685           UnorderedChains.push_back(
4686                            SDL.CopyValueToVirtualRegister(PHIOp, Reg));
4687         }
4688       }
4689
4690       // Remember that this register needs to added to the machine PHI node as
4691       // the input for this MBB.
4692       MVT::ValueType VT = TLI.getValueType(PN->getType());
4693       unsigned NumRegisters = TLI.getNumRegisters(VT);
4694       for (unsigned i = 0, e = NumRegisters; i != e; ++i)
4695         PHINodesToUpdate.push_back(std::make_pair(MBBI++, Reg+i));
4696     }
4697   }
4698   ConstantsOut.clear();
4699
4700   // Turn all of the unordered chains into one factored node.
4701   if (!UnorderedChains.empty()) {
4702     SDOperand Root = SDL.getRoot();
4703     if (Root.getOpcode() != ISD::EntryToken) {
4704       unsigned i = 0, e = UnorderedChains.size();
4705       for (; i != e; ++i) {
4706         assert(UnorderedChains[i].Val->getNumOperands() > 1);
4707         if (UnorderedChains[i].Val->getOperand(0) == Root)
4708           break;  // Don't add the root if we already indirectly depend on it.
4709       }
4710         
4711       if (i == e)
4712         UnorderedChains.push_back(Root);
4713     }
4714     DAG.setRoot(DAG.getNode(ISD::TokenFactor, MVT::Other,
4715                             &UnorderedChains[0], UnorderedChains.size()));
4716   }
4717
4718   // Lower the terminator after the copies are emitted.
4719   SDL.visit(*LLVMBB->getTerminator());
4720
4721   // Copy over any CaseBlock records that may now exist due to SwitchInst
4722   // lowering, as well as any jump table information.
4723   SwitchCases.clear();
4724   SwitchCases = SDL.SwitchCases;
4725   JTCases.clear();
4726   JTCases = SDL.JTCases;
4727   BitTestCases.clear();
4728   BitTestCases = SDL.BitTestCases;
4729     
4730   // Make sure the root of the DAG is up-to-date.
4731   DAG.setRoot(SDL.getRoot());
4732
4733   // Check whether calls in this block are real tail calls. Fix up CALL nodes
4734   // with correct tailcall attribute so that the target can rely on the tailcall
4735   // attribute indicating whether the call is really eligible for tail call
4736   // optimization.
4737   CheckDAGForTailCallsAndFixThem(DAG, TLI);
4738 }
4739
4740 void SelectionDAGISel::CodeGenAndEmitDAG(SelectionDAG &DAG) {
4741   DOUT << "Lowered selection DAG:\n";
4742   DEBUG(DAG.dump());
4743
4744   // Run the DAG combiner in pre-legalize mode.
4745   DAG.Combine(false, *AA);
4746   
4747   DOUT << "Optimized lowered selection DAG:\n";
4748   DEBUG(DAG.dump());
4749   
4750   // Second step, hack on the DAG until it only uses operations and types that
4751   // the target supports.
4752 #if 0  // Enable this some day.
4753   DAG.LegalizeTypes();
4754   // Someday even later, enable a dag combine pass here.
4755 #endif
4756   DAG.Legalize();
4757   
4758   DOUT << "Legalized selection DAG:\n";
4759   DEBUG(DAG.dump());
4760   
4761   // Run the DAG combiner in post-legalize mode.
4762   DAG.Combine(true, *AA);
4763   
4764   DOUT << "Optimized legalized selection DAG:\n";
4765   DEBUG(DAG.dump());
4766
4767   if (ViewISelDAGs) DAG.viewGraph();
4768
4769   // Third, instruction select all of the operations to machine code, adding the
4770   // code to the MachineBasicBlock.
4771   InstructionSelectBasicBlock(DAG);
4772   
4773   DOUT << "Selected machine code:\n";
4774   DEBUG(BB->dump());
4775 }  
4776
4777 void SelectionDAGISel::SelectBasicBlock(BasicBlock *LLVMBB, MachineFunction &MF,
4778                                         FunctionLoweringInfo &FuncInfo) {
4779   std::vector<std::pair<MachineInstr*, unsigned> > PHINodesToUpdate;
4780   {
4781     SelectionDAG DAG(TLI, MF, getAnalysisToUpdate<MachineModuleInfo>());
4782     CurDAG = &DAG;
4783   
4784     // First step, lower LLVM code to some DAG.  This DAG may use operations and
4785     // types that are not supported by the target.
4786     BuildSelectionDAG(DAG, LLVMBB, PHINodesToUpdate, FuncInfo);
4787
4788     // Second step, emit the lowered DAG as machine code.
4789     CodeGenAndEmitDAG(DAG);
4790   }
4791
4792   DOUT << "Total amount of phi nodes to update: "
4793        << PHINodesToUpdate.size() << "\n";
4794   DEBUG(for (unsigned i = 0, e = PHINodesToUpdate.size(); i != e; ++i)
4795           DOUT << "Node " << i << " : (" << PHINodesToUpdate[i].first
4796                << ", " << PHINodesToUpdate[i].second << ")\n";);
4797   
4798   // Next, now that we know what the last MBB the LLVM BB expanded is, update
4799   // PHI nodes in successors.
4800   if (SwitchCases.empty() && JTCases.empty() && BitTestCases.empty()) {
4801     for (unsigned i = 0, e = PHINodesToUpdate.size(); i != e; ++i) {
4802       MachineInstr *PHI = PHINodesToUpdate[i].first;
4803       assert(PHI->getOpcode() == TargetInstrInfo::PHI &&
4804              "This is not a machine PHI node that we are updating!");
4805       PHI->addOperand(MachineOperand::CreateReg(PHINodesToUpdate[i].second,
4806                                                 false));
4807       PHI->addOperand(MachineOperand::CreateMBB(BB));
4808     }
4809     return;
4810   }
4811
4812   for (unsigned i = 0, e = BitTestCases.size(); i != e; ++i) {
4813     // Lower header first, if it wasn't already lowered
4814     if (!BitTestCases[i].Emitted) {
4815       SelectionDAG HSDAG(TLI, MF, getAnalysisToUpdate<MachineModuleInfo>());
4816       CurDAG = &HSDAG;
4817       SelectionDAGLowering HSDL(HSDAG, TLI, *AA, FuncInfo, GCI);
4818       // Set the current basic block to the mbb we wish to insert the code into
4819       BB = BitTestCases[i].Parent;
4820       HSDL.setCurrentBasicBlock(BB);
4821       // Emit the code
4822       HSDL.visitBitTestHeader(BitTestCases[i]);
4823       HSDAG.setRoot(HSDL.getRoot());
4824       CodeGenAndEmitDAG(HSDAG);
4825     }    
4826
4827     for (unsigned j = 0, ej = BitTestCases[i].Cases.size(); j != ej; ++j) {
4828       SelectionDAG BSDAG(TLI, MF, getAnalysisToUpdate<MachineModuleInfo>());
4829       CurDAG = &BSDAG;
4830       SelectionDAGLowering BSDL(BSDAG, TLI, *AA, FuncInfo, GCI);
4831       // Set the current basic block to the mbb we wish to insert the code into
4832       BB = BitTestCases[i].Cases[j].ThisBB;
4833       BSDL.setCurrentBasicBlock(BB);
4834       // Emit the code
4835       if (j+1 != ej)
4836         BSDL.visitBitTestCase(BitTestCases[i].Cases[j+1].ThisBB,
4837                               BitTestCases[i].Reg,
4838                               BitTestCases[i].Cases[j]);
4839       else
4840         BSDL.visitBitTestCase(BitTestCases[i].Default,
4841                               BitTestCases[i].Reg,
4842                               BitTestCases[i].Cases[j]);
4843         
4844         
4845       BSDAG.setRoot(BSDL.getRoot());
4846       CodeGenAndEmitDAG(BSDAG);
4847     }
4848
4849     // Update PHI Nodes
4850     for (unsigned pi = 0, pe = PHINodesToUpdate.size(); pi != pe; ++pi) {
4851       MachineInstr *PHI = PHINodesToUpdate[pi].first;
4852       MachineBasicBlock *PHIBB = PHI->getParent();
4853       assert(PHI->getOpcode() == TargetInstrInfo::PHI &&
4854              "This is not a machine PHI node that we are updating!");
4855       // This is "default" BB. We have two jumps to it. From "header" BB and
4856       // from last "case" BB.
4857       if (PHIBB == BitTestCases[i].Default) {
4858         PHI->addOperand(MachineOperand::CreateReg(PHINodesToUpdate[pi].second,
4859                                                   false));
4860         PHI->addOperand(MachineOperand::CreateMBB(BitTestCases[i].Parent));
4861         PHI->addOperand(MachineOperand::CreateReg(PHINodesToUpdate[pi].second,
4862                                                   false));
4863         PHI->addOperand(MachineOperand::CreateMBB(BitTestCases[i].Cases.
4864                                                   back().ThisBB));
4865       }
4866       // One of "cases" BB.
4867       for (unsigned j = 0, ej = BitTestCases[i].Cases.size(); j != ej; ++j) {
4868         MachineBasicBlock* cBB = BitTestCases[i].Cases[j].ThisBB;
4869         if (cBB->succ_end() !=
4870             std::find(cBB->succ_begin(),cBB->succ_end(), PHIBB)) {
4871           PHI->addOperand(MachineOperand::CreateReg(PHINodesToUpdate[pi].second,
4872                                                     false));
4873           PHI->addOperand(MachineOperand::CreateMBB(cBB));
4874         }
4875       }
4876     }
4877   }
4878
4879   // If the JumpTable record is filled in, then we need to emit a jump table.
4880   // Updating the PHI nodes is tricky in this case, since we need to determine
4881   // whether the PHI is a successor of the range check MBB or the jump table MBB
4882   for (unsigned i = 0, e = JTCases.size(); i != e; ++i) {
4883     // Lower header first, if it wasn't already lowered
4884     if (!JTCases[i].first.Emitted) {
4885       SelectionDAG HSDAG(TLI, MF, getAnalysisToUpdate<MachineModuleInfo>());
4886       CurDAG = &HSDAG;
4887       SelectionDAGLowering HSDL(HSDAG, TLI, *AA, FuncInfo, GCI);
4888       // Set the current basic block to the mbb we wish to insert the code into
4889       BB = JTCases[i].first.HeaderBB;
4890       HSDL.setCurrentBasicBlock(BB);
4891       // Emit the code
4892       HSDL.visitJumpTableHeader(JTCases[i].second, JTCases[i].first);
4893       HSDAG.setRoot(HSDL.getRoot());
4894       CodeGenAndEmitDAG(HSDAG);
4895     }
4896     
4897     SelectionDAG JSDAG(TLI, MF, getAnalysisToUpdate<MachineModuleInfo>());
4898     CurDAG = &JSDAG;
4899     SelectionDAGLowering JSDL(JSDAG, TLI, *AA, FuncInfo, GCI);
4900     // Set the current basic block to the mbb we wish to insert the code into
4901     BB = JTCases[i].second.MBB;
4902     JSDL.setCurrentBasicBlock(BB);
4903     // Emit the code
4904     JSDL.visitJumpTable(JTCases[i].second);
4905     JSDAG.setRoot(JSDL.getRoot());
4906     CodeGenAndEmitDAG(JSDAG);
4907     
4908     // Update PHI Nodes
4909     for (unsigned pi = 0, pe = PHINodesToUpdate.size(); pi != pe; ++pi) {
4910       MachineInstr *PHI = PHINodesToUpdate[pi].first;
4911       MachineBasicBlock *PHIBB = PHI->getParent();
4912       assert(PHI->getOpcode() == TargetInstrInfo::PHI &&
4913              "This is not a machine PHI node that we are updating!");
4914       // "default" BB. We can go there only from header BB.
4915       if (PHIBB == JTCases[i].second.Default) {
4916         PHI->addOperand(MachineOperand::CreateReg(PHINodesToUpdate[pi].second,
4917                                                   false));
4918         PHI->addOperand(MachineOperand::CreateMBB(JTCases[i].first.HeaderBB));
4919       }
4920       // JT BB. Just iterate over successors here
4921       if (BB->succ_end() != std::find(BB->succ_begin(),BB->succ_end(), PHIBB)) {
4922         PHI->addOperand(MachineOperand::CreateReg(PHINodesToUpdate[pi].second,
4923                                                   false));
4924         PHI->addOperand(MachineOperand::CreateMBB(BB));
4925       }
4926     }
4927   }
4928   
4929   // If the switch block involved a branch to one of the actual successors, we
4930   // need to update PHI nodes in that block.
4931   for (unsigned i = 0, e = PHINodesToUpdate.size(); i != e; ++i) {
4932     MachineInstr *PHI = PHINodesToUpdate[i].first;
4933     assert(PHI->getOpcode() == TargetInstrInfo::PHI &&
4934            "This is not a machine PHI node that we are updating!");
4935     if (BB->isSuccessor(PHI->getParent())) {
4936       PHI->addOperand(MachineOperand::CreateReg(PHINodesToUpdate[i].second,
4937                                                 false));
4938       PHI->addOperand(MachineOperand::CreateMBB(BB));
4939     }
4940   }
4941   
4942   // If we generated any switch lowering information, build and codegen any
4943   // additional DAGs necessary.
4944   for (unsigned i = 0, e = SwitchCases.size(); i != e; ++i) {
4945     SelectionDAG SDAG(TLI, MF, getAnalysisToUpdate<MachineModuleInfo>());
4946     CurDAG = &SDAG;
4947     SelectionDAGLowering SDL(SDAG, TLI, *AA, FuncInfo, GCI);
4948     
4949     // Set the current basic block to the mbb we wish to insert the code into
4950     BB = SwitchCases[i].ThisBB;
4951     SDL.setCurrentBasicBlock(BB);
4952     
4953     // Emit the code
4954     SDL.visitSwitchCase(SwitchCases[i]);
4955     SDAG.setRoot(SDL.getRoot());
4956     CodeGenAndEmitDAG(SDAG);
4957     
4958     // Handle any PHI nodes in successors of this chunk, as if we were coming
4959     // from the original BB before switch expansion.  Note that PHI nodes can
4960     // occur multiple times in PHINodesToUpdate.  We have to be very careful to
4961     // handle them the right number of times.
4962     while ((BB = SwitchCases[i].TrueBB)) {  // Handle LHS and RHS.
4963       for (MachineBasicBlock::iterator Phi = BB->begin();
4964            Phi != BB->end() && Phi->getOpcode() == TargetInstrInfo::PHI; ++Phi){
4965         // This value for this PHI node is recorded in PHINodesToUpdate, get it.
4966         for (unsigned pn = 0; ; ++pn) {
4967           assert(pn != PHINodesToUpdate.size() && "Didn't find PHI entry!");
4968           if (PHINodesToUpdate[pn].first == Phi) {
4969             Phi->addOperand(MachineOperand::CreateReg(PHINodesToUpdate[pn].
4970                                                       second, false));
4971             Phi->addOperand(MachineOperand::CreateMBB(SwitchCases[i].ThisBB));
4972             break;
4973           }
4974         }
4975       }
4976       
4977       // Don't process RHS if same block as LHS.
4978       if (BB == SwitchCases[i].FalseBB)
4979         SwitchCases[i].FalseBB = 0;
4980       
4981       // If we haven't handled the RHS, do so now.  Otherwise, we're done.
4982       SwitchCases[i].TrueBB = SwitchCases[i].FalseBB;
4983       SwitchCases[i].FalseBB = 0;
4984     }
4985     assert(SwitchCases[i].TrueBB == 0 && SwitchCases[i].FalseBB == 0);
4986   }
4987 }
4988
4989
4990 //===----------------------------------------------------------------------===//
4991 /// ScheduleAndEmitDAG - Pick a safe ordering and emit instructions for each
4992 /// target node in the graph.
4993 void SelectionDAGISel::ScheduleAndEmitDAG(SelectionDAG &DAG) {
4994   if (ViewSchedDAGs) DAG.viewGraph();
4995
4996   RegisterScheduler::FunctionPassCtor Ctor = RegisterScheduler::getDefault();
4997   
4998   if (!Ctor) {
4999     Ctor = ISHeuristic;
5000     RegisterScheduler::setDefault(Ctor);
5001   }
5002   
5003   ScheduleDAG *SL = Ctor(this, &DAG, BB);
5004   BB = SL->Run();
5005
5006   if (ViewSUnitDAGs) SL->viewGraph();
5007
5008   delete SL;
5009 }
5010
5011
5012 HazardRecognizer *SelectionDAGISel::CreateTargetHazardRecognizer() {
5013   return new HazardRecognizer();
5014 }
5015
5016 //===----------------------------------------------------------------------===//
5017 // Helper functions used by the generated instruction selector.
5018 //===----------------------------------------------------------------------===//
5019 // Calls to these methods are generated by tblgen.
5020
5021 /// CheckAndMask - The isel is trying to match something like (and X, 255).  If
5022 /// the dag combiner simplified the 255, we still want to match.  RHS is the
5023 /// actual value in the DAG on the RHS of an AND, and DesiredMaskS is the value
5024 /// specified in the .td file (e.g. 255).
5025 bool SelectionDAGISel::CheckAndMask(SDOperand LHS, ConstantSDNode *RHS, 
5026                                     int64_t DesiredMaskS) const {
5027   uint64_t ActualMask = RHS->getValue();
5028   uint64_t DesiredMask =DesiredMaskS & MVT::getIntVTBitMask(LHS.getValueType());
5029   
5030   // If the actual mask exactly matches, success!
5031   if (ActualMask == DesiredMask)
5032     return true;
5033   
5034   // If the actual AND mask is allowing unallowed bits, this doesn't match.
5035   if (ActualMask & ~DesiredMask)
5036     return false;
5037   
5038   // Otherwise, the DAG Combiner may have proven that the value coming in is
5039   // either already zero or is not demanded.  Check for known zero input bits.
5040   uint64_t NeededMask = DesiredMask & ~ActualMask;
5041   if (CurDAG->MaskedValueIsZero(LHS, NeededMask))
5042     return true;
5043   
5044   // TODO: check to see if missing bits are just not demanded.
5045
5046   // Otherwise, this pattern doesn't match.
5047   return false;
5048 }
5049
5050 /// CheckOrMask - The isel is trying to match something like (or X, 255).  If
5051 /// the dag combiner simplified the 255, we still want to match.  RHS is the
5052 /// actual value in the DAG on the RHS of an OR, and DesiredMaskS is the value
5053 /// specified in the .td file (e.g. 255).
5054 bool SelectionDAGISel::CheckOrMask(SDOperand LHS, ConstantSDNode *RHS, 
5055                                     int64_t DesiredMaskS) const {
5056   uint64_t ActualMask = RHS->getValue();
5057   uint64_t DesiredMask =DesiredMaskS & MVT::getIntVTBitMask(LHS.getValueType());
5058   
5059   // If the actual mask exactly matches, success!
5060   if (ActualMask == DesiredMask)
5061     return true;
5062   
5063   // If the actual AND mask is allowing unallowed bits, this doesn't match.
5064   if (ActualMask & ~DesiredMask)
5065     return false;
5066   
5067   // Otherwise, the DAG Combiner may have proven that the value coming in is
5068   // either already zero or is not demanded.  Check for known zero input bits.
5069   uint64_t NeededMask = DesiredMask & ~ActualMask;
5070   
5071   uint64_t KnownZero, KnownOne;
5072   CurDAG->ComputeMaskedBits(LHS, NeededMask, KnownZero, KnownOne);
5073   
5074   // If all the missing bits in the or are already known to be set, match!
5075   if ((NeededMask & KnownOne) == NeededMask)
5076     return true;
5077   
5078   // TODO: check to see if missing bits are just not demanded.
5079   
5080   // Otherwise, this pattern doesn't match.
5081   return false;
5082 }
5083
5084
5085 /// SelectInlineAsmMemoryOperands - Calls to this are automatically generated
5086 /// by tblgen.  Others should not call it.
5087 void SelectionDAGISel::
5088 SelectInlineAsmMemoryOperands(std::vector<SDOperand> &Ops, SelectionDAG &DAG) {
5089   std::vector<SDOperand> InOps;
5090   std::swap(InOps, Ops);
5091
5092   Ops.push_back(InOps[0]);  // input chain.
5093   Ops.push_back(InOps[1]);  // input asm string.
5094
5095   unsigned i = 2, e = InOps.size();
5096   if (InOps[e-1].getValueType() == MVT::Flag)
5097     --e;  // Don't process a flag operand if it is here.
5098   
5099   while (i != e) {
5100     unsigned Flags = cast<ConstantSDNode>(InOps[i])->getValue();
5101     if ((Flags & 7) != 4 /*MEM*/) {
5102       // Just skip over this operand, copying the operands verbatim.
5103       Ops.insert(Ops.end(), InOps.begin()+i, InOps.begin()+i+(Flags >> 3) + 1);
5104       i += (Flags >> 3) + 1;
5105     } else {
5106       assert((Flags >> 3) == 1 && "Memory operand with multiple values?");
5107       // Otherwise, this is a memory operand.  Ask the target to select it.
5108       std::vector<SDOperand> SelOps;
5109       if (SelectInlineAsmMemoryOperand(InOps[i+1], 'm', SelOps, DAG)) {
5110         cerr << "Could not match memory address.  Inline asm failure!\n";
5111         exit(1);
5112       }
5113       
5114       // Add this to the output node.
5115       MVT::ValueType IntPtrTy = DAG.getTargetLoweringInfo().getPointerTy();
5116       Ops.push_back(DAG.getTargetConstant(4/*MEM*/ | (SelOps.size() << 3),
5117                                           IntPtrTy));
5118       Ops.insert(Ops.end(), SelOps.begin(), SelOps.end());
5119       i += 2;
5120     }
5121   }
5122   
5123   // Add the flag input back if present.
5124   if (e != InOps.size())
5125     Ops.push_back(InOps.back());
5126 }
5127
5128 char SelectionDAGISel::ID = 0;