mirror of
https://github.com/c64scene-ar/llvm-6502.git
synced 2024-10-31 09:11:13 +00:00
0e5e49e688
git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@7628 91177308-0d34-0410-b5e6-96231b3b80d8
207 lines
8.1 KiB
C++
207 lines
8.1 KiB
C++
//===- RegisterInfoEmitter.cpp - Generate a Register File Desc. -*- C++ -*-===//
|
|
//
|
|
// 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 "Record.h"
|
|
#include "Support/StringExtras.h"
|
|
#include <set>
|
|
|
|
// runEnums - Print out enum values for all of the registers.
|
|
void RegisterInfoEmitter::runEnums(std::ostream &OS) {
|
|
std::vector<Record*> Registers = Records.getAllDerivedDefinitions("Register");
|
|
|
|
if (Registers.size() == 0)
|
|
throw std::string("No 'Register' subclasses defined!");
|
|
|
|
std::string Namespace = Registers[0]->getValueAsString("Namespace");
|
|
|
|
EmitSourceFileHeader("Target Register Enum Values", OS);
|
|
|
|
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 << " };\n";
|
|
if (!Namespace.empty())
|
|
OS << "}\n";
|
|
}
|
|
|
|
void RegisterInfoEmitter::runHeader(std::ostream &OS) {
|
|
EmitSourceFileHeader("Register Information Header Fragment", OS);
|
|
|
|
std::string ClassName = getTarget(Records)->getName() + "GenRegisterInfo";
|
|
|
|
OS << "#include \"llvm/Target/MRegisterInfo.h\"\n\n";
|
|
|
|
OS << "struct " << ClassName << " : public MRegisterInfo {\n"
|
|
<< " " << ClassName
|
|
<< "(int CallFrameSetupOpcode = -1, int CallFrameDestroyOpcode = -1);\n"
|
|
<< " const unsigned* getCalleeSaveRegs() const;\n"
|
|
<< "};\n\n";
|
|
}
|
|
|
|
// RegisterInfoEmitter::run - Main register file description emitter.
|
|
//
|
|
void RegisterInfoEmitter::run(std::ostream &OS) {
|
|
EmitSourceFileHeader("Register Information Source Fragment", OS);
|
|
|
|
// 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.
|
|
//
|
|
std::vector<Record*> RegisterClasses =
|
|
Records.getAllDerivedDefinitions("RegisterClass");
|
|
|
|
std::vector<Record*> Registers = Records.getAllDerivedDefinitions("Register");
|
|
Record *RegisterClass = Records.getClass("Register");
|
|
|
|
std::set<Record*> RegistersFound;
|
|
std::vector<std::string> RegClassNames;
|
|
|
|
// Loop over all of the register classes... emitting each one.
|
|
OS << "namespace { // Register classes...\n";
|
|
|
|
for (unsigned rc = 0, e = RegisterClasses.size(); rc != e; ++rc) {
|
|
Record *RC = RegisterClasses[rc];
|
|
std::string Name = RC->getName();
|
|
if (Name.size() > 9 && Name[9] == '.') {
|
|
static unsigned AnonCounter = 0;
|
|
Name = "AnonRegClass_"+utostr(AnonCounter++);
|
|
}
|
|
|
|
RegClassNames.push_back(Name);
|
|
|
|
// Emit the register list now...
|
|
OS << " // " << Name << " Register Class...\n const unsigned " << Name
|
|
<< "[] = {\n ";
|
|
ListInit *RegList = RC->getValueAsListInit("MemberList");
|
|
for (unsigned i = 0, e = RegList->getSize(); i != e; ++i) {
|
|
DefInit *RegDef = dynamic_cast<DefInit*>(RegList->getElement(i));
|
|
if (!RegDef) throw "Register class member is not a record!";
|
|
Record *Reg = RegDef->getDef();
|
|
if (!Reg->isSubClassOf(RegisterClass))
|
|
throw "Register Class member '" + Reg->getName() +
|
|
" does not derive from the Register class!";
|
|
if (RegistersFound.count(Reg))
|
|
throw "Register '" + Reg->getName() +
|
|
"' included in multiple register classes!";
|
|
RegistersFound.insert(Reg);
|
|
OS << getQualifiedName(Reg) << ", ";
|
|
}
|
|
OS << "\n };\n\n";
|
|
|
|
OS << " struct " << Name << "Class : public TargetRegisterClass {\n"
|
|
<< " " << Name << "Class() : TargetRegisterClass("
|
|
<< RC->getValueAsInt("Size")/8 << ", " << RC->getValueAsInt("Alignment")
|
|
<< ", " << Name << ", " << Name << " + " << RegList->getSize()
|
|
<< ") {}\n";
|
|
|
|
if (CodeInit *CI = dynamic_cast<CodeInit*>(RC->getValueInit("Methods")))
|
|
OS << CI->getValue();
|
|
else
|
|
throw "Expected 'code' fragment for 'Methods' value in register class '"+
|
|
RC->getName() + "'!";
|
|
|
|
OS << " } " << Name << "Instance;\n\n";
|
|
}
|
|
|
|
OS << " const TargetRegisterClass* const RegisterClasses[] = {\n";
|
|
for (unsigned i = 0, e = RegClassNames.size(); i != e; ++i)
|
|
OS << " &" << RegClassNames[i] << "Instance,\n";
|
|
OS << " };\n";
|
|
|
|
// Emit register class aliases...
|
|
std::vector<Record*> RegisterAliasesRecs =
|
|
Records.getAllDerivedDefinitions("RegisterAliases");
|
|
std::map<Record*, std::set<Record*> > RegisterAliases;
|
|
|
|
for (unsigned i = 0, e = RegisterAliasesRecs.size(); i != e; ++i) {
|
|
Record *AS = RegisterAliasesRecs[i];
|
|
Record *R = AS->getValueAsDef("Reg");
|
|
ListInit *LI = AS->getValueAsListInit("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->getSize(); j != e; ++j) {
|
|
DefInit *Reg = dynamic_cast<DefInit*>(LI->getElement(j));
|
|
if (!Reg) throw "ERROR: Alias list element is not a def!";
|
|
if (RegisterAliases[R].count(Reg->getDef()))
|
|
std::cerr << "Warning: register alias between " << getQualifiedName(R)
|
|
<< " and " << getQualifiedName(Reg->getDef())
|
|
<< " specified multiple times!\n";
|
|
RegisterAliases[R].insert(Reg->getDef());
|
|
|
|
if (RegisterAliases[Reg->getDef()].count(R))
|
|
std::cerr << "Warning: register alias between " << getQualifiedName(R)
|
|
<< " and " << getQualifiedName(Reg->getDef())
|
|
<< " specified multiple times!\n";
|
|
RegisterAliases[Reg->getDef()].insert(R);
|
|
}
|
|
}
|
|
|
|
if (!RegisterAliases.empty())
|
|
OS << "\n\n // Register Alias Sets...\n";
|
|
|
|
// Loop over all of the registers which have aliases, emitting the alias list
|
|
// to memory.
|
|
for (std::map<Record*, std::set<Record*> >::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";
|
|
}
|
|
|
|
OS << "\n const MRegisterDesc RegisterDescriptors[] = { // Descriptors\n";
|
|
OS << " { \"NOREG\",\t0,\t\t0,\t0 },\n";
|
|
// Now that register alias sets have been emitted, emit the register
|
|
// descriptors now.
|
|
for (unsigned i = 0, e = Registers.size(); i != e; ++i) {
|
|
Record *Reg = Registers[i];
|
|
OS << " { \"";
|
|
if (!Reg->getValueAsString("Name").empty())
|
|
OS << Reg->getValueAsString("Name");
|
|
else
|
|
OS << Reg->getName();
|
|
OS << "\",\t";
|
|
if (RegisterAliases.count(Reg))
|
|
OS << Reg->getName() << "_AliasSet,\t";
|
|
else
|
|
OS << "0,\t\t";
|
|
OS << "0, 0 },\n";
|
|
}
|
|
OS << " };\n"; // End of register descriptors...
|
|
OS << "}\n\n"; // End of anonymous namespace...
|
|
|
|
Record *Target = getTarget(Records);
|
|
std::string ClassName = Target->getName() + "GenRegisterInfo";
|
|
|
|
// Emit the constructor of the class...
|
|
OS << ClassName << "::" << ClassName
|
|
<< "(int CallFrameSetupOpcode, int CallFrameDestroyOpcode)\n"
|
|
<< " : MRegisterInfo(RegisterDescriptors, " << Registers.size()+1
|
|
<< ", RegisterClasses, RegisterClasses+" << RegClassNames.size() << ",\n "
|
|
<< " CallFrameSetupOpcode, CallFrameDestroyOpcode) {}\n\n";
|
|
|
|
// Emit the getCalleeSaveRegs method...
|
|
OS << "const unsigned* " << ClassName << "::getCalleeSaveRegs() const {\n"
|
|
<< " static const unsigned CalleeSaveRegs[] = {\n ";
|
|
|
|
ListInit *LI = Target->getValueAsListInit("CalleeSavedRegisters");
|
|
for (unsigned i = 0, e = LI->getSize(); i != e; ++i)
|
|
if (DefInit *DI = dynamic_cast<DefInit*>(LI->getElement(i)))
|
|
OS << getQualifiedName(DI->getDef()) << ", ";
|
|
else
|
|
throw "Expected register definition in CalleeSavedRegisters list!";
|
|
OS << " 0\n };\n return CalleeSaveRegs;\n}\n\n";
|
|
}
|