diff options
Diffstat (limited to 'lib/CodeGen')
-rw-r--r-- | lib/CodeGen/LiveIntervalAnalysis.cpp | 302 | ||||
-rw-r--r-- | lib/CodeGen/LiveIntervalAnalysis.h | 211 | ||||
-rw-r--r-- | lib/CodeGen/Passes.cpp | 9 | ||||
-rw-r--r-- | lib/CodeGen/RegAllocLinearScan.cpp | 777 |
4 files changed, 1296 insertions, 3 deletions
diff --git a/lib/CodeGen/LiveIntervalAnalysis.cpp b/lib/CodeGen/LiveIntervalAnalysis.cpp new file mode 100644 index 0000000000..eda717baeb --- /dev/null +++ b/lib/CodeGen/LiveIntervalAnalysis.cpp @@ -0,0 +1,302 @@ +//===-- LiveIntervals.cpp - Live Interval Analysis ------------------------===// +// +// The LLVM Compiler Infrastructure +// +// This file was developed by the LLVM research group and is distributed under +// the University of Illinois Open Source License. See LICENSE.TXT for details. +// +//===----------------------------------------------------------------------===// +// +// This file implements the LiveInterval analysis pass which is used +// by the Linear Scan Register allocator. This pass linearizes the +// basic blocks of the function in DFS order and uses the +// LiveVariables pass to conservatively compute live intervals for +// each virtual and physical register. +// +//===----------------------------------------------------------------------===// + +#define DEBUG_TYPE "liveintervals" +#include "llvm/CodeGen/LiveIntervals.h" +#include "llvm/Function.h" +#include "llvm/CodeGen/LiveVariables.h" +#include "llvm/CodeGen/MachineFrameInfo.h" +#include "llvm/CodeGen/MachineFunctionPass.h" +#include "llvm/CodeGen/MachineInstr.h" +#include "llvm/CodeGen/Passes.h" +#include "llvm/CodeGen/SSARegMap.h" +#include "llvm/Target/MRegisterInfo.h" +#include "llvm/Target/TargetInstrInfo.h" +#include "llvm/Target/TargetMachine.h" +#include "llvm/Target/TargetRegInfo.h" +#include "llvm/Support/CFG.h" +#include "Support/Debug.h" +#include "Support/DepthFirstIterator.h" +#include "Support/Statistic.h" +#include <iostream> + +using namespace llvm; + +namespace { + RegisterAnalysis<LiveIntervals> X("liveintervals", + "Live Interval Analysis"); + + Statistic<> numIntervals("liveintervals", "Number of intervals"); +}; + +void LiveIntervals::getAnalysisUsage(AnalysisUsage &AU) const +{ + AU.setPreservesAll(); + AU.addRequired<LiveVariables>(); + AU.addRequiredID(PHIEliminationID); + MachineFunctionPass::getAnalysisUsage(AU); +} + +/// runOnMachineFunction - Register allocate the whole function +/// +bool LiveIntervals::runOnMachineFunction(MachineFunction &fn) { + DEBUG(std::cerr << "Machine Function\n"); + mf_ = &fn; + tm_ = &fn.getTarget(); + mri_ = tm_->getRegisterInfo(); + lv_ = &getAnalysis<LiveVariables>(); + allocatableRegisters_.clear(); + mbbi2mbbMap_.clear(); + mi2iMap_.clear(); + r2iMap_.clear(); + r2iMap_.clear(); + intervals_.clear(); + + // mark allocatable registers + allocatableRegisters_.resize(MRegisterInfo::FirstVirtualRegister); + // Loop over all of the register classes... + for (MRegisterInfo::regclass_iterator + rci = mri_->regclass_begin(), rce = mri_->regclass_end(); + rci != rce; ++rci) { + // Loop over all of the allocatable registers in the function... + for (TargetRegisterClass::iterator + i = (*rci)->allocation_order_begin(*mf_), + e = (*rci)->allocation_order_end(*mf_); i != e; ++i) { + allocatableRegisters_[*i] = true; // The reg is allocatable! + } + } + + // number MachineInstrs + unsigned miIndex = 0; + for (MachineFunction::iterator mbb = mf_->begin(), mbbEnd = mf_->end(); + mbb != mbbEnd; ++mbb) { + const std::pair<MachineBasicBlock*, unsigned>& entry = + lv_->getMachineBasicBlockInfo(&*mbb); + bool inserted = mbbi2mbbMap_.insert(std::make_pair(entry.second, + entry.first)).second; + assert(inserted && "multiple index -> MachineBasicBlock"); + + for (MachineBasicBlock::iterator mi = mbb->begin(), miEnd = mbb->end(); + mi != miEnd; ++mi) { + inserted = mi2iMap_.insert(std::make_pair(*mi, miIndex)).second; + assert(inserted && "multiple MachineInstr -> index mappings"); + ++miIndex; + } + } + + computeIntervals(); + + return true; +} + +void LiveIntervals::printRegName(unsigned reg) const +{ + if (reg < MRegisterInfo::FirstVirtualRegister) + std::cerr << mri_->getName(reg); + else + std::cerr << '%' << reg; +} + +void LiveIntervals::handleVirtualRegisterDef(MachineBasicBlock* mbb, + MachineBasicBlock::iterator mi, + unsigned reg) +{ + DEBUG(std::cerr << "\t\t\tregister: ";printRegName(reg); std::cerr << '\n'); + + unsigned instrIndex = getInstructionIndex(*mi); + + LiveVariables::VarInfo& vi = lv_->getVarInfo(reg); + + Reg2IntervalMap::iterator r2iit = r2iMap_.find(reg); + // handle multiple definition case (machine instructions violating + // ssa after phi-elimination + if (r2iit != r2iMap_.end()) { + unsigned ii = r2iit->second; + Interval& interval = intervals_[ii]; + unsigned end = getInstructionIndex(mbb->back()) + 1; + DEBUG(std::cerr << "\t\t\t\tadding range: [" + << instrIndex << ',' << end << "]\n"); + interval.addRange(instrIndex, end); + DEBUG(std::cerr << "\t\t\t\t" << interval << '\n'); + } + else { + // add new interval + intervals_.push_back(Interval(reg)); + Interval& interval = intervals_.back(); + // update interval index for this register + r2iMap_[reg] = intervals_.size() - 1; + + for (MbbIndex2MbbMap::iterator + it = mbbi2mbbMap_.begin(), itEnd = mbbi2mbbMap_.end(); + it != itEnd; ++it) { + unsigned liveBlockIndex = it->first; + MachineBasicBlock* liveBlock = it->second; + if (liveBlockIndex < vi.AliveBlocks.size() && + vi.AliveBlocks[liveBlockIndex]) { + unsigned start = getInstructionIndex(liveBlock->front()); + unsigned end = getInstructionIndex(liveBlock->back()) + 1; + DEBUG(std::cerr << "\t\t\t\tadding range: [" + << start << ',' << end << "]\n"); + interval.addRange(start, end); + } + } + + bool killedInDefiningBasicBlock = false; + for (int i = 0, e = vi.Kills.size(); i != e; ++i) { + MachineBasicBlock* killerBlock = vi.Kills[i].first; + MachineInstr* killerInstr = vi.Kills[i].second; + killedInDefiningBasicBlock |= mbb == killerBlock; + unsigned start = (mbb == killerBlock ? + instrIndex : + getInstructionIndex(killerBlock->front())); + unsigned end = getInstructionIndex(killerInstr) + 1; + DEBUG(std::cerr << "\t\t\t\tadding range: [" + << start << ',' << end << "]\n"); + interval.addRange(start, end); + } + + if (!killedInDefiningBasicBlock) { + unsigned end = getInstructionIndex(mbb->back()) + 1; + interval.addRange(instrIndex, end); + } + + DEBUG(std::cerr << "\t\t\t\t" << interval << '\n'); + } +} + +void LiveIntervals::handlePhysicalRegisterDef(MachineBasicBlock* mbb, + MachineBasicBlock::iterator mi, + unsigned reg) +{ + DEBUG(std::cerr << "\t\t\tregister: ";printRegName(reg); std::cerr << '\n'); + + unsigned start = getInstructionIndex(*mi); + unsigned end = start; + + for (MachineBasicBlock::iterator e = mbb->end(); mi != e; ++mi) { + for (LiveVariables::killed_iterator + ki = lv_->dead_begin(*mi), + ke = lv_->dead_end(*mi); + ki != ke; ++ki) { + if (reg == ki->second) { + end = getInstructionIndex(ki->first) + 1; + goto exit; + } + } + + for (LiveVariables::killed_iterator + ki = lv_->killed_begin(*mi), + ke = lv_->killed_end(*mi); + ki != ke; ++ki) { + if (reg == ki->second) { + end = getInstructionIndex(ki->first) + 1; + goto exit; + } + } + } +exit: + assert(start < end && "did not find end of interval?"); + + Reg2IntervalMap::iterator r2iit = r2iMap_.find(reg); + if (r2iit != r2iMap_.end()) { + unsigned ii = r2iit->second; + Interval& interval = intervals_[ii]; + DEBUG(std::cerr << "\t\t\t\tadding range: [" + << start << ',' << end << "]\n"); + interval.addRange(start, end); + DEBUG(std::cerr << "\t\t\t\t" << interval << '\n'); + } + else { + intervals_.push_back(Interval(reg)); + Interval& interval = intervals_.back(); + // update interval index for this register + r2iMap_[reg] = intervals_.size() - 1; + DEBUG(std::cerr << "\t\t\t\tadding range: [" + << start << ',' << end << "]\n"); + interval.addRange(start, end); + DEBUG(std::cerr << "\t\t\t\t" << interval << '\n'); + } +} + +void LiveIntervals::handleRegisterDef(MachineBasicBlock* mbb, + MachineBasicBlock::iterator mi, + unsigned reg) +{ + if (reg < MRegisterInfo::FirstVirtualRegister) { + if (allocatableRegisters_[reg]) { + handlePhysicalRegisterDef(mbb, mi, reg); + } + } + else { + handleVirtualRegisterDef(mbb, mi, reg); + } +} + +unsigned LiveIntervals::getInstructionIndex(MachineInstr* instr) const +{ + assert(mi2iMap_.find(instr) != mi2iMap_.end() && + "instruction not assigned a number"); + return mi2iMap_.find(instr)->second; +} + +/// computeIntervals - computes the live intervals for virtual +/// registers. for some ordering of the machine instructions [1,N] a +/// live interval is an interval [i, j] where 1 <= i <= j <= N for +/// which a variable is live +void LiveIntervals::computeIntervals() +{ + DEBUG(std::cerr << "computing live intervals:\n"); + + for (MbbIndex2MbbMap::iterator + it = mbbi2mbbMap_.begin(), itEnd = mbbi2mbbMap_.end(); + it != itEnd; ++it) { + MachineBasicBlock* mbb = it->second; + DEBUG(std::cerr << "machine basic block: " + << mbb->getBasicBlock()->getName() << "\n"); + for (MachineBasicBlock::iterator mi = mbb->begin(), miEnd = mbb->end(); + mi != miEnd; ++mi) { + MachineInstr* instr = *mi; + const TargetInstrDescriptor& tid = + tm_->getInstrInfo().get(instr->getOpcode()); + DEBUG(std::cerr << "\t\tinstruction[" + << getInstructionIndex(instr) << "]: "; + instr->print(std::cerr, *tm_);); + + // handle implicit defs + for (const unsigned* id = tid.ImplicitDefs; *id; ++id) { + unsigned physReg = *id; + handlePhysicalRegisterDef(mbb, mi, physReg); + } + + // handle explicit defs + for (int i = instr->getNumOperands() - 1; i >= 0; --i) { + MachineOperand& mop = instr->getOperand(i); + + if (!mop.isVirtualRegister()) + continue; + + if (mop.opIsDefOnly() || mop.opIsDefAndUse()) { + unsigned reg = mop.getAllocatedRegNum(); + handleVirtualRegisterDef(mbb, mi, reg); + } + } + } + } + + DEBUG(std::copy(intervals_.begin(), intervals_.end(), + std::ostream_iterator<Interval>(std::cerr, "\n"))); +} diff --git a/lib/CodeGen/LiveIntervalAnalysis.h b/lib/CodeGen/LiveIntervalAnalysis.h new file mode 100644 index 0000000000..b2f0416312 --- /dev/null +++ b/lib/CodeGen/LiveIntervalAnalysis.h @@ -0,0 +1,211 @@ +//===-- llvm/CodeGen/LiveInterval.h - Live Interval Analysis ----*- C++ -*-===// +// +// The LLVM Compiler Infrastructure +// +// This file was developed by the LLVM research group and is distributed under +// the University of Illinois Open Source License. See LICENSE.TXT for details. +// +//===----------------------------------------------------------------------===// +// +// This file implements the LiveInterval analysis pass. Given some +// numbering of each the machine instructions (in this implemention +// depth-first order) an interval [i, j] is said to be a live interval +// for register v if there is no instruction with number j' > j such +// that v is live at j' abd there is no instruction with number i' < i +// such that v is live at i'. In this implementation intervals can +// have holes, i.e. an interval might look like [1,20], [50,65], +// [1000,1001] +// +//===----------------------------------------------------------------------===// + +#ifndef LLVM_CODEGEN_LIVEINTERVALS_H +#define LLVM_CODEGEN_LIVEINTERVALS_H + +#include "llvm/CodeGen/MachineFunctionPass.h" +#include "llvm/CodeGen/MachineBasicBlock.h" +#include <iostream> +#include <map> + +namespace llvm { + + class LiveVariables; + class MRegisterInfo; + + class LiveIntervals : public MachineFunctionPass + { + public: + struct Interval { + typedef std::pair<unsigned, unsigned> Range; + typedef std::vector<Range> Ranges; + unsigned reg; // the register of this interval + Ranges ranges; // the ranges this register is valid + + Interval(unsigned r) + : reg(r) { + + } + + unsigned start() const { + assert(!ranges.empty() && "empty interval for register"); + return ranges.front().first; + } + + unsigned end() const { + assert(!ranges.empty() && "empty interval for register"); + return ranges.back().second; + } + + bool expired(unsigned index) const { + return end() <= index; + } + + bool overlaps(unsigned index) const { + for (Ranges::const_iterator + i = ranges.begin(), e = ranges.end(); i != e; ++i) { + if (index >= i->first && index < i->second) { + return true; + } + } + return false; + } + + void addRange(unsigned start, unsigned end) { + Range range = std::make_pair(start, end); + Ranges::iterator it = + std::lower_bound(ranges.begin(), ranges.end(), range); + + if (it == ranges.end()) { + it = ranges.insert(it, range); + goto exit; + } + + assert(range.first <= it->first && "got wrong iterator?"); + // merge ranges if necesary + if (range.first < it->first) { + if (range.second >= it->first) { + it->first = range.first; + } + else { + it = ranges.insert(it, range); + assert(it != ranges.end() && "wtf?"); + goto exit; + } + } + + exit: + mergeRangesIfNecessary(it); + } + + private: + void mergeRangesIfNecessary(Ranges::iterator it) { + while (it != ranges.begin()) { + Ranges::iterator prev = it - 1; + if (prev->second < it->first) { + break; + } + prev->second = it->second; + ranges.erase(it); + it = prev; + } + } + }; + + struct StartPointComp { + bool operator()(const Interval& lhs, const Interval& rhs) { + return lhs.ranges.front().first < rhs.ranges.front().first; + } + }; + + struct EndPointComp { + bool operator()(const Interval& lhs, const Interval& rhs) { + return lhs.ranges.back().second < rhs.ranges.back().second; + } + }; + + typedef std::vector<Interval> Intervals; + typedef std::vector<MachineBasicBlock*> MachineBasicBlockPtrs; + + private: + MachineFunction* mf_; + const TargetMachine* tm_; + const MRegisterInfo* mri_; + MachineBasicBlock* currentMbb_; + MachineBasicBlock::iterator currentInstr_; + LiveVariables* lv_; + + std::vector<bool> allocatableRegisters_; + + typedef std::map<unsigned, MachineBasicBlock*> MbbIndex2MbbMap; + MbbIndex2MbbMap mbbi2mbbMap_; + + typedef std::map<MachineInstr*, unsigned> Mi2IndexMap; + Mi2IndexMap mi2iMap_; + + typedef std::map<unsigned, unsigned> Reg2IntervalMap; + Reg2IntervalMap r2iMap_; + + Intervals intervals_; + + public: + virtual void getAnalysisUsage(AnalysisUsage &AU) const; + Intervals& getIntervals() { return intervals_; } + MachineBasicBlockPtrs getOrderedMachineBasicBlockPtrs() const { + MachineBasicBlockPtrs result; + for (MbbIndex2MbbMap::const_iterator + it = mbbi2mbbMap_.begin(), itEnd = mbbi2mbbMap_.end(); + it != itEnd; ++it) { + result.push_back(it->second); + } + return result; + } + + private: + /// runOnMachineFunction - pass entry point + bool runOnMachineFunction(MachineFunction&); + + /// computeIntervals - compute live intervals + void computeIntervals(); + + + /// handleRegisterDef - update intervals for a register def + /// (calls handlePhysicalRegisterDef and + /// handleVirtualRegisterDef) + void handleRegisterDef(MachineBasicBlock* mbb, + MachineBasicBlock::iterator mi, + unsigned reg); + + /// handleVirtualRegisterDef - update intervals for a virtual + /// register def + void handleVirtualRegisterDef(MachineBasicBlock* mbb, + MachineBasicBlock::iterator mi, + unsigned reg); + + /// handlePhysicalRegisterDef - update intervals for a + /// physical register def + void handlePhysicalRegisterDef(MachineBasicBlock* mbb, + MachineBasicBlock::iterator mi, + unsigned reg); + + unsigned getInstructionIndex(MachineInstr* instr) const; + + void printRegName(unsigned reg) const; + }; + + inline bool operator==(const LiveIntervals::Interval& lhs, + const LiveIntervals::Interval& rhs) { + return lhs.reg == rhs.reg; + } + + inline std::ostream& operator<<(std::ostream& os, + const LiveIntervals::Interval& li) { + os << "%reg" << li.reg << " = "; + for (LiveIntervals::Interval::Ranges::const_iterator + i = li.ranges.begin(), e = li.ranges.end(); i != e; ++i) { + os << "[" << i->first << ", " << i->second << "]"; + } + return os; + } + +} // End llvm namespace + +#endif diff --git a/lib/CodeGen/Passes.cpp b/lib/CodeGen/Passes.cpp index 239eacde4c..58a5105d4b 100644 --- a/lib/CodeGen/Passes.cpp +++ b/lib/CodeGen/Passes.cpp @@ -18,14 +18,15 @@ namespace llvm { namespace { - enum RegAllocName { simple, local }; + enum RegAllocName { simple, local, linearscan }; cl::opt<RegAllocName> RegAlloc("regalloc", cl::desc("Register allocator to use: (default = simple)"), cl::Prefix, - cl::values(clEnumVal(simple, " simple register allocator"), - clEnumVal(local, " local register allocator"), + cl::values(clEnumVal(simple, " simple register allocator"), + clEnumVal(local, " local register allocator"), + clEnumVal(linearscan, " linear-scan global register allocator"), 0), cl::init(local)); } @@ -37,6 +38,8 @@ FunctionPass *createRegisterAllocator() return createSimpleRegisterAllocator(); case local: return createLocalRegisterAllocator(); + case linearscan: + return createLinearScanRegisterAllocator(); default: assert(0 && "no register allocator selected"); return 0; // not reached diff --git a/lib/CodeGen/RegAllocLinearScan.cpp b/lib/CodeGen/RegAllocLinearScan.cpp new file mode 100644 index 0000000000..f78be0f1ca --- /dev/null +++ b/lib/CodeGen/RegAllocLinearScan.cpp @@ -0,0 +1,777 @@ +//===-- RegAllocLinearScan.cpp - Linear Scan register allocator -----------===// +// +// The LLVM Compiler Infrastructure +// +// This file was developed by the LLVM research group and is distributed under +// the University of Illinois Open Source License. See LICENSE.TXT for details. +// +//===----------------------------------------------------------------------===// +// +// This file implements a linear scan register allocator. +// +//===----------------------------------------------------------------------===// +#define DEBUG_TYPE "regalloc" +#include "llvm/Function.h" +#include "llvm/CodeGen/LiveIntervals.h" +#include "llvm/CodeGen/LiveVariables.h" +#include "llvm/CodeGen/MachineFrameInfo.h" +#include "llvm/CodeGen/MachineFunctionPass.h" +#include "llvm/CodeGen/MachineInstr.h" +#include "llvm/CodeGen/Passes.h" +#include "llvm/CodeGen/SSARegMap.h" +#include "llvm/Target/MRegisterInfo.h" +#include "llvm/Target/TargetInstrInfo.h" +#include "llvm/Target/TargetMachine.h" +#include "llvm/Target/TargetRegInfo.h" +#include "llvm/Support/CFG.h" +#include "Support/Debug.h" +#include "Support/DepthFirstIterator.h" +#include "Support/Statistic.h" +#include "Support/STLExtras.h" +#include <iostream> + +using namespace llvm; + +namespace { + Statistic<> numSpilled ("ra-linearscan", "Number of registers spilled"); + Statistic<> numReloaded("ra-linearscan", "Number of registers reloaded"); + + class RA : public MachineFunctionPass { + public: + typedef std::vector<const LiveIntervals::Interval*> IntervalPtrs; + + private: + MachineFunction* mf_; + const TargetMachine* tm_; + const MRegisterInfo* mri_; + MachineBasicBlock* currentMbb_; + MachineBasicBlock::iterator currentInstr_; + typedef LiveIntervals::Intervals Intervals; + const Intervals* li_; + IntervalPtrs active_, inactive_; + + typedef std::vector<unsigned> Regs; + Regs tempUseOperands_; + Regs tempDefOperands_; + + Regs reserved_; + + typedef LiveIntervals::MachineBasicBlockPtrs MachineBasicBlockPtrs; + MachineBasicBlockPtrs mbbs_; + + typedef std::vector<unsigned> Phys2VirtMap; + Phys2VirtMap p2vMap_; + + typedef std::map<unsigned, unsigned> Virt2PhysMap; + Virt2PhysMap v2pMap_; + + typedef std::map<unsigned, int> Virt2StackSlotMap; + Virt2StackSlotMap v2ssMap_; + + int instrAdded_; + + public: + virtual const char* getPassName() const { + return "Linear Scan Register Allocator"; + } + + virtual void getAnalysisUsage(AnalysisUsage &AU) const { + AU.addRequired<LiveVariables>(); + AU.addRequired<LiveIntervals>(); + MachineFunctionPass::getAnalysisUsage(AU); + } + + private: + /// runOnMachineFunction - register allocate the whole function + bool runOnMachineFunction(MachineFunction&); + + /// processActiveIntervals - expire old intervals and move + /// non-overlapping ones to the incative list + void processActiveIntervals(Intervals::const_iterator cur); + + /// processInactiveIntervals - expire old intervals and move + /// overlapping ones to the active list + void processInactiveIntervals(Intervals::const_iterator cur); + + /// assignStackSlotAtInterval - choose and spill + /// interval. Currently we spill the interval with the last + /// end point in the active and inactive lists and the current + /// interval + void assignStackSlotAtInterval(Intervals::const_iterator cur); + + /// + /// register handling helpers + /// + + /// reservePhysReg - reserves a physical register and spills + /// any value assigned to it if any + void reservePhysReg(unsigned reg); + + /// clearReservedPhysReg - marks pysical register as free for + /// use + void clearReservedPhysReg(unsigned reg); + + /// physRegAvailable - returns true if the specifed physical + /// register is available + bool physRegAvailable(unsigned physReg); + + /// getFreePhysReg - return a free physical register for this + /// virtual register if we have one, otherwise return 0 + unsigned getFreePhysReg(unsigned virtReg); + + + /// tempPhysRegAvailable - returns true if the specifed + /// temporary physical register is available + bool tempPhysRegAvailable(unsigned physReg); + + /// getFreeTempPhysReg - return a free temprorary physical + /// register for this register class if we have one (should + /// never return 0) + unsigned getFreeTempPhysReg(const TargetRegisterClass* rc); + + /// getFreeTempPhysReg - return a free temprorary physical + /// register for this virtual register if we have one (should + /// never return 0) + unsigned getFreeTempPhysReg(unsigned virtReg) { + const TargetRegisterClass* rc = + mf_->getSSARegMap()->getRegClass(virtReg); + return getFreeTempPhysReg(rc); + } + + /// assignVirt2PhysReg - assigns the free physical register to + /// the virtual register passed as arguments + void assignVirt2PhysReg(unsigned virtReg, unsigned physReg); + + /// clearVirtReg - free the physical register associated with this + /// virtual register and disassociate virtual->physical and + /// physical->virtual mappings + void clearVirtReg(unsigned virtReg); + + /// assignVirt2StackSlot - assigns this virtual register to a + /// stack slot + void assignVirt2StackSlot(unsigned virtReg); + + /// findOrCreateStackSlot - returns the offset of the + /// specified register on the stack allocating space if + /// necessary + int findOrCreateStackSlot(unsigned virtReg); + + /// spillVirtReg - spills the virtual register + void spillVirtReg(unsigned virtReg); + + /// loadPhysReg - loads to the physical register the value of + /// the virtual register specifed. Virtual register must have + /// an assigned stack slot + void loadVirt2PhysReg(unsigned virtReg, unsigned physReg); + + void printVirt2PhysMap() const { + std::cerr << "allocated registers:\n"; + for (Virt2PhysMap::const_iterator + i = v2pMap_.begin(), e = v2pMap_.end(); i != e; ++i) { + std::cerr << '[' << i->first << ',' + << mri_->getName(i->second) << "]\n"; + } + std::cerr << '\n'; + } + void printIntervals(const char* const str, + RA::IntervalPtrs::const_iterator i, + RA::IntervalPtrs::const_iterator e) const { + if (str) std::cerr << str << " intervals:\n"; + for (; i != e; ++i) { + std::cerr << "\t\t" << **i << " -> "; + if ((*i)->reg < MRegisterInfo::FirstVirtualRegister) { + std::cerr << mri_->getName((*i)->reg); + } + else { + std::cerr << mri_->getName(v2pMap_.find((*i)->reg)->second); + } + std::cerr << '\n'; + } + } + }; +} + +bool RA::runOnMachineFunction(MachineFunction &fn) { + mf_ = &fn; + tm_ = &fn.getTarget(); + mri_ = tm_->getRegisterInfo(); + li_ = &getAnalysis<LiveIntervals>().getIntervals(); + active_.clear(); + inactive_.clear(); + mbbs_ = getAnalysis<LiveIntervals>().getOrderedMachineBasicBlockPtrs(); + p2vMap_.resize(MRegisterInfo::FirstVirtualRegister-1); + p2vMap_.clear(); + v2pMap_.clear(); + v2ssMap_.clear(); + + // FIXME: this will work only for the X86 backend. I need to + // device an algorthm to select the minimal (considering register + // aliasing) number of temp registers to reserve so that we have 2 + // registers for each register class available. + + // reserve R32: EDI, EBX, + // R16: DI, BX, + // R8: DH, BH, + // RFP: FP5, FP6 + reserved_.push_back(19); /* EDI */ + reserved_.push_back(17); /* EBX */ + reserved_.push_back(12); /* DI */ + reserved_.push_back( 7); /* BX */ + reserved_.push_back(11); /* DH */ + reserved_.push_back( 4); /* BH */ + reserved_.push_back(28); /* FP5 */ + reserved_.push_back(29); /* FP6 */ + + // liner scan algorithm + for (Intervals::const_iterator + i = li_->begin(), e = li_->end(); i != e; ++i) { + DEBUG(std::cerr << "processing current interval: " << *i << '\n'); + + DEBUG(printIntervals("\tactive", active_.begin(), active_.end())); + DEBUG(printIntervals("\tinactive", inactive_.begin(), inactive_.end())); + + processActiveIntervals(i); + // processInactiveIntervals(i); + + // if this register is preallocated, look for an interval that + // overlaps with it and assign it to a memory location + if (i->reg < MRegisterInfo::FirstVirtualRegister) { + for (IntervalPtrs::iterator + ai = active_.begin(), ae = active_.end(); ai != ae; ++ai) { + unsigned virtReg = (*ai)->reg; + Virt2PhysMap::const_iterator it = v2pMap_.find(virtReg); + if (it != v2pMap_.end() && it->second == i->reg) { + active_.erase(ai); + clearVirtReg(virtReg); + break; + } + } + reservePhysReg(i->reg); + active_.push_back(&*i); + } + // otherwise we are allocating a virtual register. try to find + // a free physical register or spill an interval in order to + // assign it one (we could spill the current though). + else { + unsigned physReg = getFreePhysReg(i->reg); + if (!physReg) { + assignStackSlotAtInterval(i); + } + else { + assignVirt2PhysReg(i->reg, physReg); + active_.push_back(&*i); + } + } + } + DEBUG(std::cerr << "finished register allocation\n"); + DEBUG(printVirt2PhysMap()); + + DEBUG(std::cerr << "Rewrite machine code:\n"); + for (MachineBasicBlockPtrs::iterator + mbbi = mbbs_.begin(), mbbe = mbbs_.end(); mbbi != mbbe; ++mbbi) { + instrAdded_ = 0; + currentMbb_ = *mbbi; + + for (currentInstr_ = currentMbb_->begin(); + currentInstr_ != currentMbb_->end(); ++currentInstr_) { + + DEBUG(std::cerr << "\tinstruction: "; + (*currentInstr_)->print(std::cerr, *tm_);); + DEBUG(std::cerr << "\t\tspilling temporarily defined operands " + "of previous instruction:\n"); + for (unsigned i = 0, e = tempDefOperands_.size(); i != e; ++i) { + spillVirtReg(tempDefOperands_[i]); + } + tempDefOperands_.clear(); + + // use our current mapping and actually replace and + // virtual register with its allocated physical registers + DEBUG(std::cerr << "\t\treplacing virtual registers with mapped " + "physical registers:\n"); + for (unsigned i = 0, e = (*currentInstr_)->getNumOperands(); + i != e; ++i) { + MachineOperand& op = (*currentInstr_)->getOperand(i); + if (op.isVirtualRegister()) { + unsigned virtReg = op.getAllocatedRegNum(); + unsigned physReg = v2pMap_[virtReg]; + // if this virtual registers lives on the stack, + // load it to a temporary physical register + if (physReg) { + DEBUG(std::cerr << "\t\t\t%reg" << virtReg + << " -> " << mri_->getName(physReg) << '\n'); + (*currentInstr_)->SetMachineOperandReg(i, physReg); + } + } + } + + DEBUG(std::cerr << "\t\tloading temporarily used operands to " + "registers:\n"); + for (unsigned i = 0, e = (*currentInstr_)->getNumOperands(); + i != e; ++i) { + MachineOperand& op = (*currentInstr_)->getOperand(i); + if (op.isVirtualRegister() && op.opIsUse()) { + unsigned virtReg = op.getAllocatedRegNum(); + unsigned physReg = v2pMap_[virtReg]; + if (!physReg) { + physReg = getFreeTempPhysReg(virtReg); + } + loadVirt2PhysReg(virtReg, physReg); + tempUseOperands_.push_back(virtReg); + (*currentInstr_)->SetMachineOperandReg(i, physReg); + } + } + + DEBUG(std::cerr << "\t\tclearing temporarily used operands:\n"); + for (unsigned i = 0, e = tempUseOperands_.size(); i != e; ++i) { + clearVirtReg(tempUseOperands_[i]); + } + tempUseOperands_.clear(); + + DEBUG(std::cerr << "\t\tassigning temporarily defined operands to " + "registers:\n"); + for (unsigned i = 0, e = (*currentInstr_)->getNumOperands(); + i != e; ++i) { + MachineOperand& op = (*currentInstr_)->getOperand(i); + if (op.isVirtualRegister() && !op.opIsUse()) { + unsigned virtReg = op.getAllocatedRegNum(); + unsigned physReg = v2pMap_[virtReg]; + if (!physReg) { + physReg = getFreeTempPhysReg(virtReg); + } + if (op.opIsDefAndUse()) { + loadVirt2PhysReg(virtReg, physReg); + } + else { + assignVirt2PhysReg(virtReg, physReg); + } + tempDefOperands_.push_back(virtReg); + (*currentInstr_)->SetMachineOperandReg(i, physReg); + } + } + + + // if the instruction is a two address instruction and the + // source operands are not identical we need to insert + // extra instructions. + + unsigned opcode = (*currentInstr_)->getOpcode(); + if (tm_->getInstrInfo().isTwoAddrInstr(opcode) && + (*currentInstr_)->getOperand(0).getAllocatedRegNum() != + (*currentInstr_)->getOperand(1).getAllocatedRegNum()) { + assert((*currentInstr |