mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-08-27 15:29:51 +00:00
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@90934 91177308-0d34-0410-b5e6-96231b3b80d8
920 lines
35 KiB
C++
920 lines
35 KiB
C++
//===- RegisterInfoEmitter.cpp - Generate a Register File Desc. -*- C++ -*-===//
|
|
//
|
|
// The LLVM Compiler Infrastructure
|
|
//
|
|
// This file is distributed under the University of Illinois Open Source
|
|
// License. See LICENSE.TXT for details.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
//
|
|
// This tablegen backend is responsible for emitting a description of a target
|
|
// register file for a code generator. It uses instances of the Register,
|
|
// RegisterAliases, and RegisterClass classes to gather this information.
|
|
//
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
#include "RegisterInfoEmitter.h"
|
|
#include "CodeGenTarget.h"
|
|
#include "CodeGenRegisters.h"
|
|
#include "Record.h"
|
|
#include "llvm/ADT/StringExtras.h"
|
|
#include "llvm/ADT/STLExtras.h"
|
|
#include <algorithm>
|
|
#include <set>
|
|
using namespace llvm;
|
|
|
|
// runEnums - Print out enum values for all of the registers.
|
|
void RegisterInfoEmitter::runEnums(raw_ostream &OS) {
|
|
CodeGenTarget Target;
|
|
const std::vector<CodeGenRegister> &Registers = Target.getRegisters();
|
|
|
|
std::string Namespace = Registers[0].TheDef->getValueAsString("Namespace");
|
|
|
|
EmitSourceFileHeader("Target Register Enum Values", OS);
|
|
OS << "namespace llvm {\n\n";
|
|
|
|
if (!Namespace.empty())
|
|
OS << "namespace " << Namespace << " {\n";
|
|
OS << " enum {\n NoRegister,\n";
|
|
|
|
for (unsigned i = 0, e = Registers.size(); i != e; ++i)
|
|
OS << " " << Registers[i].getName() << ", \t// " << i+1 << "\n";
|
|
OS << " NUM_TARGET_REGS \t// " << Registers.size()+1 << "\n";
|
|
OS << " };\n";
|
|
if (!Namespace.empty())
|
|
OS << "}\n";
|
|
OS << "} // End llvm namespace \n";
|
|
}
|
|
|
|
void RegisterInfoEmitter::runHeader(raw_ostream &OS) {
|
|
EmitSourceFileHeader("Register Information Header Fragment", OS);
|
|
CodeGenTarget Target;
|
|
const std::string &TargetName = Target.getName();
|
|
std::string ClassName = TargetName + "GenRegisterInfo";
|
|
|
|
OS << "#include \"llvm/Target/TargetRegisterInfo.h\"\n";
|
|
OS << "#include <string>\n\n";
|
|
|
|
OS << "namespace llvm {\n\n";
|
|
|
|
OS << "struct " << ClassName << " : public TargetRegisterInfo {\n"
|
|
<< " explicit " << ClassName
|
|
<< "(int CallFrameSetupOpcode = -1, int CallFrameDestroyOpcode = -1);\n"
|
|
<< " virtual int getDwarfRegNumFull(unsigned RegNum, "
|
|
<< "unsigned Flavour) const;\n"
|
|
<< " virtual int getDwarfRegNum(unsigned RegNum, bool isEH) const = 0;\n"
|
|
<< " virtual bool needsStackRealignment(const MachineFunction &) const\n"
|
|
<< " { return false; }\n"
|
|
<< " unsigned getSubReg(unsigned RegNo, unsigned Index) const;\n"
|
|
<< " unsigned getSubRegIndex(unsigned RegNo, unsigned SubRegNo) const;\n"
|
|
<< "};\n\n";
|
|
|
|
const std::vector<CodeGenRegisterClass> &RegisterClasses =
|
|
Target.getRegisterClasses();
|
|
|
|
if (!RegisterClasses.empty()) {
|
|
OS << "namespace " << RegisterClasses[0].Namespace
|
|
<< " { // Register classes\n";
|
|
|
|
OS << " enum {\n";
|
|
for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i) {
|
|
if (i) OS << ",\n";
|
|
OS << " " << RegisterClasses[i].getName() << "RegClassID";
|
|
OS << " = " << (i+1);
|
|
}
|
|
OS << "\n };\n\n";
|
|
|
|
for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i) {
|
|
const std::string &Name = RegisterClasses[i].getName();
|
|
|
|
// Output the register class definition.
|
|
OS << " struct " << Name << "Class : public TargetRegisterClass {\n"
|
|
<< " " << Name << "Class();\n"
|
|
<< RegisterClasses[i].MethodProtos << " };\n";
|
|
|
|
// Output the extern for the instance.
|
|
OS << " extern " << Name << "Class\t" << Name << "RegClass;\n";
|
|
// Output the extern for the pointer to the instance (should remove).
|
|
OS << " static TargetRegisterClass * const "<< Name <<"RegisterClass = &"
|
|
<< Name << "RegClass;\n";
|
|
}
|
|
OS << "} // end of namespace " << TargetName << "\n\n";
|
|
}
|
|
OS << "} // End llvm namespace \n";
|
|
}
|
|
|
|
bool isSubRegisterClass(const CodeGenRegisterClass &RC,
|
|
std::set<Record*> &RegSet) {
|
|
for (unsigned i = 0, e = RC.Elements.size(); i != e; ++i) {
|
|
Record *Reg = RC.Elements[i];
|
|
if (!RegSet.count(Reg))
|
|
return false;
|
|
}
|
|
return true;
|
|
}
|
|
|
|
static void addSuperReg(Record *R, Record *S,
|
|
std::map<Record*, std::set<Record*>, LessRecord> &SubRegs,
|
|
std::map<Record*, std::set<Record*>, LessRecord> &SuperRegs,
|
|
std::map<Record*, std::set<Record*>, LessRecord> &Aliases) {
|
|
if (R == S) {
|
|
errs() << "Error: recursive sub-register relationship between"
|
|
<< " register " << getQualifiedName(R)
|
|
<< " and its sub-registers?\n";
|
|
abort();
|
|
}
|
|
if (!SuperRegs[R].insert(S).second)
|
|
return;
|
|
SubRegs[S].insert(R);
|
|
Aliases[R].insert(S);
|
|
Aliases[S].insert(R);
|
|
if (SuperRegs.count(S))
|
|
for (std::set<Record*>::iterator I = SuperRegs[S].begin(),
|
|
E = SuperRegs[S].end(); I != E; ++I)
|
|
addSuperReg(R, *I, SubRegs, SuperRegs, Aliases);
|
|
}
|
|
|
|
static void addSubSuperReg(Record *R, Record *S,
|
|
std::map<Record*, std::set<Record*>, LessRecord> &SubRegs,
|
|
std::map<Record*, std::set<Record*>, LessRecord> &SuperRegs,
|
|
std::map<Record*, std::set<Record*>, LessRecord> &Aliases) {
|
|
if (R == S) {
|
|
errs() << "Error: recursive sub-register relationship between"
|
|
<< " register " << getQualifiedName(R)
|
|
<< " and its sub-registers?\n";
|
|
abort();
|
|
}
|
|
|
|
if (!SubRegs[R].insert(S).second)
|
|
return;
|
|
addSuperReg(S, R, SubRegs, SuperRegs, Aliases);
|
|
Aliases[R].insert(S);
|
|
Aliases[S].insert(R);
|
|
if (SubRegs.count(S))
|
|
for (std::set<Record*>::iterator I = SubRegs[S].begin(),
|
|
E = SubRegs[S].end(); I != E; ++I)
|
|
addSubSuperReg(R, *I, SubRegs, SuperRegs, Aliases);
|
|
}
|
|
|
|
class RegisterSorter {
|
|
private:
|
|
std::map<Record*, std::set<Record*>, LessRecord> &RegisterSubRegs;
|
|
|
|
public:
|
|
RegisterSorter(std::map<Record*, std::set<Record*>, LessRecord> &RS)
|
|
: RegisterSubRegs(RS) {}
|
|
|
|
bool operator()(Record *RegA, Record *RegB) {
|
|
// B is sub-register of A.
|
|
return RegisterSubRegs.count(RegA) && RegisterSubRegs[RegA].count(RegB);
|
|
}
|
|
};
|
|
|
|
// RegisterInfoEmitter::run - Main register file description emitter.
|
|
//
|
|
void RegisterInfoEmitter::run(raw_ostream &OS) {
|
|
CodeGenTarget Target;
|
|
EmitSourceFileHeader("Register Information Source Fragment", OS);
|
|
|
|
OS << "namespace llvm {\n\n";
|
|
|
|
// Start out by emitting each of the register classes... to do this, we build
|
|
// a set of registers which belong to a register class, this is to ensure that
|
|
// each register is only in a single register class.
|
|
//
|
|
const std::vector<CodeGenRegisterClass> &RegisterClasses =
|
|
Target.getRegisterClasses();
|
|
|
|
// Loop over all of the register classes... emitting each one.
|
|
OS << "namespace { // Register classes...\n";
|
|
|
|
// RegClassesBelongedTo - Keep track of which register classes each reg
|
|
// belongs to.
|
|
std::multimap<Record*, const CodeGenRegisterClass*> RegClassesBelongedTo;
|
|
|
|
// Emit the register enum value arrays for each RegisterClass
|
|
for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
|
|
const CodeGenRegisterClass &RC = RegisterClasses[rc];
|
|
|
|
// Give the register class a legal C name if it's anonymous.
|
|
std::string Name = RC.TheDef->getName();
|
|
|
|
// Emit the register list now.
|
|
OS << " // " << Name << " Register Class...\n"
|
|
<< " static const unsigned " << Name
|
|
<< "[] = {\n ";
|
|
for (unsigned i = 0, e = RC.Elements.size(); i != e; ++i) {
|
|
Record *Reg = RC.Elements[i];
|
|
OS << getQualifiedName(Reg) << ", ";
|
|
|
|
// Keep track of which regclasses this register is in.
|
|
RegClassesBelongedTo.insert(std::make_pair(Reg, &RC));
|
|
}
|
|
OS << "\n };\n\n";
|
|
}
|
|
|
|
// Emit the ValueType arrays for each RegisterClass
|
|
for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
|
|
const CodeGenRegisterClass &RC = RegisterClasses[rc];
|
|
|
|
// Give the register class a legal C name if it's anonymous.
|
|
std::string Name = RC.TheDef->getName() + "VTs";
|
|
|
|
// Emit the register list now.
|
|
OS << " // " << Name
|
|
<< " Register Class Value Types...\n"
|
|
<< " static const EVT " << Name
|
|
<< "[] = {\n ";
|
|
for (unsigned i = 0, e = RC.VTs.size(); i != e; ++i)
|
|
OS << getEnumName(RC.VTs[i]) << ", ";
|
|
OS << "MVT::Other\n };\n\n";
|
|
}
|
|
OS << "} // end anonymous namespace\n\n";
|
|
|
|
// Now that all of the structs have been emitted, emit the instances.
|
|
if (!RegisterClasses.empty()) {
|
|
OS << "namespace " << RegisterClasses[0].Namespace
|
|
<< " { // Register class instances\n";
|
|
for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i)
|
|
OS << " " << RegisterClasses[i].getName() << "Class\t"
|
|
<< RegisterClasses[i].getName() << "RegClass;\n";
|
|
|
|
std::map<unsigned, std::set<unsigned> > SuperClassMap;
|
|
std::map<unsigned, std::set<unsigned> > SuperRegClassMap;
|
|
OS << "\n";
|
|
|
|
// Emit the sub-register classes for each RegisterClass
|
|
for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
|
|
const CodeGenRegisterClass &RC = RegisterClasses[rc];
|
|
|
|
// Give the register class a legal C name if it's anonymous.
|
|
std::string Name = RC.TheDef->getName();
|
|
|
|
OS << " // " << Name
|
|
<< " Sub-register Classes...\n"
|
|
<< " static const TargetRegisterClass* const "
|
|
<< Name << "SubRegClasses[] = {\n ";
|
|
|
|
bool Empty = true;
|
|
|
|
for (unsigned subrc = 0, subrcMax = RC.SubRegClasses.size();
|
|
subrc != subrcMax; ++subrc) {
|
|
unsigned rc2 = 0, e2 = RegisterClasses.size();
|
|
for (; rc2 != e2; ++rc2) {
|
|
const CodeGenRegisterClass &RC2 = RegisterClasses[rc2];
|
|
if (RC.SubRegClasses[subrc]->getName() == RC2.getName()) {
|
|
if (!Empty)
|
|
OS << ", ";
|
|
OS << "&" << getQualifiedName(RC2.TheDef) << "RegClass";
|
|
Empty = false;
|
|
|
|
std::map<unsigned, std::set<unsigned> >::iterator SCMI =
|
|
SuperRegClassMap.find(rc2);
|
|
if (SCMI == SuperRegClassMap.end()) {
|
|
SuperRegClassMap.insert(std::make_pair(rc2,
|
|
std::set<unsigned>()));
|
|
SCMI = SuperRegClassMap.find(rc2);
|
|
}
|
|
SCMI->second.insert(rc);
|
|
break;
|
|
}
|
|
}
|
|
if (rc2 == e2)
|
|
throw "Register Class member '" +
|
|
RC.SubRegClasses[subrc]->getName() +
|
|
"' is not a valid RegisterClass!";
|
|
}
|
|
|
|
OS << (!Empty ? ", " : "") << "NULL";
|
|
OS << "\n };\n\n";
|
|
}
|
|
|
|
// Emit the super-register classes for each RegisterClass
|
|
for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
|
|
const CodeGenRegisterClass &RC = RegisterClasses[rc];
|
|
|
|
// Give the register class a legal C name if it's anonymous.
|
|
std::string Name = RC.TheDef->getName();
|
|
|
|
OS << " // " << Name
|
|
<< " Super-register Classes...\n"
|
|
<< " static const TargetRegisterClass* const "
|
|
<< Name << "SuperRegClasses[] = {\n ";
|
|
|
|
bool Empty = true;
|
|
std::map<unsigned, std::set<unsigned> >::iterator I =
|
|
SuperRegClassMap.find(rc);
|
|
if (I != SuperRegClassMap.end()) {
|
|
for (std::set<unsigned>::iterator II = I->second.begin(),
|
|
EE = I->second.end(); II != EE; ++II) {
|
|
const CodeGenRegisterClass &RC2 = RegisterClasses[*II];
|
|
if (!Empty)
|
|
OS << ", ";
|
|
OS << "&" << getQualifiedName(RC2.TheDef) << "RegClass";
|
|
Empty = false;
|
|
}
|
|
}
|
|
|
|
OS << (!Empty ? ", " : "") << "NULL";
|
|
OS << "\n };\n\n";
|
|
}
|
|
|
|
// Emit the sub-classes array for each RegisterClass
|
|
for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
|
|
const CodeGenRegisterClass &RC = RegisterClasses[rc];
|
|
|
|
// Give the register class a legal C name if it's anonymous.
|
|
std::string Name = RC.TheDef->getName();
|
|
|
|
std::set<Record*> RegSet;
|
|
for (unsigned i = 0, e = RC.Elements.size(); i != e; ++i) {
|
|
Record *Reg = RC.Elements[i];
|
|
RegSet.insert(Reg);
|
|
}
|
|
|
|
OS << " // " << Name
|
|
<< " Register Class sub-classes...\n"
|
|
<< " static const TargetRegisterClass* const "
|
|
<< Name << "Subclasses[] = {\n ";
|
|
|
|
bool Empty = true;
|
|
for (unsigned rc2 = 0, e2 = RegisterClasses.size(); rc2 != e2; ++rc2) {
|
|
const CodeGenRegisterClass &RC2 = RegisterClasses[rc2];
|
|
|
|
// RC2 is a sub-class of RC if it is a valid replacement for any
|
|
// instruction operand where an RC register is required. It must satisfy
|
|
// these conditions:
|
|
//
|
|
// 1. All RC2 registers are also in RC.
|
|
// 2. The RC2 spill size must not be smaller that the RC spill size.
|
|
// 3. RC2 spill alignment must be compatible with RC.
|
|
//
|
|
// Sub-classes are used to determine if a virtual register can be used
|
|
// as an instruction operand, or if it must be copied first.
|
|
|
|
if (rc == rc2 || RC2.Elements.size() > RC.Elements.size() ||
|
|
(RC.SpillAlignment && RC2.SpillAlignment % RC.SpillAlignment) ||
|
|
RC.SpillSize > RC2.SpillSize || !isSubRegisterClass(RC2, RegSet))
|
|
continue;
|
|
|
|
if (!Empty) OS << ", ";
|
|
OS << "&" << getQualifiedName(RC2.TheDef) << "RegClass";
|
|
Empty = false;
|
|
|
|
std::map<unsigned, std::set<unsigned> >::iterator SCMI =
|
|
SuperClassMap.find(rc2);
|
|
if (SCMI == SuperClassMap.end()) {
|
|
SuperClassMap.insert(std::make_pair(rc2, std::set<unsigned>()));
|
|
SCMI = SuperClassMap.find(rc2);
|
|
}
|
|
SCMI->second.insert(rc);
|
|
}
|
|
|
|
OS << (!Empty ? ", " : "") << "NULL";
|
|
OS << "\n };\n\n";
|
|
}
|
|
|
|
for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
|
|
const CodeGenRegisterClass &RC = RegisterClasses[rc];
|
|
|
|
// Give the register class a legal C name if it's anonymous.
|
|
std::string Name = RC.TheDef->getName();
|
|
|
|
OS << " // " << Name
|
|
<< " Register Class super-classes...\n"
|
|
<< " static const TargetRegisterClass* const "
|
|
<< Name << "Superclasses[] = {\n ";
|
|
|
|
bool Empty = true;
|
|
std::map<unsigned, std::set<unsigned> >::iterator I =
|
|
SuperClassMap.find(rc);
|
|
if (I != SuperClassMap.end()) {
|
|
for (std::set<unsigned>::iterator II = I->second.begin(),
|
|
EE = I->second.end(); II != EE; ++II) {
|
|
const CodeGenRegisterClass &RC2 = RegisterClasses[*II];
|
|
if (!Empty) OS << ", ";
|
|
OS << "&" << getQualifiedName(RC2.TheDef) << "RegClass";
|
|
Empty = false;
|
|
}
|
|
}
|
|
|
|
OS << (!Empty ? ", " : "") << "NULL";
|
|
OS << "\n };\n\n";
|
|
}
|
|
|
|
|
|
for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i) {
|
|
const CodeGenRegisterClass &RC = RegisterClasses[i];
|
|
OS << RC.MethodBodies << "\n";
|
|
OS << RC.getName() << "Class::" << RC.getName()
|
|
<< "Class() : TargetRegisterClass("
|
|
<< RC.getName() + "RegClassID" << ", "
|
|
<< '\"' << RC.getName() << "\", "
|
|
<< RC.getName() + "VTs" << ", "
|
|
<< RC.getName() + "Subclasses" << ", "
|
|
<< RC.getName() + "Superclasses" << ", "
|
|
<< RC.getName() + "SubRegClasses" << ", "
|
|
<< RC.getName() + "SuperRegClasses" << ", "
|
|
<< RC.SpillSize/8 << ", "
|
|
<< RC.SpillAlignment/8 << ", "
|
|
<< RC.CopyCost << ", "
|
|
<< RC.getName() << ", " << RC.getName() << " + " << RC.Elements.size()
|
|
<< ") {}\n";
|
|
}
|
|
|
|
OS << "}\n";
|
|
}
|
|
|
|
OS << "\nnamespace {\n";
|
|
OS << " const TargetRegisterClass* const RegisterClasses[] = {\n";
|
|
for (unsigned i = 0, e = RegisterClasses.size(); i != e; ++i)
|
|
OS << " &" << getQualifiedName(RegisterClasses[i].TheDef)
|
|
<< "RegClass,\n";
|
|
OS << " };\n";
|
|
|
|
// Emit register sub-registers / super-registers, aliases...
|
|
std::map<Record*, std::set<Record*>, LessRecord> RegisterSubRegs;
|
|
std::map<Record*, std::set<Record*>, LessRecord> RegisterSuperRegs;
|
|
std::map<Record*, std::set<Record*>, LessRecord> RegisterAliases;
|
|
std::map<Record*, std::vector<std::pair<int, Record*> > > SubRegVectors;
|
|
typedef std::map<Record*, std::vector<int64_t>, LessRecord> DwarfRegNumsMapTy;
|
|
DwarfRegNumsMapTy DwarfRegNums;
|
|
|
|
const std::vector<CodeGenRegister> &Regs = Target.getRegisters();
|
|
|
|
for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
|
|
Record *R = Regs[i].TheDef;
|
|
std::vector<Record*> LI = Regs[i].TheDef->getValueAsListOfDefs("Aliases");
|
|
// Add information that R aliases all of the elements in the list... and
|
|
// that everything in the list aliases R.
|
|
for (unsigned j = 0, e = LI.size(); j != e; ++j) {
|
|
Record *Reg = LI[j];
|
|
if (RegisterAliases[R].count(Reg))
|
|
errs() << "Warning: register alias between " << getQualifiedName(R)
|
|
<< " and " << getQualifiedName(Reg)
|
|
<< " specified multiple times!\n";
|
|
RegisterAliases[R].insert(Reg);
|
|
|
|
if (RegisterAliases[Reg].count(R))
|
|
errs() << "Warning: register alias between " << getQualifiedName(R)
|
|
<< " and " << getQualifiedName(Reg)
|
|
<< " specified multiple times!\n";
|
|
RegisterAliases[Reg].insert(R);
|
|
}
|
|
}
|
|
|
|
// Process sub-register sets.
|
|
for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
|
|
Record *R = Regs[i].TheDef;
|
|
std::vector<Record*> LI = Regs[i].TheDef->getValueAsListOfDefs("SubRegs");
|
|
// Process sub-register set and add aliases information.
|
|
for (unsigned j = 0, e = LI.size(); j != e; ++j) {
|
|
Record *SubReg = LI[j];
|
|
if (RegisterSubRegs[R].count(SubReg))
|
|
errs() << "Warning: register " << getQualifiedName(SubReg)
|
|
<< " specified as a sub-register of " << getQualifiedName(R)
|
|
<< " multiple times!\n";
|
|
addSubSuperReg(R, SubReg, RegisterSubRegs, RegisterSuperRegs,
|
|
RegisterAliases);
|
|
}
|
|
}
|
|
|
|
// Print the SubregHashTable, a simple quadratically probed
|
|
// hash table for determining if a register is a subregister
|
|
// of another register.
|
|
unsigned NumSubRegs = 0;
|
|
std::map<Record*, unsigned> RegNo;
|
|
for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
|
|
RegNo[Regs[i].TheDef] = i;
|
|
NumSubRegs += RegisterSubRegs[Regs[i].TheDef].size();
|
|
}
|
|
|
|
unsigned SubregHashTableSize = 2 * NextPowerOf2(2 * NumSubRegs);
|
|
unsigned* SubregHashTable = new unsigned[2 * SubregHashTableSize];
|
|
std::fill(SubregHashTable, SubregHashTable + 2 * SubregHashTableSize, ~0U);
|
|
|
|
unsigned hashMisses = 0;
|
|
|
|
for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
|
|
Record* R = Regs[i].TheDef;
|
|
for (std::set<Record*>::iterator I = RegisterSubRegs[R].begin(),
|
|
E = RegisterSubRegs[R].end(); I != E; ++I) {
|
|
Record* RJ = *I;
|
|
// We have to increase the indices of both registers by one when
|
|
// computing the hash because, in the generated code, there
|
|
// will be an extra empty slot at register 0.
|
|
size_t index = ((i+1) + (RegNo[RJ]+1) * 37) & (SubregHashTableSize-1);
|
|
unsigned ProbeAmt = 2;
|
|
while (SubregHashTable[index*2] != ~0U &&
|
|
SubregHashTable[index*2+1] != ~0U) {
|
|
index = (index + ProbeAmt) & (SubregHashTableSize-1);
|
|
ProbeAmt += 2;
|
|
|
|
hashMisses++;
|
|
}
|
|
|
|
SubregHashTable[index*2] = i;
|
|
SubregHashTable[index*2+1] = RegNo[RJ];
|
|
}
|
|
}
|
|
|
|
OS << "\n\n // Number of hash collisions: " << hashMisses << "\n";
|
|
|
|
if (SubregHashTableSize) {
|
|
std::string Namespace = Regs[0].TheDef->getValueAsString("Namespace");
|
|
|
|
OS << " const unsigned SubregHashTable[] = { ";
|
|
for (unsigned i = 0; i < SubregHashTableSize - 1; ++i) {
|
|
if (i != 0)
|
|
// Insert spaces for nice formatting.
|
|
OS << " ";
|
|
|
|
if (SubregHashTable[2*i] != ~0U) {
|
|
OS << getQualifiedName(Regs[SubregHashTable[2*i]].TheDef) << ", "
|
|
<< getQualifiedName(Regs[SubregHashTable[2*i+1]].TheDef) << ", \n";
|
|
} else {
|
|
OS << Namespace << "::NoRegister, " << Namespace << "::NoRegister, \n";
|
|
}
|
|
}
|
|
|
|
unsigned Idx = SubregHashTableSize*2-2;
|
|
if (SubregHashTable[Idx] != ~0U) {
|
|
OS << " "
|
|
<< getQualifiedName(Regs[SubregHashTable[Idx]].TheDef) << ", "
|
|
<< getQualifiedName(Regs[SubregHashTable[Idx+1]].TheDef) << " };\n";
|
|
} else {
|
|
OS << Namespace << "::NoRegister, " << Namespace << "::NoRegister };\n";
|
|
}
|
|
|
|
OS << " const unsigned SubregHashTableSize = "
|
|
<< SubregHashTableSize << ";\n";
|
|
} else {
|
|
OS << " const unsigned SubregHashTable[] = { ~0U, ~0U };\n"
|
|
<< " const unsigned SubregHashTableSize = 1;\n";
|
|
}
|
|
|
|
delete [] SubregHashTable;
|
|
|
|
|
|
// Print the SuperregHashTable, a simple quadratically probed
|
|
// hash table for determining if a register is a super-register
|
|
// of another register.
|
|
unsigned NumSupRegs = 0;
|
|
RegNo.clear();
|
|
for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
|
|
RegNo[Regs[i].TheDef] = i;
|
|
NumSupRegs += RegisterSuperRegs[Regs[i].TheDef].size();
|
|
}
|
|
|
|
unsigned SuperregHashTableSize = 2 * NextPowerOf2(2 * NumSupRegs);
|
|
unsigned* SuperregHashTable = new unsigned[2 * SuperregHashTableSize];
|
|
std::fill(SuperregHashTable, SuperregHashTable + 2 * SuperregHashTableSize, ~0U);
|
|
|
|
hashMisses = 0;
|
|
|
|
for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
|
|
Record* R = Regs[i].TheDef;
|
|
for (std::set<Record*>::iterator I = RegisterSuperRegs[R].begin(),
|
|
E = RegisterSuperRegs[R].end(); I != E; ++I) {
|
|
Record* RJ = *I;
|
|
// We have to increase the indices of both registers by one when
|
|
// computing the hash because, in the generated code, there
|
|
// will be an extra empty slot at register 0.
|
|
size_t index = ((i+1) + (RegNo[RJ]+1) * 37) & (SuperregHashTableSize-1);
|
|
unsigned ProbeAmt = 2;
|
|
while (SuperregHashTable[index*2] != ~0U &&
|
|
SuperregHashTable[index*2+1] != ~0U) {
|
|
index = (index + ProbeAmt) & (SuperregHashTableSize-1);
|
|
ProbeAmt += 2;
|
|
|
|
hashMisses++;
|
|
}
|
|
|
|
SuperregHashTable[index*2] = i;
|
|
SuperregHashTable[index*2+1] = RegNo[RJ];
|
|
}
|
|
}
|
|
|
|
OS << "\n\n // Number of hash collisions: " << hashMisses << "\n";
|
|
|
|
if (SuperregHashTableSize) {
|
|
std::string Namespace = Regs[0].TheDef->getValueAsString("Namespace");
|
|
|
|
OS << " const unsigned SuperregHashTable[] = { ";
|
|
for (unsigned i = 0; i < SuperregHashTableSize - 1; ++i) {
|
|
if (i != 0)
|
|
// Insert spaces for nice formatting.
|
|
OS << " ";
|
|
|
|
if (SuperregHashTable[2*i] != ~0U) {
|
|
OS << getQualifiedName(Regs[SuperregHashTable[2*i]].TheDef) << ", "
|
|
<< getQualifiedName(Regs[SuperregHashTable[2*i+1]].TheDef) << ", \n";
|
|
} else {
|
|
OS << Namespace << "::NoRegister, " << Namespace << "::NoRegister, \n";
|
|
}
|
|
}
|
|
|
|
unsigned Idx = SuperregHashTableSize*2-2;
|
|
if (SuperregHashTable[Idx] != ~0U) {
|
|
OS << " "
|
|
<< getQualifiedName(Regs[SuperregHashTable[Idx]].TheDef) << ", "
|
|
<< getQualifiedName(Regs[SuperregHashTable[Idx+1]].TheDef) << " };\n";
|
|
} else {
|
|
OS << Namespace << "::NoRegister, " << Namespace << "::NoRegister };\n";
|
|
}
|
|
|
|
OS << " const unsigned SuperregHashTableSize = "
|
|
<< SuperregHashTableSize << ";\n";
|
|
} else {
|
|
OS << " const unsigned SuperregHashTable[] = { ~0U, ~0U };\n"
|
|
<< " const unsigned SuperregHashTableSize = 1;\n";
|
|
}
|
|
|
|
delete [] SuperregHashTable;
|
|
|
|
|
|
// Print the AliasHashTable, a simple quadratically probed
|
|
// hash table for determining if a register aliases another register.
|
|
unsigned NumAliases = 0;
|
|
RegNo.clear();
|
|
for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
|
|
RegNo[Regs[i].TheDef] = i;
|
|
NumAliases += RegisterAliases[Regs[i].TheDef].size();
|
|
}
|
|
|
|
unsigned AliasesHashTableSize = 2 * NextPowerOf2(2 * NumAliases);
|
|
unsigned* AliasesHashTable = new unsigned[2 * AliasesHashTableSize];
|
|
std::fill(AliasesHashTable, AliasesHashTable + 2 * AliasesHashTableSize, ~0U);
|
|
|
|
hashMisses = 0;
|
|
|
|
for (unsigned i = 0, e = Regs.size(); i != e; ++i) {
|
|
Record* R = Regs[i].TheDef;
|
|
for (std::set<Record*>::iterator I = RegisterAliases[R].begin(),
|
|
E = RegisterAliases[R].end(); I != E; ++I) {
|
|
Record* RJ = *I;
|
|
// We have to increase the indices of both registers by one when
|
|
// computing the hash because, in the generated code, there
|
|
// will be an extra empty slot at register 0.
|
|
size_t index = ((i+1) + (RegNo[RJ]+1) * 37) & (AliasesHashTableSize-1);
|
|
unsigned ProbeAmt = 2;
|
|
while (AliasesHashTable[index*2] != ~0U &&
|
|
AliasesHashTable[index*2+1] != ~0U) {
|
|
index = (index + ProbeAmt) & (AliasesHashTableSize-1);
|
|
ProbeAmt += 2;
|
|
|
|
hashMisses++;
|
|
}
|
|
|
|
AliasesHashTable[index*2] = i;
|
|
AliasesHashTable[index*2+1] = RegNo[RJ];
|
|
}
|
|
}
|
|
|
|
OS << "\n\n // Number of hash collisions: " << hashMisses << "\n";
|
|
|
|
if (AliasesHashTableSize) {
|
|
std::string Namespace = Regs[0].TheDef->getValueAsString("Namespace");
|
|
|
|
OS << " const unsigned AliasesHashTable[] = { ";
|
|
for (unsigned i = 0; i < AliasesHashTableSize - 1; ++i) {
|
|
if (i != 0)
|
|
// Insert spaces for nice formatting.
|
|
OS << " ";
|
|
|
|
if (AliasesHashTable[2*i] != ~0U) {
|
|
OS << getQualifiedName(Regs[AliasesHashTable[2*i]].TheDef) << ", "
|
|
<< getQualifiedName(Regs[AliasesHashTable[2*i+1]].TheDef) << ", \n";
|
|
} else {
|
|
OS << Namespace << "::NoRegister, " << Namespace << "::NoRegister, \n";
|
|
}
|
|
}
|
|
|
|
unsigned Idx = AliasesHashTableSize*2-2;
|
|
if (AliasesHashTable[Idx] != ~0U) {
|
|
OS << " "
|
|
<< getQualifiedName(Regs[AliasesHashTable[Idx]].TheDef) << ", "
|
|
<< getQualifiedName(Regs[AliasesHashTable[Idx+1]].TheDef) << " };\n";
|
|
} else {
|
|
OS << Namespace << "::NoRegister, " << Namespace << "::NoRegister };\n";
|
|
}
|
|
|
|
OS << " const unsigned AliasesHashTableSize = "
|
|
<< AliasesHashTableSize << ";\n";
|
|
} else {
|
|
OS << " const unsigned AliasesHashTable[] = { ~0U, ~0U };\n"
|
|
<< " const unsigned AliasesHashTableSize = 1;\n";
|
|
}
|
|
|
|
delete [] AliasesHashTable;
|
|
|
|
if (!RegisterAliases.empty())
|
|
OS << "\n\n // Register Alias Sets...\n";
|
|
|
|
// Emit the empty alias list
|
|
OS << " const unsigned Empty_AliasSet[] = { 0 };\n";
|
|
// Loop over all of the registers which have aliases, emitting the alias list
|
|
// to memory.
|
|
for (std::map<Record*, std::set<Record*>, LessRecord >::iterator
|
|
I = RegisterAliases.begin(), E = RegisterAliases.end(); I != E; ++I) {
|
|
OS << " const unsigned " << I->first->getName() << "_AliasSet[] = { ";
|
|
for (std::set<Record*>::iterator ASI = I->second.begin(),
|
|
E = I->second.end(); ASI != E; ++ASI)
|
|
OS << getQualifiedName(*ASI) << ", ";
|
|
OS << "0 };\n";
|
|
}
|
|
|
|
if (!RegisterSubRegs.empty())
|
|
OS << "\n\n // Register Sub-registers Sets...\n";
|
|
|
|
// Emit the empty sub-registers list
|
|
OS << " const unsigned Empty_SubRegsSet[] = { 0 };\n";
|
|
// Loop over all of the registers which have sub-registers, emitting the
|
|
// sub-registers list to memory.
|
|
for (std::map<Record*, std::set<Record*>, LessRecord>::iterator
|
|
I = RegisterSubRegs.begin(), E = RegisterSubRegs.end(); I != E; ++I) {
|
|
OS << " const unsigned " << I->first->getName() << "_SubRegsSet[] = { ";
|
|
std::vector<Record*> SubRegsVector;
|
|
for (std::set<Record*>::iterator ASI = I->second.begin(),
|
|
E = I->second.end(); ASI != E; ++ASI)
|
|
SubRegsVector.push_back(*ASI);
|
|
RegisterSorter RS(RegisterSubRegs);
|
|
std::stable_sort(SubRegsVector.begin(), SubRegsVector.end(), RS);
|
|
for (unsigned i = 0, e = SubRegsVector.size(); i != e; ++i)
|
|
OS << getQualifiedName(SubRegsVector[i]) << ", ";
|
|
OS << "0 };\n";
|
|
}
|
|
|
|
if (!RegisterSuperRegs.empty())
|
|
OS << "\n\n // Register Super-registers Sets...\n";
|
|
|
|
// Emit the empty super-registers list
|
|
OS << " const unsigned Empty_SuperRegsSet[] = { 0 };\n";
|
|
// Loop over all of the registers which have super-registers, emitting the
|
|
// super-registers list to memory.
|
|
for (std::map<Record*, std::set<Record*>, LessRecord >::iterator
|
|
I = RegisterSuperRegs.begin(), E = RegisterSuperRegs.end(); I != E; ++I) {
|
|
OS << " const unsigned " << I->first->getName() << "_SuperRegsSet[] = { ";
|
|
|
|
std::vector<Record*> SuperRegsVector;
|
|
for (std::set<Record*>::iterator ASI = I->second.begin(),
|
|
E = I->second.end(); ASI != E; ++ASI)
|
|
SuperRegsVector.push_back(*ASI);
|
|
RegisterSorter RS(RegisterSubRegs);
|
|
std::stable_sort(SuperRegsVector.begin(), SuperRegsVector.end(), RS);
|
|
for (unsigned i = 0, e = SuperRegsVector.size(); i != e; ++i)
|
|
OS << getQualifiedName(SuperRegsVector[i]) << ", ";
|
|
OS << "0 };\n";
|
|
}
|
|
|
|
OS<<"\n const TargetRegisterDesc RegisterDescriptors[] = { // Descriptors\n";
|
|
OS << " { \"NOREG\",\t0,\t0,\t0 },\n";
|
|
|
|
// Now that register alias and sub-registers sets have been emitted, emit the
|
|
// register descriptors now.
|
|
const std::vector<CodeGenRegister> &Registers = Target.getRegisters();
|
|
for (unsigned i = 0, e = Registers.size(); i != e; ++i) {
|
|
const CodeGenRegister &Reg = Registers[i];
|
|
OS << " { \"";
|
|
OS << Reg.getName() << "\",\t";
|
|
if (RegisterAliases.count(Reg.TheDef))
|
|
OS << Reg.getName() << "_AliasSet,\t";
|
|
else
|
|
OS << "Empty_AliasSet,\t";
|
|
if (RegisterSubRegs.count(Reg.TheDef))
|
|
OS << Reg.getName() << "_SubRegsSet,\t";
|
|
else
|
|
OS << "Empty_SubRegsSet,\t";
|
|
if (RegisterSuperRegs.count(Reg.TheDef))
|
|
OS << Reg.getName() << "_SuperRegsSet },\n";
|
|
else
|
|
OS << "Empty_SuperRegsSet },\n";
|
|
}
|
|
OS << " };\n"; // End of register descriptors...
|
|
OS << "}\n\n"; // End of anonymous namespace...
|
|
|
|
std::string ClassName = Target.getName() + "GenRegisterInfo";
|
|
|
|
// Calculate the mapping of subregister+index pairs to physical registers.
|
|
std::vector<Record*> SubRegs = Records.getAllDerivedDefinitions("SubRegSet");
|
|
for (unsigned i = 0, e = SubRegs.size(); i != e; ++i) {
|
|
int subRegIndex = SubRegs[i]->getValueAsInt("index");
|
|
std::vector<Record*> From = SubRegs[i]->getValueAsListOfDefs("From");
|
|
std::vector<Record*> To = SubRegs[i]->getValueAsListOfDefs("To");
|
|
|
|
if (From.size() != To.size()) {
|
|
errs() << "Error: register list and sub-register list not of equal length"
|
|
<< " in SubRegSet\n";
|
|
exit(1);
|
|
}
|
|
|
|
// For each entry in from/to vectors, insert the to register at index
|
|
for (unsigned ii = 0, ee = From.size(); ii != ee; ++ii)
|
|
SubRegVectors[From[ii]].push_back(std::make_pair(subRegIndex, To[ii]));
|
|
}
|
|
|
|
// Emit the subregister + index mapping function based on the information
|
|
// calculated above.
|
|
OS << "unsigned " << ClassName
|
|
<< "::getSubReg(unsigned RegNo, unsigned Index) const {\n"
|
|
<< " switch (RegNo) {\n"
|
|
<< " default:\n return 0;\n";
|
|
for (std::map<Record*, std::vector<std::pair<int, Record*> > >::iterator
|
|
I = SubRegVectors.begin(), E = SubRegVectors.end(); I != E; ++I) {
|
|
OS << " case " << getQualifiedName(I->first) << ":\n";
|
|
OS << " switch (Index) {\n";
|
|
OS << " default: return 0;\n";
|
|
for (unsigned i = 0, e = I->second.size(); i != e; ++i)
|
|
OS << " case " << (I->second)[i].first << ": return "
|
|
<< getQualifiedName((I->second)[i].second) << ";\n";
|
|
OS << " };\n" << " break;\n";
|
|
}
|
|
OS << " };\n";
|
|
OS << " return 0;\n";
|
|
OS << "}\n\n";
|
|
|
|
OS << "unsigned " << ClassName
|
|
<< "::getSubRegIndex(unsigned RegNo, unsigned SubRegNo) const {\n"
|
|
<< " switch (RegNo) {\n"
|
|
<< " default:\n return 0;\n";
|
|
for (std::map<Record*, std::vector<std::pair<int, Record*> > >::iterator
|
|
I = SubRegVectors.begin(), E = SubRegVectors.end(); I != E; ++I) {
|
|
OS << " case " << getQualifiedName(I->first) << ":\n";
|
|
for (unsigned i = 0, e = I->second.size(); i != e; ++i)
|
|
OS << " if (SubRegNo == "
|
|
<< getQualifiedName((I->second)[i].second)
|
|
<< ") return " << (I->second)[i].first << ";\n";
|
|
OS << " return 0;\n";
|
|
}
|
|
OS << " };\n";
|
|
OS << " return 0;\n";
|
|
OS << "}\n\n";
|
|
|
|
// Emit the constructor of the class...
|
|
OS << ClassName << "::" << ClassName
|
|
<< "(int CallFrameSetupOpcode, int CallFrameDestroyOpcode)\n"
|
|
<< " : TargetRegisterInfo(RegisterDescriptors, " << Registers.size()+1
|
|
<< ", RegisterClasses, RegisterClasses+" << RegisterClasses.size() <<",\n "
|
|
<< " CallFrameSetupOpcode, CallFrameDestroyOpcode,\n"
|
|
<< " SubregHashTable, SubregHashTableSize,\n"
|
|
<< " SuperregHashTable, SuperregHashTableSize,\n"
|
|
<< " AliasesHashTable, AliasesHashTableSize) {\n"
|
|
<< "}\n\n";
|
|
|
|
// Collect all information about dwarf register numbers
|
|
|
|
// First, just pull all provided information to the map
|
|
unsigned maxLength = 0;
|
|
for (unsigned i = 0, e = Registers.size(); i != e; ++i) {
|
|
Record *Reg = Registers[i].TheDef;
|
|
std::vector<int64_t> RegNums = Reg->getValueAsListOfInts("DwarfNumbers");
|
|
maxLength = std::max((size_t)maxLength, RegNums.size());
|
|
if (DwarfRegNums.count(Reg))
|
|
errs() << "Warning: DWARF numbers for register " << getQualifiedName(Reg)
|
|
<< "specified multiple times\n";
|
|
DwarfRegNums[Reg] = RegNums;
|
|
}
|
|
|
|
// Now we know maximal length of number list. Append -1's, where needed
|
|
for (DwarfRegNumsMapTy::iterator
|
|
I = DwarfRegNums.begin(), E = DwarfRegNums.end(); I != E; ++I)
|
|
for (unsigned i = I->second.size(), e = maxLength; i != e; ++i)
|
|
I->second.push_back(-1);
|
|
|
|
// Emit information about the dwarf register numbers.
|
|
OS << "int " << ClassName << "::getDwarfRegNumFull(unsigned RegNum, "
|
|
<< "unsigned Flavour) const {\n"
|
|
<< " switch (Flavour) {\n"
|
|
<< " default:\n"
|
|
<< " assert(0 && \"Unknown DWARF flavour\");\n"
|
|
<< " return -1;\n";
|
|
|
|
for (unsigned i = 0, e = maxLength; i != e; ++i) {
|
|
OS << " case " << i << ":\n"
|
|
<< " switch (RegNum) {\n"
|
|
<< " default:\n"
|
|
<< " assert(0 && \"Invalid RegNum\");\n"
|
|
<< " return -1;\n";
|
|
|
|
// Sort by name to get a stable order.
|
|
|
|
|
|
for (DwarfRegNumsMapTy::iterator
|
|
I = DwarfRegNums.begin(), E = DwarfRegNums.end(); I != E; ++I) {
|
|
int RegNo = I->second[i];
|
|
if (RegNo != -2)
|
|
OS << " case " << getQualifiedName(I->first) << ":\n"
|
|
<< " return " << RegNo << ";\n";
|
|
else
|
|
OS << " case " << getQualifiedName(I->first) << ":\n"
|
|
<< " assert(0 && \"Invalid register for this mode\");\n"
|
|
<< " return -1;\n";
|
|
}
|
|
OS << " };\n";
|
|
}
|
|
|
|
OS << " };\n}\n\n";
|
|
|
|
OS << "} // End llvm namespace \n";
|
|
}
|