Match getTargetNode() changes (now return SDNode* instead of SDOperand).
[oota-llvm.git] / lib / Target / PowerPC / PPCISelDAGToDAG.cpp
1 //===-- PPCISelDAGToDAG.cpp - PPC --pattern matching inst selector --------===//
2 //
3 //                     The LLVM Compiler Infrastructure
4 //
5 // This file was developed by Chris Lattner and is distributed under
6 // the University of Illinois Open Source License. See LICENSE.TXT for details.
7 //
8 //===----------------------------------------------------------------------===//
9 //
10 // This file defines a pattern matching instruction selector for PowerPC,
11 // converting from a legalized dag to a PPC dag.
12 //
13 //===----------------------------------------------------------------------===//
14
15 #include "PPC.h"
16 #include "PPCTargetMachine.h"
17 #include "PPCISelLowering.h"
18 #include "llvm/CodeGen/MachineInstrBuilder.h"
19 #include "llvm/CodeGen/MachineFunction.h"
20 #include "llvm/CodeGen/SSARegMap.h"
21 #include "llvm/CodeGen/SelectionDAG.h"
22 #include "llvm/CodeGen/SelectionDAGISel.h"
23 #include "llvm/Target/TargetOptions.h"
24 #include "llvm/ADT/Statistic.h"
25 #include "llvm/Constants.h"
26 #include "llvm/GlobalValue.h"
27 #include "llvm/Support/Debug.h"
28 #include "llvm/Support/MathExtras.h"
29 #include <iostream>
30 #include <set>
31 using namespace llvm;
32
33 namespace {
34   Statistic<> FrameOff("ppc-codegen", "Number of frame idx offsets collapsed");
35     
36   //===--------------------------------------------------------------------===//
37   /// PPCDAGToDAGISel - PPC specific code to select PPC machine
38   /// instructions for SelectionDAG operations.
39   ///
40   class PPCDAGToDAGISel : public SelectionDAGISel {
41     PPCTargetLowering PPCLowering;
42     unsigned GlobalBaseReg;
43   public:
44     PPCDAGToDAGISel(TargetMachine &TM)
45       : SelectionDAGISel(PPCLowering), PPCLowering(TM) {}
46     
47     virtual bool runOnFunction(Function &Fn) {
48       // Make sure we re-emit a set of the global base reg if necessary
49       GlobalBaseReg = 0;
50       return SelectionDAGISel::runOnFunction(Fn);
51     }
52    
53     /// getI32Imm - Return a target constant with the specified value, of type
54     /// i32.
55     inline SDOperand getI32Imm(unsigned Imm) {
56       return CurDAG->getTargetConstant(Imm, MVT::i32);
57     }
58
59     /// getGlobalBaseReg - insert code into the entry mbb to materialize the PIC
60     /// base register.  Return the virtual register that holds this value.
61     SDOperand getGlobalBaseReg();
62     
63     // Select - Convert the specified operand from a target-independent to a
64     // target-specific node if it hasn't already been changed.
65     void Select(SDOperand &Result, SDOperand Op);
66     
67     SDNode *SelectBitfieldInsert(SDNode *N);
68
69     /// SelectCC - Select a comparison of the specified values with the
70     /// specified condition code, returning the CR# of the expression.
71     SDOperand SelectCC(SDOperand LHS, SDOperand RHS, ISD::CondCode CC);
72
73     /// SelectAddrImm - Returns true if the address N can be represented by
74     /// a base register plus a signed 16-bit displacement [r+imm].
75     bool SelectAddrImm(SDOperand N, SDOperand &Disp, SDOperand &Base);
76       
77     /// SelectAddrIdx - Given the specified addressed, check to see if it can be
78     /// represented as an indexed [r+r] operation.  Returns false if it can
79     /// be represented by [r+imm], which are preferred.
80     bool SelectAddrIdx(SDOperand N, SDOperand &Base, SDOperand &Index);
81     
82     /// SelectAddrIdxOnly - Given the specified addressed, force it to be
83     /// represented as an indexed [r+r] operation.
84     bool SelectAddrIdxOnly(SDOperand N, SDOperand &Base, SDOperand &Index);
85
86     SDOperand BuildSDIVSequence(SDNode *N);
87     SDOperand BuildUDIVSequence(SDNode *N);
88     
89     /// InstructionSelectBasicBlock - This callback is invoked by
90     /// SelectionDAGISel when it has created a SelectionDAG for us to codegen.
91     virtual void InstructionSelectBasicBlock(SelectionDAG &DAG);
92     
93     virtual const char *getPassName() const {
94       return "PowerPC DAG->DAG Pattern Instruction Selection";
95     } 
96
97 // Include the pieces autogenerated from the target description.
98 #include "PPCGenDAGISel.inc"
99     
100 private:
101     SDOperand SelectADD_PARTS(SDOperand Op);
102     SDOperand SelectSUB_PARTS(SDOperand Op);
103     SDOperand SelectSETCC(SDOperand Op);
104     SDOperand SelectCALL(SDOperand Op);
105   };
106 }
107
108 /// InstructionSelectBasicBlock - This callback is invoked by
109 /// SelectionDAGISel when it has created a SelectionDAG for us to codegen.
110 void PPCDAGToDAGISel::InstructionSelectBasicBlock(SelectionDAG &DAG) {
111   DEBUG(BB->dump());
112   
113   // The selection process is inherently a bottom-up recursive process (users
114   // select their uses before themselves).  Given infinite stack space, we
115   // could just start selecting on the root and traverse the whole graph.  In
116   // practice however, this causes us to run out of stack space on large basic
117   // blocks.  To avoid this problem, select the entry node, then all its uses,
118   // iteratively instead of recursively.
119   std::vector<SDOperand> Worklist;
120   Worklist.push_back(DAG.getEntryNode());
121   
122   // Note that we can do this in the PPC target (scanning forward across token
123   // chain edges) because no nodes ever get folded across these edges.  On a
124   // target like X86 which supports load/modify/store operations, this would
125   // have to be more careful.
126   while (!Worklist.empty()) {
127     SDOperand Node = Worklist.back();
128     Worklist.pop_back();
129     
130     // Chose from the least deep of the top two nodes.
131     if (!Worklist.empty() &&
132         Worklist.back().Val->getNodeDepth() < Node.Val->getNodeDepth())
133       std::swap(Worklist.back(), Node);
134     
135     if ((Node.Val->getOpcode() >= ISD::BUILTIN_OP_END &&
136          Node.Val->getOpcode() < PPCISD::FIRST_NUMBER) ||
137         CodeGenMap.count(Node)) continue;
138     
139     for (SDNode::use_iterator UI = Node.Val->use_begin(),
140          E = Node.Val->use_end(); UI != E; ++UI) {
141       // Scan the values.  If this use has a value that is a token chain, add it
142       // to the worklist.
143       SDNode *User = *UI;
144       for (unsigned i = 0, e = User->getNumValues(); i != e; ++i)
145         if (User->getValueType(i) == MVT::Other) {
146           Worklist.push_back(SDOperand(User, i));
147           break; 
148         }
149     }
150
151     // Finally, legalize this node.
152     SDOperand Dummy;
153     Select(Dummy, Node);
154   }
155     
156   // Select target instructions for the DAG.
157   DAG.setRoot(SelectRoot(DAG.getRoot()));
158   CodeGenMap.clear();
159   DAG.RemoveDeadNodes();
160   
161   // Emit machine code to BB. 
162   ScheduleAndEmitDAG(DAG);
163 }
164
165 /// getGlobalBaseReg - Output the instructions required to put the
166 /// base address to use for accessing globals into a register.
167 ///
168 SDOperand PPCDAGToDAGISel::getGlobalBaseReg() {
169   if (!GlobalBaseReg) {
170     // Insert the set of GlobalBaseReg into the first MBB of the function
171     MachineBasicBlock &FirstMBB = BB->getParent()->front();
172     MachineBasicBlock::iterator MBBI = FirstMBB.begin();
173     SSARegMap *RegMap = BB->getParent()->getSSARegMap();
174     // FIXME: when we get to LP64, we will need to create the appropriate
175     // type of register here.
176     GlobalBaseReg = RegMap->createVirtualRegister(PPC::GPRCRegisterClass);
177     BuildMI(FirstMBB, MBBI, PPC::MovePCtoLR, 0, PPC::LR);
178     BuildMI(FirstMBB, MBBI, PPC::MFLR, 1, GlobalBaseReg);
179   }
180   return CurDAG->getRegister(GlobalBaseReg, MVT::i32);
181 }
182
183
184 // isIntImmediate - This method tests to see if a constant operand.
185 // If so Imm will receive the 32 bit value.
186 static bool isIntImmediate(SDNode *N, unsigned& Imm) {
187   if (N->getOpcode() == ISD::Constant) {
188     Imm = cast<ConstantSDNode>(N)->getValue();
189     return true;
190   }
191   return false;
192 }
193
194 // isRunOfOnes - Returns true iff Val consists of one contiguous run of 1s with
195 // any number of 0s on either side.  The 1s are allowed to wrap from LSB to
196 // MSB, so 0x000FFF0, 0x0000FFFF, and 0xFF0000FF are all runs.  0x0F0F0000 is
197 // not, since all 1s are not contiguous.
198 static bool isRunOfOnes(unsigned Val, unsigned &MB, unsigned &ME) {
199   if (isShiftedMask_32(Val)) {
200     // look for the first non-zero bit
201     MB = CountLeadingZeros_32(Val);
202     // look for the first zero bit after the run of ones
203     ME = CountLeadingZeros_32((Val - 1) ^ Val);
204     return true;
205   } else {
206     Val = ~Val; // invert mask
207     if (isShiftedMask_32(Val)) {
208       // effectively look for the first zero bit
209       ME = CountLeadingZeros_32(Val) - 1;
210       // effectively look for the first one bit after the run of zeros
211       MB = CountLeadingZeros_32((Val - 1) ^ Val) + 1;
212       return true;
213     }
214   }
215   // no run present
216   return false;
217 }
218
219 // isRotateAndMask - Returns true if Mask and Shift can be folded into a rotate
220 // and mask opcode and mask operation.
221 static bool isRotateAndMask(SDNode *N, unsigned Mask, bool IsShiftMask,
222                             unsigned &SH, unsigned &MB, unsigned &ME) {
223   // Don't even go down this path for i64, since different logic will be
224   // necessary for rldicl/rldicr/rldimi.
225   if (N->getValueType(0) != MVT::i32)
226     return false;
227
228   unsigned Shift  = 32;
229   unsigned Indeterminant = ~0;  // bit mask marking indeterminant results
230   unsigned Opcode = N->getOpcode();
231   if (N->getNumOperands() != 2 ||
232       !isIntImmediate(N->getOperand(1).Val, Shift) || (Shift > 31))
233     return false;
234   
235   if (Opcode == ISD::SHL) {
236     // apply shift left to mask if it comes first
237     if (IsShiftMask) Mask = Mask << Shift;
238     // determine which bits are made indeterminant by shift
239     Indeterminant = ~(0xFFFFFFFFu << Shift);
240   } else if (Opcode == ISD::SRL) { 
241     // apply shift right to mask if it comes first
242     if (IsShiftMask) Mask = Mask >> Shift;
243     // determine which bits are made indeterminant by shift
244     Indeterminant = ~(0xFFFFFFFFu >> Shift);
245     // adjust for the left rotate
246     Shift = 32 - Shift;
247   } else {
248     return false;
249   }
250   
251   // if the mask doesn't intersect any Indeterminant bits
252   if (Mask && !(Mask & Indeterminant)) {
253     SH = Shift;
254     // make sure the mask is still a mask (wrap arounds may not be)
255     return isRunOfOnes(Mask, MB, ME);
256   }
257   return false;
258 }
259
260 // isOpcWithIntImmediate - This method tests to see if the node is a specific
261 // opcode and that it has a immediate integer right operand.
262 // If so Imm will receive the 32 bit value.
263 static bool isOpcWithIntImmediate(SDNode *N, unsigned Opc, unsigned& Imm) {
264   return N->getOpcode() == Opc && isIntImmediate(N->getOperand(1).Val, Imm);
265 }
266
267 // isIntImmediate - This method tests to see if a constant operand.
268 // If so Imm will receive the 32 bit value.
269 static bool isIntImmediate(SDOperand N, unsigned& Imm) {
270   if (ConstantSDNode *CN = dyn_cast<ConstantSDNode>(N)) {
271     Imm = (unsigned)CN->getSignExtended();
272     return true;
273   }
274   return false;
275 }
276
277 /// SelectBitfieldInsert - turn an or of two masked values into
278 /// the rotate left word immediate then mask insert (rlwimi) instruction.
279 /// Returns true on success, false if the caller still needs to select OR.
280 ///
281 /// Patterns matched:
282 /// 1. or shl, and   5. or and, and
283 /// 2. or and, shl   6. or shl, shr
284 /// 3. or shr, and   7. or shr, shl
285 /// 4. or and, shr
286 SDNode *PPCDAGToDAGISel::SelectBitfieldInsert(SDNode *N) {
287   bool IsRotate = false;
288   unsigned TgtMask = 0xFFFFFFFF, InsMask = 0xFFFFFFFF, SH = 0;
289   unsigned Value;
290   
291   SDOperand Op0 = N->getOperand(0);
292   SDOperand Op1 = N->getOperand(1);
293   
294   unsigned Op0Opc = Op0.getOpcode();
295   unsigned Op1Opc = Op1.getOpcode();
296   
297   // Verify that we have the correct opcodes
298   if (ISD::SHL != Op0Opc && ISD::SRL != Op0Opc && ISD::AND != Op0Opc)
299     return false;
300   if (ISD::SHL != Op1Opc && ISD::SRL != Op1Opc && ISD::AND != Op1Opc)
301     return false;
302   
303   // Generate Mask value for Target
304   if (isIntImmediate(Op0.getOperand(1), Value)) {
305     switch(Op0Opc) {
306     case ISD::SHL: TgtMask <<= Value; break;
307     case ISD::SRL: TgtMask >>= Value; break;
308     case ISD::AND: TgtMask &= Value; break;
309     }
310   } else {
311     return 0;
312   }
313   
314   // Generate Mask value for Insert
315   if (!isIntImmediate(Op1.getOperand(1), Value))
316     return 0;
317   
318   switch(Op1Opc) {
319   case ISD::SHL:
320     SH = Value;
321     InsMask <<= SH;
322     if (Op0Opc == ISD::SRL) IsRotate = true;
323     break;
324   case ISD::SRL:
325     SH = Value;
326     InsMask >>= SH;
327     SH = 32-SH;
328     if (Op0Opc == ISD::SHL) IsRotate = true;
329     break;
330   case ISD::AND:
331     InsMask &= Value;
332     break;
333   }
334   
335   // If both of the inputs are ANDs and one of them has a logical shift by
336   // constant as its input, make that AND the inserted value so that we can
337   // combine the shift into the rotate part of the rlwimi instruction
338   bool IsAndWithShiftOp = false;
339   if (Op0Opc == ISD::AND && Op1Opc == ISD::AND) {
340     if (Op1.getOperand(0).getOpcode() == ISD::SHL ||
341         Op1.getOperand(0).getOpcode() == ISD::SRL) {
342       if (isIntImmediate(Op1.getOperand(0).getOperand(1), Value)) {
343         SH = Op1.getOperand(0).getOpcode() == ISD::SHL ? Value : 32 - Value;
344         IsAndWithShiftOp = true;
345       }
346     } else if (Op0.getOperand(0).getOpcode() == ISD::SHL ||
347                Op0.getOperand(0).getOpcode() == ISD::SRL) {
348       if (isIntImmediate(Op0.getOperand(0).getOperand(1), Value)) {
349         std::swap(Op0, Op1);
350         std::swap(TgtMask, InsMask);
351         SH = Op1.getOperand(0).getOpcode() == ISD::SHL ? Value : 32 - Value;
352         IsAndWithShiftOp = true;
353       }
354     }
355   }
356   
357   // Verify that the Target mask and Insert mask together form a full word mask
358   // and that the Insert mask is a run of set bits (which implies both are runs
359   // of set bits).  Given that, Select the arguments and generate the rlwimi
360   // instruction.
361   unsigned MB, ME;
362   if (((TgtMask & InsMask) == 0) && isRunOfOnes(InsMask, MB, ME)) {
363     bool fullMask = (TgtMask ^ InsMask) == 0xFFFFFFFF;
364     bool Op0IsAND = Op0Opc == ISD::AND;
365     // Check for rotlwi / rotrwi here, a special case of bitfield insert
366     // where both bitfield halves are sourced from the same value.
367     if (IsRotate && fullMask &&
368         N->getOperand(0).getOperand(0) == N->getOperand(1).getOperand(0)) {
369       SDOperand Tmp;
370       Select(Tmp, N->getOperand(0).getOperand(0));
371       return CurDAG->getTargetNode(PPC::RLWINM, MVT::i32, Tmp,
372                                    getI32Imm(SH), getI32Imm(0), getI32Imm(31));
373     }
374     SDOperand Tmp1, Tmp2;
375     Select(Tmp1, ((Op0IsAND && fullMask) ? Op0.getOperand(0) : Op0));
376     Select(Tmp2, (IsAndWithShiftOp ? Op1.getOperand(0).getOperand(0)
377                                    : Op1.getOperand(0)));
378     return CurDAG->getTargetNode(PPC::RLWIMI, MVT::i32, Tmp1, Tmp2,
379                                  getI32Imm(SH), getI32Imm(MB), getI32Imm(ME));
380   }
381   return 0;
382 }
383
384 /// SelectAddrImm - Returns true if the address N can be represented by
385 /// a base register plus a signed 16-bit displacement [r+imm].
386 bool PPCDAGToDAGISel::SelectAddrImm(SDOperand N, SDOperand &Disp, 
387                                     SDOperand &Base) {
388   if (N.getOpcode() == ISD::ADD) {
389     unsigned imm = 0;
390     if (isIntImmediate(N.getOperand(1), imm) && isInt16(imm)) {
391       Disp = getI32Imm(imm & 0xFFFF);
392       if (FrameIndexSDNode *FI = dyn_cast<FrameIndexSDNode>(N.getOperand(0))) {
393         Base = CurDAG->getTargetFrameIndex(FI->getIndex(), MVT::i32);
394       } else {
395         Base = N.getOperand(0);
396       }
397       return true; // [r+i]
398     } else if (N.getOperand(1).getOpcode() == PPCISD::Lo) {
399       // Match LOAD (ADD (X, Lo(G))).
400       assert(!cast<ConstantSDNode>(N.getOperand(1).getOperand(1))->getValue()
401              && "Cannot handle constant offsets yet!");
402       Disp = N.getOperand(1).getOperand(0);  // The global address.
403       assert(Disp.getOpcode() == ISD::TargetGlobalAddress ||
404              Disp.getOpcode() == ISD::TargetConstantPool);
405       Base = N.getOperand(0);
406       return true;  // [&g+r]
407     }
408     return false;   // [r+r]
409   }
410   Disp = getI32Imm(0);
411   if (FrameIndexSDNode *FI = dyn_cast<FrameIndexSDNode>(N))
412     Base = CurDAG->getTargetFrameIndex(FI->getIndex(), MVT::i32);
413   else
414     Base = N;
415   return true;      // [r+0]
416 }
417
418 /// SelectAddrIdx - Given the specified addressed, check to see if it can be
419 /// represented as an indexed [r+r] operation.  Returns false if it can
420 /// be represented by [r+imm], which are preferred.
421 bool PPCDAGToDAGISel::SelectAddrIdx(SDOperand N, SDOperand &Base, 
422                                     SDOperand &Index) {
423   // Check to see if we can represent this as an [r+imm] address instead, 
424   // which will fail if the address is more profitably represented as an
425   // [r+r] address.
426   if (SelectAddrImm(N, Base, Index))
427     return false;
428   
429   if (N.getOpcode() == ISD::ADD) {
430     Base = N.getOperand(0);
431     Index = N.getOperand(1);
432     return true;
433   }
434  
435   Base = CurDAG->getRegister(PPC::R0, MVT::i32);
436   Index = N;
437   return true;
438 }
439
440 /// SelectAddrIdxOnly - Given the specified addressed, force it to be
441 /// represented as an indexed [r+r] operation.
442 bool PPCDAGToDAGISel::SelectAddrIdxOnly(SDOperand N, SDOperand &Base, 
443                                         SDOperand &Index) {
444   if (N.getOpcode() == ISD::ADD) {
445     Base = N.getOperand(0);
446     Index = N.getOperand(1);
447     return true;
448   }
449   
450   Base = CurDAG->getRegister(PPC::R0, MVT::i32);
451   Index = N;
452   return true;
453 }
454
455 /// SelectCC - Select a comparison of the specified values with the specified
456 /// condition code, returning the CR# of the expression.
457 SDOperand PPCDAGToDAGISel::SelectCC(SDOperand LHS, SDOperand RHS,
458                                     ISD::CondCode CC) {
459   // Always select the LHS.
460   Select(LHS, LHS);
461
462   // Use U to determine whether the SETCC immediate range is signed or not.
463   if (MVT::isInteger(LHS.getValueType())) {
464     bool U = ISD::isUnsignedIntSetCC(CC);
465     unsigned Imm;
466     if (isIntImmediate(RHS, Imm) && 
467         ((U && isUInt16(Imm)) || (!U && isInt16(Imm))))
468       return SDOperand(CurDAG->getTargetNode(U ? PPC::CMPLWI : PPC::CMPWI,
469                                     MVT::i32, LHS, getI32Imm(Imm & 0xFFFF)), 0);
470     Select(RHS, RHS);
471     return SDOperand(CurDAG->getTargetNode(U ? PPC::CMPLW : PPC::CMPW, MVT::i32,
472                                            LHS, RHS), 0);
473   } else if (LHS.getValueType() == MVT::f32) {
474     Select(RHS, RHS);
475     return SDOperand(CurDAG->getTargetNode(PPC::FCMPUS, MVT::i32, LHS, RHS), 0);
476   } else {
477     Select(RHS, RHS);
478     return SDOperand(CurDAG->getTargetNode(PPC::FCMPUD, MVT::i32, LHS, RHS), 0);
479   }
480 }
481
482 /// getBCCForSetCC - Returns the PowerPC condition branch mnemonic corresponding
483 /// to Condition.
484 static unsigned getBCCForSetCC(ISD::CondCode CC) {
485   switch (CC) {
486   default: assert(0 && "Unknown condition!"); abort();
487   case ISD::SETOEQ:    // FIXME: This is incorrect see PR642.
488   case ISD::SETEQ:  return PPC::BEQ;
489   case ISD::SETONE:    // FIXME: This is incorrect see PR642.
490   case ISD::SETNE:  return PPC::BNE;
491   case ISD::SETOLT:    // FIXME: This is incorrect see PR642.
492   case ISD::SETULT:
493   case ISD::SETLT:  return PPC::BLT;
494   case ISD::SETOLE:    // FIXME: This is incorrect see PR642.
495   case ISD::SETULE:
496   case ISD::SETLE:  return PPC::BLE;
497   case ISD::SETOGT:    // FIXME: This is incorrect see PR642.
498   case ISD::SETUGT:
499   case ISD::SETGT:  return PPC::BGT;
500   case ISD::SETOGE:    // FIXME: This is incorrect see PR642.
501   case ISD::SETUGE:
502   case ISD::SETGE:  return PPC::BGE;
503     
504   case ISD::SETO:   return PPC::BUN;
505   case ISD::SETUO:  return PPC::BNU;
506   }
507   return 0;
508 }
509
510 /// getCRIdxForSetCC - Return the index of the condition register field
511 /// associated with the SetCC condition, and whether or not the field is
512 /// treated as inverted.  That is, lt = 0; ge = 0 inverted.
513 static unsigned getCRIdxForSetCC(ISD::CondCode CC, bool& Inv) {
514   switch (CC) {
515   default: assert(0 && "Unknown condition!"); abort();
516   case ISD::SETOLT:  // FIXME: This is incorrect see PR642.
517   case ISD::SETULT:
518   case ISD::SETLT:  Inv = false;  return 0;
519   case ISD::SETOGE:  // FIXME: This is incorrect see PR642.
520   case ISD::SETUGE:
521   case ISD::SETGE:  Inv = true;   return 0;
522   case ISD::SETOGT:  // FIXME: This is incorrect see PR642.
523   case ISD::SETUGT:
524   case ISD::SETGT:  Inv = false;  return 1;
525   case ISD::SETOLE:  // FIXME: This is incorrect see PR642.
526   case ISD::SETULE:
527   case ISD::SETLE:  Inv = true;   return 1;
528   case ISD::SETOEQ:  // FIXME: This is incorrect see PR642.
529   case ISD::SETEQ:  Inv = false;  return 2;
530   case ISD::SETONE:  // FIXME: This is incorrect see PR642.
531   case ISD::SETNE:  Inv = true;   return 2;
532   case ISD::SETO:   Inv = true;   return 3;
533   case ISD::SETUO:  Inv = false;  return 3;
534   }
535   return 0;
536 }
537
538
539 SDOperand PPCDAGToDAGISel::SelectADD_PARTS(SDOperand Op) {
540   SDNode *N = Op.Val;
541   SDOperand LHSL, LHSH;
542   Select(LHSL, N->getOperand(0));
543   Select(LHSH, N->getOperand(1));
544   
545   unsigned Imm;
546   bool ME = false, ZE = false;
547   if (isIntImmediate(N->getOperand(3), Imm)) {
548     ME = (signed)Imm == -1;
549     ZE = Imm == 0;
550   }
551   
552   std::vector<SDOperand> Result;
553   SDOperand Tmp;
554   SDNode *CarryFromLo;
555   if (isIntImmediate(N->getOperand(2), Imm) &&
556       ((signed)Imm >= -32768 || (signed)Imm < 32768)) {
557     // Codegen the low 32 bits of the add.  Interestingly, there is no
558     // shifted form of add immediate carrying.
559     CarryFromLo = CurDAG->getTargetNode(PPC::ADDIC, MVT::i32, MVT::Flag,
560                                         LHSL, getI32Imm(Imm));
561   } else {
562     Select(Tmp, N->getOperand(2));
563     CarryFromLo = CurDAG->getTargetNode(PPC::ADDC, MVT::i32, MVT::Flag,
564                                         LHSL, Tmp);
565   }
566   
567   // Codegen the high 32 bits, adding zero, minus one, or the full value
568   // along with the carry flag produced by addc/addic.
569   SDOperand ResultHi;
570   if (ZE)
571     ResultHi = SDOperand(CurDAG->getTargetNode(PPC::ADDZE, MVT::i32, LHSH,
572                                                SDOperand(CarryFromLo, 1)), 0);
573   else if (ME)
574     ResultHi = SDOperand(CurDAG->getTargetNode(PPC::ADDME, MVT::i32, LHSH,
575                                                SDOperand(CarryFromLo, 1)), 0);
576   else {
577     Select(Tmp, N->getOperand(3));
578     ResultHi = SDOperand(CurDAG->getTargetNode(PPC::ADDE, MVT::i32, LHSH,
579                                             Tmp, SDOperand(CarryFromLo, 1)), 0);
580   }
581   Result.push_back(SDOperand(CarryFromLo, 0));
582   Result.push_back(ResultHi);
583   
584   CodeGenMap[Op.getValue(0)] = Result[0];
585   CodeGenMap[Op.getValue(1)] = Result[1];
586   return Result[Op.ResNo];
587 }
588 SDOperand PPCDAGToDAGISel::SelectSUB_PARTS(SDOperand Op) {
589   SDNode *N = Op.Val;
590   SDOperand LHSL, LHSH, RHSL, RHSH;
591   Select(LHSL, N->getOperand(0));
592   Select(LHSH, N->getOperand(1));
593   Select(RHSL, N->getOperand(2));
594   Select(RHSH, N->getOperand(3));
595   
596   std::vector<SDOperand> Result;
597   Result.push_back(SDOperand(CurDAG->getTargetNode(PPC::SUBFC, MVT::i32,
598                                                    MVT::Flag, RHSL, LHSL), 0));
599   Result.push_back(SDOperand(CurDAG->getTargetNode(PPC::SUBFE, MVT::i32,
600                                                    RHSH, LHSH,
601                                                    Result[0].getValue(1)), 0));
602   CodeGenMap[Op.getValue(0)] = Result[0];
603   CodeGenMap[Op.getValue(1)] = Result[1];
604   return Result[Op.ResNo];
605 }
606
607 SDOperand PPCDAGToDAGISel::SelectSETCC(SDOperand Op) {
608   SDNode *N = Op.Val;
609   unsigned Imm;
610   ISD::CondCode CC = cast<CondCodeSDNode>(N->getOperand(2))->get();
611   if (isIntImmediate(N->getOperand(1), Imm)) {
612     // We can codegen setcc op, imm very efficiently compared to a brcond.
613     // Check for those cases here.
614     // setcc op, 0
615     if (Imm == 0) {
616       SDOperand Op;
617       Select(Op, N->getOperand(0));
618       switch (CC) {
619       default: break;
620       case ISD::SETEQ:
621         Op = SDOperand(CurDAG->getTargetNode(PPC::CNTLZW, MVT::i32, Op), 0);
622         return CurDAG->SelectNodeTo(N, PPC::RLWINM, MVT::i32, Op, getI32Imm(27),
623                                     getI32Imm(5), getI32Imm(31));
624       case ISD::SETNE: {
625         SDOperand AD =
626           SDOperand(CurDAG->getTargetNode(PPC::ADDIC, MVT::i32, MVT::Flag,
627                                           Op, getI32Imm(~0U)), 0);
628         return CurDAG->SelectNodeTo(N, PPC::SUBFE, MVT::i32, AD, Op, 
629                                     AD.getValue(1));
630       }
631       case ISD::SETLT:
632         return CurDAG->SelectNodeTo(N, PPC::RLWINM, MVT::i32, Op, getI32Imm(1),
633                                     getI32Imm(31), getI32Imm(31));
634       case ISD::SETGT: {
635         SDOperand T =
636           SDOperand(CurDAG->getTargetNode(PPC::NEG, MVT::i32, Op), 0);
637         T = SDOperand(CurDAG->getTargetNode(PPC::ANDC, MVT::i32, T, Op), 0);
638         return CurDAG->SelectNodeTo(N, PPC::RLWINM, MVT::i32, T, getI32Imm(1),
639                                     getI32Imm(31), getI32Imm(31));
640       }
641       }
642     } else if (Imm == ~0U) {        // setcc op, -1
643       SDOperand Op;
644       Select(Op, N->getOperand(0));
645       switch (CC) {
646       default: break;
647       case ISD::SETEQ:
648         Op = SDOperand(CurDAG->getTargetNode(PPC::ADDIC, MVT::i32, MVT::Flag,
649                                              Op, getI32Imm(1)), 0);
650         return CurDAG->SelectNodeTo(N, PPC::ADDZE, MVT::i32, 
651                               SDOperand(CurDAG->getTargetNode(PPC::LI, MVT::i32,
652                                                               getI32Imm(0)), 0),
653                                     Op.getValue(1));
654       case ISD::SETNE: {
655         Op = SDOperand(CurDAG->getTargetNode(PPC::NOR, MVT::i32, Op, Op), 0);
656         SDNode *AD = CurDAG->getTargetNode(PPC::ADDIC, MVT::i32, MVT::Flag,
657                                            Op, getI32Imm(~0U));
658         return CurDAG->SelectNodeTo(N, PPC::SUBFE, MVT::i32, SDOperand(AD, 0), Op, 
659                                     SDOperand(AD, 1));
660       }
661       case ISD::SETLT: {
662         SDOperand AD = SDOperand(CurDAG->getTargetNode(PPC::ADDI, MVT::i32, Op,
663                                                        getI32Imm(1)), 0);
664         SDOperand AN = SDOperand(CurDAG->getTargetNode(PPC::AND, MVT::i32, AD,
665                                                        Op), 0);
666         return CurDAG->SelectNodeTo(N, PPC::RLWINM, MVT::i32, AN, getI32Imm(1),
667                                     getI32Imm(31), getI32Imm(31));
668       }
669       case ISD::SETGT:
670         Op = SDOperand(CurDAG->getTargetNode(PPC::RLWINM, MVT::i32, Op,
671                                              getI32Imm(1), getI32Imm(31),
672                                              getI32Imm(31)), 0);
673         return CurDAG->SelectNodeTo(N, PPC::XORI, MVT::i32, Op, getI32Imm(1));
674       }
675     }
676   }
677   
678   bool Inv;
679   unsigned Idx = getCRIdxForSetCC(CC, Inv);
680   SDOperand CCReg = SelectCC(N->getOperand(0), N->getOperand(1), CC);
681   SDOperand IntCR;
682   
683   // Force the ccreg into CR7.
684   SDOperand CR7Reg = CurDAG->getRegister(PPC::CR7, MVT::i32);
685   
686   SDOperand InFlag(0, 0);  // Null incoming flag value.
687   CCReg = CurDAG->getCopyToReg(CurDAG->getEntryNode(), CR7Reg, CCReg, 
688                                InFlag).getValue(1);
689   
690   if (TLI.getTargetMachine().getSubtarget<PPCSubtarget>().isGigaProcessor())
691     IntCR = SDOperand(CurDAG->getTargetNode(PPC::MFOCRF, MVT::i32, CR7Reg,
692                                             CCReg), 0);
693   else
694     IntCR = SDOperand(CurDAG->getTargetNode(PPC::MFCR, MVT::i32, CCReg), 0);
695   
696   if (!Inv) {
697     return CurDAG->SelectNodeTo(N, PPC::RLWINM, MVT::i32, IntCR,
698                                 getI32Imm((32-(3-Idx)) & 31),
699                                 getI32Imm(31), getI32Imm(31));
700   } else {
701     SDOperand Tmp =
702       SDOperand(CurDAG->getTargetNode(PPC::RLWINM, MVT::i32, IntCR,
703                                       getI32Imm((32-(3-Idx)) & 31),
704                                       getI32Imm(31),getI32Imm(31)), 0);
705     return CurDAG->SelectNodeTo(N, PPC::XORI, MVT::i32, Tmp, getI32Imm(1));
706   }
707 }
708
709 /// isCallCompatibleAddress - Return true if the specified 32-bit value is
710 /// representable in the immediate field of a Bx instruction.
711 static bool isCallCompatibleAddress(ConstantSDNode *C) {
712   int Addr = C->getValue();
713   if (Addr & 3) return false;  // Low 2 bits are implicitly zero.
714   return (Addr << 6 >> 6) == Addr;  // Top 6 bits have to be sext of immediate.
715 }
716
717 SDOperand PPCDAGToDAGISel::SelectCALL(SDOperand Op) {
718   SDNode *N = Op.Val;
719   SDOperand Chain;
720   Select(Chain, N->getOperand(0));
721   
722   unsigned CallOpcode;
723   std::vector<SDOperand> CallOperands;
724   
725   if (GlobalAddressSDNode *GASD =
726       dyn_cast<GlobalAddressSDNode>(N->getOperand(1))) {
727     CallOpcode = PPC::BL;
728     CallOperands.push_back(N->getOperand(1));
729   } else if (ExternalSymbolSDNode *ESSDN =
730              dyn_cast<ExternalSymbolSDNode>(N->getOperand(1))) {
731     CallOpcode = PPC::BL;
732     CallOperands.push_back(N->getOperand(1));
733   } else if (isa<ConstantSDNode>(N->getOperand(1)) &&
734              isCallCompatibleAddress(cast<ConstantSDNode>(N->getOperand(1)))) {
735     ConstantSDNode *C = cast<ConstantSDNode>(N->getOperand(1));
736     CallOpcode = PPC::BLA;
737     CallOperands.push_back(getI32Imm((int)C->getValue() >> 2));
738   } else {
739     // Copy the callee address into the CTR register.
740     SDOperand Callee;
741     Select(Callee, N->getOperand(1));
742     Chain = SDOperand(CurDAG->getTargetNode(PPC::MTCTR, MVT::Other, Callee,
743                                             Chain), 0);
744     
745     // Copy the callee address into R12 on darwin.
746     SDOperand R12 = CurDAG->getRegister(PPC::R12, MVT::i32);
747     Chain = CurDAG->getNode(ISD::CopyToReg, MVT::Other, Chain, R12, Callee);
748
749     CallOperands.push_back(R12);
750     CallOpcode = PPC::BCTRL;
751   }
752   
753   unsigned GPR_idx = 0, FPR_idx = 0;
754   static const unsigned GPR[] = {
755     PPC::R3, PPC::R4, PPC::R5, PPC::R6,
756     PPC::R7, PPC::R8, PPC::R9, PPC::R10,
757   };
758   static const unsigned FPR[] = {
759     PPC::F1, PPC::F2, PPC::F3, PPC::F4, PPC::F5, PPC::F6, PPC::F7,
760     PPC::F8, PPC::F9, PPC::F10, PPC::F11, PPC::F12, PPC::F13
761   };
762   
763   SDOperand InFlag;  // Null incoming flag value.
764   
765   for (unsigned i = 2, e = N->getNumOperands(); i != e; ++i) {
766     unsigned DestReg = 0;
767     MVT::ValueType RegTy = N->getOperand(i).getValueType();
768     if (RegTy == MVT::i32) {
769       assert(GPR_idx < 8 && "Too many int args");
770       DestReg = GPR[GPR_idx++];
771     } else {
772       assert(MVT::isFloatingPoint(N->getOperand(i).getValueType()) &&
773              "Unpromoted integer arg?");
774       assert(FPR_idx < 13 && "Too many fp args");
775       DestReg = FPR[FPR_idx++];
776     }
777     
778     if (N->getOperand(i).getOpcode() != ISD::UNDEF) {
779       SDOperand Val;
780       Select(Val, N->getOperand(i));
781       Chain = CurDAG->getCopyToReg(Chain, DestReg, Val, InFlag);
782       InFlag = Chain.getValue(1);
783       CallOperands.push_back(CurDAG->getRegister(DestReg, RegTy));
784     }
785   }
786   
787   // Finally, once everything is in registers to pass to the call, emit the
788   // call itself.
789   if (InFlag.Val)
790     CallOperands.push_back(InFlag);   // Strong dep on register copies.
791   else
792     CallOperands.push_back(Chain);    // Weak dep on whatever occurs before
793   Chain = SDOperand(CurDAG->getTargetNode(CallOpcode, MVT::Other, MVT::Flag,
794                                           CallOperands), 0);
795   
796   std::vector<SDOperand> CallResults;
797   
798   // If the call has results, copy the values out of the ret val registers.
799   switch (N->getValueType(0)) {
800     default: assert(0 && "Unexpected ret value!");
801     case MVT::Other: break;
802     case MVT::i32:
803       if (N->getValueType(1) == MVT::i32) {
804         Chain = CurDAG->getCopyFromReg(Chain, PPC::R4, MVT::i32, 
805                                        Chain.getValue(1)).getValue(1);
806         CallResults.push_back(Chain.getValue(0));
807         Chain = CurDAG->getCopyFromReg(Chain, PPC::R3, MVT::i32,
808                                        Chain.getValue(2)).getValue(1);
809         CallResults.push_back(Chain.getValue(0));
810       } else {
811         Chain = CurDAG->getCopyFromReg(Chain, PPC::R3, MVT::i32,
812                                        Chain.getValue(1)).getValue(1);
813         CallResults.push_back(Chain.getValue(0));
814       }
815       break;
816     case MVT::f32:
817     case MVT::f64:
818       Chain = CurDAG->getCopyFromReg(Chain, PPC::F1, N->getValueType(0),
819                                      Chain.getValue(1)).getValue(1);
820       CallResults.push_back(Chain.getValue(0));
821       break;
822   }
823   
824   CallResults.push_back(Chain);
825   for (unsigned i = 0, e = CallResults.size(); i != e; ++i)
826     CodeGenMap[Op.getValue(i)] = CallResults[i];
827   return CallResults[Op.ResNo];
828 }
829
830 // Select - Convert the specified operand from a target-independent to a
831 // target-specific node if it hasn't already been changed.
832 void PPCDAGToDAGISel::Select(SDOperand &Result, SDOperand Op) {
833   SDNode *N = Op.Val;
834   if (N->getOpcode() >= ISD::BUILTIN_OP_END &&
835       N->getOpcode() < PPCISD::FIRST_NUMBER) {
836     Result = Op;
837     return;   // Already selected.
838   }
839
840   // If this has already been converted, use it.
841   std::map<SDOperand, SDOperand>::iterator CGMI = CodeGenMap.find(Op);
842   if (CGMI != CodeGenMap.end()) {
843     Result = CGMI->second;
844     return;
845   }
846   
847   switch (N->getOpcode()) {
848   default: break;
849   case ISD::ADD_PARTS:
850     Result = SelectADD_PARTS(Op);
851     return;
852   case ISD::SUB_PARTS:
853     Result = SelectSUB_PARTS(Op);
854     return;
855   case ISD::SETCC:
856     Result = SelectSETCC(Op);
857     return;
858   case PPCISD::CALL:
859     Result = SelectCALL(Op);
860     return;
861   case PPCISD::GlobalBaseReg:
862     Result = getGlobalBaseReg();
863     return;
864     
865   case ISD::FrameIndex: {
866     int FI = cast<FrameIndexSDNode>(N)->getIndex();
867     if (N->hasOneUse()) {
868       Result = CurDAG->SelectNodeTo(N, PPC::ADDI, MVT::i32,
869                                     CurDAG->getTargetFrameIndex(FI, MVT::i32),
870                                     getI32Imm(0));
871       return;
872     }
873     Result = CodeGenMap[Op] = 
874       SDOperand(CurDAG->getTargetNode(PPC::ADDI, MVT::i32,
875                                       CurDAG->getTargetFrameIndex(FI, MVT::i32),
876                                       getI32Imm(0)), 0);
877     return;
878   }
879   case ISD::SDIV: {
880     // FIXME: since this depends on the setting of the carry flag from the srawi
881     //        we should really be making notes about that for the scheduler.
882     // FIXME: It sure would be nice if we could cheaply recognize the 
883     //        srl/add/sra pattern the dag combiner will generate for this as
884     //        sra/addze rather than having to handle sdiv ourselves.  oh well.
885     unsigned Imm;
886     if (isIntImmediate(N->getOperand(1), Imm)) {
887       SDOperand N0;
888       Select(N0, N->getOperand(0));
889       if ((signed)Imm > 0 && isPowerOf2_32(Imm)) {
890         SDNode *Op =
891           CurDAG->getTargetNode(PPC::SRAWI, MVT::i32, MVT::Flag,
892                                 N0, getI32Imm(Log2_32(Imm)));
893         Result = CurDAG->SelectNodeTo(N, PPC::ADDZE, MVT::i32, 
894                                       SDOperand(Op, 0), SDOperand(Op, 1));
895       } else if ((signed)Imm < 0 && isPowerOf2_32(-Imm)) {
896         SDNode *Op =
897           CurDAG->getTargetNode(PPC::SRAWI, MVT::i32, MVT::Flag,
898                                 N0, getI32Imm(Log2_32(-Imm)));
899         SDOperand PT =
900           SDOperand(CurDAG->getTargetNode(PPC::ADDZE, MVT::i32,
901                                           SDOperand(Op, 0), SDOperand(Op, 1)),
902                     0);
903         Result = CurDAG->SelectNodeTo(N, PPC::NEG, MVT::i32, PT);
904       }
905       return;
906     }
907     
908     // Other cases are autogenerated.
909     break;
910   }
911   case ISD::AND: {
912     unsigned Imm, Imm2;
913     // If this is an and of a value rotated between 0 and 31 bits and then and'd
914     // with a mask, emit rlwinm
915     if (isIntImmediate(N->getOperand(1), Imm) && (isShiftedMask_32(Imm) ||
916                                                   isShiftedMask_32(~Imm))) {
917       SDOperand Val;
918       unsigned SH, MB, ME;
919       if (isRotateAndMask(N->getOperand(0).Val, Imm, false, SH, MB, ME)) {
920         Select(Val, N->getOperand(0).getOperand(0));
921       } else if (Imm == 0) {
922         // AND X, 0 -> 0, not "rlwinm 32".
923         Select(Result, N->getOperand(1));
924         return ;
925       } else {        
926         Select(Val, N->getOperand(0));
927         isRunOfOnes(Imm, MB, ME);
928         SH = 0;
929       }
930       Result = CurDAG->SelectNodeTo(N, PPC::RLWINM, MVT::i32, Val,
931                                     getI32Imm(SH), getI32Imm(MB),
932                                     getI32Imm(ME));
933       return;
934     }
935     // ISD::OR doesn't get all the bitfield insertion fun.
936     // (and (or x, c1), c2) where isRunOfOnes(~(c1^c2)) is a bitfield insert
937     if (isIntImmediate(N->getOperand(1), Imm) && 
938         N->getOperand(0).getOpcode() == ISD::OR &&
939         isIntImmediate(N->getOperand(0).getOperand(1), Imm2)) {
940       unsigned MB, ME;
941       Imm = ~(Imm^Imm2);
942       if (isRunOfOnes(Imm, MB, ME)) {
943         SDOperand Tmp1, Tmp2;
944         Select(Tmp1, N->getOperand(0).getOperand(0));
945         Select(Tmp2, N->getOperand(0).getOperand(1));
946         Result = SDOperand(CurDAG->getTargetNode(PPC::RLWIMI, MVT::i32,
947                                                  Tmp1, Tmp2,
948                                                  getI32Imm(0), getI32Imm(MB),
949                                                  getI32Imm(ME)), 0);
950         return;
951       }
952     }
953     
954     // Other cases are autogenerated.
955     break;
956   }
957   case ISD::OR:
958     if (SDNode *I = SelectBitfieldInsert(N)) {
959       Result = CodeGenMap[Op] = SDOperand(I, 0);
960       return;
961     }
962       
963     // Other cases are autogenerated.
964     break;
965   case ISD::SHL: {
966     unsigned Imm, SH, MB, ME;
967     if (isOpcWithIntImmediate(N->getOperand(0).Val, ISD::AND, Imm) &&
968         isRotateAndMask(N, Imm, true, SH, MB, ME)) {
969       SDOperand Val;
970       Select(Val, N->getOperand(0).getOperand(0));
971       Result = CurDAG->SelectNodeTo(N, PPC::RLWINM, MVT::i32, 
972                                     Val, getI32Imm(SH), getI32Imm(MB),
973                                     getI32Imm(ME));
974       return;
975     }
976     
977     // Other cases are autogenerated.
978     break;
979   }
980   case ISD::SRL: {
981     unsigned Imm, SH, MB, ME;
982     if (isOpcWithIntImmediate(N->getOperand(0).Val, ISD::AND, Imm) &&
983         isRotateAndMask(N, Imm, true, SH, MB, ME)) { 
984       SDOperand Val;
985       Select(Val, N->getOperand(0).getOperand(0));
986       Result = CurDAG->SelectNodeTo(N, PPC::RLWINM, MVT::i32, 
987                                     Val, getI32Imm(SH & 0x1F), getI32Imm(MB),
988                                     getI32Imm(ME));
989       return;
990     }
991     
992     // Other cases are autogenerated.
993     break;
994   }
995   case ISD::SELECT_CC: {
996     ISD::CondCode CC = cast<CondCodeSDNode>(N->getOperand(4))->get();
997     
998     // handle the setcc cases here.  select_cc lhs, 0, 1, 0, cc
999     if (ConstantSDNode *N1C = dyn_cast<ConstantSDNode>(N->getOperand(1)))
1000       if (ConstantSDNode *N2C = dyn_cast<ConstantSDNode>(N->getOperand(2)))
1001         if (ConstantSDNode *N3C = dyn_cast<ConstantSDNode>(N->getOperand(3)))
1002           if (N1C->isNullValue() && N3C->isNullValue() &&
1003               N2C->getValue() == 1ULL && CC == ISD::SETNE) {
1004             SDOperand LHS;
1005             Select(LHS, N->getOperand(0));
1006             SDNode *Tmp =
1007               CurDAG->getTargetNode(PPC::ADDIC, MVT::i32, MVT::Flag,
1008                                     LHS, getI32Imm(~0U));
1009             Result = CurDAG->SelectNodeTo(N, PPC::SUBFE, MVT::i32,
1010                                           SDOperand(Tmp, 0), LHS,
1011                                           SDOperand(Tmp, 1));
1012             return;
1013           }
1014
1015     SDOperand CCReg = SelectCC(N->getOperand(0), N->getOperand(1), CC);
1016     unsigned BROpc = getBCCForSetCC(CC);
1017
1018     bool isFP = MVT::isFloatingPoint(N->getValueType(0));
1019     unsigned SelectCCOp;
1020     if (MVT::isInteger(N->getValueType(0)))
1021       SelectCCOp = PPC::SELECT_CC_Int;
1022     else if (N->getValueType(0) == MVT::f32)
1023       SelectCCOp = PPC::SELECT_CC_F4;
1024     else
1025       SelectCCOp = PPC::SELECT_CC_F8;
1026     SDOperand N2, N3;
1027     Select(N2, N->getOperand(2));
1028     Select(N3, N->getOperand(3));
1029     Result = CurDAG->SelectNodeTo(N, SelectCCOp, N->getValueType(0), CCReg,
1030                                   N2, N3, getI32Imm(BROpc));
1031     return;
1032   }
1033   case ISD::BR_CC:
1034   case ISD::BRTWOWAY_CC: {
1035     SDOperand Chain;
1036     Select(Chain, N->getOperand(0));
1037     MachineBasicBlock *Dest =
1038       cast<BasicBlockSDNode>(N->getOperand(4))->getBasicBlock();
1039     ISD::CondCode CC = cast<CondCodeSDNode>(N->getOperand(1))->get();
1040     SDOperand CondCode = SelectCC(N->getOperand(2), N->getOperand(3), CC);
1041
1042     // If this is a two way branch, then grab the fallthrough basic block
1043     // argument and build a PowerPC branch pseudo-op, suitable for long branch
1044     // conversion if necessary by the branch selection pass.  Otherwise, emit a
1045     // standard conditional branch.
1046     if (N->getOpcode() == ISD::BRTWOWAY_CC) {
1047       SDOperand CondTrueBlock = N->getOperand(4);
1048       SDOperand CondFalseBlock = N->getOperand(5);
1049       
1050       // If the false case is the current basic block, then this is a self loop.
1051       // We do not want to emit "Loop: ... brcond Out; br Loop", as it adds an
1052       // extra dispatch group to the loop.  Instead, invert the condition and
1053       // emit "Loop: ... br!cond Loop; br Out
1054       if (cast<BasicBlockSDNode>(CondFalseBlock)->getBasicBlock() == BB) {
1055         std::swap(CondTrueBlock, CondFalseBlock);
1056         CC = getSetCCInverse(CC,
1057                              MVT::isInteger(N->getOperand(2).getValueType()));
1058       }
1059       
1060       unsigned Opc = getBCCForSetCC(CC);
1061       SDOperand CB =
1062         SDOperand(CurDAG->getTargetNode(PPC::COND_BRANCH, MVT::Other,
1063                                         CondCode, getI32Imm(Opc),
1064                                         CondTrueBlock, CondFalseBlock,
1065                                         Chain), 0);
1066       Result = CurDAG->SelectNodeTo(N, PPC::B, MVT::Other, CondFalseBlock, CB);
1067     } else {
1068       // Iterate to the next basic block
1069       ilist<MachineBasicBlock>::iterator It = BB;
1070       ++It;
1071
1072       // If the fallthrough path is off the end of the function, which would be
1073       // undefined behavior, set it to be the same as the current block because
1074       // we have nothing better to set it to, and leaving it alone will cause
1075       // the PowerPC Branch Selection pass to crash.
1076       if (It == BB->getParent()->end()) It = Dest;
1077       Result = CurDAG->SelectNodeTo(N, PPC::COND_BRANCH, MVT::Other, CondCode,
1078                                     getI32Imm(getBCCForSetCC(CC)), 
1079                                     N->getOperand(4), CurDAG->getBasicBlock(It),
1080                                     Chain);
1081     }
1082     return;
1083   }
1084   }
1085   
1086   SelectCode(Result, Op);
1087 }
1088
1089
1090 /// createPPCISelDag - This pass converts a legalized DAG into a 
1091 /// PowerPC-specific DAG, ready for instruction scheduling.
1092 ///
1093 FunctionPass *llvm::createPPCISelDag(TargetMachine &TM) {
1094   return new PPCDAGToDAGISel(TM);
1095 }
1096