summaryrefslogtreecommitdiffstats
path: root/gnu/llvm/lib/Target/Hexagon/HexagonBitSimplify.cpp
diff options
context:
space:
mode:
authorpatrick <patrick@openbsd.org>2020-08-03 15:06:44 +0000
committerpatrick <patrick@openbsd.org>2020-08-03 15:06:44 +0000
commitb64793999546ed8adebaeebd9d8345d18db8927d (patch)
tree4357c27b561d73b0e089727c6ed659f2ceff5f47 /gnu/llvm/lib/Target/Hexagon/HexagonBitSimplify.cpp
parentAdd support for UTF-8 DISPLAY-HINTs with octet length. For now only (diff)
downloadwireguard-openbsd-b64793999546ed8adebaeebd9d8345d18db8927d.tar.xz
wireguard-openbsd-b64793999546ed8adebaeebd9d8345d18db8927d.zip
Remove LLVM 8.0.1 files.
Diffstat (limited to 'gnu/llvm/lib/Target/Hexagon/HexagonBitSimplify.cpp')
-rw-r--r--gnu/llvm/lib/Target/Hexagon/HexagonBitSimplify.cpp3374
1 files changed, 0 insertions, 3374 deletions
diff --git a/gnu/llvm/lib/Target/Hexagon/HexagonBitSimplify.cpp b/gnu/llvm/lib/Target/Hexagon/HexagonBitSimplify.cpp
deleted file mode 100644
index 1bdebe557a8..00000000000
--- a/gnu/llvm/lib/Target/Hexagon/HexagonBitSimplify.cpp
+++ /dev/null
@@ -1,3374 +0,0 @@
-//===- HexagonBitSimplify.cpp ---------------------------------------------===//
-//
-// The LLVM Compiler Infrastructure
-//
-// This file is distributed under the University of Illinois Open Source
-// License. See LICENSE.TXT for details.
-//
-//===----------------------------------------------------------------------===//
-
-#include "BitTracker.h"
-#include "HexagonBitTracker.h"
-#include "HexagonInstrInfo.h"
-#include "HexagonRegisterInfo.h"
-#include "HexagonSubtarget.h"
-#include "llvm/ADT/BitVector.h"
-#include "llvm/ADT/DenseMap.h"
-#include "llvm/ADT/GraphTraits.h"
-#include "llvm/ADT/STLExtras.h"
-#include "llvm/ADT/SmallVector.h"
-#include "llvm/ADT/StringRef.h"
-#include "llvm/CodeGen/MachineBasicBlock.h"
-#include "llvm/CodeGen/MachineDominators.h"
-#include "llvm/CodeGen/MachineFunction.h"
-#include "llvm/CodeGen/MachineFunctionPass.h"
-#include "llvm/CodeGen/MachineInstr.h"
-#include "llvm/CodeGen/MachineInstrBuilder.h"
-#include "llvm/CodeGen/MachineOperand.h"
-#include "llvm/CodeGen/MachineRegisterInfo.h"
-#include "llvm/CodeGen/TargetRegisterInfo.h"
-#include "llvm/IR/DebugLoc.h"
-#include "llvm/MC/MCInstrDesc.h"
-#include "llvm/Pass.h"
-#include "llvm/Support/CommandLine.h"
-#include "llvm/Support/Compiler.h"
-#include "llvm/Support/Debug.h"
-#include "llvm/Support/ErrorHandling.h"
-#include "llvm/Support/MathExtras.h"
-#include "llvm/Support/raw_ostream.h"
-#include <algorithm>
-#include <cassert>
-#include <cstdint>
-#include <iterator>
-#include <limits>
-#include <utility>
-#include <vector>
-
-#define DEBUG_TYPE "hexbit"
-
-using namespace llvm;
-
-static cl::opt<bool> PreserveTiedOps("hexbit-keep-tied", cl::Hidden,
- cl::init(true), cl::desc("Preserve subregisters in tied operands"));
-static cl::opt<bool> GenExtract("hexbit-extract", cl::Hidden,
- cl::init(true), cl::desc("Generate extract instructions"));
-static cl::opt<bool> GenBitSplit("hexbit-bitsplit", cl::Hidden,
- cl::init(true), cl::desc("Generate bitsplit instructions"));
-
-static cl::opt<unsigned> MaxExtract("hexbit-max-extract", cl::Hidden,
- cl::init(std::numeric_limits<unsigned>::max()));
-static unsigned CountExtract = 0;
-static cl::opt<unsigned> MaxBitSplit("hexbit-max-bitsplit", cl::Hidden,
- cl::init(std::numeric_limits<unsigned>::max()));
-static unsigned CountBitSplit = 0;
-
-namespace llvm {
-
- void initializeHexagonBitSimplifyPass(PassRegistry& Registry);
- FunctionPass *createHexagonBitSimplify();
-
-} // end namespace llvm
-
-namespace {
-
- // Set of virtual registers, based on BitVector.
- struct RegisterSet : private BitVector {
- RegisterSet() = default;
- explicit RegisterSet(unsigned s, bool t = false) : BitVector(s, t) {}
- RegisterSet(const RegisterSet &RS) = default;
-
- using BitVector::clear;
- using BitVector::count;
-
- unsigned find_first() const {
- int First = BitVector::find_first();
- if (First < 0)
- return 0;
- return x2v(First);
- }
-
- unsigned find_next(unsigned Prev) const {
- int Next = BitVector::find_next(v2x(Prev));
- if (Next < 0)
- return 0;
- return x2v(Next);
- }
-
- RegisterSet &insert(unsigned R) {
- unsigned Idx = v2x(R);
- ensure(Idx);
- return static_cast<RegisterSet&>(BitVector::set(Idx));
- }
- RegisterSet &remove(unsigned R) {
- unsigned Idx = v2x(R);
- if (Idx >= size())
- return *this;
- return static_cast<RegisterSet&>(BitVector::reset(Idx));
- }
-
- RegisterSet &insert(const RegisterSet &Rs) {
- return static_cast<RegisterSet&>(BitVector::operator|=(Rs));
- }
- RegisterSet &remove(const RegisterSet &Rs) {
- return static_cast<RegisterSet&>(BitVector::reset(Rs));
- }
-
- reference operator[](unsigned R) {
- unsigned Idx = v2x(R);
- ensure(Idx);
- return BitVector::operator[](Idx);
- }
- bool operator[](unsigned R) const {
- unsigned Idx = v2x(R);
- assert(Idx < size());
- return BitVector::operator[](Idx);
- }
- bool has(unsigned R) const {
- unsigned Idx = v2x(R);
- if (Idx >= size())
- return false;
- return BitVector::test(Idx);
- }
-
- bool empty() const {
- return !BitVector::any();
- }
- bool includes(const RegisterSet &Rs) const {
- // A.BitVector::test(B) <=> A-B != {}
- return !Rs.BitVector::test(*this);
- }
- bool intersects(const RegisterSet &Rs) const {
- return BitVector::anyCommon(Rs);
- }
-
- private:
- void ensure(unsigned Idx) {
- if (size() <= Idx)
- resize(std::max(Idx+1, 32U));
- }
-
- static inline unsigned v2x(unsigned v) {
- return TargetRegisterInfo::virtReg2Index(v);
- }
-
- static inline unsigned x2v(unsigned x) {
- return TargetRegisterInfo::index2VirtReg(x);
- }
- };
-
- struct PrintRegSet {
- PrintRegSet(const RegisterSet &S, const TargetRegisterInfo *RI)
- : RS(S), TRI(RI) {}
-
- friend raw_ostream &operator<< (raw_ostream &OS,
- const PrintRegSet &P);
-
- private:
- const RegisterSet &RS;
- const TargetRegisterInfo *TRI;
- };
-
- raw_ostream &operator<< (raw_ostream &OS, const PrintRegSet &P)
- LLVM_ATTRIBUTE_UNUSED;
- raw_ostream &operator<< (raw_ostream &OS, const PrintRegSet &P) {
- OS << '{';
- for (unsigned R = P.RS.find_first(); R; R = P.RS.find_next(R))
- OS << ' ' << printReg(R, P.TRI);
- OS << " }";
- return OS;
- }
-
- class Transformation;
-
- class HexagonBitSimplify : public MachineFunctionPass {
- public:
- static char ID;
-
- HexagonBitSimplify() : MachineFunctionPass(ID) {}
-
- StringRef getPassName() const override {
- return "Hexagon bit simplification";
- }
-
- void getAnalysisUsage(AnalysisUsage &AU) const override {
- AU.addRequired<MachineDominatorTree>();
- AU.addPreserved<MachineDominatorTree>();
- MachineFunctionPass::getAnalysisUsage(AU);
- }
-
- bool runOnMachineFunction(MachineFunction &MF) override;
-
- static void getInstrDefs(const MachineInstr &MI, RegisterSet &Defs);
- static void getInstrUses(const MachineInstr &MI, RegisterSet &Uses);
- static bool isEqual(const BitTracker::RegisterCell &RC1, uint16_t B1,
- const BitTracker::RegisterCell &RC2, uint16_t B2, uint16_t W);
- static bool isZero(const BitTracker::RegisterCell &RC, uint16_t B,
- uint16_t W);
- static bool getConst(const BitTracker::RegisterCell &RC, uint16_t B,
- uint16_t W, uint64_t &U);
- static bool replaceReg(unsigned OldR, unsigned NewR,
- MachineRegisterInfo &MRI);
- static bool getSubregMask(const BitTracker::RegisterRef &RR,
- unsigned &Begin, unsigned &Width, MachineRegisterInfo &MRI);
- static bool replaceRegWithSub(unsigned OldR, unsigned NewR,
- unsigned NewSR, MachineRegisterInfo &MRI);
- static bool replaceSubWithSub(unsigned OldR, unsigned OldSR,
- unsigned NewR, unsigned NewSR, MachineRegisterInfo &MRI);
- static bool parseRegSequence(const MachineInstr &I,
- BitTracker::RegisterRef &SL, BitTracker::RegisterRef &SH,
- const MachineRegisterInfo &MRI);
-
- static bool getUsedBitsInStore(unsigned Opc, BitVector &Bits,
- uint16_t Begin);
- static bool getUsedBits(unsigned Opc, unsigned OpN, BitVector &Bits,
- uint16_t Begin, const HexagonInstrInfo &HII);
-
- static const TargetRegisterClass *getFinalVRegClass(
- const BitTracker::RegisterRef &RR, MachineRegisterInfo &MRI);
- static bool isTransparentCopy(const BitTracker::RegisterRef &RD,
- const BitTracker::RegisterRef &RS, MachineRegisterInfo &MRI);
-
- private:
- MachineDominatorTree *MDT = nullptr;
-
- bool visitBlock(MachineBasicBlock &B, Transformation &T, RegisterSet &AVs);
- static bool hasTiedUse(unsigned Reg, MachineRegisterInfo &MRI,
- unsigned NewSub = Hexagon::NoSubRegister);
- };
-
- using HBS = HexagonBitSimplify;
-
- // The purpose of this class is to provide a common facility to traverse
- // the function top-down or bottom-up via the dominator tree, and keep
- // track of the available registers.
- class Transformation {
- public:
- bool TopDown;
-
- Transformation(bool TD) : TopDown(TD) {}
- virtual ~Transformation() = default;
-
- virtual bool processBlock(MachineBasicBlock &B, const RegisterSet &AVs) = 0;
- };
-
-} // end anonymous namespace
-
-char HexagonBitSimplify::ID = 0;
-
-INITIALIZE_PASS_BEGIN(HexagonBitSimplify, "hexagon-bit-simplify",
- "Hexagon bit simplification", false, false)
-INITIALIZE_PASS_DEPENDENCY(MachineDominatorTree)
-INITIALIZE_PASS_END(HexagonBitSimplify, "hexagon-bit-simplify",
- "Hexagon bit simplification", false, false)
-
-bool HexagonBitSimplify::visitBlock(MachineBasicBlock &B, Transformation &T,
- RegisterSet &AVs) {
- bool Changed = false;
-
- if (T.TopDown)
- Changed = T.processBlock(B, AVs);
-
- RegisterSet Defs;
- for (auto &I : B)
- getInstrDefs(I, Defs);
- RegisterSet NewAVs = AVs;
- NewAVs.insert(Defs);
-
- for (auto *DTN : children<MachineDomTreeNode*>(MDT->getNode(&B)))
- Changed |= visitBlock(*(DTN->getBlock()), T, NewAVs);
-
- if (!T.TopDown)
- Changed |= T.processBlock(B, AVs);
-
- return Changed;
-}
-
-//
-// Utility functions:
-//
-void HexagonBitSimplify::getInstrDefs(const MachineInstr &MI,
- RegisterSet &Defs) {
- for (auto &Op : MI.operands()) {
- if (!Op.isReg() || !Op.isDef())
- continue;
- unsigned R = Op.getReg();
- if (!TargetRegisterInfo::isVirtualRegister(R))
- continue;
- Defs.insert(R);
- }
-}
-
-void HexagonBitSimplify::getInstrUses(const MachineInstr &MI,
- RegisterSet &Uses) {
- for (auto &Op : MI.operands()) {
- if (!Op.isReg() || !Op.isUse())
- continue;
- unsigned R = Op.getReg();
- if (!TargetRegisterInfo::isVirtualRegister(R))
- continue;
- Uses.insert(R);
- }
-}
-
-// Check if all the bits in range [B, E) in both cells are equal.
-bool HexagonBitSimplify::isEqual(const BitTracker::RegisterCell &RC1,
- uint16_t B1, const BitTracker::RegisterCell &RC2, uint16_t B2,
- uint16_t W) {
- for (uint16_t i = 0; i < W; ++i) {
- // If RC1[i] is "bottom", it cannot be proven equal to RC2[i].
- if (RC1[B1+i].Type == BitTracker::BitValue::Ref && RC1[B1+i].RefI.Reg == 0)
- return false;
- // Same for RC2[i].
- if (RC2[B2+i].Type == BitTracker::BitValue::Ref && RC2[B2+i].RefI.Reg == 0)
- return false;
- if (RC1[B1+i] != RC2[B2+i])
- return false;
- }
- return true;
-}
-
-bool HexagonBitSimplify::isZero(const BitTracker::RegisterCell &RC,
- uint16_t B, uint16_t W) {
- assert(B < RC.width() && B+W <= RC.width());
- for (uint16_t i = B; i < B+W; ++i)
- if (!RC[i].is(0))
- return false;
- return true;
-}
-
-bool HexagonBitSimplify::getConst(const BitTracker::RegisterCell &RC,
- uint16_t B, uint16_t W, uint64_t &U) {
- assert(B < RC.width() && B+W <= RC.width());
- int64_t T = 0;
- for (uint16_t i = B+W; i > B; --i) {
- const BitTracker::BitValue &BV = RC[i-1];
- T <<= 1;
- if (BV.is(1))
- T |= 1;
- else if (!BV.is(0))
- return false;
- }
- U = T;
- return true;
-}
-
-bool HexagonBitSimplify::replaceReg(unsigned OldR, unsigned NewR,
- MachineRegisterInfo &MRI) {
- if (!TargetRegisterInfo::isVirtualRegister(OldR) ||
- !TargetRegisterInfo::isVirtualRegister(NewR))
- return false;
- auto Begin = MRI.use_begin(OldR), End = MRI.use_end();
- decltype(End) NextI;
- for (auto I = Begin; I != End; I = NextI) {
- NextI = std::next(I);
- I->setReg(NewR);
- }
- return Begin != End;
-}
-
-bool HexagonBitSimplify::replaceRegWithSub(unsigned OldR, unsigned NewR,
- unsigned NewSR, MachineRegisterInfo &MRI) {
- if (!TargetRegisterInfo::isVirtualRegister(OldR) ||
- !TargetRegisterInfo::isVirtualRegister(NewR))
- return false;
- if (hasTiedUse(OldR, MRI, NewSR))
- return false;
- auto Begin = MRI.use_begin(OldR), End = MRI.use_end();
- decltype(End) NextI;
- for (auto I = Begin; I != End; I = NextI) {
- NextI = std::next(I);
- I->setReg(NewR);
- I->setSubReg(NewSR);
- }
- return Begin != End;
-}
-
-bool HexagonBitSimplify::replaceSubWithSub(unsigned OldR, unsigned OldSR,
- unsigned NewR, unsigned NewSR, MachineRegisterInfo &MRI) {
- if (!TargetRegisterInfo::isVirtualRegister(OldR) ||
- !TargetRegisterInfo::isVirtualRegister(NewR))
- return false;
- if (OldSR != NewSR && hasTiedUse(OldR, MRI, NewSR))
- return false;
- auto Begin = MRI.use_begin(OldR), End = MRI.use_end();
- decltype(End) NextI;
- for (auto I = Begin; I != End; I = NextI) {
- NextI = std::next(I);
- if (I->getSubReg() != OldSR)
- continue;
- I->setReg(NewR);
- I->setSubReg(NewSR);
- }
- return Begin != End;
-}
-
-// For a register ref (pair Reg:Sub), set Begin to the position of the LSB
-// of Sub in Reg, and set Width to the size of Sub in bits. Return true,
-// if this succeeded, otherwise return false.
-bool HexagonBitSimplify::getSubregMask(const BitTracker::RegisterRef &RR,
- unsigned &Begin, unsigned &Width, MachineRegisterInfo &MRI) {
- const TargetRegisterClass *RC = MRI.getRegClass(RR.Reg);
- if (RR.Sub == 0) {
- Begin = 0;
- Width = MRI.getTargetRegisterInfo()->getRegSizeInBits(*RC);
- return true;
- }
-
- Begin = 0;
-
- switch (RC->getID()) {
- case Hexagon::DoubleRegsRegClassID:
- case Hexagon::HvxWRRegClassID:
- Width = MRI.getTargetRegisterInfo()->getRegSizeInBits(*RC) / 2;
- if (RR.Sub == Hexagon::isub_hi || RR.Sub == Hexagon::vsub_hi)
- Begin = Width;
- break;
- default:
- return false;
- }
- return true;
-}
-
-
-// For a REG_SEQUENCE, set SL to the low subregister and SH to the high
-// subregister.
-bool HexagonBitSimplify::parseRegSequence(const MachineInstr &I,
- BitTracker::RegisterRef &SL, BitTracker::RegisterRef &SH,
- const MachineRegisterInfo &MRI) {
- assert(I.getOpcode() == TargetOpcode::REG_SEQUENCE);
- unsigned Sub1 = I.getOperand(2).getImm(), Sub2 = I.getOperand(4).getImm();
- auto &DstRC = *MRI.getRegClass(I.getOperand(0).getReg());
- auto &HRI = static_cast<const HexagonRegisterInfo&>(
- *MRI.getTargetRegisterInfo());
- unsigned SubLo = HRI.getHexagonSubRegIndex(DstRC, Hexagon::ps_sub_lo);
- unsigned SubHi = HRI.getHexagonSubRegIndex(DstRC, Hexagon::ps_sub_hi);
- assert((Sub1 == SubLo && Sub2 == SubHi) || (Sub1 == SubHi && Sub2 == SubLo));
- if (Sub1 == SubLo && Sub2 == SubHi) {
- SL = I.getOperand(1);
- SH = I.getOperand(3);
- return true;
- }
- if (Sub1 == SubHi && Sub2 == SubLo) {
- SH = I.getOperand(1);
- SL = I.getOperand(3);
- return true;
- }
- return false;
-}
-
-// All stores (except 64-bit stores) take a 32-bit register as the source
-// of the value to be stored. If the instruction stores into a location
-// that is shorter than 32 bits, some bits of the source register are not
-// used. For each store instruction, calculate the set of used bits in
-// the source register, and set appropriate bits in Bits. Return true if
-// the bits are calculated, false otherwise.
-bool HexagonBitSimplify::getUsedBitsInStore(unsigned Opc, BitVector &Bits,
- uint16_t Begin) {
- using namespace Hexagon;
-
- switch (Opc) {
- // Store byte
- case S2_storerb_io: // memb(Rs32+#s11:0)=Rt32
- case S2_storerbnew_io: // memb(Rs32+#s11:0)=Nt8.new
- case S2_pstorerbt_io: // if (Pv4) memb(Rs32+#u6:0)=Rt32
- case S2_pstorerbf_io: // if (!Pv4) memb(Rs32+#u6:0)=Rt32
- case S4_pstorerbtnew_io: // if (Pv4.new) memb(Rs32+#u6:0)=Rt32
- case S4_pstorerbfnew_io: // if (!Pv4.new) memb(Rs32+#u6:0)=Rt32
- case S2_pstorerbnewt_io: // if (Pv4) memb(Rs32+#u6:0)=Nt8.new
- case S2_pstorerbnewf_io: // if (!Pv4) memb(Rs32+#u6:0)=Nt8.new
- case S4_pstorerbnewtnew_io: // if (Pv4.new) memb(Rs32+#u6:0)=Nt8.new
- case S4_pstorerbnewfnew_io: // if (!Pv4.new) memb(Rs32+#u6:0)=Nt8.new
- case S2_storerb_pi: // memb(Rx32++#s4:0)=Rt32
- case S2_storerbnew_pi: // memb(Rx32++#s4:0)=Nt8.new
- case S2_pstorerbt_pi: // if (Pv4) memb(Rx32++#s4:0)=Rt32
- case S2_pstorerbf_pi: // if (!Pv4) memb(Rx32++#s4:0)=Rt32
- case S2_pstorerbtnew_pi: // if (Pv4.new) memb(Rx32++#s4:0)=Rt32
- case S2_pstorerbfnew_pi: // if (!Pv4.new) memb(Rx32++#s4:0)=Rt32
- case S2_pstorerbnewt_pi: // if (Pv4) memb(Rx32++#s4:0)=Nt8.new
- case S2_pstorerbnewf_pi: // if (!Pv4) memb(Rx32++#s4:0)=Nt8.new
- case S2_pstorerbnewtnew_pi: // if (Pv4.new) memb(Rx32++#s4:0)=Nt8.new
- case S2_pstorerbnewfnew_pi: // if (!Pv4.new) memb(Rx32++#s4:0)=Nt8.new
- case S4_storerb_ap: // memb(Re32=#U6)=Rt32
- case S4_storerbnew_ap: // memb(Re32=#U6)=Nt8.new
- case S2_storerb_pr: // memb(Rx32++Mu2)=Rt32
- case S2_storerbnew_pr: // memb(Rx32++Mu2)=Nt8.new
- case S4_storerb_ur: // memb(Ru32<<#u2+#U6)=Rt32
- case S4_storerbnew_ur: // memb(Ru32<<#u2+#U6)=Nt8.new
- case S2_storerb_pbr: // memb(Rx32++Mu2:brev)=Rt32
- case S2_storerbnew_pbr: // memb(Rx32++Mu2:brev)=Nt8.new
- case S2_storerb_pci: // memb(Rx32++#s4:0:circ(Mu2))=Rt32
- case S2_storerbnew_pci: // memb(Rx32++#s4:0:circ(Mu2))=Nt8.new
- case S2_storerb_pcr: // memb(Rx32++I:circ(Mu2))=Rt32
- case S2_storerbnew_pcr: // memb(Rx32++I:circ(Mu2))=Nt8.new
- case S4_storerb_rr: // memb(Rs32+Ru32<<#u2)=Rt32
- case S4_storerbnew_rr: // memb(Rs32+Ru32<<#u2)=Nt8.new
- case S4_pstorerbt_rr: // if (Pv4) memb(Rs32+Ru32<<#u2)=Rt32
- case S4_pstorerbf_rr: // if (!Pv4) memb(Rs32+Ru32<<#u2)=Rt32
- case S4_pstorerbtnew_rr: // if (Pv4.new) memb(Rs32+Ru32<<#u2)=Rt32
- case S4_pstorerbfnew_rr: // if (!Pv4.new) memb(Rs32+Ru32<<#u2)=Rt32
- case S4_pstorerbnewt_rr: // if (Pv4) memb(Rs32+Ru32<<#u2)=Nt8.new
- case S4_pstorerbnewf_rr: // if (!Pv4) memb(Rs32+Ru32<<#u2)=Nt8.new
- case S4_pstorerbnewtnew_rr: // if (Pv4.new) memb(Rs32+Ru32<<#u2)=Nt8.new
- case S4_pstorerbnewfnew_rr: // if (!Pv4.new) memb(Rs32+Ru32<<#u2)=Nt8.new
- case S2_storerbgp: // memb(gp+#u16:0)=Rt32
- case S2_storerbnewgp: // memb(gp+#u16:0)=Nt8.new
- case S4_pstorerbt_abs: // if (Pv4) memb(#u6)=Rt32
- case S4_pstorerbf_abs: // if (!Pv4) memb(#u6)=Rt32
- case S4_pstorerbtnew_abs: // if (Pv4.new) memb(#u6)=Rt32
- case S4_pstorerbfnew_abs: // if (!Pv4.new) memb(#u6)=Rt32
- case S4_pstorerbnewt_abs: // if (Pv4) memb(#u6)=Nt8.new
- case S4_pstorerbnewf_abs: // if (!Pv4) memb(#u6)=Nt8.new
- case S4_pstorerbnewtnew_abs: // if (Pv4.new) memb(#u6)=Nt8.new
- case S4_pstorerbnewfnew_abs: // if (!Pv4.new) memb(#u6)=Nt8.new
- Bits.set(Begin, Begin+8);
- return true;
-
- // Store low half
- case S2_storerh_io: // memh(Rs32+#s11:1)=Rt32
- case S2_storerhnew_io: // memh(Rs32+#s11:1)=Nt8.new
- case S2_pstorerht_io: // if (Pv4) memh(Rs32+#u6:1)=Rt32
- case S2_pstorerhf_io: // if (!Pv4) memh(Rs32+#u6:1)=Rt32
- case S4_pstorerhtnew_io: // if (Pv4.new) memh(Rs32+#u6:1)=Rt32
- case S4_pstorerhfnew_io: // if (!Pv4.new) memh(Rs32+#u6:1)=Rt32
- case S2_pstorerhnewt_io: // if (Pv4) memh(Rs32+#u6:1)=Nt8.new
- case S2_pstorerhnewf_io: // if (!Pv4) memh(Rs32+#u6:1)=Nt8.new
- case S4_pstorerhnewtnew_io: // if (Pv4.new) memh(Rs32+#u6:1)=Nt8.new
- case S4_pstorerhnewfnew_io: // if (!Pv4.new) memh(Rs32+#u6:1)=Nt8.new
- case S2_storerh_pi: // memh(Rx32++#s4:1)=Rt32
- case S2_storerhnew_pi: // memh(Rx32++#s4:1)=Nt8.new
- case S2_pstorerht_pi: // if (Pv4) memh(Rx32++#s4:1)=Rt32
- case S2_pstorerhf_pi: // if (!Pv4) memh(Rx32++#s4:1)=Rt32
- case S2_pstorerhtnew_pi: // if (Pv4.new) memh(Rx32++#s4:1)=Rt32
- case S2_pstorerhfnew_pi: // if (!Pv4.new) memh(Rx32++#s4:1)=Rt32
- case S2_pstorerhnewt_pi: // if (Pv4) memh(Rx32++#s4:1)=Nt8.new
- case S2_pstorerhnewf_pi: // if (!Pv4) memh(Rx32++#s4:1)=Nt8.new
- case S2_pstorerhnewtnew_pi: // if (Pv4.new) memh(Rx32++#s4:1)=Nt8.new
- case S2_pstorerhnewfnew_pi: // if (!Pv4.new) memh(Rx32++#s4:1)=Nt8.new
- case S4_storerh_ap: // memh(Re32=#U6)=Rt32
- case S4_storerhnew_ap: // memh(Re32=#U6)=Nt8.new
- case S2_storerh_pr: // memh(Rx32++Mu2)=Rt32
- case S2_storerhnew_pr: // memh(Rx32++Mu2)=Nt8.new
- case S4_storerh_ur: // memh(Ru32<<#u2+#U6)=Rt32
- case S4_storerhnew_ur: // memh(Ru32<<#u2+#U6)=Nt8.new
- case S2_storerh_pbr: // memh(Rx32++Mu2:brev)=Rt32
- case S2_storerhnew_pbr: // memh(Rx32++Mu2:brev)=Nt8.new
- case S2_storerh_pci: // memh(Rx32++#s4:1:circ(Mu2))=Rt32
- case S2_storerhnew_pci: // memh(Rx32++#s4:1:circ(Mu2))=Nt8.new
- case S2_storerh_pcr: // memh(Rx32++I:circ(Mu2))=Rt32
- case S2_storerhnew_pcr: // memh(Rx32++I:circ(Mu2))=Nt8.new
- case S4_storerh_rr: // memh(Rs32+Ru32<<#u2)=Rt32
- case S4_pstorerht_rr: // if (Pv4) memh(Rs32+Ru32<<#u2)=Rt32
- case S4_pstorerhf_rr: // if (!Pv4) memh(Rs32+Ru32<<#u2)=Rt32
- case S4_pstorerhtnew_rr: // if (Pv4.new) memh(Rs32+Ru32<<#u2)=Rt32
- case S4_pstorerhfnew_rr: // if (!Pv4.new) memh(Rs32+Ru32<<#u2)=Rt32
- case S4_storerhnew_rr: // memh(Rs32+Ru32<<#u2)=Nt8.new
- case S4_pstorerhnewt_rr: // if (Pv4) memh(Rs32+Ru32<<#u2)=Nt8.new
- case S4_pstorerhnewf_rr: // if (!Pv4) memh(Rs32+Ru32<<#u2)=Nt8.new
- case S4_pstorerhnewtnew_rr: // if (Pv4.new) memh(Rs32+Ru32<<#u2)=Nt8.new
- case S4_pstorerhnewfnew_rr: // if (!Pv4.new) memh(Rs32+Ru32<<#u2)=Nt8.new
- case S2_storerhgp: // memh(gp+#u16:1)=Rt32
- case S2_storerhnewgp: // memh(gp+#u16:1)=Nt8.new
- case S4_pstorerht_abs: // if (Pv4) memh(#u6)=Rt32
- case S4_pstorerhf_abs: // if (!Pv4) memh(#u6)=Rt32
- case S4_pstorerhtnew_abs: // if (Pv4.new) memh(#u6)=Rt32
- case S4_pstorerhfnew_abs: // if (!Pv4.new) memh(#u6)=Rt32
- case S4_pstorerhnewt_abs: // if (Pv4) memh(#u6)=Nt8.new
- case S4_pstorerhnewf_abs: // if (!Pv4) memh(#u6)=Nt8.new
- case S4_pstorerhnewtnew_abs: // if (Pv4.new) memh(#u6)=Nt8.new
- case S4_pstorerhnewfnew_abs: // if (!Pv4.new) memh(#u6)=Nt8.new
- Bits.set(Begin, Begin+16);
- return true;
-
- // Store high half
- case S2_storerf_io: // memh(Rs32+#s11:1)=Rt.H32
- case S2_pstorerft_io: // if (Pv4) memh(Rs32+#u6:1)=Rt.H32
- case S2_pstorerff_io: // if (!Pv4) memh(Rs32+#u6:1)=Rt.H32
- case S4_pstorerftnew_io: // if (Pv4.new) memh(Rs32+#u6:1)=Rt.H32
- case S4_pstorerffnew_io: // if (!Pv4.new) memh(Rs32+#u6:1)=Rt.H32
- case S2_storerf_pi: // memh(Rx32++#s4:1)=Rt.H32
- case S2_pstorerft_pi: // if (Pv4) memh(Rx32++#s4:1)=Rt.H32
- case S2_pstorerff_pi: // if (!Pv4) memh(Rx32++#s4:1)=Rt.H32
- case S2_pstorerftnew_pi: // if (Pv4.new) memh(Rx32++#s4:1)=Rt.H32
- case S2_pstorerffnew_pi: // if (!Pv4.new) memh(Rx32++#s4:1)=Rt.H32
- case S4_storerf_ap: // memh(Re32=#U6)=Rt.H32
- case S2_storerf_pr: // memh(Rx32++Mu2)=Rt.H32
- case S4_storerf_ur: // memh(Ru32<<#u2+#U6)=Rt.H32
- case S2_storerf_pbr: // memh(Rx32++Mu2:brev)=Rt.H32
- case S2_storerf_pci: // memh(Rx32++#s4:1:circ(Mu2))=Rt.H32
- case S2_storerf_pcr: // memh(Rx32++I:circ(Mu2))=Rt.H32
- case S4_storerf_rr: // memh(Rs32+Ru32<<#u2)=Rt.H32
- case S4_pstorerft_rr: // if (Pv4) memh(Rs32+Ru32<<#u2)=Rt.H32
- case S4_pstorerff_rr: // if (!Pv4) memh(Rs32+Ru32<<#u2)=Rt.H32
- case S4_pstorerftnew_rr: // if (Pv4.new) memh(Rs32+Ru32<<#u2)=Rt.H32
- case S4_pstorerffnew_rr: // if (!Pv4.new) memh(Rs32+Ru32<<#u2)=Rt.H32
- case S2_storerfgp: // memh(gp+#u16:1)=Rt.H32
- case S4_pstorerft_abs: // if (Pv4) memh(#u6)=Rt.H32
- case S4_pstorerff_abs: // if (!Pv4) memh(#u6)=Rt.H32
- case S4_pstorerftnew_abs: // if (Pv4.new) memh(#u6)=Rt.H32
- case S4_pstorerffnew_abs: // if (!Pv4.new) memh(#u6)=Rt.H32
- Bits.set(Begin+16, Begin+32);
- return true;
- }
-
- return false;
-}
-
-// For an instruction with opcode Opc, calculate the set of bits that it
-// uses in a register in operand OpN. This only calculates the set of used
-// bits for cases where it does not depend on any operands (as is the case
-// in shifts, for example). For concrete instructions from a program, the
-// operand may be a subregister of a larger register, while Bits would
-// correspond to the larger register in its entirety. Because of that,
-// the parameter Begin can be used to indicate which bit of Bits should be
-// considered the LSB of the operand.
-bool HexagonBitSimplify::getUsedBits(unsigned Opc, unsigned OpN,
- BitVector &Bits, uint16_t Begin, const HexagonInstrInfo &HII) {
- using namespace Hexagon;
-
- const MCInstrDesc &D = HII.get(Opc);
- if (D.mayStore()) {
- if (OpN == D.getNumOperands()-1)
- return getUsedBitsInStore(Opc, Bits, Begin);
- return false;
- }
-
- switch (Opc) {
- // One register source. Used bits: R1[0-7].
- case A2_sxtb:
- case A2_zxtb:
- case A4_cmpbeqi:
- case A4_cmpbgti:
- case A4_cmpbgtui:
- if (OpN == 1) {
- Bits.set(Begin, Begin+8);
- return true;
- }
- break;
-
- // One register source. Used bits: R1[0-15].
- case A2_aslh:
- case A2_sxth:
- case A2_zxth:
- case A4_cmpheqi:
- case A4_cmphgti:
- case A4_cmphgtui:
- if (OpN == 1) {
- Bits.set(Begin, Begin+16);
- return true;
- }
- break;
-
- // One register source. Used bits: R1[16-31].
- case A2_asrh:
- if (OpN == 1) {
- Bits.set(Begin+16, Begin+32);
- return true;
- }
- break;
-
- // Two register sources. Used bits: R1[0-7], R2[0-7].
- case A4_cmpbeq:
- case A4_cmpbgt:
- case A4_cmpbgtu:
- if (OpN == 1) {
- Bits.set(Begin, Begin+8);
- return true;
- }
- break;
-
- // Two register sources. Used bits: R1[0-15], R2[0-15].
- case A4_cmpheq:
- case A4_cmphgt:
- case A4_cmphgtu:
- case A2_addh_h16_ll:
- case A2_addh_h16_sat_ll:
- case A2_addh_l16_ll:
- case A2_addh_l16_sat_ll:
- case A2_combine_ll:
- case A2_subh_h16_ll:
- case A2_subh_h16_sat_ll:
- case A2_subh_l16_ll:
- case A2_subh_l16_sat_ll:
- case M2_mpy_acc_ll_s0:
- case M2_mpy_acc_ll_s1:
- case M2_mpy_acc_sat_ll_s0:
- case M2_mpy_acc_sat_ll_s1:
- case M2_mpy_ll_s0:
- case M2_mpy_ll_s1:
- case M2_mpy_nac_ll_s0:
- case M2_mpy_nac_ll_s1:
- case M2_mpy_nac_sat_ll_s0:
- case M2_mpy_nac_sat_ll_s1:
- case M2_mpy_rnd_ll_s0:
- case M2_mpy_rnd_ll_s1:
- case M2_mpy_sat_ll_s0:
- case M2_mpy_sat_ll_s1:
- case M2_mpy_sat_rnd_ll_s0:
- case M2_mpy_sat_rnd_ll_s1:
- case M2_mpyd_acc_ll_s0:
- case M2_mpyd_acc_ll_s1:
- case M2_mpyd_ll_s0:
- case M2_mpyd_ll_s1:
- case M2_mpyd_nac_ll_s0:
- case M2_mpyd_nac_ll_s1:
- case M2_mpyd_rnd_ll_s0:
- case M2_mpyd_rnd_ll_s1:
- case M2_mpyu_acc_ll_s0:
- case M2_mpyu_acc_ll_s1:
- case M2_mpyu_ll_s0:
- case M2_mpyu_ll_s1:
- case M2_mpyu_nac_ll_s0:
- case M2_mpyu_nac_ll_s1:
- case M2_mpyud_acc_ll_s0:
- case M2_mpyud_acc_ll_s1:
- case M2_mpyud_ll_s0:
- case M2_mpyud_ll_s1:
- case M2_mpyud_nac_ll_s0:
- case M2_mpyud_nac_ll_s1:
- if (OpN == 1 || OpN == 2) {
- Bits.set(Begin, Begin+16);
- return true;
- }
- break;
-
- // Two register sources. Used bits: R1[0-15], R2[16-31].
- case A2_addh_h16_lh:
- case A2_addh_h16_sat_lh:
- case A2_combine_lh:
- case A2_subh_h16_lh:
- case A2_subh_h16_sat_lh:
- case M2_mpy_acc_lh_s0:
- case M2_mpy_acc_lh_s1:
- case M2_mpy_acc_sat_lh_s0:
- case M2_mpy_acc_sat_lh_s1:
- case M2_mpy_lh_s0:
- case M2_mpy_lh_s1:
- case M2_mpy_nac_lh_s0:
- case M2_mpy_nac_lh_s1:
- case M2_mpy_nac_sat_lh_s0:
- case M2_mpy_nac_sat_lh_s1:
- case M2_mpy_rnd_lh_s0:
- case M2_mpy_rnd_lh_s1:
- case M2_mpy_sat_lh_s0:
- case M2_mpy_sat_lh_s1:
- case M2_mpy_sat_rnd_lh_s0:
- case M2_mpy_sat_rnd_lh_s1:
- case M2_mpyd_acc_lh_s0:
- case M2_mpyd_acc_lh_s1:
- case M2_mpyd_lh_s0:
- case M2_mpyd_lh_s1:
- case M2_mpyd_nac_lh_s0:
- case M2_mpyd_nac_lh_s1:
- case M2_mpyd_rnd_lh_s0:
- case M2_mpyd_rnd_lh_s1:
- case M2_mpyu_acc_lh_s0:
- case M2_mpyu_acc_lh_s1:
- case M2_mpyu_lh_s0:
- case M2_mpyu_lh_s1:
- case M2_mpyu_nac_lh_s0:
- case M2_mpyu_nac_lh_s1:
- case M2_mpyud_acc_lh_s0:
- case M2_mpyud_acc_lh_s1:
- case M2_mpyud_lh_s0:
- case M2_mpyud_lh_s1:
- case M2_mpyud_nac_lh_s0:
- case M2_mpyud_nac_lh_s1:
- // These four are actually LH.
- case A2_addh_l16_hl:
- case A2_addh_l16_sat_hl:
- case A2_subh_l16_hl:
- case A2_subh_l16_sat_hl:
- if (OpN == 1) {
- Bits.set(Begin, Begin+16);
- return true;
- }
- if (OpN == 2) {
- Bits.set(Begin+16, Begin+32);
- return true;
- }
- break;
-
- // Two register sources, used bits: R1[16-31], R2[0-15].
- case A2_addh_h16_hl:
- case A2_addh_h16_sat_hl:
- case A2_combine_hl:
- case A2_subh_h16_hl:
- case A2_subh_h16_sat_hl:
- case M2_mpy_acc_hl_s0:
- case M2_mpy_acc_hl_s1:
- case M2_mpy_acc_sat_hl_s0:
- case M2_mpy_acc_sat_hl_s1:
- case M2_mpy_hl_s0:
- case M2_mpy_hl_s1:
- case M2_mpy_nac_hl_s0:
- case M2_mpy_nac_hl_s1:
- case M2_mpy_nac_sat_hl_s0:
- case M2_mpy_nac_sat_hl_s1:
- case M2_mpy_rnd_hl_s0:
- case M2_mpy_rnd_hl_s1:
- case M2_mpy_sat_hl_s0:
- case M2_mpy_sat_hl_s1:
- case M2_mpy_sat_rnd_hl_s0:
- case M2_mpy_sat_rnd_hl_s1:
- case M2_mpyd_acc_hl_s0:
- case M2_mpyd_acc_hl_s1:
- case M2_mpyd_hl_s0:
- case M2_mpyd_hl_s1:
- case M2_mpyd_nac_hl_s0:
- case M2_mpyd_nac_hl_s1:
- case M2_mpyd_rnd_hl_s0:
- case M2_mpyd_rnd_hl_s1:
- case M2_mpyu_acc_hl_s0:
- case M2_mpyu_acc_hl_s1:
- case M2_mpyu_hl_s0:
- case M2_mpyu_hl_s1:
- case M2_mpyu_nac_hl_s0:
- case M2_mpyu_nac_hl_s1:
- case M2_mpyud_acc_hl_s0:
- case M2_mpyud_acc_hl_s1:
- case M2_mpyud_hl_s0:
- case M2_mpyud_hl_s1:
- case M2_mpyud_nac_hl_s0:
- case M2_mpyud_nac_hl_s1:
- if (OpN == 1) {
- Bits.set(Begin+16, Begin+32);
- return true;
- }
- if (OpN == 2) {
- Bits.set(Begin, Begin+16);
- return true;
- }
- break;
-
- // Two register sources, used bits: R1[16-31], R2[16-31].
- case A2_addh_h16_hh:
- case A2_addh_h16_sat_hh:
- case A2_combine_hh:
- case A2_subh_h16_hh:
- case A2_subh_h16_sat_hh:
- case M2_mpy_acc_hh_s0:
- case M2_mpy_acc_hh_s1:
- case M2_mpy_acc_sat_hh_s0:
- case M2_mpy_acc_sat_hh_s1:
- case M2_mpy_hh_s0:
- case M2_mpy_hh_s1:
- case M2_mpy_nac_hh_s0:
- case M2_mpy_nac_hh_s1:
- case M2_mpy_nac_sat_hh_s0:
- case M2_mpy_nac_sat_hh_s1:
- case M2_mpy_rnd_hh_s0:
- case M2_mpy_rnd_hh_s1:
- case M2_mpy_sat_hh_s0:
- case M2_mpy_sat_hh_s1:
- case M2_mpy_sat_rnd_hh_s0:
- case M2_mpy_sat_rnd_hh_s1:
- case M2_mpyd_acc_hh_s0:
- case M2_mpyd_acc_hh_s1:
- case M2_mpyd_hh_s0:
- case M2_mpyd_hh_s1:
- case M2_mpyd_nac_hh_s0:
- case M2_mpyd_nac_hh_s1:
- case M2_mpyd_rnd_hh_s0:
- case M2_mpyd_rnd_hh_s1:
- case M2_mpyu_acc_hh_s0:
- case M2_mpyu_acc_hh_s1:
- case M2_mpyu_hh_s0:
- case M2_mpyu_hh_s1:
- case M2_mpyu_nac_hh_s0:
- case M2_mpyu_nac_hh_s1:
- case M2_mpyud_acc_hh_s0:
- case M2_mpyud_acc_hh_s1:
- case M2_mpyud_hh_s0:
- case M2_mpyud_hh_s1:
- case M2_mpyud_nac_hh_s0:
- case M2_mpyud_nac_hh_s1:
- if (OpN == 1 || OpN == 2) {
- Bits.set(Begin+16, Begin+32);
- return true;
- }
- break;
- }
-
- return false;
-}
-
-// Calculate the register class that matches Reg:Sub. For example, if
-// %1 is a double register, then %1:isub_hi would match the "int"
-// register class.
-const TargetRegisterClass *HexagonBitSimplify::getFinalVRegClass(
- const BitTracker::RegisterRef &RR, MachineRegisterInfo &MRI) {
- if (!TargetRegisterInfo::isVirtualRegister(RR.Reg))
- return nullptr;
- auto *RC = MRI.getRegClass(RR.Reg);
- if (RR.Sub == 0)
- return RC;
- auto &HRI = static_cast<const HexagonRegisterInfo&>(
- *MRI.getTargetRegisterInfo());
-
- auto VerifySR = [&HRI] (const TargetRegisterClass *RC, unsigned Sub) -> void {
- (void)HRI;
- assert(Sub == HRI.getHexagonSubRegIndex(*RC, Hexagon::ps_sub_lo) ||
- Sub == HRI.getHexagonSubRegIndex(*RC, Hexagon::ps_sub_hi));
- };
-
- switch (RC->getID()) {
- case Hexagon::DoubleRegsRegClassID:
- VerifySR(RC, RR.Sub);
- return &Hexagon::IntRegsRegClass;
- case Hexagon::HvxWRRegClassID:
- VerifySR(RC, RR.Sub);
- return &Hexagon::HvxVRRegClass;
- }
- return nullptr;
-}
-
-// Check if RD could be replaced with RS at any possible use of RD.
-// For example a predicate register cannot be replaced with a integer
-// register, but a 64-bit register with a subregister can be replaced
-// with a 32-bit register.
-bool HexagonBitSimplify::isTransparentCopy(const BitTracker::RegisterRef &RD,
- const BitTracker::RegisterRef &RS, MachineRegisterInfo &MRI) {
- if (!TargetRegisterInfo::isVirtualRegister(RD.Reg) ||
- !TargetRegisterInfo::isVirtualRegister(RS.Reg))
- return false;
- // Return false if one (or both) classes are nullptr.
- auto *DRC = getFinalVRegClass(RD, MRI);
- if (!DRC)
- return false;
-
- return DRC == getFinalVRegClass(RS, MRI);
-}
-
-bool HexagonBitSimplify::hasTiedUse(unsigned Reg, MachineRegisterInfo &MRI,
- unsigned NewSub) {
- if (!PreserveTiedOps)
- return false;
- return llvm::any_of(MRI.use_operands(Reg),
- [NewSub] (const MachineOperand &Op) -> bool {
- return Op.getSubReg() != NewSub && Op.isTied();
- });
-}
-
-namespace {
-
- class DeadCodeElimination {
- public:
- DeadCodeElimination(MachineFunction &mf, MachineDominatorTree &mdt)
- : MF(mf), HII(*MF.getSubtarget<HexagonSubtarget>().getInstrInfo()),
- MDT(mdt), MRI(mf.getRegInfo()) {}
-
- bool run() {
- return runOnNode(MDT.getRootNode());
- }
-
- private:
- bool isDead(unsigned R) const;
- bool runOnNode(MachineDomTreeNode *N);
-
- MachineFunction &MF;
- const HexagonInstrInfo &HII;
- MachineDominatorTree &MDT;
- MachineRegisterInfo &MRI;
- };
-
-} // end anonymous namespace
-
-bool DeadCodeElimination::isDead(unsigned R) const {
- for (auto I = MRI.use_begin(R), E = MRI.use_end(); I != E; ++I) {
- MachineInstr *UseI = I->getParent();
- if (UseI->isDebugValue())
- continue;
- if (UseI->isPHI()) {
- assert(!UseI->getOperand(0).getSubReg());
- unsigned DR = UseI->getOperand(0).getReg();
- if (DR == R)
- continue;
- }
- return false;
- }
- return true;
-}
-
-bool DeadCodeElimination::runOnNode(MachineDomTreeNode *N) {
- bool Changed = false;
-
- for (auto *DTN : children<MachineDomTreeNode*>(N))
- Changed |= runOnNode(DTN);
-
- MachineBasicBlock *B = N->getBlock();
- std::vector<MachineInstr*> Instrs;
- for (auto I = B->rbegin(), E = B->rend(); I != E; ++I)
- Instrs.push_back(&*I);
-
- for (auto MI : Instrs) {
- unsigned Opc = MI->getOpcode();
- // Do not touch lifetime markers. This is why the target-independent DCE
- // cannot be used.
- if (Opc == TargetOpcode::LIFETIME_START ||
- Opc == TargetOpcode::LIFETIME_END)
- continue;
- bool Store = false;
- if (MI->isInlineAsm())
- continue;
- // Delete PHIs if possible.
- if (!MI->isPHI() && !MI->isSafeToMove(nullptr, Store))
- continue;
-
- bool AllDead = true;
- SmallVector<unsigned,2> Regs;
- for (auto &Op : MI->operands()) {
- if (!Op.isReg() || !Op.isDef())
- continue;
- unsigned R = Op.getReg();
- if (!TargetRegisterInfo::isVirtualRegister(R) || !isDead(R)) {
- AllDead = false;
- break;
- }
- Regs.push_back(R);
- }
- if (!AllDead)
- continue;
-
- B->erase(MI);
- for (unsigned i = 0, n = Regs.size(); i != n; ++i)
- MRI.markUsesInDebugValueAsUndef(Regs[i]);
- Changed = true;
- }
-
- return Changed;
-}
-
-namespace {
-
-// Eliminate redundant instructions
-//
-// This transformation will identify instructions where the output register
-// is the same as one of its input registers. This only works on instructions
-// that define a single register (unlike post-increment loads, for example).
-// The equality check is actually more detailed: the code calculates which
-// bits of the output are used, and only compares these bits with the input
-// registers.
-// If the output matches an input, the instruction is replaced with COPY.
-// The copies will be removed by another transformation.
- class RedundantInstrElimination : public Transformation {
- public:
- RedundantInstrElimination(BitTracker &bt, const HexagonInstrInfo &hii,
- const HexagonRegisterInfo &hri, MachineRegisterInfo &mri)
- : Transformation(true), HII(hii), HRI(hri), MRI(mri), BT(bt) {}
-
- bool processBlock(MachineBasicBlock &B, const RegisterSet &AVs) override;
-
- private:
- bool isLossyShiftLeft(const MachineInstr &MI, unsigned OpN,
- unsigned &LostB, unsigned &LostE);
- bool isLossyShiftRight(const MachineInstr &MI, unsigned OpN,
- unsigned &LostB, unsigned &LostE);
- bool computeUsedBits(unsigned Reg, BitVector &Bits);
- bool computeUsedBits(const MachineInstr &MI, unsigned OpN, BitVector &Bits,
- uint16_t Begin);
- bool usedBitsEqual(BitTracker::RegisterRef RD, BitTracker::RegisterRef RS);
-
- const HexagonInstrInfo &HII;
- const HexagonRegisterInfo &HRI;
- MachineRegisterInfo &MRI;
- BitTracker &BT;
- };
-
-} // end anonymous namespace
-
-// Check if the instruction is a lossy shift left, where the input being
-// shifted is the operand OpN of MI. If true, [LostB, LostE) is the range
-// of bit indices that are lost.
-bool RedundantInstrElimination::isLossyShiftLeft(const MachineInstr &MI,
- unsigned OpN, unsigned &LostB, unsigned &LostE) {
- using namespace Hexagon;
-
- unsigned Opc = MI.getOpcode();
- unsigned ImN, RegN, Width;
- switch (Opc) {
- case S2_asl_i_p:
- ImN = 2;
- RegN = 1;
- Width = 64;
- break;
- case S2_asl_i_p_acc:
- case S2_asl_i_p_and:
- case S2_asl_i_p_nac:
- case S2_asl_i_p_or:
- case S2_asl_i_p_xacc:
- ImN = 3;
- RegN = 2;
- Width = 64;
- break;
- case S2_asl_i_r:
- ImN = 2;
- RegN = 1;
- Width = 32;
- break;
- case S2_addasl_rrri:
- case S4_andi_asl_ri:
- case S4_ori_asl_ri:
- case S4_addi_asl_ri:
- case S4_subi_asl_ri:
- case S2_asl_i_r_acc:
- case S2_asl_i_r_and:
- case S2_asl_i_r_nac:
- case S2_asl_i_r_or:
- case S2_asl_i_r_sat:
- case S2_asl_i_r_xacc:
- ImN = 3;
- RegN = 2;
- Width = 32;
- break;
- default:
- return false;
- }
-
- if (RegN != OpN)
- return false;
-
- assert(MI.getOperand(ImN).isImm());
- unsigned S = MI.getOperand(ImN).getImm();
- if (S == 0)
- return false;
- LostB = Width-S;
- LostE = Width;
- return true;
-}
-
-// Check if the instruction is a lossy shift right, where the input being
-// shifted is the operand OpN of MI. If true, [LostB, LostE) is the range
-// of bit indices that are lost.
-bool RedundantInstrElimination::isLossyShiftRight(const MachineInstr &MI,
- unsigned OpN, unsigned &LostB, unsigned &LostE) {
- using namespace Hexagon;
-
- unsigned Opc = MI.getOpcode();
- unsigned ImN, RegN;
- switch (Opc) {
- case S2_asr_i_p:
- case S2_lsr_i_p:
- ImN = 2;
- RegN = 1;
- break;
- case S2_asr_i_p_acc:
- case S2_asr_i_p_and:
- case S2_asr_i_p_nac:
- case S2_asr_i_p_or:
- case S2_lsr_i_p_acc:
- case S2_lsr_i_p_and:
- case S2_lsr_i_p_nac:
- case S2_lsr_i_p_or:
- case S2_lsr_i_p_xacc:
- ImN = 3;
- RegN = 2;
- break;
- case S2_asr_i_r:
- case S2_lsr_i_r:
- ImN = 2;
- RegN = 1;
- break;
- case S4_andi_lsr_ri:
- case S4_ori_lsr_ri:
- case S4_addi_lsr_ri:
- case S4_subi_lsr_ri:
- case S2_asr_i_r_acc:
- case S2_asr_i_r_and:
- case S2_asr_i_r_nac:
- case S2_asr_i_r_or:
- case S2_lsr_i_r_acc:
- case S2_lsr_i_r_and:
- case S2_lsr_i_r_nac:
- case S2_lsr_i_r_or:
- case S2_lsr_i_r_xacc:
- ImN = 3;
- RegN = 2;
- break;
-
- default:
- return false;
- }
-
- if (RegN != OpN)
- return false;
-
- assert(MI.getOperand(ImN).isImm());
- unsigned S = MI.getOperand(ImN).getImm();
- LostB = 0;
- LostE = S;
- return true;
-}
-
-// Calculate the bit vector that corresponds to the used bits of register Reg.
-// The vector Bits has the same size, as the size of Reg in bits. If the cal-
-// culation fails (i.e. the used bits are unknown), it returns false. Other-
-// wise, it returns true and sets the corresponding bits in Bits.
-bool RedundantInstrElimination::computeUsedBits(unsigned Reg, BitVector &Bits) {
- BitVector Used(Bits.size());
- RegisterSet Visited;
- std::vector<unsigned> Pending;
- Pending.push_back(Reg);
-
- for (unsigned i = 0; i < Pending.size(); ++i) {
- unsigned R = Pending[i];
- if (Visited.has(R))
- continue;
- Visited.insert(R);
- for (auto I = MRI.use_begin(R), E = MRI.use_end(); I != E; ++I) {
- BitTracker::RegisterRef UR = *I;
- unsigned B, W;
- if (!HBS::getSubregMask(UR, B, W, MRI))
- return false;
- MachineInstr &UseI = *I->getParent();
- if (UseI.isPHI() || UseI.isCopy()) {
- unsigned DefR = UseI.getOperand(0).getReg();
- if (!TargetRegisterInfo::isVirtualRegister(DefR))
- return false;
- Pending.push_back(DefR);
- } else {
- if (!computeUsedBits(UseI, I.getOperandNo(), Used, B))
- return false;
- }
- }
- }
- Bits |= Used;
- return true;
-}
-
-// Calculate the bits used by instruction MI in a register in operand OpN.
-// Return true/false if the calculation succeeds/fails. If is succeeds, set
-// used bits in Bits. This function does not reset any bits in Bits, so
-// subsequent calls over different instructions will result in the union
-// of the used bits in all these instructions.
-// The register in question may be used with a sub-register, whereas Bits
-// holds the bits for the entire register. To keep track of that, the
-// argument Begin indicates where in Bits is the lowest-significant bit
-// of the register used in operand OpN. For example, in instruction:
-// %1 = S2_lsr_i_r %2:isub_hi, 10
-// the operand 1 is a 32-bit register, which happens to be a subregister
-// of the 64-bit register %2, and that subregister starts at position 32.
-// In this case Begin=32, since Bits[32] would be the lowest-significant bit
-// of %2:isub_hi.
-bool RedundantInstrElimination::computeUsedBits(const MachineInstr &MI,
- unsigned OpN, BitVector &Bits, uint16_t Begin) {
- unsigned Opc = MI.getOpcode();
- BitVector T(Bits.size());
- bool GotBits = HBS::getUsedBits(Opc, OpN, T, Begin, HII);
- // Even if we don't have bits yet, we could still provide some information
- // if the instruction is a lossy shift: the lost bits will be marked as
- // not used.
- unsigned LB, LE;
- if (isLossyShiftLeft(MI, OpN, LB, LE) || isLossyShiftRight(MI, OpN, LB, LE)) {
- assert(MI.getOperand(OpN).isReg());
- BitTracker::RegisterRef RR = MI.getOperand(OpN);
- const TargetRegisterClass *RC = HBS::getFinalVRegClass(RR, MRI);
- uint16_t Width = HRI.getRegSizeInBits(*RC);
-
- if (!GotBits)
- T.set(Begin, Begin+Width);
- assert(LB <= LE && LB < Width && LE <= Width);
- T.reset(Begin+LB, Begin+LE);
- GotBits = true;
- }
- if (GotBits)
- Bits |= T;
- return GotBits;
-}
-
-// Calculates the used bits in RD ("defined register"), and checks if these
-// bits in RS ("used register") and RD are identical.
-bool RedundantInstrElimination::usedBitsEqual(BitTracker::RegisterRef RD,
- BitTracker::RegisterRef RS) {
- const BitTracker::RegisterCell &DC = BT.lookup(RD.Reg);
- const BitTracker::RegisterCell &SC = BT.lookup(RS.Reg);
-
- unsigned DB, DW;
- if (!HBS::getSubregMask(RD, DB, DW, MRI))
- return false;
- unsigned SB, SW;
- if (!HBS::getSubregMask(RS, SB, SW, MRI))
- return false;
- if (SW != DW)
- return false;
-
- BitVector Used(DC.width());
- if (!computeUsedBits(RD.Reg, Used))
- return false;
-
- for (unsigned i = 0; i != DW; ++i)
- if (Used[i+DB] && DC[DB+i] != SC[SB+i])
- return false;
- return true;
-}
-
-bool RedundantInstrElimination::processBlock(MachineBasicBlock &B,
- const RegisterSet&) {
- if (!BT.reached(&B))
- return false;
- bool Changed = false;
-
- for (auto I = B.begin(), E = B.end(), NextI = I; I != E; ++I) {
- NextI = std::next(I);
- MachineInstr *MI = &*I;
-
- if (MI->getOpcode() == TargetOpcode::COPY)
- continue;
- if (MI->isPHI() || MI->hasUnmodeledSideEffects() || MI->isInlineAsm())
- continue;
- unsigned NumD = MI->getDesc().getNumDefs();
- if (NumD != 1)
- continue;
-
- BitTracker::RegisterRef RD = MI->getOperand(0);
- if (!BT.has(RD.Reg))
- continue;
- const BitTracker::RegisterCell &DC = BT.lookup(RD.Reg);
- auto At = MachineBasicBlock::iterator(MI);
-
- // Find a source operand that is equal to the result.
- for (auto &Op : MI->uses()) {
- if (!Op.isReg())
- continue;
- BitTracker::RegisterRef RS = Op;
- if (!BT.has(RS.Reg))
- continue;
- if (!HBS::isTransparentCopy(RD, RS, MRI))
- continue;
-
- unsigned BN, BW;
- if (!HBS::getSubregMask(RS, BN, BW, MRI))
- continue;
-
- const BitTracker::RegisterCell &SC = BT.lookup(RS.Reg);
- if (!usedBitsEqual(RD, RS) && !HBS::isEqual(DC, 0, SC, BN, BW))
- continue;
-
- // If found, replace the instruction with a COPY.
- const DebugLoc &DL = MI->getDebugLoc();
- const TargetRegisterClass *FRC = HBS::getFinalVRegClass(RD, MRI);
- unsigned NewR = MRI.createVirtualRegister(FRC);
- MachineInstr *CopyI =
- BuildMI(B, At, DL, HII.get(TargetOpcode::COPY), NewR)
- .addReg(RS.Reg, 0, RS.Sub);
- HBS::replaceSubWithSub(RD.Reg, RD.Sub, NewR, 0, MRI);
- // This pass can create copies between registers that don't have the
- // exact same values. Updating the tracker has to involve updating
- // all dependent cells. Example:
- // %1 = inst %2 ; %1 != %2, but used bits are equal
- //
- // %3 = copy %2 ; <- inserted
- // ... = %3 ; <- replaced from %2
- // Indirectly, we can create a "copy" between %1 and %2 even
- // though their exact values do not match.
- BT.visit(*CopyI);
- Changed = true;
- break;
- }
- }
-
- return Changed;
-}
-
-namespace {
-
-// Recognize instructions that produce constant values known at compile-time.
-// Replace them with register definitions that load these constants directly.
- class ConstGeneration : public Transformation {
- public:
- ConstGeneration(BitTracker &bt, const HexagonInstrInfo &hii,
- MachineRegisterInfo &mri)
- : Transformation(true), HII(hii), MRI(mri), BT(bt) {}
-
- bool processBlock(MachineBasicBlock &B, const RegisterSet &AVs) override;
- static bool isTfrConst(const MachineInstr &MI);
-
- private:
- unsigned genTfrConst(const TargetRegisterClass *RC, int64_t C,
- MachineBasicBlock &B, MachineBasicBlock::iterator At, DebugLoc &DL);
-
- const HexagonInstrInfo &HII;
- MachineRegisterInfo &MRI;
- BitTracker &BT;
- };
-
-} // end anonymous namespace
-
-bool ConstGeneration::isTfrConst(const MachineInstr &MI) {
- unsigned Opc = MI.getOpcode();
- switch (Opc) {
- case Hexagon::A2_combineii:
- case Hexagon::A4_combineii:
- case Hexagon::A2_tfrsi:
- case Hexagon::A2_tfrpi:
- case Hexagon::PS_true:
- case Hexagon::PS_false:
- case Hexagon::CONST32:
- case Hexagon::CONST64:
- return true;
- }
- return false;
-}
-
-// Generate a transfer-immediate instruction that is appropriate for the
-// register class and the actual value being transferred.
-unsigned ConstGeneration::genTfrConst(const TargetRegisterClass *RC, int64_t C,
- MachineBasicBlock &B, MachineBasicBlock::iterator At, DebugLoc &DL) {
- unsigned Reg = MRI.createVirtualRegister(RC);
- if (RC == &Hexagon::IntRegsRegClass) {
- BuildMI(B, At, DL, HII.get(Hexagon::A2_tfrsi), Reg)
- .addImm(int32_t(C));
- return Reg;
- }
-
- if (RC == &Hexagon::DoubleRegsRegClass) {
- if (isInt<8>(C)) {
- BuildMI(B, At, DL, HII.get(Hexagon::A2_tfrpi), Reg)
- .addImm(C);
- return Reg;
- }
-
- unsigned Lo = Lo_32(C), Hi = Hi_32(C);
- if (isInt<8>(Lo) || isInt<8>(Hi)) {
- unsigned Opc = isInt<8>(Lo) ? Hexagon::A2_combineii
- : Hexagon::A4_combineii;
- BuildMI(B, At, DL, HII.get(Opc), Reg)
- .addImm(int32_t(Hi))
- .addImm(int32_t(Lo));
- return Reg;
- }
-
- BuildMI(B, At, DL, HII.get(Hexagon::CONST64), Reg)
- .addImm(C);
- return Reg;
- }
-
- if (RC == &Hexagon::PredRegsRegClass) {
- unsigned Opc;
- if (C == 0)
- Opc = Hexagon::PS_false;
- else if ((C & 0xFF) == 0xFF)
- Opc = Hexagon::PS_true;
- else
- return 0;
- BuildMI(B, At, DL, HII.get(Opc), Reg);
- return Reg;
- }
-
- return 0;
-}
-
-bool ConstGeneration::processBlock(MachineBasicBlock &B, const RegisterSet&) {
- if (!BT.reached(&B))
- return false;
- bool Changed = false;
- RegisterSet Defs;
-
- for (auto I = B.begin(), E = B.end(); I != E; ++I) {
- if (isTfrConst(*I))
- continue;
- Defs.clear();
- HBS::getInstrDefs(*I, Defs);
- if (Defs.count() != 1)
- continue;
- unsigned DR = Defs.find_first();
- if (!TargetRegisterInfo::isVirtualRegister(DR))
- continue;
- uint64_t U;
- const BitTracker::RegisterCell &DRC = BT.lookup(DR);
- if (HBS::getConst(DRC, 0, DRC.width(), U)) {
- int64_t C = U;
- DebugLoc DL = I->getDebugLoc();
- auto At = I->isPHI() ? B.getFirstNonPHI() : I;
- unsigned ImmReg = genTfrConst(MRI.getRegClass(DR), C, B, At, DL);
- if (ImmReg) {
- HBS::replaceReg(DR, ImmReg, MRI);
- BT.put(ImmReg, DRC);
- Changed = true;
- }
- }
- }
- return Changed;
-}
-
-namespace {
-
-// Identify pairs of available registers which hold identical values.
-// In such cases, only one of them needs to be calculated, the other one
-// will be defined as a copy of the first.
- class CopyGeneration : public Transformation {
- public:
- CopyGeneration(BitTracker &bt, const HexagonInstrInfo &hii,
- const HexagonRegisterInfo &hri, MachineRegisterInfo &mri)
- : Transformation(true), HII(hii), HRI(hri), MRI(mri), BT(bt) {}
-
- bool processBlock(MachineBasicBlock &B, const RegisterSet &AVs) override;
-
- private:
- bool findMatch(const BitTracker::RegisterRef &Inp,
- BitTracker::RegisterRef &Out, const RegisterSet &AVs);
-
- const HexagonInstrInfo &HII;
- const HexagonRegisterInfo &HRI;
- MachineRegisterInfo &MRI;
- BitTracker &BT;
- RegisterSet Forbidden;
- };
-
-// Eliminate register copies RD = RS, by replacing the uses of RD with
-// with uses of RS.
- class CopyPropagation : public Transformation {
- public:
- CopyPropagation(const HexagonRegisterInfo &hri, MachineRegisterInfo &mri)
- : Transformation(false), HRI(hri), MRI(mri) {}
-
- bool processBlock(MachineBasicBlock &B, const RegisterSet &AVs) override;
-
- static bool isCopyReg(unsigned Opc, bool NoConv);
-
- private:
- bool propagateRegCopy(MachineInstr &MI);
-
- const HexagonRegisterInfo &HRI;
- MachineRegisterInfo &MRI;
- };
-
-} // end anonymous namespace
-
-/// Check if there is a register in AVs that is identical to Inp. If so,
-/// set Out to the found register. The output may be a pair Reg:Sub.
-bool CopyGeneration::findMatch(const BitTracker::RegisterRef &Inp,
- BitTracker::RegisterRef &Out, const RegisterSet &AVs) {
- if (!BT.has(Inp.Reg))
- return false;
- const BitTracker::RegisterCell &InpRC = BT.lookup(Inp.Reg);
- auto *FRC = HBS::getFinalVRegClass(Inp, MRI);
- unsigned B, W;
- if (!HBS::getSubregMask(Inp, B, W, MRI))
- return false;
-
- for (unsigned R = AVs.find_first(); R; R = AVs.find_next(R)) {
- if (!BT.has(R) || Forbidden[R])
- continue;
- const BitTracker::RegisterCell &RC = BT.lookup(R);
- unsigned RW = RC.width();
- if (W == RW) {
- if (FRC != MRI.getRegClass(R))
- continue;
- if (!HBS::isTransparentCopy(R, Inp, MRI))
- continue;
- if (!HBS::isEqual(InpRC, B, RC, 0, W))
- continue;
- Out.Reg = R;
- Out.Sub = 0;
- return true;
- }
- // Check if there is a super-register, whose part (with a subregister)
- // is equal to the input.
- // Only do double registers for now.
- if (W*2 != RW)
- continue;
- if (MRI.getRegClass(R) != &Hexagon::DoubleRegsRegClass)
- continue;
-
- if (HBS::isEqual(InpRC, B, RC, 0, W))
- Out.Sub = Hexagon::isub_lo;
- else if (HBS::isEqual(InpRC, B, RC, W, W))
- Out.Sub = Hexagon::isub_hi;
- else
- continue;
- Out.Reg = R;
- if (HBS::isTransparentCopy(Out, Inp, MRI))
- return true;
- }
- return false;
-}
-
-bool CopyGeneration::processBlock(MachineBasicBlock &B,
- const RegisterSet &AVs) {
- if (!BT.reached(&B))
- return false;
- RegisterSet AVB(AVs);
- bool Changed = false;
- RegisterSet Defs;
-
- for (auto I = B.begin(), E = B.end(), NextI = I; I != E;
- ++I, AVB.insert(Defs)) {
- NextI = std::next(I);
- Defs.clear();
- HBS::getInstrDefs(*I, Defs);
-
- unsigned Opc = I->getOpcode();
- if (CopyPropagation::isCopyReg(Opc, false) ||
- ConstGeneration::isTfrConst(*I))
- continue;
-
- DebugLoc DL = I->getDebugLoc();
- auto At = I->isPHI() ? B.getFirstNonPHI() : I;
-
- for (unsigned R = Defs.find_first(); R; R = Defs.find_next(R)) {
- BitTracker::RegisterRef MR;
- auto *FRC = HBS::getFinalVRegClass(R, MRI);
-
- if (findMatch(R, MR, AVB)) {
- unsigned NewR = MRI.createVirtualRegister(FRC);
- BuildMI(B, At, DL, HII.get(TargetOpcode::COPY), NewR)
- .addReg(MR.Reg, 0, MR.Sub);
- BT.put(BitTracker::RegisterRef(NewR), BT.get(MR));
- HBS::replaceReg(R, NewR, MRI);
- Forbidden.insert(R);
- continue;
- }
-
- if (FRC == &Hexagon::DoubleRegsRegClass ||
- FRC == &Hexagon::HvxWRRegClass) {
- // Try to generate REG_SEQUENCE.
- unsigned SubLo = HRI.getHexagonSubRegIndex(*FRC, Hexagon::ps_sub_lo);
- unsigned SubHi = HRI.getHexagonSubRegIndex(*FRC, Hexagon::ps_sub_hi);
- BitTracker::RegisterRef TL = { R, SubLo };
- BitTracker::RegisterRef TH = { R, SubHi };
- BitTracker::RegisterRef ML, MH;
- if (findMatch(TL, ML, AVB) && findMatch(TH, MH, AVB)) {
- auto *FRC = HBS::getFinalVRegClass(R, MRI);
- unsigned NewR = MRI.createVirtualRegister(FRC);
- BuildMI(B, At, DL, HII.get(TargetOpcode::REG_SEQUENCE), NewR)
- .addReg(ML.Reg, 0, ML.Sub)
- .addImm(SubLo)
- .addReg(MH.Reg, 0, MH.Sub)
- .addImm(SubHi);
- BT.put(BitTracker::RegisterRef(NewR), BT.get(R));
- HBS::replaceReg(R, NewR, MRI);
- Forbidden.insert(R);
- }
- }
- }
- }
-
- return Changed;
-}
-
-bool CopyPropagation::isCopyReg(unsigned Opc, bool NoConv) {
- switch (Opc) {
- case TargetOpcode::COPY:
- case TargetOpcode::REG_SEQUENCE:
- case Hexagon::A4_combineir:
- case Hexagon::A4_combineri:
- return true;
- case Hexagon::A2_tfr:
- case Hexagon::A2_tfrp:
- case Hexagon::A2_combinew:
- case Hexagon::V6_vcombine:
- return NoConv;
- default:
- break;
- }
- return false;
-}
-
-bool CopyPropagation::propagateRegCopy(MachineInstr &MI) {
- bool Changed = false;
- unsigned Opc = MI.getOpcode();
- BitTracker::RegisterRef RD = MI.getOperand(0);
- assert(MI.getOperand(0).getSubReg() == 0);
-
- switch (Opc) {
- case TargetOpcode::COPY:
- case Hexagon::A2_tfr:
- case Hexagon::A2_tfrp: {
- BitTracker::RegisterRef RS = MI.getOperand(1);
- if (!HBS::isTransparentCopy(RD, RS, MRI))
- break;
- if (RS.Sub != 0)
- Changed = HBS::replaceRegWithSub(RD.Reg, RS.Reg, RS.Sub, MRI);
- else
- Changed = HBS::replaceReg(RD.Reg, RS.Reg, MRI);
- break;
- }
- case TargetOpcode::REG_SEQUENCE: {
- BitTracker::RegisterRef SL, SH;
- if (HBS::parseRegSequence(MI, SL, SH, MRI)) {
- const TargetRegisterClass &RC = *MRI.getRegClass(RD.Reg);
- unsigned SubLo = HRI.getHexagonSubRegIndex(RC, Hexagon::ps_sub_lo);
- unsigned SubHi = HRI.getHexagonSubRegIndex(RC, Hexagon::ps_sub_hi);
- Changed = HBS::replaceSubWithSub(RD.Reg, SubLo, SL.Reg, SL.Sub, MRI);
- Changed |= HBS::replaceSubWithSub(RD.Reg, SubHi, SH.Reg, SH.Sub, MRI);
- }
- break;
- }
- case Hexagon::A2_combinew:
- case Hexagon::V6_vcombine: {
- const TargetRegisterClass &RC = *MRI.getRegClass(RD.Reg);
- unsigned SubLo = HRI.getHexagonSubRegIndex(RC, Hexagon::ps_sub_lo);
- unsigned SubHi = HRI.getHexagonSubRegIndex(RC, Hexagon::ps_sub_hi);
- BitTracker::RegisterRef RH = MI.getOperand(1), RL = MI.getOperand(2);
- Changed = HBS::replaceSubWithSub(RD.Reg, SubLo, RL.Reg, RL.Sub, MRI);
- Changed |= HBS::replaceSubWithSub(RD.Reg, SubHi, RH.Reg, RH.Sub, MRI);
- break;
- }
- case Hexagon::A4_combineir:
- case Hexagon::A4_combineri: {
- unsigned SrcX = (Opc == Hexagon::A4_combineir) ? 2 : 1;
- unsigned Sub = (Opc == Hexagon::A4_combineir) ? Hexagon::isub_lo
- : Hexagon::isub_hi;
- BitTracker::RegisterRef RS = MI.getOperand(SrcX);
- Changed = HBS::replaceSubWithSub(RD.Reg, Sub, RS.Reg, RS.Sub, MRI);
- break;
- }
- }
- return Changed;
-}
-
-bool CopyPropagation::processBlock(MachineBasicBlock &B, const RegisterSet&) {
- std::vector<MachineInstr*> Instrs;
- for (auto I = B.rbegin(), E = B.rend(); I != E; ++I)
- Instrs.push_back(&*I);
-
- bool Changed = false;
- for (auto I : Instrs) {
- unsigned Opc = I->getOpcode();
- if (!CopyPropagation::isCopyReg(Opc, true))
- continue;
- Changed |= propagateRegCopy(*I);
- }
-
- return Changed;
-}
-
-namespace {
-
-// Recognize patterns that can be simplified and replace them with the
-// simpler forms.
-// This is by no means complete
- class BitSimplification : public Transformation {
- public:
- BitSimplification(BitTracker &bt, const MachineDominatorTree &mdt,
- const HexagonInstrInfo &hii, const HexagonRegisterInfo &hri,
- MachineRegisterInfo &mri, MachineFunction &mf)
- : Transformation(true), MDT(mdt), HII(hii), HRI(hri), MRI(mri),
- MF(mf), BT(bt) {}
-
- bool processBlock(MachineBasicBlock &B, const RegisterSet &AVs) override;
-
- private:
- struct RegHalf : public BitTracker::RegisterRef {
- bool Low; // Low/High halfword.
- };
-
- bool matchHalf(unsigned SelfR, const BitTracker::RegisterCell &RC,
- unsigned B, RegHalf &RH);
- bool validateReg(BitTracker::RegisterRef R, unsigned Opc, unsigned OpNum);
-
- bool matchPackhl(unsigned SelfR, const BitTracker::RegisterCell &RC,
- BitTracker::RegisterRef &Rs, BitTracker::RegisterRef &Rt);
- unsigned getCombineOpcode(bool HLow, bool LLow);
-
- bool genStoreUpperHalf(MachineInstr *MI);
- bool genStoreImmediate(MachineInstr *MI);
- bool genPackhl(MachineInstr *MI, BitTracker::RegisterRef RD,
- const BitTracker::RegisterCell &RC);
- bool genExtractHalf(MachineInstr *MI, BitTracker::RegisterRef RD,
- const BitTracker::RegisterCell &RC);
- bool genCombineHalf(MachineInstr *MI, BitTracker::RegisterRef RD,
- const BitTracker::RegisterCell &RC);
- bool genExtractLow(MachineInstr *MI, BitTracker::RegisterRef RD,
- const BitTracker::RegisterCell &RC);
- bool genBitSplit(MachineInstr *MI, BitTracker::RegisterRef RD,
- const BitTracker::RegisterCell &RC, const RegisterSet &AVs);
- bool simplifyTstbit(MachineInstr *MI, BitTracker::RegisterRef RD,
- const BitTracker::RegisterCell &RC);
- bool simplifyExtractLow(MachineInstr *MI, BitTracker::RegisterRef RD,
- const BitTracker::RegisterCell &RC, const RegisterSet &AVs);
- bool simplifyRCmp0(MachineInstr *MI, BitTracker::RegisterRef RD);
-
- // Cache of created instructions to avoid creating duplicates.
- // XXX Currently only used by genBitSplit.
- std::vector<MachineInstr*> NewMIs;
-
- const MachineDominatorTree &MDT;
- const HexagonInstrInfo &HII;
- const HexagonRegisterInfo &HRI;
- MachineRegisterInfo &MRI;
- MachineFunction &MF;
- BitTracker &BT;
- };
-
-} // end anonymous namespace
-
-// Check if the bits [B..B+16) in register cell RC form a valid halfword,
-// i.e. [0..16), [16..32), etc. of some register. If so, return true and
-// set the information about the found register in RH.
-bool BitSimplification::matchHalf(unsigned SelfR,
- const BitTracker::RegisterCell &RC, unsigned B, RegHalf &RH) {
- // XXX This could be searching in the set of available registers, in case
- // the match is not exact.
-
- // Match 16-bit chunks, where the RC[B..B+15] references exactly one
- // register and all the bits B..B+15 match between RC and the register.
- // This is meant to match "v1[0-15]", where v1 = { [0]:0 [1-15]:v1... },
- // and RC = { [0]:0 [1-15]:v1[1-15]... }.
- bool Low = false;
- unsigned I = B;
- while (I < B+16 && RC[I].num())
- I++;
- if (I == B+16)
- return false;
-
- unsigned Reg = RC[I].RefI.Reg;
- unsigned P = RC[I].RefI.Pos; // The RefI.Pos will be advanced by I-B.
- if (P < I-B)
- return false;
- unsigned Pos = P - (I-B);
-
- if (Reg == 0 || Reg == SelfR) // Don't match "self".
- return false;
- if (!TargetRegisterInfo::isVirtualRegister(Reg))
- return false;
- if (!BT.has(Reg))
- return false;
-
- const BitTracker::RegisterCell &SC = BT.lookup(Reg);
- if (Pos+16 > SC.width())
- return false;
-
- for (unsigned i = 0; i < 16; ++i) {
- const BitTracker::BitValue &RV = RC[i+B];
- if (RV.Type == BitTracker::BitValue::Ref) {
- if (RV.RefI.Reg != Reg)
- return false;
- if (RV.RefI.Pos != i+Pos)
- return false;
- continue;
- }
- if (RC[i+B] != SC[i+Pos])
- return false;
- }
-
- unsigned Sub = 0;
- switch (Pos) {
- case 0:
- Sub = Hexagon::isub_lo;
- Low = true;
- break;
- case 16:
- Sub = Hexagon::isub_lo;
- Low = false;
- break;
- case 32:
- Sub = Hexagon::isub_hi;
- Low = true;
- break;
- case 48:
- Sub = Hexagon::isub_hi;
- Low = false;
- break;
- default:
- return false;
- }
-
- RH.Reg = Reg;
- RH.Sub = Sub;
- RH.Low = Low;
- // If the subregister is not valid with the register, set it to 0.
- if (!HBS::getFinalVRegClass(RH, MRI))
- RH.Sub = 0;
-
- return true;
-}
-
-bool BitSimplification::validateReg(BitTracker::RegisterRef R, unsigned Opc,
- unsigned OpNum) {
- auto *OpRC = HII.getRegClass(HII.get(Opc), OpNum, &HRI, MF);
- auto *RRC = HBS::getFinalVRegClass(R, MRI);
- return OpRC->hasSubClassEq(RRC);
-}
-
-// Check if RC matches the pattern of a S2_packhl. If so, return true and
-// set the inputs Rs and Rt.
-bool BitSimplification::matchPackhl(unsigned SelfR,
- const BitTracker::RegisterCell &RC, BitTracker::RegisterRef &Rs,
- BitTracker::RegisterRef &Rt) {
- RegHalf L1, H1, L2, H2;
-
- if (!matchHalf(SelfR, RC, 0, L2) || !matchHalf(SelfR, RC, 16, L1))
- return false;
- if (!matchHalf(SelfR, RC, 32, H2) || !matchHalf(SelfR, RC, 48, H1))
- return false;
-
- // Rs = H1.L1, Rt = H2.L2
- if (H1.Reg != L1.Reg || H1.Sub != L1.Sub || H1.Low || !L1.Low)
- return false;
- if (H2.Reg != L2.Reg || H2.Sub != L2.Sub || H2.Low || !L2.Low)
- return false;
-
- Rs = H1;
- Rt = H2;
- return true;
-}
-
-unsigned BitSimplification::getCombineOpcode(bool HLow, bool LLow) {
- return HLow ? LLow ? Hexagon::A2_combine_ll
- : Hexagon::A2_combine_lh
- : LLow ? Hexagon::A2_combine_hl
- : Hexagon::A2_combine_hh;
-}
-
-// If MI stores the upper halfword of a register (potentially obtained via
-// shifts or extracts), replace it with a storerf instruction. This could
-// cause the "extraction" code to become dead.
-bool BitSimplification::genStoreUpperHalf(MachineInstr *MI) {
- unsigned Opc = MI->getOpcode();
- if (Opc != Hexagon::S2_storerh_io)
- return false;
-
- MachineOperand &ValOp = MI->getOperand(2);
- BitTracker::RegisterRef RS = ValOp;
- if (!BT.has(RS.Reg))
- return false;
- const BitTracker::RegisterCell &RC = BT.lookup(RS.Reg);
- RegHalf H;
- if (!matchHalf(0, RC, 0, H))
- return false;
- if (H.Low)
- return false;
- MI->setDesc(HII.get(Hexagon::S2_storerf_io));
- ValOp.setReg(H.Reg);
- ValOp.setSubReg(H.Sub);
- return true;
-}
-
-// If MI stores a value known at compile-time, and the value is within a range
-// that avoids using constant-extenders, replace it with a store-immediate.
-bool BitSimplification::genStoreImmediate(MachineInstr *MI) {
- unsigned Opc = MI->getOpcode();
- unsigned Align = 0;
- switch (Opc) {
- case Hexagon::S2_storeri_io:
- Align++;
- LLVM_FALLTHROUGH;
- case Hexagon::S2_storerh_io:
- Align++;
- LLVM_FALLTHROUGH;
- case Hexagon::S2_storerb_io:
- break;
- default:
- return false;
- }
-
- // Avoid stores to frame-indices (due to an unknown offset).
- if (!MI->getOperand(0).isReg())
- return false;
- MachineOperand &OffOp = MI->getOperand(1);
- if (!OffOp.isImm())
- return false;
-
- int64_t Off = OffOp.getImm();
- // Offset is u6:a. Sadly, there is no isShiftedUInt(n,x).
- if (!isUIntN(6+Align, Off) || (Off & ((1<<Align)-1)))
- return false;
- // Source register:
- BitTracker::RegisterRef RS = MI->getOperand(2);
- if (!BT.has(RS.Reg))
- return false;
- const BitTracker::RegisterCell &RC = BT.lookup(RS.Reg);
- uint64_t U;
- if (!HBS::getConst(RC, 0, RC.width(), U))
- return false;
-
- // Only consider 8-bit values to avoid constant-extenders.
- int V;
- switch (Opc) {
- case Hexagon::S2_storerb_io:
- V = int8_t(U);
- break;
- case Hexagon::S2_storerh_io:
- V = int16_t(U);
- break;
- case Hexagon::S2_storeri_io:
- V = int32_t(U);
- break;
- default:
- // Opc is already checked above to be one of the three store instructions.
- // This silences a -Wuninitialized false positive on GCC 5.4.
- llvm_unreachable("Unexpected store opcode");
- }
- if (!isInt<8>(V))
- return false;
-
- MI->RemoveOperand(2);
- switch (Opc) {
- case Hexagon::S2_storerb_io:
- MI->setDesc(HII.get(Hexagon::S4_storeirb_io));
- break;
- case Hexagon::S2_storerh_io:
- MI->setDesc(HII.get(Hexagon::S4_storeirh_io));
- break;
- case Hexagon::S2_storeri_io:
- MI->setDesc(HII.get(Hexagon::S4_storeiri_io));
- break;
- }
- MI->addOperand(MachineOperand::CreateImm(V));
- return true;
-}
-
-// If MI is equivalent o S2_packhl, generate the S2_packhl. MI could be the
-// last instruction in a sequence that results in something equivalent to
-// the pack-halfwords. The intent is to cause the entire sequence to become
-// dead.
-bool BitSimplification::genPackhl(MachineInstr *MI,
- BitTracker::RegisterRef RD, const BitTracker::RegisterCell &RC) {
- unsigned Opc = MI->getOpcode();
- if (Opc == Hexagon::S2_packhl)
- return false;
- BitTracker::RegisterRef Rs, Rt;
- if (!matchPackhl(RD.Reg, RC, Rs, Rt))
- return false;
- if (!validateReg(Rs, Hexagon::S2_packhl, 1) ||
- !validateReg(Rt, Hexagon::S2_packhl, 2))
- return false;
-
- MachineBasicBlock &B = *MI->getParent();
- unsigned NewR = MRI.createVirtualRegister(&Hexagon::DoubleRegsRegClass);
- DebugLoc DL = MI->getDebugLoc();
- auto At = MI->isPHI() ? B.getFirstNonPHI()
- : MachineBasicBlock::iterator(MI);
- BuildMI(B, At, DL, HII.get(Hexagon::S2_packhl), NewR)
- .addReg(Rs.Reg, 0, Rs.Sub)
- .addReg(Rt.Reg, 0, Rt.Sub);
- HBS::replaceSubWithSub(RD.Reg, RD.Sub, NewR, 0, MRI);
- BT.put(BitTracker::RegisterRef(NewR), RC);
- return true;
-}
-
-// If MI produces halfword of the input in the low half of the output,
-// replace it with zero-extend or extractu.
-bool BitSimplification::genExtractHalf(MachineInstr *MI,
- BitTracker::RegisterRef RD, const BitTracker::RegisterCell &RC) {
- RegHalf L;
- // Check for halfword in low 16 bits, zeros elsewhere.
- if (!matchHalf(RD.Reg, RC, 0, L) || !HBS::isZero(RC, 16, 16))
- return false;
-
- unsigned Opc = MI->getOpcode();
- MachineBasicBlock &B = *MI->getParent();
- DebugLoc DL = MI->getDebugLoc();
-
- // Prefer zxth, since zxth can go in any slot, while extractu only in
- // slots 2 and 3.
- unsigned NewR = 0;
- auto At = MI->isPHI() ? B.getFirstNonPHI()
- : MachineBasicBlock::iterator(MI);
- if (L.Low && Opc != Hexagon::A2_zxth) {
- if (validateReg(L, Hexagon::A2_zxth, 1)) {
- NewR = MRI.createVirtualRegister(&Hexagon::IntRegsRegClass);
- BuildMI(B, At, DL, HII.get(Hexagon::A2_zxth), NewR)
- .addReg(L.Reg, 0, L.Sub);
- }
- } else if (!L.Low && Opc != Hexagon::S2_lsr_i_r) {
- if (validateReg(L, Hexagon::S2_lsr_i_r, 1)) {
- NewR = MRI.createVirtualRegister(&Hexagon::IntRegsRegClass);
- BuildMI(B, MI, DL, HII.get(Hexagon::S2_lsr_i_r), NewR)
- .addReg(L.Reg, 0, L.Sub)
- .addImm(16);
- }
- }
- if (NewR == 0)
- return false;
- HBS::replaceSubWithSub(RD.Reg, RD.Sub, NewR, 0, MRI);
- BT.put(BitTracker::RegisterRef(NewR), RC);
- return true;
-}
-
-// If MI is equivalent to a combine(.L/.H, .L/.H) replace with with the
-// combine.
-bool BitSimplification::genCombineHalf(MachineInstr *MI,
- BitTracker::RegisterRef RD, const BitTracker::RegisterCell &RC) {
- RegHalf L, H;
- // Check for combine h/l
- if (!matchHalf(RD.Reg, RC, 0, L) || !matchHalf(RD.Reg, RC, 16, H))
- return false;
- // Do nothing if this is just a reg copy.
- if (L.Reg == H.Reg && L.Sub == H.Sub && !H.Low && L.Low)
- return false;
-
- unsigned Opc = MI->getOpcode();
- unsigned COpc = getCombineOpcode(H.Low, L.Low);
- if (COpc == Opc)
- return false;
- if (!validateReg(H, COpc, 1) || !validateReg(L, COpc, 2))
- return false;
-
- MachineBasicBlock &B = *MI->getParent();
- DebugLoc DL = MI->getDebugLoc();
- unsigned NewR = MRI.createVirtualRegister(&Hexagon::IntRegsRegClass);
- auto At = MI->isPHI() ? B.getFirstNonPHI()
- : MachineBasicBlock::iterator(MI);
- BuildMI(B, At, DL, HII.get(COpc), NewR)
- .addReg(H.Reg, 0, H.Sub)
- .addReg(L.Reg, 0, L.Sub);
- HBS::replaceSubWithSub(RD.Reg, RD.Sub, NewR, 0, MRI);
- BT.put(BitTracker::RegisterRef(NewR), RC);
- return true;
-}
-
-// If MI resets high bits of a register and keeps the lower ones, replace it
-// with zero-extend byte/half, and-immediate, or extractu, as appropriate.
-bool BitSimplification::genExtractLow(MachineInstr *MI,
- BitTracker::RegisterRef RD, const BitTracker::RegisterCell &RC) {
- unsigned Opc = MI->getOpcode();
- switch (Opc) {
- case Hexagon::A2_zxtb:
- case Hexagon::A2_zxth:
- case Hexagon::S2_extractu:
- return false;
- }
- if (Opc == Hexagon::A2_andir && MI->getOperand(2).isImm()) {
- int32_t Imm = MI->getOperand(2).getImm();
- if (isInt<10>(Imm))
- return false;
- }
-
- if (MI->hasUnmodeledSideEffects() || MI->isInlineAsm())
- return false;
- unsigned W = RC.width();
- while (W > 0 && RC[W-1].is(0))
- W--;
- if (W == 0 || W == RC.width())
- return false;
- unsigned NewOpc = (W == 8) ? Hexagon::A2_zxtb
- : (W == 16) ? Hexagon::A2_zxth
- : (W < 10) ? Hexagon::A2_andir
- : Hexagon::S2_extractu;
- MachineBasicBlock &B = *MI->getParent();
- DebugLoc DL = MI->getDebugLoc();
-
- for (auto &Op : MI->uses()) {
- if (!Op.isReg())
- continue;
- BitTracker::RegisterRef RS = Op;
- if (!BT.has(RS.Reg))
- continue;
- const BitTracker::RegisterCell &SC = BT.lookup(RS.Reg);
- unsigned BN, BW;
- if (!HBS::getSubregMask(RS, BN, BW, MRI))
- continue;
- if (BW < W || !HBS::isEqual(RC, 0, SC, BN, W))
- continue;
- if (!validateReg(RS, NewOpc, 1))
- continue;
-
- unsigned NewR = MRI.createVirtualRegister(&Hexagon::IntRegsRegClass);
- auto At = MI->isPHI() ? B.getFirstNonPHI()
- : MachineBasicBlock::iterator(MI);
- auto MIB = BuildMI(B, At, DL, HII.get(NewOpc), NewR)
- .addReg(RS.Reg, 0, RS.Sub);
- if (NewOpc == Hexagon::A2_andir)
- MIB.addImm((1 << W) - 1);
- else if (NewOpc == Hexagon::S2_extractu)
- MIB.addImm(W).addImm(0);
- HBS::replaceSubWithSub(RD.Reg, RD.Sub, NewR, 0, MRI);
- BT.put(BitTracker::RegisterRef(NewR), RC);
- return true;
- }
- return false;
-}
-
-bool BitSimplification::genBitSplit(MachineInstr *MI,
- BitTracker::RegisterRef RD, const BitTracker::RegisterCell &RC,
- const RegisterSet &AVs) {
- if (!GenBitSplit)
- return false;
- if (MaxBitSplit.getNumOccurrences()) {
- if (CountBitSplit >= MaxBitSplit)
- return false;
- }
-
- unsigned Opc = MI->getOpcode();
- switch (Opc) {
- case Hexagon::A4_bitsplit:
- case Hexagon::A4_bitspliti:
- return false;
- }
-
- unsigned W = RC.width();
- if (W != 32)
- return false;
-
- auto ctlz = [] (const BitTracker::RegisterCell &C) -> unsigned {
- unsigned Z = C.width();
- while (Z > 0 && C[Z-1].is(0))
- --Z;
- return C.width() - Z;
- };
-
- // Count the number of leading zeros in the target RC.
- unsigned Z = ctlz(RC);
- if (Z == 0 || Z == W)
- return false;
-
- // A simplistic analysis: assume the source register (the one being split)
- // is fully unknown, and that all its bits are self-references.
- const BitTracker::BitValue &B0 = RC[0];
- if (B0.Type != BitTracker::BitValue::Ref)
- return false;
-
- unsigned SrcR = B0.RefI.Reg;
- unsigned SrcSR = 0;
- unsigned Pos = B0.RefI.Pos;
-
- // All the non-zero bits should be consecutive bits from the same register.
- for (unsigned i = 1; i < W-Z; ++i) {
- const BitTracker::BitValue &V = RC[i];
- if (V.Type != BitTracker::BitValue::Ref)
- return false;
- if (V.RefI.Reg != SrcR || V.RefI.Pos != Pos+i)
- return false;
- }
-
- // Now, find the other bitfield among AVs.
- for (unsigned S = AVs.find_first(); S; S = AVs.find_next(S)) {
- // The number of leading zeros here should be the number of trailing
- // non-zeros in RC.
- unsigned SRC = MRI.getRegClass(S)->getID();
- if (SRC != Hexagon::IntRegsRegClassID &&
- SRC != Hexagon::DoubleRegsRegClassID)
- continue;
- if (!BT.has(S))
- continue;
- const BitTracker::RegisterCell &SC = BT.lookup(S);
- if (SC.width() != W || ctlz(SC) != W-Z)
- continue;
- // The Z lower bits should now match SrcR.
- const BitTracker::BitValue &S0 = SC[0];
- if (S0.Type != BitTracker::BitValue::Ref || S0.RefI.Reg != SrcR)
- continue;
- unsigned P = S0.RefI.Pos;
-
- if (Pos <= P && (Pos + W-Z) != P)
- continue;
- if (P < Pos && (P + Z) != Pos)
- continue;
- // The starting bitfield position must be at a subregister boundary.
- if (std::min(P, Pos) != 0 && std::min(P, Pos) != 32)
- continue;
-
- unsigned I;
- for (I = 1; I < Z; ++I) {
- const BitTracker::BitValue &V = SC[I];
- if (V.Type != BitTracker::BitValue::Ref)
- break;
- if (V.RefI.Reg != SrcR || V.RefI.Pos != P+I)
- break;
- }
- if (I != Z)
- continue;
-
- // Generate bitsplit where S is defined.
- if (MaxBitSplit.getNumOccurrences())
- CountBitSplit++;
- MachineInstr *DefS = MRI.getVRegDef(S);
- assert(DefS != nullptr);
- DebugLoc DL = DefS->getDebugLoc();
- MachineBasicBlock &B = *DefS->getParent();
- auto At = DefS->isPHI() ? B.getFirstNonPHI()
- : MachineBasicBlock::iterator(DefS);
- if (MRI.getRegClass(SrcR)->getID() == Hexagon::DoubleRegsRegClassID)
- SrcSR = (std::min(Pos, P) == 32) ? Hexagon::isub_hi : Hexagon::isub_lo;
- if (!validateReg({SrcR,SrcSR}, Hexagon::A4_bitspliti, 1))
- continue;
- unsigned ImmOp = Pos <= P ? W-Z : Z;
-
- // Find an existing bitsplit instruction if one already exists.
- unsigned NewR = 0;
- for (MachineInstr *In : NewMIs) {
- if (In->getOpcode() != Hexagon::A4_bitspliti)
- continue;
- MachineOperand &Op1 = In->getOperand(1);
- if (Op1.getReg() != SrcR || Op1.getSubReg() != SrcSR)
- continue;
- if (In->getOperand(2).getImm() != ImmOp)
- continue;
- // Check if the target register is available here.
- MachineOperand &Op0 = In->getOperand(0);
- MachineInstr *DefI = MRI.getVRegDef(Op0.getReg());
- assert(DefI != nullptr);
- if (!MDT.dominates(DefI, &*At))
- continue;
-
- // Found one that can be reused.
- assert(Op0.getSubReg() == 0);
- NewR = Op0.getReg();
- break;
- }
- if (!NewR) {
- NewR = MRI.createVirtualRegister(&Hexagon::DoubleRegsRegClass);
- auto NewBS = BuildMI(B, At, DL, HII.get(Hexagon::A4_bitspliti), NewR)
- .addReg(SrcR, 0, SrcSR)
- .addImm(ImmOp);
- NewMIs.push_back(NewBS);
- }
- if (Pos <= P) {
- HBS::replaceRegWithSub(RD.Reg, NewR, Hexagon::isub_lo, MRI);
- HBS::replaceRegWithSub(S, NewR, Hexagon::isub_hi, MRI);
- } else {
- HBS::replaceRegWithSub(S, NewR, Hexagon::isub_lo, MRI);
- HBS::replaceRegWithSub(RD.Reg, NewR, Hexagon::isub_hi, MRI);
- }
- return true;
- }
-
- return false;
-}
-
-// Check for tstbit simplification opportunity, where the bit being checked
-// can be tracked back to another register. For example:
-// %2 = S2_lsr_i_r %1, 5
-// %3 = S2_tstbit_i %2, 0
-// =>
-// %3 = S2_tstbit_i %1, 5
-bool BitSimplification::simplifyTstbit(MachineInstr *MI,
- BitTracker::RegisterRef RD, const BitTracker::RegisterCell &RC) {
- unsigned Opc = MI->getOpcode();
- if (Opc != Hexagon::S2_tstbit_i)
- return false;
-
- unsigned BN = MI->getOperand(2).getImm();
- BitTracker::RegisterRef RS = MI->getOperand(1);
- unsigned F, W;
- DebugLoc DL = MI->getDebugLoc();
- if (!BT.has(RS.Reg) || !HBS::getSubregMask(RS, F, W, MRI))
- return false;
- MachineBasicBlock &B = *MI->getParent();
- auto At = MI->isPHI() ? B.getFirstNonPHI()
- : MachineBasicBlock::iterator(MI);
-
- const BitTracker::RegisterCell &SC = BT.lookup(RS.Reg);
- const BitTracker::BitValue &V = SC[F+BN];
- if (V.Type == BitTracker::BitValue::Ref && V.RefI.Reg != RS.Reg) {
- const TargetRegisterClass *TC = MRI.getRegClass(V.RefI.Reg);
- // Need to map V.RefI.Reg to a 32-bit register, i.e. if it is
- // a double register, need to use a subregister and adjust bit
- // number.
- unsigned P = std::numeric_limits<unsigned>::max();
- BitTracker::RegisterRef RR(V.RefI.Reg, 0);
- if (TC == &Hexagon::DoubleRegsRegClass) {
- P = V.RefI.Pos;
- RR.Sub = Hexagon::isub_lo;
- if (P >= 32) {
- P -= 32;
- RR.Sub = Hexagon::isub_hi;
- }
- } else if (TC == &Hexagon::IntRegsRegClass) {
- P = V.RefI.Pos;
- }
- if (P != std::numeric_limits<unsigned>::max()) {
- unsigned NewR = MRI.createVirtualRegister(&Hexagon::PredRegsRegClass);
- BuildMI(B, At, DL, HII.get(Hexagon::S2_tstbit_i), NewR)
- .addReg(RR.Reg, 0, RR.Sub)
- .addImm(P);
- HBS::replaceReg(RD.Reg, NewR, MRI);
- BT.put(NewR, RC);
- return true;
- }
- } else if (V.is(0) || V.is(1)) {
- unsigned NewR = MRI.createVirtualRegister(&Hexagon::PredRegsRegClass);
- unsigned NewOpc = V.is(0) ? Hexagon::PS_false : Hexagon::PS_true;
- BuildMI(B, At, DL, HII.get(NewOpc), NewR);
- HBS::replaceReg(RD.Reg, NewR, MRI);
- return true;
- }
-
- return false;
-}
-
-// Detect whether RD is a bitfield extract (sign- or zero-extended) of
-// some register from the AVs set. Create a new corresponding instruction
-// at the location of MI. The intent is to recognize situations where
-// a sequence of instructions performs an operation that is equivalent to
-// an extract operation, such as a shift left followed by a shift right.
-bool BitSimplification::simplifyExtractLow(MachineInstr *MI,
- BitTracker::RegisterRef RD, const BitTracker::RegisterCell &RC,
- const RegisterSet &AVs) {
- if (!GenExtract)
- return false;
- if (MaxExtract.getNumOccurrences()) {
- if (CountExtract >= MaxExtract)
- return false;
- CountExtract++;
- }
-
- unsigned W = RC.width();
- unsigned RW = W;
- unsigned Len;
- bool Signed;
-
- // The code is mostly class-independent, except for the part that generates
- // the extract instruction, and establishes the source register (in case it
- // needs to use a subregister).
- const TargetRegisterClass *FRC = HBS::getFinalVRegClass(RD, MRI);
- if (FRC != &Hexagon::IntRegsRegClass && FRC != &Hexagon::DoubleRegsRegClass)
- return false;
- assert(RD.Sub == 0);
-
- // Observation:
- // If the cell has a form of 00..0xx..x with k zeros and n remaining
- // bits, this could be an extractu of the n bits, but it could also be
- // an extractu of a longer field which happens to have 0s in the top
- // bit positions.
- // The same logic applies to sign-extended fields.
- //
- // Do not check for the extended extracts, since it would expand the
- // search space quite a bit. The search may be expensive as it is.
-
- const BitTracker::BitValue &TopV = RC[W-1];
-
- // Eliminate candidates that have self-referential bits, since they
- // cannot be extracts from other registers. Also, skip registers that
- // have compile-time constant values.
- bool IsConst = true;
- for (unsigned I = 0; I != W; ++I) {
- const BitTracker::BitValue &V = RC[I];
- if (V.Type == BitTracker::BitValue::Ref && V.RefI.Reg == RD.Reg)
- return false;
- IsConst = IsConst && (V.is(0) || V.is(1));
- }
- if (IsConst)
- return false;
-
- if (TopV.is(0) || TopV.is(1)) {
- bool S = TopV.is(1);
- for (--W; W > 0 && RC[W-1].is(S); --W)
- ;
- Len = W;
- Signed = S;
- // The sign bit must be a part of the field being extended.
- if (Signed)
- ++Len;
- } else {
- // This could still be a sign-extended extract.
- assert(TopV.Type == BitTracker::BitValue::Ref);
- if (TopV.RefI.Reg == RD.Reg || TopV.RefI.Pos == W-1)
- return false;
- for (--W; W > 0 && RC[W-1] == TopV; --W)
- ;
- // The top bits of RC are copies of TopV. One occurrence of TopV will
- // be a part of the field.
- Len = W + 1;
- Signed = true;
- }
-
- // This would be just a copy. It should be handled elsewhere.
- if (Len == RW)
- return false;
-
- LLVM_DEBUG({
- dbgs() << __func__ << " on reg: " << printReg(RD.Reg, &HRI, RD.Sub)
- << ", MI: " << *MI;
- dbgs() << "Cell: " << RC << '\n';
- dbgs() << "Expected bitfield size: " << Len << " bits, "
- << (Signed ? "sign" : "zero") << "-extended\n";
- });
-
- bool Changed = false;
-
- for (unsigned R = AVs.find_first(); R != 0; R = AVs.find_next(R)) {
- if (!BT.has(R))
- continue;
- const BitTracker::RegisterCell &SC = BT.lookup(R);
- unsigned SW = SC.width();
-
- // The source can be longer than the destination, as long as its size is
- // a multiple of the size of the destination. Also, we would need to be
- // able to refer to the subregister in the source that would be of the
- // same size as the destination, but only check the sizes here.
- if (SW < RW || (SW % RW) != 0)
- continue;
-
- // The field can start at any offset in SC as long as it contains Len
- // bits and does not cross subregister boundary (if the source register
- // is longer than the destination).
- unsigned Off = 0;
- while (Off <= SW-Len) {
- unsigned OE = (Off+Len)/RW;
- if (OE != Off/RW) {
- // The assumption here is that if the source (R) is longer than the
- // destination, then the destination is a sequence of words of
- // size RW, and each such word in R can be accessed via a subregister.
- //
- // If the beginning and the end of the field cross the subregister
- // boundary, advance to the next subregister.
- Off = OE*RW;
- continue;
- }
- if (HBS::isEqual(RC, 0, SC, Off, Len))
- break;
- ++Off;
- }
-
- if (Off > SW-Len)
- continue;
-
- // Found match.
- unsigned ExtOpc = 0;
- if (Off == 0) {
- if (Len == 8)
- ExtOpc = Signed ? Hexagon::A2_sxtb : Hexagon::A2_zxtb;
- else if (Len == 16)
- ExtOpc = Signed ? Hexagon::A2_sxth : Hexagon::A2_zxth;
- else if (Len < 10 && !Signed)
- ExtOpc = Hexagon::A2_andir;
- }
- if (ExtOpc == 0) {
- ExtOpc =
- Signed ? (RW == 32 ? Hexagon::S4_extract : Hexagon::S4_extractp)
- : (RW == 32 ? Hexagon::S2_extractu : Hexagon::S2_extractup);
- }
- unsigned SR = 0;
- // This only recognizes isub_lo and isub_hi.
- if (RW != SW && RW*2 != SW)
- continue;
- if (RW != SW)
- SR = (Off/RW == 0) ? Hexagon::isub_lo : Hexagon::isub_hi;
- Off = Off % RW;
-
- if (!validateReg({R,SR}, ExtOpc, 1))
- continue;
-
- // Don't generate the same instruction as the one being optimized.
- if (MI->getOpcode() == ExtOpc) {
- // All possible ExtOpc's have the source in operand(1).
- const MachineOperand &SrcOp = MI->getOperand(1);
- if (SrcOp.getReg() == R)
- continue;
- }
-
- DebugLoc DL = MI->getDebugLoc();
- MachineBasicBlock &B = *MI->getParent();
- unsigned NewR = MRI.createVirtualRegister(FRC);
- auto At = MI->isPHI() ? B.getFirstNonPHI()
- : MachineBasicBlock::iterator(MI);
- auto MIB = BuildMI(B, At, DL, HII.get(ExtOpc), NewR)
- .addReg(R, 0, SR);
- switch (ExtOpc) {
- case Hexagon::A2_sxtb:
- case Hexagon::A2_zxtb:
- case Hexagon::A2_sxth:
- case Hexagon::A2_zxth:
- break;
- case Hexagon::A2_andir:
- MIB.addImm((1u << Len) - 1);
- break;
- case Hexagon::S4_extract:
- case Hexagon::S2_extractu:
- case Hexagon::S4_extractp:
- case Hexagon::S2_extractup:
- MIB.addImm(Len)
- .addImm(Off);
- break;
- default:
- llvm_unreachable("Unexpected opcode");
- }
-
- HBS::replaceReg(RD.Reg, NewR, MRI);
- BT.put(BitTracker::RegisterRef(NewR), RC);
- Changed = true;
- break;
- }
-
- return Changed;
-}
-
-bool BitSimplification::simplifyRCmp0(MachineInstr *MI,
- BitTracker::RegisterRef RD) {
- unsigned Opc = MI->getOpcode();
- if (Opc != Hexagon::A4_rcmpeqi && Opc != Hexagon::A4_rcmpneqi)
- return false;
- MachineOperand &CmpOp = MI->getOperand(2);
- if (!CmpOp.isImm() || CmpOp.getImm() != 0)
- return false;
-
- const TargetRegisterClass *FRC = HBS::getFinalVRegClass(RD, MRI);
- if (FRC != &Hexagon::IntRegsRegClass && FRC != &Hexagon::DoubleRegsRegClass)
- return false;
- assert(RD.Sub == 0);
-
- MachineBasicBlock &B = *MI->getParent();
- const DebugLoc &DL = MI->getDebugLoc();
- auto At = MI->isPHI() ? B.getFirstNonPHI()
- : MachineBasicBlock::iterator(MI);
- bool KnownZ = true;
- bool KnownNZ = false;
-
- BitTracker::RegisterRef SR = MI->getOperand(1);
- if (!BT.has(SR.Reg))
- return false;
- const BitTracker::RegisterCell &SC = BT.lookup(SR.Reg);
- unsigned F, W;
- if (!HBS::getSubregMask(SR, F, W, MRI))
- return false;
-
- for (uint16_t I = F; I != F+W; ++I) {
- const BitTracker::BitValue &V = SC[I];
- if (!V.is(0))
- KnownZ = false;
- if (V.is(1))
- KnownNZ = true;
- }
-
- auto ReplaceWithConst = [&] (int C) {
- unsigned NewR = MRI.createVirtualRegister(FRC);
- BuildMI(B, At, DL, HII.get(Hexagon::A2_tfrsi), NewR)
- .addImm(C);
- HBS::replaceReg(RD.Reg, NewR, MRI);
- BitTracker::RegisterCell NewRC(W);
- for (uint16_t I = 0; I != W; ++I) {
- NewRC[I] = BitTracker::BitValue(C & 1);
- C = unsigned(C) >> 1;
- }
- BT.put(BitTracker::RegisterRef(NewR), NewRC);
- return true;
- };
-
- auto IsNonZero = [] (const MachineOperand &Op) {
- if (Op.isGlobal() || Op.isBlockAddress())
- return true;
- if (Op.isImm())
- return Op.getImm() != 0;
- if (Op.isCImm())
- return !Op.getCImm()->isZero();
- if (Op.isFPImm())
- return !Op.getFPImm()->isZero();
- return false;
- };
-
- auto IsZero = [] (const MachineOperand &Op) {
- if (Op.isGlobal() || Op.isBlockAddress())
- return false;
- if (Op.isImm())
- return Op.getImm() == 0;
- if (Op.isCImm())
- return Op.getCImm()->isZero();
- if (Op.isFPImm())
- return Op.getFPImm()->isZero();
- return false;
- };
-
- // If the source register is known to be 0 or non-0, the comparison can
- // be folded to a load of a constant.
- if (KnownZ || KnownNZ) {
- assert(KnownZ != KnownNZ && "Register cannot be both 0 and non-0");
- return ReplaceWithConst(KnownZ == (Opc == Hexagon::A4_rcmpeqi));
- }
-
- // Special case: if the compare comes from a C2_muxii, then we know the
- // two possible constants that can be the source value.
- MachineInstr *InpDef = MRI.getVRegDef(SR.Reg);
- if (!InpDef)
- return false;
- if (SR.Sub == 0 && InpDef->getOpcode() == Hexagon::C2_muxii) {
- MachineOperand &Src1 = InpDef->getOperand(2);
- MachineOperand &Src2 = InpDef->getOperand(3);
- // Check if both are non-zero.
- bool KnownNZ1 = IsNonZero(Src1), KnownNZ2 = IsNonZero(Src2);
- if (KnownNZ1 && KnownNZ2)
- return ReplaceWithConst(Opc == Hexagon::A4_rcmpneqi);
- // Check if both are zero.
- bool KnownZ1 = IsZero(Src1), KnownZ2 = IsZero(Src2);
- if (KnownZ1 && KnownZ2)
- return ReplaceWithConst(Opc == Hexagon::A4_rcmpeqi);
-
- // If for both operands we know that they are either 0 or non-0,
- // replace the comparison with a C2_muxii, using the same predicate
- // register, but with operands substituted with 0/1 accordingly.
- if ((KnownZ1 || KnownNZ1) && (KnownZ2 || KnownNZ2)) {
- unsigned NewR = MRI.createVirtualRegister(FRC);
- BuildMI(B, At, DL, HII.get(Hexagon::C2_muxii), NewR)
- .addReg(InpDef->getOperand(1).getReg())
- .addImm(KnownZ1 == (Opc == Hexagon::A4_rcmpeqi))
- .addImm(KnownZ2 == (Opc == Hexagon::A4_rcmpeqi));
- HBS::replaceReg(RD.Reg, NewR, MRI);
- // Create a new cell with only the least significant bit unknown.
- BitTracker::RegisterCell NewRC(W);
- NewRC[0] = BitTracker::BitValue::self();
- NewRC.fill(1, W, BitTracker::BitValue::Zero);
- BT.put(BitTracker::RegisterRef(NewR), NewRC);
- return true;
- }
- }
-
- return false;
-}
-
-bool BitSimplification::processBlock(MachineBasicBlock &B,
- const RegisterSet &AVs) {
- if (!BT.reached(&B))
- return false;
- bool Changed = false;
- RegisterSet AVB = AVs;
- RegisterSet Defs;
-
- for (auto I = B.begin(), E = B.end(); I != E; ++I, AVB.insert(Defs)) {
- MachineInstr *MI = &*I;
- Defs.clear();
- HBS::getInstrDefs(*MI, Defs);
-
- unsigned Opc = MI->getOpcode();
- if (Opc == TargetOpcode::COPY || Opc == TargetOpcode::REG_SEQUENCE)
- continue;
-
- if (MI->mayStore()) {
- bool T = genStoreUpperHalf(MI);
- T = T || genStoreImmediate(MI);
- Changed |= T;
- continue;
- }
-
- if (Defs.count() != 1)
- continue;
- const MachineOperand &Op0 = MI->getOperand(0);
- if (!Op0.isReg() || !Op0.isDef())
- continue;
- BitTracker::RegisterRef RD = Op0;
- if (!BT.has(RD.Reg))
- continue;
- const TargetRegisterClass *FRC = HBS::getFinalVRegClass(RD, MRI);
- const BitTracker::RegisterCell &RC = BT.lookup(RD.Reg);
-
- if (FRC->getID() == Hexagon::DoubleRegsRegClassID) {
- bool T = genPackhl(MI, RD, RC);
- T = T || simplifyExtractLow(MI, RD, RC, AVB);
- Changed |= T;
- continue;
- }
-
- if (FRC->getID() == Hexagon::IntRegsRegClassID) {
- bool T = genBitSplit(MI, RD, RC, AVB);
- T = T || simplifyExtractLow(MI, RD, RC, AVB);
- T = T || genExtractHalf(MI, RD, RC);
- T = T || genCombineHalf(MI, RD, RC);
- T = T || genExtractLow(MI, RD, RC);
- T = T || simplifyRCmp0(MI, RD);
- Changed |= T;
- continue;
- }
-
- if (FRC->getID() == Hexagon::PredRegsRegClassID) {
- bool T = simplifyTstbit(MI, RD, RC);
- Changed |= T;
- continue;
- }
- }
- return Changed;
-}
-
-bool HexagonBitSimplify::runOnMachineFunction(MachineFunction &MF) {
- if (skipFunction(MF.getFunction()))
- return false;
-
- auto &HST = MF.getSubtarget<HexagonSubtarget>();
- auto &HRI = *HST.getRegisterInfo();
- auto &HII = *HST.getInstrInfo();
-
- MDT = &getAnalysis<MachineDominatorTree>();
- MachineRegisterInfo &MRI = MF.getRegInfo();
- bool Changed;
-
- Changed = DeadCodeElimination(MF, *MDT).run();
-
- const HexagonEvaluator HE(HRI, MRI, HII, MF);
- BitTracker BT(HE, MF);
- LLVM_DEBUG(BT.trace(true));
- BT.run();
-
- MachineBasicBlock &Entry = MF.front();
-
- RegisterSet AIG; // Available registers for IG.
- ConstGeneration ImmG(BT, HII, MRI);
- Changed |= visitBlock(Entry, ImmG, AIG);
-
- RegisterSet ARE; // Available registers for RIE.
- RedundantInstrElimination RIE(BT, HII, HRI, MRI);
- bool Ried = visitBlock(Entry, RIE, ARE);
- if (Ried) {
- Changed = true;
- BT.run();
- }
-
- RegisterSet ACG; // Available registers for CG.
- CopyGeneration CopyG(BT, HII, HRI, MRI);
- Changed |= visitBlock(Entry, CopyG, ACG);
-
- RegisterSet ACP; // Available registers for CP.
- CopyPropagation CopyP(HRI, MRI);
- Changed |= visitBlock(Entry, CopyP, ACP);
-
- Changed = DeadCodeElimination(MF, *MDT).run() || Changed;
-
- BT.run();
- RegisterSet ABS; // Available registers for BS.
- BitSimplification BitS(BT, *MDT, HII, HRI, MRI, MF);
- Changed |= visitBlock(Entry, BitS, ABS);
-
- Changed = DeadCodeElimination(MF, *MDT).run() || Changed;
-
- if (Changed) {
- for (auto &B : MF)
- for (auto &I : B)
- I.clearKillInfo();
- DeadCodeElimination(MF, *MDT).run();
- }
- return Changed;
-}
-
-// Recognize loops where the code at the end of the loop matches the code
-// before the entry of the loop, and the matching code is such that is can
-// be simplified. This pass relies on the bit simplification above and only
-// prepares code in a way that can be handled by the bit simplifcation.
-//
-// This is the motivating testcase (and explanation):
-//
-// {
-// loop0(.LBB0_2, r1) // %for.body.preheader
-// r5:4 = memd(r0++#8)
-// }
-// {
-// r3 = lsr(r4, #16)
-// r7:6 = combine(r5, r5)
-// }
-// {
-// r3 = insert(r5, #16, #16)
-// r7:6 = vlsrw(r7:6, #16)
-// }
-// .LBB0_2:
-// {
-// memh(r2+#4) = r5
-// memh(r2+#6) = r6 # R6 is really R5.H
-// }
-// {
-// r2 = add(r2, #8)
-// memh(r2+#0) = r4
-// memh(r2+#2) = r3 # R3 is really R4.H
-// }
-// {
-// r5:4 = memd(r0++#8)
-// }
-// { # "Shuffling" code that sets up R3 and R6
-// r3 = lsr(r4, #16) # so that their halves can be stored in the
-// r7:6 = combine(r5, r5) # next iteration. This could be folded into
-// } # the stores if the code was at the beginning
-// { # of the loop iteration. Since the same code
-// r3 = insert(r5, #16, #16) # precedes the loop, it can actually be moved
-// r7:6 = vlsrw(r7:6, #16) # there.
-// }:endloop0
-//
-//
-// The outcome:
-//
-// {
-// loop0(.LBB0_2, r1)
-// r5:4 = memd(r0++#8)
-// }
-// .LBB0_2:
-// {
-// memh(r2+#4) = r5
-// memh(r2+#6) = r5.h
-// }
-// {
-// r2 = add(r2, #8)
-// memh(r2+#0) = r4
-// memh(r2+#2) = r4.h
-// }
-// {
-// r5:4 = memd(r0++#8)
-// }:endloop0
-
-namespace llvm {
-
- FunctionPass *createHexagonLoopRescheduling();
- void initializeHexagonLoopReschedulingPass(PassRegistry&);
-
-} // end namespace llvm
-
-namespace {
-
- class HexagonLoopRescheduling : public MachineFunctionPass {
- public:
- static char ID;
-
- HexagonLoopRescheduling() : MachineFunctionPass(ID) {
- initializeHexagonLoopReschedulingPass(*PassRegistry::getPassRegistry());
- }
-
- bool runOnMachineFunction(MachineFunction &MF) override;
-
- private:
- const HexagonInstrInfo *HII = nullptr;
- const HexagonRegisterInfo *HRI = nullptr;
- MachineRegisterInfo *MRI = nullptr;
- BitTracker *BTP = nullptr;
-
- struct LoopCand {
- LoopCand(MachineBasicBlock *lb, MachineBasicBlock *pb,
- MachineBasicBlock *eb) : LB(lb), PB(pb), EB(eb) {}
-
- MachineBasicBlock *LB, *PB, *EB;
- };
- using InstrList = std::vector<MachineInstr *>;
- struct InstrGroup {
- BitTracker::RegisterRef Inp, Out;
- InstrList Ins;
- };
- struct PhiInfo {
- PhiInfo(MachineInstr &P, MachineBasicBlock &B);
-
- unsigned DefR;
- BitTracker::RegisterRef LR, PR; // Loop Register, Preheader Register
- MachineBasicBlock *LB, *PB; // Loop Block, Preheader Block
- };
-
- static unsigned getDefReg(const MachineInstr *MI);
- bool isConst(unsigned Reg) const;
- bool isBitShuffle(const MachineInstr *MI, unsigned DefR) const;
- bool isStoreInput(const MachineInstr *MI, unsigned DefR) const;
- bool isShuffleOf(unsigned OutR, unsigned InpR) const;
- bool isSameShuffle(unsigned OutR1, unsigned InpR1, unsigned OutR2,
- unsigned &InpR2) const;
- void moveGroup(InstrGroup &G, MachineBasicBlock &LB, MachineBasicBlock &PB,
- MachineBasicBlock::iterator At, unsigned OldPhiR, unsigned NewPredR);
- bool processLoop(LoopCand &C);
- };
-
-} // end anonymous namespace
-
-char HexagonLoopRescheduling::ID = 0;
-
-INITIALIZE_PASS(HexagonLoopRescheduling, "hexagon-loop-resched",
- "Hexagon Loop Rescheduling", false, false)
-
-HexagonLoopRescheduling::PhiInfo::PhiInfo(MachineInstr &P,
- MachineBasicBlock &B) {
- DefR = HexagonLoopRescheduling::getDefReg(&P);
- LB = &B;
- PB = nullptr;
- for (unsigned i = 1, n = P.getNumOperands(); i < n; i += 2) {
- const MachineOperand &OpB = P.getOperand(i+1);
- if (OpB.getMBB() == &B) {
- LR = P.getOperand(i);
- continue;
- }
- PB = OpB.getMBB();
- PR = P.getOperand(i);
- }
-}
-
-unsigned HexagonLoopRescheduling::getDefReg(const MachineInstr *MI) {
- RegisterSet Defs;
- HBS::getInstrDefs(*MI, Defs);
- if (Defs.count() != 1)
- return 0;
- return Defs.find_first();
-}
-
-bool HexagonLoopRescheduling::isConst(unsigned Reg) const {
- if (!BTP->has(Reg))
- return false;
- const BitTracker::RegisterCell &RC = BTP->lookup(Reg);
- for (unsigned i = 0, w = RC.width(); i < w; ++i) {
- const BitTracker::BitValue &V = RC[i];
- if (!V.is(0) && !V.is(1))
- return false;
- }
- return true;
-}
-
-bool HexagonLoopRescheduling::isBitShuffle(const MachineInstr *MI,
- unsigned DefR) const {
- unsigned Opc = MI->getOpcode();
- switch (Opc) {
- case TargetOpcode::COPY:
- case Hexagon::S2_lsr_i_r:
- case Hexagon::S2_asr_i_r:
- case Hexagon::S2_asl_i_r:
- case Hexagon::S2_lsr_i_p:
- case Hexagon::S2_asr_i_p:
- case Hexagon::S2_asl_i_p:
- case Hexagon::S2_insert:
- case Hexagon::A2_or:
- case Hexagon::A2_orp:
- case Hexagon::A2_and:
- case Hexagon::A2_andp:
- case Hexagon::A2_combinew:
- case Hexagon::A4_combineri:
- case Hexagon::A4_combineir:
- case Hexagon::A2_combineii:
- case Hexagon::A4_combineii:
- case Hexagon::A2_combine_ll:
- case Hexagon::A2_combine_lh:
- case Hexagon::A2_combine_hl:
- case Hexagon::A2_combine_hh:
- return true;
- }
- return false;
-}
-
-bool HexagonLoopRescheduling::isStoreInput(const MachineInstr *MI,
- unsigned InpR) const {
- for (unsigned i = 0, n = MI->getNumOperands(); i < n; ++i) {
- const MachineOperand &Op = MI->getOperand(i);
- if (!Op.isReg())
- continue;
- if (Op.getReg() == InpR)
- return i == n-1;
- }
- return false;
-}
-
-bool HexagonLoopRescheduling::isShuffleOf(unsigned OutR, unsigned InpR) const {
- if (!BTP->has(OutR) || !BTP->has(InpR))
- return false;
- const BitTracker::RegisterCell &OutC = BTP->lookup(OutR);
- for (unsigned i = 0, w = OutC.width(); i < w; ++i) {
- const BitTracker::BitValue &V = OutC[i];
- if (V.Type != BitTracker::BitValue::Ref)
- continue;
- if (V.RefI.Reg != InpR)
- return false;
- }
- return true;
-}
-
-bool HexagonLoopRescheduling::isSameShuffle(unsigned OutR1, unsigned InpR1,
- unsigned OutR2, unsigned &InpR2) const {
- if (!BTP->has(OutR1) || !BTP->has(InpR1) || !BTP->has(OutR2))
- return false;
- const BitTracker::RegisterCell &OutC1 = BTP->lookup(OutR1);
- const BitTracker::RegisterCell &OutC2 = BTP->lookup(OutR2);
- unsigned W = OutC1.width();
- unsigned MatchR = 0;
- if (W != OutC2.width())
- return false;
- for (unsigned i = 0; i < W; ++i) {
- const BitTracker::BitValue &V1 = OutC1[i], &V2 = OutC2[i];
- if (V1.Type != V2.Type || V1.Type == BitTracker::BitValue::One)
- return false;
- if (V1.Type != BitTracker::BitValue::Ref)
- continue;
- if (V1.RefI.Pos != V2.RefI.Pos)
- return false;
- if (V1.RefI.Reg != InpR1)
- return false;
- if (V2.RefI.Reg == 0 || V2.RefI.Reg == OutR2)
- return false;
- if (!MatchR)
- MatchR = V2.RefI.Reg;
- else if (V2.RefI.Reg != MatchR)
- return false;
- }
- InpR2 = MatchR;
- return true;
-}
-
-void HexagonLoopRescheduling::moveGroup(InstrGroup &G, MachineBasicBlock &LB,
- MachineBasicBlock &PB, MachineBasicBlock::iterator At, unsigned OldPhiR,
- unsigned NewPredR) {
- DenseMap<unsigned,unsigned> RegMap;
-
- const TargetRegisterClass *PhiRC = MRI->getRegClass(NewPredR);
- unsigned PhiR = MRI->createVirtualRegister(PhiRC);
- BuildMI(LB, At, At->getDebugLoc(), HII->get(TargetOpcode::PHI), PhiR)
- .addReg(NewPredR)
- .addMBB(&PB)
- .addReg(G.Inp.Reg)
- .addMBB(&LB);
- RegMap.insert(std::make_pair(G.Inp.Reg, PhiR));
-
- for (unsigned i = G.Ins.size(); i > 0; --i) {
- const MachineInstr *SI = G.Ins[i-1];
- unsigned DR = getDefReg(SI);
- const TargetRegisterClass *RC = MRI->getRegClass(DR);
- unsigned NewDR = MRI->createVirtualRegister(RC);
- DebugLoc DL = SI->getDebugLoc();
-
- auto MIB = BuildMI(LB, At, DL, HII->get(SI->getOpcode()), NewDR);
- for (unsigned j = 0, m = SI->getNumOperands(); j < m; ++j) {
- const MachineOperand &Op = SI->getOperand(j);
- if (!Op.isReg()) {
- MIB.add(Op);
- continue;
- }
- if (!Op.isUse())
- continue;
- unsigned UseR = RegMap[Op.getReg()];
- MIB.addReg(UseR, 0, Op.getSubReg());
- }
- RegMap.insert(std::make_pair(DR, NewDR));
- }
-
- HBS::replaceReg(OldPhiR, RegMap[G.Out.Reg], *MRI);
-}
-
-bool HexagonLoopRescheduling::processLoop(LoopCand &C) {
- LLVM_DEBUG(dbgs() << "Processing loop in " << printMBBReference(*C.LB)
- << "\n");
- std::vector<PhiInfo> Phis;
- for (auto &I : *C.LB) {
- if (!I.isPHI())
- break;
- unsigned PR = getDefReg(&I);
- if (isConst(PR))
- continue;
- bool BadUse = false, GoodUse = false;
- for (auto UI = MRI->use_begin(PR), UE = MRI->use_end(); UI != UE; ++UI) {
- MachineInstr *UseI = UI->getParent();
- if (UseI->getParent() != C.LB) {
- BadUse = true;
- break;
- }
- if (isBitShuffle(UseI, PR) || isStoreInput(UseI, PR))
- GoodUse = true;
- }
- if (BadUse || !GoodUse)
- continue;
-
- Phis.push_back(PhiInfo(I, *C.LB));
- }
-
- LLVM_DEBUG({
- dbgs() << "Phis: {";
- for (auto &I : Phis) {
- dbgs() << ' ' << printReg(I.DefR, HRI) << "=phi("
- << printReg(I.PR.Reg, HRI, I.PR.Sub) << ":b" << I.PB->getNumber()
- << ',' << printReg(I.LR.Reg, HRI, I.LR.Sub) << ":b"
- << I.LB->getNumber() << ')';
- }
- dbgs() << " }\n";
- });
-
- if (Phis.empty())
- return false;
-
- bool Changed = false;
- InstrList ShufIns;
-
- // Go backwards in the block: for each bit shuffling instruction, check
- // if that instruction could potentially be moved to the front of the loop:
- // the output of the loop cannot be used in a non-shuffling instruction
- // in this loop.
- for (auto I = C.LB->rbegin(), E = C.LB->rend(); I != E; ++I) {
- if (I->isTerminator())
- continue;
- if (I->isPHI())
- break;
-
- RegisterSet Defs;
- HBS::getInstrDefs(*I, Defs);
- if (Defs.count() != 1)
- continue;
- unsigned DefR = Defs.find_first();
- if (!TargetRegisterInfo::isVirtualRegister(DefR))
- continue;
- if (!isBitShuffle(&*I, DefR))
- continue;
-
- bool BadUse = false;
- for (auto UI = MRI->use_begin(DefR), UE = MRI->use_end(); UI != UE; ++UI) {
- MachineInstr *UseI = UI->getParent();
- if (UseI->getParent() == C.LB) {
- if (UseI->isPHI()) {
- // If the use is in a phi node in this loop, then it should be
- // the value corresponding to the back edge.
- unsigned Idx = UI.getOperandNo();
- if (UseI->getOperand(Idx+1).getMBB() != C.LB)
- BadUse = true;
- } else {
- auto F = find(ShufIns, UseI);
- if (F == ShufIns.end())
- BadUse = true;
- }
- } else {
- // There is a use outside of the loop, but there is no epilog block
- // suitable for a copy-out.
- if (C.EB == nullptr)
- BadUse = true;
- }
- if (BadUse)
- break;
- }
-
- if (BadUse)
- continue;
- ShufIns.push_back(&*I);
- }
-
- // Partition the list of shuffling instructions into instruction groups,
- // where each group has to be moved as a whole (i.e. a group is a chain of
- // dependent instructions). A group produces a single live output register,
- // which is meant to be the input of the loop phi node (although this is
- // not checked here yet). It also uses a single register as its input,
- // which is some value produced in the loop body. After moving the group
- // to the beginning of the loop, that input register would need to be
- // the loop-carried register (through a phi node) instead of the (currently
- // loop-carried) output register.
- using InstrGroupList = std::vector<InstrGroup>;
- InstrGroupList Groups;
-
- for (unsigned i = 0, n = ShufIns.size(); i < n; ++i) {
- MachineInstr *SI = ShufIns[i];
- if (SI == nullptr)
- continue;
-
- InstrGroup G;
- G.Ins.push_back(SI);
- G.Out.Reg = getDefReg(SI);
- RegisterSet Inputs;
- HBS::getInstrUses(*SI, Inputs);
-
- for (unsigned j = i+1; j < n; ++j) {
- MachineInstr *MI = ShufIns[j];
- if (MI == nullptr)
- continue;
- RegisterSet Defs;
- HBS::getInstrDefs(*MI, Defs);
- // If this instruction does not define any pending inputs, skip it.
- if (!Defs.intersects(Inputs))
- continue;
- // Otherwise, add it to the current group and remove the inputs that
- // are defined by MI.
- G.Ins.push_back(MI);
- Inputs.remove(Defs);
- // Then add all registers used by MI.
- HBS::getInstrUses(*MI, Inputs);
- ShufIns[j] = nullptr;
- }
-
- // Only add a group if it requires at most one register.
- if (Inputs.count() > 1)
- continue;
- auto LoopInpEq = [G] (const PhiInfo &P) -> bool {
- return G.Out.Reg == P.LR.Reg;
- };
- if (llvm::find_if(Phis, LoopInpEq) == Phis.end())
- continue;
-
- G.Inp.Reg = Inputs.find_first();
- Groups.push_back(G);
- }
-
- LLVM_DEBUG({
- for (unsigned i = 0, n = Groups.size(); i < n; ++i) {
- InstrGroup &G = Groups[i];
- dbgs() << "Group[" << i << "] inp: "
- << printReg(G.Inp.Reg, HRI, G.Inp.Sub)
- << " out: " << printReg(G.Out.Reg, HRI, G.Out.Sub) << "\n";
- for (unsigned j = 0, m = G.Ins.size(); j < m; ++j)
- dbgs() << " " << *G.Ins[j];
- }
- });
-
- for (unsigned i = 0, n = Groups.size(); i < n; ++i) {
- InstrGroup &G = Groups[i];
- if (!isShuffleOf(G.Out.Reg, G.Inp.Reg))
- continue;
- auto LoopInpEq = [G] (const PhiInfo &P) -> bool {
- return G.Out.Reg == P.LR.Reg;
- };
- auto F = llvm::find_if(Phis, LoopInpEq);
- if (F == Phis.end())
- continue;
- unsigned PrehR = 0;
- if (!isSameShuffle(G.Out.Reg, G.Inp.Reg, F->PR.Reg, PrehR)) {
- const MachineInstr *DefPrehR = MRI->getVRegDef(F->PR.Reg);
- unsigned Opc = DefPrehR->getOpcode();
- if (Opc != Hexagon::A2_tfrsi && Opc != Hexagon::A2_tfrpi)
- continue;
- if (!DefPrehR->getOperand(1).isImm())
- continue;
- if (DefPrehR->getOperand(1).getImm() != 0)
- continue;
- const TargetRegisterClass *RC = MRI->getRegClass(G.Inp.Reg);
- if (RC != MRI->getRegClass(F->PR.Reg)) {
- PrehR = MRI->createVirtualRegister(RC);
- unsigned TfrI = (RC == &Hexagon::IntRegsRegClass) ? Hexagon::A2_tfrsi
- : Hexagon::A2_tfrpi;
- auto T = C.PB->getFirstTerminator();
- DebugLoc DL = (T != C.PB->end()) ? T->getDebugLoc() : DebugLoc();
- BuildMI(*C.PB, T, DL, HII->get(TfrI), PrehR)
- .addImm(0);
- } else {
- PrehR = F->PR.Reg;
- }
- }
- // isSameShuffle could match with PrehR being of a wider class than
- // G.Inp.Reg, for example if G shuffles the low 32 bits of its input,
- // it would match for the input being a 32-bit register, and PrehR
- // being a 64-bit register (where the low 32 bits match). This could
- // be handled, but for now skip these cases.
- if (MRI->getRegClass(PrehR) != MRI->getRegClass(G.Inp.Reg))
- continue;
- moveGroup(G, *F->LB, *F->PB, F->LB->getFirstNonPHI(), F->DefR, PrehR);
- Changed = true;
- }
-
- return Changed;
-}
-
-bool HexagonLoopRescheduling::runOnMachineFunction(MachineFunction &MF) {
- if (skipFunction(MF.getFunction()))
- return false;
-
- auto &HST = MF.getSubtarget<HexagonSubtarget>();
- HII = HST.getInstrInfo();
- HRI = HST.getRegisterInfo();
- MRI = &MF.getRegInfo();
- const HexagonEvaluator HE(*HRI, *MRI, *HII, MF);
- BitTracker BT(HE, MF);
- LLVM_DEBUG(BT.trace(true));
- BT.run();
- BTP = &BT;
-
- std::vector<LoopCand> Cand;
-
- for (auto &B : MF) {
- if (B.pred_size() != 2 || B.succ_size() != 2)
- continue;
- MachineBasicBlock *PB = nullptr;
- bool IsLoop = false;
- for (auto PI = B.pred_begin(), PE = B.pred_end(); PI != PE; ++PI) {
- if (*PI != &B)
- PB = *PI;
- else
- IsLoop = true;
- }
- if (!IsLoop)
- continue;
-
- MachineBasicBlock *EB = nullptr;
- for (auto SI = B.succ_begin(), SE = B.succ_end(); SI != SE; ++SI) {
- if (*SI == &B)
- continue;
- // Set EP to the epilog block, if it has only 1 predecessor (i.e. the
- // edge from B to EP is non-critical.
- if ((*SI)->pred_size() == 1)
- EB = *SI;
- break;
- }
-
- Cand.push_back(LoopCand(&B, PB, EB));
- }
-
- bool Changed = false;
- for (auto &C : Cand)
- Changed |= processLoop(C);
-
- return Changed;
-}
-
-//===----------------------------------------------------------------------===//
-// Public Constructor Functions
-//===----------------------------------------------------------------------===//
-
-FunctionPass *llvm::createHexagonLoopRescheduling() {
- return new HexagonLoopRescheduling();
-}
-
-FunctionPass *llvm::createHexagonBitSimplify() {
- return new HexagonBitSimplify();
-}