summaryrefslogtreecommitdiff
path: root/contrib/llvm/lib/Target/PowerPC/PPCMIPeephole.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'contrib/llvm/lib/Target/PowerPC/PPCMIPeephole.cpp')
-rw-r--r--contrib/llvm/lib/Target/PowerPC/PPCMIPeephole.cpp1466
1 files changed, 0 insertions, 1466 deletions
diff --git a/contrib/llvm/lib/Target/PowerPC/PPCMIPeephole.cpp b/contrib/llvm/lib/Target/PowerPC/PPCMIPeephole.cpp
deleted file mode 100644
index 446246358e96..000000000000
--- a/contrib/llvm/lib/Target/PowerPC/PPCMIPeephole.cpp
+++ /dev/null
@@ -1,1466 +0,0 @@
-//===-------------- PPCMIPeephole.cpp - MI Peephole Cleanups -------------===//
-//
-// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
-// See https://llvm.org/LICENSE.txt for license information.
-// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
-//
-//===---------------------------------------------------------------------===//
-//
-// This pass performs peephole optimizations to clean up ugly code
-// sequences at the MachineInstruction layer. It runs at the end of
-// the SSA phases, following VSX swap removal. A pass of dead code
-// elimination follows this one for quick clean-up of any dead
-// instructions introduced here. Although we could do this as callbacks
-// from the generic peephole pass, this would have a couple of bad
-// effects: it might remove optimization opportunities for VSX swap
-// removal, and it would miss cleanups made possible following VSX
-// swap removal.
-//
-//===---------------------------------------------------------------------===//
-
-#include "PPC.h"
-#include "PPCInstrBuilder.h"
-#include "PPCInstrInfo.h"
-#include "PPCMachineFunctionInfo.h"
-#include "PPCTargetMachine.h"
-#include "llvm/ADT/Statistic.h"
-#include "llvm/CodeGen/MachineBlockFrequencyInfo.h"
-#include "llvm/CodeGen/MachineDominators.h"
-#include "llvm/CodeGen/MachinePostDominators.h"
-#include "llvm/CodeGen/MachineFunctionPass.h"
-#include "llvm/CodeGen/MachineInstrBuilder.h"
-#include "llvm/CodeGen/MachineRegisterInfo.h"
-#include "llvm/Support/Debug.h"
-#include "MCTargetDesc/PPCPredicates.h"
-
-using namespace llvm;
-
-#define DEBUG_TYPE "ppc-mi-peepholes"
-
-STATISTIC(RemoveTOCSave, "Number of TOC saves removed");
-STATISTIC(MultiTOCSaves,
- "Number of functions with multiple TOC saves that must be kept");
-STATISTIC(NumTOCSavesInPrologue, "Number of TOC saves placed in the prologue");
-STATISTIC(NumEliminatedSExt, "Number of eliminated sign-extensions");
-STATISTIC(NumEliminatedZExt, "Number of eliminated zero-extensions");
-STATISTIC(NumOptADDLIs, "Number of optimized ADD instruction fed by LI");
-STATISTIC(NumConvertedToImmediateForm,
- "Number of instructions converted to their immediate form");
-STATISTIC(NumFunctionsEnteredInMIPeephole,
- "Number of functions entered in PPC MI Peepholes");
-STATISTIC(NumFixedPointIterations,
- "Number of fixed-point iterations converting reg-reg instructions "
- "to reg-imm ones");
-STATISTIC(NumRotatesCollapsed,
- "Number of pairs of rotate left, clear left/right collapsed");
-STATISTIC(NumEXTSWAndSLDICombined,
- "Number of pairs of EXTSW and SLDI combined as EXTSWSLI");
-
-static cl::opt<bool>
-FixedPointRegToImm("ppc-reg-to-imm-fixed-point", cl::Hidden, cl::init(true),
- cl::desc("Iterate to a fixed point when attempting to "
- "convert reg-reg instructions to reg-imm"));
-
-static cl::opt<bool>
-ConvertRegReg("ppc-convert-rr-to-ri", cl::Hidden, cl::init(true),
- cl::desc("Convert eligible reg+reg instructions to reg+imm"));
-
-static cl::opt<bool>
- EnableSExtElimination("ppc-eliminate-signext",
- cl::desc("enable elimination of sign-extensions"),
- cl::init(false), cl::Hidden);
-
-static cl::opt<bool>
- EnableZExtElimination("ppc-eliminate-zeroext",
- cl::desc("enable elimination of zero-extensions"),
- cl::init(false), cl::Hidden);
-
-namespace {
-
-struct PPCMIPeephole : public MachineFunctionPass {
-
- static char ID;
- const PPCInstrInfo *TII;
- MachineFunction *MF;
- MachineRegisterInfo *MRI;
-
- PPCMIPeephole() : MachineFunctionPass(ID) {
- initializePPCMIPeepholePass(*PassRegistry::getPassRegistry());
- }
-
-private:
- MachineDominatorTree *MDT;
- MachinePostDominatorTree *MPDT;
- MachineBlockFrequencyInfo *MBFI;
- uint64_t EntryFreq;
-
- // Initialize class variables.
- void initialize(MachineFunction &MFParm);
-
- // Perform peepholes.
- bool simplifyCode(void);
-
- // Perform peepholes.
- bool eliminateRedundantCompare(void);
- bool eliminateRedundantTOCSaves(std::map<MachineInstr *, bool> &TOCSaves);
- bool combineSEXTAndSHL(MachineInstr &MI, MachineInstr *&ToErase);
- bool emitRLDICWhenLoweringJumpTables(MachineInstr &MI);
- void UpdateTOCSaves(std::map<MachineInstr *, bool> &TOCSaves,
- MachineInstr *MI);
-
-public:
-
- void getAnalysisUsage(AnalysisUsage &AU) const override {
- AU.addRequired<MachineDominatorTree>();
- AU.addRequired<MachinePostDominatorTree>();
- AU.addRequired<MachineBlockFrequencyInfo>();
- AU.addPreserved<MachineDominatorTree>();
- AU.addPreserved<MachinePostDominatorTree>();
- AU.addPreserved<MachineBlockFrequencyInfo>();
- MachineFunctionPass::getAnalysisUsage(AU);
- }
-
- // Main entry point for this pass.
- bool runOnMachineFunction(MachineFunction &MF) override {
- if (skipFunction(MF.getFunction()))
- return false;
- initialize(MF);
- return simplifyCode();
- }
-};
-
-// Initialize class variables.
-void PPCMIPeephole::initialize(MachineFunction &MFParm) {
- MF = &MFParm;
- MRI = &MF->getRegInfo();
- MDT = &getAnalysis<MachineDominatorTree>();
- MPDT = &getAnalysis<MachinePostDominatorTree>();
- MBFI = &getAnalysis<MachineBlockFrequencyInfo>();
- EntryFreq = MBFI->getEntryFreq();
- TII = MF->getSubtarget<PPCSubtarget>().getInstrInfo();
- LLVM_DEBUG(dbgs() << "*** PowerPC MI peephole pass ***\n\n");
- LLVM_DEBUG(MF->dump());
-}
-
-static MachineInstr *getVRegDefOrNull(MachineOperand *Op,
- MachineRegisterInfo *MRI) {
- assert(Op && "Invalid Operand!");
- if (!Op->isReg())
- return nullptr;
-
- unsigned Reg = Op->getReg();
- if (!TargetRegisterInfo::isVirtualRegister(Reg))
- return nullptr;
-
- return MRI->getVRegDef(Reg);
-}
-
-// This function returns number of known zero bits in output of MI
-// starting from the most significant bit.
-static unsigned
-getKnownLeadingZeroCount(MachineInstr *MI, const PPCInstrInfo *TII) {
- unsigned Opcode = MI->getOpcode();
- if (Opcode == PPC::RLDICL || Opcode == PPC::RLDICLo ||
- Opcode == PPC::RLDCL || Opcode == PPC::RLDCLo)
- return MI->getOperand(3).getImm();
-
- if ((Opcode == PPC::RLDIC || Opcode == PPC::RLDICo) &&
- MI->getOperand(3).getImm() <= 63 - MI->getOperand(2).getImm())
- return MI->getOperand(3).getImm();
-
- if ((Opcode == PPC::RLWINM || Opcode == PPC::RLWINMo ||
- Opcode == PPC::RLWNM || Opcode == PPC::RLWNMo ||
- Opcode == PPC::RLWINM8 || Opcode == PPC::RLWNM8) &&
- MI->getOperand(3).getImm() <= MI->getOperand(4).getImm())
- return 32 + MI->getOperand(3).getImm();
-
- if (Opcode == PPC::ANDIo) {
- uint16_t Imm = MI->getOperand(2).getImm();
- return 48 + countLeadingZeros(Imm);
- }
-
- if (Opcode == PPC::CNTLZW || Opcode == PPC::CNTLZWo ||
- Opcode == PPC::CNTTZW || Opcode == PPC::CNTTZWo ||
- Opcode == PPC::CNTLZW8 || Opcode == PPC::CNTTZW8)
- // The result ranges from 0 to 32.
- return 58;
-
- if (Opcode == PPC::CNTLZD || Opcode == PPC::CNTLZDo ||
- Opcode == PPC::CNTTZD || Opcode == PPC::CNTTZDo)
- // The result ranges from 0 to 64.
- return 57;
-
- if (Opcode == PPC::LHZ || Opcode == PPC::LHZX ||
- Opcode == PPC::LHZ8 || Opcode == PPC::LHZX8 ||
- Opcode == PPC::LHZU || Opcode == PPC::LHZUX ||
- Opcode == PPC::LHZU8 || Opcode == PPC::LHZUX8)
- return 48;
-
- if (Opcode == PPC::LBZ || Opcode == PPC::LBZX ||
- Opcode == PPC::LBZ8 || Opcode == PPC::LBZX8 ||
- Opcode == PPC::LBZU || Opcode == PPC::LBZUX ||
- Opcode == PPC::LBZU8 || Opcode == PPC::LBZUX8)
- return 56;
-
- if (TII->isZeroExtended(*MI))
- return 32;
-
- return 0;
-}
-
-// This function maintains a map for the pairs <TOC Save Instr, Keep>
-// Each time a new TOC save is encountered, it checks if any of the existing
-// ones are dominated by the new one. If so, it marks the existing one as
-// redundant by setting it's entry in the map as false. It then adds the new
-// instruction to the map with either true or false depending on if any
-// existing instructions dominated the new one.
-void PPCMIPeephole::UpdateTOCSaves(
- std::map<MachineInstr *, bool> &TOCSaves, MachineInstr *MI) {
- assert(TII->isTOCSaveMI(*MI) && "Expecting a TOC save instruction here");
- assert(MF->getSubtarget<PPCSubtarget>().isELFv2ABI() &&
- "TOC-save removal only supported on ELFv2");
- PPCFunctionInfo *FI = MF->getInfo<PPCFunctionInfo>();
-
- MachineBasicBlock *Entry = &MF->front();
- uint64_t CurrBlockFreq = MBFI->getBlockFreq(MI->getParent()).getFrequency();
-
- // If the block in which the TOC save resides is in a block that
- // post-dominates Entry, or a block that is hotter than entry (keep in mind
- // that early MachineLICM has already run so the TOC save won't be hoisted)
- // we can just do the save in the prologue.
- if (CurrBlockFreq > EntryFreq || MPDT->dominates(MI->getParent(), Entry))
- FI->setMustSaveTOC(true);
-
- // If we are saving the TOC in the prologue, all the TOC saves can be removed
- // from the code.
- if (FI->mustSaveTOC()) {
- for (auto &TOCSave : TOCSaves)
- TOCSave.second = false;
- // Add new instruction to map.
- TOCSaves[MI] = false;
- return;
- }
-
- bool Keep = true;
- for (auto It = TOCSaves.begin(); It != TOCSaves.end(); It++ ) {
- MachineInstr *CurrInst = It->first;
- // If new instruction dominates an existing one, mark existing one as
- // redundant.
- if (It->second && MDT->dominates(MI, CurrInst))
- It->second = false;
- // Check if the new instruction is redundant.
- if (MDT->dominates(CurrInst, MI)) {
- Keep = false;
- break;
- }
- }
- // Add new instruction to map.
- TOCSaves[MI] = Keep;
-}
-
-// Perform peephole optimizations.
-bool PPCMIPeephole::simplifyCode(void) {
- bool Simplified = false;
- MachineInstr* ToErase = nullptr;
- std::map<MachineInstr *, bool> TOCSaves;
- const TargetRegisterInfo *TRI = &TII->getRegisterInfo();
- NumFunctionsEnteredInMIPeephole++;
- if (ConvertRegReg) {
- // Fixed-point conversion of reg/reg instructions fed by load-immediate
- // into reg/imm instructions. FIXME: This is expensive, control it with
- // an option.
- bool SomethingChanged = false;
- do {
- NumFixedPointIterations++;
- SomethingChanged = false;
- for (MachineBasicBlock &MBB : *MF) {
- for (MachineInstr &MI : MBB) {
- if (MI.isDebugInstr())
- continue;
-
- if (TII->convertToImmediateForm(MI)) {
- // We don't erase anything in case the def has other uses. Let DCE
- // remove it if it can be removed.
- LLVM_DEBUG(dbgs() << "Converted instruction to imm form: ");
- LLVM_DEBUG(MI.dump());
- NumConvertedToImmediateForm++;
- SomethingChanged = true;
- Simplified = true;
- continue;
- }
- }
- }
- } while (SomethingChanged && FixedPointRegToImm);
- }
-
- for (MachineBasicBlock &MBB : *MF) {
- for (MachineInstr &MI : MBB) {
-
- // If the previous instruction was marked for elimination,
- // remove it now.
- if (ToErase) {
- ToErase->eraseFromParent();
- ToErase = nullptr;
- }
-
- // Ignore debug instructions.
- if (MI.isDebugInstr())
- continue;
-
- // Per-opcode peepholes.
- switch (MI.getOpcode()) {
-
- default:
- break;
-
- case PPC::STD: {
- MachineFrameInfo &MFI = MF->getFrameInfo();
- if (MFI.hasVarSizedObjects() ||
- !MF->getSubtarget<PPCSubtarget>().isELFv2ABI())
- break;
- // When encountering a TOC save instruction, call UpdateTOCSaves
- // to add it to the TOCSaves map and mark any existing TOC saves
- // it dominates as redundant.
- if (TII->isTOCSaveMI(MI))
- UpdateTOCSaves(TOCSaves, &MI);
- break;
- }
- case PPC::XXPERMDI: {
- // Perform simplifications of 2x64 vector swaps and splats.
- // A swap is identified by an immediate value of 2, and a splat
- // is identified by an immediate value of 0 or 3.
- int Immed = MI.getOperand(3).getImm();
-
- if (Immed != 1) {
-
- // For each of these simplifications, we need the two source
- // regs to match. Unfortunately, MachineCSE ignores COPY and
- // SUBREG_TO_REG, so for example we can see
- // XXPERMDI t, SUBREG_TO_REG(s), SUBREG_TO_REG(s), immed.
- // We have to look through chains of COPY and SUBREG_TO_REG
- // to find the real source values for comparison.
- unsigned TrueReg1 =
- TRI->lookThruCopyLike(MI.getOperand(1).getReg(), MRI);
- unsigned TrueReg2 =
- TRI->lookThruCopyLike(MI.getOperand(2).getReg(), MRI);
-
- if (TrueReg1 == TrueReg2
- && TargetRegisterInfo::isVirtualRegister(TrueReg1)) {
- MachineInstr *DefMI = MRI->getVRegDef(TrueReg1);
- unsigned DefOpc = DefMI ? DefMI->getOpcode() : 0;
-
- // If this is a splat fed by a splatting load, the splat is
- // redundant. Replace with a copy. This doesn't happen directly due
- // to code in PPCDAGToDAGISel.cpp, but it can happen when converting
- // a load of a double to a vector of 64-bit integers.
- auto isConversionOfLoadAndSplat = [=]() -> bool {
- if (DefOpc != PPC::XVCVDPSXDS && DefOpc != PPC::XVCVDPUXDS)
- return false;
- unsigned DefReg =
- TRI->lookThruCopyLike(DefMI->getOperand(1).getReg(), MRI);
- if (TargetRegisterInfo::isVirtualRegister(DefReg)) {
- MachineInstr *LoadMI = MRI->getVRegDef(DefReg);
- if (LoadMI && LoadMI->getOpcode() == PPC::LXVDSX)
- return true;
- }
- return false;
- };
- if (DefMI && (Immed == 0 || Immed == 3)) {
- if (DefOpc == PPC::LXVDSX || isConversionOfLoadAndSplat()) {
- LLVM_DEBUG(dbgs() << "Optimizing load-and-splat/splat "
- "to load-and-splat/copy: ");
- LLVM_DEBUG(MI.dump());
- BuildMI(MBB, &MI, MI.getDebugLoc(), TII->get(PPC::COPY),
- MI.getOperand(0).getReg())
- .add(MI.getOperand(1));
- ToErase = &MI;
- Simplified = true;
- }
- }
-
- // If this is a splat or a swap fed by another splat, we
- // can replace it with a copy.
- if (DefOpc == PPC::XXPERMDI) {
- unsigned FeedImmed = DefMI->getOperand(3).getImm();
- unsigned FeedReg1 =
- TRI->lookThruCopyLike(DefMI->getOperand(1).getReg(), MRI);
- unsigned FeedReg2 =
- TRI->lookThruCopyLike(DefMI->getOperand(2).getReg(), MRI);
-
- if ((FeedImmed == 0 || FeedImmed == 3) && FeedReg1 == FeedReg2) {
- LLVM_DEBUG(dbgs() << "Optimizing splat/swap or splat/splat "
- "to splat/copy: ");
- LLVM_DEBUG(MI.dump());
- BuildMI(MBB, &MI, MI.getDebugLoc(), TII->get(PPC::COPY),
- MI.getOperand(0).getReg())
- .add(MI.getOperand(1));
- ToErase = &MI;
- Simplified = true;
- }
-
- // If this is a splat fed by a swap, we can simplify modify
- // the splat to splat the other value from the swap's input
- // parameter.
- else if ((Immed == 0 || Immed == 3)
- && FeedImmed == 2 && FeedReg1 == FeedReg2) {
- LLVM_DEBUG(dbgs() << "Optimizing swap/splat => splat: ");
- LLVM_DEBUG(MI.dump());
- MI.getOperand(1).setReg(DefMI->getOperand(1).getReg());
- MI.getOperand(2).setReg(DefMI->getOperand(2).getReg());
- MI.getOperand(3).setImm(3 - Immed);
- Simplified = true;
- }
-
- // If this is a swap fed by a swap, we can replace it
- // with a copy from the first swap's input.
- else if (Immed == 2 && FeedImmed == 2 && FeedReg1 == FeedReg2) {
- LLVM_DEBUG(dbgs() << "Optimizing swap/swap => copy: ");
- LLVM_DEBUG(MI.dump());
- BuildMI(MBB, &MI, MI.getDebugLoc(), TII->get(PPC::COPY),
- MI.getOperand(0).getReg())
- .add(DefMI->getOperand(1));
- ToErase = &MI;
- Simplified = true;
- }
- } else if ((Immed == 0 || Immed == 3) && DefOpc == PPC::XXPERMDIs &&
- (DefMI->getOperand(2).getImm() == 0 ||
- DefMI->getOperand(2).getImm() == 3)) {
- // Splat fed by another splat - switch the output of the first
- // and remove the second.
- DefMI->getOperand(0).setReg(MI.getOperand(0).getReg());
- ToErase = &MI;
- Simplified = true;
- LLVM_DEBUG(dbgs() << "Removing redundant splat: ");
- LLVM_DEBUG(MI.dump());
- }
- }
- }
- break;
- }
- case PPC::VSPLTB:
- case PPC::VSPLTH:
- case PPC::XXSPLTW: {
- unsigned MyOpcode = MI.getOpcode();
- unsigned OpNo = MyOpcode == PPC::XXSPLTW ? 1 : 2;
- unsigned TrueReg =
- TRI->lookThruCopyLike(MI.getOperand(OpNo).getReg(), MRI);
- if (!TargetRegisterInfo::isVirtualRegister(TrueReg))
- break;
- MachineInstr *DefMI = MRI->getVRegDef(TrueReg);
- if (!DefMI)
- break;
- unsigned DefOpcode = DefMI->getOpcode();
- auto isConvertOfSplat = [=]() -> bool {
- if (DefOpcode != PPC::XVCVSPSXWS && DefOpcode != PPC::XVCVSPUXWS)
- return false;
- unsigned ConvReg = DefMI->getOperand(1).getReg();
- if (!TargetRegisterInfo::isVirtualRegister(ConvReg))
- return false;
- MachineInstr *Splt = MRI->getVRegDef(ConvReg);
- return Splt && (Splt->getOpcode() == PPC::LXVWSX ||
- Splt->getOpcode() == PPC::XXSPLTW);
- };
- bool AlreadySplat = (MyOpcode == DefOpcode) ||
- (MyOpcode == PPC::VSPLTB && DefOpcode == PPC::VSPLTBs) ||
- (MyOpcode == PPC::VSPLTH && DefOpcode == PPC::VSPLTHs) ||
- (MyOpcode == PPC::XXSPLTW && DefOpcode == PPC::XXSPLTWs) ||
- (MyOpcode == PPC::XXSPLTW && DefOpcode == PPC::LXVWSX) ||
- (MyOpcode == PPC::XXSPLTW && DefOpcode == PPC::MTVSRWS)||
- (MyOpcode == PPC::XXSPLTW && isConvertOfSplat());
- // If the instruction[s] that feed this splat have already splat
- // the value, this splat is redundant.
- if (AlreadySplat) {
- LLVM_DEBUG(dbgs() << "Changing redundant splat to a copy: ");
- LLVM_DEBUG(MI.dump());
- BuildMI(MBB, &MI, MI.getDebugLoc(), TII->get(PPC::COPY),
- MI.getOperand(0).getReg())
- .add(MI.getOperand(OpNo));
- ToErase = &MI;
- Simplified = true;
- }
- // Splat fed by a shift. Usually when we align value to splat into
- // vector element zero.
- if (DefOpcode == PPC::XXSLDWI) {
- unsigned ShiftRes = DefMI->getOperand(0).getReg();
- unsigned ShiftOp1 = DefMI->getOperand(1).getReg();
- unsigned ShiftOp2 = DefMI->getOperand(2).getReg();
- unsigned ShiftImm = DefMI->getOperand(3).getImm();
- unsigned SplatImm = MI.getOperand(2).getImm();
- if (ShiftOp1 == ShiftOp2) {
- unsigned NewElem = (SplatImm + ShiftImm) & 0x3;
- if (MRI->hasOneNonDBGUse(ShiftRes)) {
- LLVM_DEBUG(dbgs() << "Removing redundant shift: ");
- LLVM_DEBUG(DefMI->dump());
- ToErase = DefMI;
- }
- Simplified = true;
- LLVM_DEBUG(dbgs() << "Changing splat immediate from " << SplatImm
- << " to " << NewElem << " in instruction: ");
- LLVM_DEBUG(MI.dump());
- MI.getOperand(1).setReg(ShiftOp1);
- MI.getOperand(2).setImm(NewElem);
- }
- }
- break;
- }
- case PPC::XVCVDPSP: {
- // If this is a DP->SP conversion fed by an FRSP, the FRSP is redundant.
- unsigned TrueReg =
- TRI->lookThruCopyLike(MI.getOperand(1).getReg(), MRI);
- if (!TargetRegisterInfo::isVirtualRegister(TrueReg))
- break;
- MachineInstr *DefMI = MRI->getVRegDef(TrueReg);
-
- // This can occur when building a vector of single precision or integer
- // values.
- if (DefMI && DefMI->getOpcode() == PPC::XXPERMDI) {
- unsigned DefsReg1 =
- TRI->lookThruCopyLike(DefMI->getOperand(1).getReg(), MRI);
- unsigned DefsReg2 =
- TRI->lookThruCopyLike(DefMI->getOperand(2).getReg(), MRI);
- if (!TargetRegisterInfo::isVirtualRegister(DefsReg1) ||
- !TargetRegisterInfo::isVirtualRegister(DefsReg2))
- break;
- MachineInstr *P1 = MRI->getVRegDef(DefsReg1);
- MachineInstr *P2 = MRI->getVRegDef(DefsReg2);
-
- if (!P1 || !P2)
- break;
-
- // Remove the passed FRSP instruction if it only feeds this MI and
- // set any uses of that FRSP (in this MI) to the source of the FRSP.
- auto removeFRSPIfPossible = [&](MachineInstr *RoundInstr) {
- if (RoundInstr->getOpcode() == PPC::FRSP &&
- MRI->hasOneNonDBGUse(RoundInstr->getOperand(0).getReg())) {
- Simplified = true;
- unsigned ConvReg1 = RoundInstr->getOperand(1).getReg();
- unsigned FRSPDefines = RoundInstr->getOperand(0).getReg();
- MachineInstr &Use = *(MRI->use_instr_begin(FRSPDefines));
- for (int i = 0, e = Use.getNumOperands(); i < e; ++i)
- if (Use.getOperand(i).isReg() &&
- Use.getOperand(i).getReg() == FRSPDefines)
- Use.getOperand(i).setReg(ConvReg1);
- LLVM_DEBUG(dbgs() << "Removing redundant FRSP:\n");
- LLVM_DEBUG(RoundInstr->dump());
- LLVM_DEBUG(dbgs() << "As it feeds instruction:\n");
- LLVM_DEBUG(MI.dump());
- LLVM_DEBUG(dbgs() << "Through instruction:\n");
- LLVM_DEBUG(DefMI->dump());
- RoundInstr->eraseFromParent();
- }
- };
-
- // If the input to XVCVDPSP is a vector that was built (even
- // partially) out of FRSP's, the FRSP(s) can safely be removed
- // since this instruction performs the same operation.
- if (P1 != P2) {
- removeFRSPIfPossible(P1);
- removeFRSPIfPossible(P2);
- break;
- }
- removeFRSPIfPossible(P1);
- }
- break;
- }
- case PPC::EXTSH:
- case PPC::EXTSH8:
- case PPC::EXTSH8_32_64: {
- if (!EnableSExtElimination) break;
- unsigned NarrowReg = MI.getOperand(1).getReg();
- if (!TargetRegisterInfo::isVirtualRegister(NarrowReg))
- break;
-
- MachineInstr *SrcMI = MRI->getVRegDef(NarrowReg);
- // If we've used a zero-extending load that we will sign-extend,
- // just do a sign-extending load.
- if (SrcMI->getOpcode() == PPC::LHZ ||
- SrcMI->getOpcode() == PPC::LHZX) {
- if (!MRI->hasOneNonDBGUse(SrcMI->getOperand(0).getReg()))
- break;
- auto is64Bit = [] (unsigned Opcode) {
- return Opcode == PPC::EXTSH8;
- };
- auto isXForm = [] (unsigned Opcode) {
- return Opcode == PPC::LHZX;
- };
- auto getSextLoadOp = [] (bool is64Bit, bool isXForm) {
- if (is64Bit)
- if (isXForm) return PPC::LHAX8;
- else return PPC::LHA8;
- else
- if (isXForm) return PPC::LHAX;
- else return PPC::LHA;
- };
- unsigned Opc = getSextLoadOp(is64Bit(MI.getOpcode()),
- isXForm(SrcMI->getOpcode()));
- LLVM_DEBUG(dbgs() << "Zero-extending load\n");
- LLVM_DEBUG(SrcMI->dump());
- LLVM_DEBUG(dbgs() << "and sign-extension\n");
- LLVM_DEBUG(MI.dump());
- LLVM_DEBUG(dbgs() << "are merged into sign-extending load\n");
- SrcMI->setDesc(TII->get(Opc));
- SrcMI->getOperand(0).setReg(MI.getOperand(0).getReg());
- ToErase = &MI;
- Simplified = true;
- NumEliminatedSExt++;
- }
- break;
- }
- case PPC::EXTSW:
- case PPC::EXTSW_32:
- case PPC::EXTSW_32_64: {
- if (!EnableSExtElimination) break;
- unsigned NarrowReg = MI.getOperand(1).getReg();
- if (!TargetRegisterInfo::isVirtualRegister(NarrowReg))
- break;
-
- MachineInstr *SrcMI = MRI->getVRegDef(NarrowReg);
- // If we've used a zero-extending load that we will sign-extend,
- // just do a sign-extending load.
- if (SrcMI->getOpcode() == PPC::LWZ ||
- SrcMI->getOpcode() == PPC::LWZX) {
- if (!MRI->hasOneNonDBGUse(SrcMI->getOperand(0).getReg()))
- break;
- auto is64Bit = [] (unsigned Opcode) {
- return Opcode == PPC::EXTSW || Opcode == PPC::EXTSW_32_64;
- };
- auto isXForm = [] (unsigned Opcode) {
- return Opcode == PPC::LWZX;
- };
- auto getSextLoadOp = [] (bool is64Bit, bool isXForm) {
- if (is64Bit)
- if (isXForm) return PPC::LWAX;
- else return PPC::LWA;
- else
- if (isXForm) return PPC::LWAX_32;
- else return PPC::LWA_32;
- };
- unsigned Opc = getSextLoadOp(is64Bit(MI.getOpcode()),
- isXForm(SrcMI->getOpcode()));
- LLVM_DEBUG(dbgs() << "Zero-extending load\n");
- LLVM_DEBUG(SrcMI->dump());
- LLVM_DEBUG(dbgs() << "and sign-extension\n");
- LLVM_DEBUG(MI.dump());
- LLVM_DEBUG(dbgs() << "are merged into sign-extending load\n");
- SrcMI->setDesc(TII->get(Opc));
- SrcMI->getOperand(0).setReg(MI.getOperand(0).getReg());
- ToErase = &MI;
- Simplified = true;
- NumEliminatedSExt++;
- } else if (MI.getOpcode() == PPC::EXTSW_32_64 &&
- TII->isSignExtended(*SrcMI)) {
- // We can eliminate EXTSW if the input is known to be already
- // sign-extended.
- LLVM_DEBUG(dbgs() << "Removing redundant sign-extension\n");
- unsigned TmpReg =
- MF->getRegInfo().createVirtualRegister(&PPC::G8RCRegClass);
- BuildMI(MBB, &MI, MI.getDebugLoc(), TII->get(PPC::IMPLICIT_DEF),
- TmpReg);
- BuildMI(MBB, &MI, MI.getDebugLoc(), TII->get(PPC::INSERT_SUBREG),
- MI.getOperand(0).getReg())
- .addReg(TmpReg)
- .addReg(NarrowReg)
- .addImm(PPC::sub_32);
- ToErase = &MI;
- Simplified = true;
- NumEliminatedSExt++;
- }
- break;
- }
- case PPC::RLDICL: {
- // We can eliminate RLDICL (e.g. for zero-extension)
- // if all bits to clear are already zero in the input.
- // This code assume following code sequence for zero-extension.
- // %6 = COPY %5:sub_32; (optional)
- // %8 = IMPLICIT_DEF;
- // %7<def,tied1> = INSERT_SUBREG %8<tied0>, %6, sub_32;
- if (!EnableZExtElimination) break;
-
- if (MI.getOperand(2).getImm() != 0)
- break;
-
- unsigned SrcReg = MI.getOperand(1).getReg();
- if (!TargetRegisterInfo::isVirtualRegister(SrcReg))
- break;
-
- MachineInstr *SrcMI = MRI->getVRegDef(SrcReg);
- if (!(SrcMI && SrcMI->getOpcode() == PPC::INSERT_SUBREG &&
- SrcMI->getOperand(0).isReg() && SrcMI->getOperand(1).isReg()))
- break;
-
- MachineInstr *ImpDefMI, *SubRegMI;
- ImpDefMI = MRI->getVRegDef(SrcMI->getOperand(1).getReg());
- SubRegMI = MRI->getVRegDef(SrcMI->getOperand(2).getReg());
- if (ImpDefMI->getOpcode() != PPC::IMPLICIT_DEF) break;
-
- SrcMI = SubRegMI;
- if (SubRegMI->getOpcode() == PPC::COPY) {
- unsigned CopyReg = SubRegMI->getOperand(1).getReg();
- if (TargetRegisterInfo::isVirtualRegister(CopyReg))
- SrcMI = MRI->getVRegDef(CopyReg);
- }
-
- unsigned KnownZeroCount = getKnownLeadingZeroCount(SrcMI, TII);
- if (MI.getOperand(3).getImm() <= KnownZeroCount) {
- LLVM_DEBUG(dbgs() << "Removing redundant zero-extension\n");
- BuildMI(MBB, &MI, MI.getDebugLoc(), TII->get(PPC::COPY),
- MI.getOperand(0).getReg())
- .addReg(SrcReg);
- ToErase = &MI;
- Simplified = true;
- NumEliminatedZExt++;
- }
- break;
- }
-
- // TODO: Any instruction that has an immediate form fed only by a PHI
- // whose operands are all load immediate can be folded away. We currently
- // do this for ADD instructions, but should expand it to arithmetic and
- // binary instructions with immediate forms in the future.
- case PPC::ADD4:
- case PPC::ADD8: {
- auto isSingleUsePHI = [&](MachineOperand *PhiOp) {
- assert(PhiOp && "Invalid Operand!");
- MachineInstr *DefPhiMI = getVRegDefOrNull(PhiOp, MRI);
-
- return DefPhiMI && (DefPhiMI->getOpcode() == PPC::PHI) &&
- MRI->hasOneNonDBGUse(DefPhiMI->getOperand(0).getReg());
- };
-
- auto dominatesAllSingleUseLIs = [&](MachineOperand *DominatorOp,
- MachineOperand *PhiOp) {
- assert(PhiOp && "Invalid Operand!");
- assert(DominatorOp && "Invalid Operand!");
- MachineInstr *DefPhiMI = getVRegDefOrNull(PhiOp, MRI);
- MachineInstr *DefDomMI = getVRegDefOrNull(DominatorOp, MRI);
-
- // Note: the vregs only show up at odd indices position of PHI Node,
- // the even indices position save the BB info.
- for (unsigned i = 1; i < DefPhiMI->getNumOperands(); i += 2) {
- MachineInstr *LiMI =
- getVRegDefOrNull(&DefPhiMI->getOperand(i), MRI);
- if (!LiMI ||
- (LiMI->getOpcode() != PPC::LI && LiMI->getOpcode() != PPC::LI8)
- || !MRI->hasOneNonDBGUse(LiMI->getOperand(0).getReg()) ||
- !MDT->dominates(DefDomMI, LiMI))
- return false;
- }
-
- return true;
- };
-
- MachineOperand Op1 = MI.getOperand(1);
- MachineOperand Op2 = MI.getOperand(2);
- if (isSingleUsePHI(&Op2) && dominatesAllSingleUseLIs(&Op1, &Op2))
- std::swap(Op1, Op2);
- else if (!isSingleUsePHI(&Op1) || !dominatesAllSingleUseLIs(&Op2, &Op1))
- break; // We don't have an ADD fed by LI's that can be transformed
-
- // Now we know that Op1 is the PHI node and Op2 is the dominator
- unsigned DominatorReg = Op2.getReg();
-
- const TargetRegisterClass *TRC = MI.getOpcode() == PPC::ADD8
- ? &PPC::G8RC_and_G8RC_NOX0RegClass
- : &PPC::GPRC_and_GPRC_NOR0RegClass;
- MRI->setRegClass(DominatorReg, TRC);
-
- // replace LIs with ADDIs
- MachineInstr *DefPhiMI = getVRegDefOrNull(&Op1, MRI);
- for (unsigned i = 1; i < DefPhiMI->getNumOperands(); i += 2) {
- MachineInstr *LiMI = getVRegDefOrNull(&DefPhiMI->getOperand(i), MRI);
- LLVM_DEBUG(dbgs() << "Optimizing LI to ADDI: ");
- LLVM_DEBUG(LiMI->dump());
-
- // There could be repeated registers in the PHI, e.g: %1 =
- // PHI %6, <%bb.2>, %8, <%bb.3>, %8, <%bb.6>; So if we've
- // already replaced the def instruction, skip.
- if (LiMI->getOpcode() == PPC::ADDI || LiMI->getOpcode() == PPC::ADDI8)
- continue;
-
- assert((LiMI->getOpcode() == PPC::LI ||
- LiMI->getOpcode() == PPC::LI8) &&
- "Invalid Opcode!");
- auto LiImm = LiMI->getOperand(1).getImm(); // save the imm of LI
- LiMI->RemoveOperand(1); // remove the imm of LI
- LiMI->setDesc(TII->get(LiMI->getOpcode() == PPC::LI ? PPC::ADDI
- : PPC::ADDI8));
- MachineInstrBuilder(*LiMI->getParent()->getParent(), *LiMI)
- .addReg(DominatorReg)
- .addImm(LiImm); // restore the imm of LI
- LLVM_DEBUG(LiMI->dump());
- }
-
- // Replace ADD with COPY
- LLVM_DEBUG(dbgs() << "Optimizing ADD to COPY: ");
- LLVM_DEBUG(MI.dump());
- BuildMI(MBB, &MI, MI.getDebugLoc(), TII->get(PPC::COPY),
- MI.getOperand(0).getReg())
- .add(Op1);
- ToErase = &MI;
- Simplified = true;
- NumOptADDLIs++;
- break;
- }
- case PPC::RLDICR: {
- Simplified |= emitRLDICWhenLoweringJumpTables(MI) ||
- combineSEXTAndSHL(MI, ToErase);
- break;
- }
- }
- }
-
- // If the last instruction was marked for elimination,
- // remove it now.
- if (ToErase) {
- ToErase->eraseFromParent();
- ToErase = nullptr;
- }
- }
-
- // Eliminate all the TOC save instructions which are redundant.
- Simplified |= eliminateRedundantTOCSaves(TOCSaves);
- PPCFunctionInfo *FI = MF->getInfo<PPCFunctionInfo>();
- if (FI->mustSaveTOC())
- NumTOCSavesInPrologue++;
-
- // We try to eliminate redundant compare instruction.
- Simplified |= eliminateRedundantCompare();
-
- return Simplified;
-}
-
-// helper functions for eliminateRedundantCompare
-static bool isEqOrNe(MachineInstr *BI) {
- PPC::Predicate Pred = (PPC::Predicate)BI->getOperand(0).getImm();
- unsigned PredCond = PPC::getPredicateCondition(Pred);
- return (PredCond == PPC::PRED_EQ || PredCond == PPC::PRED_NE);
-}
-
-static bool isSupportedCmpOp(unsigned opCode) {
- return (opCode == PPC::CMPLD || opCode == PPC::CMPD ||
- opCode == PPC::CMPLW || opCode == PPC::CMPW ||
- opCode == PPC::CMPLDI || opCode == PPC::CMPDI ||
- opCode == PPC::CMPLWI || opCode == PPC::CMPWI);
-}
-
-static bool is64bitCmpOp(unsigned opCode) {
- return (opCode == PPC::CMPLD || opCode == PPC::CMPD ||
- opCode == PPC::CMPLDI || opCode == PPC::CMPDI);
-}
-
-static bool isSignedCmpOp(unsigned opCode) {
- return (opCode == PPC::CMPD || opCode == PPC::CMPW ||
- opCode == PPC::CMPDI || opCode == PPC::CMPWI);
-}
-
-static unsigned getSignedCmpOpCode(unsigned opCode) {
- if (opCode == PPC::CMPLD) return PPC::CMPD;
- if (opCode == PPC::CMPLW) return PPC::CMPW;
- if (opCode == PPC::CMPLDI) return PPC::CMPDI;
- if (opCode == PPC::CMPLWI) return PPC::CMPWI;
- return opCode;
-}
-
-// We can decrement immediate x in (GE x) by changing it to (GT x-1) or
-// (LT x) to (LE x-1)
-static unsigned getPredicateToDecImm(MachineInstr *BI, MachineInstr *CMPI) {
- uint64_t Imm = CMPI->getOperand(2).getImm();
- bool SignedCmp = isSignedCmpOp(CMPI->getOpcode());
- if ((!SignedCmp && Imm == 0) || (SignedCmp && Imm == 0x8000))
- return 0;
-
- PPC::Predicate Pred = (PPC::Predicate)BI->getOperand(0).getImm();
- unsigned PredCond = PPC::getPredicateCondition(Pred);
- unsigned PredHint = PPC::getPredicateHint(Pred);
- if (PredCond == PPC::PRED_GE)
- return PPC::getPredicate(PPC::PRED_GT, PredHint);
- if (PredCond == PPC::PRED_LT)
- return PPC::getPredicate(PPC::PRED_LE, PredHint);
-
- return 0;
-}
-
-// We can increment immediate x in (GT x) by changing it to (GE x+1) or
-// (LE x) to (LT x+1)
-static unsigned getPredicateToIncImm(MachineInstr *BI, MachineInstr *CMPI) {
- uint64_t Imm = CMPI->getOperand(2).getImm();
- bool SignedCmp = isSignedCmpOp(CMPI->getOpcode());
- if ((!SignedCmp && Imm == 0xFFFF) || (SignedCmp && Imm == 0x7FFF))
- return 0;
-
- PPC::Predicate Pred = (PPC::Predicate)BI->getOperand(0).getImm();
- unsigned PredCond = PPC::getPredicateCondition(Pred);
- unsigned PredHint = PPC::getPredicateHint(Pred);
- if (PredCond == PPC::PRED_GT)
- return PPC::getPredicate(PPC::PRED_GE, PredHint);
- if (PredCond == PPC::PRED_LE)
- return PPC::getPredicate(PPC::PRED_LT, PredHint);
-
- return 0;
-}
-
-// This takes a Phi node and returns a register value for the specified BB.
-static unsigned getIncomingRegForBlock(MachineInstr *Phi,
- MachineBasicBlock *MBB) {
- for (unsigned I = 2, E = Phi->getNumOperands() + 1; I != E; I += 2) {
- MachineOperand &MO = Phi->getOperand(I);
- if (MO.getMBB() == MBB)
- return Phi->getOperand(I-1).getReg();
- }
- llvm_unreachable("invalid src basic block for this Phi node\n");
- return 0;
-}
-
-// This function tracks the source of the register through register copy.
-// If BB1 and BB2 are non-NULL, we also track PHI instruction in BB2
-// assuming that the control comes from BB1 into BB2.
-static unsigned getSrcVReg(unsigned Reg, MachineBasicBlock *BB1,
- MachineBasicBlock *BB2, MachineRegisterInfo *MRI) {
- unsigned SrcReg = Reg;
- while (1) {
- unsigned NextReg = SrcReg;
- MachineInstr *Inst = MRI->getVRegDef(SrcReg);
- if (BB1 && Inst->getOpcode() == PPC::PHI && Inst->getParent() == BB2) {
- NextReg = getIncomingRegForBlock(Inst, BB1);
- // We track through PHI only once to avoid infinite loop.
- BB1 = nullptr;
- }
- else if (Inst->isFullCopy())
- NextReg = Inst->getOperand(1).getReg();
- if (NextReg == SrcReg || !TargetRegisterInfo::isVirtualRegister(NextReg))
- break;
- SrcReg = NextReg;
- }
- return SrcReg;
-}
-
-static bool eligibleForCompareElimination(MachineBasicBlock &MBB,
- MachineBasicBlock *&PredMBB,
- MachineBasicBlock *&MBBtoMoveCmp,
- MachineRegisterInfo *MRI) {
-
- auto isEligibleBB = [&](MachineBasicBlock &BB) {
- auto BII = BB.getFirstInstrTerminator();
- // We optimize BBs ending with a conditional branch.
- // We check only for BCC here, not BCCLR, because BCCLR
- // will be formed only later in the pipeline.
- if (BB.succ_size() == 2 &&
- BII != BB.instr_end() &&
- (*BII).getOpcode() == PPC::BCC &&
- (*BII).getOperand(1).isReg()) {
- // We optimize only if the condition code is used only by one BCC.
- unsigned CndReg = (*BII).getOperand(1).getReg();
- if (!TargetRegisterInfo::isVirtualRegister(CndReg) ||
- !MRI->hasOneNonDBGUse(CndReg))
- return false;
-
- MachineInstr *CMPI = MRI->getVRegDef(CndReg);
- // We assume compare and branch are in the same BB for ease of analysis.
- if (CMPI->getParent() != &BB)
- return false;
-
- // We skip this BB if a physical register is used in comparison.
- for (MachineOperand &MO : CMPI->operands())
- if (MO.isReg() && !TargetRegisterInfo::isVirtualRegister(MO.getReg()))
- return false;
-
- return true;
- }
- return false;
- };
-
- // If this BB has more than one successor, we can create a new BB and
- // move the compare instruction in the new BB.
- // So far, we do not move compare instruction to a BB having multiple
- // successors to avoid potentially increasing code size.
- auto isEligibleForMoveCmp = [](MachineBasicBlock &BB) {
- return BB.succ_size() == 1;
- };
-
- if (!isEligibleBB(MBB))
- return false;
-
- unsigned NumPredBBs = MBB.pred_size();
- if (NumPredBBs == 1) {
- MachineBasicBlock *TmpMBB = *MBB.pred_begin();
- if (isEligibleBB(*TmpMBB)) {
- PredMBB = TmpMBB;
- MBBtoMoveCmp = nullptr;
- return true;
- }
- }
- else if (NumPredBBs == 2) {
- // We check for partially redundant case.
- // So far, we support cases with only two predecessors
- // to avoid increasing the number of instructions.
- MachineBasicBlock::pred_iterator PI = MBB.pred_begin();
- MachineBasicBlock *Pred1MBB = *PI;
- MachineBasicBlock *Pred2MBB = *(PI+1);
-
- if (isEligibleBB(*Pred1MBB) && isEligibleForMoveCmp(*Pred2MBB)) {
- // We assume Pred1MBB is the BB containing the compare to be merged and
- // Pred2MBB is the BB to which we will append a compare instruction.
- // Hence we can proceed as is.
- }
- else if (isEligibleBB(*Pred2MBB) && isEligibleForMoveCmp(*Pred1MBB)) {
- // We need to swap Pred1MBB and Pred2MBB to canonicalize.
- std::swap(Pred1MBB, Pred2MBB);
- }
- else return false;
-
- // Here, Pred2MBB is the BB to which we need to append a compare inst.
- // We cannot move the compare instruction if operands are not available
- // in Pred2MBB (i.e. defined in MBB by an instruction other than PHI).
- MachineInstr *BI = &*MBB.getFirstInstrTerminator();
- MachineInstr *CMPI = MRI->getVRegDef(BI->getOperand(1).getReg());
- for (int I = 1; I <= 2; I++)
- if (CMPI->getOperand(I).isReg()) {
- MachineInstr *Inst = MRI->getVRegDef(CMPI->getOperand(I).getReg());
- if (Inst->getParent() == &MBB && Inst->getOpcode() != PPC::PHI)
- return false;
- }
-
- PredMBB = Pred1MBB;
- MBBtoMoveCmp = Pred2MBB;
- return true;
- }
-
- return false;
-}
-
-// This function will iterate over the input map containing a pair of TOC save
-// instruction and a flag. The flag will be set to false if the TOC save is
-// proven redundant. This function will erase from the basic block all the TOC
-// saves marked as redundant.
-bool PPCMIPeephole::eliminateRedundantTOCSaves(
- std::map<MachineInstr *, bool> &TOCSaves) {
- bool Simplified = false;
- int NumKept = 0;
- for (auto TOCSave : TOCSaves) {
- if (!TOCSave.second) {
- TOCSave.first->eraseFromParent();
- RemoveTOCSave++;
- Simplified = true;
- } else {
- NumKept++;
- }
- }
-
- if (NumKept > 1)
- MultiTOCSaves++;
-
- return Simplified;
-}
-
-// If multiple conditional branches are executed based on the (essentially)
-// same comparison, we merge compare instructions into one and make multiple
-// conditional branches on this comparison.
-// For example,
-// if (a == 0) { ... }
-// else if (a < 0) { ... }
-// can be executed by one compare and two conditional branches instead of
-// two pairs of a compare and a conditional branch.
-//
-// This method merges two compare instructions in two MBBs and modifies the
-// compare and conditional branch instructions if needed.
-// For the above example, the input for this pass looks like:
-// cmplwi r3, 0
-// beq 0, .LBB0_3
-// cmpwi r3, -1
-// bgt 0, .LBB0_4
-// So, before merging two compares, we need to modify these instructions as
-// cmpwi r3, 0 ; cmplwi and cmpwi yield same result for beq
-// beq 0, .LBB0_3
-// cmpwi r3, 0 ; greather than -1 means greater or equal to 0
-// bge 0, .LBB0_4
-
-bool PPCMIPeephole::eliminateRedundantCompare(void) {
- bool Simplified = false;
-
- for (MachineBasicBlock &MBB2 : *MF) {
- MachineBasicBlock *MBB1 = nullptr, *MBBtoMoveCmp = nullptr;
-
- // For fully redundant case, we select two basic blocks MBB1 and MBB2
- // as an optimization target if
- // - both MBBs end with a conditional branch,
- // - MBB1 is the only predecessor of MBB2, and
- // - compare does not take a physical register as a operand in both MBBs.
- // In this case, eligibleForCompareElimination sets MBBtoMoveCmp nullptr.
- //
- // As partially redundant case, we additionally handle if MBB2 has one
- // additional predecessor, which has only one successor (MBB2).
- // In this case, we move the compare instruction originally in MBB2 into
- // MBBtoMoveCmp. This partially redundant case is typically appear by
- // compiling a while loop; here, MBBtoMoveCmp is the loop preheader.
- //
- // Overview of CFG of related basic blocks
- // Fully redundant case Partially redundant case
- // -------- ---------------- --------
- // | MBB1 | (w/ 2 succ) | MBBtoMoveCmp | | MBB1 | (w/ 2 succ)
- // -------- ---------------- --------
- // | \ (w/ 1 succ) \ | \
- // | \ \ | \
- // | \ |
- // -------- --------
- // | MBB2 | (w/ 1 pred | MBB2 | (w/ 2 pred
- // -------- and 2 succ) -------- and 2 succ)
- // | \ | \
- // | \ | \
- //
- if (!eligibleForCompareElimination(MBB2, MBB1, MBBtoMoveCmp, MRI))
- continue;
-
- MachineInstr *BI1 = &*MBB1->getFirstInstrTerminator();
- MachineInstr *CMPI1 = MRI->getVRegDef(BI1->getOperand(1).getReg());
-
- MachineInstr *BI2 = &*MBB2.getFirstInstrTerminator();
- MachineInstr *CMPI2 = MRI->getVRegDef(BI2->getOperand(1).getReg());
- bool IsPartiallyRedundant = (MBBtoMoveCmp != nullptr);
-
- // We cannot optimize an unsupported compare opcode or
- // a mix of 32-bit and 64-bit comaprisons
- if (!isSupportedCmpOp(CMPI1->getOpcode()) ||
- !isSupportedCmpOp(CMPI2->getOpcode()) ||
- is64bitCmpOp(CMPI1->getOpcode()) != is64bitCmpOp(CMPI2->getOpcode()))
- continue;
-
- unsigned NewOpCode = 0;
- unsigned NewPredicate1 = 0, NewPredicate2 = 0;
- int16_t Imm1 = 0, NewImm1 = 0, Imm2 = 0, NewImm2 = 0;
- bool SwapOperands = false;
-
- if (CMPI1->getOpcode() != CMPI2->getOpcode()) {
- // Typically, unsigned comparison is used for equality check, but
- // we replace it with a signed comparison if the comparison
- // to be merged is a signed comparison.
- // In other cases of opcode mismatch, we cannot optimize this.
-
- // We cannot change opcode when comparing against an immediate
- // if the most significant bit of the immediate is one
- // due to the difference in sign extension.
- auto CmpAgainstImmWithSignBit = [](MachineInstr *I) {
- if (!I->getOperand(2).isImm())
- return false;
- int16_t Imm = (int16_t)I->getOperand(2).getImm();
- return Imm < 0;
- };
-
- if (isEqOrNe(BI2) && !CmpAgainstImmWithSignBit(CMPI2) &&
- CMPI1->getOpcode() == getSignedCmpOpCode(CMPI2->getOpcode()))
- NewOpCode = CMPI1->getOpcode();
- else if (isEqOrNe(BI1) && !CmpAgainstImmWithSignBit(CMPI1) &&
- getSignedCmpOpCode(CMPI1->getOpcode()) == CMPI2->getOpcode())
- NewOpCode = CMPI2->getOpcode();
- else continue;
- }
-
- if (CMPI1->getOperand(2).isReg() && CMPI2->getOperand(2).isReg()) {
- // In case of comparisons between two registers, these two registers
- // must be same to merge two comparisons.
- unsigned Cmp1Operand1 = getSrcVReg(CMPI1->getOperand(1).getReg(),
- nullptr, nullptr, MRI);
- unsigned Cmp1Operand2 = getSrcVReg(CMPI1->getOperand(2).getReg(),
- nullptr, nullptr, MRI);
- unsigned Cmp2Operand1 = getSrcVReg(CMPI2->getOperand(1).getReg(),
- MBB1, &MBB2, MRI);
- unsigned Cmp2Operand2 = getSrcVReg(CMPI2->getOperand(2).getReg(),
- MBB1, &MBB2, MRI);
-
- if (Cmp1Operand1 == Cmp2Operand1 && Cmp1Operand2 == Cmp2Operand2) {
- // Same pair of registers in the same order; ready to merge as is.
- }
- else if (Cmp1Operand1 == Cmp2Operand2 && Cmp1Operand2 == Cmp2Operand1) {
- // Same pair of registers in different order.
- // We reverse the predicate to merge compare instructions.
- PPC::Predicate Pred = (PPC::Predicate)BI2->getOperand(0).getImm();
- NewPredicate2 = (unsigned)PPC::getSwappedPredicate(Pred);
- // In case of partial redundancy, we need to swap operands
- // in another compare instruction.
- SwapOperands = true;
- }
- else continue;
- }
- else if (CMPI1->getOperand(2).isImm() && CMPI2->getOperand(2).isImm()) {
- // In case of comparisons between a register and an immediate,
- // the operand register must be same for two compare instructions.
- unsigned Cmp1Operand1 = getSrcVReg(CMPI1->getOperand(1).getReg(),
- nullptr, nullptr, MRI);
- unsigned Cmp2Operand1 = getSrcVReg(CMPI2->getOperand(1).getReg(),
- MBB1, &MBB2, MRI);
- if (Cmp1Operand1 != Cmp2Operand1)
- continue;
-
- NewImm1 = Imm1 = (int16_t)CMPI1->getOperand(2).getImm();
- NewImm2 = Imm2 = (int16_t)CMPI2->getOperand(2).getImm();
-
- // If immediate are not same, we try to adjust by changing predicate;
- // e.g. GT imm means GE (imm+1).
- if (Imm1 != Imm2 && (!isEqOrNe(BI2) || !isEqOrNe(BI1))) {
- int Diff = Imm1 - Imm2;
- if (Diff < -2 || Diff > 2)
- continue;
-
- unsigned PredToInc1 = getPredicateToIncImm(BI1, CMPI1);
- unsigned PredToDec1 = getPredicateToDecImm(BI1, CMPI1);
- unsigned PredToInc2 = getPredicateToIncImm(BI2, CMPI2);
- unsigned PredToDec2 = getPredicateToDecImm(BI2, CMPI2);
- if (Diff == 2) {
- if (PredToInc2 && PredToDec1) {
- NewPredicate2 = PredToInc2;
- NewPredicate1 = PredToDec1;
- NewImm2++;
- NewImm1--;
- }
- }
- else if (Diff == 1) {
- if (PredToInc2) {
- NewImm2++;
- NewPredicate2 = PredToInc2;
- }
- else if (PredToDec1) {
- NewImm1--;
- NewPredicate1 = PredToDec1;
- }
- }
- else if (Diff == -1) {
- if (PredToDec2) {
- NewImm2--;
- NewPredicate2 = PredToDec2;
- }
- else if (PredToInc1) {
- NewImm1++;
- NewPredicate1 = PredToInc1;
- }
- }
- else if (Diff == -2) {
- if (PredToDec2 && PredToInc1) {
- NewPredicate2 = PredToDec2;
- NewPredicate1 = PredToInc1;
- NewImm2--;
- NewImm1++;
- }
- }
- }
-
- // We cannot merge two compares if the immediates are not same.
- if (NewImm2 != NewImm1)
- continue;
- }
-
- LLVM_DEBUG(dbgs() << "Optimize two pairs of compare and branch:\n");
- LLVM_DEBUG(CMPI1->dump());
- LLVM_DEBUG(BI1->dump());
- LLVM_DEBUG(CMPI2->dump());
- LLVM_DEBUG(BI2->dump());
-
- // We adjust opcode, predicates and immediate as we determined above.
- if (NewOpCode != 0 && NewOpCode != CMPI1->getOpcode()) {
- CMPI1->setDesc(TII->get(NewOpCode));
- }
- if (NewPredicate1) {
- BI1->getOperand(0).setImm(NewPredicate1);
- }
- if (NewPredicate2) {
- BI2->getOperand(0).setImm(NewPredicate2);
- }
- if (NewImm1 != Imm1) {
- CMPI1->getOperand(2).setImm(NewImm1);
- }
-
- if (IsPartiallyRedundant) {
- // We touch up the compare instruction in MBB2 and move it to
- // a previous BB to handle partially redundant case.
- if (SwapOperands) {
- unsigned Op1 = CMPI2->getOperand(1).getReg();
- unsigned Op2 = CMPI2->getOperand(2).getReg();
- CMPI2->getOperand(1).setReg(Op2);
- CMPI2->getOperand(2).setReg(Op1);
- }
- if (NewImm2 != Imm2)
- CMPI2->getOperand(2).setImm(NewImm2);
-
- for (int I = 1; I <= 2; I++) {
- if (CMPI2->getOperand(I).isReg()) {
- MachineInstr *Inst = MRI->getVRegDef(CMPI2->getOperand(I).getReg());
- if (Inst->getParent() != &MBB2)
- continue;
-
- assert(Inst->getOpcode() == PPC::PHI &&
- "We cannot support if an operand comes from this BB.");
- unsigned SrcReg = getIncomingRegForBlock(Inst, MBBtoMoveCmp);
- CMPI2->getOperand(I).setReg(SrcReg);
- }
- }
- auto I = MachineBasicBlock::iterator(MBBtoMoveCmp->getFirstTerminator());
- MBBtoMoveCmp->splice(I, &MBB2, MachineBasicBlock::iterator(CMPI2));
-
- DebugLoc DL = CMPI2->getDebugLoc();
- unsigned NewVReg = MRI->createVirtualRegister(&PPC::CRRCRegClass);
- BuildMI(MBB2, MBB2.begin(), DL,
- TII->get(PPC::PHI), NewVReg)
- .addReg(BI1->getOperand(1).getReg()).addMBB(MBB1)
- .addReg(BI2->getOperand(1).getReg()).addMBB(MBBtoMoveCmp);
- BI2->getOperand(1).setReg(NewVReg);
- }
- else {
- // We finally eliminate compare instruction in MBB2.
- BI2->getOperand(1).setReg(BI1->getOperand(1).getReg());
- CMPI2->eraseFromParent();
- }
- BI2->getOperand(1).setIsKill(true);
- BI1->getOperand(1).setIsKill(false);
-
- LLVM_DEBUG(dbgs() << "into a compare and two branches:\n");
- LLVM_DEBUG(CMPI1->dump());
- LLVM_DEBUG(BI1->dump());
- LLVM_DEBUG(BI2->dump());
- if (IsPartiallyRedundant) {
- LLVM_DEBUG(dbgs() << "The following compare is moved into "
- << printMBBReference(*MBBtoMoveCmp)
- << " to handle partial redundancy.\n");
- LLVM_DEBUG(CMPI2->dump());
- }
-
- Simplified = true;
- }
-
- return Simplified;
-}
-
-// We miss the opportunity to emit an RLDIC when lowering jump tables
-// since ISEL sees only a single basic block. When selecting, the clear
-// and shift left will be in different blocks.
-bool PPCMIPeephole::emitRLDICWhenLoweringJumpTables(MachineInstr &MI) {
- if (MI.getOpcode() != PPC::RLDICR)
- return false;
-
- unsigned SrcReg = MI.getOperand(1).getReg();
- if (!TargetRegisterInfo::isVirtualRegister(SrcReg))
- return false;
-
- MachineInstr *SrcMI = MRI->getVRegDef(SrcReg);
- if (SrcMI->getOpcode() != PPC::RLDICL)
- return false;
-
- MachineOperand MOpSHSrc = SrcMI->getOperand(2);
- MachineOperand MOpMBSrc = SrcMI->getOperand(3);
- MachineOperand MOpSHMI = MI.getOperand(2);
- MachineOperand MOpMEMI = MI.getOperand(3);
- if (!(MOpSHSrc.isImm() && MOpMBSrc.isImm() && MOpSHMI.isImm() &&
- MOpMEMI.isImm()))
- return false;
-
- uint64_t SHSrc = MOpSHSrc.getImm();
- uint64_t MBSrc = MOpMBSrc.getImm();
- uint64_t SHMI = MOpSHMI.getImm();
- uint64_t MEMI = MOpMEMI.getImm();
- uint64_t NewSH = SHSrc + SHMI;
- uint64_t NewMB = MBSrc - SHMI;
- if (NewMB > 63 || NewSH > 63)
- return false;
-
- // The bits cleared with RLDICL are [0, MBSrc).
- // The bits cleared with RLDICR are (MEMI, 63].
- // After the sequence, the bits cleared are:
- // [0, MBSrc-SHMI) and (MEMI, 63).
- //
- // The bits cleared with RLDIC are [0, NewMB) and (63-NewSH, 63].
- if ((63 - NewSH) != MEMI)
- return false;
-
- LLVM_DEBUG(dbgs() << "Converting pair: ");
- LLVM_DEBUG(SrcMI->dump());
- LLVM_DEBUG(MI.dump());
-
- MI.setDesc(TII->get(PPC::RLDIC));
- MI.getOperand(1).setReg(SrcMI->getOperand(1).getReg());
- MI.getOperand(2).setImm(NewSH);
- MI.getOperand(3).setImm(NewMB);
-
- LLVM_DEBUG(dbgs() << "To: ");
- LLVM_DEBUG(MI.dump());
- NumRotatesCollapsed++;
- return true;
-}
-
-// For case in LLVM IR
-// entry:
-// %iconv = sext i32 %index to i64
-// br i1 undef label %true, label %false
-// true:
-// %ptr = getelementptr inbounds i32, i32* null, i64 %iconv
-// ...
-// PPCISelLowering::combineSHL fails to combine, because sext and shl are in
-// different BBs when conducting instruction selection. We can do a peephole
-// optimization to combine these two instructions into extswsli after
-// instruction selection.
-bool PPCMIPeephole::combineSEXTAndSHL(MachineInstr &MI,
- MachineInstr *&ToErase) {
- if (MI.getOpcode() != PPC::RLDICR)
- return false;
-
- if (!MF->getSubtarget<PPCSubtarget>().isISA3_0())
- return false;
-
- assert(MI.getNumOperands() == 4 && "RLDICR should have 4 operands");
-
- MachineOperand MOpSHMI = MI.getOperand(2);
- MachineOperand MOpMEMI = MI.getOperand(3);
- if (!(MOpSHMI.isImm() && MOpMEMI.isImm()))
- return false;
-
- uint64_t SHMI = MOpSHMI.getImm();
- uint64_t MEMI = MOpMEMI.getImm();
- if (SHMI + MEMI != 63)
- return false;
-
- unsigned SrcReg = MI.getOperand(1).getReg();
- if (!TargetRegisterInfo::isVirtualRegister(SrcReg))
- return false;
-
- MachineInstr *SrcMI = MRI->getVRegDef(SrcReg);
- if (SrcMI->getOpcode() != PPC::EXTSW &&
- SrcMI->getOpcode() != PPC::EXTSW_32_64)
- return false;
-
- // If the register defined by extsw has more than one use, combination is not
- // needed.
- if (!MRI->hasOneNonDBGUse(SrcReg))
- return false;
-
- LLVM_DEBUG(dbgs() << "Combining pair: ");
- LLVM_DEBUG(SrcMI->dump());
- LLVM_DEBUG(MI.dump());
-
- MachineInstr *NewInstr =
- BuildMI(*MI.getParent(), &MI, MI.getDebugLoc(),
- SrcMI->getOpcode() == PPC::EXTSW ? TII->get(PPC::EXTSWSLI)
- : TII->get(PPC::EXTSWSLI_32_64),
- MI.getOperand(0).getReg())
- .add(SrcMI->getOperand(1))
- .add(MOpSHMI);
- (void)NewInstr;
-
- LLVM_DEBUG(dbgs() << "TO: ");
- LLVM_DEBUG(NewInstr->dump());
- ++NumEXTSWAndSLDICombined;
- ToErase = &MI;
- // SrcMI, which is extsw, is of no use now, erase it.
- SrcMI->eraseFromParent();
- return true;
-}
-
-} // end default namespace
-
-INITIALIZE_PASS_BEGIN(PPCMIPeephole, DEBUG_TYPE,
- "PowerPC MI Peephole Optimization", false, false)
-INITIALIZE_PASS_DEPENDENCY(MachineBlockFrequencyInfo)
-INITIALIZE_PASS_DEPENDENCY(MachineDominatorTree)
-INITIALIZE_PASS_DEPENDENCY(MachinePostDominatorTree)
-INITIALIZE_PASS_END(PPCMIPeephole, DEBUG_TYPE,
- "PowerPC MI Peephole Optimization", false, false)
-
-char PPCMIPeephole::ID = 0;
-FunctionPass*
-llvm::createPPCMIPeepholePass() { return new PPCMIPeephole(); }
-