mirror of
				https://github.com/c64scene-ar/llvm-6502.git
				synced 2025-11-04 05:17:07 +00:00 
			
		
		
		
	the new TLI that is available.
Implement support for handling out of range shifts.  This allows us to
compile this code (a 64-bit rotate):
unsigned long long f3(unsigned long long x) {
  return (x << 32) | (x >> (64-32));
}
into this:
f3:
        mov %EDX, DWORD PTR [%ESP + 4]
        mov %EAX, DWORD PTR [%ESP + 8]
        ret
GCC produces this:
$ gcc t.c -masm=intel -O3 -S -o - -fomit-frame-pointer
..
f3:
        push    %ebx
        mov     %ebx, DWORD PTR [%esp+12]
        mov     %ecx, DWORD PTR [%esp+8]
        mov     %eax, %ebx
        mov     %edx, %ecx
        pop     %ebx
        ret
The Simple ISEL produces (eww gross):
f3:
        sub %ESP, 4
        mov DWORD PTR [%ESP], %ESI
        mov %EDX, DWORD PTR [%ESP + 8]
        mov %ECX, DWORD PTR [%ESP + 12]
        mov %EAX, 0
        mov %ESI, 0
        or %EAX, %ECX
        or %EDX, %ESI
        mov %ESI, DWORD PTR [%ESP]
        add %ESP, 4
        ret
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@19780 91177308-0d34-0410-b5e6-96231b3b80d8
		
	
		
			
				
	
	
		
			1252 lines
		
	
	
		
			42 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
			
		
		
	
	
			1252 lines
		
	
	
		
			42 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
//===-- SelectionDAG.cpp - Implement the SelectionDAG data structures -----===//
 | 
						|
// 
 | 
						|
//                     The LLVM Compiler Infrastructure
 | 
						|
//
 | 
						|
// This file was developed by the LLVM research group and is distributed under
 | 
						|
// the University of Illinois Open Source License. See LICENSE.TXT for details.
 | 
						|
// 
 | 
						|
//===----------------------------------------------------------------------===//
 | 
						|
//
 | 
						|
// This implements the SelectionDAG class.
 | 
						|
//
 | 
						|
//===----------------------------------------------------------------------===//
 | 
						|
 | 
						|
#include "llvm/CodeGen/SelectionDAG.h"
 | 
						|
#include "llvm/Constants.h"
 | 
						|
#include "llvm/GlobalValue.h"
 | 
						|
#include "llvm/Assembly/Writer.h"
 | 
						|
#include "llvm/CodeGen/MachineBasicBlock.h"
 | 
						|
#include "llvm/Target/TargetLowering.h"
 | 
						|
#include <iostream>
 | 
						|
#include <set>
 | 
						|
#include <cmath>
 | 
						|
#include <algorithm>
 | 
						|
using namespace llvm;
 | 
						|
 | 
						|
