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