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