static bool isCommutativeBinOp(unsigned Opcode) {
 | 
						|
  switch (Opcode) {
 | 
						|
  case ISD::ADD:
 | 
						|
  case ISD::MUL:
 | 
						|
  case ISD::AND:
 | 
						|
  case ISD::OR:
 | 
						|
  case ISD::XOR: return true;
 | 
						|
  default: return false; // FIXME: Need commutative info for user ops!
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
static bool isAssociativeBinOp(unsigned Opcode) {
 | 
						|
  switch (Opcode) {
 | 
						|
  case ISD::ADD:
 | 
						|
  case ISD::MUL:
 | 
						|
  case ISD::AND:
 | 
						|
  case ISD::OR:
 | 
						|
  case ISD::XOR: return true;
 | 
						|
  default: return false; // FIXME: Need associative info for user ops!
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
static unsigned ExactLog2(uint64_t Val) {
 | 
						|
  unsigned Count = 0;
 | 
						|
  while (Val != 1) {
 | 
						|
    Val >>= 1;
 | 
						|
    ++Count;
 | 
						|
  }
 | 
						|
  return Count;
 | 
						|
}
 | 
						|
 | 
						|
// isInvertibleForFree - Return true if there is no cost to emitting the logical
 | 
						|
// inverse of this node.
 | 
						|
static bool isInvertibleForFree(SDOperand N) {
 | 
						|
  if (isa<ConstantSDNode>(N.Val)) return true;
 | 
						|
  if (isa<SetCCSDNode>(N.Val) && N.Val->hasOneUse())
 | 
						|
    return true;
 | 
						|
  return false;  
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/// getSetCCSwappedOperands - Return the operation corresponding to (Y op X)
 | 
						|
/// when given the operation for (X op Y).
 | 
						|
ISD::CondCode ISD::getSetCCSwappedOperands(ISD::CondCode Operation) {
 | 
						|
  // To perform this operation, we just need to swap the L and G bits of the
 | 
						|
  // operation.
 | 
						|
  unsigned OldL = (Operation >> 2) & 1;
 | 
						|
  unsigned OldG = (Operation >> 1) & 1;
 | 
						|
  return ISD::CondCode((Operation & ~6) |  // Keep the N, U, E bits
 | 
						|
                       (OldL << 1) |       // New G bit
 | 
						|
                       (OldG << 2));        // New L bit.
 | 
						|
}
 | 
						|
 | 
						|
/// getSetCCInverse - Return the operation corresponding to !(X op Y), where
 | 
						|
/// 'op' is a valid SetCC operation.
 | 
						|
ISD::CondCode ISD::getSetCCInverse(ISD::CondCode Op, bool isInteger) {
 | 
						|
  unsigned Operation = Op;
 | 
						|
  if (isInteger)
 | 
						|
    Operation ^= 7;   // Flip L, G, E bits, but not U.
 | 
						|
  else
 | 
						|
    Operation ^= 15;  // Flip all of the condition bits.
 | 
						|
  if (Operation > ISD::SETTRUE2)
 | 
						|
    Operation &= ~8;     // Don't let N and U bits get set.
 | 
						|
  return ISD::CondCode(Operation);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/// isSignedOp - For an integer comparison, return 1 if the comparison is a
 | 
						|
/// signed operation and 2 if the result is an unsigned comparison.  Return zero
 | 
						|
/// if the operation does not depend on the sign of the input (setne and seteq).
 | 
						|
static int isSignedOp(ISD::CondCode Opcode) {
 | 
						|
  switch (Opcode) {
 | 
						|
  default: assert(0 && "Illegal integer setcc operation!");
 | 
						|
  case ISD::SETEQ:
 | 
						|
  case ISD::SETNE: return 0;
 | 
						|
  case ISD::SETLT:
 | 
						|
  case ISD::SETLE:
 | 
						|
  case ISD::SETGT:
 | 
						|
  case ISD::SETGE: return 1;
 | 
						|
  case ISD::SETULT:
 | 
						|
  case ISD::SETULE:
 | 
						|
  case ISD::SETUGT:
 | 
						|
  case ISD::SETUGE: return 2;
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
/// getSetCCOrOperation - Return the result of a logical OR between different
 | 
						|
/// comparisons of identical values: ((X op1 Y) | (X op2 Y)).  This function
 | 
						|
/// returns SETCC_INVALID if it is not possible to represent the resultant
 | 
						|
/// comparison.
 | 
						|
ISD::CondCode ISD::getSetCCOrOperation(ISD::CondCode Op1, ISD::CondCode Op2,
 | 
						|
                                       bool isInteger) {
 | 
						|
  if (isInteger && (isSignedOp(Op1) | isSignedOp(Op2)) == 3)
 | 
						|
    // Cannot fold a signed integer setcc with an unsigned integer setcc.
 | 
						|
    return ISD::SETCC_INVALID;
 | 
						|
  
 | 
						|
  unsigned Op = Op1 | Op2;  // Combine all of the condition bits.
 | 
						|
  
 | 
						|
  // If the N and U bits get set then the resultant comparison DOES suddenly
 | 
						|
  // care about orderedness, and is true when ordered.
 | 
						|
  if (Op > ISD::SETTRUE2)
 | 
						|
    Op &= ~16;     // Clear the N bit.
 | 
						|
  return ISD::CondCode(Op);
 | 
						|
}
 | 
						|
 | 
						|
/// getSetCCAndOperation - Return the result of a logical AND between different
 | 
						|
/// comparisons of identical values: ((X op1 Y) & (X op2 Y)).  This
 | 
						|
/// function returns zero if it is not possible to represent the resultant
 | 
						|
/// comparison.
 | 
						|
ISD::CondCode ISD::getSetCCAndOperation(ISD::CondCode Op1, ISD::CondCode Op2,
 | 
						|
                                        bool isInteger) {
 | 
						|
  if (isInteger && (isSignedOp(Op1) | isSignedOp(Op2)) == 3)
 | 
						|
    // Cannot fold a signed setcc with an unsigned setcc.
 | 
						|
    return ISD::SETCC_INVALID; 
 | 
						|
 | 
						|
  // Combine all of the condition bits.
 | 
						|
  return ISD::CondCode(Op1 & Op2);
 | 
						|
}
 | 
						|
 | 
						|
const TargetMachine &SelectionDAG::getTarget() const {
 | 
						|
  return TLI.getTargetMachine();
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/// RemoveDeadNodes - This method deletes all unreachable nodes in the
 | 
						|
/// SelectionDAG, including nodes (like loads) that have uses of their token
 | 
						|
/// chain but no other uses and no side effect.  If a node is passed in as an
 | 
						|
/// argument, it is used as the seed for node deletion.
 | 
						|
void SelectionDAG::RemoveDeadNodes(SDNode *N) {
 | 
						|
  std::set<SDNode*> AllNodeSet(AllNodes.begin(), AllNodes.end());
 | 
						|
 | 
						|
  // Create a dummy node (which is not added to allnodes), that adds a reference
 | 
						|
  // to the root node, preventing it from being deleted.
 | 
						|
  SDNode *DummyNode = new SDNode(ISD::EntryToken, getRoot());
 | 
						|
 | 
						|
  DeleteNodeIfDead(N, &AllNodeSet);
 | 
						|
 | 
						|
 Restart:
 | 
						|
  unsigned NumNodes = AllNodeSet.size();
 | 
						|
  for (std::set<SDNode*>::iterator I = AllNodeSet.begin(), E = AllNodeSet.end();
 | 
						|
       I != E; ++I) {
 | 
						|
    // Try to delete this node.
 | 
						|
    DeleteNodeIfDead(*I, &AllNodeSet);
 | 
						|
 | 
						|
    // If we actually deleted any nodes, do not use invalid iterators in
 | 
						|
    // AllNodeSet.
 | 
						|
    if (AllNodeSet.size() != NumNodes)
 | 
						|
      goto Restart;
 | 
						|
  }
 | 
						|
 | 
						|
  // Restore AllNodes.
 | 
						|
  if (AllNodes.size() != NumNodes)
 | 
						|
    AllNodes.assign(AllNodeSet.begin(), AllNodeSet.end());
 | 
						|
 | 
						|
  // If the root changed (e.g. it was a dead load, update the root).
 | 
						|
  setRoot(DummyNode->getOperand(0));
 | 
						|
 | 
						|
  // Now that we are done with the dummy node, delete it.
 | 
						|
  DummyNode->getOperand(0).Val->removeUser(DummyNode);
 | 
						|
  delete DummyNode;
 | 
						|
}
 | 
						|
 | 
						|
void SelectionDAG::DeleteNodeIfDead(SDNode *N, void *NodeSet) {
 | 
						|
  if (!N->use_empty())
 | 
						|
    return;
 | 
						|
 | 
						|
  // Okay, we really are going to delete this node.  First take this out of the
 | 
						|
  // appropriate CSE map.
 | 
						|
  switch (N->getOpcode()) {
 | 
						|
  case ISD::Constant:
 | 
						|
    Constants.erase(std::make_pair(cast<ConstantSDNode>(N)->getValue(),
 | 
						|
                                   N->getValueType(0)));
 | 
						|
    break;
 | 
						|
  case ISD::ConstantFP:
 | 
						|
    ConstantFPs.erase(std::make_pair(cast<ConstantFPSDNode>(N)->getValue(),
 | 
						|
                                     N->getValueType(0)));
 | 
						|
    break;
 | 
						|
  case ISD::GlobalAddress:
 | 
						|
    GlobalValues.erase(cast<GlobalAddressSDNode>(N)->getGlobal());
 | 
						|
    break;
 | 
						|
  case ISD::FrameIndex:
 | 
						|
    FrameIndices.erase(cast<FrameIndexSDNode>(N)->getIndex());
 | 
						|
    break;
 | 
						|
  case ISD::ConstantPool:
 | 
						|
    ConstantPoolIndices.erase(cast<ConstantPoolSDNode>(N)->getIndex());
 | 
						|
    break;
 | 
						|
  case ISD::BasicBlock:
 | 
						|
    BBNodes.erase(cast<BasicBlockSDNode>(N)->getBasicBlock());
 | 
						|
    break;
 | 
						|
  case ISD::ExternalSymbol:
 | 
						|
    ExternalSymbols.erase(cast<ExternalSymbolSDNode>(N)->getSymbol());
 | 
						|
    break;
 | 
						|
 | 
						|
  case ISD::LOAD:
 | 
						|
    Loads.erase(std::make_pair(N->getOperand(1),
 | 
						|
                               std::make_pair(N->getOperand(0),
 | 
						|
                                              N->getValueType(0))));
 | 
						|
    break;
 | 
						|
  case ISD::SETCC:
 | 
						|
    SetCCs.erase(std::make_pair(std::make_pair(N->getOperand(0),
 | 
						|
                                               N->getOperand(1)),
 | 
						|
                                std::make_pair(
 | 
						|
                                     cast<SetCCSDNode>(N)->getCondition(),
 | 
						|
                                     N->getValueType(0))));
 | 
						|
    break;
 | 
						|
  case ISD::TRUNCSTORE:
 | 
						|
  case ISD::SIGN_EXTEND_INREG:
 | 
						|
  case ISD::ZERO_EXTEND_INREG:
 | 
						|
  case ISD::FP_ROUND_INREG:
 | 
						|
  case ISD::EXTLOAD:
 | 
						|
  case ISD::SEXTLOAD:
 | 
						|
  case ISD::ZEXTLOAD: {
 | 
						|
    EVTStruct NN;
 | 
						|
    NN.Opcode = ISD::TRUNCSTORE;
 | 
						|
    NN.VT = N->getValueType(0);
 | 
						|
    NN.EVT = cast<MVTSDNode>(N)->getExtraValueType();
 | 
						|
    for (unsigned i = 0, e = N->getNumOperands(); i != e; ++i)
 | 
						|
      NN.Ops.push_back(N->getOperand(i));
 | 
						|
    MVTSDNodes.erase(NN);
 | 
						|
    break;
 | 
						|
  }
 | 
						|
  default:
 | 
						|
    if (N->getNumOperands() == 1)
 | 
						|
      UnaryOps.erase(std::make_pair(N->getOpcode(),
 | 
						|
                                    std::make_pair(N->getOperand(0),
 | 
						|
                                                   N->getValueType(0))));
 | 
						|
    else if (N->getNumOperands() == 2)
 | 
						|
      BinaryOps.erase(std::make_pair(N->getOpcode(),
 | 
						|
                                     std::make_pair(N->getOperand(0),
 | 
						|
                                                    N->getOperand(1))));
 | 
						|
    break;
 | 
						|
  }
 | 
						|
 | 
						|
  // Next, brutally remove the operand list.
 | 
						|
  while (!N->Operands.empty()) {
 | 
						|
    SDNode *O = N->Operands.back().Val;
 | 
						|
    N->Operands.pop_back();
 | 
						|
    O->removeUser(N);
 | 
						|
 | 
						|
    // Now that we removed this operand, see if there are no uses of it left.
 | 
						|
    DeleteNodeIfDead(O, NodeSet);
 | 
						|
  }
 | 
						|
  
 | 
						|
  // Remove the node from the nodes set and delete it.
 | 
						|
  std::set<SDNode*> &AllNodeSet = *(std::set<SDNode*>*)NodeSet;
 | 
						|
  AllNodeSet.erase(N);
 | 
						|
 | 
						|
  // Now that the node is gone, check to see if any of the operands of this node
 | 
						|
  // are dead now.
 | 
						|
  delete N;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
SelectionDAG::~SelectionDAG() {
 | 
						|
  for (unsigned i = 0, e = AllNodes.size(); i != e; ++i)
 | 
						|
    delete AllNodes[i];
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getConstant(uint64_t Val, MVT::ValueType VT) {
 | 
						|
  assert(MVT::isInteger(VT) && "Cannot create FP integer constant!");
 | 
						|
  // Mask out any bits that are not valid for this constant.
 | 
						|
  if (VT != MVT::i64)
 | 
						|
    Val &= ((uint64_t)1 << MVT::getSizeInBits(VT)) - 1;
 | 
						|
  
 | 
						|
  SDNode *&N = Constants[std::make_pair(Val, VT)];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new ConstantSDNode(Val, VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getConstantFP(double Val, MVT::ValueType VT) {
 | 
						|
  assert(MVT::isFloatingPoint(VT) && "Cannot create integer FP constant!");
 | 
						|
  if (VT == MVT::f32)
 | 
						|
    Val = (float)Val;  // Mask out extra precision.
 | 
						|
 | 
						|
  SDNode *&N = ConstantFPs[std::make_pair(Val, VT)];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new ConstantFPSDNode(Val, VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
 | 
						|
SDOperand SelectionDAG::getGlobalAddress(const GlobalValue *GV,
 | 
						|
                                         MVT::ValueType VT) {
 | 
						|
  SDNode *&N = GlobalValues[GV];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new GlobalAddressSDNode(GV,VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getFrameIndex(int FI, MVT::ValueType VT) {
 | 
						|
  SDNode *&N = FrameIndices[FI];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new FrameIndexSDNode(FI, VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getConstantPool(unsigned CPIdx, MVT::ValueType VT) {
 | 
						|
  SDNode *N = ConstantPoolIndices[CPIdx];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new ConstantPoolSDNode(CPIdx, VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getBasicBlock(MachineBasicBlock *MBB) {
 | 
						|
  SDNode *&N = BBNodes[MBB];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new BasicBlockSDNode(MBB);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getExternalSymbol(const char *Sym, MVT::ValueType VT) {
 | 
						|
  SDNode *&N = ExternalSymbols[Sym];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new ExternalSymbolSDNode(Sym, VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getSetCC(ISD::CondCode Cond, MVT::ValueType VT,
 | 
						|
                                 SDOperand N1, SDOperand N2) {
 | 
						|
  // These setcc operations always fold.
 | 
						|
  switch (Cond) {
 | 
						|
  default: break;
 | 
						|
  case ISD::SETFALSE:
 | 
						|
  case ISD::SETFALSE2: return getConstant(0, VT);
 | 
						|
  case ISD::SETTRUE:
 | 
						|
  case ISD::SETTRUE2:  return getConstant(1, VT);
 | 
						|
  }
 | 
						|
 | 
						|
  if (ConstantSDNode *N1C = dyn_cast<ConstantSDNode>(N1.Val))
 | 
						|
    if (ConstantSDNode *N2C = dyn_cast<ConstantSDNode>(N2.Val)) {
 | 
						|
      uint64_t C1 = N1C->getValue(), C2 = N2C->getValue();
 | 
						|
      
 | 
						|
      // Sign extend the operands if required
 | 
						|
      if (ISD::isSignedIntSetCC(Cond)) {
 | 
						|
        C1 = N1C->getSignExtended();
 | 
						|
        C2 = N2C->getSignExtended();
 | 
						|
      }
 | 
						|
 | 
						|
      switch (Cond) {
 | 
						|
      default: assert(0 && "Unknown integer setcc!");
 | 
						|
      case ISD::SETEQ:  return getConstant(C1 == C2, VT);
 | 
						|
      case ISD::SETNE:  return getConstant(C1 != C2, VT);
 | 
						|
      case ISD::SETULT: return getConstant(C1 <  C2, VT);
 | 
						|
      case ISD::SETUGT: return getConstant(C1 >  C2, VT);
 | 
						|
      case ISD::SETULE: return getConstant(C1 <= C2, VT);
 | 
						|
      case ISD::SETUGE: return getConstant(C1 >= C2, VT);
 | 
						|
      case ISD::SETLT:  return getConstant((int64_t)C1 <  (int64_t)C2, VT);
 | 
						|
      case ISD::SETGT:  return getConstant((int64_t)C1 >  (int64_t)C2, VT);
 | 
						|
      case ISD::SETLE:  return getConstant((int64_t)C1 <= (int64_t)C2, VT);
 | 
						|
      case ISD::SETGE:  return getConstant((int64_t)C1 >= (int64_t)C2, VT);
 | 
						|
      }
 | 
						|
    } else {
 | 
						|
      // Ensure that the constant occurs on the RHS.
 | 
						|
      Cond = ISD::getSetCCSwappedOperands(Cond);
 | 
						|
      std::swap(N1, N2);
 | 
						|
    }
 | 
						|
 | 
						|
  if (ConstantFPSDNode *N1C = dyn_cast<ConstantFPSDNode>(N1.Val))
 | 
						|
    if (ConstantFPSDNode *N2C = dyn_cast<ConstantFPSDNode>(N2.Val)) {
 | 
						|
      double C1 = N1C->getValue(), C2 = N2C->getValue();
 | 
						|
      
 | 
						|
      switch (Cond) {
 | 
						|
      default: break; // FIXME: Implement the rest of these!
 | 
						|
      case ISD::SETEQ:  return getConstant(C1 == C2, VT);
 | 
						|
      case ISD::SETNE:  return getConstant(C1 != C2, VT);
 | 
						|
      case ISD::SETLT:  return getConstant(C1 < C2, VT);
 | 
						|
      case ISD::SETGT:  return getConstant(C1 > C2, VT);
 | 
						|
      case ISD::SETLE:  return getConstant(C1 <= C2, VT);
 | 
						|
      case ISD::SETGE:  return getConstant(C1 >= C2, VT);
 | 
						|
      }
 | 
						|
    } else {
 | 
						|
      // Ensure that the constant occurs on the RHS.
 | 
						|
      Cond = ISD::getSetCCSwappedOperands(Cond);
 | 
						|
      std::swap(N1, N2);
 | 
						|
    }
 | 
						|
 | 
						|
  if (N1 == N2) {
 | 
						|
    // We can always fold X == Y for integer setcc's.
 | 
						|
    if (MVT::isInteger(N1.getValueType()))
 | 
						|
      return getConstant(ISD::isTrueWhenEqual(Cond), VT);
 | 
						|
    unsigned UOF = ISD::getUnorderedFlavor(Cond);
 | 
						|
    if (UOF == 2)   // FP operators that are undefined on NaNs.
 | 
						|
      return getConstant(ISD::isTrueWhenEqual(Cond), VT);
 | 
						|
    if (UOF == ISD::isTrueWhenEqual(Cond))
 | 
						|
      return getConstant(UOF, VT);
 | 
						|
    // Otherwise, we can't fold it.  However, we can simplify it to SETUO/SETO
 | 
						|
    // if it is not already.
 | 
						|
    Cond = UOF == 0 ? ISD::SETUO : ISD::SETO;
 | 
						|
  }
 | 
						|
 | 
						|
  if ((Cond == ISD::SETEQ || Cond == ISD::SETNE) &&
 | 
						|
      MVT::isInteger(N1.getValueType())) {
 | 
						|
    if (N1.getOpcode() == ISD::ADD || N1.getOpcode() == ISD::SUB ||
 | 
						|
        N1.getOpcode() == ISD::XOR) {
 | 
						|
      // Simplify (X+Y) == (X+Z) -->  Y == Z
 | 
						|
      if (N1.getOpcode() == N2.getOpcode()) {
 | 
						|
        if (N1.getOperand(0) == N2.getOperand(0))
 | 
						|
          return getSetCC(Cond, VT, N1.getOperand(1), N2.getOperand(1));
 | 
						|
        if (N1.getOperand(1) == N2.getOperand(1))
 | 
						|
          return getSetCC(Cond, VT, N1.getOperand(0), N2.getOperand(0));
 | 
						|
        if (isCommutativeBinOp(N1.getOpcode())) {
 | 
						|
          // If X op Y == Y op X, try other combinations.
 | 
						|
          if (N1.getOperand(0) == N2.getOperand(1))
 | 
						|
            return getSetCC(Cond, VT, N1.getOperand(1), N2.getOperand(0));
 | 
						|
          if (N1.getOperand(1) == N2.getOperand(0))
 | 
						|
            return getSetCC(Cond, VT, N1.getOperand(1), N2.getOperand(1));
 | 
						|
        }
 | 
						|
      }
 | 
						|
 | 
						|
      // FIXME: move this stuff to the DAG Combiner when it exists!
 | 
						|
      
 | 
						|
      // Simplify (X+Z) == X -->  Z == 0
 | 
						|
      if (N1.getOperand(0) == N2)
 | 
						|
        return getSetCC(Cond, VT, N1.getOperand(1),
 | 
						|
                        getConstant(0, N1.getValueType()));
 | 
						|
      if (N1.getOperand(1) == N2) {
 | 
						|
        if (isCommutativeBinOp(N1.getOpcode()))
 | 
						|
          return getSetCC(Cond, VT, N1.getOperand(0),
 | 
						|
                          getConstant(0, N1.getValueType()));
 | 
						|
        else {
 | 
						|
          assert(N1.getOpcode() == ISD::SUB && "Unexpected operation!");
 | 
						|
          // (Z-X) == X  --> Z == X<<1
 | 
						|
          return getSetCC(Cond, VT, N1.getOperand(0),
 | 
						|
                          getNode(ISD::SHL, N2.getValueType(), 
 | 
						|
                                  N2, getConstant(1, TLI.getShiftAmountTy())));
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
 | 
						|
    if (N2.getOpcode() == ISD::ADD || N2.getOpcode() == ISD::SUB ||
 | 
						|
        N2.getOpcode() == ISD::XOR) {
 | 
						|
      // Simplify  X == (X+Z) -->  Z == 0
 | 
						|
      if (N2.getOperand(0) == N1)
 | 
						|
        return getSetCC(Cond, VT, N2.getOperand(1),
 | 
						|
                        getConstant(0, N2.getValueType()));
 | 
						|
      else if (N2.getOperand(1) == N1)
 | 
						|
        return getSetCC(Cond, VT, N2.getOperand(0),
 | 
						|
                        getConstant(0, N2.getValueType()));
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  SetCCSDNode *&N = SetCCs[std::make_pair(std::make_pair(N1, N2),
 | 
						|
                                          std::make_pair(Cond, VT))];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new SetCCSDNode(Cond, N1, N2);
 | 
						|
  N->setValueTypes(VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
 | 
						|
/// getNode - Gets or creates the specified node.
 | 
						|
///
 | 
						|
SDOperand SelectionDAG::getNode(unsigned Opcode, MVT::ValueType VT) {
 | 
						|
  SDNode *N = new SDNode(Opcode, VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getNode(unsigned Opcode, MVT::ValueType VT,
 | 
						|
                                SDOperand Operand) {
 | 
						|
  if (ConstantSDNode *C = dyn_cast<ConstantSDNode>(Operand.Val)) {
 | 
						|
    uint64_t Val = C->getValue();
 | 
						|
    switch (Opcode) {
 | 
						|
    default: break;
 | 
						|
    case ISD::SIGN_EXTEND: return getConstant(C->getSignExtended(), VT);
 | 
						|
    case ISD::ZERO_EXTEND: return getConstant(Val, VT);
 | 
						|
    case ISD::TRUNCATE:    return getConstant(Val, VT);
 | 
						|
    case ISD::SINT_TO_FP:  return getConstantFP(C->getSignExtended(), VT);
 | 
						|
    case ISD::UINT_TO_FP:  return getConstantFP(C->getValue(), VT);
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  if (ConstantFPSDNode *C = dyn_cast<ConstantFPSDNode>(Operand.Val))
 | 
						|
    switch (Opcode) {
 | 
						|
    case ISD::FP_ROUND:
 | 
						|
    case ISD::FP_EXTEND:
 | 
						|
      return getConstantFP(C->getValue(), VT);
 | 
						|
    case ISD::FP_TO_SINT:
 | 
						|
      return getConstant((int64_t)C->getValue(), VT);
 | 
						|
    case ISD::FP_TO_UINT:
 | 
						|
      return getConstant((uint64_t)C->getValue(), VT);
 | 
						|
    }
 | 
						|
 | 
						|
  unsigned OpOpcode = Operand.Val->getOpcode();
 | 
						|
  switch (Opcode) {
 | 
						|
  case ISD::TokenFactor:
 | 
						|
    return Operand;         // Factor of one node?  No factor.
 | 
						|
  case ISD::SIGN_EXTEND:
 | 
						|
    if (Operand.getValueType() == VT) return Operand;   // noop extension
 | 
						|
    if (OpOpcode == ISD::SIGN_EXTEND || OpOpcode == ISD::ZERO_EXTEND)
 | 
						|
      return getNode(OpOpcode, VT, Operand.Val->getOperand(0));
 | 
						|
    break;
 | 
						|
  case ISD::ZERO_EXTEND:
 | 
						|
    if (Operand.getValueType() == VT) return Operand;   // noop extension
 | 
						|
    if (OpOpcode == ISD::ZERO_EXTEND)
 | 
						|
      return getNode(ISD::ZERO_EXTEND, VT, Operand.Val->getOperand(0));
 | 
						|
    break;
 | 
						|
  case ISD::TRUNCATE:
 | 
						|
    if (Operand.getValueType() == VT) return Operand;   // noop truncate
 | 
						|
    if (OpOpcode == ISD::TRUNCATE)
 | 
						|
      return getNode(ISD::TRUNCATE, VT, Operand.Val->getOperand(0));
 | 
						|
    else if (OpOpcode == ISD::ZERO_EXTEND || OpOpcode == ISD::SIGN_EXTEND) {
 | 
						|
      // If the source is smaller than the dest, we still need an extend.
 | 
						|
      if (Operand.Val->getOperand(0).getValueType() < VT)
 | 
						|
        return getNode(OpOpcode, VT, Operand.Val->getOperand(0));
 | 
						|
      else if (Operand.Val->getOperand(0).getValueType() > VT)
 | 
						|
        return getNode(ISD::TRUNCATE, VT, Operand.Val->getOperand(0));
 | 
						|
      else
 | 
						|
        return Operand.Val->getOperand(0);
 | 
						|
    }
 | 
						|
    break;
 | 
						|
  }
 | 
						|
 | 
						|
  SDNode *&N = UnaryOps[std::make_pair(Opcode, std::make_pair(Operand, VT))];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new SDNode(Opcode, Operand);
 | 
						|
  N->setValueTypes(VT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getNode(unsigned Opcode, MVT::ValueType VT,
 | 
						|
                                SDOperand N1, SDOperand N2) {
 | 
						|
#ifndef NDEBUG
 | 
						|
  switch (Opcode) {
 | 
						|
  case ISD::TokenFactor:
 | 
						|
    assert(VT == MVT::Other && N1.getValueType() == MVT::Other &&
 | 
						|
           N2.getValueType() == MVT::Other && "Invalid token factor!");
 | 
						|
    break;
 | 
						|
  case ISD::AND:
 | 
						|
  case ISD::OR:
 | 
						|
  case ISD::XOR:
 | 
						|
  case ISD::UDIV:
 | 
						|
  case ISD::UREM:
 | 
						|
    assert(MVT::isInteger(VT) && "This operator does not apply to FP types!");
 | 
						|
    // fall through
 | 
						|
  case ISD::ADD:
 | 
						|
  case ISD::SUB:
 | 
						|
  case ISD::MUL:
 | 
						|
  case ISD::SDIV:
 | 
						|
  case ISD::SREM:
 | 
						|
    assert(N1.getValueType() == N2.getValueType() &&
 | 
						|
           N1.getValueType() == VT && "Binary operator types must match!");
 | 
						|
    break;
 | 
						|
 | 
						|
  case ISD::SHL:
 | 
						|
  case ISD::SRA:
 | 
						|
  case ISD::SRL:
 | 
						|
    assert(VT == N1.getValueType() &&
 | 
						|
           "Shift operators return type must be the same as their first arg");
 | 
						|
    assert(MVT::isInteger(VT) && MVT::isInteger(N2.getValueType()) &&
 | 
						|
           VT != MVT::i1 && "Shifts only work on integers");
 | 
						|
    break;
 | 
						|
  default: break;
 | 
						|
  }
 | 
						|
#endif
 | 
						|
 | 
						|
  ConstantSDNode *N1C = dyn_cast<ConstantSDNode>(N1.Val);
 | 
						|
  ConstantSDNode *N2C = dyn_cast<ConstantSDNode>(N2.Val);
 | 
						|
  if (N1C) {
 | 
						|
    if (N2C) {
 | 
						|
      uint64_t C1 = N1C->getValue(), C2 = N2C->getValue();
 | 
						|
      switch (Opcode) {
 | 
						|
      case ISD::ADD: return getConstant(C1 + C2, VT);
 | 
						|
      case ISD::SUB: return getConstant(C1 - C2, VT);
 | 
						|
      case ISD::MUL: return getConstant(C1 * C2, VT);
 | 
						|
      case ISD::UDIV:
 | 
						|
        if (C2) return getConstant(C1 / C2, VT);
 | 
						|
        break;
 | 
						|
      case ISD::UREM :
 | 
						|
        if (C2) return getConstant(C1 % C2, VT);
 | 
						|
        break;
 | 
						|
      case ISD::SDIV :
 | 
						|
        if (C2) return getConstant(N1C->getSignExtended() /
 | 
						|
                                   N2C->getSignExtended(), VT);
 | 
						|
        break;
 | 
						|
      case ISD::SREM :
 | 
						|
        if (C2) return getConstant(N1C->getSignExtended() %
 | 
						|
                                   N2C->getSignExtended(), VT);
 | 
						|
        break;
 | 
						|
      case ISD::AND  : return getConstant(C1 & C2, VT);
 | 
						|
      case ISD::OR   : return getConstant(C1 | C2, VT);
 | 
						|
      case ISD::XOR  : return getConstant(C1 ^ C2, VT);
 | 
						|
      case ISD::SHL  : return getConstant(C1 << (int)C2, VT);
 | 
						|
      case ISD::SRL  : return getConstant(C1 >> (unsigned)C2, VT);
 | 
						|
      case ISD::SRA  : return getConstant(N1C->getSignExtended() >>(int)C2, VT);
 | 
						|
      default: break;
 | 
						|
      }
 | 
						|
 | 
						|
    } else {      // Cannonicalize constant to RHS if commutative
 | 
						|
      if (isCommutativeBinOp(Opcode)) {
 | 
						|
        std::swap(N1C, N2C);
 | 
						|
        std::swap(N1, N2);
 | 
						|
      }
 | 
						|
    }
 | 
						|
 | 
						|
    switch (Opcode) {
 | 
						|
    default: break;
 | 
						|
    case ISD::SHL:    // shl  0, X -> 0
 | 
						|
      if (N1C->isNullValue()) return N1;
 | 
						|
      break;
 | 
						|
    case ISD::SRL:    // srl  0, X -> 0
 | 
						|
      if (N1C->isNullValue()) return N1;
 | 
						|
      break;
 | 
						|
    case ISD::SRA:    // sra -1, X -> -1
 | 
						|
      if (N1C->isAllOnesValue()) return N1;
 | 
						|
      break;
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  if (N2C) {
 | 
						|
    uint64_t C2 = N2C->getValue();
 | 
						|
 | 
						|
    switch (Opcode) {
 | 
						|
    case ISD::ADD:
 | 
						|
      if (!C2) return N1;         // add X, 0 -> X
 | 
						|
      break;
 | 
						|
    case ISD::SUB:
 | 
						|
      if (!C2) return N1;         // sub X, 0 -> X
 | 
						|
      break;
 | 
						|
    case ISD::MUL:
 | 
						|
      if (!C2) return N2;         // mul X, 0 -> 0
 | 
						|
      if (N2C->isAllOnesValue()) // mul X, -1 -> 0-X
 | 
						|
        return getNode(ISD::SUB, VT, getConstant(0, VT), N1);
 | 
						|
 | 
						|
      // FIXME: Move this to the DAG combiner when it exists.
 | 
						|
      if ((C2 & C2-1) == 0) {
 | 
						|
        SDOperand ShAmt = getConstant(ExactLog2(C2), TLI.getShiftAmountTy());
 | 
						|
        return getNode(ISD::SHL, VT, N1, ShAmt);
 | 
						|
      }
 | 
						|
      break;
 | 
						|
 | 
						|
    case ISD::UDIV:
 | 
						|
      // FIXME: Move this to the DAG combiner when it exists.
 | 
						|
      if ((C2 & C2-1) == 0 && C2) {
 | 
						|
        SDOperand ShAmt = getConstant(ExactLog2(C2), TLI.getShiftAmountTy());
 | 
						|
        return getNode(ISD::SRL, VT, N1, ShAmt);
 | 
						|
      }
 | 
						|
      break;
 | 
						|
 | 
						|
    case ISD::SHL:
 | 
						|
    case ISD::SRL:
 | 
						|
      // If the shift amount is bigger than the size of the data, simplify.
 | 
						|
      if (C2 >= MVT::getSizeInBits(N1.getValueType())) {
 | 
						|
        if (TLI.getShiftAmountFlavor() == TargetLowering::Mask) {
 | 
						|
          unsigned NewAmt =
 | 
						|
            C2 & ((1 << MVT::getSizeInBits(N1.getValueType()))-1);
 | 
						|
          return getNode(Opcode, VT, N1, getConstant(NewAmt,N2.getValueType()));
 | 
						|
        } else if (TLI.getShiftAmountFlavor() == TargetLowering::Extend) {
 | 
						|
          // Shifting all of the bits out?
 | 
						|
          return getConstant(0, N1.getValueType());
 | 
						|
        }
 | 
						|
      }
 | 
						|
      // FALL THROUGH.
 | 
						|
    case ISD::SRA:
 | 
						|
      if (C2 == 0) return N1;
 | 
						|
      break;
 | 
						|
 | 
						|
    case ISD::AND:
 | 
						|
      if (!C2) return N2;         // X and 0 -> 0
 | 
						|
      if (N2C->isAllOnesValue())
 | 
						|
	return N1;                // X and -1 -> X
 | 
						|
      break;
 | 
						|
    case ISD::OR:
 | 
						|
      if (!C2)return N1;          // X or 0 -> X
 | 
						|
      if (N2C->isAllOnesValue())
 | 
						|
	return N2;                // X or -1 -> -1
 | 
						|
      break;
 | 
						|
    case ISD::XOR:
 | 
						|
      if (!C2) return N1;        // X xor 0 -> X
 | 
						|
      if (N2C->isAllOnesValue()) {
 | 
						|
        if (SetCCSDNode *SetCC = dyn_cast<SetCCSDNode>(N1.Val)){
 | 
						|
          // !(X op Y) -> (X !op Y)
 | 
						|
          bool isInteger = MVT::isInteger(SetCC->getOperand(0).getValueType());
 | 
						|
          return getSetCC(ISD::getSetCCInverse(SetCC->getCondition(),isInteger),
 | 
						|
                          SetCC->getValueType(0),
 | 
						|
                          SetCC->getOperand(0), SetCC->getOperand(1));
 | 
						|
        } else if (N1.getOpcode() == ISD::AND || N1.getOpcode() == ISD::OR) {
 | 
						|
          SDNode *Op = N1.Val;
 | 
						|
          // !(X or Y) -> (!X and !Y) iff X or Y are freely invertible
 | 
						|
          // !(X and Y) -> (!X or !Y) iff X or Y are freely invertible
 | 
						|
          SDOperand LHS = Op->getOperand(0), RHS = Op->getOperand(1);
 | 
						|
          if (isInvertibleForFree(RHS) || isInvertibleForFree(LHS)) {
 | 
						|
            LHS = getNode(ISD::XOR, VT, LHS, N2);  // RHS = ~LHS
 | 
						|
            RHS = getNode(ISD::XOR, VT, RHS, N2);  // RHS = ~RHS
 | 
						|
            if (Op->getOpcode() == ISD::AND)
 | 
						|
              return getNode(ISD::OR, VT, LHS, RHS);
 | 
						|
            return getNode(ISD::AND, VT, LHS, RHS);
 | 
						|
          }
 | 
						|
        }
 | 
						|
	// X xor -1 -> not(x)  ?
 | 
						|
      }
 | 
						|
      break;
 | 
						|
    }
 | 
						|
 | 
						|
    // Reassociate ((X op C1) op C2) if possible.
 | 
						|
    if (N1.getOpcode() == Opcode && isAssociativeBinOp(Opcode))
 | 
						|
      if (ConstantSDNode *N3C = dyn_cast<ConstantSDNode>(N1.Val->getOperand(1)))
 | 
						|
        return getNode(Opcode, VT, N1.Val->getOperand(0),
 | 
						|
                       getNode(Opcode, VT, N2, N1.Val->getOperand(1)));
 | 
						|
  }
 | 
						|
 | 
						|
  ConstantFPSDNode *N1CFP = dyn_cast<ConstantFPSDNode>(N1.Val);
 | 
						|
  ConstantFPSDNode *N2CFP = dyn_cast<ConstantFPSDNode>(N2.Val);
 | 
						|
  if (N1CFP)
 | 
						|
    if (N2CFP) {
 | 
						|
      double C1 = N1CFP->getValue(), C2 = N2CFP->getValue();
 | 
						|
      switch (Opcode) {
 | 
						|
      case ISD::ADD: return getConstantFP(C1 + C2, VT);
 | 
						|
      case ISD::SUB: return getConstantFP(C1 - C2, VT);
 | 
						|
      case ISD::MUL: return getConstantFP(C1 * C2, VT);
 | 
						|
      case ISD::SDIV:
 | 
						|
        if (C2) return getConstantFP(C1 / C2, VT);
 | 
						|
        break;
 | 
						|
      case ISD::SREM :
 | 
						|
        if (C2) return getConstantFP(fmod(C1, C2), VT);
 | 
						|
        break;
 | 
						|
      default: break;
 | 
						|
      }
 | 
						|
 | 
						|
    } else {      // Cannonicalize constant to RHS if commutative
 | 
						|
      if (isCommutativeBinOp(Opcode)) {
 | 
						|
        std::swap(N1CFP, N2CFP);
 | 
						|
        std::swap(N1, N2);
 | 
						|
      }
 | 
						|
    }
 | 
						|
 | 
						|
  // Finally, fold operations that do not require constants.
 | 
						|
  switch (Opcode) {
 | 
						|
  case ISD::TokenFactor:
 | 
						|
    if (N1.getOpcode() == ISD::EntryToken)
 | 
						|
      return N2;
 | 
						|
    if (N2.getOpcode() == ISD::EntryToken)
 | 
						|
      return N1;
 | 
						|
    break;
 | 
						|
 | 
						|
  case ISD::AND:
 | 
						|
  case ISD::OR:
 | 
						|
    if (SetCCSDNode *LHS = dyn_cast<SetCCSDNode>(N1.Val))
 | 
						|
      if (SetCCSDNode *RHS = dyn_cast<SetCCSDNode>(N2.Val)) {
 | 
						|
        SDOperand LL = LHS->getOperand(0), RL = RHS->getOperand(0);
 | 
						|
        SDOperand LR = LHS->getOperand(1), RR = RHS->getOperand(1);
 | 
						|
        ISD::CondCode Op2 = RHS->getCondition();
 | 
						|
 | 
						|
        // (X op1 Y) | (Y op2 X) -> (X op1 Y) | (X swapop2 Y)
 | 
						|
        if (LL == RR && LR == RL) {
 | 
						|
          Op2 = ISD::getSetCCSwappedOperands(Op2);
 | 
						|
          goto MatchedBackwards;
 | 
						|
        }
 | 
						|
      
 | 
						|
        if (LL == RL && LR == RR) {
 | 
						|
        MatchedBackwards:
 | 
						|
          ISD::CondCode Result;
 | 
						|
          bool isInteger = MVT::isInteger(LL.getValueType());
 | 
						|
          if (Opcode == ISD::OR)
 | 
						|
            Result = ISD::getSetCCOrOperation(LHS->getCondition(), Op2,
 | 
						|
                                              isInteger);
 | 
						|
          else
 | 
						|
            Result = ISD::getSetCCAndOperation(LHS->getCondition(), Op2,
 | 
						|
                                               isInteger);
 | 
						|
          if (Result != ISD::SETCC_INVALID)
 | 
						|
            return getSetCC(Result, LHS->getValueType(0), LL, LR);
 | 
						|
        }
 | 
						|
      }
 | 
						|
    break;
 | 
						|
  case ISD::XOR:
 | 
						|
    if (N1 == N2) return getConstant(0, VT);  // xor X, Y -> 0
 | 
						|
    break;
 | 
						|
  case ISD::SUB:
 | 
						|
    if (N1.getOpcode() == ISD::ADD) {
 | 
						|
      if (N1.Val->getOperand(0) == N2)
 | 
						|
        return N1.Val->getOperand(1);         // (A+B)-A == B
 | 
						|
      if (N1.Val->getOperand(1) == N2)
 | 
						|
        return N1.Val->getOperand(0);         // (A+B)-B == A
 | 
						|
    }
 | 
						|
    break;
 | 
						|
  }
 | 
						|
 | 
						|
  SDNode *&N = BinaryOps[std::make_pair(Opcode, std::make_pair(N1, N2))];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new SDNode(Opcode, N1, N2);
 | 
						|
  N->setValueTypes(VT);
 | 
						|
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getLoad(MVT::ValueType VT,
 | 
						|
                                SDOperand Chain, SDOperand Ptr) {
 | 
						|
  SDNode *&N = Loads[std::make_pair(Ptr, std::make_pair(Chain, VT))];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new SDNode(ISD::LOAD, Chain, Ptr);
 | 
						|
 | 
						|
  // Loads have a token chain.
 | 
						|
  N->setValueTypes(VT, MVT::Other);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
SDOperand SelectionDAG::getNode(unsigned Opcode, MVT::ValueType VT,
 | 
						|
                                SDOperand N1, SDOperand N2, SDOperand N3) {
 | 
						|
  // Perform various simplifications.
 | 
						|
  ConstantSDNode *N1C = dyn_cast<ConstantSDNode>(N1.Val);
 | 
						|
  ConstantSDNode *N2C = dyn_cast<ConstantSDNode>(N2.Val);
 | 
						|
  ConstantSDNode *N3C = dyn_cast<ConstantSDNode>(N3.Val);
 | 
						|
  switch (Opcode) {
 | 
						|
  case ISD::SELECT:
 | 
						|
    if (N1C)
 | 
						|
      if (N1C->getValue())
 | 
						|
        return N2;             // select true, X, Y -> X
 | 
						|
      else 
 | 
						|
        return N3;             // select false, X, Y -> Y
 | 
						|
 | 
						|
    if (N2 == N3) return N2;   // select C, X, X -> X
 | 
						|
 | 
						|
    if (VT == MVT::i1) {  // Boolean SELECT
 | 
						|
      if (N2C) {
 | 
						|
        if (N3C) {
 | 
						|
          if (N2C->getValue()) // select C, 1, 0 -> C
 | 
						|
            return N1;
 | 
						|
          return getNode(ISD::XOR, VT, N1, N3); // select C, 0, 1 -> ~C
 | 
						|
        }
 | 
						|
 | 
						|
        if (N2C->getValue())   // select C, 1, X -> C | X
 | 
						|
          return getNode(ISD::OR, VT, N1, N3);
 | 
						|
        else                   // select C, 0, X -> ~C & X
 | 
						|
          return getNode(ISD::AND, VT,
 | 
						|
                         getNode(ISD::XOR, N1.getValueType(), N1,
 | 
						|
                                 getConstant(1, N1.getValueType())), N3);
 | 
						|
      } else if (N3C) {
 | 
						|
        if (N3C->getValue())   // select C, X, 1 -> ~C | X
 | 
						|
          return getNode(ISD::OR, VT,
 | 
						|
                         getNode(ISD::XOR, N1.getValueType(), N1,
 | 
						|
                                 getConstant(1, N1.getValueType())), N2);
 | 
						|
        else                   // select C, X, 0 -> C & X
 | 
						|
          return getNode(ISD::AND, VT, N1, N2);
 | 
						|
      }
 | 
						|
    }
 | 
						|
 | 
						|
    break;
 | 
						|
  case ISD::BRCOND:
 | 
						|
    if (N2C)
 | 
						|
      if (N2C->getValue()) // Unconditional branch
 | 
						|
        return getNode(ISD::BR, MVT::Other, N1, N3);
 | 
						|
      else
 | 
						|
        return N1;         // Never-taken branch
 | 
						|
    break;
 | 
						|
  }
 | 
						|
 | 
						|
  SDNode *N = new SDNode(Opcode, N1, N2, N3);
 | 
						|
  switch (Opcode) {
 | 
						|
  default: 
 | 
						|
    N->setValueTypes(VT);
 | 
						|
    break;
 | 
						|
  case ISD::DYNAMIC_STACKALLOC: // DYNAMIC_STACKALLOC produces pointer and chain
 | 
						|
    N->setValueTypes(VT, MVT::Other);
 | 
						|
    break;
 | 
						|
  }
 | 
						|
 | 
						|
  // FIXME: memoize NODES
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getNode(unsigned Opcode, MVT::ValueType VT,
 | 
						|
                                std::vector<SDOperand> &Children) {
 | 
						|
  switch (Children.size()) {
 | 
						|
  case 0: return getNode(Opcode, VT);
 | 
						|
  case 1: return getNode(Opcode, VT, Children[0]);
 | 
						|
  case 2: return getNode(Opcode, VT, Children[0], Children[1]);
 | 
						|
  case 3: return getNode(Opcode, VT, Children[0], Children[1], Children[2]);
 | 
						|
  default:
 | 
						|
    // FIXME: MEMOIZE!!
 | 
						|
    SDNode *N = new SDNode(Opcode, Children);
 | 
						|
    if (Opcode != ISD::ADD_PARTS && Opcode != ISD::SUB_PARTS) {
 | 
						|
      N->setValueTypes(VT);
 | 
						|
    } else {
 | 
						|
      std::vector<MVT::ValueType> V(N->getNumOperands()/2, VT);
 | 
						|
      N->setValueTypes(V);
 | 
						|
    }
 | 
						|
    AllNodes.push_back(N);
 | 
						|
    return SDOperand(N, 0);
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getNode(unsigned Opcode, MVT::ValueType VT,SDOperand N1,
 | 
						|
                                MVT::ValueType EVT) {
 | 
						|
 | 
						|
  switch (Opcode) {
 | 
						|
  default: assert(0 && "Bad opcode for this accessor!");
 | 
						|
  case ISD::FP_ROUND_INREG:
 | 
						|
    assert(VT == N1.getValueType() && "Not an inreg round!");
 | 
						|
    assert(MVT::isFloatingPoint(VT) && MVT::isFloatingPoint(EVT) &&
 | 
						|
           "Cannot FP_ROUND_INREG integer types");
 | 
						|
    if (EVT == VT) return N1;  // Not actually rounding
 | 
						|
    assert(EVT < VT && "Not rounding down!");
 | 
						|
    break;
 | 
						|
  case ISD::ZERO_EXTEND_INREG:
 | 
						|
  case ISD::SIGN_EXTEND_INREG:
 | 
						|
    assert(VT == N1.getValueType() && "Not an inreg extend!");
 | 
						|
    assert(MVT::isInteger(VT) && MVT::isInteger(EVT) &&
 | 
						|
           "Cannot *_EXTEND_INREG FP types");
 | 
						|
    if (EVT == VT) return N1;  // Not actually extending
 | 
						|
    assert(EVT < VT && "Not extending!");
 | 
						|
 | 
						|
    // If we are sign extending an extension, use the original source.
 | 
						|
    if (N1.getOpcode() == ISD::ZERO_EXTEND_INREG ||
 | 
						|
        N1.getOpcode() == ISD::SIGN_EXTEND_INREG) {
 | 
						|
      if (N1.getOpcode() == Opcode &&
 | 
						|
          cast<MVTSDNode>(N1)->getExtraValueType() <= EVT)
 | 
						|
        return N1;
 | 
						|
    }
 | 
						|
 | 
						|
    break;
 | 
						|
  }
 | 
						|
 | 
						|
  EVTStruct NN;
 | 
						|
  NN.Opcode = Opcode;
 | 
						|
  NN.VT = VT;
 | 
						|
  NN.EVT = EVT;
 | 
						|
  NN.Ops.push_back(N1);
 | 
						|
 | 
						|
  SDNode *&N = MVTSDNodes[NN];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new MVTSDNode(Opcode, VT, N1, EVT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getNode(unsigned Opcode, MVT::ValueType VT,SDOperand N1,
 | 
						|
                                SDOperand N2, MVT::ValueType EVT) {
 | 
						|
  switch (Opcode) {
 | 
						|
  default:  assert(0 && "Bad opcode for this accessor!");
 | 
						|
  case ISD::EXTLOAD:
 | 
						|
  case ISD::SEXTLOAD:
 | 
						|
  case ISD::ZEXTLOAD:
 | 
						|
    // If they are asking for an extending loat from/to the same thing, return a
 | 
						|
    // normal load.
 | 
						|
    if (VT == EVT)
 | 
						|
      return getNode(ISD::LOAD, VT, N1, N2);
 | 
						|
    assert(EVT < VT && "Should only be an extending load, not truncating!");
 | 
						|
    assert((Opcode == ISD::EXTLOAD || MVT::isInteger(VT)) && 
 | 
						|
           "Cannot sign/zero extend a FP load!");
 | 
						|
    assert(MVT::isInteger(VT) == MVT::isInteger(EVT) &&
 | 
						|
           "Cannot convert from FP to Int or Int -> FP!");
 | 
						|
    break;
 | 
						|
  }
 | 
						|
 | 
						|
  EVTStruct NN;
 | 
						|
  NN.Opcode = Opcode;
 | 
						|
  NN.VT = VT;
 | 
						|
  NN.EVT = EVT;
 | 
						|
  NN.Ops.push_back(N1);
 | 
						|
  NN.Ops.push_back(N2);
 | 
						|
 | 
						|
  SDNode *&N = MVTSDNodes[NN];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new MVTSDNode(Opcode, VT, MVT::Other, N1, N2, EVT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
SDOperand SelectionDAG::getNode(unsigned Opcode, MVT::ValueType VT,SDOperand N1,
 | 
						|
                                SDOperand N2, SDOperand N3, MVT::ValueType EVT) {
 | 
						|
  switch (Opcode) {
 | 
						|
  default:  assert(0 && "Bad opcode for this accessor!");
 | 
						|
  case ISD::TRUNCSTORE:
 | 
						|
#if 0 // FIXME: If the target supports EVT natively, convert to a truncate/store
 | 
						|
    // If this is a truncating store of a constant, convert to the desired type
 | 
						|
    // and store it instead.
 | 
						|
    if (isa<Constant>(N1)) {
 | 
						|
      SDOperand Op = getNode(ISD::TRUNCATE, EVT, N1);
 | 
						|
      if (isa<Constant>(Op))
 | 
						|
        N1 = Op;      
 | 
						|
    }
 | 
						|
    // Also for ConstantFP?
 | 
						|
#endif
 | 
						|
    if (N1.getValueType() == EVT)       // Normal store?
 | 
						|
      return getNode(ISD::STORE, VT, N1, N2, N3);
 | 
						|
    assert(N2.getValueType() > EVT && "Not a truncation?");
 | 
						|
    assert(MVT::isInteger(N2.getValueType()) == MVT::isInteger(EVT) &&
 | 
						|
           "Can't do FP-INT conversion!");
 | 
						|
    break;
 | 
						|
  }
 | 
						|
 | 
						|
  EVTStruct NN;
 | 
						|
  NN.Opcode = Opcode;
 | 
						|
  NN.VT = VT;
 | 
						|
  NN.EVT = EVT;
 | 
						|
  NN.Ops.push_back(N1);
 | 
						|
  NN.Ops.push_back(N2);
 | 
						|
  NN.Ops.push_back(N3);
 | 
						|
 | 
						|
  SDNode *&N = MVTSDNodes[NN];
 | 
						|
  if (N) return SDOperand(N, 0);
 | 
						|
  N = new MVTSDNode(Opcode, VT, N1, N2, N3, EVT);
 | 
						|
  AllNodes.push_back(N);
 | 
						|
  return SDOperand(N, 0);
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
/// hasNUsesOfValue - Return true if there are exactly NUSES uses of the
 | 
						|
/// indicated value.  This method ignores uses of other values defined by this
 | 
						|
/// operation.
 | 
						|
bool SDNode::hasNUsesOfValue(unsigned NUses, unsigned Value) {
 | 
						|
  assert(Value < getNumValues() && "Bad value!");
 | 
						|
 | 
						|
  // If there is only one value, this is easy.
 | 
						|
  if (getNumValues() == 1)
 | 
						|
    return use_size() == NUses;
 | 
						|
  if (Uses.size() < NUses) return false;
 | 
						|
 | 
						|
  SDOperand TheValue(this, Value);
 | 
						|
 | 
						|
  std::set<SDNode*> UsersHandled;
 | 
						|
 | 
						|
  for (std::vector<SDNode*>::iterator UI = Uses.begin(), E = Uses.end();
 | 
						|
       UI != E; ++UI) {
 | 
						|
    SDNode *User = *UI;
 | 
						|
    if (User->getNumOperands() == 1 ||
 | 
						|
        UsersHandled.insert(User).second)     // First time we've seen this?
 | 
						|
      for (unsigned i = 0, e = User->getNumOperands(); i != e; ++i)
 | 
						|
        if (User->getOperand(i) == TheValue) {
 | 
						|
          if (NUses == 0)
 | 
						|
            return false;   // too many uses
 | 
						|
          --NUses;
 | 
						|
        }
 | 
						|
  }
 | 
						|
 | 
						|
  // Found exactly the right number of uses?
 | 
						|
  return NUses == 0;
 | 
						|
}
 | 
						|
 | 
						|
 | 
						|
const char *SDNode::getOperationName() const {
 | 
						|
  switch (getOpcode()) {
 | 
						|
  default: return "<<Unknown>>";
 | 
						|
  case ISD::EntryToken:    return "EntryToken";
 | 
						|
  case ISD::TokenFactor:   return "TokenFactor";
 | 
						|
  case ISD::Constant:      return "Constant";
 | 
						|
  case ISD::ConstantFP:    return "ConstantFP";
 | 
						|
  case ISD::GlobalAddress: return "GlobalAddress";
 | 
						|
  case ISD::FrameIndex:    return "FrameIndex";
 | 
						|
  case ISD::BasicBlock:    return "BasicBlock";
 | 
						|
  case ISD::ExternalSymbol: return "ExternalSymbol";
 | 
						|
  case ISD::ConstantPool:  return "ConstantPoolIndex";
 | 
						|
  case ISD::CopyToReg:     return "CopyToReg";
 | 
						|
  case ISD::CopyFromReg:   return "CopyFromReg";
 | 
						|
  case ISD::ImplicitDef:   return "ImplicitDef";
 | 
						|
 | 
						|
  case ISD::ADD:    return "add";
 | 
						|
  case ISD::SUB:    return "sub";
 | 
						|
  case ISD::MUL:    return "mul";
 | 
						|
  case ISD::SDIV:   return "sdiv";
 | 
						|
  case ISD::UDIV:   return "udiv";
 | 
						|
  case ISD::SREM:   return "srem";
 | 
						|
  case ISD::UREM:   return "urem";
 | 
						|
  case ISD::AND:    return "and";
 | 
						|
  case ISD::OR:     return "or";
 | 
						|
  case ISD::XOR:    return "xor";
 | 
						|
  case ISD::SHL:    return "shl";
 | 
						|
  case ISD::SRA:    return "sra";
 | 
						|
  case ISD::SRL:    return "srl";
 | 
						|
 | 
						|
  case ISD::SELECT: return "select";
 | 
						|
  case ISD::ADD_PARTS:   return "add_parts";
 | 
						|
  case ISD::SUB_PARTS:   return "sub_parts";
 | 
						|
 | 
						|
    // Conversion operators.
 | 
						|
  case ISD::SIGN_EXTEND: return "sign_extend";
 | 
						|
  case ISD::ZERO_EXTEND: return "zero_extend";
 | 
						|
  case ISD::SIGN_EXTEND_INREG: return "sign_extend_inreg";
 | 
						|
  case ISD::ZERO_EXTEND_INREG: return "zero_extend_inreg";
 | 
						|
  case ISD::TRUNCATE:    return "truncate";
 | 
						|
  case ISD::FP_ROUND:    return "fp_round";
 | 
						|
  case ISD::FP_ROUND_INREG: return "fp_round_inreg";
 | 
						|
  case ISD::FP_EXTEND:   return "fp_extend";
 | 
						|
 | 
						|
  case ISD::SINT_TO_FP:  return "sint_to_fp";
 | 
						|
  case ISD::UINT_TO_FP:  return "uint_to_fp";
 | 
						|
  case ISD::FP_TO_SINT:  return "fp_to_sint";
 | 
						|
  case ISD::FP_TO_UINT:  return "fp_to_uint";
 | 
						|
 | 
						|
    // Control flow instructions
 | 
						|
  case ISD::BR:      return "br";
 | 
						|
  case ISD::BRCOND:  return "brcond";
 | 
						|
  case ISD::RET:     return "ret";
 | 
						|
  case ISD::CALL:    return "call";
 | 
						|
  case ISD::ADJCALLSTACKDOWN:  return "adjcallstackdown";
 | 
						|
  case ISD::ADJCALLSTACKUP:    return "adjcallstackup";
 | 
						|
 | 
						|
    // Other operators
 | 
						|
  case ISD::LOAD:    return "load";
 | 
						|
  case ISD::STORE:   return "store";
 | 
						|
  case ISD::EXTLOAD:    return "extload";
 | 
						|
  case ISD::SEXTLOAD:   return "sextload";
 | 
						|
  case ISD::ZEXTLOAD:   return "zextload";
 | 
						|
  case ISD::TRUNCSTORE: return "truncstore";
 | 
						|
 | 
						|
  case ISD::DYNAMIC_STACKALLOC: return "dynamic_stackalloc";
 | 
						|
  case ISD::EXTRACT_ELEMENT: return "extract_element";
 | 
						|
  case ISD::BUILD_PAIR: return "build_pair";
 | 
						|
  case ISD::MEMSET:  return "memset";
 | 
						|
  case ISD::MEMCPY:  return "memcpy";
 | 
						|
  case ISD::MEMMOVE: return "memmove";
 | 
						|
 | 
						|
  case ISD::SETCC:
 | 
						|
    const SetCCSDNode *SetCC = cast<SetCCSDNode>(this);
 | 
						|
    switch (SetCC->getCondition()) {
 | 
						|
    default: assert(0 && "Unknown setcc condition!");
 | 
						|
    case ISD::SETOEQ:  return "setcc:setoeq";
 | 
						|
    case ISD::SETOGT:  return "setcc:setogt";
 | 
						|
    case ISD::SETOGE:  return "setcc:setoge";
 | 
						|
    case ISD::SETOLT:  return "setcc:setolt";
 | 
						|
    case ISD::SETOLE:  return "setcc:setole";
 | 
						|
    case ISD::SETONE:  return "setcc:setone";
 | 
						|
      
 | 
						|
    case ISD::SETO:    return "setcc:seto"; 
 | 
						|
    case ISD::SETUO:   return "setcc:setuo";
 | 
						|
    case ISD::SETUEQ:  return "setcc:setue";
 | 
						|
    case ISD::SETUGT:  return "setcc:setugt";
 | 
						|
    case ISD::SETUGE:  return "setcc:setuge";
 | 
						|
    case ISD::SETULT:  return "setcc:setult";
 | 
						|
    case ISD::SETULE:  return "setcc:setule";
 | 
						|
    case ISD::SETUNE:  return "setcc:setune";
 | 
						|
      
 | 
						|
    case ISD::SETEQ:   return "setcc:seteq";
 | 
						|
    case ISD::SETGT:   return "setcc:setgt";
 | 
						|
    case ISD::SETGE:   return "setcc:setge";
 | 
						|
    case ISD::SETLT:   return "setcc:setlt";
 | 
						|
    case ISD::SETLE:   return "setcc:setle";
 | 
						|
    case ISD::SETNE:   return "setcc:setne";
 | 
						|
    }
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
void SDNode::dump() const {
 | 
						|
  std::cerr << (void*)this << ": ";
 | 
						|
 | 
						|
  for (unsigned i = 0, e = getNumValues(); i != e; ++i) {
 | 
						|
    if (i) std::cerr << ",";
 | 
						|
    if (getValueType(i) == MVT::Other)
 | 
						|
      std::cerr << "ch";
 | 
						|
    else
 | 
						|
      std::cerr << MVT::getValueTypeString(getValueType(i));
 | 
						|
  }
 | 
						|
  std::cerr << " = " << getOperationName();
 | 
						|
 | 
						|
  std::cerr << " ";
 | 
						|
  for (unsigned i = 0, e = getNumOperands(); i != e; ++i) {
 | 
						|
    if (i) std::cerr << ", ";
 | 
						|
    std::cerr << (void*)getOperand(i).Val;
 | 
						|
    if (unsigned RN = getOperand(i).ResNo)
 | 
						|
      std::cerr << ":" << RN;
 | 
						|
  }
 | 
						|
 | 
						|
  if (const ConstantSDNode *CSDN = dyn_cast<ConstantSDNode>(this)) {
 | 
						|
    std::cerr << "<" << CSDN->getValue() << ">";
 | 
						|
  } else if (const ConstantFPSDNode *CSDN = dyn_cast<ConstantFPSDNode>(this)) {
 | 
						|
    std::cerr << "<" << CSDN->getValue() << ">";
 | 
						|
  } else if (const GlobalAddressSDNode *GADN = 
 | 
						|
             dyn_cast<GlobalAddressSDNode>(this)) {
 | 
						|
    std::cerr << "<";
 | 
						|
    WriteAsOperand(std::cerr, GADN->getGlobal()) << ">";
 | 
						|
  } else if (const FrameIndexSDNode *FIDN =
 | 
						|
	     dyn_cast<FrameIndexSDNode>(this)) {
 | 
						|
    std::cerr << "<" << FIDN->getIndex() << ">";
 | 
						|
  } else if (const ConstantPoolSDNode *CP = dyn_cast<ConstantPoolSDNode>(this)){
 | 
						|
    std::cerr << "<" << CP->getIndex() << ">";
 | 
						|
  } else if (const BasicBlockSDNode *BBDN = 
 | 
						|
	     dyn_cast<BasicBlockSDNode>(this)) {
 | 
						|
    std::cerr << "<";
 | 
						|
    const Value *LBB = (const Value*)BBDN->getBasicBlock()->getBasicBlock();
 | 
						|
    if (LBB)
 | 
						|
      std::cerr << LBB->getName() << " ";
 | 
						|
    std::cerr << (const void*)BBDN->getBasicBlock() << ">";
 | 
						|
  } else if (const RegSDNode *C2V = dyn_cast<RegSDNode>(this)) {
 | 
						|
    std::cerr << "<reg #" << C2V->getReg() << ">";
 | 
						|
  } else if (const ExternalSymbolSDNode *ES =
 | 
						|
             dyn_cast<ExternalSymbolSDNode>(this)) {
 | 
						|
    std::cerr << "'" << ES->getSymbol() << "'";
 | 
						|
  } else if (const MVTSDNode *M = dyn_cast<MVTSDNode>(this)) {
 | 
						|
    std::cerr << " - Ty = " << MVT::getValueTypeString(M->getExtraValueType());
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
static void DumpNodes(SDNode *N, unsigned indent) {
 | 
						|
  for (unsigned i = 0, e = N->getNumOperands(); i != e; ++i)
 | 
						|
    if (N->getOperand(i).Val->hasOneUse())
 | 
						|
      DumpNodes(N->getOperand(i).Val, indent+2);
 | 
						|
    else
 | 
						|
      std::cerr << "\n" << std::string(indent+2, ' ')
 | 
						|
                << (void*)N->getOperand(i).Val << ": <multiple use>";
 | 
						|
    
 | 
						|
 | 
						|
  std::cerr << "\n" << std::string(indent, ' ');
 | 
						|
  N->dump();
 | 
						|
}
 | 
						|
 | 
						|
void SelectionDAG::dump() const {
 | 
						|
  std::cerr << "SelectionDAG has " << AllNodes.size() << " nodes:";
 | 
						|
  std::vector<SDNode*> Nodes(AllNodes);
 | 
						|
  std::sort(Nodes.begin(), Nodes.end());
 | 
						|
 | 
						|
  for (unsigned i = 0, e = Nodes.size(); i != e; ++i) {
 | 
						|
    if (!Nodes[i]->hasOneUse() && Nodes[i] != getRoot().Val)
 | 
						|
      DumpNodes(Nodes[i], 2);
 | 
						|
  }
 | 
						|
 | 
						|
  DumpNodes(getRoot().Val, 2);
 | 
						|
 | 
						|
  std::cerr << "\n\n";
 | 
						|
}
 | 
						|
 |