You've already forked linux-packaging-mono
Imported Upstream version 5.18.0.207
Former-commit-id: 3b152f462918d427ce18620a2cbe4f8b79650449
This commit is contained in:
parent
8e12397d70
commit
eb85e2fc17
405
external/llvm/lib/Target/Sparc/SparcISelDAGToDAG.cpp
vendored
405
external/llvm/lib/Target/Sparc/SparcISelDAGToDAG.cpp
vendored
@ -1,405 +0,0 @@
|
||||
//===-- SparcISelDAGToDAG.cpp - A dag to dag inst selector for Sparc ------===//
|
||||
//
|
||||
// The LLVM Compiler Infrastructure
|
||||
//
|
||||
// This file is distributed under the University of Illinois Open Source
|
||||
// License. See LICENSE.TXT for details.
|
||||
//
|
||||
//===----------------------------------------------------------------------===//
|
||||
//
|
||||
// This file defines an instruction selector for the SPARC target.
|
||||
//
|
||||
//===----------------------------------------------------------------------===//
|
||||
|
||||
#include "SparcTargetMachine.h"
|
||||
#include "llvm/CodeGen/MachineRegisterInfo.h"
|
||||
#include "llvm/CodeGen/SelectionDAGISel.h"
|
||||
#include "llvm/IR/Intrinsics.h"
|
||||
#include "llvm/Support/Debug.h"
|
||||
#include "llvm/Support/ErrorHandling.h"
|
||||
#include "llvm/Support/raw_ostream.h"
|
||||
using namespace llvm;
|
||||
|
||||
//===----------------------------------------------------------------------===//
|
||||
// Instruction Selector Implementation
|
||||
//===----------------------------------------------------------------------===//
|
||||
|
||||
//===--------------------------------------------------------------------===//
|
||||
/// SparcDAGToDAGISel - SPARC specific code to select SPARC machine
|
||||
/// instructions for SelectionDAG operations.
|
||||
///
|
||||
namespace {
|
||||
class SparcDAGToDAGISel : public SelectionDAGISel {
|
||||
/// Subtarget - Keep a pointer to the Sparc Subtarget around so that we can
|
||||
/// make the right decision when generating code for different targets.
|
||||
const SparcSubtarget *Subtarget;
|
||||
public:
|
||||
explicit SparcDAGToDAGISel(SparcTargetMachine &tm) : SelectionDAGISel(tm) {}
|
||||
|
||||
bool runOnMachineFunction(MachineFunction &MF) override {
|
||||
Subtarget = &MF.getSubtarget<SparcSubtarget>();
|
||||
return SelectionDAGISel::runOnMachineFunction(MF);
|
||||
}
|
||||
|
||||
void Select(SDNode *N) override;
|
||||
|
||||
// Complex Pattern Selectors.
|
||||
bool SelectADDRrr(SDValue N, SDValue &R1, SDValue &R2);
|
||||
bool SelectADDRri(SDValue N, SDValue &Base, SDValue &Offset);
|
||||
|
||||
/// SelectInlineAsmMemoryOperand - Implement addressing mode selection for
|
||||
/// inline asm expressions.
|
||||
bool SelectInlineAsmMemoryOperand(const SDValue &Op,
|
||||
unsigned ConstraintID,
|
||||
std::vector<SDValue> &OutOps) override;
|
||||
|
||||
StringRef getPassName() const override {
|
||||
return "SPARC DAG->DAG Pattern Instruction Selection";
|
||||
}
|
||||
|
||||
// Include the pieces autogenerated from the target description.
|
||||
#include "SparcGenDAGISel.inc"
|
||||
|
||||
private:
|
||||
SDNode* getGlobalBaseReg();
|
||||
bool tryInlineAsm(SDNode *N);
|
||||
};
|
||||
} // end anonymous namespace
|
||||
|
||||
SDNode* SparcDAGToDAGISel::getGlobalBaseReg() {
|
||||
unsigned GlobalBaseReg = Subtarget->getInstrInfo()->getGlobalBaseReg(MF);
|
||||
return CurDAG->getRegister(GlobalBaseReg,
|
||||
TLI->getPointerTy(CurDAG->getDataLayout()))
|
||||
.getNode();
|
||||
}
|
||||
|
||||
bool SparcDAGToDAGISel::SelectADDRri(SDValue Addr,
|
||||
SDValue &Base, SDValue &Offset) {
|
||||
if (FrameIndexSDNode *FIN = dyn_cast<FrameIndexSDNode>(Addr)) {
|
||||
Base = CurDAG->getTargetFrameIndex(
|
||||
FIN->getIndex(), TLI->getPointerTy(CurDAG->getDataLayout()));
|
||||
Offset = CurDAG->getTargetConstant(0, SDLoc(Addr), MVT::i32);
|
||||
return true;
|
||||
}
|
||||
if (Addr.getOpcode() == ISD::TargetExternalSymbol ||
|
||||
Addr.getOpcode() == ISD::TargetGlobalAddress ||
|
||||
Addr.getOpcode() == ISD::TargetGlobalTLSAddress)
|
||||
return false; // direct calls.
|
||||
|
||||
if (Addr.getOpcode() == ISD::ADD) {
|
||||
if (ConstantSDNode *CN = dyn_cast<ConstantSDNode>(Addr.getOperand(1))) {
|
||||
if (isInt<13>(CN->getSExtValue())) {
|
||||
if (FrameIndexSDNode *FIN =
|
||||
dyn_cast<FrameIndexSDNode>(Addr.getOperand(0))) {
|
||||
// Constant offset from frame ref.
|
||||
Base = CurDAG->getTargetFrameIndex(
|
||||
FIN->getIndex(), TLI->getPointerTy(CurDAG->getDataLayout()));
|
||||
} else {
|
||||
Base = Addr.getOperand(0);
|
||||
}
|
||||
Offset = CurDAG->getTargetConstant(CN->getZExtValue(), SDLoc(Addr),
|
||||
MVT::i32);
|
||||
return true;
|
||||
}
|
||||
}
|
||||
if (Addr.getOperand(0).getOpcode() == SPISD::Lo) {
|
||||
Base = Addr.getOperand(1);
|
||||
Offset = Addr.getOperand(0).getOperand(0);
|
||||
return true;
|
||||
}
|
||||
if (Addr.getOperand(1).getOpcode() == SPISD::Lo) {
|
||||
Base = Addr.getOperand(0);
|
||||
Offset = Addr.getOperand(1).getOperand(0);
|
||||
return true;
|
||||
}
|
||||
}
|
||||
Base = Addr;
|
||||
Offset = CurDAG->getTargetConstant(0, SDLoc(Addr), MVT::i32);
|
||||
return true;
|
||||
}
|
||||
|
||||
bool SparcDAGToDAGISel::SelectADDRrr(SDValue Addr, SDValue &R1, SDValue &R2) {
|
||||
if (Addr.getOpcode() == ISD::FrameIndex) return false;
|
||||
if (Addr.getOpcode() == ISD::TargetExternalSymbol ||
|
||||
Addr.getOpcode() == ISD::TargetGlobalAddress ||
|
||||
Addr.getOpcode() == ISD::TargetGlobalTLSAddress)
|
||||
return false; // direct calls.
|
||||
|
||||
if (Addr.getOpcode() == ISD::ADD) {
|
||||
if (ConstantSDNode *CN = dyn_cast<ConstantSDNode>(Addr.getOperand(1)))
|
||||
if (isInt<13>(CN->getSExtValue()))
|
||||
return false; // Let the reg+imm pattern catch this!
|
||||
if (Addr.getOperand(0).getOpcode() == SPISD::Lo ||
|
||||
Addr.getOperand(1).getOpcode() == SPISD::Lo)
|
||||
return false; // Let the reg+imm pattern catch this!
|
||||
R1 = Addr.getOperand(0);
|
||||
R2 = Addr.getOperand(1);
|
||||
return true;
|
||||
}
|
||||
|
||||
R1 = Addr;
|
||||
R2 = CurDAG->getRegister(SP::G0, TLI->getPointerTy(CurDAG->getDataLayout()));
|
||||
return true;
|
||||
}
|
||||
|
||||
|
||||
// Re-assemble i64 arguments split up in SelectionDAGBuilder's
|
||||
// visitInlineAsm / GetRegistersForValue functions.
|
||||
//
|
||||
// Note: This function was copied from, and is essentially identical
|
||||
// to ARMISelDAGToDAG::SelectInlineAsm. It is very unfortunate that
|
||||
// such hacking-up is necessary; a rethink of how inline asm operands
|
||||
// are handled may be in order to make doing this more sane.
|
||||
//
|
||||
// TODO: fix inline asm support so I can simply tell it that 'i64'
|
||||
// inputs to asm need to be allocated to the IntPair register type,
|
||||
// and have that work. Then, delete this function.
|
||||
bool SparcDAGToDAGISel::tryInlineAsm(SDNode *N){
|
||||
std::vector<SDValue> AsmNodeOperands;
|
||||
unsigned Flag, Kind;
|
||||
bool Changed = false;
|
||||
unsigned NumOps = N->getNumOperands();
|
||||
|
||||
// Normally, i64 data is bounded to two arbitrary GPRs for "%r"
|
||||
// constraint. However, some instructions (e.g. ldd/std) require
|
||||
// (even/even+1) GPRs.
|
||||
|
||||
// So, here, we check for this case, and mutate the inlineasm to use
|
||||
// a single IntPair register instead, which guarantees such even/odd
|
||||
// placement.
|
||||
|
||||
SDLoc dl(N);
|
||||
SDValue Glue = N->getGluedNode() ? N->getOperand(NumOps-1)
|
||||
: SDValue(nullptr,0);
|
||||
|
||||
SmallVector<bool, 8> OpChanged;
|
||||
// Glue node will be appended late.
|
||||
for(unsigned i = 0, e = N->getGluedNode() ? NumOps - 1 : NumOps; i < e; ++i) {
|
||||
SDValue op = N->getOperand(i);
|
||||
AsmNodeOperands.push_back(op);
|
||||
|
||||
if (i < InlineAsm::Op_FirstOperand)
|
||||
continue;
|
||||
|
||||
if (ConstantSDNode *C = dyn_cast<ConstantSDNode>(N->getOperand(i))) {
|
||||
Flag = C->getZExtValue();
|
||||
Kind = InlineAsm::getKind(Flag);
|
||||
}
|
||||
else
|
||||
continue;
|
||||
|
||||
// Immediate operands to inline asm in the SelectionDAG are modeled with
|
||||
// two operands. The first is a constant of value InlineAsm::Kind_Imm, and
|
||||
// the second is a constant with the value of the immediate. If we get here
|
||||
// and we have a Kind_Imm, skip the next operand, and continue.
|
||||
if (Kind == InlineAsm::Kind_Imm) {
|
||||
SDValue op = N->getOperand(++i);
|
||||
AsmNodeOperands.push_back(op);
|
||||
continue;
|
||||
}
|
||||
|
||||
unsigned NumRegs = InlineAsm::getNumOperandRegisters(Flag);
|
||||
if (NumRegs)
|
||||
OpChanged.push_back(false);
|
||||
|
||||
unsigned DefIdx = 0;
|
||||
bool IsTiedToChangedOp = false;
|
||||
// If it's a use that is tied with a previous def, it has no
|
||||
// reg class constraint.
|
||||
if (Changed && InlineAsm::isUseOperandTiedToDef(Flag, DefIdx))
|
||||
IsTiedToChangedOp = OpChanged[DefIdx];
|
||||
|
||||
if (Kind != InlineAsm::Kind_RegUse && Kind != InlineAsm::Kind_RegDef
|
||||
&& Kind != InlineAsm::Kind_RegDefEarlyClobber)
|
||||
continue;
|
||||
|
||||
unsigned RC;
|
||||
bool HasRC = InlineAsm::hasRegClassConstraint(Flag, RC);
|
||||
if ((!IsTiedToChangedOp && (!HasRC || RC != SP::IntRegsRegClassID))
|
||||
|| NumRegs != 2)
|
||||
continue;
|
||||
|
||||
assert((i+2 < NumOps) && "Invalid number of operands in inline asm");
|
||||
SDValue V0 = N->getOperand(i+1);
|
||||
SDValue V1 = N->getOperand(i+2);
|
||||
unsigned Reg0 = cast<RegisterSDNode>(V0)->getReg();
|
||||
unsigned Reg1 = cast<RegisterSDNode>(V1)->getReg();
|
||||
SDValue PairedReg;
|
||||
MachineRegisterInfo &MRI = MF->getRegInfo();
|
||||
|
||||
if (Kind == InlineAsm::Kind_RegDef ||
|
||||
Kind == InlineAsm::Kind_RegDefEarlyClobber) {
|
||||
// Replace the two GPRs with 1 GPRPair and copy values from GPRPair to
|
||||
// the original GPRs.
|
||||
|
||||
unsigned GPVR = MRI.createVirtualRegister(&SP::IntPairRegClass);
|
||||
PairedReg = CurDAG->getRegister(GPVR, MVT::v2i32);
|
||||
SDValue Chain = SDValue(N,0);
|
||||
|
||||
SDNode *GU = N->getGluedUser();
|
||||
SDValue RegCopy = CurDAG->getCopyFromReg(Chain, dl, GPVR, MVT::v2i32,
|
||||
Chain.getValue(1));
|
||||
|
||||
// Extract values from a GPRPair reg and copy to the original GPR reg.
|
||||
SDValue Sub0 = CurDAG->getTargetExtractSubreg(SP::sub_even, dl, MVT::i32,
|
||||
RegCopy);
|
||||
SDValue Sub1 = CurDAG->getTargetExtractSubreg(SP::sub_odd, dl, MVT::i32,
|
||||
RegCopy);
|
||||
SDValue T0 = CurDAG->getCopyToReg(Sub0, dl, Reg0, Sub0,
|
||||
RegCopy.getValue(1));
|
||||
SDValue T1 = CurDAG->getCopyToReg(Sub1, dl, Reg1, Sub1, T0.getValue(1));
|
||||
|
||||
// Update the original glue user.
|
||||
std::vector<SDValue> Ops(GU->op_begin(), GU->op_end()-1);
|
||||
Ops.push_back(T1.getValue(1));
|
||||
CurDAG->UpdateNodeOperands(GU, Ops);
|
||||
}
|
||||
else {
|
||||
// For Kind == InlineAsm::Kind_RegUse, we first copy two GPRs into a
|
||||
// GPRPair and then pass the GPRPair to the inline asm.
|
||||
SDValue Chain = AsmNodeOperands[InlineAsm::Op_InputChain];
|
||||
|
||||
// As REG_SEQ doesn't take RegisterSDNode, we copy them first.
|
||||
SDValue T0 = CurDAG->getCopyFromReg(Chain, dl, Reg0, MVT::i32,
|
||||
Chain.getValue(1));
|
||||
SDValue T1 = CurDAG->getCopyFromReg(Chain, dl, Reg1, MVT::i32,
|
||||
T0.getValue(1));
|
||||
SDValue Pair = SDValue(
|
||||
CurDAG->getMachineNode(
|
||||
TargetOpcode::REG_SEQUENCE, dl, MVT::v2i32,
|
||||
{
|
||||
CurDAG->getTargetConstant(SP::IntPairRegClassID, dl,
|
||||
MVT::i32),
|
||||
T0,
|
||||
CurDAG->getTargetConstant(SP::sub_even, dl, MVT::i32),
|
||||
T1,
|
||||
CurDAG->getTargetConstant(SP::sub_odd, dl, MVT::i32),
|
||||
}),
|
||||
0);
|
||||
|
||||
// Copy REG_SEQ into a GPRPair-typed VR and replace the original two
|
||||
// i32 VRs of inline asm with it.
|
||||
unsigned GPVR = MRI.createVirtualRegister(&SP::IntPairRegClass);
|
||||
PairedReg = CurDAG->getRegister(GPVR, MVT::v2i32);
|
||||
Chain = CurDAG->getCopyToReg(T1, dl, GPVR, Pair, T1.getValue(1));
|
||||
|
||||
AsmNodeOperands[InlineAsm::Op_InputChain] = Chain;
|
||||
Glue = Chain.getValue(1);
|
||||
}
|
||||
|
||||
Changed = true;
|
||||
|
||||
if(PairedReg.getNode()) {
|
||||
OpChanged[OpChanged.size() -1 ] = true;
|
||||
Flag = InlineAsm::getFlagWord(Kind, 1 /* RegNum*/);
|
||||
if (IsTiedToChangedOp)
|
||||
Flag = InlineAsm::getFlagWordForMatchingOp(Flag, DefIdx);
|
||||
else
|
||||
Flag = InlineAsm::getFlagWordForRegClass(Flag, SP::IntPairRegClassID);
|
||||
// Replace the current flag.
|
||||
AsmNodeOperands[AsmNodeOperands.size() -1] = CurDAG->getTargetConstant(
|
||||
Flag, dl, MVT::i32);
|
||||
// Add the new register node and skip the original two GPRs.
|
||||
AsmNodeOperands.push_back(PairedReg);
|
||||
// Skip the next two GPRs.
|
||||
i += 2;
|
||||
}
|
||||
}
|
||||
|
||||
if (Glue.getNode())
|
||||
AsmNodeOperands.push_back(Glue);
|
||||
if (!Changed)
|
||||
return false;
|
||||
|
||||
SDValue New = CurDAG->getNode(ISD::INLINEASM, SDLoc(N),
|
||||
CurDAG->getVTList(MVT::Other, MVT::Glue), AsmNodeOperands);
|
||||
New->setNodeId(-1);
|
||||
ReplaceNode(N, New.getNode());
|
||||
return true;
|
||||
}
|
||||
|
||||
void SparcDAGToDAGISel::Select(SDNode *N) {
|
||||
SDLoc dl(N);
|
||||
if (N->isMachineOpcode()) {
|
||||
N->setNodeId(-1);
|
||||
return; // Already selected.
|
||||
}
|
||||
|
||||
switch (N->getOpcode()) {
|
||||
default: break;
|
||||
case ISD::INLINEASM: {
|
||||
if (tryInlineAsm(N))
|
||||
return;
|
||||
break;
|
||||
}
|
||||
case SPISD::GLOBAL_BASE_REG:
|
||||
ReplaceNode(N, getGlobalBaseReg());
|
||||
return;
|
||||
|
||||
case ISD::SDIV:
|
||||
case ISD::UDIV: {
|
||||
// sdivx / udivx handle 64-bit divides.
|
||||
if (N->getValueType(0) == MVT::i64)
|
||||
break;
|
||||
// FIXME: should use a custom expander to expose the SRA to the dag.
|
||||
SDValue DivLHS = N->getOperand(0);
|
||||
SDValue DivRHS = N->getOperand(1);
|
||||
|
||||
// Set the Y register to the high-part.
|
||||
SDValue TopPart;
|
||||
if (N->getOpcode() == ISD::SDIV) {
|
||||
TopPart = SDValue(CurDAG->getMachineNode(SP::SRAri, dl, MVT::i32, DivLHS,
|
||||
CurDAG->getTargetConstant(31, dl, MVT::i32)),
|
||||
0);
|
||||
} else {
|
||||
TopPart = CurDAG->getRegister(SP::G0, MVT::i32);
|
||||
}
|
||||
TopPart = CurDAG->getCopyToReg(CurDAG->getEntryNode(), dl, SP::Y, TopPart,
|
||||
SDValue())
|
||||
.getValue(1);
|
||||
|
||||
// FIXME: Handle div by immediate.
|
||||
unsigned Opcode = N->getOpcode() == ISD::SDIV ? SP::SDIVrr : SP::UDIVrr;
|
||||
// SDIV is a hardware erratum on some LEON2 processors. Replace it with SDIVcc here.
|
||||
if (((SparcTargetMachine&)TM).getSubtargetImpl()->performSDIVReplace()
|
||||
&&
|
||||
Opcode == SP::SDIVrr) {
|
||||
Opcode = SP::SDIVCCrr;
|
||||
}
|
||||
CurDAG->SelectNodeTo(N, Opcode, MVT::i32, DivLHS, DivRHS, TopPart);
|
||||
return;
|
||||
}
|
||||
}
|
||||
|
||||
SelectCode(N);
|
||||
}
|
||||
|
||||
|
||||
/// SelectInlineAsmMemoryOperand - Implement addressing mode selection for
|
||||
/// inline asm expressions.
|
||||
bool
|
||||
SparcDAGToDAGISel::SelectInlineAsmMemoryOperand(const SDValue &Op,
|
||||
unsigned ConstraintID,
|
||||
std::vector<SDValue> &OutOps) {
|
||||
SDValue Op0, Op1;
|
||||
switch (ConstraintID) {
|
||||
default: return true;
|
||||
case InlineAsm::Constraint_i:
|
||||
case InlineAsm::Constraint_o:
|
||||
case InlineAsm::Constraint_m: // memory
|
||||
if (!SelectADDRrr(Op, Op0, Op1))
|
||||
SelectADDRri(Op, Op0, Op1);
|
||||
break;
|
||||
}
|
||||
|
||||
OutOps.push_back(Op0);
|
||||
OutOps.push_back(Op1);
|
||||
return false;
|
||||
}
|
||||
|
||||
/// createSparcISelDag - This pass converts a legalized DAG into a
|
||||
/// SPARC-specific DAG, ready for instruction scheduling.
|
||||
///
|
||||
FunctionPass *llvm::createSparcISelDag(SparcTargetMachine &TM) {
|
||||
return new SparcDAGToDAGISel(TM);
|
||||
}
|
Reference in New Issue
Block a user